WITH GREAT POWERS $ 1 BD $ 2 MATTER HI PERC $ 3 SD $ 4 BACKING PLUCK $ 5 BASS $ 6 SOLO $ 7 RIDE $ 8 HMD SLAVE > CLOUDS $ 11 CALL LOOP $ 12 X + 301 GLOBAL $ 13 BASS NOTE $ 14 RINGS $ 15 $ 16 $ 17 $ 18 ADDITIONAL INIT #1 A ? BGET P 63 Y 1 0 IF STATE 1: BRK IF ! T: A 1 PROB + 2 / X 10: A 1 IF A: SC.TR.P 1 #2 IF STATE 6: BRK PROB + 20 / X 2: SC.TR.P 7 #3 IF STATE 2: BRK I ? RND 6 Y - Y RND 2 J ? BGET P 62 I 1 0 PROB + 5 / X 20: J 1 IF && ! A J: SC.TR.P 3 #4 IF STATE 5: BRK J + 6 * RND 1 12 PROB 40: J + J 7 SC.CV 10 N J PROB + 2 / X 5: SC.TR.P 10 #5 IF STATE 4: BRK IF A: TO.TR.P 1 TO.CV 1 N B PROB / X 20: TO.TR.TOG 1 #6 K P + 8 % / T P 57 P 58 TO.TR 2 TI.PRM 4 IF > LAST $ 200: BRK IF == TI.PRM 4 J: BRK J TI.PRM 4; K + K TI.PRM 3 TO.CV 2 N + K + 36 PN 3 J #7 IF STATE 3: BRK J BGET P 61 % T 5 IF J: SC.TR.P 5 #8 IF STATE 8: TO.TR 5 0; BRK PROB + 4 / X 20: TR.P 3 PROB 10: TO.TR.TOG 5 #M TR.P 1; SC.TR.P 100 Y % T P 57 L 11 17: $ I L 1 8: $ I T + T 1 #I L 1 4: TR.TIME I 20; T 0 L 1 8: MUTE I 1 TR 2 0; M.ACT 0; M 100 PARAM.SCALE 0 2 $ 18 DEL 10: TR 2 1 #A I P 56 J ! % T I; K != P.N PRM IF && J K: P.N PRM; T 0 CV 1 * 1200 PRM TR 4 > * 2 P 57 - I % T I #B L 90 99: SC.CV I RND 16000 X TI.PRM 1 SC.CV 100 * 160 X #C B P % / T P 57 P 58 #D K P + 8 % / T P 57 P 58 J PN 3 RND + 6 / X 20 I BGET P 60 Y IF I: TO.CV 3 N + J K #E #F #H #J TI.PRM.MAP 1 0 99 TI.PRM.MAP 3 -2 1 TI.PRM.MAP 4 0 14 L 2 8: TO.TR.TIME I 20 TO.TR.TIME 1 * 4 M #P 5 16 16 16 1 1 1 1 0 0 0 0 63 63 63 63 6 14 14 1 8 16 14 4 9 11 16 6 14 11 16 9 13 14 11 11 0 16 11 13 0 18 11 16 0 18 11 18 0 0 0 21 0 0 0 23 0 2 0 25 0 2 0 28 0 0 0 30 0 0 0 33 0 -3 2 35 0 -3 2 37 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 140 112 80 70 14 14 10 14 5 8 8 0 0 0 0 0 257 257 1 0 5 5 5 5 4112 4112 32 0 1 1 1 0 #G 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0