t=93 function TIC()
for c=0,47 do r=math.abs(31-(t//3&63))
poke(16320+c,c*r/6)end
t=t+1 for x=-120,120 do for y=-68,68
do for d=-10,-99,-1 do
h=((d*d+d*x~(y*d))//256+4)&(d-t)
if h&8>0 then pix(x+120,y+68,
(h-7+((x~y)&1))) break end end end end
end