Sorry your browser is not supported!

sync on : sync rate 0 : hide mouse
X#=100 : Y#=100
randomize 5 : colorset=rnd(2)
do
set cursor 0,0
inc clearscreen : direction=rnd(3)
ink rgb(red,green,blue),1
for tim=1 to rnd(300)
if direction=0 : dec y# : endif: if direction=1: inc y# : endif: if direction=2 : dec x# : endif: if direction=3: inc x#:endif

box X#,Y#,X#+2,Y#+2
if x#<1 : x#=1 : endif : if y#<1 : y#=1 : endif : if x#>screen width() : x#=screen width() : endif: if y#>screen height(): y#=screen height(): endif:
sync: next tim
if clearscreen>2000 : clearscreen=0
x#=100 : y#=100 : colorset=rnd(2) : cls : endif
if colorset=0 then red=rnd(250)+55:green=0:blue=0
if colorset=1 then red=0:green=rnd(250)+55:blue=0
if colorset=2 then red=0:green=0:blue=rnd(250)+55

loop

sync on : sync rate 0 : hide mouse
X#=screen width()/2 : Y#=screen height()/2
randomize timer() : colorset=rnd(2)
do
set cursor 0,0
inc clearscreen : direction=rnd(3)
for tim=1 to rnd(300)
if direction=0 : dec y# : endif: if direction=1: inc y# : endif: if direction=2 : dec x# : endif: if direction=3: inc x#:endif
ink rgb(red,green,blue),1
box X#,Y#,X#+2,Y#+2
ink rgb(red/2,green/2,blue/2),1
box X#-2,Y#-2,X#,Y#
if x#<1 : x#=1 : endif : if y#<1 : y#=1 : endif : if x#>screen width() : x#=screen width() : endif: if y#>screen height(): y#=screen height(): endif:
sync : next tim
if clearscreen>2000 : clearscreen=0 : X#=screen width()/2 : Y#=screen height()/2 : colorset=rnd(2) : cls : endif
if colorset=0 then red=rnd(250)+55:green=0:blue=0
if colorset=1 then red=0:green=rnd(250)+55:blue=0
if colorset=2 then red=0:green=0:blue=rnd(250)+55
sync
loop

sync on : sync rate 0 : hide mouse
X#=screen width()/2 : Y#=screen height()/2
randomize timer() : colorset=rnd(2)
do
set cursor 0,0
inc clearscreen : direction=rnd(3)
for tim=1 to rnd(300)
if direction=0 : dec y# : endif: if direction=1: inc y# : endif: if direction=2 : dec x# : endif: if direction=3: inc x#:endif
ink rgb(red,green,blue),1
box X#,Y#,X#+2,Y#+2
ink rgb(red/2,green/2,blue/2),1
box X#-2,Y#-2,X#,Y#+rnd(10)
if x#<1 : x#=1 : endif : if y#<1 : y#=1 : endif : if x#>screen width() : x#=screen width() : endif: if y#>screen height(): y#=screen height(): endif:
sync : next tim
if clearscreen>2000 : clearscreen=0 : X#=screen width()/2 : Y#=screen height()/2 : colorset=rnd(2) : cls : endif
if colorset=0 then red=rnd(250)+55:green=0:blue=0
if colorset=1 then red=0:green=rnd(250)+55:blue=0
if colorset=2 then red=0:green=0:blue=rnd(250)+55
sync
loop

sync on : sync rate 0 : hide mouse
X#=screen width()/2 : Y#=screen height()/2
randomize timer()
do
set cursor 0,0
inc clearscreen : direction=rnd(3)
for tim=1 to rnd(300)
if direction=0 : dec y# : endif: if direction=1: inc y# : endif: if direction=2 : dec x# : endif: if direction=3: inc x#:endif
ink rgb(red,green,blue),1
box X#,Y#,X#+2,Y#+2
ink rgb(red/2,green/2,blue/2),1
box X#-2,Y#-2,X#,Y#
if x#<1 : x#=1 : endif : if y#<1 : y#=1 : endif : if x#>screen width() : x#=screen width() : endif: if y#>screen height(): y#=screen height(): endif:
sync : next tim
if clearscreen>2000 : clearscreen=0 : X#=screen width()/2 : Y#=screen height()/2 : colorset=rnd(2) : cls : endif
red=rnd(255):blue=rnd(255):green=rnd(255)
sync
loop