Sorry your browser is not supported!

load image "Media\grass.jpg",1

   Autocam off
   Hide mouse
   Sync ON
   Sync Rate 30

make matrix 1,256,256,256,256
make camera 1
load object "bin.3ds",1
position object 1,1,1,1
prepare matrix texture 1, 1, 256, 256
X# = object position x(1)
Z# = object position z(1)
cZ# = Newzvalue(Z#,aY#-180,100)
cX# = Newxvalue(X#,aY#-180,100)

do
Position Camera cX#,75,cZ#
Point camera X#,25,Z#

       If UpKey()=1 Then move object 1,10
       If LeftKey()=1 Then yrotate object 1,wrapvalue(aY#-5)
       If RightKey()=1 Then yrotate object 1,wrapvalue(aY#+5)
sync
loop

 If LeftKey()=1 Then yrotate object 1,wrapvalue(aY#-5)
       If RightKey()=1 Then yrotate object 1,wrapvalue(aY#+5)

If LeftKey()=1 Then turn object left 1,5
       If RightKey()=1 Then turn object right 1,5