setcps 0.5setcps (-1)d1$ s "k k <k k k k*2> <k k*2 k k*2>"# s "kick808"d2 $ s "{hh*3 hh*2}"d3$ off 0.125 ((|+ n 12) . (# gain 0.7))$ superimpose ((|-| 14) . (# s "superpiano") . (# gain 0.8))$ every 4 (rev)$ arp "updown"$ n "0'maj'4 e'min"# s "blip"d1 $ s "superpiano"