#TITLE パラソルスター(PC Engine) / TRACK03(ステージ10)
#ARTIST YASUKO, TURBO MIRA
#CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931)
#COMMENT MML coded: 2014/4/24 rev.0


/* 全パート       */  $ALL  = t225 ;
/* 音程パートのみ */  $ALLT = @D0 ;
/* ループ回数     */  $LOOP = 36 ; 

/* 調整可 @V0(silent)～127(max) */
/*         melody */  $CH1 = @V64 ; 
/*  counter, back */  $CH2 = @V64 ;
/*           bass */  $CH3 = @V127 ;
/*  melody(delay) */  $CH4 = @V16 @P88 ;
/*          noise */  $CH5 = @V64 ;


/* WAV13 coded by HuSIC, NEZplug, WinAMP, SoundEngine Free and Stirling */
/* HuSIC -> http://seesaawiki.jp/husic/ */
/* Stirling -> http://www.vector.co.jp/soft/win95/util/se079072.html */

#WAV13 14,7D 47 10 10 10 10 10 0E 09 0A 0A 0A 0A 0A 0A 0A 0B 0B 0B 0B 0B 0B 0B 0B 0C 0C 0C 0C 0C 0C 0C 0C 0D 0D 0D 0D 0D 0D 0D 0E 0E 0E 0E 0E 0E 0E 0E 0E 0F 0F 0F 0F 0F 0F 0F 10 10 10 10 10 10 10 10 10 11 11 11 11 11 11 11 11 12 12 12 12 12 12 12 12 13 13 13 13 13 13 13 13 14 1A 1B 1B 1B 1B 1C 64 89 89 89 89 89 BC EE EE EE EE EE EF F5 F5 F5 F5 F4 F4 F4 F4 F4 F4 F4 F4 F3 F3 F3 F3 F3 F3 F3 F3 F2 F2 F2 F2 F2 F2 F2 F2 F1 F1 F1 F1 F1 F1 F1 F1 F0 F0 F0 F0 F0 F0 F0 EF EF EF EF EF EF EF EF EF EE EE EE EE EE EE EE EE ED ED ED ED ED ED ED ED EC EC EC EC EC EC EC EC EB EB EB EB EB E6 E3 E3 E3 E3 E3 B0 7D 7D 7D 7D 7D /* original - 1F 1F 1F 1F 1F 1F 1F 1E 0F 01 00 00 00 00 00 00 00 00 00 00 00 00 00 01 0F 1E 1F 1F 1F 1F 1F 1F */

#WAV13 16,80 80 80 80 80 7E 72 72 72 72 72 72 63 5C 5C 5C 5C 5C 4E 3F 3F 3F 40 40 36 23 23 23 23 23 23 17 15 15 15 15 15 0C 07 07 07 07 08 04 01 01 01 01 01 0A 1E 1F 1F 1F 1F 1F 56 61 61 61 61 61 6F 77 77 77 77 77 5D 44 44 44 44 44 3B 0A 0A 0A 0A 0B 0B 23 28 28 28 28 28 3C 46 46 46 46 46 4D 5C 5C 5C 5C 5C 62 80 80 80 80 80 80 AB B3 B3 B3 B3 B3 C2 C9 C9 C9 C9 C8 CB D0 CF CF CF CF D3 E5 E5 E5 E5 E4 E4 E4 E4 E4 E4 E4 E4 DC D5 D5 D5 D5 D4 C8 B0 B0 B0 B0 B0 A7 7D 7D 7D 7D 7D 7D B1 C5 C5 C5 C5 C5 C9 CC CC CC CC CC D3 E2 E1 E1 E1 E1 E1 E1 E1 E1 E1 E0 E0 D7 D2 D1 D1 D1 D1 C6 BB BB BB BB BB B1 9E 9E 9E 9E 9E 9E 85 /* original - 0F 12 16 1A 1C 1E 1F 1B 12 0F 16 1E 1A 16 13 0E 07 04 03 00 00 02 07 0E 04 03 00 00 02 05 09 0D */

#WAV13 17,80 6B 6B 6B 6B 6B 6B 77 79 79 79 79 79 66 5C 5C 5C 5C 5C 53 40 40 40 40 40 3C 2A 2A 2A 2A 2A 2B 1F 1C 1C 1C 1D 1D 14 0E 0E 0F 0F 0F 19 2C 2C 2C 2C 2D 28 10 10 10 10 10 10 2F 35 35 35 35 35 23 11 11 11 11 12 1B 2F 2F 2F 2F 2F 2C 1A 1A 1A 1A 1A 1A 25 29 29 29 29 29 34 3F 3F 3F 40 40 49 5D 5D 5D 5D 5D 60 73 73 73 73 73 73 90 9F 9F 9E 9E 9E AD BB BB BB BB BB C5 D8 D8 D8 D8 D8 D8 E4 E6 E6 E6 E6 E6 EA ED EC EC EC EC E1 D6 D6 D6 D6 D6 DC EB EB EB EB EB EB D2 CD CD CD CD CD E0 EA EA EA EA E9 DE D3 D3 D3 D3 D3 D5 E1 E1 E1 E1 E1 E1 D5 D2 D2 D2 D2 D2 CD CA CA CA CA CA C0 B4 B4 B4 B4 B4 AF 96 96 96 96 96 96 /* original - 10 14 18 1B 1D 1F 1B 1F 1A 1F 1B 1E 1C 19 15 12 0C 08 04 02 01 04 01 05 01 04 02 04 05 08 0C 12 */


/* basic macro */

$L2{a} = %a %a ;
$Ex0   = @E1, 0, 127, 127, 0 ;
$Lx0   = @L0, 0, 0, 0, 0, 0 ;


/* =-=-=-=-=- CH1 -=-=-=-=-= */

$Ex10 = @E1, 0,0,  56,11,  127,0 ;
$Lx10 = @L10, 66, -3, 80, 99, 0 ;

$C11 = @13-14 $Ex10 $Lx10 q16 @Q1 o7 l8 d+r>a+r<d+rd+ed+c+>ba+  r2.r2.  r2.r2 l4 > g+ ;
$C12 = o5 l4 g+2g+g+a+b <c+d+eg+2g+  g+%18a+%12g+%66gf+ed+c+ >ba+ag+2d+ ;
$C13 = f+%18g%12g+%66&g+2a+2b <c+d+fg+2.  g+%18a+%12g+%66gf+ed+c+ >ba+ag+2<f+%18g%12g+%66 ;
$C14 = gg+a+g+gd+ gg+a+g+gd+  gg+a+ba+g+ a+2.d+2>g+ ;
$C15 = g+2g+g+a+b <c+d+fg+2g+  $L2{g+%18a+%12g+%66gg+} a+a<d+>g+2r ;
$C16 = o7 l8 $L2{c+>b<c+d+ef+g+4f+4g+4>} ;
$C17 = o6 f+g+a4f+4d2>a4  g+4<c+4d+ed+2. ;
$C19 = o7 af+dc+>bag+f+fdc+>b  a+16a16g+4.<d+e l4 d+ga+ ;
$C1A = g+d+g+b2.  g2.&g2.  l8 >a+16<c16>a+gra+r<g2. ;

/* --- Start --- */
$ALL $ALLT $CH1 /:$LOOP $C11 $C12 $C13 $C14 $C15 $C16 $C17 $C16 $C19 $C1A :/
;


/* =-=-=-=-=- CH4 -=-=-=-=-= */

/* --- Start --- */
$ALL $ALLT $CH4 r8r32. /:$LOOP $C11 $C12 $C13 $C14 $C15 $C16 $C17 $C16 $C19 $C1A :/
;


/* =-=-=-=-=- CH2 -=-=-=-=-= */

$Ex20 = @E1, 0,0,  127,6,  64,18,  32,0 ; 

$C21 = @13-14 @X104 $Ex20 q16 @Q1 o6 l8 $Lx10 d+r>a+r<d+rgg+gfd+c+  @13-17 @X127 o3 l4 b8<c+8d+8<d+8g+>d+a+<c+  >g+.<d+8g+>d+4a+<c+ ;
$C22 = >b.<d+8g+>b<d+f+ >b.<e8g+>g+b<d+  >g+.<e8g+>b<d+g+ >g.<d+8g>g+2<c+ ;
$C23 = @13-14 @X104 $Ex10 l4 o5 $Lx10 e8d+8c+8d+8>g+<c+2d+ fgg+>>b16<c+16e16f+16g+16b16<e16g+16b  b<c+d+>g+f+e d+c+c>b2. ;
$C24 = l8 d+ga+<c+d+g>eg+b<d+g+b >fgb<d+fg+>eg+b<d+g+b  a+d+bd+<c+>d+bea+eg+e gf+ged+c+d+ed+c+>ba+ ;
$C25 = g+gg+a+ l4 bb<c+d+ fgg+>>b16<c+16e16f+16g+16b16<e16g+16 l4 b  b<c+d+>g+ge d+c+>a+b8a+8b8<c+8d8d+8 ;
$C26 = o6 g+2bd+c+d+ >g+2bd+c+d+ ;
$C27 = <af+d>ag+f+  e8c+8e8g+8b>g8a+8<d+8g8a+8<d+8 ;
$C29 = <af+d>ag+f+  l8 >g+b<d+g+b4>ga+<d+ga+<d+ >>g+b<d+g+b<d+  ;
$C2A = g+d+>bg+<d+>b  a+2.&a+2.  g16g+16gd+rgr<d+2. ;

/* --- Start --- */
$ALL $ALLT $CH2 /:$LOOP $C21 $C22 $C23 $C24 $C25 $C26 $C27 $C26 $C29 $C2A :/
;


/* =-=-=-=-=- CH3 -=-=-=-=-= */

$Ex30 = @E1, 0,0,   56,2,  56,0,  127,4,  72,24,  36,0 ;
$Lx30 = @L4, 66, -3, 80, 99, 0 ;

$C31 = @13-16 $Ex30 q16 @Q1 o3 l8 $Lx30 d+r>a+r<d+rd+dd+efg  l4 g+.<b8<d+>>d+<ga+   >g+.<b8<d+>>d+<ga+ ;
$C32 = g+.b8<d+>f+b<d+ >e.b8<e>d+g+b  c+.g+8<e>d+b<d+ >d+.<c+8d+>>g+2<d+ ;
$C33 = o3 l2 g+.f+. f.e.  d+.d+. d+.g+. ;
$C34 = d+.e. f.e.  d+.e. g.d+. ;
$C36 = o4 l2 $L2{c+. >g+8b8<d+8g+8b4} ;
$C37 = d.>f+. c+.d+. ;
$C39 = d.>f+. g+.<c+. ;
$C3A = >d+. d+.  d+.&d+. r1 a+8<d+8g8a+8 ;

/* --- Start --- */
$ALL $ALLT $CH3 /:$LOOP $C31 $C32 $C33 $C34 $C33 $C36 $C37 $C36 $C39 $C3A :/
;


/* =-=-=-=-=- CH5 -=-=-=-=-= */

$Ex50 = @E1,0,0,  127,1,127,2,  80,2,  48,2,  28,2,  16,20,8,0,   8,0 ;
$Ex51 = @E1,0,0,  127,4,127,2,  96,4,  64,4,  44,4,  32,4,24,0,  24,0 ;

$NB  = @X120 $Ex50 @4@N121a; /* 88 */
$NA  = @X72  $Ex51 @4@N117a; /* 8F */
$NG  = @X104 $Ex50 @4@N113a; /* 92 */
$NF  = @X40  $Ex50 @4@N80a;  /* 9C */

$C5X0= $NB4$NF$NA$NA4$NA4$NA4$NA4 ;
$C5X1= $NB4$NF$NA$NA4 /:6 $NA :/ ; ;
$C5X2= $NB$NF$NF$NF$NF$NF ;
$C51 = l8 $NB /:7 $NF :/ $NA$NA$NA$NA  $C5X0 $C5X1 ;
$C52 = l8 /:7 $C5X2 :/ $NF$NF$NA$NA$NA$NA ;
$C53 = l8 $C5X0 $C5X1  $C5X0 $C5X1 ;
$C56 = l8 /:4 $NG$NF$NA$NF$NB$NF :/  ;
$C57 = l8 /:3 $NG$NF$NB$NF :/ $C5X0 ;
$C5A = l8 $C5X1  $C5X2 $C5X2  r1. ;

/* --- Start --- */
$ALL $CH5 /:$LOOP $C51 $C52 $C53 $C53 $C53 $C56 $C57 $C56 $C57 $C5A :/
;