Well see I'm new, and im wondering why replacing "make object cube 10,100" with "load object goblet.3ds,10" will cause errors? It should display the model instead, right?
Rem Beginning of Main Loop, Framerate
Sync On
Sync Rate 30
Rem make matrix
Make matrix 1,10000,10000,20,20
Rem Change the Furthest view of Camera
Set camera range 1,5000
Rem Add Fog
Fog on
Rem Distance when Fog Appears
Fog distance 4000
Rem Fog Color
Fog color RGB(128,128,128)
Rem Backdrop Color
Color Backdrop RGB(128,128,128)
Rem texture matrix
Load image "grasstexture.bmp",1
Prepare matrix texture 1,1,2,2
Rem Randomize the matrix
randomize matrix 1,250
Rem Place random texture on each matrix tile
For x = 0 to 19
For z = 0 to 19
t = rnd(3)+1
Set Matrix Tile 1,x,z,t
Next z
Next x
Rem Update the changes to the matrix
update matrix 1
Rem Set the Variable for Speed
spd# = 1
Rem Load New Textures
Load image "cube2.bmp",2
Rem Create the cube
Make object cube 10,100
Rem Stop Auto-Cam (Jumps camera to Loading Objects)
Autocam off
Rem Apply Textures to Character
Texture object 10,2
Rem Character Collission with Boxes
Set object collision to boxes 10
Rem Main loop
Do
X# = Object position X(10)
Z# = Object position Z(10)
Y# = Get ground height(1,X#,Z#)
Position object 10,X#,Y#+35,Z#
Rem Actual Hit-testing
If Object collision(10,0)>0 then spd# = spd# - spd# - spd#
If Object collision(10,2)>0 then spd# = -0.5
If Object collision(10,3)>0 then spd# = -0.5
If Object collision(10,4)>0 then spd# = -0.5
If Object collision(10,5)>0 then spd# = -0.5
Rem Constantly Move Character
Move object 10,spd#
Rem Add Friction If Speed is Above Zero
If spd# > 0 then spd# = spd# - 0.025
Rem Add Friction If Speed is Below Zero
If spd# < 0 then spd# = spd# + 0.025
Rem Set the variable aY for the rotation on the Y-axis
aY# = Object angle Y(10)
Rem Keyboard Input
Rem Change Speed
if keystate(31) = 1 then spd# = spd# - 0.1
if keystate(17) = 1 then spd# = spd# + 0.1
Rem Rotate Character
if keystate(32) = 1 then aY# = Wrapvalue(aY#+spd#/3)
if keystate(30) = 1 then aY# = Wrapvalue(aY#-spd#/3)
Rem Rotate Cube
Yrotate object 10,aY#
Rem Prepare Camera Angle
caY#= Camera angle Y()
Rem get player object position and store in X# and Z#
X# = Object position x(10)
Z# = Object position z(10)
Rem get new camera position and store in cZ# and cX#
cZ# = Newzvalue(Z#,aY#-180,100)
cX# = Newxvalue(X#,aY#-180,100)
cY# = Y#
Rem position camera
Position Camera cX#,cY#+150,cZ#
Rem point the camera at the player object
Point camera X#,Y#+150,Z#
Rem Control Camera with IJKL Keys
if keystate(23) = 1 then Move camera 10
if keystate(36) = 1 then Yrotate Camera Wrapvalue(caY#-5)
if keystate(37) = 1 then Move camera -10
if keystate(38) = 1 then Yrotate Camera Wrapvalue(caY#+5)
Rem Refresh Screen
Sync
Loopo.o
^^ My uber face
