#TITLE		HONEYCOMB BEAT - MUSIC 1
#COMPOSER	HUDSON SOFT
#PROGRAMER	iwamoo
#MAKER		HUDSON SOFT
#AUTO-BANKSWITCH	0


; Env

@v3 = { 6 8 10 11 11 10 9 9 8 }
@v4 = { 4 5 5 6 6 6 7 7 7 7 7 7 6 6 6 6 6 6 5 }
@v5 = { 6 7 8 8 8 8 8 8 8 8 8 8 7 7 7 7 7 7 6 }
@v11= { 10 9 }
@v12= { 8 7 }
@v13= { 6 5 }
@v14= { 4 3 }
@v15= { 7 8 }
@v16= { 6 5 }
@v17= { 5 6 }
@v18= { 4 5 }
@v19= { 3 4 }
@v20= { 2 3 }

; Env(Noise)

@v0 = { 15 12 6 0 }
@v1 = { 12 6 2 0 }
@v2 = { 15 15 15 15 15 14 14 14 14 14 0 }

; Voice

@0 = { 0 2 }
@1 = { 2 1 }
@2 = { 1 0 }
@3 = { 1 2 }
@4 = { 2 0 }

; EP

@EP0 = { 14 1 0 }					;短周期ノイズ用
@EP1 = { 13 1 0 }					;短周期ノイズ用
@EP2 = { 0 -46 }					;三角波スネア
@EP3 = { -2 2 0 }					;arp
@EP4 = { -16 4 2 2 2 2 2 1 1 0 }	;PitchBend(Up)
@EP5 = { -12 4 2 2 2 2 0 }

; DPCM

@DPCM00 = { "dpcm\bd02.dmc" 15 }  	;c  kick
@DPCM01 = { "dpcm\sd02.dmc" 15 }	;c+ snare

; Tempo

ABCDE @t16,6

; MML

A L
A @@1 o6 l32 q8 EP3
A r1r1
A @v20 a v1 a @v20 g v1 a @v20 f+ v1 g @v20 d v1 f+
A @v19 a v1 d @v19 g v1 a @v19 f+ v1 g @v19 d v1 f+
A @v18 a v1 d @v18 g v1 a @v18 f+ v1 g @v18 d v1 f+
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v15 a v3 d @v15 g v3 a @v15 f+ v3 g @v15 d v3 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+ EPOF
A @@3 o6 l16
A @v4 EP4 e4. EPOF dc< EP4 b4. EPOF ag EP4 e4. EPOF dc< EP4 b4. EPOF ag EP4 b2 EPOF
A @@1 o6 l32 EP3
A @v18 a v1 d @v18 g v1 a @v18 f+ v1 g @v18 d v1 f+
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v15 a v3 d @v15 g v3 a @v15 f+ v3 g @v15 d v3 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+ EPOF
A @@3 o6 l16
A @v4 d1<b2 v5 w8 v4 w8 @v4 g4e4 v5 w8 v4 w8>
A @@1 o6 l32 EP3
A @v18 a v1 d @v18 g v1 a @v18 f+ v1 g @v18 d v1 f+
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v15 a v3 d @v15 g v3 a @v15 f+ v3 g @v15 d v3 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+ EPOF
A @@3 o6 l16
A @v4 d1<b2 v5 w8 v4 w8 @v4 >g4e4 v5 w8 v4 w8
A @@1 o6 l32 EP3
A @v18 a v1 d @v18 g v1 a @v18 f+ v1 g @v18 d v1 f+
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v15 a v3 d @v15 g v3 a @v15 f+ v3 g @v15 d v3 f+
A @v16 a v2 d @v16 g v2 a @v16 f+ v2 g @v16 d v2 f+<
A @v17 a v2 d @v17 g v2 a @v17 f+ v2 g @v17 d v2 f+ EPOF
A @@4 o6 l16
A EP4 @v5 e4.dc<b4g4 e2 v5 w8 v4 w8 @v5 d4e4 v5 w8 @v5 a8 e4 v5 w8 v4 w8 EPOF
A @@1 o4 l32
A @v18 a v1 a @v18 b v1 a @v18 >c< v1 b @v18 >g v1 c
A @v17 a v2 g @v17 b v2 a @v17 >c< v2 b @v17 >g v2 c<<
A @v16 a v2 a @v16 b v2 a @v16 >c< v2 b @v16 >g v2 c
A @v15 a v3 g @v15 b v3 a @v15 >c< v3 b @v15 >g v3 c<<
A @@4 o6 l16
A EP4 @v5 e4.dc<b4>c4d2 v5 w8 v4 w8 @v5 g4e4.c8<b4 v5 w8 v4 w8 EPOF
A @@1 o4 l32
A @v18 a v1 a @v18 b v1 a @v18 >c< v1 b @v18 >g v1 c
A @v17 a v2 g @v17 b v2 a @v17 >c< v2 b @v17 >g v2 c<<
A @v16 a v2 a @v16 b v2 a @v16 >c< v2 b @v16 >g v2 c
A @v15 a v3 g @v15 b v3 a @v15 >c< v3 b @v15 >g v3 c<<


B L
B @@2 o4 q6 l32
B [
B [
B @v11 a v4 a @v11 >c< v4 a @v11 >e v4 c @v11 g v4 e<
B @v12 a v3 >g< @v12 >c< v3 a @v12 >e v3 c @v12 g v3 e<
B @v13 a v2 >g< @v13 >c< v2 a @v13 >e v2 c @v13 g v2 e<
B @v13 a v2 >g< @v13 >c< v2 a @v13 >e v2 c @v13 g v2 e<
B @v13 a v2 >g< @v13 >c< v2 a @v13 >e v2 c @v13 g v2 e<
B @v14 a v1 >g< @v14 >c< v1 a @v14 >e v1 c @v14 g v1 e<
B @v14 a v1 >g< @v14 >c< v1 a | @v14 >e v1 c @v14 g v1 e<
B @v14 a v1 >g< @v14 >c< v1 a @v14 >e v1 c @v14 g v1 e<
B @v11 b v4 b @v11 >d< v4 b @v11 >f+ v4 d @v11 a v4 f+<
B @v12 b v3 >a< @v12 >d< v3 b @v12 >f+ v3 d @v12 a v3 f+<
B @v13 b v2 >a< @v13 >d< v2 b @v13 >f+ v2 d @v13 a v2 f+<
B @v13 b v2 >a< @v13 >d< v2 b @v13 >f+ v2 d @v13 a v2 f+<
B @v13 b v2 >a< @v13 >d< v2 b @v13 >f+ v2 d @v13 a v2 f+<
B @v14 b v1 >a< @v14 >d< v1 b @v14 >f+ v1 d @v14 a v1 f+<
B @v14 b v1 >a< @v14 >d< v1 b @v14 >f+ v1 d @v14 a v1 f+<
B @v14 b v1 >a< @v14 >d< v1 b @v14 >f+ v1 d @v14 a v1 f+<
B ]2
B @v11 >d v4 d @v11 e v4 d @v12 g v3 e @v12 b v3 g<
B @v12 >d v3 b @v12 e v3 d<
B @v11 b v4 b @v11 >d< v4 b @v11 >f+ v4 d @v11 a v4 f+<
B @v12 b v3 >a< @v12 >d< v3 b @v12 >f+ v3 d @v12 a v3 f+<
B @v13 b v2 >a< @v13 >d< v2 b @v13 >f+ v2 d @v13 a v2 f+<
B @v13 b v2 >a< @v13 >d< v2 b @v13 >f+ v2 d @v13 a v2 f+<
B @v13 b v2 >a< @v13 >d< v2 b @v13 >f+ v2 d @v13 a v2 f+<
B @v14 b v1 >a< @v14 >d< v1 b @v14 >f+ v1 d @v14 a v1 f+<
B @v14 b v1 >a< @v14 >d< v1 b @v14 >f+ v1 d @v14 a v1 f+<
B @v14 b v1 >a< @v14 >d< v1 b @v14 >f+ v1 d @v14 a v1 f+<
B ]3


C o3 l16 q7
C L
C r1r1r1r1 r1r1r1r2^8 >dddc<bg
C [q7 a8>a8< q8 EP2 >g8< EPOF q7 >a8<]32


D l16 q8
D L
D EP0 [@v0 [r8cr]3 r @v1 c @v0 c @v1 c]8
D [[EP0 @v0 cr EP1 @v2 c8]3 EP0 @v0 c @v1 c EP1 @v2 c8]16


E o0 l16
E L
E c4c4c4c4 c4c4c8.cc4
E c4c4c4c4 c4c4c4c4
E c4c4c4c4 c4c4c8.cc8c8
E c4c4c4c4 c4c4c8.cc+c+c+c+
E c4c4c4c4 c4c4c4c8c8
E c4c4c4c4 c4c4c8.cc8c8
E c4c4c4c4 c4c4c4c8c8
E c4c4c4c4 cc+8c+c8.c+cc+c+c+c8c+c+
E [
E c4c4c4c4 c4c4c4c8c8
E c4c4c4c4 c4c4c8.cc8c8
E ]2

