PING #1 IF Y: $ 4; BRK X PN 0 % T 12 IF BGET Z 4: TR 1 0; BRK IF AND % T 12 ! RND 2: BRK IF X: TR.P 1; CV 1 N X #2 IF BGET Z 2: BRK IF BGET 1024 % T 12: TO.TR.P 1 #3 IF BGET Z 7: BRK PROB 10: SC.TR.P 17 SC.CV 17 N + 12 PN.RND 2 #4 IF % T 12: BRK D % / T 12 4 IF BGET Z 4: TR 1 0; BRK CV 1 N PN 3 D TR 1 1 #5 #6 EVERY 190: A RND 32000 X / T 2; D % / T 12 4 IF BGET Z 8: BRK IF BGET A % X 12: SC.TR.P 15 IF Y: SC.CV 15 N PN 3 + D 4 ELSE: SC.CV 15 N 16 #7 CV 2 N PN.RND 1 IF ! BGET Z 6: TR.P 2 BRK TR.P 2 #8 IF % T 12: BRK Z 0 L 1 8: Z + Z << STATE I I IF == PRM Y: BRK Y PRM; T 0 TR.P 4 #M $ 8 L 1 3: $ I EVERY 2: $ 6 EVERY 4: $ 7 T + T 1 SC.TR.P 100 #I L 1 4: TR.TIME I 40 M 280; T 0; SYNC -1 L 1 8: MUTE I 1 PARAM.SCALE 0 1 #P 2 5 8 8 1 1 1 1 0 0 0 0 63 4 7 2 4 4 4 2 0 11 4 0 0 16 11 9 16 18 18 9 14 19 7 2 0 0 7 0 18 0 14 21 0 0 21 21 19 0 0 0 0 0 0 0 5 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 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 #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