#nanojam :)
f=τ/9;text(["10 DO PARTY","20 HAVE FUN","30 GOTO 10"][⌊f/64%3⌋],32,2,8)
for y<47
 for x<64
  o=noise(1,x/9,y/9,f);u=x*sin o;pset(x,y+10,pget(x/4-32+o+(τ%576)/6,y/5-2-sin f)?0:⌊7o⌋?hsv(u/64+⌊(1-u)⌋/47+f/59):7)
rect(0,0,63,4,3)