for i=1 to 5
make object sphere i,rnd(3)+2
color object i,rgb(rnd(255),rnd(255),rnd(255))
repeat
position object i,rnd(100),0,rnd(100)
until object collision(i,0)=0
next i
make object cube 10,2
color object 10,0
repeat
position object 10,rnd(100),0,rnd(100)
until object collision(10,0)=0
position camera 50,80,50
point camera 50,0,50
a$=""
do
if upkey() then move object 10,0.1
if downkey() then move object 10,-0.1
if leftkey() then turn object left 10,2
if rightkey() then turn object right 10,2
for i=1 to 5
if object collision(10,i)
a$=a$+str$(i)+":"
set object collision off i
hide object i
endif
next i
set text opaque
for i=1 to 5
if object visible (i)
center text object screen x(i),object screen y(i),str$(i)
endif
next i
set text transparent
center text object screen x(10),object screen y(10),a$
loop
example code lets you "collect" the coloured spheres in any order, see what difference your code has to this, maybe it will just give you that sudden "ping!" of inspiration
(cursor left/right to turn and up/down to move...you are the grey cube)
if there is one thing I can NOT tolerate, it`s intolerant people.
