#nanojam OC,3
m=64;h=6cos(f=.1τ)+m
for y<2m
 c=hsv(.7+.01(h-y));d=1/(y-h);j=⌊d*y+f⌋
 for x<2m
  i=⌊d*(x-m+8sin(.5f))⌋;pset(x,y,(y<h)?c:2((i+j)%2)+2)
for k<16(1+sin(.1f))
 a=m+36sin(f+.3k);b=4+24cos(4f+.3k);draw(15,a,h-8-b,15);draw(15,a,h+24-.3b,3)
