HEALTHYH
$ 1 BD
$ 2 PERC
$ 3 BASS
$ 4 RINGS
$ 5 SOLO
$ 6 
$ 7 LONG MELODY
$ 8 MEL GEN ADD
$ 11 SWITCH PART
$ 12 HANDLE B + X
$ 13
$ 14
$ 15
$ 16
$ 17
$ 18 ADD INIT



#1
A BGET P - 63 / X 40 Y
PROB + 1 / X 10: A 1
IF && ! STATE 1 A: SC.TR.P 1

#2
J ! STATE 2; K ! STATE 6
IF && K BGET P 59 Y: SC.TR.P 7
IF && J BGET P 60 Y: SC.TR.P 3
IF BGET P 62 Y: SC.TR.P 4
IF STATE 3: BRK
PROB 80: TR.P 2; SC.TR.P 8

#3
TO.CV 1 N + 12 P B
IF && ! STATE 4 A: TO.TR.P 1

#4
I ! STATE 8
J P + B * 2 RND 2; K J
PROB / X 5: J + J * 12 RND 2
IF && I BGET P 60 Y: J + K 24
TO.CV 2 N + 24 J

#5
IF > LAST $ 200: BRK
IF == TI.PRM 4 J: BRK
J TI.PRM 4
TO.CV 4 N + 36 P J
TO.TR.P 4

#6

#7
IF ! T: K 0; P.I P.L
IF K: K - K 1; BRK
J P.NEXT; K - P.NEXT 1
IF STATE 5: BRK
IF >= J 0: TO.CV 3 N J
IF >= J 0: TO.TR.P 3

#8
IF STATE 7: BRK
IF ! BGET P TI.PRM 2 Y: BRK
K P RND 7; I TI.PRM 3; D I
PROB - 100 I: BRK
TO.TR.P 3
TO.CV 3 N K

#M
$ 11; Y % T P 56
L 12 17: $ I
L 1 8: $ I
T + T 1

#I
M 111; M.ACT 0; T 0; TR 4 0
PARAM.SCALE 0 3
L 1 8: MUTE I 1
L 1 4: TR.TIME I 20
$ 18

#A
I * 4 P 56
TR 4 <= - I % T I P 56
IF || == P.N PRM % T I: BRK
P.N PRM; T 0

#B
B P + 16 % / T P 56 8
X TI.PRM 1
SC.TR 80 > X 30

#C
TR.P 1

#D

#E

#F

#H

#J
TI.PRM.MAP 1 0 99
TI.PRM.MAP 2 48 49
TI.PRM.MAP 3 0 99
TI.PRM.MAP 4 0 14

#P
25	46	51	51
1	1	1	1
24	24	24	24
24	45	47	47

5	5	5	2
7	7	7	4
8	8	8	5
10	10	10	7
12	12	12	9
14	14	14	11
15	15	15	12
17	17	17	14
19	19	19	16
20	20	20	17
22	22	22	19
24	24	24	21
26	26	26	23
27	27	27	24
29	29	29	26
31	31	31	28
1	1	2	2
1	1	2	2
1	2	7	7
1	2	7	7
1	4	4	4
1	4	4	4
1	2	4	4
2	2	4	4
-1	-1	10	19
0	15	10	10
0	7	8	17
0	5	5	5
0	9	7	16
0	5	10	10
0	10	5	14
0	5	5	5
0	14	7	16
0	15	10	10
0	-1	5	14
0	30	5	5
0	14	3	12
0	5	10	10
0	15	1	10
0	5	5	5
0	17	0	9
0	5	15	15
0	14	7	16
0	25	15	15
0	12	12	21
0	5	15	15
0	0	7	16
0	0	15	15
1	1	1	1
1025	1025	1025	1025
1057	1057	1057	1057
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
0	0	0	0
15	15	15	15
0	0	0	0
0	0	0	0
31744	31744	31744	31744
32	32	32	32
31	31	31	31
9	9	9	9
1	1	1	1

#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