#TITLE ゼルダの伝説 (FDS) / タイトルBGM
#ARTIST Koji Kondo (Nitendo)
#CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931)
#COMMENT JASRAC work code：- / MML coded: 2015/05/02 rev.0 / B- minor


/* Ini ====================================================================== */

$TEMPO = t90.19 ; /* (120time/79.831sec)*60sec %1=6.930ms */
$RANGE = x0     ; /* linear dynamic range */
$NS    = ns0    ; /* note shift(expect noise part) */
$LOOP  = 16     ; /* repeat */  

/* Volume @V0～127 */
$FDS  = @V127 ; 　/* 2C33 FDS   [127] */
$SQRa = @V117 ; 　/* 2A03 SQR_a [117] */
$SQRb = @V117 ;　 /* 2A03 SQR_b [117] */
$TRI  = @V90  ;　 /* 2A03 TRI   [90]  */
$NOI  = @V51  ;　 /* 2A03 NOISE [51]  */

$DT0  = @D0 ;  　 /* detune default */


/* DATA ===================================================================== */

/* --Wav-- */

#WAV13 0,80 85 85 85 85 85 87 8C 94 93 93 93 93 95 A1 A1 A1 A1 A1 A0 A2 AC AE AD AD AD AC B2 B7 B9 B9 B8 B8 B8 BB C4 C4 C3 C3 C2 C2 CA CD CE CD CD CC CB D4 D7 D6 D6 D5 D4 D6 DB E0 DF DE DD DD DE E8 E7 E6 E5 E5 E4 E3 E3 E2 E1 E0 DF DF D7 D1 D0 CF CF CE CD C8 C0 BF BE BE BD BD B4 AF AF AE AE AE AD A4 9F 9F 9F 9E 9E 9A 96 90 90 8F 8F 8F 8D 81 81 81 81 81 81 7D 75 73 73 73 73 73 6B 65 65 65 65 65 64 60 57 57 58 58 58 57 4B 4A 4A 4A 4B 4B 49 40 3D 3D 3E 3E 3F 3A 33 31 31 31 32 33 31 24 24 25 26 26 27 1E 19 18 19 1A 1A 1B 12 0C 0D 0E 0F 10 10 11 12 13 13 14 15 17 27 29 2A 2A 2A 2B 31 3A 3E 3E 3F 3F 40 48 4E 52 52 52 53 53 58 64 64 64 64 65 66 6E 74 75 75 75 75 75 /* 2A03(Tri) */

#WAV13 1,80 F6 FE FF FE FD FC FB FA F9 F8 F7 F6 F5 F4 F3 F3 F2 F1 F0 EF EE ED EC EB EA EA E6 AA 67 60 60 61 61 61 61 62 62 62 62 63 63 63 63 63 64 64 64 64 65 65 65 65 65 66 66 66 66 66 67 67 67 67 67 68 68 68 68 68 68 69 69 69 69 69 69 6A 6A 6A 6A 6A 6A 6B 6B 6B 6B 6B 6B 6C 6C 6C 6C 6C 6C 6C 6D 6D 6D 6D 6D 6D 6D 6E 6E 6E 6E 6E 6E 6E 6F 6F 6F 6F 6F 6F 6F 6F 6F 70 70 70 70 70 70 70 70 71 71 71 71 71 71 71 71 71 72 72 72 72 72 72 72 72 72 72 73 73 73 73 73 73 73 73 73 73 74 74 74 74 74 74 74 74 74 74 74 74 75 75 75 75 75 75 75 75 75 75 75 75 76 76 76 76 76 76 76 76 76 76 76 76 76 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 78 78 78 78 78 78 78 78 78 78 78 78 /* 2A03(Sqr12.5%) */

#WAV13 4,80 DE DD DD DC DB DA DA D9 D9 D8 D7 D7 D6 D5 D4 D4 D3 D2 D2 D2 D1 D0 D0 CF CE CE CD CC CC CB CA CA CA C9 C8 C8 C7 C7 C6 C6 C5 C4 C4 C4 C3 C3 C2 C2 C1 C0 C0 BF BF BE BE BE BD BD BC BC BB BB BA BA B9 B9 B8 B8 B8 B7 B7 B6 B6 B6 B5 B5 B4 B4 B3 B3 B3 B2 B2 B2 B1 B1 B0 B0 B0 AF AF AE AE AE AE AD AD AC AC AC AB AB AB AA AA AA AA A9 A1 29 22 22 23 24 25 25 26 26 27 28 28 29 2A 2A 2B 2C 2D 2D 2E 2F 2F 2F 30 31 31 32 33 33 34 35 35 36 36 36 37 38 38 39 39 3A 3B 3B 3C 3C 3C 3D 3D 3E 3E 3F 40 40 41 41 42 42 43 43 43 44 44 45 45 46 46 47 47 48 48 48 48 49 49 4A 4A 4B 4B 4C 4C 4C 4D 4D 4D 4E 4E 4F 4F 4F 50 50 51 51 51 51 52 52 52 53 53 54 54 54 55 55 55 56 56 56 /* 2A03(Sqr50%) */

#WAV13 11,80 84 8B 94 9A A1 AA B0 B6 BE C4 C9 CE D1 D4 D6 D7 D7 D7 D7 D6 D5 D4 D3 D1 CF CD CA C6 C3 C0 BC B9 B6 B2 AF AC A9 A6 A4 A0 9D 9B 98 95 93 90 8E 8C 8A 87 85 83 80 7E 7B 76 73 70 6F 6E 6D 6C 6C 6B 6F 71 73 76 79 7B 7E 80 82 85 87 89 8B 8D 8F 91 94 96 98 9B 9D 9E A1 A3 A5 A8 AB AD B0 B3 B5 B8 BB BD BE BF C0 C1 C2 C2 C3 C3 C2 C2 C0 BE BC B6 B1 AD A5 9F 9A 90 88 81 79 71 6C 65 60 5C 57 53 50 4E 4B 4A 48 45 43 42 40 3E 3D 3C 3A 3A 39 38 38 36 35 35 34 34 33 33 32 32 32 32 32 31 31 31 31 32 33 33 35 36 37 38 3A 3B 3C 3E 3F 41 43 44 46 48 49 4B 4D 4E 50 52 54 56 59 5B 5D 60 62 63 66 69 6B 6F 73 75 7B /* 2C33(Zelda_A) */

#WAV13 12,80 6E 61 54 48 3E 3F 48 4F 57 64 6E 75 77 78 79 77 75 75 77 79 7B 78 76 74 70 6D 6A 6A 6B 6C 70 74 77 78 77 76 76 78 7A 7C 80 84 86 7F 79 74 63 55 4A 46 45 44 4E 5B 64 74 86 94 9E A6 AB AD A6 A2 9E 9E 9E 9F A9 B0 B6 B3 AF AD A1 96 8E 86 80 7C 7B 7E 80 82 84 86 88 89 8B 8C 8E 8F 90 8D 8A 88 84 80 7E 7D 7E 7E 7F 80 81 83 84 85 85 84 83 83 81 7F 7F 83 87 89 89 89 89 76 67 5A 48 38 2C 2B 2E 31 3F 53 62 6E 77 7F 83 82 82 82 83 84 85 86 88 89 89 89 89 88 87 86 83 81 7F 80 81 82 85 8A 8D 8F 90 90 90 90 8F 8F 8D 8C 8A 84 7F 7B 79 78 78 80 89 90 9A A5 AD AF AA A6 A2 9D 9A 99 A0 A5 A9 AC AF B0 A4 99 91 /* 2C33(Zelda_B) */

#WAV13 13,80 85 88 8B 8D 8F 90 92 95 96 96 96 96 97 99 9A 9C 9E A0 A3 A7 A9 AA A9 A8 A7 A7 A6 A6 A1 9E 9B 9A 99 98 98 99 99 9E A4 A8 AC B0 B2 B4 B5 B6 B6 B3 B1 AF AC A9 A7 A3 A0 9E 9B 98 96 93 90 8E 8B 89 88 84 7F 7C 77 71 6D 6A 67 65 64 63 62 63 67 6A 6D 72 77 7B 7E 81 83 86 89 8B 8E 90 92 94 97 99 9C 9F A1 A4 A8 AB AD AE AF B0 AF AE AD A7 A1 9C 98 94 91 8E 8C 8A 8B 8E 90 91 92 92 93 96 98 99 98 96 95 92 90 8E 8B 88 86 85 85 85 84 82 80 7F 7E 7E 7C 78 75 73 6F 6C 6A 69 68 67 64 62 61 5D 5A 58 51 4A 44 3C 33 2C 23 18 11 0B 06 03 01 00 00 02 09 10 16 20 29 30 3B 45 4D 55 5C 61 67 6C 6F 72 74 76 78 7B 7E /* 2C33(Zelda_C) */

/* --Macro--*/

$Ex0 = @E1,0,0,127,0 ;
$Lx0 = @L0,0 ;


/* TEMPO ==================================================================== */

$TEMPO
;


/* FDS ====================================================================== */

$LxD1 = @L38,22,-3,62,99,0 ;

/* original  : 94(20),44(→32),0A(→0) */
/* Vol n(ms) : 14(16) 14→32(76) 32(819) 32→0(1189) R(16) */
$SxD1 = @13-11 $LxD1 ;
$ExD1 = @E1,0,0,  55,2,55,0,  55,8,127,0,  127,94,127,0,  127,47,0,2 ;

/* original  : A0(32),18(→0) */
/* Vol n(ms) : 32→0(869) R(16) */
$SxD2 = @13-12 $Lx0 ;
$ExD2 = @E1,0,0,  127,110,0,2 ;

/* original  : A0(32),36(→0) */
/* Vol n(ms) : 32→17(898) R(16/0) */
$SxD3 = @13-13 $LxD1 ;
$ExD3 = @E1,0,0,  127,114,67,0,  67,0,0,2 ;
$ExD4 = @E1,0,0,  127,114,67,0,  67,0,0,0 ;

$D0   = q16 @Q1 ;
$D01  = $SxD1 $ExD1 o5 l8 b-2&b- ffb- a-16g-16 a-2.. b-2&b- g-g-b- a16g16 a2.. ;
$D05  = $SxD2 $ExD2 o4 d-2 d-2 d-2 d-2 ;
$D07  = l16 /:2 r4b-4f2 r8b-8b-<cde-f2> :/ ;
$D11a = $SxD3 l16 $ExD3 ;
$D11b = o5 b-8r8 $ExD4 f4. $ExD3 b-8b-<cde- $ExD4 f2 $ExD3 r8f8f12g-12a-12 ;
$D13  = $ExD4 b-2 $ExD3 r6b-12b-12a-12g-12 a-12r12g-12 $ExD4 f2 $ExD3 f4 ;
$D15  = e-8e-f $ExD4 g-2 $ExD3 f8e-8 d-8d-e- $ExD4 f2 $ExD3 e-8d-8  ;
$D17  = c8cd $ExD4 e2 $ExD3 g4 fr>fffrff frfff8f8 ;
$D19  = $D11b ;
$D21  = $ExD4 b-2. $ExD3 <d-4 c8r8 $ExD4 >a2 $ExD3 f4 ;
$D23  = /:2 $ExD4 g-2. $ExD3 b-4 a8r8 $ExD4 f2 $ExD3 / f4 :/ d4 ;
$D27  = $ExD4 e-2. $ExD3 g-4 f8r8 $ExD4 d-2 $ExD3 >b-4 ;
$D29  = < $D17 ;

$RANGE $NS $FDS $DT0
$D0 /:$LOOP $D01 $D05 $D07
$D11a $D11b $D13 $D15 $D17 $D19 $D21 $D23 $D27 $D29 :/
; 


/* SQR_b ==================================================================== */

/* Vol n(sec/60.09) : X(1) 5(2) 6(4) 7(6) 8(8) 9(10) A(12) B(14) A(15) 8(16) 7() */
$ExS1 =
  @E1,0,0,  40,4,40,0,  48,4,48,0,  56,5,56,0,  64,4,64,0,  72,4,72,0,  80,4,80,0,
  88,5,88,0,  80,2,80,0,  64,2,64,0,  56,0 ;

/* Vol n(sec/60.09) : 7(1) A(2) 9(4) 8(6) 7(8) 6(10) 5(12) 4(13) 3(14) 2(15) 0() */
$ExS2 =
  @E1,0,0,  56,2,56,0,  80,4,80,0,  72,5,72,0,  64,4,64,0,  56,4,56,0,  48,4,48,0,
  40,4,40,0,  32,3,32,0,  24,2,24,0,  16,2,16,0,  0,0 ;
$SxS2 = $ExS2 @X127 ;

$S24{a}   = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%22 ;
$S32{a}   = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%30 ;
$S48{a}   = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%46 ;
$S64{a}   = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%62 ;
$S72{a}   = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%70 ;
$S96{a}   = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%94 ;
$S144{a}  = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%142 ;
$S240{a}  = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%238 ;
$S336A{a} = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%304 r%30 ;
$S384A{a} = @13-1 $Ex0 @X120 %a%2 & @13-4 $ExS1 @X127 %a%304 r%78 ;

$Sb0  = q16 @Q0 ;
$Sb01 = o5 $S240{d} $S48{d} $S48{d} $S48{d} $S24{c} $S24{c} $S336A{c} ;
$Sb03 = $S240{d-} $S48{d-} $S48{d-} $S48{d-} $S24{c} $S24{c} $S336A{c} ;
$Sb05 = r1 r1 ;
$Sb07 = /:2 $S96{b-} $S144{f} $S48{b-} $S24{b-} < $S24{c} $S24{d} $S24{e-} $S384A{f} > :/ ;
$Sb11 = o5 $S96{d} $S32{d} $S32{d} $S32{c} $S72{d} $S24{d} $S24{d} $S24{e-} $S24{f} $S24{g} ;
$Sb12 = $S72{a-} $S24{b-} $S24{b-} <$S24{c} $S24{d} $S24{e-} $S96{f} >$S32{a-} $S32{b-} <$S32{c} ;
$Sb13 = >$S72{g-} $S24{g-} $S24{g-} $S24{a-} $S24{b-} <$S24{c} $S64{d-} $S32{d-} $S32{d-} $S32{c} >$S32{b-} ;
$Sb14 = <$S64{d-} >$S32{b-} $S32{a-} $S32{a-} $S32{g-} $S64{a-} $S32{a-} $S32{a-} $S32{g-} $S32{a-} ;
$Sb15 = $S48{g-} $S24{g-} $S24{f} $S48{g-} $S24{g-} $S24{a-} $S96{b-} $S48{a-} $S48{g-} ;
$Sb16 = $S48{f} $S24{f} $S24{e-} $S48{f} $S24{f} $S24{g-} $S96{a-} $S48{g-} $S48{f} ;
$Sb17 = $S96{e} $S48{e} $S24{e} $S24{f} $S48{g} $S24{g} $S24{a} $S48{b-} <$S48{c} ;
$Sb18 = >>$S48{a} $S24{a} $S24{a} $S48{a-} $S24{a-} $S24{a-} $S48{g} $S24{g} $S24{g} $S48{g-} $S48{g-} ;
$Sb19 = $Sb11 ;
$Sb20 = $Sb12 ;
$Sb21 = $S96{d-}&d-2 $S96{e} $S96{e-} $S96{c}&c4 >$S96{a} ;
$Sb23 = $SxS2 l12 /:2 o3 eb-<d-eb-<d-e2 f4>ffff2 :/ ;
$Sb27 = o5 $S96{g-}&g-2 $S96{b} $S96{b-} $S96{f}&f4 $S96{d-} ;
$Sb29 = $Sb17 ;
$Sb30 = $Sb18 ;

$RANGE $NS $SQRb $DT0
$Sb0 /:$LOOP $Sb01 $Sb03 $Sb05 $Sb07
$Sb11 $Sb12 $Sb13 $Sb14 $Sb15 $Sb16 $Sb17 $Sb18 $Sb19 $Sb20 $Sb21 $Sb23 $Sb27 $Sb29 $Sb30 :/
;


/* SQR_a ==================================================================== */

$Sa0  = q16 @Q0 ;
$Sa01 = o3 $S96{b-} <$S96{f} $S96{b-}&b-4 >$S96{a-} <$S96{e-} $S96{a-}&a-4 ;
$Sa03 = >$S96{g-} <$S96{d-} $S96{g-}&g-4 >$S96{f} <$S96{c} $S96{f}&f4 ;
$Sa05 = $SxS2 o4 l16 /:2 f8f>b-<f8f>b-< f8f>b-<f>b-<f>b-< :/ ;
$Sa07 = o4 f8f>b-<f8f>b- <f8f>b-<f>b-<f>b- <e-8e->a-<e-8e->a- <e-8e->a-<e->a-<e->a- ;
$Sa09 = <d-8d->g-<d-8d->g- <d-8d->g-<d->g-<d->g- <c8c>f<c8c>f< c8c>f<c>f<c>f ;
$Sa11 = $Sa07 ;
$Sa13 = <d-8d->g-<d-8d->g- <d-8d->g-<d->g-<d->g- <a-8a-d-a-8a-d- a-8a-d-a-d-a-d- ;
$Sa15 = g-8g->b<g-8g->b <g-8g->b<g->b<g->b <f8f>b-<f8f>b- <f8f>b-<f>b-<f>b- ;
$Sa17 = <g8gcg8gc g8gcgcgc d8ddd-8d-d- c8cc>b8bb ;
$Sa19 = $Sa07 ;
$Sa21 = $Sa09 ;
$Sa23 = /:2 o3 b8beb8beb8bebebe <c8c>f<c8c>f<c8c>f<c>f<c>f :/ ;
$Sa27 = o4 $Sa15 ;
$Sa29 = $Sa17 ;

$RANGE $NS $SQRa $DT0
$Sa0 /:$LOOP $Sa01 $Sa03 $Sa05 $Sa07
$Sa09 $Sa11 $Sa13 $Sa15 $Sa17 $Sa19 $Sa21 $Sa23 $Sa27 $Sa29 :/
;


/* TRI ====================================================================== */

$T384{a} = %ar%a%a%ar%a%a %ar%a%a%ar%a%a ;

$T0  = @13-0 $Ex0 @Q0 ;
$T01 = o3 q16 l16 b-1& a-1& g-1& f1& ;
$T05 = q13 $T384{b-} $T384{b-} ;
$T07 = $T384{b-} $T384{a-} $T384{g-} $T384{f} ;
$T11 = $T384{b-} $T384{a-} $T384{g-} <$T384{d-} ;
$T15 = >$T384{b} $T384{b-} <$T384{c} fr>fffrff frfffrga ;
$T19 = $T07 ;
$T23 = $T384{e} $T384{f} $T384{e} $T384{f} ;
$T27 = < $T15 ;

$RANGE $NS $TRI $DT0
$T0 /:$LOOP $T01 $T05 $T07
$T11 $T15 $T19 $T23 $T27 :/
;


/* NOISE ==================================================================== */

$N0  = @7 $Ex0 q12 @Q0 o0 @X96 ;
$N01 = r1 r1 r1 r1 ;
$N05 = /:104 d+%3r%45 d+%3r%21 d+%3r%21 :/ ;

$RANGE $NOI
$N0 /:$LOOP $N01 $N05 :/
;