does this help?
sync on
sync rate 40
for a=10 to 13
make object box a,10,30,10
color object a,rgb(0,0,0)
next a
position object 10,25,15,75
position object 11,75,15,25
position object 12,25,15,25
position object 13,75,15,75
`controllable object
make object box 1,5,10,3
x#=40.0
z#=25.0
position object 1,x#,5,z#
position camera 50,15,-20
`backdrop off
clear camera view 0
`backdrop off
set object collision on 1
do
set cursor 0,0
if upkey() then inc z#, 0.5
if downkey() then dec z#, 0.5
if rightkey() then inc x#, 0.5
if leftkey() then dec x#, 0.5
position object 1,x#,5,z#
for i = 10 to 13
if object collision(1,i)
if upkey() then dec z#, 0.5
if downkey() then inc z#, 0.5
if rightkey() then dec x#, 0.5
if leftkey() then inc x#, 0.5
position object 1,x#,5,z#
endif
next i
sync
loop