#TITLE ドラゴンクエストⅡ悪霊の神々 / 海原を行く #ARTIST すぎやまこういち #CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931) #COMMENT JASRAC work code：010-8817-3 / MML coded: 2014/06/14 rev.0 /* Ini ====================================================================== */ /* All part 1 */ $ALL1 = t187.1 ; /* Tone part */ $ALLT = ; /* Repeat */ $LOOP = 48 ; /* Volume @V0～127 */ /* 2A03 Sqr_0 */ $Sqr0 = @V120 ; /* 2A03 Sqr_1 */ $Sqr1 = @V104 ; /* 2A03 Tri */ $Tri = @V112 ; /* Wav13 ==================================================================== */ #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 2,80 F4 F5 F5 F4 F4 F3 F2 F1 F0 EF EE ED EC EC EB EA EA E9 E8 E7 E6 E5 E5 E4 E3 E2 E1 E0 E0 E0 DF DE DD DC DC DB DA D9 D9 D8 D7 D7 D6 D6 D5 D4 D4 D3 D2 D1 D1 D0 CF CC A2 4E 47 47 48 48 49 49 4A 4A 4A 4B 4B 4B 4C 4C 4D 4D 4D 4E 4E 4F 4F 50 50 50 50 51 51 51 52 52 53 53 53 54 54 54 54 55 55 56 56 56 57 57 57 58 58 58 58 59 59 59 5A 5A 5A 5A 5B 5B 5B 5C 5C 5C 5C 5D 5D 5D 5D 5E 5E 5E 5F 5F 5F 5F 5F 60 60 60 60 61 61 61 61 62 62 62 62 62 63 63 63 63 64 64 64 64 65 65 65 65 65 65 66 66 66 66 67 67 67 67 67 67 68 68 68 68 68 69 69 69 69 69 69 69 6A 6A 6A 6A 6A 6B 6B 6B 6B 6B 6B 6B 6C 6C 6C 6C 6C 6C 6D 6D 6D 6D 6D 6D 6D 6D 6E 6E 6E 6E 6E 6E 6E 6F 6F 6F 6F 6F /* 2A03(Sqr25%) */ #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%) */ /* Macro ==================================================================== */ $Ex0 = @E1,0,0,127,0 ; /* Vol(n/60.09) : X(3) F(+1) E(+1) D(+1) C(+1) B(+1) A(+1) 9(+1) 8(+2) 9(+1) A(+1) B(+2) A(+1) 9(+1) 8(+2) ... */ /* Vol(n/127) : X(6) F(+2) E(+2) D(+2) C(+2) B(+2) A(+2) 9(+2) 8(+5) 9(+2) A(+2) B(+4) A(+2) 9(+2) 8(+4～5) ... */ $ExS1 = @E1,0,0, 120,8,120,0, 112,2,112,0, 104,2,104,0, 96,2,96,0, 88,2,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,4,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,4,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,4,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,4,64,0, 72,2,72,0, 80,2,80,0, 88,4,88,0, 80,2,80,0, 72,2,72,0, 64,5,64,0 ; /* Vol(n/60.09) : A(1) F(+1) D(+1) C(+2) B(+2) A(+3) 9(+3) 8(+4) 9(+1) A(+1) B(+1) C(+2) B(+1) A(+1) 9(+4) 8(+4) ... */ /* Vol(n/127) : A(2) F(+2) D(+2) C(+3) B(+3) A(+5) 9(+5) 8(+8) 9(+2) A(+2) B(+2) C(+4) B(+2) A(+2) 9(+9) 8(+9) ... */ $ExS2 = @E1,0,0, 80,2,80,0, 120,2,120,0, 104,3,104,0, 96,3,96,0, 88,5,88,0, 80,5,80,0, 72,5,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,88,0, 96,4,80,0, 88,2,88,0, 80,2,80,0, 72,9,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,88,0, 96,4,80,0, 88,2,88,0, 80,2,80,0, 72,9,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,88,0, 96,4,80,0, 88,2,88,0, 80,2,80,0, 72,9,72,0, 64,9,64,0 ; /* Sqr_0 ==================================================================== */ $At15A{a} = $Ex0 @13-4 @X80 %a%5 & @X96 %a%5 & @X104 %a%5 ; /* A(1)C(1)D(1) */ $SQ48A{a} = $At15A{%a} & $ExS1 @13-2 @X127 %a%33 ; $SQ96A{a} = $At15A{%a} & $ExS1 @13-2 @X127 %a%81 ; $SQ96B{a} = $At15A{%a} & $ExS1 @13-2 @X127 %a%33 & $Ex0 @13-1 @X16 %a%48 ; $S00 = q16 @Q0 $Ex0 ; $S01 = o5 $SQ96A{e} $SQ96A{d+} $SQ96A{e} $SQ96A{f} $SQ96A{e} $SQ96A{f} ; $S02 = $SQ96A{g} $SQ96A{f+} $SQ96A{g} $SQ96A{a} $SQ96A{b} < $SQ96A{c} ; $S03 = > $SQ96A{d} & d%480 ; $S04 = & d%576 ; $S05 = $SQ96A{f} $SQ96A{e} $SQ96A{f} $SQ96A{g} $SQ96A{f+} $SQ96A{g} ; $S06 = $SQ96A{a} $SQ96A{g+} $SQ96A{a} $SQ96A{b} < $SQ96A{c} $SQ96A{d} ; $S07 = $SQ96A{e} & e%480 ; $S08 = & e%576 ; $S09 = $SQ96B{a} > $SQ48A{a} $SQ48A{b} < $SQ48A{c} > $SQ48A{a} < $SQ96A{f} & f%192; $S0A = $SQ96B{g+} > $SQ48A{g+} $SQ48A{a} $SQ48A{b} $SQ48A{e} < $SQ96A{c} & c%192; $S0B = > $SQ48A{a} $SQ48A{b} < $SQ48A{c} & > a%48 & b%48 & < c%48 $SQ48A{d} $SQ48A{c} > $SQ48A{b} & < c%48 & > b%48 & a%48 ; $S0C = < $SQ96A{e} & e%192 > $SQ96A{d} & d%192 ; /* *** play *** */ $ALL1 $ALLT $Sqr0 $S00 /:$LOOP $S01 $S02 $S03 $S04 $S05 $S06 $S07 $S08 $S09 $S0A $S0B $S0C :/ ; /* Sqr_1 ==================================================================== */ $SQ96C{a} = $ExS2 @13-4 @X127 %a%48 & $Ex0 @13-1 @X16 %a%48 $ExS2 @13-4 @X127 ; $S10 = q16 @Q0 $Ex0 l8 ; $S11 = o5 r%96 $SQ48A{g} $SQ48A{f+} $SQ96A{g} r%96 $SQ48A{a} $SQ48A{g} $SQ96A{a} ; $S12 = r%96 $SQ48A{b} $SQ48A{a+} $SQ96A{b} r%96 $SQ96A{a} $SQ96A{a} ; $S13 = /:4 r%96 $SQ48A{a} $SQ48A{g} $SQ96A{a} :/ ; $S15 = r%96 $SQ96A{g+} $SQ96A{a} r%96 $SQ96A{a+} $SQ96A{b} ; $S16 = r%96 $SQ96A{b} < $SQ96A{c} r%96 > $SQ96A{a} $SQ96A{b} ; $S17 = < /:4 r%96 / $SQ96A{c} $SQ96A{c} :/ > $SQ96A{b-} $SQ96A{b-} ; $S19 = < $SQ96C{c} > fgafa2. $SQ96C{b} e4d4e2. ; $S1B = e2.d+2. g+4g+abbagfed ; /* *** play *** */ $ALL1 $ALLT $Sqr1 $S10 /:$LOOP $S11 $S12 $S13 $S15 $S16 $S17 $S19 $S1B :/ ; /* Tri ====================================================================== */ $TR96A{a} = %a%91 r%5 ; $TR192A{a} = %a%187 r%5 ; $T00 = @13-0 $Ex0 q16 @Q0 l8 ; $T01 = o4 $TR96A{c} << $TR192A{c} >> d4 & << $TR96A{d} $TR96A{d} ; $T02 = >> $TR96A{e} << $TR96A{e} e4 & >> $TR96A{f} < $TR192A{f} ; $T03 = > $TR96A{d} << f & e & $TR96A{f} >> c4 & << f & e & f4 & ; $T04 = >>> $TR96A{b} <<< f & e & $TR96A{f} >>> $TR96A{a} <<< f & e & $TR96A{f} ; $T05 = >> d4 & << $TR96A{d} d4 & >>> $TR96A{g} <<< $TR96A{d} $TR96A{d} ; $T06 = >> $TR96A{d} << $TR192A{f} >>> g4 & << $TR96A{f} $TR96A{f} ; $T07 = > $TR96A{c} < $TR96A{g} g4 & >> $TR96A{b} << $TR192A{g} ; $T08 = >> $TR96A{a} << $TR96A{g} $TR96A{g} >> $TR96A{g} << $TR96A{e} e4 & ; $T09 = >> frb&a&b& e4&b4&e4&>a4& g&<b& ; /* *** play *** */ $ALL1 $ALLT $Tri $T00 /:$LOOP $T01 $T02 $T03 $T04 $T05 $T06 $T07 $T08 $T09 $T0B :/ b%1 ;