hope this help
`---------------------------------------
`
` HOPE THIS HELP
`
` by X MEN 04
`----------------------------------------
rem Activate manual sync
sync on
`------------make some texture
for a=1 to 4
for b=1 to 4
ink rgb(rnd(255),rnd(255),rnd(255)),1
box -64+a*64,-64+b*64,a*64,b*64
next a
next b
get image 1,0,0,256,256
`wait key
`----------make a matrix
make matrix 1,1000.0,1000.0,25,25
prepare matrix texture 1,1,1,1
`----------Randomize the matrix
randomize matrix 1,10
rem Make player
make object cube 1,10
rem How fast player move
speed#=3.0
rem position player
posx#=500.0
posz#=500.0
rem Begin main loop
do
rem Control Player with the cursor keys
if upkey()=1
posx#=newxvalue(posx#, angle#, speed#)
posz#=newzvalue(posz#, angle#, speed#)
endif
if downkey()=1
posx#=newxvalue(posx#, angle#, 0-speed#)
posz#=newzvalue(posz#, angle#, 0-speed#)
endif
if leftkey()=1 then angle#=wrapvalue(angle#-speed#)
if rightkey()=1 then angle#=wrapvalue(angle#+speed#)
rem get then matrix ground height for player to walk on
ground#=get ground height(1,posx#,posz#)+10
rem Update the object with these new values
position object 1,posx#,ground#,posz#
rem rotate player
yrotate object 1,angle#
rem Camera follow player
camdist#=35.0 : camhigh#=ground#+10.0 : camfade#=3.5
set camera to follow posx#,posy#,posz#,angle#,camdist#,camhigh#,camfade#,1
rem Update Screen
sync
loop
You can do it if you try
