Gridlite (2018)
(248 chars)
p={} for i=0,80 do add(p,{x=(i%9)*16,y=flr(i/9)*16}) end ::_:: w=sin(t())*16+.5 q=cos(t()/2)*40 z=sin(t()/3)*40 cls() for i=1,2 do h=(i-1.5)*1.5 circfill(64+z*h,64+q,30,7) for v in all(p) do rectfill(v.x,v.y,v.x+w/i,v.y+w/i,0) end end flip() goto _ |
[Please log in to post a comment]