Rem Screensaver Attempt
           sync on
            do
 
ink rgb(244,214,210),0
 
for t=1 to 100
 
   ink rgb(rnd(255),rnd(255),rnd(255)),1
 
   left=rnd(640)
   top=rnd(480)
   right=(left+50)
   bottom=(top+50)
 
 
   box left,top,right,bottom
next t
 
ink rgb(244,214,210),1
 
text 200,240,"kooky"
 
for background=1 to 1000
   dot rnd(640),rnd(480)
next background
 
 ink rgb(rnd(255), rnd(255), rnd(255)),1
 
   left=rnd(640)
   top=rnd(480)
   right=(left+50)
   bottom=(top+50)
 
 
 
 
    sync
loop