Try out this one I edited from yours. After 200 cycles, it clears the screen and starts over, and when you move the mouse, it ends.
ink rgb(0,255,0), rgb(0,0,0) : set text opaque : hide mouse
sync on : sync rate 0
here:
waitup=200 : oldx=mousex() : oldy=mousey()
cls
while scancode()<1 and mouseclick()<1
x=rnd(640) : y=rnd(400)
set cursor x,y : a=rnd(1) : wait 5 : print a
set cursor x,y+15 : a=rnd(1) : wait 5 : print a
set cursor x,y+30 : a=rnd(1) : wait 5 : print a
set cursor x,y+45 : a=rnd(1) : wait 5 : print a
set cursor x,y+60 : a=rnd(1) : wait 5 : print a
set cursor 0, 460
print " "
dec waitup,1
if waitup<0 then goto here
if mousex()<>oldx then end
if mousey()<>oldy then end
sync
endwhile
Good job.
-Vash the Stampede
Intel Pentium 4 3.0 Ghz 1024MB Ram NVIDIA GeForceFX 5200 128MB 19" LCD DVI Viewsonic