//_------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.37)
//_------------------------------------------------------------------------------
MetaText      = {" Charon… ( Full Remake & Long,Ver ) = Psychedelic-Trance "};
                                        //↑:タイトル
Copyright     = {" ＭＭ     GMで作成中 Ver.3.35 "};              //著作権表示
//_一応、曲の説明？----------------------------------------------------------------------------------
/* …オリジナル(以後:自) 作曲　投稿 No.12 … 暫定完了 

                              [ Charon… ( Full Remake & Long,Ver ) ]                                 

  ※ 注意 ※
  説明欄が長くなりました…すみません(汗; ...ですので読むのが面倒だなぁ…と思う人は説明欄を飛ばして
も構いませんし、削除しても構いません。

　初めての御方は「初めまして、宜しくお願い致します」 m(_ _)m 

  皆様、こんにちは、ご無沙汰しておりました、[ ＭＭ(えむえむ) ]と言う者です。
  そして、ダウンロードして頂き誠に有り難うございます m(_ _)m 

  ＭＭは生きております…生きておりましたが、震災の影響は少なかったのですが他の所で色々と良くない事が
起きてしまいました…今は大分落ち着いて普段の生活に戻ってます。
　
  震災の影響で大変な被害を逢われ、そして亡くなられた方々に心からお悔やみ申し上げます…
  言葉でしか返せないのが申し訳の無い気持ちで沢山なのですが…少なからずですが私も義援金や募金等を行っ
てきました。

　早く日本が良くなる事を願いつつ、湿っぽい話は一旦おきまして、曲の説明に入ろうと思います m(_ _;)m

  今回は、自作曲の[ Charon… ]を[ ＴＷＭ２ ]で[ フルリメイク ]してみました。
  時事的には少し不謹慎かもしれませんが、よりサイケデリックな世界観を目指してみました。
  それに伴って、原曲にアレンジを加えて、長くしてみましたが…最後は何かやけっぱちになってしまったように
も感じます…伸ばそうか区切ろうか…もっと凝らしたアウトローにした方が良いか…等々、思っている内に、何か
収拾がつかなくなってきました…ゴメンナサイ... m(_ _;)m
　やっぱり、最後はもう…、詰めすぎたかな…と思います (=д=;)> 
  何かパッとフレーズが浮かんだら改作していこうと思います。
  …と言う、これ以上上手く表現出来なかったよ…、と言う、言い訳を言ってみました（苦笑;
  
  まだまだ処理の仕方といい、音色の付け方といい、拙い部分は有り、展開や終わり方がざっくりとした感じに
なってしまいましたが、楽しく聴いて頂けたら作り手としては本当に嬉しい限りです

　それでは、お粗末ながらも長文の御説明を最後まで御付き合いして頂き、誠に有難う御座います m(_ _ )m

　　　それでは、失礼致します!! (´・ω・`)ﾉｼ



《 更新記録 》
    ・2011/06/05  … Ver.3.25 一先ず全体の流れが出来上がり、通常版より長めで仕上がっています
    				      ( 通常版 … [ 2:00〜3:30 ] を目安に作っております )
                              細かい修正もしたけど…どうでしょうか？ (汗; 

《 その他 》
  	・使用音源等 … 「ＴＷＭ２ ( 推奨 ) 」・ ヘッドホン ( Victor社の[ HP-RX500 ] ) で制作
				出来れば、イヤホンやヘッドホンで聴いて頂けると嬉しいです
				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){ PitchBend.onTime(UD1,UD2,L,0,0,1); } // ベントを簡単に纏めておく(時間指定) 
	Function BNW(UD1,UD2,L){ PitchBend.onNoteWave(UD1,UD2,L,0,0,1); } // ベントを簡単に纏めておく(ノート毎) 

	Function TC(TC1,TC2,VT){ TempoChange(TC1,TC2,VT); } //ﾃﾝﾎﾟﾁｪﾝｼﾞ(今のﾘｽﾞﾑ,変えたいﾘｽﾞﾑ,掛かる時間)
	Function VC(Vh1,Vt1,Vh2,Vt2){ M.onNoteWave(0,Vh1,Vt1,Vh1,Vh2,Vt2); } //ﾋﾞﾌﾞﾗｰﾄの掛かり具合(Vhは大きさ,Vｔは掛かる時間)

	Function EPC(Ep1,Ep2,Et1){ EP.onTime(Ep1,Ep2,Et1); }
	 /*複合IF関数が上手くいかなかったので(CDの方)、個別に書きました
	   <(;^^)関数は難しいやw。
	   こちらはｸﾚｯｼｪﾝﾄﾞの役割を担う命令文*/

	Function CD(Int a ,Ep1,Ep2,Et1,Ep3,Et2,Es){
	/*aはIfの判断,複合有か無か
	  Epは音の大きさ,Etは掛かる時間*/
	 IF ( a = 1 )
	     { EP.onNoteWave(Ep1,Ep2,Et1); }
	   Else
	     { EP.onNoteWave( Ep1,Ep2,Et1, Ep2,Ep2,Es, Ep2,Ep3,Et2 ); } }
	     　　　　　　　　　　　//EPで所謂、擬似的な音の掛け具合を作る(一定型)

      Function PC(Int a ,Pp1,Pp2,Pt1,Pp3,Pt2,Ps1){
	/*aはIfの判断,複合有か無か
	  PpはPの向き,Ptは移動時間,Psは停滞時間*/
	 IF ( a = 1 )
	     { P.onTime(Pp1,Pp2,Pt1); }
	   Else
	     { P.onTime( 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*/ 
  $Y{n27,}/*ﾊｲﾀﾑ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(5,0);EV(120,120); Time(1:1:0);
TR(20); Time(0:1:8); CH(10); BR(24); BT(0,-250,!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,48); RC(120,120);EV(120,120);

//------------------------------------------------------------------------------

Rythm{(TR(10); //トラックとチャンネルをリズムモード（10）に設定
       #S1 = { v.onNote(80,55,85,55); }  #S2 = { v.onNote(50,35,55,35); } 
	 #S4 = { v.onNote(40,25,37,22); } 
	 )
	 
//_ｼｪｲｶｰ
    {{ 
 (Time(1:1:0)); v(10); l16; [8 rrSr rrSS rrSr rrSS  rrSr rrSS rrSr rrSS v+8]
 (Time(17:1:0));v(64); [8 rSSr SSrS rSSr SSrS  rSSr SSrS rSSr SSrS ] 
 (Time(49:1:0));v(64); [8 rSSr SSrS rSSr SSrS  rSSr SSrS rSSr SSrS ] 
 (Time(65:1:0));v(64); [8 SrSr SrSS SrSr SrSS  SrSr SrSS SrSr SrSS ]
 (Time(81:1:0));v(64); [8 rSSr SSrS rSSr SSrS  rSSr SSrS rSSr SSrS ] 
 (Time(129:1:0));(v.N(72,50,70,46);)l16; [8 SrSr SrSS SrSr SrSS  SrSr SrSS SrSr SrSS  ] 
 (Time(145:1:0));[[ (v.N(65,45,60,46);) [ SrSr : SrSS ] v(50); S4
 	 		  (v.N(65,45,60,46);) [ SrSr : SrSS ] : v(40); S4 ] SrSS ] 
 (Time(153:1:0));(v.N(72,50,70,46);)l16; [8 SrSr SrSS SrSr SrSS  SrSr SrSS SrSr SrSS  ] 
 
	}
//_ﾊﾝﾄﾞ
 (Time(1:1:0)); v(100); l16;
 (Time(17:1:0)); [8 [4 r4h4 ] ]
 (Time(49:1:0)); [8 [4 r4h4 ] ]
 (Time(65:1:0)); [4 [7 r4h4 ] r4h8h8 ]
 (Time(81:1:0)); [4 [7 r4h4 ] r4h8h8 ]
 (Time(117:1:0)); [3 [7 r4h4 ] r4h8h8 ] 
 (Time(129:1:0)); [4 [7 r4h4 ] r4h8h8 ] 
 (Time(145:1:0)); v(90); [[8 r4 : h8r8 ]  h^hr ] 
 (Time(153:1:0)); /*v(110); [[8 r4 : h8r8 ]  h^hr ] [ [4 v(105); h8. v-6 h8. v-6 h8  v100;h4 : rrhr ] hhrh ] */ 
 	[4 [7 r4h4 ] r4h8h8 ] 
 
	}
//_ｵｰﾌﾟﾝ&ｸﾛｰｽﾞﾊｲﾊｯﾄ+α
 (Time(1:1:0)); v(100); l16; 
 (Time(17:1:0)); (v.N(88,75,90,70);)[4 [8 ppHr ] ] 
 (Time(25:1:0)); (v.N(88,75,90,70);)[4 [8 ppOr ] ] 
 (Time(49:1:0)); [16 [4 #S2; : HrO^ ] H^OO ]
 (Time(65:1:0)); #S1; [8 [8 ppHr ] ]
 (Time(81:1:0)); [ #S1; [4 ppO^ ppO^ prOr prOr : ppO^ ppO^ prOO pO^O ] ppOr ppOr OOrO OrOO ]
 (Time(113:1:0)); [16 [4 #S2; : HrO^ ] H^OO ]
 (Time(129:1:0)); [12 [4 #S1; : HrO^ ] H^OO ] 
 (Time(145:1:0)); [4 [3[4 #S1; : HrO^ ] O^^r ] | [4 #S2; : HrO^ ] H^OO ] [8 [4 #S1; : HrO^ ] H^OO ]
 
　　　//Track10のライン
(TR(20);) 
//_ｼﾝﾊﾞﾙ〜
    {{
 (Time(1:1:0)); v(70); l16;
 (Time(16:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(17:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(24:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(25:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(48:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(49:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(56:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(57:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(64:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(65:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(80:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(81:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(89:1:0)); v(125); C0D0d1 
 (Time(96:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(97:1:0)); v(125); C0D0d1
 (Time(105:1:0)); v(100); C0D0d1 
 (Time(128:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(129:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(141:1:0)); v(125); C0D0d1
 (Time(144:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(145:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(152:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(153:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(161:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 (Time(168:1:0)); r2 l48v48 [24 O v+4t-1] l16;t0;  
 (Time(169:1:0)); v(125); C0D0d1 v-45 [8 C0D5 v-10t-1] t(0); 
 
	}
//_何かアクセントにチョイ足し
 (Time(1:1:0)); v(70); l16;
 (Time(65:1:0)); v(75); [ [8 r4 : G0dr8. v+5] G0d^G0dr  [8 r4 : G0dr8. v-5] G0d^G0dr ] 
 (Time(65:1:0)); v(50); [ [8 r4 : sr8. v+5] s^sr  [8 r4 : sr8. v-5] s^sr ] 
 (Time(97:1:0)); v(75); [ [8 r4 : Yr8. v+5] Y^Yr  [8 r4 : Yr8. v-5] Y^Yr ] 
 (Time(105:1:0)); v(40); [ [8 r4 : G0dr8. v+5] G0d^G0dr  [8 r4 : G0dr8. v-5] G0d^G0dr ] 
 (Time(145:1:0)); v(60); [ [8 r4 : G0dr8. v+5] G0d^G0dr  [8 r4 : G0dr8. v-5] G0d^G0dr ] 
 
	}//Track20まで
(TR(21);) 
//_ｷｯｸ(ﾊﾞｽﾄﾞﾗ)+ﾀﾑ系
    {{
 (Time(1:1:0)); l16; v(30); (Sub){ [64 k4 v+1] }
 (Time(17:1:0)); [8 [7 k4 ] k8k8 ] 
 (Time(33:1:0)); l16; v(30); [4 [3 k4 v+1][ k8 v+1][3 k4 v+1] [4 k v+1] ] [ [7 k8k8 v+1 ] : [4 k v+1] ] [ [6 k96 ] r ]
 (Time(45:1:0)); [32 k ] (REV.T(5,100,!1^1);CHO.T(0,50,!1^1); BR(48); p%.T(-250,-8000,!1.,-8000,200,!2);) [48 K48K48  v-1]
 (Time(49:1:0)); (BR(24); RC(5,0); p%(-250);)  (Sub){ v(110); [8 K1r1r1r1 ] } [8v(115); [7 k4 ] k8k8 ]  
 (Time(65:1:0)); v110; [4 k8.k8.k8 k4. rkkr  k8.k4 k32k32k8 k48k48k48k8. k8.k8.k8 k4 r [ k32]k8.k8.kk k4kk rk32k32k32k32r  ]
 (Time(81:1:0)); [8 v(115); [7 k4 ] k8k8 ]  
 (Time(97:1:0));(RC(60,0);) k1 
 (Time(105:1:0));(RC(60,0);)v(100); k1
 (Time(117:1:0));(RC(08,20);)v(115); [6 [7 k4 ] k8k8 ] 
 (Time(129:1:0));v(115); [6 [7 k4 ] k8k8 ] 
 (Time(145:1:0));v(125); [ [3 [3 k^^r ] r4 ] | [4 : k^^r ] : k^k^ ] kkkk
 (Time(153:1:0));v(120); [6 [7 k4 ] k8k8 ] (RC(60,0);) k1
  /* [ [3 [3 k^^r ] r4 ] | [4 : k^^r ] : k^k^ ] kkkk  [ [4 v(120); k8. v-5 k8. v-5 k8 v100 k4 v125 : kkrk ] kkkk ] */
 (Time(169:1:0)); v(100);(RC(100,0);) [ [7 k4 v-8] k8k8 ] 
 
 	}
//_ｽﾈｱ(ｺﾞｰｽﾄ等)
 (Time(1:1:0)); v(55); l16;
 (Time(144:1:0)); r2 l32v32 [16 s v+4t-1] l16;t0; 
 (Time(152:1:0));v(80); r2 l32v32 [16 s v+4t-1] l16;t0; 
 (Time(153:1:0));
 
 
 /*[ rrsr ssrs rssr srrr  rrsr ssrs rssr srrr ] r1r1r1r1
   [ (v.N(92,80,90,78);) [ rwwr wrwr rwwr wrrr :  rwwr wrwr rwwr wrrr ] v90 ssrs rrsr srrr v90[12 s48 v+2t-1]t(0) ]  */
 
 
	}//Track21まで
	}//Rythmまで
TR(22); CH(11); //ﾊﾞｽﾄﾞﾗ（Elec-Dr）
  Time(1:1:0);
  Time(47:1:0); EPC(60,110,!1*2); BR(36);p%.T(-8160,8160,!1*2); REV(60); [7 "g^gg ] g^g^
  Time(97:1:0); BR(32);v=65 [4[7 r4g4 ] r4g8g8 ] 
  
  
  

//_ﾄﾗｯｸｽﾍﾟｰｽ = 基本設定 = -------------------------------------------------------------------------------------------------

 TR(01);  CH(01);  Time(0:2:16); Tempo(90); @(082,110,0); RC(  2, 36); Vm(100,3,16,0); q(075); P(096); EV(100,100); // 
 TR(02);  CH(02);  Time(0:2:16);            @(088,  0,0); RC( 12, 36); Vm(100,3,16,0); q(075); P(032); EV(100,100); // 
 TR(03);  CH(03);  Time(0:2:16);            @(039,  0,0); RC( 20, 88); Vm(100,3, 8,0); q(050); P(064); EV(100,100); // 
 TR(04);  CH(04);  Time(0:2:16);            @(082,  1,0); RC(  0, 80); Vm(110,3, 2,0); q(088); P(064); EV(100,100); // 
 TR(05);  CH(05);  Time(0:2:16);            @(005, 00,0); RC(120,  0); Vm(120,7, 8,0); q(098); P(024); EV(100,100); // 
 TR(06);  CH(06);  Time(0:2:16);            @(081,  8,0); RC(120,  0); Vm(120,6, 1,0); q(098); P(106); EV(100,100); // 
 TR(07);  CH(07);  Time(0:2:16);            @(005, 00,0); RC(120, 64); Vm(120,7, 8,0); q(098); P(040); EV(100,100); // 
 TR(08);  CH(08);  Time(0:2:16);            @(082,090,1); RC(100,100); Vm( 98,3, 1,0); q(098); P(064); EV(100,100); // 
 TR(09);  CH(09);  Time(0:2:16);            @(097,  0,0); RC( 20, 80); Vm( 72,3,16,0); q(075); P(025); EV(100,100); // 
 TR(12);  CH(12);  Time(0:2:16);            @(109,  0,0); RC( 20, 80); Vm( 82,3,16,0); q(075); P(102); EV(100,100); // 
 
 TR(13);  CH(13);  Time(0:2:16);            @(001,  0,0); RC( 10, 88); Vm(120,5, 1,0); q(098); P(064); EV(100,100); // 
 TR(14);  CH(14);  Time(0:2:16);            @(001,  0,0); RC( 10, 88); Vm(120,5, 1,0); q(098); P(064); EV(100,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(100,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(100,100); // 

//_ﾄﾗｯｸｽﾍﾟｰｽ2 = 各種設定 = ------------------------------------------------------------------------------------------------
TR(1); CH(1); Int TKC = (0) // TKC = (χ) の χ をイジるとお好みのキーに変えられます♪  本家のキーは [ 0 ] です♪ 
   Time(1:1:0); Tempo(145); TK(TKC); 
   Time(9:1:0); V.T(30,105,!1*32); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]   
   Time(17:1:0); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]   
   Time(33:1:0); V.T(30,105,!1*16); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(49:1:0); v75; [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(65:1:0); TK(TKC-2); v75; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] | v80; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] 
   Time(81:1:0); TK(TKC); v75; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] | v80; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] 
   Time(97:1:0); V.T(30,105,!1*16); [8 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(129:1:0); Tempo(142); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(145:1:0); CD( 2 ,75,110,!2,65,!4.,!8 );q98 Unison({ [ a1`c1g1f+2d4e4 ] },-12) 
   Time(153:1:0); EV(100,105);q75; [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
	/* [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] */

//------------------------------------------------------------------------------
TR(2) ;CH(2); // ﾍﾞｰｽ
   Time(1:1:0); TK(TKC); 
   Time(9:1:0); V.T(30,105,!1*32); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]   
   Time(17:1:0); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(33:1:0); V.T(30,105,!1*16); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]   
   Time(49:1:0); v80; [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(65:1:0); TK(TKC-2); v80; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] | v80; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] 
   Time(81:1:0); TK(TKC); v80; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] | v80; [ [4 [ e^e^^ : e^e ] : e^d ] efg ] 
   Time(97:1:0); V.T(30,105,!1*16); [8 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
   Time(129:1:0); [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] 
   Time(145:1:0); CD( 2 ,75,110,!2,65,!4.,!8 );q98; Unison({ [ a1`c1g1f+2d4e4 ] },-12)
   Time(153:1:0); EV(100,105);q75; [4 [4 [ e^e^^ : e^e ] : e^d ] efg ]  
	/* [4 [4 [ e^e^^ : e^e ] : e^d ] efg ] */
   	

//------------------------------------------------------------------------------
TR(3); CH(3); //　ﾍﾞｰｽ
   Time(1:1:0); TK(TKC); 
   Time(17:1:0); v.Random(15);Slur(0); P.N(40,64,88,88,64,40);
   	[ EPC(30,105,!1^1^1); [8 [4 "ge^e16&"g16 ]] ]
   Time(49:1:0);  [8 [4 "ge^e16&"g16 ] ] 
   Time(65:1:0); TK(TKC-2); [4 [4 "ge^e16&"g16 ] ]  [4 [4 "ge^e16&"g16 ] ] 
   Time(81:1:0); TK(TKC); [4 [4 "ge^e16&"g16 ] ]  [4 [4 "ge^e16&"g16 ] ] 
   Time(113:1:0); TK(TKC);  EPC(30,105,!1*8); [4 [4 "ge^e16&"g16 ] ]  [4 [4 "ge^e16&"g16 ] ] 
   Time(129:1:0); TK(TKC);  EPC(30,105,!1*8); [4 [4 "ge^e16&"g16 ] ] 
   Time(145:1:0);	
   Time(161:1:0); EPC(30,105,!1*8); [4 [4 "ge^e16&"g16 ] ] 
   

//------------------------------------------------------------------------------
TR(4); CH(4); // ﾍﾞｰｽ
   Time(1:1:0); TK(TKC); 
   Time(17:1:0);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); 
	Unison({ [64 e4 ] },-12) 
   Time(49:1:0); V=120 @82,1,0 [64 EP.T(0,120,!8.); e4 ] 
   Time(65:1:0); TK(TKC-2); V=105 @82,110,0 [8 [4 EP.T(0,90,!8.); e4 ] ] [8 [4 EP.T(0,90,!8.); e4 ] ] 
   Time(81:1:0); TK(TKC); V=120 @82,1,0 [8 [7 EP.T(0,90,!8.); e4 ] EP.T(0,90,!8.); c4 ] 
   Time(129:1:0); TK(TKC); V=120 @82,1,0 [8 [7 EP.T(0,90,!8.); e4 ] EP.T(0,90,!8.); c4 ] 
   Time(145:1:0);	EP.WR(25,78,!8,78,25,!8);@82,110,2 o3; [ a2.r4`c2.r4g2.r4 f+2d4e4 ]
   Time(153:1:0);	V=120 @82,1,0 [8 [7 EP.T(0,90,!8.); e4 ] EP.T(0,90,!8.); c4 ] 

//------------------------------------------------------------------------------
TR(5); CH(5); // Melody 
   Time(1:1:0); TK(TKC); 
   Time(17:1:0); CD( 2 ,127,60,!2,0,!2);P.N(0,127,64,127,0,64);   v.Random(15);
      MidiDelayS( [4 `c1^1^1^2a2 ] `c4^1^1^2 )
   Time(49:1:0);o6; 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(65:1:0); 
   	TK(TKC-2); 
   	 v100 [13 `a`e v-8]  MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4  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] 
   Time(81:1:0); v100 
   	TK(TKC); 
   	 v100 [13 `a`e v-8]  MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4  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] 
   Time(97:1:0);
   	 v100 [13 `a`e v-8] MidiDelayS( [4 [4 `a32 v+7 ] ] ) r4  v100 [16 `a`e v-8] 
   Time(129:1:0); v100 o5 @4,0,0 
    EPC(60,120,!1); v.Random(15); P(48); RC(100,30);
    	MidiDelayS( [4 `a`e`a`e`a`e`a`e `a`e`a`e`g`g`f#`d`e `f#4^8`g^4 `f`e `d`c`d`e2 ] ) 
   Time(145:1:0); v-4
   	[ `a`e`a`e`a`e`a `e8^2.r4 `g`d`g`d`g`d`g `f`e`d`c`d `e2 ] 
   Time(153:1:0); EPC(60,120,!1); v100
    	MidiDelayS( [3 `a`e`a`e`a`e`a`e `a`e`a`e`g`g`f#`d `e `f#4^8`g^4 `f`e `d`c`d`e2 ] ) 
	MidiDelayS(    `a`e`a`e`a`e`a`e `a`e`a`e 
			     Sub{ `g`g`f#`d `e `f#4^8`g^4 `f`e `d`c`d`e2 } 
			     	     r``g``d`b`e  ^`cbg^rfec^"a"g"e^^ ) 
   Time(169:1:0); 
   	v100 [16 `a`e v-8] 

   /* [4 `a`e`a`e`a`e`a`e `a`e`a`e`g`g`f#`d`ec
	     `f#4^8`g^4 `f`e `d`c`d`e2 ] */

//------------------------------------------------------------------------------
TR(6); CH(6); // ッポ〜ン…
   Time(1:1:0); TK(TKC-10); 
   Time(17:1:0); CD( 2 ,118,60,!2,0,!2); P.WR(127,0,!8,0,127,!8); 
   	MidiDelayS( [8 `f1^1^1^1 `f1^1^1^1 ] ) 
   Time(81:1:0); MidiDelayS( [8 `f1^1^1^1 `f1^1^1^1 ] ) 
   Time(153:1:0); MidiDelayS( [5 `f1^1^1^1  ] ) 

//------------------------------------------------------------------------------
TR(7); CH(7); // ｷｰﾝとかｺｰﾄﾞとか
   Time(1:1:0); TK(TKC); 
   Time(49:1:0); P.WR(0,127,!4,127,0,!4); v120; MidiDelayS( [4 `c1^1^1^2 a2 ] `c4^1^1^2 ) 
   Time(105:1:0); RC(10,40); 
   	@(051,0,0); v(082); l4; q(098); M(24); P(106); 
   	EPC(20,90,!1*4);V=80 Sub{o4; Unison({ [4 e1^1^1^2 g2 ] EPC(100,30,!1^1^2); e1^1^2 },-12) }  
	o6; [4 "g0"b0e1^1^1^2 "b0d0g2 ] EPC(100,30,!1^1^2); "g0"b0e1^1^2 
   Time(145:1:0);o4; CD( 2 ,75,110,!2,65,!4.,!8 );V=105;  Unison({ [ a1`c1g1f+2d4e4 ] },-12) 
   Time(153:1:0);CD( 2 ,80,102,!2,65,!4.,!8 );
   	Sub{o3; Unison({[4 a1`c1a1g2d4e4 ]},12) }o5;[4 c0e0a1 e0a0`c1 c0e0a1 c0e0g2 "g0"a0d4 "g0"b0e4 ] 
   	 CD( 2 ,75,85,!2,00,!1^1,!16);Sub{o5; c0e0a1^1 }o3;Unison({ a1^1},24) 

	/* [4 EP.T(98,30,!1*4); "g0"b0e1^1^1^2  EP.T(98,30,!1*4) "b0d0g2 ] */

//------------------------------------------------------------------------------
TR(8); CH(8); // ｺｰﾄﾞ
   Time(1:1:0); TK(TKC); 
   Time(105:1:0); TK(TKC); RC(10,40);  
   	@(090,0,0);v(075);V=80 l4; q(098); M(24); P(022); 
   	EPC(20,90,!1*4); Sub{o4; Unison({ [4 e1^1^1^2 g2 ] EPC(100,30,!1^1^2); e1^1^2 },-12) } 
	o5;[4 "b0e1^1^1^2 d0g2 ] EPC(100,30,!1^1^2); "b0e1^1^2
   Time(145:1:0);o3;@(072,0,0); CD( 2 ,75,110,!2,65,!4.,!8 );V=105;  Unison({ [ a1`c1g1f+2d4e4 ] },-12) 
   Time(153:1:0);@(055,0,0); CD( 2 ,75,90,!2,65,!4.,!8 );
   	 Sub{o2; Unison({[4 a1`c1a1g2d4e4 ]},24) }o6;[4 c0e0a1 e0a0`c1 c0e0a1 c0e0g2 "g0"a0d4 "g0"b0e4 ] 
	 CD( 2 ,75,85,!2,00,!1^1,!16); Sub{o6; c0e0a1^1 }o2; Unison({ a1^1 },24) 

   	 /*[4 "g0"b0e1^1^1^2 "b0d0g2 ]
   	[4 c0e0a1 e0a0`c1 c0e0a1 c0e0g2 "g0"a0d4 "g0"b0e4 ] */

//------------------------------------------------------------------------------
TR(9); CH(9); // ちょいっとパカしてみる
   Time(1:1:0); TK(TKC);  EPC(30,80,!1*8); 
	[ 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(49:1:0); RC(2,24);
	[ 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(81:1:0); 
   	l16;o6; @82,1,0 q50; RC(10,10);EV(90,90); P.N(0,127,64,64,0,127); 
	v100; 
	[ 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(97:1:0); RC(100,10); EV(48,90); 
   	[ 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(129:1:0); RC(20,80);o5 @(097,  0,0) EV(54,90); 
   	[ 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(145:1:0); EV(75,95); 
   	[ 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 
   Time(153:1:0); RC(20,80);o5 @(097,  0,0) EV(54,90); 
   	[ 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);  EPC(30,80,!1*8);
   	[ 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(49:1:0); RC(2,24); 
   	[ 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-2); v+25 
   	[ 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 */
   Time(81:1:0);
   	l16;o6; @82,90,1 q50; RC(10,10);EV(90,90); P.N(127,0,64,64,127,0);
	v100; 
	[ 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(97:1:0); RC(100,10); EV(48,90); 
   	[ 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(129:1:0); RC(20,80);o4 @(109,  0,0) EV(54,90); 
   	[ 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(145:1:0);EV(75,95); 
   	[ 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 
   Time(153:1:0); RC(20,80);o4 @(109,  0,0) EV(54,90); 
   	[ 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(13); CH(13); // SE等 
   Time(1:1:0); // SE等の素材置き場♪お好きなSEを色々工夫してみると良いモノが見つかったり無かったり…？（笑  
    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);v(105); 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); v(105); 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,!1^1^1^2.,120,60,!4);q(98); p%.T(8000,-8000,!1*4); "c0"g0c1^1^1^1  } 
   
   
   Time(1:1:0); @(123,2); M(32); TD(2);
   Time(16:1:0); TD(1);
   Time(24:1:48); EP=98; SE_0 Time(32:1:48);BR(48); SE_0 
   Time(45:1:0);@(82,110,0); EPC(45,120,!1*4);BR(48);v98;o4; Up 
   Time(56:1:48);BR(0); SE_0
   Time(65:1:48);BR(0);@(123,2); TD(2); 
   Time(88:1:48); EP=120;BR(36); SE_0h  Time(96:1:48); EP=120;BR(36); SE_0h 
   Time(104:1:48); EP=80;BR(36);o6; SE_0 
   Time(128:1:48); EP=112;BR(48);o6; SE_0 
   Time(140:1:48); EP=112;BR(48);o6; SE_0h Time(144:1:48); EP=110;BR(36);o6; SE_0h 
   Time(152:1:64); EP=114;BR(48);o6; SE_0h 
   Time(153:1:24); V=125 @(123,1);o6;v=96 SE2_1 
   Time(160:1:48); EP=112;BR(48);o6; SE_0h 
   Time(168:1:48); EP=120;BR(48);o6; SE_0h

//------------------------------------------------------------------------------
TR(14); CH(14); // SE等 
   Time(1:1:0); 
   	Str TNM = { CD( 2 ,30,105,!1^1,127,!1,!1 ); P.T( 30,90,!1,90,30,!1,30,90,!1,90,30,!1 ); BT(-$2000,$2000,!1^1^1^1); e0c0"g1^1^1^1 } 
   
   Time(1:1:0); r2 @(123,3); BR(32); TNM 
   Time(8:1:0); TNM  Time(16:1:0); TNM Time(24:1:0); TNM 
   Time(69:1:0); SE2_1 
   Time(77:1:0); BR(48);v120; Up 
   Time(81:1:0); EP=92;BR(36); @(123,3);o6; SE2_1 Time(89:1:0); @(123,3);o6; SE_1 
   Time(97:1:0); @(123,1);o6;v=75 SE_1 
   Time(125:1:0);v=125 V=125 @(123,3,0); BR(32); TNM 
   Time(141:1:0);v=125 V=125 @(123,1,0); o6; SE_1 Time(144:3:0);V.T(85,20,!1^4) 
   Time(149:1:24);v=125 V=125 @(126,7,0); BR(32);o2; v=98; SE2_2
   Time(153:1:0);v=125 V=125 @(123,1,0);o6; SE_1 
   Time(161:1:0);v=125 V=125 @(123,1,0);o6; SE_1 
   Time(169:1:0);v=76 @(123,1,0);o6; SE_1 
   
   

//------------------------------------------------------------------------------
TR(15); CH(15); // SE等 
   Time(1:1:0); @(123,1); BR(32); r1+1+1+1 SE_1
   Time(8:1:0); r1+1+1 SE_1 Time(17:1:0); SE_1
   Time(25:1:0); SE_1 Time(65:1:0); SE_1 
   Time(80:1:48);BR(0); SE_0 
   Time(81:1:0); @(123,1); SE_1  Time(89:1:0); @(123,1); SE2_1 
   Time(97:1:0); @(123,1);o6;v=75  SE2_1 
   
   Time(137:1:0); TK(TKC); p%(0); @(002,0,0); v(110); o4;l8;q(098);M(24);P(072); 
   EPC(45,110,!1); v.Random(15); P(88); RC(100,30);V(104); 
    	[ `a`e`a`e`a`e`a`e `a`e`a`e`g`g`f#`d`e `f#4^8`g^4 `f`e `d`c`d`e2 ] 
   Time(145:1:0); V(115); [ r1 `a`e`a`e`a`e`a`e8^2^8 `d`g `f`e`d`c`d `e2 ] 
   Time(153:1:0); EPC(45,110,!1);V(104); [ `a`e`a`e`a`e`a`e `a`e`a`e`g`g`f#`d`e `f#4^8`g^4 `f`e `d`c`d`e2 ] 
   
   

//------------------------------------------------------------------------------
TR(16); CH(16); // SE等 
   Time(1:1:0); 
   Time(16:1:48);BR(0); EP=98; SE_0 
   Time(48:1:48);BR(12); EP=98; SE_0h Time(64:1:48);BR(0); EP=98; SE_0h 
   Time(129:1:0); TK(TKC); @(005, 00,0); RC(120, 64); Vm(100,7, 8,0); q(098);V=98
   	 P.WR(0,127,!4,127,0,!4); v120; MidiDelayS( [4 `c1^1^1^2 a2 ] `c4^1^1^2 ) 
   Time(153:1:0);MidiDelayS( [4 `c1^1^1^2 a2 ] `c4^1^1^2 ) 
   
   

//------------------------------------------------------------------------------