wipe 15 15 35
ink 80 180 255
box 0 (+ h/2 (* 30 (sin (/ f 8)))) w 4
box 0 (+ h/2 (* 30 (sin (+ 1 (/ f 8))))) w 4
box 0 (+ h/2 (* 30 (sin (+ 2 (/ f 8))))) w 4
ink 255 120 80
box 0 (+ h/2 (* 20 (cos (/ f 6)))) w 3
box 0 (+ h/2 (* 20 (cos (+ 1.5 (/ f 6))))) w 3
ink 100 255 150
box 0 (+ h/2 (* 40 (sin (/ f 12)))) w 2
box 0 (+ h/2 (* 40 (sin (+ 3 (/ f 12))))) w 2