Untitled

load object "d:\seu objeto.x",1

position object 1,1100,0,1100
scale object 1,10,10,10
yrotate object 1,-90
fix object pivot 1

Rem Carrega a textura da matrix.
Load image "Indique aqui uma imagem de sua preferencia",1
Rem Cria o Cubo e o posiciona.

Rem Cria a matrix e ajeita as suas propriedades
Make matrix 1,1000,1000,25,25
Randomize matrix 1,7
Prepare matrix texture 1,1,1,1
Update matrix 1
Sync on
Rem DO=Laco de Repetiçao
DO

if upkey()=1
move object 1,1
loop object 1,45,210
else
set object frame 1,0
endif

Rem Crio algumas variaveis para servir de posiçao do cubo
X=object position x(1)
Z=Object position z(1)
Y=Get ground height(1,X,Z)+30
Rem posiciona o nas Variaveis
Position object 1 ,X,Y,Z
Rem Movimentaçao

If rightkey()=1 then yrotate object 1,wrapvalue(Object angle y(1)+3)
If leftkey()=1 then yrotate object 1,wrapvalue(Object angle y(1)-3)
Rem camera isometrica
Position camera X+25,y+15,z+25
Point camera X,Y,Z
Rem Atualiza a tela
Sync
Rem Loop=Fim do DO
Loop