yeah... that was an accident, ill see if i could get it all in
set text font "copperplate gothic light" : set text size 20 : do : text 200,200,"how many stars should be in the sky?"
if mousey()>300 and mousey()<320 and mousex()>150 and mousex()<250 : ink rgb(50,200,0),1 : if mouseclick()=1 then maxBox=100 : exit : else
ink rgb(100,100,100),1 : endif : text 150,300,"a couple"
if mousey()>300 and mousey()<320 and mousex()>300 and mousex()<400 : ink rgb(50,200,0),1 : if mouseclick()=1 then maxBox=750 : exit : else
ink rgb(100,100,100),1 : endif : text 300,300,"a lot" : ink rgb(200,200,0),1 : loop
sync on : hide mouse
fog on : fog distance 100 : fog color rgb(0,0,255) : color backdrop 0
make object sphere 1,200 : position object 1,50,50,50
for boxVal=1 to maxBox : make object sphere boxVal+1,5 : position object boxVal+1, rnd(100), rnd(100), rnd(100) : color object boxVal+1,rgb(0,200,0) : next boxVal
position camera 50,50,50
do
inc cam_angle,1 : cam_angle = wrapvalue(cam_angle) : rotate camera cam_angle,cam_angle,cam_angle : sync
set text font "Chiller" : set text size 48
ink rgb(0,200,0),0 : text 0,0,"crazy starviewer..." : text 0,30,"press any key to end"
if scancode()<>0 then exit
loop
The World has no meaning - but gaming does!
