#TITLE ドラゴンクエストⅡ悪霊の神々 / 街の賑わい #ARTIST すぎやまこういち #CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931) #COMMENT JASRAC work code:080-8099-2 / MML coded: 2014/06/01 rev.0 /* Ini ====================================================================== */ /* All part 1 */ $ALL1 = t125.2 ; /* Tone part */ $ALLT = ; /* Repeat */ $LOOP = 24 ; /* Volume @V0~127 */ /* 2A03 Sqr_0 */ $Sqr0 = @V104 ; /* 2A03 Sqr_1 */ $Sqr1 = @V96 ; /* 2A03 Tri */ $Tri = @V127 ; /* 2A03 Noi */ $Noi = @V56 ; /* 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(2) A(1) 9(+2) 8(+4) 9(+1) A(+1) B(+1) C(+2) B(+1) A(+1) 9(+1) 8(+4) ... */ /* Vol(n/127) : X(4) A(2) 9(+4) 8(+9) 9(+2) A(+2) B(+2) C(+4) B(+2) A(+2) 9(+2) 8(+9~10) ... */ $ExS1 = @E1,0,0, 80,6,80,0, 72,4,72,0, 64,10,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,10,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,10,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,10,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,10,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,9,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,10,64,0, 72,2,72,0, 80,2,80,0, 88,2,80,0, 96,4,80,0, 88,2,80,0, 80,2,80,0, 72,2,72,0, 64,9,64,0 ; /* Vol(n/60.09) : X(2) 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(+1) 8(+4) ... */ /* Vol(n/127) : X(4) D(2) C(+4) B(+5) A(+6) 9(+6) 8(+9) 9(+2) A(+2) B(+2) C(+4) B(+2) A(+2) 9(+2) 8(+9) ... */ $ExS2 = @E1,0,0, 104,6,104,0, 96,4,96,0, 88,5,88,0, 80,6,80,0, 72,6,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,2,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,2,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,2,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,2,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,2,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,2,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,2,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,2,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,2,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,2,72,0, 64,9,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(+5) B(+4) A(+6) 9(+6) 8(+9) 9(+2) A(+2) B(+2) C(+4) B(+2) A(+2) 9(+9) 8(+9) ... */ $ExS3 = @E1,0,0, 80,2,80,0, 120,2,120,0, 104,2,104,0, 96,5,96,5, 88,4,88,0, 80,6,80,0, 72,6,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, 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 ; /* Vol(n/60.09) : C(1) 9(+1) 6(+1) 4(+1) 3(+1) 2(+1) 1(*) */ /* Vol(n/127) : C(2) 9(+2) 6(+2) 4(+2) 3(+2) 2(+2) 1(*) */ $ExN1 = @E1,0,0, 96,2,96,0, 72,2,72,0, 48,2,48,0, 32,2,32,0, 24,2,24,0, 16,2,16,0, 8,199,8,0 ; /* Sqr_0 ==================================================================== */ /* *** A *** */ $At7A{a} = $Ex0 @13-2 @X120 %a%3 & @X104 %a%4 ; /* FD */ $At7B{a} = $Ex0 @13-2 @X96 %a%3 & @X88 %a%4 ; /* CB */ $DeSuA{a,b} = $ExS1 @13-4 @X127 %a%%b ; /* A989ABCBA98... */ $SuA{a,b} = %a%%b ; $Re{a,b} = $Ex0 @13-1 @X16 %a%%b ; /* 2 */ $SQ48A{a} = $At7A{%a} & $DeSuA{%a,17} $At7B{%a} & $DeSuA{%a,17} ; /* FD/A98/CB/A98 */ $SQ48B{a} = $At7A{%a} & $DeSuA{%a,9} & $Re{%a,32} ; /* FD/A9/2 */ $SQ48C{a} = $At7A{%a} & $DeSuA{%a,17} $At7B{%a} & $Re{%a,17} ; /* FD/A98/CB/2 */ $SQ96A{a} = $At7A{%a} & $DeSuA{%a,17} $At7B{%a} & $DeSuA{%a,65} ; /* FD/A98/CB/A989ABCBA98 */ $S00 = q16 @Q0 ; $S01 = o6 $SQ48A{d} /: > $SQ48B{b} < $SQ48C{c} $SQ96A{d} :/ > $SQ48B{b} < $SQ48C{d} $SQ96A{g} $SQ96A{f+} ; $S02 = $SQ96A{e} /: $SQ48B{c} $SQ48C{d} $SQ96A{e} :/ & $SuA{e,336} ; $S03 = $SQ48A{c} /: > $SQ48B{a} $SQ48C{b} < $SQ96A{c} :/ > $SQ48B{a} < $SQ48C{c} $SQ96A{f+} $SQ96A{d} $SQ48A{c} ; $S04 = > $SQ48A{b} /:2 $SQ48B{g} $SQ48C{a} $SQ96A{b} :/ & $SuA{b,144} r%48 $SQ48A{a} $SQ48B{b} < $SQ48B{c} ; $S08 = o6 > $SQ48A{b} /:2 $SQ48B{g} $SQ48C{a} $SQ96A{b} :/ & $SuA{b,144} ; /* *** B *** */ $At7H{a} = $Ex0 @13-2 @X120 %a%3 & @X112 %a%4 ; /* FE */ $DeSuH{a,b} = $ExS2 @13-4 @X127 %a%%b ; /* DCBA989ABCBA98... */ $SQ48H{a} = $At7H{%a} & $DeSuH{%a,41} ; /* FE/DCBA98 */ $SQ96H{a} = $At7H{%a} & $DeSuH{%a,89} ; /* FE/DCBA989ABCBA98 */ $SQ96H2{a} = $At7H{%a} & $DeSuH{%a,41} r%48 ; /* FE/DCBA98/0 */ $SQ192H{a} = $At7H{%a} & $DeSuH{%a,185} ; /* FE/DCBA989ABCBA98989ABCBA98989ABCBA989ABC */ $SQ48I{a} = $At7H{%a} & $DeSuH{%a,16} & $Re{%a,25} ; /* FE/DCBA/2 */ $SQ96I{a} = $At7H{%a} & $DeSuH{%a,16} & $Re{%a,73} ; /* FE/DCBA/2 */ $SQ96J{a} = $At7H{%a} & $DeSuH{%a,40} & $Re{%a,49} ; /* FE/DCBA98/2 */ $SQ144K{a} = $At7H{%a} & $DeSuH{%a,129} & $Re{%a,8} ; /* FE/DCBA989ABCBA989ABCBA98/2 */ $S09 = < $SQ48H{f} $SQ48I{d} > $SQ48I{b} $SQ48I{g} ; $S0A = r%96 < $SQ48H{e} $SQ48H{d+} $SQ48H{e} $SQ48H{f+} $SQ48H{g} $SQ96H{a} $SQ96H2{g} $SQ96H2{f} $SQ96H2{e-} ; $S0B = /:2 $SQ96H{d} > $SQ48H{b} < $SQ48H{c} :/ $SQ48H{d} & $DeSuH{d,384} ; $S0C = > $SQ48H{b} /:3 $SQ48H{g} $SQ48H{a} $SQ96H{b} :/ < $SQ96I{e} > $SQ48H{b} ; $S0D = < $SQ96I{d} > $SQ96J{g} $SQ192H{f+} $SQ144K{e} $SQ48H{f+} & $DeSuH{f+,192} ; /* *** play *** */ $ALL1 $ALLT $Sqr0 $S00 /:$LOOP $S01 $S02 $S03 $S04 $S01 $S02 $S03 $S08 $S09 $S0A $S0B $S0C $S0D :/ ; /* Sqr_1 ==================================================================== */ /* *** A *** */ $SQ48O{a} = $ExS3 @13-4 @X120 %a%15 & $Ex0 @13-1 @X16 %a%33 ; /* ADS=4~5 */ $SQ48P{a} = $ExS3 @13-4 @X120 %a%48 ; $SQ192Q{a,b,c,d,e,f,g,h} = %a $ExS3 @13-4 @X120 %b%15 & $Ex0 @13-1 @X16 %b%33 %c $ExS3 @13-4 @X120 %d%15 & $Ex0 @13-1 @X16 %d%33 %e $ExS3 @13-4 @X120 %f%48 %g $ExS3 @13-4 @X120 %h%15 & $Ex0 @13-1 @X16 %h%33 ; $S10 = q16 @Q0 ; $S11 = o4 $SQ192Q{,b,<,d,<,g,>>,b} $SQ192Q{,b,<,d,<,f+,>>,b} $SQ192Q{,b,<,d,<,e,>>,b} $SQ192Q{,b,<,d,<,f+,>>,b} ; $S12 = $SQ192Q{<,c,,e,<,e,>,c} $SQ192Q{,c,,e,<,f+,>,c} $SQ192Q{,c,,e,<,g,>,c} $SQ192Q{,c,,e,<,f+,>,c} ; $S13 = $SQ192Q{,e,,c,<,e,>,e} $SQ192Q{,e,,c,<,f+,>,e} $SQ192Q{,e,,c,<,g,>,c} $SQ192Q{,a,,f+,,c,,f+} ; $S14 = $SQ192Q{,d,>,b,<<,g,>,d} $SQ192Q{,d,>,b,<<,f+,>,d} $SQ192Q{,d,>,b,<<,e,>,d} $SQ48P{c} $SQ48O{f+} $SQ48O{g} $SQ48O{a} ; $S18 = $SQ192Q{,d,>,b,<<,g,>,d} $SQ192Q{,d,>,b,<<,f+,>,d} ; /* *** B *** */ $SQ192P{a} = $ExS3 @13-4 @X120 %a%192 ; $SQ240P{a} = $ExS3 @13-4 @X120 %a%240 ; $SQ48V{a} = $ExS3 @13-4 @X120 %a%23 & $Ex0 @13-1 @X16 %a%25 ; /* ADS=7~8 */ $SQ96W{a} = $ExS3 @13-4 @X120 %a%48 & $Ex0 @13-1 @X16 %a%48 ; /* ADS=14~15 */ $SQ96Y{a} = $ExS3 @13-4 @X120 %a%33 & $Ex0 @13-1 @X16 %a%63 ; /* ADS=10 */ $SQ144Z{a} = $ExS3 @13-4 @X120 %a%136 & $Ex0 @13-1 @X16 %a%8 ; /* ADS=38 */ $SQ192X{a} = $ExS3 @13-4 @X120 %a%168 & $Ex0 @13-1 @X16 %a%24 ; /* ADS=50~51 */ $S19 = $SQ48P{d} > $SQ48P{b} << $SQ48P{f} > $SQ48P{d} < $SQ48P{d} > $SQ48V{b} $SQ48V{g} $SQ48V{d} ; $S1A = /:4 $SQ48V{e} > $SQ48V{g} < :/ /:4 $SQ48V{e-} > $SQ48V{g} < :/ ; $S1B = /:4 $SQ96W{d} :/ r%48 > $SQ48P{g+} $SQ48V{a} $SQ48V{b} < $SQ48V{c} $SQ48V{d} $SQ48V{e} $SQ48V{f+} ; $S1C = /:4 $SQ192X{g} :/ ; $S1D = $SQ96Y{d} $SQ96W{e} $SQ192P{d} $SQ144Z{c} $SQ240P{d} ; /* *** play *** */ $ALL1 $ALLT $Sqr1 $S10 /:$LOOP $S11 $S12 $S13 $S14 $S11 $S12 $S13 $S18 $S19 $S1A $S1B $S1C $S1D :/ ; /* Tri ====================================================================== */ /* *** A *** */ $TR192A{a,b,c,d,e,f} = %a %b%48 r%48 %c %d%48 r%24 %e %f%17 r%7 ; $TR192B{a,b,c,d,e,f} = %a %b%17 r%31 %b%17 r%31 %c %d%48 & %e %f%17 r%31 ; $TR48C{a} = %a%41 r%7 ; $T00 = @13-0 $Ex0 q16 @Q0 ; $T01 = o3 $TR192A{,g,<<,g,>>,g} $TR192B{,g,<<,f+,>,d} $TR192A{>,g,<<,e,>>,g} $TR192B{,g,<<,f+,>,d} ; $T02 = $TR192A{>,a,<<,e,>>,a} $TR192B{,a,<<,f+,>,e} $TR192A{>,a,<<,g,>>,a} $TR192B{,a,<<,f+,>,e} ; $T03 = $TR192A{>,a,<<,e,>>,a} $TR192B{,a,<<,f+,>,e} $TR192A{>,a,<<,g,>>,a} $TR192B{<,d,<,f+,>,d} ; $T04 = $TR192A{>,g,<<,g,>>,g} $TR192B{,g,<<,f+,>,d} $TR192A{>,g,<<,e,>>,g} $TR192B{<,d,<,d,>,d} ; $T08 = $TR192A{>,g,<<,g,>>,g} $TR192B{,g,<<,f+,>,d} ; /* *** B *** */ $TR96D{a} = %a%23 r%73 ; $TR48E{a} = %a%14 r%34 ; $TR48F{a} = %a%25 r%23 ; $TR192G{a} = %a%167 r%25 ; $TR96H{a} = %a%34 r%62 ; $TR96I{a} = %a%47 r%49 ; $TR48D{a} = %a%23 r%25 ; $TR96J{a} = %a%93 r%3 ; $T09 = $TR192A{>,g,<<,f,>>,g} $TR48C{g} $TR48C{g} r%48 $TR48C{b} ; $T0A = < /:8 $TR96D{c} :/ ; $T0B = /:2 b%48 & >g%48 & < :/ /:2 a%48 & >f%48 & < :/ > $TR48E{e} < e%48 & $TR48F{f+} $TR48F{g+} $TR48F{a} $TR48F{b} < $TR48F{c} $TR48F{d} ; $T0C = $TR192G{e} $TR192G{e-} $TR192G{d} d-%96&>>a%96& ; $T0D = < $TR96H{d} < $TR96I{c} > $TR96I{a} d%96 & g%96 & $TR48D{d} $TR96J{a} $TR48D{a} d%96 & ; /* *** play *** */ $ALL1 $ALLT $Tri $T00 /:$LOOP $T01 $T02 $T03 $T04 $T01 $T02 $T03 $T08 $T09 $T0A $T0B $T0C $T0D :/ d%1 ; /* Noi ====================================================================== */ /* *** A *** */ $N00 = @7 $ExN1 q16 @Q0 ; $N01 = o0 /:4 r%96 d%96 :/ ; /* *** B *** */ $N0A = /:6 r%48 d%48 :/ d%24 d%24 d%48 r%48 d%48 ; $N0C = /:4 d%192 :/ ; $N0D = d%33 r%63 /:2 d%47 r%49 :/ r%144 d%48 f%48 r%96 d%144 ; /* *** play *** */ $ALL1 $Noi $N00 /:$LOOP $N01 $N01 $N01 $N01 $N01 $N01 $N01 $N01 $N0A $N0A $N0C $N0D :/ ;