//_------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.37)
//_------------------------------------------------------------------------------
MetaText      = {" Charon… = II = ( Frozen DeepSea ) = Trance "};
                                         //↑:タイトル
Copyright     = {" ＭＭ GMで作成中 Ver.3.35 "};              //著作権表示
//_一応、曲の説明？-----------------------------------------------------------------------------------
/*…オリジナル(以後:自) 作曲　投稿 No.17 … 暫定完了 

                     　          [ Charon… = II = ( Frozen DeepSea ) ]                       

  ※ 説明欄が長くなりました…すみません(汗; 
     ...ですので読むのが面倒だなぁ…と思う方は説明欄を飛ばして下さい（汗；

　初めての御方は「初めまして、宜しくお願い致します」 m(_ _)m 

  皆様、こんにちは、[ ＭＭ(えむえむ) ]と言う者です。
  そして、ダウンロードして頂き誠に有り難うございます m(_ _)m 


　今回は、サイケデリックな世界を目指した [ カロン（Charon…）] の続編みたいのをつくってみました♪ 

  気持ち的には「本格的なトランス!!」…のつもりだったのですが、やっぱりゲーム音楽になっちゃったような
気も致します… (^^; < R*3様やさくらもどき様みたいな音の様には上手くいかない様で…

　…と言うより、音全体がテクノチックに… ｱｾｱｾ(;=;д;=;)ﾀﾞﾗﾀﾞﾗ

　前作は「悲愴の深海」と言う題目でしたが、今回は「次第に押し黙り行く深海の凍て付く景色」を想像してみま
した。
　…こういう続編モノって何か色々想像してしまうので、楽しいですね♪
  次回、また新たに続編を作る時は、ハードコア系とか、ドラムン系とか、色々挑戦してみたいです♪
  ジャンル系列ならトランスコアになるのかな？（笑 


  まだまだ処理の仕方といい、音色の付け方といい、拙い部分は有り、展開や終わり方がざっくりとした感じに
なってしまいましたが、楽しく聴いて頂けたら作り手としては本当に嬉しい限りです

　それでは、お粗末ながらも長文の御説明を最後まで御付き合いして頂き、誠に有難う御座います m(_ _ )m

　　　これで、失礼致します!! (´・ω・`)ﾉｼ



《 更新記録 》
    ・2012/ 2/ 5  … 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); @(27,90,0); RC(4,60);EV(120,120); Time(1:1:0);
TR(20); Time(0:1:8); CH(10); BR(48); BT(0,-512,!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,0,0); Vm(110,3,16,0); RC(120,120);EV(120,120);

//------------------------------------------------------------------------------

Rythm{(TR(10); //トラックとチャンネルをリズムモード（10）に設定
       #S1 = { v.onNote(80,55,85,55); }
	 )
	 
//_ｼｪｲｶｰ
    {{ 
 (Time(1:1:0)); l16; 
	(v.N(50,40,55,40);) [16 [ SSSS SrSS ] ]
 (Time(17:1:0)); (v.N(50,40,55,40);) [8 [ rSSr SSrS ] ]
 (Time(49:1:0)); (v.N(70,50,75,55);) [8 [ SrSr SrSS ] ]
 (Time(65:1:0)); (v.N(70,50,75,55);) [8 [ rSSr SSrS ] ]
 (Time(73:1:0)); (v.N(70,50,75,55);) [8 [ rSSr SSrS ] ]
 
	}
//_ﾊﾝﾄﾞ
 (Time(1:1:0)); v(100); l16; [8 v100;[3r4] h4 [3r4] v100;h8v-40h8 ] 
 (Time(17:1:0)); [8 v100;[3r4] h4 [3r4] v100;h8v-40h8 ] 
 (Time(49:1:0)); [8 v100;[3r4] h4 [3r4] v100;h8v-40h8 ] 
 (Time(65:1:0)); [8 v100;[3r4] h4 [3r4] v100;h8v-40h8 ] 
 (Time(81:1:0)); [4 v100;[3r4] h4 [3r4] v90;h8v-40h8 ] 
 
	}
//_ｵｰﾌﾟﾝ&ｸﾛｰｽﾞﾊｲﾊｯﾄ+α
 (Time(1:1:0)); v(100); l16;
	#S1; [ [8 HrHr HrHH ] ] | [ [8 HHHr : HrHr ] HHHr ]
 (Time(17:1:0)); [ [8 #S1; ppHr ppHr ppOr ppHr ] ]
 (Time(49:1:0)); [ [8 #S1; ppOr ppOr ppOr ppOr ] ]
 (Time(65:1:0)); (v.N(70,50,78,55);)[ [ HpOr HpOr HrOr HrOr : HpOr HpOr HOrO OrOO ]  HrOr HrOr OOrO rOOO ]
 (Time(73:1:0)); [ [8 #S1; ppOr ppOr ppOr ppOr ] ]
 
　　　//Track10のライン
      (TR(20);) 
//_ｼﾝﾊﾞﾙ
    {{
 (Time(1:1:0)); v(110); l16;
 (Time(1:1:0)); c0Cv-20D1 (Time(17:1:0));v110; c0Cv-20D1 (Time(33:1:0));v90; c0Cv-20D1
 (Time(41:1:0));v100; c0Cv-20D1 (Time(49:1:0));v125; c0Cv-20D1 (Time(65:1:0));v125; c0Cv-20D1
 (Time(77:1:0));(RC(100,0));v125; c0C4 v-45 [8 c0C0D5 v-10t-1]t(0) (Time(81:1:0));(RC(12,60));v125; c0Cv-20D1
 
	}
//_ﾍﾞﾙ
 (Time(1:1:0)); v(110); l16;
 (Time(17:1:0)); [4[8 (v.N(88,70)) F0R4 : F0R4 ] [ G0F0R8 ] ]
 (Time(65:1:0)); [4[8 (v.N(88,70)) F0R4 : F0R4 ] [ G0F0R8 ] ]
 
	}//Track20まで
	(TR(21);) 
//_ｷｯｸ(ﾊﾞｽﾄﾞﾗ)+ﾀﾑ系
    {{
 (Time(1:1:0)); v(120); l16;[7 [15 k4 ] k8k8 ] v80[16 k8v+2] [16kv-1][3k0K8:[3k0K24v+1]] k0K8 [12k0K64v-1]
 (Time(33:1:0));v(80); [16 K4 v-4]
 (Time(37:1:0));v(10); [16 k4 v+4] 
 (Time(41:1:0));v(80); [4[6 k8 ] kkkk]
 (Time(49:1:0)); v(120); l16;[7 [15 k4 ] k8k8 ] v(127); k1
 (Time(81:1:0)); [16 k4 v-4][16 k8 v+3] [16kv-1] [3k0K8:[3k0K24v+1]] k0K8 [12k0K64v-1]
 
	}
//_ｽﾈｱ(ｺﾞｰｽﾄ)
 (Time(1:1:0)); v(75); l16; [ [8 r4s4r4r4 ] ]
 (Time(17:1:0)); v(95); l16; [ [8 r4s4r4r4 ] ]
 (Time(33:1:0)); v(10); [3 [6 s8 v+1] ss ss ] [[s8] [9 s64] r12 ] 
 (Time(37:1:0)); [3 [6 s8 v+1] ss ss ] [3s8:[3s24v+1]] s8 [12s64v-1]
 (Time(41:1:0)); [3 [6 s8 v+1] ss ss ] [3s8:[3s24v+1]] s8 [12s64v-2]
 (Time(45:1:0)); v52[48sv+1] [20s32] [5s24r24v+2]
 (Time(49:1:0)); v(95); l16; [ [8 r4s4r4r4 ] ]
 
	}//Track21まで
	}//Rythmまで
TR(22); CH(11); //ﾊﾞｽﾄﾞﾗ（Elec-Dr）
  Time(1:1:0); 
  Time(33:1:0); o2; @119,9,0 BT(0,-8000,!1); "g0c0g1 RC(120,120);EV(120,120); 
  Time(81:1:0); o2;v80 @119,9,0 BT(0,-8000,!1); "g0c0g1 RC(120,120);EV(120,120); 
  Time(81:1:0); o2;v120 @119,9,0 BT(0,-8000,!1); "g0c0g1 RC(120,120);EV(120,120); 
  

//_ﾄﾗｯｸｽﾍﾟｰｽ = 基本設定 = -------------------------------------------------------------------------------------------------

 TR(01);  CH(01);  Time(0:2:16); Tempo(90); @( 90, 0,0); RC( 52,00); Vm(98,5, 1,24); q(099); P(064); EV(100,100); // 
 TR(02);  CH(02);  Time(0:2:16);            @(082,90,1); RC( 24,00); Vm(80,5, 1,24); q(099); P(000); EV(100,100); // 
 TR(03);  CH(03);  Time(0:2:16);            @(049,90,1); RC( 24,00); Vm(80,5, 1,24); q(099); P(127); EV(100,100); // 
 TR(04);  CH(04);  Time(0:2:16);            @(082, 1,0); RC(120,10); Vm(80,8,16,48); q(098); P(064); EV(100,100); // 
 TR(05);  CH(05);  Time(0:2:16);            @(040,16,0); RC(120,10); Vm(80,8,16,48); q(098); P(064); EV(100,100); // 
 TR(06);  CH(06);  Time(0:2:16);            @(036, 0,0); RC(100, 0); Vm(104,4,8,64); q(098); P(064); EV(100,100); // 
 TR(07);  CH(07);  Time(0:2:16);            @(036, 0,0); RC(120, 0); Vm(088,4,16,0); q(098); P(064); EV(100,100); // 
 TR(08);  CH(08);  Time(0:2:16);            @(040,16,0); RC(20,120); Vm(108,4, 8,0); q(075); P(064); EV(110,110); // 
 TR(09);  CH(09);  Time(0:2:16);            @(039, 0,0); RC(80,120); Vm(120,3, 8,0); q(075); P(064); EV(120,120); // 
 TR(12);  CH(12);  Time(0:2:16);            @(001,90,0); RC(120, 0); Vm(100,6,1,0); q(050); P(064); EV(100,100); // 

 TR(13);  CH(13);  Time(0:2:16);            @(001,90,0); RC(120, 0); Vm(100,6,1,0); q(050); P(064); EV(00,100); // 
 TR(14);  CH(14);  Time(0:2:16);            @(001,0,0); RC(0,0); Vm(0,0,0,0); q(098); P(064); EV(100,100); // 
 TR(15);  CH(15);  Time(0:2:16);            @(120,  0,0); RC(100,120); Vm(125,6, 1, 0); q(098); P(064); EV(120,120); // 
 TR(16);  CH(16);  Time(0:2:16);            @(120,  0,0); RC(100,120); Vm(125,6, 1, 0); q(098); P(064); EV(120,120); // 
 
//_ﾄﾗｯｸｽﾍﾟｰｽ2 = 各種設定 = ------------------------------------------------------------------------------------------------
TR(1); CH(1); // 
   Time(1:1:0); Tempo(138); TK=-3 
   	Sub{o3 v82 [4 e^cd | c^"a"b]  } Sub{o4 [4 e^cd | c^"a"b] } //Bass
	Sub{o5 [4 e^c^ | "a^"b^ ] } Sub{o5 [4 `c^b^ | a^b^]  } 
	Sub{o5 v104[4 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] } 
   Time(33:1:0);V.T(100,75,!1*4,75,105,!1*4);
   	Sub{o3 v82 e^^^^^^^   } Sub{o4 e^^^^^^^  } //Bass
	Sub{o5 e^^^^^^^ } Sub{o5 `c^^^ ^^^^   } 
   	Sub{o5 v104[4 ag2a2  ] } 
   Time(41:1:0);EP.T(100,0,!1*7);o6; c^^^ ^^^^
   Time(48:2:24); TC(138,69,!2);
   Time(49:1:0); Tempo(138); TK=-1 RC(52,00);  EP.T(45,82,!4);
   	Sub{o3 v82 [4 e^cd | c^"a"b]  } Sub{o4 [4 e^cd | c^"a"b] } //Bass
	Sub{o5 [4 e^c^ | "a^"b^ ] } Sub{o5 [4 `c^b^ | a^b^]  } 
	Sub{o5 v104[4 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] } 
   Time(81:1:0);EP.T(82,0,!1*8);
   	Sub{o3 v82 e^^^^^^^ } Sub{o4 e^^^^^^^ } //Bass
	Sub{o5 e^^^^^^^ } Sub{o5`c^^^^^^^ } 
	Sub{o5 v104 [4ag2a2] } 
   

//------------------------------------------------------------------------------
TR(2) ;CH(2); // 
   Time(1:1:0); TK=-3 EP.WR(30,105,!1,105,30,!1);
   	Sub{o3 [4 e^cd | c^"a"b]  } Sub{o4 [4 e^cd | c^"a"b] } //Bass
	Sub{o5 [4 e^c^ | "a^"b^ ] } Sub{o5 [4 `c^b^ | a^b^]  } 
	Sub{o5 [4 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] } 
   Time(33:1:0); V.T(55,105,!1*16); EP(100);
   	Sub{o3 v82 e^^^^^^^   } Sub{o4 e^^^^^^^  } //Bass
	Sub{o5 e^^^^^^^ } Sub{o5 `c^^^ ^^^^ } 
   	Sub{o5 v104[4 ag2a2  ] } 
   Time(41:1:0);EP.T(100,0,!1*7);o6; c^^^ ^^^^
   Time(49:1:0) TK=-1 RC(24,00);  EP.T(45,90,!4);
   	Sub{o3 [4 e^cd | c^"a"b]  } Sub{o4 [4 e^cd | c^"a"b] } //Bass
	Sub{o5 [4 e^c^ | "a^"b^ ] } Sub{o5 [4 `c^b^ | a^b^]  } 
	Sub{o5 [4 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] } 
   Time(81:1:0);EP.T(90,0,!1*8);
   	Sub{o3 v82 e^^^^^^^ } Sub{o4 e^^^^^^^ } //Bass
	Sub{o5 e^^^^^^^ } Sub{o5`c^^^^^^^ } 
	Sub{o5 v104 [4ag2a2] } 

   	

//------------------------------------------------------------------------------
TR(3); CH(3); //
   Time(1:1:0); TK=-3 EP.WR(30,105,!1,105,30,!1);
   	Sub{o3 [4 e^cd | c^"a"b]  } Sub{o4 [4 e^cd | c^"a"b] } //Bass
	Sub{o5 [4 e^c^ | "a^"b^ ] } Sub{o5 [4 `c^b^ | a^b^]  } 
	Sub{o5 [4 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] } 
   Time(33:1:0); V.T(55,105,!1*16);EP(100);
   	Sub{o3 v82 e^^^^^^^   } Sub{o4 e^^^^^^^  } //Bass
	Sub{o5 e^^^^^^^ } Sub{o5 `c^^^ ^^^^ } 
   	Sub{o5 v104[4 ag2a2  ] } 
   Time(41:1:0);EP.T(100,0,!1*7);o6; c^^^ ^^^^
   Time(49:1:0); TK=-1 RC(24,00); EP.T(45,90,!4);
   	Sub{o3 [4 e^cd | c^"a"b]  } Sub{o4 [4 e^cd | c^"a"b] } //Bass
	Sub{o5 [4 e^c^ | "a^"b^ ] } Sub{o5 [4 `c^b^ | a^b^]  } 
	Sub{o5 [4 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] } 
   Time(81:1:0);EP.T(90,0,!1*8);
   	Sub{o3 v82 e^^^^^^^ } Sub{o4 e^^^^^^^ } //Bass
	Sub{o5 e^^^^^^^ } Sub{o5`c^^^^^^^ } 
	Sub{o5 v104 [4ag2a2] } 

//------------------------------------------------------------------------------
TR(4); CH(4); // 
   Time(1:1:0); TK=-3 BR=48 P.N(127,0,64,64,0,127) 
	Slur(0);[[8 rre&"e rrer ]  [8 rrd&"d rrdr ] ]
   Time(17:1:0);[ [4 erer r"e&`er rr`a&a arar ] [4 drdr r"d&`dr rr`g&g grgr ] ]
   Time(33:1:0);[[8 rre&"e rrer ]] 
   Time(49:1:0);TK=-1 Slur(0);[ [4 erer r"e&`er rr`a&a arar ]  [4 drdr r"d&`dr rr`g&g grgr ] ] 
   [[8 rre&"e rrer ]  [8 rrd&"d rrdr ] ] MidiDelayS( [8"erre "e&`err a"g&gr r"arr] )
   

//------------------------------------------------------------------------------
TR(5); CH(5); //
   Time(1:1:0); TK=-3 BR=48 P.N(0,127,64,64,127,0)
	Slur(0);[[8 rre&"e rrer ]  [8 rrd&"d rrdr ] ]
   Time(17:1:0);[ [4 erer r"e&`er rr`a&a arar ] [4 drdr r"d&`dr rr`g&g grgr ] ]
   Time(33:1:0);[[8 rre&"e rrer ] ] 
   Time(49:1:0);TK=-1 Slur(0);[ [4 erer r"e&`er rr`a&a arar ]  [4 drdr r"d&`dr rr`g&g grgr ] ] 
    [[8 rre&"e rrer ]  [8 rrd&"d rrdr ] ] MidiDelayS( [8"erre "e&`err a"g&gr r"arr] )
   
   
//------------------------------------------------------------------------------
TR(6); CH(6); //
   Time(1:1:0); TK=-3 BR=24; [4 e1^1c1g1 | c1^1d1d#1 ]
   Time(33:1:0); BR=60;	[4 e1^1^1^1 ] 
   Time(49:1:0); TK=-1 BR=24 [4 e1^1c1g1 | c1^1d1d#1 ]
   

//------------------------------------------------------------------------------
TR(7); CH(7); //
   Time(1:1:0); TK=-3 BR=24 P.N(64,96,32,44,84,103,24);
	Slur(1); o8 [[4 r2 [8 e32&""e32 ] ] | [4 r2 [8 c32&""c32 ] ] ]
   Time(17:1:0); Slur(1);Sub{o8 [[4 r2 [8 e32&""e32 ] ] | [4 r2 [8 c32&""c32 ] ] ] } o9[[8 rre&"e rrer ]  [8 rrd&"d rrdr ] ] 
   Time(33:1:0);@82,110,4 BR=48 EP=50
   	[ o9; v60;p%.T(8000,0,!1*3,200,-4000,!1); MidiDelayS([8 ee"b^ v+4][8 ee"b^ v-5]) 
	  o5; v60;p%.T(-2000,4000,!1*2,8000,0,!1*2); MidiDelayS([8 cc"g^ v+2] [8 cc"g^ v-3]) ]
   Time(49:1:0);@36,0,0 EV(100,100);v92; TK=-1 BR=24 P.N(64,96,32,44,84,103,24);
   	Slur(1); o8 [[4 r2 [8 e32&""e32 ] ] | [4 r2 [8 c32&""c32 ] ] ]
   Time(65:1:0); 
   	[ 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(8); CH(8); //  
   Time(1:1:0); TK=-3 [4[4 re^e ] [ rc^c ]  [ rg^g ] [4rc^c] [rd^d ][re-^e-] ]
   Time(49:1:0); TK=-13 [4[4 re^e ] [ rc^c ]  [ rg^g ] [4rc^c] [rd^d ][re-^e-] ]
   Time(81:1:0);[4[4 e^er]] 

//------------------------------------------------------------------------------
TR(9); CH(9); // 
   Time(1:1:0); TK=-3 EP.WR(30,125,!8.); // BR(4); p%.WR(0,-1280,!8);
	[4[4 e^er] [ c^cr ]  [ g^gr ] [4c^cr] [d^dr ][e-^e-r] ] 
   Time(49:1:0);TK=-1 EP.WR(30,125,!8); [4[4 e^er] [ c^cr ]  [ g^gr ] [4c^cr] [d^dr ][e-^e-r] ] 
   Time(81:1:0);[4[4 e^er]]
   
   
//------------------------------------------------------------------------------
TR(12); CH(12); //
   Time(1:1:0); TK=-3;@36,0,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]) ]
   Time(17:1:0); 
   	[ 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]) ]
   Time(33:1:0);EP.T(45,120,!1*16);@1,90,0;o6;  MidiDelayS( [8 e0a0`c4.e0a0`c4. e0g0b4 ] )
   Time(41:1:0);MidiDelayS( [15 e0a0`c8.e0a0`c8. e0g0b8 ] )EP.T(105,0,!2);MidiDelayS(  e0a0`c8.e0a0`c8. e0g0b8 )
   Time(49:1:0);l1;@39,8,0 TK=-1 RC(120,0); EP.T(0,0,!2,00,100,!2.);V=100 q98 
   	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(13); CH(13); Time(1:1:0); 
   	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); }
//------------------------------------------------------------------------------
TR(13); CH(13); // 
   Time(1:1:0); @100,0,0
   Time(49:1:0); RC(64,120);TK=-1  EP.T(0,0,!2,0,85,!2.); V=90 q98 
   	Sub{o3 v92 [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 ag2a2 e0g f0`e | a d2f#2 b0g `d0a  ] t(0) } 
   Time(81:1:0);@1,16,0;RC(120,120); o6 v114 Sub{o6 v98 [4 e^ ]  } Sub{o6 v98 [4 `c^ ] } o6[4 ag2a2 ] 

//------------------------------------------------------------------------------
TR(14); CH(14); // SE等 
   Time(1:1:0); 
   	
	

//------------------------------------------------------------------------------
TR(15); CH(15); // SE等 
   Time(1:1:0); 
   Time(16:2:0);v110 BR(48);o3 SE_0h 
   Time(32:2:-8);v110 BR(48);o3 SE_0h 
   Time(48:3:-10);v120 BR(48);o3 SE_0h 
   Time(64:2:-10);v120 BR(48);o7 SE_0 
   Time(76:3:0);v120 BR(48);o8 SE_02 
   Time(80:2:-10);v120 BR(48);o7 SE_0 
   Time(88:2:-10);v120 BR(48);o3 SE_0 

//------------------------------------------------------------------------------
TR(16); CH(16); // SE等 
   Time(1:1:0); 
   Time(16:2:0);v100 BR(48);o3 SE_0h 
   Time(32:2:-8);v110 BR(48);o3 SE_0h 
   Time(48:3:-10);v110 BR(48);o3 SE_0h 
   Time(64:2:-10);v110 BR(48);o7 SE_0 
   Time(76:3:0);v110 BR(48);o8 SE_02 
   Time(80:2:-10);v110 BR(48);o7 SE_0 

//------------------------------------------------------------------------------



