//_------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.37)
//_------------------------------------------------------------------------------
MetaText = {" Floor Fall-Down Fields = Minimal-Techno "};
//↑:タイトル
Copyright = {" ＭＭ GMで作成 Ver.3.35 "}; //著作権表示
//_一応、曲の説明？--------------------------------------------------------------------------------
/*…オリジナル(以後:自) 作曲 投稿 No.14 … 暫定完了
[ Floor Fall-Down Fields ]
※ 説明欄が長くなりました…すみません(汗;
...ですので読むのが面倒だなぁ…と思う方は説明欄を飛ばして下さい（汗；
初めての御方は「初めまして、宜しくお願い致します」 m(_ _)m
皆様、こんにちは、お久しぶりです、[ ＭＭ(えむえむ) ]と言う者です。
そして、ダウンロードして頂き誠に有り難うございます m(_ _)m
今回はミニマルチックでテクノな感じの曲調を目指してみました♪
………しかし、ミニマルにしては展開し過ぎです!!!!!（笑
...と自分で突っ込んでしまう程、展開し過ぎた気がします…（ｱｾｱｾ;
因みに、[ Floor Fall-Down Fields ] の意味は「フィールドの床下が落ちて行く･･･」と言う意味で、一つ一
つのフロアが色々な場面に変化する様な感じをイメージして作りました
…あれ？落ちているのかな？…落ちている気がしない??･･･うん、きっと気のせいだっ!!
…て、あ～～～れ～～～～～…...（エコー×５） ……ココはドコダ??? 一体ナンダッタンダ???
…おや？床がユレテイル??? ………そして最初に戻り繰り返す
まだまだ処理の仕方といい、音色の付け方といい、拙い部分は有り、展開や終わり方がざっくりとした感じに
なってしまいましたが、楽しく聴いて頂けたら作り手としては本当に嬉しい限りです
それでは、お粗末ながらも長文の御説明を最後まで御付き合いして頂き、誠に有難う御座います m(_ _ )m
これで、失礼致します!! (´・ω・`)ﾉｼ
《 更新記録 》
・2011/11/14 … Ver.3.35 一先ず全体の流れが出来上がり、通常版で少し長め
( 通常版 … [ 2:00～3:30 ] を目安に作っております )
細かい修正もしたけど…どうでしょうか？ (汗;
《 その他 》
・使用音源等 … 「ＴＷＭ２ ( 推奨 ) 」・ ヘッドホン ( Sony社の[ MDR-XD200 ) で制作
出来れば、イヤホンやヘッドホンで聴いて頂けると嬉しいです
Vista使用者は「音割れや無音」にご注意して下さい m(_ _)m
( 自分も[ 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,}/*ｽﾌﾟﾗｯｼｭ */
$A{n30,}/**/ $E{n75,}/**/
TR(10); Time(0:1:8); CH(10); @(25,90,1); RC(8,120);EV(110,120); Time(1:1:0);
TR(20); Time(0:1:8); CH(10); BR(48); BT(0,-768,!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);BR(36);Vm(102,3,16,64); RC(0,64);EV(110,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)); v(75); l16; [8 rSSr SSrS rSSr SSrS rSSr SSrS rSSr SSrS ]
(Time(49:1:0)); v(82); l16; [8 rSSr SSrS rSSr SSrS rSSr SSrS rSSr SSrS ]
(Time(89:1:0)); v(75); l16; [8 rSSr SSrS rSSr SSrS rSSr SSrS rSSr SSrS ]
(Time(105:1:0)); v(75); l16; [8 rSSr SSrS rSSr SSrS rSSr SSrS rSSr SSrS ]
}
//_ﾊﾝﾄﾞ
(Time(1:1:0)); v(100); l16; [4[[4 r4 h4 ] ] [4r1] ]
(Time(33:1:0)); [4[[4 r4 : h4 ] h8h8 ] [[4 r4 : h4 ] h8h8 ]]
(Time(73:1:0)); [4[4 r4 : h4 ] h8h8 ]
(Time(89:1:0)); [4[4 r4 : h4 ] h8h8 ]
(Time(105:1:0)); [4[4 r4 : h4 ] h8h8 ]
(Time(137:1:0)); [4[4 r4 : h4 ] h8h8 ]
}
//_ｵｰﾌﾟﾝ&ｸﾛｰｽﾞﾊｲﾊｯﾄ+α
(Time(1:1:0)); v(100); l16; [[8[4 [ rrH ] rH ]]]
(Time(33:1:0));
[ #S1 [ prpr Orpr prpr Orpp prpr Orpr prpr Orpp ]
[#S1 HrOr HrOr HrOr HrOr : HrOr HrOr HrOr OOrO ] HrOr HrOr OOrO rOOO ]
(Time(49:1:0)); v(100);
[ #S1 [ prpr Orpr prpr Orpp prpr Orpr prpr Orpp ]
[#S1 HrOr HrOr HrOr HrOr : HrOr HrOr HrOr OOrO ] HrOr HrOr OOrO rOOO ]
(Time(73:1:0));[[#S1 HrOr HrOr HrOr HrOr : HrOr HrOr HrOr OOrO ] HrOr HrOr OOrO rOOO ]
(Time(89:1:0)); v(100); [[4 [ rrH ] rH ]] [#S1 HrOr HrOr HrOr HrOr : HrOr HrOr HrOr OOrO ] HrOr HrOr OOrO rOOO
(Time(97:1:0));[3r1] v(0); [48O48v+2][[#S1 HrOr HrOr HrOr HrOr : HrOr HrOr HrOr OOrO ] HrOr HrOr OOrO rOOO ]
(Time(113:1:0)); l12; [16 rOp Orp ]
(Time(137:1:0)); l16; [[#S1 HrOr HrOr HrOr HrOr : HrOr HrOr HrOr OOrO ] HrOr HrOr OOrO rOOO ]
//Track10のライン
(TR(20);)
//_ｼﾝﾊﾞﾙ
{{
(Time(1:1:0)); v(70); l16;[4 [4 r1 ] [ RRrr RrRr rRRr RrRr RRrr RRrr RrRR RrRR ] ]
(Time(33:1:0));[ v(90); [ [8 F0R8G8 ] ] v(84); [ RRrr RrRr rRRr RrRr RRrr RRrr RrRR RrRR ] ]
(Time(113:1:0)); l12;[[16 GFR ]]
}
//_ｼﾝﾊﾞﾙ2
(Time(1:1:0)); v(120); l16;
(Time(33:1:0)); [9 C0c0d1 [3r1] ]
(Time(73:1:0)); [9 C0c0d1 [3r1] ]
(Time(113:1:0)); [10 C0c0d1 [3r1] ]
}//Track20まで
(TR(21);)
//_ｷｯｸ(ﾊﾞｽﾄﾞﾗ)+ﾀﾑ系
{{
(Time(1:1:0)); v(112); l16;
[[8 [8 k4 ] ] ]
(Time(33:1:0)); [ (BT(-768,1280,!16))[[7 K4 ] K8K8 ] (BT(0,-768,!8)) [ [7 k4 ] k8k8 ] ]
(Time(49:1:0)); [ (BT(-768,1280,!16))[[7 k0A0B4 ] E0B8E0B8 ] (BT(0,-768,!8)) [ [7 k4 ] k8k8 ] ]
(Time(65:1:0)); v(125); (BT(1280,-1280,!16)) K1 v0 (BT(0,-768,!8)) [4[7 k4 v+3 ] k8k8]
(Time(73:1:0)); v(112); [4[7 k4 ] k8k8]
(Time(89:1:0)); v(112); [4[7 k4 ] k8k8] v(0); [3r1] (BT(-768,1280,!1.)) [24k48v+3][6 kk48 v-3] v(112);[[7 K4 ] K8K8 ]
(Time(105:1:0)); (BT(0,-768,!8)) [4 [7 k4 ] k8k8 ]
(Time(113:1:0)); [[14 k6k12 ] k12k24k24k6k12k12 ] (BT(1280,-768,!16))v(125); K1
(Time(129:1:0)); v(0);(p%.T(-1028,1280,!8,1280,1280,!2.,-2048,4096,!1*8))
[3 [16 k8 v+2] ] [16 k16 v+1] [16 k32 v-1] [6 kE48 v-3]
(Time(137:1:0)); (BT(0,-768,!8)) [4 [7 k4 ] k8k8 ]
}
//_ｽﾈｱ(ｺﾞｰｽﾄ)
(Time(1:1:0)); v(55); l16; [4[4r1] [ rrwr wwrw rwwr wrrr rrwr wwrw rwwr wrrr ] ]
(Time(29:1:0)); v(10); [3 [16 w16 v+2] ] [8 w16 v+2] [6 wE48 v-3]
(Time(33:1:0)); v(80); l16; [4[4r1] [ rrwr wwrw rwwr wrrr rrwr wwrw rwwr wrrr ] ]
(Time(61:1:0)); v(10); [3 [16 w16 v+2] ] [8 w16 v+2] [6 wE48 v-3]
(Time(69:1:0)); v(10); [3 [16 w16 v+2] ] [8 w16 v+2] [6 wE48 v-3]
(Time(73:1:0)); v(80); [4 rrwr wwrw rwwr wrrr rrwr wwrw rwwr wrrr ]
(Time(85:1:0)); v(10); [3 [16 w16 v+2] ] [8 w16 v+2] [6 wE48 v-3]
(Time(97:1:0)); v(0); [3 [16 w16 v+1] ] [8 w16 v+2] [6 wE48 v-3] v(80); [4 rrwr wwrw rwwr wrrr rrwr wwrw rwwr wrrr ]
(Time(109:1:0)); v(0); [3 [16 w16 v+2] ] [8 w16 v+2] [6 wE48 v-3]
(Time(117:1:0)); v(0); [3 [16 w16 v+2] ] [8 w16 v+2] [6 wE48 v-3]
}//Track21まで
}//Rythmまで
TR(22); CH(11); //ﾊﾞｽﾄﾞﾗ（Elec-Dr）
Time(1:1:0); V.WR(125,60,!8.);BNW(0,-6000,!8); [8 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(17:1:0); BNW(0,-6000,!8); [8 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(33:1:0); BNW(0,-6000,!8); [8 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(49:1:0); BNW(0,-6000,!8); [8 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(73:1:0); BNW(0,-6000,!8); [4 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(89:1:0); BNW(0,-6000,!8); [4 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(101:1:0); BNW(0,-6000,!8); [4 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
Time(121:1:0); BNW(0,-6000,!8); [4 g^^r g^^r g^^r g^^r g^^r g^^r g^^r g^g^ ]
//_ﾄﾗｯｸｽﾍﾟｰｽ = 基本設定 = -------------------------------------------------------------------------------------------------
TR(01); CH(01); Time(0:2:16); Tempo(90); @(040, 00,0); RC( 10,120); Vm(100,3,16,0); q(050); P(064); EV(100,100); //
TR(02); CH(02); Time(0:2:16); @(039, 01,0); RC( 10,120); Vm(100,3,16,0); q(050); P(064); EV(100,100); //
TR(03); CH(03); Time(0:2:16); @(040,008,0); RC( 64, 32); Vm( 98,5,16,0); q(075); P(064); EV(110,120); //
TR(04); CH(04); Time(0:2:16); @(014, 0,0); RC( 00, 80); Vm( 88,4,16,0); q(050); P(024); EV(100,100); //
TR(05); CH(05); Time(0:2:16); @(116, 0,0); RC( 00, 80); Vm( 88,5,16,0); q(050); P(106); EV(100,100); //
TR(06); CH(06); Time(0:2:16); @(081, 8,0); RC( 64, 32); Vm( 65,5, 4,0); q(075); P(064); EV( 98,112); //
TR(07); CH(07); Time(0:2:16); @(049,90,1); RC(10,60); Vm(110,5,1,0); q(098); P(096); EV(080,100); //
TR(08); CH(08); Time(0:2:16); @(082,90,1); RC(10,60); Vm(110,5,1,0); q(098); P(032); EV(080,100); //
TR(09); CH(09); Time(0:2:16); @(001,0,0); RC(0,0); Vm(0,0,0,0); q(098); P(064); EV(100,100); //
TR(12); CH(12); Time(0:2:16); @(001,0,0); RC(0,0); Vm(0,0,0,0); q(098); P(064); EV(100,100); //
TR(13); CH(13); Time(0:2:16); @(127,110,2); RC(100,100); Vm(125,7,64,16); q(098); P(064); EV(120,120); //
TR(14); CH(14); Time(0:2:16); @(001, 0,0); RC( 10, 88); Vm(120,5, 1,0); q(098); P(064); EV(120,100); //
TR(15); CH(15); Time(0:2:16); @(001, 0,0); RC( 10, 88); Vm(120,5, 1,0); q(098); P(064); EV(120,100); //
TR(16); CH(16); Time(0:2:16); @(001, 0,0); RC( 10, 88); Vm(120,5, 1,0); q(098); P(064); EV(120,100); //
//_ﾄﾗｯｸｽﾍﾟｰｽ2 = 各種設定 = ------------------------------------------------------------------------------------------------
TR(1); CH(1); //
Time(1:1:0); Tempo(152); BR(12);P.N(96,32);
[ p%(-1024); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
p%(-516); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(33:1:0);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
p%(-516); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(65:1:0); V.T(30,100,!1*16);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(89:1:0);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(105:1:0);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(121:1:0);
[ p%(512); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(137:1:0);
p%(-1024); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
[8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
//------------------------------------------------------------------------------
TR(2) ;CH(2); //
Time(1:1:0); BR(12);p%(-1024);P.N(32,96);
[ p%(-1024); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
p%(-516); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(33:1:0);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
p%(-516); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(65:1:0); V.T(60,100,!1*16);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(89:1:0);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(105:1:0);
[ p%(0); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(121:1:0);
[ p%(512); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ] ]
Time(137:1:0);
p%(-1024); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
p%(-516); [8 "ee`e"f#"ee`ef#"e`ee`f#"e`eef# ]
//------------------------------------------------------------------------------
TR(3); CH(3); //
Time(1:1:0);BR(0); p%.WR(-1024,-2048,!16);MidiDelayS( [ rr`f#rrrrr`f#rr`f#rrr`f#rrrr`f#rrr`f#r`f# ] )
Time(9:1:0); p%.WR(-516,-1280,!16); MidiDelayS( [ rr`f#rrrrr`f#rr`f#rrr`f#rrrr`f#rrr`f#r`f# ] )
Time(17:1:0); p%.WR(-1024,-2048,!16);MidiDelayS( [ rr`f#rrrrr`f#rr`f#rrr`f#rrrr`f#rrr`f#r`f# ] )
Time(25:1:0); p%.WR(-1024,-2048,!16);MidiDelayS( [ rr`f#rrrrr`f#rr`f#rrr`f#rrrr`f#rrr`f#r`f# ] )
Time(33:1:0); p%.WR(-1024,-2048,!16); l16;
[4 P=64;RC=64,32;EV=110,120; MidiDelayS( [ rr`f#r rrrr `f#rr`f# f#0arr`f# rrrr `f#rrr `f#r`f#r f#0arrr ] )
P.N(64,32,96,88,48,104,24);RC=120,64;EV=92,105 MidiDelayS( [4 f#e"ad f#e"g"a f#e"a"b f#e"g"a ] ) ]
Time(65:1:0); p%.WR(-1024,-2048,!16); l16;
[4 P=64;RC=64,32;EV=110,120; MidiDelayS( [ rrrr rrrr rrrr rrrr rrrr rrrr rrrr f#0arrr ] ) ]
Time(73:1:0); MidiDelayS( [4 rr`f#r rrrr `f#rr`f# f#0arr`f# rrrr `f#rrr `f#r`f#r f#0arrr ] )
Time(89:1:0); p%.WR(-1024,-2048,!16); l16;
[4 P=64;RC=64,32;EV=110,120; MidiDelayS( [ rrrr rrrr rrrr rrrr rrrr rrrr rrrr f#0arrr ] )
P.N(64,32,96,88,48,104,24);RC=120,64;EV=92,105 MidiDelayS( [4 f#e"ad f#e"g"a f#e"a"b f#e"g"a ] ) ]
Time(121:1:0); MidiDelayS( [4 rr`f#r rrrr `f#rr`f# f#0arr`f# rrrr `f#rrr `f#r`f#r f#0arrr ] )
Time(137:1:0); MidiDelayS( [4 rr`f#r rrrr `f#rr`f# f#0arr`f# rrrr `f#rrr `f#r`f#r f#0arrr ] )
//------------------------------------------------------------------------------
TR(4); CH(4); //
Time(1:1:0); BR(12);p%(-1024);
[4 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(33:1:0);p%(0);
[4 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(73:1:0);p%(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(105:1:0);
[ MidiDelayS( [4 "eea`e"ffb`f"f#f#`c`f#"gg`d`g ] ) ]
Time(121:1:0);p%(-512);
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(137:1:0); BR(12);p%(-1024);
[ 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(5); CH(5); //
Time(1:1:0); BR(12);p%(-1024);
[4 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(33:1:0); p%(0);
[4 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(73:1:0);p%(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(105:1:0); p%(-516);
[ MidiDelayS( [4 "eea`e"ffb`f"f#f#`c`f#"gg`d`g ] ) ]
Time(121:1:0);p%(-512);
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(137:1:0); BR(12);p%(-1024);
[ 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(6); CH(6); //
Time(1:1:0); [ BR(12);p%(-1024); [4r1] MidiDelayS( `f#`da`d`f#`da`d`f#`da`d`f#a`d`f# ) ]
Time(17:1:0); [ BR(12);p%(-1024); [4r1] MidiDelayS( `f#`da`d`f#`da`d`f#`da`d`f#a`d`f# ) ]
Time(33:1:0); [4 BR(12);p%(-1024); [4r1] MidiDelayS( `f#`da`d`f#`da`d`f#`da`d`f#a`d`f# ) ]
Time(73:1:0); [[3 l8 MidiDelayS( `f#rr`d rrar `drrr bgad ) ] MidiDelayS( `f#rr`d rrar `drrr ab`c`d ) ]
Time(89:1:0); l8 [ MidiDelayS( [ eg#eg#eadaeg#eg#df#df# ] ) MidiDelayS( [`f#`da`d`f#`da`d`f#`da`d`f#a`d`f# ] ) ]
Time(105:1:0); [ MidiDelayS( [ "eea`e"ffb`f"f#f#`c`f#"gg`d`g ] ) ]
l12; MidiDelayS( [8 `f#`db `f`db`e`ca`dbg ] )
//------------------------------------------------------------------------------
TR(7); CH(7); //
Time(1:1:0);
Time(33:1:0);r4 P.N(127,0,0,127); V.WR(0,110,!8,110,0,!4.); [4[4 "b0e1 ] [4r1]]
Time(65:1:0);P=96 V.T(0,110,!1*8);
Time(73:1:0);P.N(127,0,0,127); V.WR(0,110,!8,110,0,!4.); [4 [16 a0f#2 ] [4r1]]
//------------------------------------------------------------------------------
TR(8); CH(8); //
Time(1:1:0); P.N(0,127,127,0);
Time(33:1:0);V.WR(0,110,!8,110,0,!4.); [4[4 "b0e1 ] [4r1]]
Time(65:1:0);P=32 V.T(0,110,!1*8);
Time(73:1:0);P.N(0,127,127,0); V.WR(0,110,!8,110,0,!4.); [4 [16 a0f#2 ] [4r1]]
//------------------------------------------------------------------------------
TR(9); CH(9); //
Time(1:1:0);
//------------------------------------------------------------------------------
TR(12); CH(12); //
Time(1:1:0);
//------------------------------------------------------------------------------
Function TD(X1){ [(X1) EP.T(76,92,!1^1,92,15,!1^1^1^1 ); [ e0c0"g1^1^1^1 ] ] }
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_03 = { @81,8,0; o7; BR(12); PC( 2 ,28,106,!4,88,!8,!12 );
p%.onTime(0,$250,!4, $250,-$2000,!8 ); `e8.r16e2 r16 p%(0); }
Str SD_1 = { P(64); 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); o4;l1; @(126,8,0); BR(20); Sub{ [p.T(0,127,!4,127,0,!8); r4. ]}
a0e1^1^1^1^1 r16p(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 [ r1 ] 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 = { V(120); 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);
BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); [4 r1 ] }
Str SE2_3 = { V(120); 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); }
Str Up = { P.WR(24,106,!16,106,24,!16);V.T(75,120,!1^1^1^2.,120,60,!4);q(98); p%.T(-8000,8000,!1*4); "c0"g0c1^1^1^1 }
Str Dw = { P.WR(24,106,!16,106,24,!16);V.T(75,120,!4,120,00,!2.^8);q(98); p%.T(0,-6000,!1*2); "c0"g0c1. }
//------------------------------------------------------------------------------
TR(13); CH(13); // SE等
Time(1:1:0);
Str SESS = { @(127,110,01);o7;V.T(30,112,!2.,112,00,!1*9); Sub{ [8 P.T(98,30,!1,20,104,!1); r1r1 ] }
[8 rdbrcar"bgr"ggr"ffr"eer"d"br"c"ar < dbrcar"bgr"ggr"ffr"eer"d"br"c"a < ] }
Time(1:1:0); v92; SESS Time(33:1:0); v120; SESS Time(73:1:0); v120; SESS
Time(89:1:0); v120; SESS Time(121:1:0); v120; SESS Time(137:1:0); v120; SESS
//------------------------------------------------------------------------------
TR(14); CH(14); // SE等
Time(1:1:0); BR(48);
Time(32:1:0); @126,7,0 SE_0 Time(36:1:0); @126,7,0 SE_0h Time(44:1:0); @126,7,0 SE_0h
Time(52:1:0); @126,7,0 SE_0h Time(56:1:0); @126,7,0 SE_0h Time(60:1:0); @126,7,0 SE_0h Time(64:1:48); @126,7,0 SE_0h
Time(72:1:0); @126,7,0 SE_0h Time(88:1:0); @126,7,0 SE_0h Time(100:1:48); @126,7,0 SE_0h Time(104:1:48); @126,7,0 SE_0
Time(112:1:48); @126,7,0 SE_0h Time(144:1:48); @126,7,0 SE_0 Time(152:1:48); @126,7,0 SE_0h
//------------------------------------------------------------------------------
TR(15); CH(15); // SE等
Time(1:1:0);
Time(5:1:0); @126,8,0 SE2_1 Time(13:1:0); @126,8,0 SE_1 Time(21:1:0); @126,8,0 SE2_1
Time(29:1:0);@126,8,0 SE_1 Time(37:1:0);@126,8,0 SE2_1 Time(45:1:0);@126,8,0 SE_1
Time(53:1:0);@126,8,0 SE2_1 Time(61:1:0);@126,8,0 SE_1 Time(69:1:0);@126,8,0 SE2_1
Time(89:1:0);@126,8,0 SE_1 Time(101:1:0);@126,8,0 SE2_1 Time(113:1:0);@126,8,0 SE_1
Time(129:1:0);@126,8,0 SE2_1 Time(133:3:0);@126,7,0 SE_2 Time(137:1:0);@126,8,0 SE2_1
Time(145:1:0);@126,8,0 SE_1
//------------------------------------------------------------------------------
TR(16); CH(16); // SE等
Time(1:1:0); BR(18);
Time(65:1:0);v75;o4; @40,16,0 Dw
Time(109:1:0);v75;o4; @40,16,0 Up
Time(121:1:0);v75;o4; @40,16,0 Dw
//------------------------------------------------------------------------------