SEMIT $1 LINE 1 $2 LINE 2 $3 LINE 3 $4 LINE 4 $5 $6 $7 $8 $11 SCALE + MISC $12 HANDLE 1 $13 $14 $15 BINARY RHYTHM BUTTONS $16 SWITCH PATTERN > GRID $17 HANDLE BUTTON PRESS $18 GRID INIT #1 IF G.BTN.V 0: SC.TR.P 1 PROB 3: K RND 1 J + * 2 RND 5 K JF.NOTE N.B J RND V 5 PROB 70: TR.TOG 2 #2 IF G.BTN.V 1: TR.P 4 PROB 4: J RND 7 JF.NOTE N.B J RND V 5 PROB 90: TR.TOG 2 #3 PROB 10: J RND 7 PROB 30: J + J RRND -1 1 I RND 2; TO.TR 2 I IF I: TO.CV 2 N.B J #4 IF ! G.BTN.V 3: BRK PROB 77: BRK SC.CV 25 N.B RND 5 SC.TR.P 25 #5 #6 #7 #8 #M L 11 12: $ I DEL.B 250 B: $ 1 DEL.G 4 250 C D: $ 2 DEL.B 500 R0111: $ 3 DEL.R 3 667: $ 4 T + T 1 #I M 2000; T 0; P.N 0; B 27; $ 18 L 2 4: TR.TIME I 20 TR.TIME 1 + M 100 JF.MODE 1; JF.SHIFT V -1 M.ACT G.BTN.V 8 #A TR.P 1 A % / T 4 2 N.B 0 P + RND 2 * A 4 TO.CV 1 N P + % T 8 8 C + G.FDR.N 0 1 D + G.FDR.N 1 1 #B L 0 7: G.LED I 5 5 G.LED % T 8 5 15 IF || ! G.BTN.V 2 % T 4: BRK J + * A 3 RND 2 SC.CV 24 V J DEL 3: SC.TR.P 24 #C #D #E B BTOG B - G.BTNI 20 #F B P 16 L 0 7: G.BTN.V + 20 I BGET B I G.FDR.N 0 - P 17 1 G.FDR.N 1 - P 18 1 #H I G.BTNI; M.ACT G.BTN.V 8 IF == I 8: G.BTN.PR + P.N 16 1 IF == I 8: T 0; BRK G.BTN.SW I; P.N - I 16; $ 16 #J G.RST G.BTX 0 0 7 1 1 1 5 0 4 1 G.GBT 1 8 15 7 1 1 1 5 17 G.GBX 2 16 10 7 1 1 1 5 17 4 1 G.GBX 3 20 0 0 1 1 1 5 15 8 1 G.FDX 0 0 2 8 1 0 5 14 1 2 #P 3 3 3 3 1 1 1 1 0 0 0 0 63 63 63 63 -10 -10 -10 -10 1165 1165 1165 1165 173 173 173 173 0 0 0 0 1321 1321 1321 1321 1322 1322 1322 1322 1448 1448 1448 1448 0 0 0 0 0 0 0 3 0 0 0 2 0 0 3 0 0 0 3 -2 0 -2 5 8 0 -2 5 7 0 -2 -2 5 0 -2 -2 5 27 1 0 0 3 3 3 3 2 2 2 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 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