CLICK $ 1 CLICKS + BD TR + SD $ 2 RINGS $ 3 BASS $ 4 FAST HH $ 5 CHORD TRIGGER $ 6 $ 7 $ 8 LONG MELODY $ 11 BOOK KEEPING $ 12 BOOK KEEPING $ 13 CHORD PITCH SUB SCRIPT $ 14 301 INIT #1 J ! PN 3 0; K ! STATE 2 I ? RND 3 Y + Y RND 3 IF ! STATE 6: TO.TR.P 6 IF && J BGET P 63 Y: TO.TR.P 8 PROB - 100 IN: BRK IF && K BGET P 62 I: TO.TR.P 7 #2 IF PN 3 6: BRK K MAX 0 SCL 80 100 0 94 IN PROB K: BRK IF && RND 4 % T 2: BRK J PN 3 + A RRND 1 5 TO.CV 2 N + J * 12 RND 2 #3 B PN 3 A; J + B 24; K ! Y IF K: SC.CV 1 N B; TO.CV 1 N J TO.CV 4 N + B 12 IF STATE 4: BRK PROB 5: TO.TR.P 1 #4 IF STATE 3: BRK PROB - 100 IN: TO.TR.P 5 #5 IF ! % T 4: TR.P 2 IF PN 3 7: BRK IF ! Y: $ 13 IF BGET P 61 Y: SC.TR.P 20 PROB / IN 20: SC.TR.P 20 #6 #7 #8 IF ! % T 144: K 0; P.I P.L IF K: K - K 1; BRK J P.NEXT; K - P.NEXT 1 IF J: TO.CV 3 N J TO.TR 3 ? STATE 5 0 J #M $ 14; TR.P 1; Y % T 18 L 11 12: $ I L 1 8: $ I T + T 1 #I T -1; PARAM.SCALE 0 2 M 90; M.ACT 0; IN.SCALE 0 200 L 1 4: TR.TIME I 20 L 1 8: TO.TR.TIME I 20 TO.TR 3 0 #A CV 4 ? < % T 144 126 0 32000 IF % T 144: BRK IF != P.N PRM: P.N PRM; T 0 L 1 8: PN 3 - I 1 STATE I #B A P % / T 18 8 #C SC.CV 20 N PN 3 + A 1 SC.CV 21 N PN 3 + A 2 SC.CV 22 N PN 3 + A 3 SC.CV 23 N PN 3 + A 5 #D IF > T -1: BRK L 1 100: SC.TR.TIME I 20 T 0 #P 22 48 33 10 1 1 1 1 8 8 8 0 9 47 27 63 8 20 32 0 8 20 32 1 8 26 38 1 8 26 38 0 14 44 32 0 14 44 32 1 14 50 38 0 14 50 38 0 0 7 5 0 0 12 12 4 0 5 3 7 0 6 6 12 0 3 1 14 0 8 8 16 0 0 0 2 0 6 6 5 0 10 8 9 0 3 3 12 0 0 0 14 0 1 1 16 0 10 8 3 0 4 4 7 0 12 10 10 0 4 4 15 0 7 5 17 0 12 12 19 0 0 0 5 0 16 88 8 0 7 0 12 0 12 0 15 0 5 0 17 0 6 0 19 0 3 0 1 0 8 0 5 0 0 0 8 0 6 0 13 0 10 0 15 0 3 0 17 0 0 0 -1 0 1 0 3 0 10 0 10 0 4 0 13 0 11 0 15 0 4 0 17 0 8 0 7 0 12 0 7 0 0 0 10 0 16 0 15 0 0 0 17 0 0 0 19 0 0 0 8 0 0 0 8 0 0 0 11 0 0 0 15 0 0 0 18 0 0 0 22 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 513 1026 0 4112 4112 4112 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