q={} for i=1,150 do q[i]={x=sin(i/200)*30+60, y=(i+70)/3,r=ceil(i/5),c=i/16} end ::_:: cls() for k,v in pairs(q) do if v.r < 80 then v.r += 1 else v.r = 1 v.x = rnd(128) v.y = rnd(128) end for i = 1,4 do circ(v.x,v.y,v.r-i,v.c) end end flip() goto _