Sorry your browser is not supported!

make matrix 1,100,100,25,25
make camera 1
position camera 1,1,20,1
make object box 1,10,10,10
position object 1,0,0,0
make object sphere 2,10
position object 2,100,0,100
point camera 1,Object Position x(2),Object Position y(2),Object Position z(2)

do
`controls for camera
if upkey()=1 then move camera 1,.2
if rightkey()=1 then turn camera right 1,.1
if leftkey()=1 then turn camera left 1,.1
if downkey()=1 then move camera 1,-.2
`move object1 to object2
Point Object 1,Object Position x(2),Object Position y(2),Object Position z(2)
move object 1,.1
`here is where i need help, i want it to get the distance of the objects and if it is 0 then to move object 2 to a random spot on the matrix
loop

Dist=Sqrt((Object Position X(1)-Object Position X(2))^2+(Object Position Y(1)-Object Position Y(2))^2+(Object Position Z(1)-Object Position Z(2))^2)
if dist<1 then position object 2,rnd(100),0,rnd(100)

function distance(x1 as float, y1 as float, z1 as float, x2 as float, y2 as float, z2 as float)
   d# = sqrt((x1-x2)^2 + (y1-y2)^2 + (z1-z2)^2)
endfunction d#

function distancee(obj1,obj2)
dist#=sqrt((object position x(obj)-object position x(obj2))^2+(object position y(obj)-object position y(obj2))^2+(object position z(obj)-object position z(obj2))^2)
endfunction dist#

dist#=sqrt((object position x(100)-object position x(200))^2+(object position y(100)-object position y(200))^2+(object position z(100)-object position z(200))^2)

print distance(x1#,y1#,z1#,x2#,y2#,z2#)
wait key

d# = distance(x1#,y1#,z1#,x2#,y2#,z2#)
print d#
wait key