Post

here's an oldie #pico8 cls(6)m=8192?"shit",3,3,1 memcpy(0,m*3,m)::_::cls()w=-t()/2rect(36,54,37,127,2)for x=0,60do a=x/45 for y=0,30do c=sget(x/3,y/3)+(x+y)%2+.2p=a*(sin(x/20+w)+cos(y/16+w))q=a*(cos(x/23+w)+sin(y/19+w))u=x+p v=y+q+a*7circfill(u+39,v+54,1,c+p/3-q/3)end end flip()goto _