// dSakura.dll Version.2.374 Int MC={001}//←数字の部分をダブルクリックでも変えられます。 // ↑ /* ↑ MC={001}は「煮物」の再生をします。 MC={002}は「置物」の再生をします。 MC={000}は1〜2までの曲の再生しますが、2曲目の再生を失敗します…注意。 */ Str PRG1={ //------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.374) //------------------------------------------------------------------------------ 曲名{"煮物"} 作者{"ゴロニャ〜ゴ"} コメント{"ふきこぼれに注意"} /* 「何か…普通じゃなくなってきたぞ…」 焦って何かやろうとすると後で間違いに気づく数が普段よりも多くなりますね…orz 前回の投稿は焦りすぎました…音割れやら何やら…。 多分今回も後で間違いの数が増えてしまっているでしょう…と。 …やっぱり焦ってしまっていますので。 */ // 制作開始：2012/08/07　　最終更新：2012/08/17 //------------------------------------------------------------------------------ //_初期設定 Include(delay.h); TimeBase=(480) // 四分音符分解能 Tempo=(083) // テンポの設定(20〜240を推奨) TimeSignature 4,4 // 拍子記号の設定→2,4は2/4拍子を表す System.MeasureShift(3); // 音源初期化用に１小節遅らせる ResetGS; // GS音源用リセット TrackSync; // 全てのトラックを同期する(初期化後に必須) CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7; CuePoint={"TwmReverb(089,125,125,120)"} // ReverbSetting Time Dpth High Mix? CuePoint={"TwmChorus(001,045,089,081,015,120,004)"} // ChorusSetting Wave Mix Dpth FB Freq Dly Phs Function Set(x1,x2,xa,x3,x4,x5,x6,x7,x8,x9){ r8 CH(x1);@(x2,xa);V(x3);EP(x4);P(x5);REV(x6);CHO(x7);M(x8);BR(x9);} // CH, @ , @2, V , EP, P ,REV,CHO, M , BR TR=001 r-8 Set(001,001,000,127,127,064,040,000,000,000)// グランドピアノ TR=002 r-8 Set(002,001,000,127,127,064,040,000,000,000)// 〃 TR=003 r-8 Set(003,038,000,127,127,064,040,000,000,004)// スラップベース２ TR=004 r-8 Set(004,093,000,127,127,064,040,000,000,000)// ボウドパッド TR=005 r-8 Set(005,125,005,127,127,064,040,000,000,024)// ウィンドチャイム…? TR=010 r-8 Set(010,026,000,100,127,064,040,000,000,008)// TR-808セット TR=011 r-8 Set(011,017,000,090,127,064,040,000,000,024)// パワーセット TR=014 r-8 Set(014,001,000,127,127,064,040,000,000,000)// グランドピアノ TR=015 r-8 Set(015,001,000,127,127,064,040,000,000,000)// 〃 TR=016 r-8 Set(016,001,000,127,127,064,040,000,000,000)// 〃 Int NO Str GN ={ NO=RandomSelect(29,30,51,59,67,80,81,82,75) n(NO)} Int NH Str HN ={ NH=RandomSelect(38,51,49,57,59,67) n(NH)} Int NS Str SG ={ NS=RandomSelect(28,38,46,49,52,57) n(NS)} Int NA Str NG ={ NA=RandomSelect(27,28,35,36,40,41,42,43,44,45,47,48,50,86,87) n(NA)} //------------------------------------------------------------------------------ TR(1)　v108　o6　q100　l8 　　　　　　　　　　　　　　　　　　　　　 // 88鍵盤ピアノパンポット対応表(個人的メモ) r1 　　　　　　　　　　　　　　　　　　　　　 // P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 88鍵盤 パン 音階 P.N(86,79,76,74)ソ^レ^ド^"シ^ 　　　　　　　　　　　　　　　　　　　　　 // 21 1 ラ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 22 　　 　3 　ラ＃ P.N(79,81,86,93,93,92)レミソ`ド^`ドシ^ 　　　　　　　　　　　　　　　　　　　　　 // 23 4 シ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 24 6 O2 ド P.N(96,86,81,99,93)`レ^ソ^ミ`ミ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 25 7 ド＃ P.N(100,93,92,89,89,93,86)`ファ`ドシラ^ラ`ドソ 　　　　　　　　　　　　　　　　　　　　　 // 26 9 レ P.N(93,92,92,89)`ド^シ^シ^ラ^ 　　　　　　　　　　　　　　　　　　　　　 // 27 10 レ＃ [8r1] 　　　　　　　　　　　　　　　　　　　　　 // 28 12 ミ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 29 13 ファ P.N(86,79,76,74)ソ^レ^ド^"シ^ 　　　　　　　　　　　　　　　　　　　　　 // 30 15 ファ＃ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 31 16 ソ P.N(79,81,86,93,93,92)レミソ`ド^`ドシ^ 　　　　　　　　　　　　　　　　　　　　　 // 32 17 ソ＃ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　 // 33 19 ラ P.N(96,86,81,99,93)`レ^ソ^ミ`ミ`ド^ // 34 20 ラ＃ P.N(100,93,92,89,89,93,86)`ファ`ドシラ^ラ`ドソ 　　　　　　　　　　　　　　　　　　　　　 // 35 22 シ P.N(93,92,92,89)`ド^シ^シ^ラ^ // 36 23 O3 ド [8r1] // 37 25 ド＃ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ // 38 26 レ P.N(86,79,76,74)ソ^レ^ド^"シ^ 　　　　　　　　　　　　　　　　　　　　　　 // 39 28 レ＃ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　　　// 40 29 ミ P.N(79,81,86,93,93,92)レミソ`ド^`ドシ^ 　　　　　　　　　　　　　　　　　　　　　　　// 41 31 ファ P.N(100,99,93,89,86,93)`ファ`ミ`ドラ^ソ`ド^ 　　　　　　　　　　　　　　　　　　　　　　// 42 32 ファ＃ P.N(96,86,81,99,93)`レ^ソ^ミ`ミ`ド^ 　　　　　　　　　　　　　　　　　　　　　　　// 43 33 ソ P.N(100,93,92,89,89,93,86)`ファ`ドシラ^ラ`ドソ 　　　　　　　　　　　　　　　　　　　　　　// 44 35 ソ＃ P.N(93,92,92,89)`ド^シ^シ^ラ^[r1] 　　　　　　　　　　　　　　　　　　　　// 45 36 ラ //------------------------------------------------------------------------------ 　　　　　　　　　　　　　　　　　　　　　 // 46 38 ラ＃ TR(2)　v108　o6　q100　l8 　　　　　　　　　　 // 47 39 シ r1　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 48 41 O4 ド P.N(93,93,86,83,83)`ド`ドソファ^^^r 　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 49 42 ド＃ ^P.N(92,86,81,86)シ^ソ^ミ^ソ 　　　　　　　　　　　　　　　　　　　　　　　　　// 50 44 レ P.N(93,93,86,83,83)`ド`ドソファ^^^r 　　　　　　　　　　　　　　　　　　　　　　　 // 51 45 レ＃ P.N(86,76,89,86)ソ^ド^ラ^ソ^ // 52 47 ミ P.N(93,92,86,81,81)`ドシソミ^^^r // 53 48 ファ ^P.N(81,79,93,86)ミ^レ^`ドソ^ // 54 49 ファ＃ P.N(89,89,83,81,81)ララファミ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 55 51 ソ ^P.N(86,83,81,76)ソ^ファ^ミド^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 56 52 ソ＃ [8r1]　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 57 54 ラ P.N(93,93,86,83,83)`ド`ドソファ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 58 55 ラ＃ ^P.N(92,86,81,86)シ^ソ^ミ^ソ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 59 57 シ P.N(93,93,86,83,83)`ド`ドソファ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 60 58 O5 ド P.N(86,76,89,86)ソ^ド^ラ^ソ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 61 60 ド＃ P.N(93,92,86,81,81)`ドシソミ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 62 61 レ ^P.N(81,79,93,86)ミ^レ^`ドソ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 63 63 レ＃ P.N(89,89,83,81,81)ララファミ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 64 64 ミ ^P.N(86,83,81,76)ソ^ファ^ミド^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 65 65 ファ [8r1]　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 66 67 ファ＃ P.N(93,93,86,83,83)`ド`ドソファ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 67 68 ソ ^P.N(92,86,81,86)シ^ソ^ミ^ソ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 68 70 ソ＃ P.N(93,93,86,83,83)`ド`ドソファ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 69 71 ラ P.N(86,76,89,86)ソ^ド^ラ^ソ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 70 73 ラ＃ P.N(93,92,86,81,81)`ドシソミ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 71 74 シ ^P.N(81,79,93,86)ミ^レ^`ドソ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 72 76 O6 ド P.N(89,89,83,81,81)ララファミ^^^r　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 73 77 ド＃ ^P.N(86,83,81,76)ソ^ファ^ミド^[r1]　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 74 79 レ //------------------------------------------------------------------------------　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 75 80 レ＃ TR(3)　v94　o3　q100　l16　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 76 81 ミ [17r1]　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 77 83 ファ [ファファp%.T(8192,0,!32)ファファファドドドp%.T(8192,0,!32)"ソ"ソ"ソドファファミミ　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 78 84 ファ＃ ドド"ソドドドp%.T(-8192,0,!32)レドドレ"ソドドp%.T(8192,0,!32)レ"ソド　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 79 86 ソ ファファファソ32レ32ファ32&&ド32ファ32ファ32ドド32ド32ド"ソ"ソ"ソ[4ド32]`ドソ32ソ32　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 80 87 ソ＃ ドド[ド32]ドドp%.T(-8192,0,!32)`ドド[ド32]p%.T(8192,0,!8)[4ソ32][[ド32]ド]p%.T(-8192,0,!8)[4`ド32]]　　　　　　　　　　　　　　　　　　　 // 81 89 ラ [8r1]　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 82 90 ラ＃ [ファファp%.T(8192,0,!32)ファファファドドドp%.T(8192,0,!32)"ソ"ソ"ソドファファミミ　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 83 92 シ ドド"ソドドドp%.T(-8192,0,!32)レドドレ"ソドドp%.T(8192,0,!32)レ"ソド　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 84 93 O7 ド ファファファソ32レ32ファ32&&ド32ファ32ファ32ドド32ド32ド"ソ"ソ"ソ[4ド32]`ドソ32ソ32　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 85 95 ド＃ ドド[ド32]ドドp%.T(-8192,0,!32)`ドド[ド32]p%.T(8192,0,!8)[4ソ32][[ド32]ド]p%.T(-8192,0,!8)[4`ド32]][r1] // 86 96 レ //------------------------------------------------------------------------------　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 87 97 レ＃ TR(4)　v104　o5　q100　l8　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 88 99 ミ [8r1]ド^ソ^シ^`レ^ P.N(60,53,76,30,105,68,12,44)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 89 100 ファ `ド^^^^`レ^rシ^^^^^ラ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 90 102 ファ＃ `レ^^^`ファ`ミr`ド^^rシ^^ラ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 91 103 ソ `ド^^^ラ`レ^rソ^^シ^^`ドr　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 92 105 ソ＃ `ミ^^`ファ^ソシ^^ラ^^シ^`ドド // 93 106 ラ [7r1]ド^ソ^シ^`レ^ P.N(60,53,76,30,105,68,12,44) // 94 108 ラ＃ [`ド^^^^`レ^rシ^^^^^ラ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 95 109 シ `レ^^^`ファ`ミr`ド^^rシ^^ラ^　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 96 111 O8 ド `ド^^^ラ`レ^rソ^^シ^^`ドr　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 97 112 ド＃ `ミ^^`ファ^ソシ^^ラ^^シ^`ドド][r1]　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 98 113 レ //------------------------------------------------------------------------------　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 99 115 レ＃ TR(5)　v90　o5　q350　l64　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 100 116 ミ [16r1]EP.T(20,127,!1)p%.T(-8192,8192,!1)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 101 118 ファ [64'`ド`ソ']EP.T(127,0,!1)'""ド`ソ'1,100p%(0)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 102 119 ファ＃ [r1]EP.T(20,127,!2)p%.T(8192,-8192,!2)[32'`ド`ソ']EP.T(127,0,!1^1)'`ド`ソ'2　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 // 103 121 ソ r16p%(-7160)r16p%(-6010)r16p%(-5000)r16p%(-4096)r16p%(-3202)r16p%(-2468)r16p%(-1662)r16p%(-1028)r8p%(-728)r8p%(-444)r8p%(-282)r8p%(0)　　 // 104 122 ソ＃ [r1]EP.T(20,127,!2.)p%.T(8192,-8192,!1)l32 <<cdefgab>cdefgab>cdefgab>cdef EP.T(127,0,!1)'""g"cg'1,100 o5　　　　　　　　　　　　 // 105 124 ラ [6r1]l64EP.T(20,127,!1)p%.T(-8192,8192,!1)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 106 125 ラ＃ [32'ソ`ミ''`ド`ソ']EP.T(127,0,!1)'""ド`ソ'1,100p%(0)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// 107 127 シ [r1]EP.T(20,127,!2)p%.T(8192,-8192,!2)[16'ソ`ミ''`ド`ソ']EP.T(127,0,!1^1)'ソ`ド`ソ'2　　　　　　　　　　　　　　　　　　　　　　　　　　　// 108 128 ド r16p%(-7160)r16p%(-6010)r16p%(-5000)r16p%(-4096)r16p%(-3202)r16p%(-2468)r16p%(-1662)r16p%(-1028)r8p%(-728)r8p%(-444)r8p%(-282)r8p%(0) [r1]EP.T(20,127,!2.)p%.T(8192,-8192,!1)l32 <<cdefgab>cdefgab>cdefgab>cdef EP.T(127,0,!1)'""g"cg'1,100 r1 //------------------------------------------------------------------------------ TR(10)　v100　o5　q100　l8 EP.N(118,100,80) [25r1] p.N(64,25,0,128,80) Sub{[32 l8 MidiDelay({NG},3,!8)]} [16 l4 MidiDelay({GN},4,!8)] [4r1]p(128) Sub{[256 l32 NG]} Sub{[128 l16 MidiDelay({HN},3,!8)]} [32 l4 MidiDelay({GN},4,!8)]p(128)[r1] //------------------------------------------------------------------------------ TR(11)　v100　o5　q100　l8 v.N(90,85,70,55,60,80) [25r1] p.N(0,2,4,8,16,32,64,128,64,32,16,4) Sub{[128 l32 HN]} [8 l2 SG][r1]p(0) Sub{[80 l8 HN]} [20 l2 SG][r1] //------------------------------------------------------------------------------ TR(14)　v108　o4　q100　l8 r1 [10P.N(44,54,41,51,39,57,41,51) レ^^^ラ^^^ ド^^^ソ^^^ "シ^^^シ^^^ ド^^^ソ^^^][r1] //------------------------------------------------------------------------------ TR(15)　v108　o4　q100　l8 r1 [10P.N(36,48,33,47,33,51,33,47) "ラ^^^^^ファ^ "ソ^^^^^ミ^ "ソ^^^^^ソ^ "ソ^^^^^ミ^][r1] //------------------------------------------------------------------------------ TR(16)　v108　o4　q100　l8 r1 [10^^P.N(48,26,47,29,29,44,39,47,29,23) ファ^^^^"レ ^^ミ"ミ^^^"ミ ^^レ^^^^"シ ^^ミ"ミ^^^"ド][r1]レ TR(6)[43r1]TR(7)[43r1]TR(8)[43r1]TR(9)[43r1]TR(12)[43r1]TR(13)[43r1]} Str PRG2={ //------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.374) //------------------------------------------------------------------------------ 曲名{"置物"} 作者{"ゴロニャ〜ゴ"} コメント{"物置"} // 音量調整＆トラック追加 // 制作開始：2012/07/14　　最終更新：2012/08/18 //------------------------------------------------------------------------------ //_初期設定 Include(delay.h); TimeBase=(480) // 四分音符分解能 Tempo=(094) // テンポの設定(20〜240を推奨) TimeSignature 3,4 // 拍子記号の設定→2,4は2/4拍子を表す System.MeasureShift(2); // 音源初期化用に１小節遅らせる ResetGS; // GS音源用リセット TrackSync; // 全てのトラックを同期する(初期化後に必須) CuePoint={"TwmReverb(110,125,125,90)"} // ReverbSetting Time Dpth High CuePoint={"TwmChorus(001,045,089,081,015,120,004)"} // ChorusSetting Wave Mix Dpth FB Freq Dly Phs Function Set(x1,x2,xa,x3,x4,x5,x6,x7,x8,x9){ r8 CH(x1);@(x2,xa);V(x3);EP(x4);P(x5);REV(x6);CHO(x7);M(x8);BR(x9);} // CH, @ , @2, V , EP, P ,REV,CHO, M , BR TR=001 r-8 Set(001,011,000,110,127,064,060,000,000,000)// ミュージックボックス TR=002 r-8 Set(002,009,000,108,127,064,060,000,000,000)// チェレスタ TR=003 r-8 Set(003,098,000,123,127,064,060,000,000,000)// サウンドトラック TR=004 r-8 Set(004,081,000,125,127,064,060,000,000,000)// スクウェア・リード TR=005 r-8 Set(005,127,002,127,127,064,060,000,000,000)// スクリーミング TR=006 r-8 Set(006,047,000,118,127,064,060,000,000,000)// オーケストラハープ TR=007 r-8 Set(007,045,000,112,127,064,060,000,000,000)// トレモロストリングス TR=008 r-8 Set(008,005,000,115,127,064,060,000,000,000)// エレクトリックピアノ1 TR=009 r-8 Set(009,005,000,115,127,064,060,000,000,000)// 　　　　〃　　　　　 TR=010 r-8 Set(010,001,000,127,127,064,060,000,000,000)// スタンダードセット TR=012 r-8 Set(012,090,000,055,127,000,060,000,000,000)// ワームパッド TR=013 r-8 Set(013,090,000,055,127,127,060,000,000,000)// 　　 〃　　 /* TR(1) @(11) V(110) EP(127) P(064) REV(060) CHO(000) TR(2) @(9) V(108) EP(127) P(064) REV(060) CHO(000) TR(3) @(98) V(123) EP(127) P(064) REV(060) CHO(000) TR(4) @(81) V(125) EP(127) P(064) REV(060) CHO(000) TR(5) @(127,2) V(127) EP(127) P(064) REV(060) CHO(000) TR(6) @(47) V(118) EP(127) P(064) REV(060) CHO(000) TR(7) @(45) V(115) EP(127) P(064) REV(060) CHO(000) TR(8) @(5) V(115) EP(127) P(064) REV(060) CHO(000) TR(9) @(5) V(115) EP(127) P(064) REV(060) CHO(000) TR(10) @(1) V(127) EP(127) P(064) REV(060) CHO(000) TR(12) @(90) V(055) EP(127) P(000) REV(060) CHO(000) TR(13) @(90) V(055) EP(127) P(127) REV(060) CHO(000)*/ //------------------------------------------------------------------------------ TR(1)　v110　o5　q100　l8 v.N(100,116,108) [6ラ^^^`ミ^ファ^^^`ド^シ^ソ^`レ^ミ^^^シ^ `ド^^^ミ^レ^^ミ`レ^シ^ソ^`レ^`ド^^^`ミ^] //------------------------------------------------------------------------------ TR(2)　v118　o4　q100　l8 v.N(122,118,100,110,104) [14'"ラレファ'^^^^^'"ファ"ラド'^^^^^'"ミ"ソ"シ'^^^^^'"ミ"ソド'^^'"ラミ'^^] //------------------------------------------------------------------------------ TR(3)　v120　o5　q90　l1 p.WE(64,0,!1) EP.W(127,0,!1*3) BR(2) [8ファ^:rミ^r] //------------------------------------------------------------------------------ TR(4)　v110　o6　q100　l2 Str DA={EP.T(60,127,!4)} [11r1DA MidiDelay({`ド},6,!8)r[r1]] //------------------------------------------------------------------------------ TR(5)　v110　o4　q100　l8 p.WE(128,0,!1) EP.W(0,127,!8,127,0,!1) BR(7) [5r1ラ^ファ,,100^ド,,90^"ソ,,83^"レ,,80^""ソ,,77^""ド,,75^"""ファ,,73^""""ラ,,70^[5r1]] //------------------------------------------------------------------------------ TR(6)　v108　o5　q100　l8 EP.W(0,127,!48) CHO.N(16,32,64,127) [6r1] #B={[4MidiDelay({レファラ},5,!24)][4MidiDelay({"ラドミ},4,!16)] [4MidiDelay({"ソ"シミ},2,!8)][4MidiDelay({ドミソ},3,!12)]} [#B][6r1][3#B] //------------------------------------------------------------------------------ TR(7)　v104　o5　q100　l1 EP.WE(0,127,!48,40,127,!1) p.WE(0,128,!48,0,128,!1,128,64,!1,128,0,!24) BR(24) ['"ソ,,80ド'^^'ソ,,80シ'^^:'"ソ,,80レ'^^'レ,,80ソ'^^][6r1] '"ソ,,80ド'^^'ソ,,80シ'^^'"ソ,,80レ'^^'レ,,80ソ'^^ //------------------------------------------------------------------------------ TR(8)　v90　o5　q100　l8 P.N(24,104) #A={ソ^^^ミ^^^`ド^^^ミ^ソ^`ド^} [12r1][5#A]r2.[8#A]MidiDelay({`ド4},5,!4) //------------------------------------------------------------------------------ TR(9)　v85　o5　q100　l8 p(067) P.N(104,24)EP.WE(80,127,!1,127,127,!1) [12r1]r4 [5#A]r2.[8#A]MidiDelay({`ド4},5,!4) //------------------------------------------------------------------------------ TR(10)　v100　o5　q100　l16 $a{v90n(Claves),}$b{v90n(MuteTriangle),}$c{v86n(OpenTriangle),}$d{v100n(BellTree),}$e{v85n(RideCymbal2),} Rythm{[3 rrrr|brrr|rrrr|arrr :brrr|rrrr|rrrr|arrr]bre,,60r|crrr|rrrr|drrr} Rythm{[[3 rrer|brrr|rre,,60r|arrr :brrr|rrcr|rrb,,70r|arrr]bre,,60r|crrr|rrrr|drrr]} Rythm{[3 rrrr|brrr|rrrr|arrr :brrr|rrrr|rrrr|arrr]bre,,60r|crrr|rrrr|drrr} Rythm{[3[3 rrer|brrr|rre,,60r|arrr :brrr|rrcr|rrb,,70r|arrr]bre,,60r|crrr|rrrr|drrr]} //------------------------------------------------------------------------------ TR(12)　v80　o5　q110　l1 EP.T(0,127,!1*4) ソ^^^^^v100EP.WR(108,127,!2.,127,108,!2.)[4`ド^ソ^][r1][5`ド^:ソ^]EP.T(127,0,!1*2)ソ^[r1] //------------------------------------------------------------------------------ TR(13)　v80　o5　q110　l1 EP.T(0,127,!1*4) `ド^^^^^v100EP.WR(108,127,!2..,127,108,!2..)[4ソ^`ド^][r1][5ソ^:`ド^]EP.T(127,0,!1*2)`ド^[r1] } If(MC={000}){PRG1 PRG2} If(MC={001}){PRG1} If(MC={002}){PRG2} /* 「 限りなく愚痴に近い願望 」 早く自宅のネット環境が復活してくれればいいな… あと200曲以上曲掲示板の投稿曲をダウンロードしなければ追いつかない …というのは置いといて、ちょっと今回は曲名を考えるのに凄く時間が掛ってしまいました。 煮物だ！と思ったらそれ以外浮かばなくなる予感がしたので、早々に面倒になって付けてしまいました。 ほかに候補としてケトルとか何か色々あった気がするけれど、思い出そうとしたら忘れてしまいました。 本気で考えているようでも、内容は結構適当なのです。 ピアノの鍵盤一つ一つにパンポットを設定する事に挑戦という事で、少し暗めなピアノ曲を目指して作っていましたが、 見事に玉砕され、途中からテンポ速いのか遅いのか分からないようなものにしてしまえｗと…暴走してしまいました。 ちなみにピアノの鍵盤一つ一つにパンポットを設定する事に挑戦というのは、「月夜花」で途中まで作っていました。 …油断していた時にパソコン使える機会が訪れたという事で間に合いませんでしたけど。 しかし今回いとこの家滞在期間中に返信出来なければ投稿しない気でいましたので、何とか間に合って良かった…かもしれない。 という事で、特に意味の無いコメントを終了いたします。 */