//_------------------------------------------------------------------------------ // テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.37) //_------------------------------------------------------------------------------ MetaText = {" Charon… = III = ( MidNight-Speed-High-Way.RMX ) = Trancecore "}; //↑:タイトル Copyright = {" ＭＭ GMで作成中 Ver.3.35 "}; //著作権表示 //_一応、曲の説明？----------------------------------------------------------------------------------- /*…オリジナル(以後:自) 作曲　投稿 No.18 … 暫定完了 [ Charon… = III = ( MidNight-Speed-High-Way.RMX ) ] ※ 説明欄が長くなりました…すみません(汗; ...ですので読むのが面倒だなぁ…と思う方は説明欄を飛ばして下さい（汗； 　初めての御方は「初めまして、宜しくお願い致します」 m(_ _)m 皆様、こんにちは、[ ＭＭ(えむえむ) ]と言う者です。 そして、ダウンロードして頂き誠に有り難うございます m(_ _)m 　「…サクラ界のR●u☆に、俺はなる!!!!」（某麦藁帽子の台詞風に）（笑 　…なんて言う、冗談を言いたくなりました（汗; R●u☆のファンの皆様、ワンピースのファンの皆様、そしてR●u☆御本人様、大変誠に失礼致しました... m(_ _;)m 　…寺なら穴でロングノーツ有りの１１と言った所でしょうか？（笑　 　後半にかけての発狂地帯で多分ゲージが減らされる、る、る、る、るぅぅぅ……… 　　　ｱｧｧ!! (mTдT)m___Σ|||ｶﾞｼｬ---ﾝ!!　 　これがSP八段６０％代で抜けた寺男の実力です（笑 Pop'n風にキャッチコピーを入れるとしたら... ・カロン　リミックス　[ Charon… = III = ( MidNight-Speed-High-Way.RMX ) ] 　　 ・「凍て付く深夜の上空に、煌く最光速の粒子の路…駆け抜けては儚く消える…」てな感じでしょうか？ …電波飛んでますが、スルーして下さいね（笑 　…と言う訳で、今回は、サイケデリックな世界を目指した [ カロン（Charon…）] の続編みたいのをつくり〜… のそこから?と?でゴチャ混ぜミックスし〜…のテンションをガンガン、スピードをバンバン上げてみました（笑 　上げたつもりだけど、元々が静かな曲調の方だから、何処か変な感じに………空回りしてる感が有りますね（汗; 気持ち的には[ トランスコア!! ]…のつもりだったのですが、なんかトランスコアにしてはちょっと意味合いが 違って来る様な…そんな出来上がりになりました（汗; 　どちらかと言うと… [ ダンススピード ] かなぁ... …と自分では思っているのですが…果たしてどうなんでしょうか??（汗;　ジャンルって難しいですね...|||orz ｶﾞｸ 　凝縮し過ぎて、展開が異様な事になってますが…今回は二分と言う音ゲー並みに短い曲調に仕上げてみました。 　いづれは６〜７分のロングにしてみたいなぁ〜と思います♪ 　声とかサンプリングみたいのを織り交ぜてみたいけど、周辺機器とかアプリとかが無い... |||orz　ｶﾞｸ …でも、入れてみたら面白そうな気が致します（笑 　…やっぱり、こういうリミックス物って何か色々と想像してしまうので、楽しいですね♪ ハードコア系やスピード物にしたら尚更です（笑　 …と言うより、自分が最近こういうガッツリ系の曲調等にハマッているのも有るのですが…(苦笑; ｱｾｱｾ(;=;д;=;)ﾀﾞﾗﾀﾞﾗ まだまだ処理の仕方といい、音色の付け方といい、拙い部分は有り、展開や終わり方がざっくりとした感じに なってしまいましたが、楽しく聴いて頂けたら作り手としては本当に嬉しい限りです 　それでは、お粗末ながらも長文の御説明を最後まで御付き合いして頂き、誠に有難う御座います m(_ _ )m 　　　これで、失礼致します!! (´・ω・`)ﾉｼ 《 更新記録 》 ・2012/ 2/14 … Ver.3.35 一先ず全体の流れが出来上がり、通常版 ( 通常版 … [ 2:00〜3:30 ] を目安に作っております ) 細かい修正もしたけど…どうでしょうか？ (汗; 《 その他 》 ・使用音源等 … 「ＴＷＭ２ ( 推奨 ) 」・ ヘッドホン ( Sony社の[ MDR-XD200 ) で制作 出来れば、イヤホンやヘッドホンで聴いて頂けると嬉しいです Vista使用者は「音割れや無音」にご注意下さい　m(_ _)m ・ [ REMIX ]等する際は、 コメ欄に「○○に使用しますよ」等と一言声を掛けて頂けたら有り難いです m(_ _)m */ //_ = 初期設定 = ---------------------------------------------------------------------------- Time(0:1:0); TimeSignature = 4,4; //拍子記号の設定 System.MeasureShift = 1; //初期設定の位置を小節数分ずらす(弄らないこと) System.TimeBase = 96; //四分音符分解機能を設定 ResetGM; r1 ResetGS; r1 //音源初期化命令 TrackSync; r1 //全てのトラックを同期化 KeyFlag=(0,0,0,0,0,0,0); // 記号設定 /*定義ファイルの読込欄*/ Include(unison.h); Include(delay.h); Include(bend.h); Include(stdmsg.h); Include(fadeio.h); //_簡単命令文-------------------------------------------------------------------- Function BT(UD1,UD2,L){ p%.T(UD1,UD2,L,0,0,1); } // ベントを簡単に纏めておく(時間指定) Function BNW(UD1,UD2,L){ p%.WR(UD1,UD2,L,0,0,1); } // ベントを簡単に纏めておく(ノート毎) Function TC(TC1,TC2,VT){ TempoChange(TC1,TC2,VT); } //ﾃﾝﾎﾟﾁｪﾝｼﾞ(今のﾘｽﾞﾑ,変えたいﾘｽﾞﾑ,掛かる時間) Function VC(Vh1,Vt1,Vh2,Vt2){ M.WR(0,Vh1,Vt1,Vh1,Vh2,Vt2); } //ﾋﾞﾌﾞﾗｰﾄの掛かり具合(Vhは大きさ,Vｔは掛かる時間) Function EPC(Ep1,Ep2,Et1){ EP.T(Ep1,Ep2,Et1); } /*複合IF関数が上手くいかなかったので(CDの方)、個別に書きました <(;^^)関数は難しいやw。 こちらはｸﾚｯｼｪﾝﾄﾞの役割を担う命令文*/ Function CD(Int a ,Ep1,Ep2,Et1,Ep3,Et2,Es){ IF ( a = 1 ) { EP.WR(Ep1,Ep2,Et1); } Else { EP.WR( Ep1,Ep2,Et1, Ep2,Ep2,Es, Ep2,Ep3,Et2 ); } } /* aはIfの判断,複合有か無か Epは音の大きさ,Etは掛かる時間。 EPで所謂、擬似的な音の掛け具合を作る(一定型) */ Function PC(Int a ,Pp1,Pp2,Pt1,Pp3,Pt2,Ps1){ /*aはIfの判断,複合有か無か PpはPの向き,Ptは移動時間,Psは停滞時間*/ IF ( a = 1 ) { P.T(Pp1,Pp2,Pt1); } Else { P.T( Pp1,Pp2,Pt1, Pp2,Pp2,Ps1, Pp2,Pp3,Pt2 ); } } /* ↑開始場所 ↑停滞時間 ↑終了場所 のPの移動を簡単纏めておく 一回きりなのでﾙｰﾌﾟ関係を用いて継続的に鳴らす事が必要有… <(;^^)ううん、中々上手く関数が作れないなぁ...*/ Function BP(X,Y){ BR(X); p%(Y); } /* ピッチを戻す */ Function Po(Int Po,po){ If(Po==on){y64(po);} Else{y64(0);} } /* ﾍﾟﾀﾞﾙを押す放す */ Function RC(Int R,C){ REV(R);CHO(C); } /* リバーブとコーラスを纏めておく */ Function Vm(Int V,O,L,m){ v(V);o(O);l(L);M(m); } /* 左から [ Vel; Oct; l ; Mod の順で短縮 [←: v〜M ] */ Function TK(T){ TrackKey = (T) } // トラックキー Function EV(E,v){ EP(E);V(v); } // EPとVを簡略化のつもりです(w 初期設定は[ 100,100 ] //_ﾘｽﾞﾑｽﾍﾟｰｽ------------------------------------------------------------------------------ /*リズムの定義*/ $S{n82,}/*ｼｪｲｶｰ*/ $h{n39,}/*ﾊﾝﾄﾞｸﾗｯﾌﾟ*/ $O{n46,}/*ﾊｲﾊｯﾄ(ｵｰﾌﾟﾝ)*/ $p{n44,}/*ﾍﾟﾀﾞﾙﾊｲﾊｯﾄ*/ $H{n42,}/*ﾊｲﾊｯﾄ(ｸﾛｰｽﾞ)*/ $k{n36,}/*ﾊﾞｽﾄﾞﾗ1*/ $K{n35,}/*ﾊﾞｽﾄﾞﾗ2*/ $s{n38,}/*ｽﾈｱ1*/ $w{n40,}/*ｽﾈｱ2*/ $M{n43,}/*ﾛｰﾀﾑ1*/ $m{n41,}/*ﾛｰﾀﾑ2*/ $J{n47,}/*ﾐﾄﾞﾙﾀﾑ1*/ $j{n45,}/*ﾐﾄﾞﾙﾀﾑ2*/ $U{n50,}/*ﾊｲﾀﾑ1*/ $u{n48,}/*ﾊｲﾀﾑ2*/ $B{n56,}/*ｶｳﾍﾞﾙ*/ $G{n53,}/*ﾗｲﾄﾞﾍﾞﾙ*/ $F{n51,}/*ﾗｲﾄﾞｼﾝﾊﾞﾙ1*/ $R{n59,}/*ﾗｲﾄﾞｼﾝﾊﾞﾙ2*/ $C{n49,}/*ｸﾗｯｼｭｼﾝﾊﾞﾙ1*/ $c{n57,}/*ｸﾗｯｼｭｼﾝﾊﾞﾙ2*/ $D{n52,}/*ﾁｬｲﾅ */ $d{n55,}/*ｽﾌﾟﾗｯｼｭ */ TR(10); Time(0:1:8); CH(10); @(25,90,1); RC(24,80);EV(120,120); Time(1:1:0); TR(20); Time(0:1:8); CH(10); BR(48); BT(0,128,!8); Time(1:1:0); TR(21); Time(0:1:8); CH(10); Time(1:1:0); TR(22); Time(0:1:8); CH(11); @(119,9,0); Vm(120,4,16,0); RC(10,80);EV(120,120); //------------------------------------------------------------------------------ Rythm{(TR(10); //トラックとチャンネルをリズムモード（10）に設定 #S1 = { v.onNote(80,55,85,55); } ) //_ｼｪｲｶｰ {{ (Time(1:1:0)); v(50); l16; [8 rSSr SSrS rSSr SSrS rSSr SSrS rSSr SSrS ] (Time(33:1:0));[8 #S1 rSSr SSrS rSSr SSrS rSSr SSrS rSSr SSrS ] (Time(49:1:0));[8 #S1 SSSS SrSS SSSS SrSS SSSS SrSS SSSS SrSS ] } //_ﾊﾝﾄﾞ (Time(1:1:0)); v(120); l16;[8 rrrr hrrr rrrr hrrr rrrr hrrr rrrr hrrr ] (Time(33:1:0)); [8 rrrr hrrr rrrr hrrr rrrr hrrr rrrr hrrr ] (Time(49:1:0));v100; [8 rrrr hrrr rrrr hrrr rrrr hrrr rrrr hrrr ] (Time(65:1:0));v125; [8 rrrr hrrr rrrr hrrr rrrr hrrr rrrr hrrr ] (Time(81:1:0));v120; [8 rrrr hrrr rrrr hrrr rrrr hrrr rrrr hrrr ] } //_ｵｰﾌﾟﾝ&ｸﾛｰｽﾞﾊｲﾊｯﾄ+α (Time(1:1:0)); v(100); l16; [4 (v.N(90,75,110,60)) [8 HrOp HrOp ] ] (Time(33:1:0));[4 (v.N(90,75,110,60)) [8 HrOp HrOp ] ] (Time(49:1:0));[7 #S; prpr Orpr prpr Orpp prpr Orpr prpr Orpp ]v120; prpr Orpr prpr Orpp prpr Orpr prpr Orpp (Time(65:1:0));[4 (v.N(90,75,110,60)) [8 HrOp HrOp ] ] (Time(81:1:0));[8 #S; prpr Orpr prpr Orpp prpr Orpr prpr Orpp ] 　　　//Track10のライン (TR(20);) //_Cowbell=ｶｳﾍﾞﾙ {{ (Time(1:1:0)); v125; l16; [v125; C0c0d1r1r1r1 C0c0d1 r1r1 v100;C0c0d2 v+5 [ C0c0d4 v+10]] (Time(17:1:0));v127; C0c0d1 (Time(25:1:0));v(127); C0c0d1 (Time(33:1:0)); v125; l16; [v125; C0c0d1r1r1r1 C0c0d1 r1r1 v100;C0c0d2 v+5 [ C0c0d4 v+10]] (Time(49:1:0));v125; c0C4 v-45 [8 c0C0D5 v-10t-1]t(0) (Time(65:1:0));v125; c0C4 v-45 [8 c0C0D5 v-10t-1]t(0) (Time(65:1:0)); l16; v125; C0c0d1 [3 r1 ] v100; C0c0d1^1 v98; C0c0d1 C0c0d2 [ C0c0d4 ] v127; C0c0d0D1 [3 r1 ] v100; C0c0d1^1 v98; C0c0d1 C0c0d2 [ C0c0d4 ] (Time(81:1:0));v127; C0c0d0D1 v-45 [8 c0C0D5 v-10t-1]t(0) (Time(89:1:0));v127; C0c0d0D1 v-45 [8 c0C0D5 v-10t-1]t(0) (Time(97:1:0));v125; C0c0d0D1 v-45 [8 c0C0D5 v-10t-1]t(0) } //_Cowbell=ｶｳﾍﾞﾙ (Time(1:1:0)); v125;l16; [4 [14G4] G8G4 G8 ] (Time(25:1:0)); [ [7G4]r4[6G4] G8G4 G8 ] (Time(33:1:0)); [4 [14G4] G8G4 G8 ] (Time(49:1:0)); v100; [8 RRrr RrRr rRRr RrRr RRrr RRrr RrRR RrRR ] (Time(49:1:0)); v110;[4 [14G4] G8G4 G8 ] (Time(65:1:0)); [8 [8 G4 ] ] }//Track20まで (TR(21);) //_ｷｯｸ(ﾊﾞｽﾄﾞﾗ)+ﾀﾑ系 {{ (Time(1:1:0)); v(120); l16; [4 [15 k4 ] k8k8 ] [7r1] v(60);[24 k48v+2] k0K8.k0K8.k0K8 v(120); [[7 K4 ]r4 [6K4] K8K4K8] (Time(33:1:0));v(125); (p%(128);)[7 k4][k8] [4k4] [3(p%(128);)K8(p%(-768);)[4k0K48][r48]](p%(4000);)[12k0K96] r8 (p%(128);)[7 k4][k8] [4k4] [(p%(-256);) [ K8 ] (p%(4000);) [6 K0k48 ]:r8 ] (p%(8000);)[12 K0k96 ] (p%(128);)[7 k4][k8] [4k4] [3(p%(128);) K8 (p%(1028);)[4 K0k64 ] r16 ](p%(4000);)[12k0K96]k8 (p%(128);) [6k4] k8k4k8| [8k0K8][8k0K16][12k0K48](p%.T(8000,-8000,!8.);)[10k0K48]r24 (Time(49:1:0));(RC(120,120)v100;p%.T(-512,-2460,!1*8);) k1 (Time(63:1:0));(RC(120,120);p%.T(-8000,8000,!1*2);) (Time(65:1:0));(RC(20,80);p%(128);)v(120); [4[7 K4 ]r4 : [6K4] K8K4K8] [8K8][8K16][12K48](p%(2490);)[12K48] (Time(81:1:0));(RC(20,80);p%(128);) } //_ｽﾈｱ(ｺﾞｰｽﾄ) (Time(1:1:0)); v(60); l16; (Time(49:1:0)); [8 rrwr wwrw rwwr wrrr rrwr wwrw rwwr wrrr ] }//Track21まで }//Rythmまで TR(22); CH(11); //ﾊﾞｽﾄﾞﾗ（Elec-Dr） Time(1:1:0);BR=24 [8 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ] p%=0;RC(120,120); v75 o1 "g0"b0f1 Time(33:1:0);p%=0;o4;RC(10,80); [7 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ][8g8][8g16][12g48]p%(2490);[12g48] Time(49:1:0);p%(0);v100; MidiDelayS( [6 "brrr rrfr "brrr frrr "brrr rrfr "brrr frrr ] ) "brr"b "brfr "brr"b frfr "brr"b "brfr "brff frff "brr"b "brfr "brr"b frfr "brff "brff "bfff v120;[8 "b0"e32 v-3 t-1] l16;t(0); Time(63:1:0); BR(24);p%.T(-0,8160,!1*2);o6 REV(60); [7 "g^gg ] g^g^ Time(65:1:0);p%=0;RC(120,120); v100 o1 "g0"b0f1 Time(81:1:0);p%=0;RC(10,80);o4;v120 [4 g^^r g^^r g^^r g^^r g^^r g^^r g^g^^rg^ : g^^r g^^r g^^r g^^r g^^r g^^r "a0drr"a0drr"a0dr ] [8g8][8g16][12g48]p%(2490);[12g48] Time(97:1:0);p%=0;RC(120,120); v80 o1 "g0"b0f1 //_ﾄﾗｯｸｽﾍﾟｰｽ = 基本設定 = ------------------------------------------------------------------------------------------------- TR(01); CH(01); Time(0:2:16); Tempo(90); @(082,110,0); RC( 2, 36); Vm(100,3,16,0); q(050); P(096); EV(105,105); // TR(02); CH(02); Time(0:2:16); @(088, 0,0); RC( 12, 36); Vm(100,3,16,0); q(050); P(032); EV(105,115); // TR(03); CH(03); Time(0:2:16); @(039, 0,0); RC( 20, 88); Vm(100,3, 8,0); q(050); P(064); EV(110,120); // TR(04); CH(04); Time(0:2:16); @(039, 08,0); RC( 0, 80); Vm(110,3, 2,0); q(088); P(064); EV(110,120); // TR(05); CH(05); Time(0:2:16); @(081, 08,0); RC(120, 0); Vm(120,7, 8,0); q(098); P(024); EV( 90,120); // TR(06); CH(06); Time(0:2:16); @(082,110,5); RC(100,100); Vm( 98,6, 8,0); q(098); P(064); EV(100,110); // TR(07); CH(07); Time(0:2:16); @(082,110,0); RC(100,100); Vm( 98,6, 8,0); q(098); P(064); EV(100,110); // TR(08); CH(08); Time(0:2:16); @(001, 90,0); RC(120, 0); Vm(100,6, 1,0); q(050); P(064); EV(100,100); // TR(09); CH(09); Time(0:2:16); @(097, 0,0); RC( 20, 80); Vm(120,3,16,0); q(075); P(025); EV(120,120); // TR(12); CH(12); Time(0:2:16); @(109, 0,0); RC( 20, 80); Vm(120,3,16,0); q(075); P(102); EV(120,120); // TR(13); CH(13); Time(0:2:16); @(001,0,0); RC(0,0); Vm(0,0,0,0); q(098); P(064); EV(100,100); // TR(14); CH(14); Time(0:2:16); @(001, 0,0); RC(100, 80); Vm(120,5, 1,0); q(098); P(064); EV(120,120); // TR(15); CH(15); Time(0:2:16); @(001, 0,0); RC(100, 80); Vm(120,5, 1,0); q(098); P(064); EV(120,120); // TR(16); CH(16); Time(0:2:16); @(001, 0,0); RC(100, 80); Vm(120,5, 1,0); q(098); P(064); EV(120,120); // //_ﾄﾗｯｸｽﾍﾟｰｽ2 = 各種設定 = ------------------------------------------------------------------------------------------------ TR(1); CH(1); Int TKC = (0) // Time(1:1:0); TK(TKC);BR=48 Tempo(194); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] Time(17:1:0); TK(TKC);o7;v50;EV(100,70);RC(120,36); P.N(0,127,64,64,127,0) Slur(0);MidiDelayS( [ [4 "erre "e&`err a"g&gr r"arr ]] ) EV(105,105);v+10 [[8 rre&"e rrer ]] Time(33:1:0); TK(TKC);o3;v100;P(096);RC(2,36); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] Time(65:1:0); TK(TKC-1);l8;[[4 e^er] [ c^cr ] [ g^gr ] [4c^cr] [d^dr ][e-^e-r] ] Time(81:1:0); TK(TKC);l16; [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] //------------------------------------------------------------------------------ TR(2) ;CH(2); // Time(1:1:0); TK(TKC);BR=48 [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] Time(17:1:0); TK(TKC);o7;v50;EV(100,70);RC(120,36); P.N(127,0,64,64,0,127) Slur(0);MidiDelayS( [ [4 "erre "e&`err a"g&gr r"arr ]]) EV(105,115);v+10 [[8 rre&"e rrer ]] Time(33:1:0); TK(TKC);o3;v100;P(032);RC(12,36); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] Time(65:1:0); TK(TKC-1);l8; [[4 re^e ] [ rc^c ] [ rg^g ] [4rc^c] [rd^d ][re-^e-] ] Time(81:1:0); TK(TKC); l16; [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] //------------------------------------------------------------------------------ TR(3); CH(3); // Time(1:1:0); TK(TKC); [[8 [4 "ge^e16&"g16 ]] ] Time(17:1:0); RC(120,88); Time(33:1:0); TK(TKC); RC(20,88); [8 [4 "ge^e16&"g16 ]] Time(65:1:0); TK(TKC-1); [8 [4 "ge^e16&"g16 ]] Time(81:1:0); TK(TKC); [8 [4 "ge^e16&"g16 ]] //------------------------------------------------------------------------------ TR(4); CH(4); // Time(1:1:0); TK(TKC); EP.WR(25,90,!8,90,25,!8); CHO.WR(10,120,!4);REV.WR(0,45,!4);P.WR(127,0,!16,0,127,!16); TK(TKC); Unison({ [12 [7e4] b4 ] },-12) Time(33:1:0); TK(TKC); Unison({ [8 [7e4] b4 ] },-12) Time(49:1:0); TK(TKC-1); Unison({ [8 [7e4] b4 ] },-12) Time(65:1:0); TK(TKC-1); Unison({ [8 [7e4] b4 ] },-12) Time(81:1:0); TK(TKC); Unison({ [8 [7e4] b4 ] },-12) //------------------------------------------------------------------------------ TR(5); CH(5); // Time(1:1:0);Slur(1); TK(TKC); CD( 2 ,127,60,!2,0,!2);P.N(0,127,64,64,127,0); v.Random(15); TK(TKC); MidiDelayS( [4 `c1^1^1^2a2 ] `c4^1^1^1 ) Time(33:1:0); TK(TKC); MidiDelayS( [4 `c1^1^1^2a2] `c4^1^1^2 ) Time(49:1:0); TK(TKC); MidiDelayS( [4 `c1^1^1^2a2 ] `c4^1^1^2 ) Time(81:1:0); TK(TKC); MidiDelayS( [4 `c1^1^1^2a2 ] `c4^1^1^1 ) //------------------------------------------------------------------------------ TR(6); CH(6); // Time(1:1:0); TK(TKC); P.N(0,127,64,127,0,64); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(17:1:0); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(33:1:0); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(49:1:0);@82,110,3 l1;EV(80,80); TK(TKC-1); P(64); Sub{o3 v82 [4 e^cd | c^"a"b] } Sub{o4 [4 e^cd | c^"a"b] } //Bass Sub{o6 v98 [4 e^c^ | "a^"b^ ] } Sub{o6 v98 [4 `c^b^ | a^b^] } Sub{o6 v114 [4 a g2a2 e0g f0`e | a d2f#2 b0g `d0a ] t(0) } Time(81:1:0); TK(TKC-2);EV(100,80); @49,90,1 Sub{o4; Unison({ [4 e1^1^1^2 g2 ] EPC(100,0,!1^1^1^1); e1^1^1^1 },-12) } o6; [4 "g0"b0e1^1^1^2 "b0d0g2 ]"g0"b0e1^1^1^1 /* l8; [ MidiDelayS( "a0a^^"a0a a^'ae'^ "a0a^^^ ) "aega | MidiDelayS( c0`c^^c0`c `c^'`ca'^ c0`c^^^ ) caf+d MidiDelayS( "g0g^^"g0g g^'gd'^ "g0g^^^ ) gaec : MidiDelayS( "e0e^^"e0e e^'ed'^ "e0e^^^ ) eafg ] MidiDelayS( "e0e^^"e0e e^'ed'^ "e0e^^^ e ) ab`e Sub{o2; Unison({[4 a1`c1a1g2d4e4 ]},24) }o6;[4 c0e0a1 e0a0`c1 c0e0a1 c0e0g2 "g0"a0d4 "g0"b0e4 ] */ //------------------------------------------------------------------------------ TR(7); CH(7); // Time(1:1:0); TK(TKC); P.N(127,0,64,0,64,127); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(17:1:0); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(33:1:0); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(49:1:0); l8; TK(TKC-1); P.N(64,96,32,44,84,103,24); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(65:1:0); [ v100 [16 `a`e v-8] : v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [6 `a`e v-10] `g`g v92 `f#`d`e | `f#4^8`g^4 `f`e `d`c`d`e2 Time(81:1:0); TK(TKC-2); [ v100 [16 `a`e v-8] v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4 ] v100 [16 `a`e v-8] /* Sub{o3 v82 [4 e^cd | c^"a"b] } Sub{o4 [4 e^cd | c^"a"b] } //Bass Sub{o6 v98 [4 e^c^ | "a^"b^ ] } Sub{o6 v98 [4 `c^b^ | a^b^] } Sub{o6 v114 [4 a g2a2 e0g f0`e | a d2f#2 b0g `d0a ] t(0) } */ //------------------------------------------------------------------------------ TR(8); CH(8); // Time(1:1:0); TK(TKC); Time(33:1:0); TK(TKC-1); @39,8,0 l16;BR(36);o7; P.N(64,96,32,44,84,103,24); [ v80;p%.T(-8000,0,!1*2,8000,0,!1*2); MidiDelayS([8 ee"br v+4][8 ee"br v-5]) v100;p%.T(-8000,0,!1*2,8000,0,!1*2); MidiDelayS([8 cc"gr v+2] [8 cc"gr v-3]) ] [ v80;p%.T(8000,0,!1*3,200,-4000,!1); MidiDelayS([8 ee"br v+4][8 ee"br v-5]) v100;p%.T(-2000,4000,!1*2,8000,0,!1*2); MidiDelayS([8 cc"gr v+2] [8 cc"gr v-3]) TK(TKC-1); ] Time(81:1:0);TK(TKC+3); @39,8,0 l16;BR(36);o7; P.N(64,96,32,44,84,103,24); [ v80;p%.T(8000,0,!1*3,200,-4000,!1); MidiDelayS([8 ee"br v+4][8 ee"br v-5]) v100;p%.T(-2000,4000,!1*2,8000,0,!1*2); MidiDelayS([8 cc"gr v+2] [8 cc"gr v-3]) ] //------------------------------------------------------------------------------ TR(9); CH(9); // Time(1:1:0); TK(TKC); Time(49:1:0); TK(TKC-1); l16;o6; @82,1,0 q50; RC(10,10);EV(90,90); P.N(0,127,64,64,0,127); [ MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e ) `ebag MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e^ ) gab ] Time(65:1:0); TK(TKC-1); l16;o6; @82,1,0 q50; RC(10,10);EV(105,105); P.N(0,127,64,64,0,127); [ MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e ) `ebag MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e^ ) gab ] //------------------------------------------------------------------------------ TR(12); CH(12); // Time(1:1:0); TK(TKC); Time(49:1:0); TK(TKC-1); l16;o6; @82,90,1 q50; RC(10,10);EV(90,90); P.N(127,0,64,64,127,0); [ MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e ) `ebag MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e^ ) gab ] Time(65:1:0); TK(TKC-1); l16;o6; @82,90,1 q50; RC(10,10);EV(105,105); P.N(127,0,64,64,127,0); [ MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e ) `ebag MidiDelayS( [4 e^^`e^b^g : e^^`e^a^b ] e^^e^ ) gab ] //------------------------------------------------------------------------------ Str SE_0 = {@(120,0,0); P.WR(24,106,!16,106,24,!16); p%.T(0,-6000,!1); V.T(30,127,!2.); '`c1g1e1' } Str SE_0h = {@(120,0,0); P.WR(24,106,!16,106,24,!16); p%.T(0,6000,!1); V.T(30,127,!2.); '`c1g1e1' } Str SE_0R = {@(120,0,0); P.WR(106,24,!16,24,106,!16); p%.T(0,-6000,!1); V.T(30,127,!2.); '`c1g1e1' } Str SE_01 = {@(120,0,0); P.WR(24,106,!16,106,24,!16); V.T(15,127,!4.); '`c2g2e2' } Str SE_02 = {@(120,0,0); P.WR(24,106,!16,106,24,!16); V.T(15,127,!8.); '`c4.g4.e4.' } Str SE_02h = {@(120,0,0); P.WR(24,106,!16,106,24,!16); V.T(15,127,!16); '`c4g4e4' } Str SE_02h4 = {@(120,0,0); P.WR(24,106,!16,106,24,!16); V.T(15,127,!16); '`c8.g8.e8.' } Str SE_03 = { @81,8,0; o7; BR(12); PC( 2 ,28,106,!4,88,!8,!12 ); p%.T(0,$250,!4, $250,-$2000,!8 ); `e8.r16e2 r16 p%(0); } Str SD_1 = { P(64); v125;o4;l1; @(126,8,0); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); } Str SD_1h = { P(64); v125;o4;l1; @(126,8,0); BR(20); Sub{ [p.T(0,127,!4,127,0,!8); r4. ]} a0e1^1 p(64); } Str SD_2 = { P(64); o3;l1; BR(20); V.T(0,100,!8,98,30,!1*4); p.T(127,0,!1^1^1^1); f0c1^1^1^1 r4 p(64); } Str SE_1 = { P.T(24,106,!1^1^1^1); V.T(75,115,!1*3,115,0,!1*5); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1^1^1^1^1 p(64); } Str SE_2 = { P.T(106,24,!1^1^1^1); V.T(100,127,!1,127,10,!1*5); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); } Str SE_3 = { RC(20,88); o7; EPC(120,100,!1*4); P(64); P.T(106,24,!1^1^1^1); BR(38); p.T(127,0,!1^1^1^1); Po(on,64); ``f4 [86 ``f32 t-1] [36 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*4); } Str SE_4 = { p.T(0,127,!1^1^1^2,127,0,!2); P.T(24,106,!1^1^1^1); Po(on,64); ``f4 [96 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); } Str SE2_1 = { P.T(106,24,!1^1^1^1); V.T(75,115,!1*3,115,0,!1*5); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1^1^1 [ r1 ] p(64); } Str SE2_2 = { P.T(24,106,!1^1^1^1); V.T(100,127,!1,127,10,!1*5); @(126,9); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); [4 r1 ] } Str SE2_3 = { RC(20,88); o7; EPC(120,100,!1*4); P(64); P.T(24,106,!1^1^1^1); BR(38); p.T(127,0,!1^1^1^1); Po(on,64); ``f4 [86 ``f32 t-1] [36 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*4); } Str SE2_4 = { p.T(0,127,!1^1^1^2,127,0,!2); P.T(106,24,!1^1^1^1); Po(on,64); ``f4 [96 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); } Function BRL(X){ @(127,110,1); Sub{ [(X) P.T(20,104,!2.,98,30,!2.); r1r2 ] } MidiDelayS( [(X) rrg ^rg ara rrg ^ra rcf ] ) } //------------------------------------------------------------------------------ TR(13); CH(13); // SE等 Time(1:1:0); //------------------------------------------------------------------------------ TR(14); CH(14); // SE等 Time(1:1:0); BR(48); Time(1:1:0); o8;v98; @126,0,0 SE_1 Time(17:1:0); o8;v60; @126,0,0 SE_1 Time(25:1:0); o8;v90; @126,8,0 SE_1 Time(33:1:0); o8;v98; @126,0,0 SE_1 Time(41:1:0); o8;v110; @126,8,0 SE_1 Time(45:1:0); o5;v120; @126,7,0 SE_2 Time(49:1:0); o8;v75; @123,5,0 SE_1 Time(61:1:0); o5;v100; @126,7,0 SE_2 Time(65:1:0); o8;v98; @126,0,0 SE_1 Time(69:1:0); o5;v100; @126,7,0 SE_2 Time(73:1:0); o8;v110; @126,8,0 SE_1 Time(77:1:0); o5;v120; @126,7,0 SE_2 Time(81:1:0); o8;v100; @126,0,0 SE_1 Time(89:1:0); o8;v110; @126,8,0 SE_1 Time(97:-1:48); o8;v75; @123,6,0 SE_1 //------------------------------------------------------------------------------ TR(15); CH(15); // SE等 Time(1:1:0); Time(16:1:0); BR(24);SE_0h Time(24:1:0); BR(24);SE_0h Time(32:1:0); BR(48);o7;SE_0 Time(40:1:0); BR(24);SE_0h Time(48:1:0); o3;BR(36);SE_0h Time(64:1:0); o3;BR(36);SE_0h Time(72:1:0);o5; BR(24);SE_0h Time(80:1:0); BR(48);o8;SE_0 Time(88:1:0);o5; BR(24);SE_0h Time(96:1:0);o5; BR(24);SE_0h //------------------------------------------------------------------------------ TR(16); CH(16); // SE等 Time(1:1:0); Time(16:1:0); BR(24);SE_0h Time(24:1:0); BR(24);SE_0h Time(32:1:0); BR(48);o7;SE_0 Time(40:1:0); BR(24);SE_0h Time(48:1:0); o3;BR(36);SE_0h Time(64:1:0); o3;BR(36);SE_0h Time(72:1:0);o5; BR(24);SE_0h Time(80:1:0); BR(48);o8;SE_0 Time(88:1:0);o5; BR(24);SE_0h Time(96:1:0);o5; BR(24);SE_0h //------------------------------------------------------------------------------