/* [FC-FDS] METROID - ENDING - (C)Nintendo 1986 by LinearDrive */
/* date:2010-07-19 */
/* JASRAC:086-2289-2 */

#OCTAVE REVERSE

/* 三角波定義（プチノイズ対策用） */
#WAV10 0,89ABCDEF FEDCBA98 76543210 01234567


/* RP2A03 矩形波１ */
$A0= x0 @v47 @5@w1 @e1,0,8,79,0 o3 l16 q16 @q1;
$A1= 
     /:10 aaarrraaaraaaaar :/ >
     /:2  a4>f+4e4c+4<f+a>df+a4f+4d4<b4.>d8<ef+gaa4b4.>d8<g4>g4< :/ <
     g4g4f+4f+4>c4c4<b4b4a+4a+4a4a4g+4g+4a4a4 >
     /:2  aaarrraaaraaaaar :/ >
     /:2  dddrrrdddrdddddr :/ < 
     /:4  f+2g2g2g2 :/ >>>
     /:6  a4g4f+4e4g4f+4d4e4 :/ <<<
     /:2  d8d8d8d8r8<f+8f+8f+8e8e8e8e8a8a8a8a8r8f+8f+8f+8f+8f+8f+8r8 g6d6e6 a+6a6g6> :/ >
     /:8  f+gf+gabab>dedeef+ef+< :/ <
     /:3  dddrrrdddrdddddr<a+a+a+rrra+a+>crcccccr :/
     /:2  dddrrrdddrdddddr :/ < 
     d1r4drddd4&d16
;


/* RP2A03 矩形波２ */
$B0= x0 @v47 @5@w1 @e1,0,0,31,15,127,0 o4 l16 q16 @q1;
$B1= 
     /:2 e1a1g+1g1 :/ e1e1 >
     /:2 df+a>df+4e4d4<a2f+2b2d4>d8<af+e2b2 :/
     /:2 e2f+4d4d4c4e4d4a+4e4d4a4f8g+8b4g4g4 :/
     /:8 d4a4>d4<a4 :/ >
     /:2 d1e2g2f+1g2a+2 :/ d1e2g2f+1g2a+2
     /:8 a8<a8>g8<a8>f+8<a8>e8<a8>g8<g8>f+8<g8>d8<g8>e8<g8> :/ <
     /:3 aaarrraaaraaaaarfffrrrffgrgggggr :/
     /:2 aaarrraaaraaaaar :/ <
     a1r4araaa4&a16
;


/* RP2A03 三角波 */
$C0= x0 @v127 @10-0 @e1,0,0,127,0 o3 l16 q16 @q1;
$C1= 
     /:10 aaarrraaaraaaaar :/ >
  q8 /:2  d4d4c+4c+4<b4b4a4a4g4g4f+4f+4e4e4a4a4> :/ <
     /:2  g4g4f+4f+4>c4c4<b4b4a+4a+4a4a4g+4g+4a4a4 :/
 q16 /:8  dddrrrdddrdddddr :/ >>>
  q6 /:24 ddaa>dd<aa :/ <<
 q16 /:4  d8d8d8d8r8<f+8f+8f+8e8e8e8e8a8a8a8a8r8f+8f+8f+8f+8f+8f+8f+8 q14 g6d6e6 a+6a6g6 q16 > :/ <
     /:3  dddrrrdddrdddddr<a+a+a+rrra+a+>crcccccr :/
     /:2  dddrrrdddrdddddr :/
     d8r8r2.r4drddd8r8r16
;


/* RP2A03 ノイズ */
$DEnv0= @e1, 0,  8, 0,0;
$DEnv1= @e1, 0, 16, 0,0;
$DEnv2= @e1, 0,　 8, 0,0;

$na= c+;
$nb= $DEnv1 c+8 $DEnv0;
$nc= $DEnv2 a   $DEnv0;

$D0= x0 @v95 @7 o0 l16 q16 @q0 $DEnv0;
$D1= 
     /:10 $na$na$na rrr $na$na$na r $na$na$na$na$na r :/
     /:32 $na rrr $nb rr :/
     /:8  $na r $na$na $na r $na$na $na r $na$na $nb $na$na :/
     /:16 $na rrr :/
     /:64 $na r :/
     /:32 $na$na$nb $nc$na$nb :/
     /:8  $na$na$na rrr $na$na$na r $na$na$na$na$na r :/
     $nbrr r1 $nb $DEnv1 $na$na $nb rr r
;


/* RP2C33 拡張音源 */
$E0= x0 @v95 @1 @e1,0,0,31,15,127,0 o4 l16 q16 @q1;
$E1= 
     /:2 a1>c1<b1a+1 :/ a1a1 > 
     /:2 f+a>df+a4g4f+4d1<ef+ga>d4<a4>gf+d<ag2>d2 / < :/
     /:2 c+2d4<a4>f+4e4g4f+4e8d8<a+8g8f+4>d4<g+8b8>e4d4e4 :/ <<
     /:4 a2>c2<b2a+2 :/ d1 r1r1r1
     >d4.<a8d2.r4g4.f+8< d6a6>d6 f+6a6>d6 e4.<a+8g2
     a2a4.r8 g6f+6d6 e6d6e6 d1 g6a+6>d6 g6a+6>d6 <
     /:8 f+af+aabab>dedeef+ef+< :/ <
     /:2 a1>d2c+4.<b8 a1 d2g4.f+8 :/
     a1 c6g6>c6<d6g6>c6 d1 f6c6<g6>g6e6c6 d1 <d4a4g4>c4
     /:2 eeerrreeereeeeer :/
     e1r4<drdd<d4&d16
;


/* 演奏 */
t130
r8 $A0$A1;
r8 $B0$B1;
r8 $C0$C1;
r8 $D0$D1;
r8 $E0$E1;