Shinny balls

[DrChip]

rem shinny balls
rem iPhone 6 plus / 8.2 b5

sw=screen_width()
sh=screen_height()
graphics
loop:
x=rnd(sw)
y=rnd(sh)
r=rnd(255)
g=rnd(255)
b=rnd(255)
rad=rnd(90)

for a=rad to 1 step -1
str=(rad-a+10)/100
fill color r*str/255,g*str/255,b*str/255
fill circle x,y size a
next a
goto loop