::★::cls()
for y=0,42 do for x=0,31 do
sx = 1+x4 + (y%2)2
sy = 1+y*3

d=.25t()sqrt(sx^2+sy^2)
q=cos(d/20-t()/4)2
circfill(sx,sy,1,5+q1.5)

end
end
flip() goto ★