VII
$ 1 SLAVE TO HERMOD
$ 2 BD
$ 3 SD
$ 4 CLICK (2OPFM)
$ 5 SOLO (PICO/WASP)
$ 6 BASS (ORGONE ACC)
$ 7 RINGS
$ 8 HARMONIC GRAINS
$ 11 GLOBAL
$ 12 HARMONY (301)
$ 13 RAINMAKER MEL
$ 14 
$ 15 
$ 16 
$ 17 ADDITIONAL METRO
$ 18 ADDITIONAL INIT



#1
TR.P 1
IF > LAST $ 300: $ 10; K -1
ELSE: M LAST $
J / IN 135
IF != J K: K J; T 0; P.N % K 3
$ 17

#2
IF ! Y: K RRND 60 63
J BGET P K Y; A J
PROB + 2 / X 10: J 1; A 1
IF J: SC.TR.P 1
SC.CV 1 N PN 3 B

#3
IF STATE 2: BRK
IF ! Y: K RRND 56 59
J BGET P K Y
PROB + 1 / X 10: J 0
IF J: SC.TR.P 3

#4
IF STATE 3: BRK
J BGET 8263 Y
PROB TI.PRM 2: J 1
IF J: TR.P 4

#5
J PN 3 TI.PRM 4
IF == J K: BRK
K J; TO.TR.P 8
TO.CV 8 N + J 36

#6
TO.CV 1 N + 12 PN 3 B
IF STATE 4: BRK
IF A: TO.TR.P 1

#7
IF STATE 8: BRK
I + B * 2 RND 3
J PN 3 I; K 0
IF BGET P 56 Y: J + J 12; K 1
PROB TI.PRM 3: K 1
IF K: TO.CV 2 N J

#8
IF STATE 6: BRK
J BGET P 56 Y
IF J: SC.TR.P 32
IF J: SC.CV 90 RND 16000

#M
M.ACT 0

#I
M 170; M.ACT 0; T 0
L 1 8: TO.TR.TIME I 20
L 1 4: TR.TIME I 11
SC.TR.TIME 15 30
$ 18

#A
X TI.PRM 1
B P % / T 7 8
SC.CV 2 ? Y RND 6000 16000

#B
SC.CV 15 N PN 3 B
SC.CV 16 N PN 3 + B 2
J BGET P 55 Y
PROB / X 10: J 1
IF && ! STATE 5 J: SC.TR.P 15

#C
IF STATE 7: BRK
J / + X 15 RND 10
EVERY J: TO.TR.P 7
PROB J: TO.CV 7 PN 3 RRND 1 17

#D

#E

#F

#H
Y % T 14
L 11 16: $ I
L 2 8: $ I
T + T 1

#J
L 1 3: TI.PRM.MAP I 0 99
TI.PRM.MAP 4 0 21
L 2 8: MUTE I 1

#P
8	8	8	24
1	1	1	1
0	0	0	0
63	63	63	63

1	0	3	0
1	0	3	2
1	0	2	3
1	1	2	5
1	2	1	7
1	2	1	9
2	2	0	10
3	3	0	12
0	0	0	14
0	0	0	15
0	0	0	17
0	0	0	19
0	0	0	21
0	0	0	22
0	0	0	24
0	0	0	26
0	0	0	27
0	0	0	29
0	0	0	31
0	0	0	33
0	0	0	34
0	0	0	36
0	0	0	38
0	0	0	39
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
17	16383	16373	0
128	128	128	0
144	128	128	0
10368	10368	10368	0
8320	8320	8320	0
1	1	1	0
5	16	17	0
17	17	65	0
21	17	81	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