Not sure if this is what you mean.
sync on : sync rate 60
autocam off
make matrix 1,1000,1000,20,20
make object cube 1,50 : position object 1,500,25,500
make object cube 2,25
position camera 500,250,0
dist# = 200
repeat
rem --- large cube controls
if upkey() then move object 1,2
if leftkey() then rotate object 1,0,wrapvalue(object angle y(1) - 1),0
if rightkey() then rotate object 1,0,wrapvalue(object angle y(1) + 1),0
rem --- position small cube
a# = Object angle y(1)
x# = newxvalue(object position x(1),a#,dist#)
z# = newzvalue(object position z(1),a#,dist#)
position object 2,x#,25,z#
rotate object 2,0,a#,0
rem --- update camera
point camera object position x(1),object position y(1),object position z(1)
sync
until spacekey()
end
Programming anything is an art, and you can't rush art.
Unless your name is Bob Ross, then you can do it in thirty minutes.
