#TITLE ファイナルファンタジー (FC) / プレリュード
#ARTIST Nobuo Uematsu
#CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931)
#COMMENT JASRAC work code：- / MML coded: 2017/05/22 rev.0 / B- Major

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

$TEMPO = t200.10 ; /* (128time/38.381sec)*60sec %1=3.123ms %96=299.85msec */
$RANGE = x0      ; /* linear dynamic range */
$NS    = ns0     ; /* note shift */
$LOOP  = 28      ; /* repeat */  

/* Volume @V0～127 */
$SQRa = @V117 ; /* 2A03 SQR [117] */
$SQRb = @V117 ; /* 2A03 SQR [117] */

$DT0  = @D-4  ; /* detune default */

/* Wave ===================================================================== */

#WAV13 1,80 F8 FF FF FF FE FE FD FD FC FC FB FA FA F9 F9 F8 F8 F7 F7 F6 F6 F5 F5 F4 F4 F3 F3 F3 F2 F2 F1 F1 F0 F0 EF EF EE EE ED ED EC EC EC EB EB EA EA E9 E9 E6 76 61 61 61 61 61 61 61 61 62 62 62 62 62 62 62 62 63 63 63 63 63 63 63 63 64 64 64 64 64 64 64 64 65 65 65 65 65 65 65 65 65 66 66 66 66 66 66 66 66 66 66 67 67 67 67 67 67 67 67 67 68 68 68 68 68 68 68 68 68 68 69 69 69 69 69 69 69 69 69 69 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6C 6C 6C 6C 6C 6C 6C 6C 6C 6C 6C 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 70 70 70 70 70 70 70 70 70 70 70 70 70 70 70 71 71 71 71 71 71 71 71 71 71 71 71 71 71 71 71 71 72 72 72 72 72 72 72 72 72 72 72 72 72 72 72 72 73 73 73 73 73 73 73 73 73 73 73 73 73 73 73 73 73 73 73 74 74 74 74 74 74 74 74 74 74 74 74 74 74 74 74 74 74 74 75 75 75 75 75 75 75 75 75 75 75 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 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 77 77 77 77 77 77 77 77 77 77 77 77 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 78 79 79 79 79 79 79 79 79 /* 2A03 Sqr 12.50 */

#WAV13 2,80 F3 F7 F6 F6 F5 F5 F4 F4 F3 F3 F2 F2 F1 F1 F0 F0 F0 EF EF EE EE ED ED EC EC EB EB EB EA EA E9 E9 E8 E8 E7 E7 E7 E6 E6 E5 E5 E4 E4 E4 E3 E3 E2 E2 E2 E1 E1 E0 E0 DF DF DF DE DE DE DD DD DC DC DC DB DB DA DA DA D9 D9 D9 D8 D8 D7 D7 D7 D6 D6 D6 D5 D5 D5 D4 D4 D4 D3 D3 D2 D2 D2 D1 D1 D1 D0 D0 D0 CF CF CE 63 47 47 48 48 48 48 48 49 49 49 49 4A 4A 4A 4A 4B 4B 4B 4B 4B 4C 4C 4C 4C 4D 4D 4D 4D 4D 4E 4E 4E 4E 4E 4F 4F 4F 4F 4F 50 50 50 50 50 51 51 51 51 51 52 52 52 52 52 53 53 53 53 53 54 54 54 54 54 54 55 55 55 55 55 56 56 56 56 56 56 57 57 57 57 57 57 58 58 58 58 58 58 59 59 59 59 59 59 5A 5A 5A 5A 5A 5A 5B 5B 5B 5B 5B 5B 5B 5C 5C 5C 5C 5C 5C 5D 5D 5D 5D 5D 5D 5D 5E 5E 5E 5E 5E 5E 5E 5F 5F 5F 5F 5F 5F 5F 60 60 60 60 60 60 60 60 61 61 61 61 61 61 61 61 62 62 62 62 62 62 62 63 63 63 63 63 63 63 63 63 64 64 64 64 64 64 64 64 65 65 65 65 65 65 65 65 65 66 66 66 66 66 66 66 66 66 67 67 67 67 67 67 67 67 67 67 68 68 68 68 68 68 68 68 68 68 69 69 69 69 69 69 69 69 69 69 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6A 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6B 6C 6C 6C 6C 6C 6C 6C 6C 6C 6C 6C 6C 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6D 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6E 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 6F 70 70 70 71 /* 2A03 Sqr 25.00 */

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

$TEMPO
;

/* SQRa ===================================================================== */

/* Vol n(sec/60.09) : F(1) E(1) C(1) B(1) 9(1) 8(1) 6(1) 5(1) 3(1) */
$Ea1 = @E1,0,0,  127,2,127,0,  119,2,119,0,  103,2,103,0,  95,2,95,0,  79,3,79,0,  71,2,71,0,  53,2,53,0,  47,2,47,0,  31,0 ;

$Sa0 = @13-2 l8 q16 @Q0 $Ea1 ;
$Sa1 = o4 b-cdf   /:3 b-<cdf :/   /:3 b-fdc> :/   b-fdc ;
$Sa2 = o4 gab-d   /:3 gab-<d :/   /:3 gd>b-a :/   gdb-a ;
$Sa3 = o4 gb-e-f  /:3 gb-<e-f :/  /:3 gfe->b- :/  gfe-b- ;
$Sa4 = o4 acfg    /:3 a<cfg :/    /:3 agfc> :/    agfc ;
$Sa5 = o4 f+b-c+f /:3 f+b-<c+f :/ /:3 f+fc+>b- :/ f+fc+b- ;
$Sa6 = o4 a-ce-g  /:3 a-<ce-g :/  /:3 a-ge-c> :/  a-ge-c ;

$RANGE $NS $SQRa $DT0 $Sa0
/:$LOOP $Sa1 $Sa2 $Sa1 $Sa2 $Sa3 $Sa4 $Sa5 $Sa6 :/
;

/* SQRb ===================================================================== */

/* Vol n(sec/60.09) : 8(2) 7(1) 6(1) 5(2) 4(1) 3(1) 2(1) */
$Eb1 = @E1,0,0,  72,4,72,0,  63,2,63,0,  53,2,53,0,  47,5,47,0,  39,2,39,0, 31,2,31,0, 23,0 ;

$Sb0 = @13-1 l8 q16 @Q0 $Eb1 r4 ;
$Sb6 = o4 a-ce-g  /:3 a-<ce-g :/  /:3 a-ge-c> :/  a-g ;

$RANGE $NS $SQRb $DT0 $Sb0
/:$LOOP $Sa1 $Sa2 $Sa1 $Sa2 $Sa3 $Sa4 $Sa5 / $Sa6 :/ $Sb6
;