Sorry your browser is not supported!

sync on
make matrix 1,100,100,10,10
make object cube 1,1

dist#=10
height#=5
smooth=1
ar#=.005
do
if leftkey()=1 then yrotate object 1,wrapvalue(object angle y(1)-ar#)
if rightkey()=1 then yrotate object 1,wrapvalue(object angle y(1)+ar#)
if upkey()=1 then xrotate object 1,wrapvalue(object angle x(1)+ar#)
if downkey()=1 then xrotate object 1,wrapvalue(object angle x(1)-ar#)
if mouseclick()=1 then zrotate object 1,wrapvalue(object angle z(1)+ar#)
if mouseclick()=2 then zrotate object 1,wrapvalue(object angle z(1)-ar#)

`left key & right key are the y axis movement
`up key & down key are the x axis movement
`mouse buttons are the z axis movement

set camera to follow object position x(1),object position y(1),object position z(1),object angle y(1),dist#,height#,smooth,0
sync
loop