Sorry about that. Heres the code.
sync on
sync rate 30
load image "ground.bmp",1
load object "zombie.3ds",1
scale object 1,2000,2000,2000
texture object 1,1
make matrix 1,100000,100000,25,25
randomize matrix 1,10
prepare matrix texture 1,1,25,25
update matrix 1
do
gosub control
sync
loop
Rem Start Controling Player
control:
rem add varaibles
opx#=object position x(1)
opz#=object position z(1)
opy#=object position y(1)
obzc#=object position z(1)-5
oay#=object angle y(1)
rem position object player
y#=get ground height(1,object position x(1),object position z(1))
position object 1,object position x(1),y#,object position z(1)
rem Use W,A,S,D controls and directional keys
if inkey$()="w" then move object 1,3
if upkey()=1 then move object 1,3
if inkey$()="s" then move object 1,-3
if downkey()=1 then move object 1,-3
if inkey$()="a" then yrotate object 1,oay#-10
if leftkey()=1 then yrotate object 1,oay#-10
if inkey$()="d" then yrotate object 1,oay#+10
if rightkey()=1 then yrotate object 1,oay#+10
Rem make the camera positions
cz# = Newzvalue(opz#,oay#-180,100)
cx# = Newxvalue(opx#,oay#-180,100)
Rem position and point camera
Position Camera cx#,100,cz#
Point camera opx#,50,opz#
return
Here.
-are you sure you're awake? what proof do you have?-
