//_------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.37)
//_------------------------------------------------------------------------------
TrackName     = {" Dusk of the Prominence ( Prologue-Edition ) = Industrial-Dark-Music "};
                                         //↑:タイトル
Copyright     = {" ＭＭ "};              //著作権表示
MetaText      = {" GMで作成 Ver.3.2 "}         //説明・コメントなど
//_一応、曲の説明？-------------------------------------------------------------------------------
/* …オリジナル(以後:自) 作曲　投稿 No.10 … 暫定完了 

                             [ Dusk of the Prominence ( Prologue-Edition ) ]

 ※ 注意 ※
  初めに言っておきます…説明欄が長くなりました、ですので読むのが面倒だなぁ…と思う人は説明欄を飛ば
しても構いませんし、削除しても構いません。

　初めての御方は「初めまして、宜しくお願い致します」 m(_ _)m 

  皆さんこんにちは、[ ＭＭ(えむえむ) ]と言う者です。
  そして、ダウンロードして頂き誠に有り難うございます m(_ _)m 

　今回は、イメージとしては [ 機械的・宇宙的 ] で [ 黄昏・夕闇に染まり行く ] 様な [ 音楽 ] を…と、
思い描いて作ってみました。直訳したら「 黄昏の紅炎 」となるのですが…曲調が紅くない…のは、燃え尽き
て往く「 盛りを過ぎて終わりに近づこうとする頃 」と言う「 黄昏 」のもう一つの意味合いでこう名付けて
みました。
　序章なのに終わりが来る…て、なんか矛盾していますね（笑 
　お陰様か？全体的に曇った感じに仕上がってしまいました…聴き辛いかと思いますが、何卒宜しくお願い致
します (^^; ｺﾗｺﾗ 

　一応、個人的には我が儘を言うと...うぅん...ジャンルは… 
耳障りの感じるノイジーな作りに所々に機械的にブレイクさせたり、曇らせたり、籠らせたり…等、しているの
で、[ Industrial ] 的な感じで [ 暗めな音楽 ( Black-Music ？ ) ] と言う気持ちなのですが…
　[ Hard-Core ] とか [ Dark-Core ] とかの部類の表記でも良い気が致します（=ω=;)> ｱｾｱｾ 

　まだまだ処理の仕方といい、音色の付け方といい、拙い部分は有り、展開や終わり方がざっくりとした感じに
なってしまいましたが、楽しく聴いて頂けたら作り手としては本当に嬉しい限りです
　それでは、お粗末ながらも長文の御説明を最後まで御付き合いして頂き、誠に有難う御座います m(_ _ )m

　　　それでは、失礼致します!! (´・ω・`)ﾉｼ



《更新記録》
    ・09/07/09 …Ver.3.2 一先ず全体の流れが出来上がり、通常版の序章編…の様な？（笑
    				 ( 通常版 … [ 2:00〜3:30 ] を目安に作っております )
                         細かい修正もしたけど…どうでしょうか？（笑

 《 その他 》
  	・使用音源等 … 「ＴＷＭ２」・ ヘッドホンで制作
				出来れば、イヤホンやヘッドホンで聴いて頂けると嬉しいです
				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 TK(X){ TrackKey=(X) } /* ﾄﾗｯｸｷｰの略 */ 
	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 ] */



//_ﾘｽﾞﾑｽﾍﾟｰｽ------------------------------------------------------------------------------
/*リズムの定義*/

  $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,}/*ｽﾌﾟﾗｯｼｭ   */
  
  $E{n28,}/*slap       */


TR(10); Time(0:1:8); CH(10); @(25,90,1); RC(60,24); Time(1:1:0);
TR(20); Time(0:1:8); CH(10); BR(24); BT(0,-2000,!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(100,4,16,0);

//------------------------------------------------------------------------------

Rythm{(TR(10); //トラックとチャンネルをリズムモード（10）に設定
       #S1 = { v.onNote(80,55,85,55); } #S2 = { v.onNote(48,38,40,35); }
	 )
	 
//_ｼｪｲｶｰ
    {{ 
 (Time(1:1:0)); v(50); l16;
 (Time(89:1:0)); #S2; [8 SrSr SrSS SrSr SrSS  SrSr SrSS SrSr SrSS ] v(58); [8 rSSr SSrS rSSr SSrS  rSSr SSrS rSSr SSrS ] 
 (Time(113:1:0)); #S1; l32; [16 SSSS SSSS SSSS SrSS  SSSS SSSS SSSS SrSS ]

	}
//_ﾊﾝﾄﾞ
 (Time(1:1:0)); v(100); l16;
 	(Sub){ v(120); [8 [r1] r16 E0h^2. ] } 
	[8 [ r1 ] v(100); [6 B6 v-15] ]
 (Time(89:1:0));
	(Sub){ v(120); [14 [ r1 E0h1 ] ] } 
	[18 [ r1 ] v(115); [6 B6 v-15] ] | [ r1 ] v(115); [15 B6 v-8] 

	}
//_ｵｰﾌﾟﾝ&ｸﾛｰｽﾞﾊｲﾊｯﾄ+α
 (Time(1:1:0)); v(100); l16;
 	[ [ Hrrr rrHr HrrH rrHr ] r1 [ HHrr Hrrr HrrH rHrr ] r1 ] 
 (Time(49:1:0)); [7 prpr Orpr prpr Orpp ] prpO OOpr  pOOr pOrO 
 	[ HHOr HrOr HHOr HrOr  HHOr HrOr HOrO OrOO ] 
 	[8 O4 ] [8 O8 ] [16 O ]
 (Time(97:1:0));
 	[ [7 prpr Orpr prpr Orpp ] prpO OOpr  pOOr pOrO ] 
 (Time(113:1:0)); 
 	[ [4 HHOr HrOr HHOr HrOr  HHOr HrOr HOrO OrOO ] ]

　　　//Track10のライン
      (TR(20);) 
//_ｼﾝﾊﾞる？(笑
    {{
 (Time(1:1:0)); v(115); l8;
 (Time(49:1:0)); C0D1 
 (Time(64:4:48));d0C1 
 (Time(65:1:0)); C0D1 
 (Time(89:1:0)); C0D1 
 (Time(113:1:12)); v(127); C0D1 
 (Time(129:1:0)); v(125); C0d1 v-30 [8 C0d3 v-8t-1]t(0); 

	}
	
	}//Track20まで
	(TR(21);) 
//_ｷｯｸ(ﾊﾞｽﾄﾞﾗ)+ﾀﾑ系
    {{
 (Time(1:1:0)); v(100); l16;
	[8 [ K6^6 K0k6 ] [ r1 ] ] | K0k6^6 K0k6
 (Time(49:1:0)); (RC(20,88););
 	[14 K0k2 ] K0k4. K0k4.K0k4 
	[ v(108); [7 K0k4 ] v(125); K8 v-6 K8 ]
	[16 K8 ] [16 k ] [16 K0k ]
 (Time(49:1:0)); v(90); ( BR(48); )
 	[ (p%(-2000)); [24 k48 t-1] t(0); | (p%.T(-2000,-8000,!4)); [24 k48 t-1] t(0); 
 	  (p%.T(-8000,0,!8)); [24 k48 t-1] t(0); | (p%.T(4000,-2000,!8)); [24 k48 t-1] t(0); ]
 (Time(65:1:0)); v(90); ( BR(48); )
 	(p%(-2000)); [24 k48 t-1] t(0); | (p%.T(-2000,-8000,!4)); [24 k48 t-1] t(0); 
 	(p%.T(-8000,0,!8)); [24 k48 t-1] t(0); | (p%.T(4000,-2000,!8)); [24 k48 t-1] t(0); 
 (Time(73:1:0);) v52;
	(p%(-2000)); [24 K0k48 t-1v+2] t(0); K0k6^6 K0k6 r2
	[ [ r1 ] v52; [24 K0k48 t-1v+2] t(0); K0k6^6 K0k6 r1 ] 
 (Time(89:1:0);) (BR(24); p%.T(-2000));
 	v105; [ K0k1 : [3 r1 ] ] v125; K1 k2K2 k4. K4. K4 
	v115; [4 [6 K0k2 ] K0k4. K0k4.K0k4 ] 
 	v118; [4 [ (BR(24);); [6 K0k4 ] : (BR(48););[ v(110); [6 K0k48 ]  r8 ] ]
		     (BR(48);); [3 v(110); [4 K0k64 ] : r ] r8. ] 

	}
//_ｽﾈｱ(ｺﾞｰｽﾄ等)
 (Time(1:1:0)); v(45); l16; [ r1  [48 w48 ] ] r1 [4 r1  [48 w48 ] ]
 (Time(48:1:0)); [48 w48 v+1t-1] t(0); 
 (Time(65:1:0)); v(90); ( BR(48); )
 	[ (p%(-2000)); [24 w48 t-1] t(0); | (p%.T(-2000,-8000,!4)); [24 w48 t-1] t(0); 
 	  (p%.T(-8000,0,!8)); [24 w48 t-1] t(0); | (p%.T(4000,-2000,!8)); [24 w48 t-1] t(0); ] 
 (Time(88:1:0)); v(45); [48 w48 v+1t-1] t(0); 
 (Time(112:1:0)); v(45); [48 w48 v+2t-1] t(0); (Time(113:1:0)); v(105); [ [16 r4w4 ] ]
 (Time(128:1:0)); v(45); [24 w48 v+2t-1] [24 w48 v+1t-1] [48 w48 v-2t-1] t(0);

	}//Track21まで
	}//Rythmまで
TR(22); CH(11); //ﾊﾞｽﾄﾞﾗ（Elec-Dr）
  Time(1:1:0);
  Time(67:1:0); BR(48);
	 p%.T(-8000,8000,!1);[48 g48 v+4] 
  Time(120:1:0); BR(48); Sub{ [ P.T(96,32,!2,32,96,!2); [ r2 ] ] } 
	 p%.T(-8000,8000,!1);[48 g48 v+4] p%.T(8000,-8000,!1); [48 g48 v-3] 
  Time(136:1:0); BR(48); Sub{ [ P.T(96,32,!2,32,96,!2); [ r2 ] ] } v-17 
	 p%.T(-8000,8000,!1);[48 g48 v+4] p%.T(8000,-8000,!1); [48 g48 v-3]
	



//_ﾄﾗｯｸｽﾍﾟｰｽ = 基本設定 = -------------------------------------------------------------------------------------------------

TR(01);   CH(01);  Time(0:2:16); Tempo(90); @(081,001,0); RC(000,000); Vm(050,7,8,00); q(098); P(064); EP(125); // 
 TR(02);  CH(02);  Time(0:2:16);            @(005,016,0); RC(120,050); Vm(125,7,1,00); q(098); P(064); EP(125); // 
 TR(03);  CH(03);  Time(0:2:16);            @(001,000,0); RC(000,000); Vm(000,0,0,00); q(098); P(064); EP(125); // 
 TR(04);  CH(04);  Time(0:2:16);            @(055,000,0); RC(010,022); Vm(098,6,1,00); q(098); P(104); EP(125); // 
 TR(05);  CH(05);  Time(0:2:16);            @(096,000,0); RC(020,064); Vm(098,6,1,00); q(098); P(096); EP(125); // 
 TR(06);  CH(06);  Time(0:2:16);            @(094,000,0); RC(020,064); Vm(098,6,1,00); q(098); P(032); EP(125); // 
 TR(07);  CH(07);  Time(0:2:16);            @(092,000,0); RC(010,022); Vm(098,6,1,00); q(098); P(024); EP(125); // 
 TR(08);  CH(08);  Time(0:2:16);            @(081,001,0); RC(000,000); Vm(120,6,6,24); q(098); P(088); EP(125); // 
 TR(09);  CH(09);  Time(0:2:16);            @(082,110,0); RC(000,000); Vm(100,5,6,24); q(098); P(040); EP(125); // 
 TR(12);  CH(12);  Time(0:2:16);            @(040,016,0); RC(020,034); Vm(118,3,8,12); q(098); P(064); EP(125); // 
 
 TR(13);  CH(13);  Time(0:2:16);            @(001,000,0); RC(000,000); Vm(000,0,0,00); q(098); P(064); EP(125); // 
 TR(14);  CH(14);  Time(0:2:16);            @(001,000,0); RC(000,000); Vm(000,0,0,00); q(098); P(064); EP(125); // 
 TR(15);  CH(15);  Time(0:2:16);            @(001,000,0); RC(000,000); Vm(100,1,8,00); q(098); P(064); EP(125); // 
 TR(16);  CH(16);  Time(0:2:16);            @(001,000,0); RC(000,000); Vm(100,1,8,00); q(098); P(064); EP(125); // 
 
//_ﾄﾗｯｸｽﾍﾟｰｽ2 = 各種設定 = ------------------------------------------------------------------------------------------------
TR(1); CH(1); // SE(雑音とかガサガサとか？) 
   Time(1:1:0); Tempo(202); 
   	Function RSQ(L){ Int I = L / 10; q%10 [(I) n(Random(80,95)),%10 ] } 
   	P.N(64,96,32,44,74,108,24); MidiDelayS( [4 RSQ(!1^1) r1 ] ) 
   Time(67:3:0); P.N(64,96,32,44,74,108,24); v75; v.Random(11); MidiDelayS( RSQ(!1^1^1^2) ) 
   Time(81:1:0); P.N(64,96,32,44,74,108,24); v55; v.Random(11); EPC(125,45,!1^1); MidiDelayS( RSQ(!1^1) ) 
   Time(89:1:0); P.N(64,96,32,44,74,108,24); v75; v.Random(11); EPC(125,45,!1^1); MidiDelayS( RSQ(!1^1) ) 
   Time(97:1:0); P.N(64,96,32,44,74,108,24); v95; v.Random(11); EPC(125,45,!1^1); MidiDelayS( RSQ(!1^1) ) 
   Time(129:1:0); P.N(64,96,32,44,74,108,24); v95; v.Random(11); EPC(125,45,!1^1); MidiDelayS( RSQ(!1^1) ) 

//------------------------------------------------------------------------------
TR(2); CH(2); // ｷｰﾝとなります ( 最近、お気に入りの効果音(笑 ) 
   Time(1:1:0); 
   	v(120); CD( 2 ,118,60,!2,0,!2); TrackKey = -10 
   	MidiDelayS( [6 `f1^1^1^1 `f1^1^1^1 ] `f1^1^1^1 ) 
   Time(73:1:0); MidiDelayS( [8 `f1^1^1^1 ] ) 
   Time(129:1:0); MidiDelayS( [ `f1^1^1^1 ] ) 

//------------------------------------------------------------------------------
TR(3); CH(3); // 今回は使用無 
   Time(1:1:0); 
	
	

//------------------------------------------------------------------------------
TR(4); CH(4); // ｺｰﾄﾞ？ 
   Time(1:1:0); 
   Time(33:1:0); TK(-8); 
   	EPC(10,98,!1*8);
	Sub{ v102; [4 egag agcd ] } << v-12; [4 eadgc^fd ] 
   Time(81:1:0); >> CD(2,10,98,!1); 
   	Sub{ v102; [4 e^g^a^g^ a^g^c^d^ ] } << v-12; [4 e^a^d^g^c^^^f^d^ ] 

//------------------------------------------------------------------------------
TR(5); CH(5); // ｺｰﾄﾞ？ 
   Time(1:1:0); 
   Time(33:1:0); TK(-8); EPC(10,98,!1*8); [4 egag agcd ] 
   Time(89:1:0); CD(2,10,98,!1 ); 
   Time(113:1:0); CD(2,10,98,!1); 
   	Sub{ v102; [ e^g^a^g^ a^g^c^d^ ] } < v-12; [ e^a^d^g^c^^^f^d^ ]

//------------------------------------------------------------------------------
TR(6); CH(6); // ｺｰﾄﾞ？ 
   Time(1:1:0); 
   Time(33:1:0); TK(-8); EPC(10,98,!1*8); [4 egag agcd ]
   Time(113:1:0); CD(2,10,98,!1); 
   	Sub{ v102; [ e^g^a^g^ a^g^c^d^ ] } < v-12; [ e^a^d^g^c^^^f^d^ ]

//------------------------------------------------------------------------------
TR(7); CH(7); // ｺｰﾄﾞ？ 
   Time(1:1:0); 
   Time(33:1:0); TK(-8); 
   	EPC(10,98,!1*8);
	Sub{ v102; [4 egag agcd ] } << v-12; [4 eadgc^fd ] 
   Time(81:1:0); > CD(2,10,98,!1); 
   	[ [ "e0`e1^1 "g0`g1^1 "a0`g1^1 "g0`g1^1 ] ]
   Time(113:1:0); > CD(2,10,98,!1); 
   	Sub{ v102; [ e^g^a^g^ a^g^c^d^ ] } << v-12; [ e^a^d^g^c^^^f^d^ ]

//------------------------------------------------------------------------------
TR(8); CH(8); // ｼﾝｾ 
   Time(1:1:0); 
   Time(89:1:0); V.T(30,105,!1*8); 
   	Sub{ [8 P.T(24,104,!1^1,104,24,!1^1); [4 r1 ] ] }
   	MidiDelayS( [3 `e`da `e`da `e`da `e`da  ] ) MidiDelayS( g`cb `e`d`g `f`e`f `e`ca ) l8; 
   	 MidiDelayS( [4 `e`da v-30 "e v+30 ] [4 `f`da v-30 "f v+30 ] [4 `f`d-a v-30 "f v+30 ] [4 `e`da v-30 "e v+30 ] 
	             [4 `d`cg v-30 "d v+30 ] [4 `dbg v-30 "d v+30 ] [4 `e`cb v-30 "e v+30 ] [4 `e`da v-30 "e v+30 ] )
   Time(113:1:0); MidiDelayS( [4 `e`d`ea ] [4 `f`d`fa ] [4 `f`d-`fa ] [4 `e`d`ea ] | [4 `d`c`dg ] [4 `db`dg ] [4 `e`c`eb ] [4 `e`d`ea ] )

//------------------------------------------------------------------------------
TR(9); CH(9); // ｼﾝｾ 
   Time(1:1:0); 
   Time(89:1:0); V.T(30,105,!1*8); 
   	Sub{ [8 P.T(104,24,!1^1,24,104,!1^1); [4 r1 ] ] }
   	[3 `e`da `e`da `e`da `e`da  ]  g`cb `e`d`g `f`e`f `e`ca l8; v-16 
	 [4 v-30 "e v+30 `e`da ] [4 v-30 "f v+30 `f`da ] [4 v-30 "f v+30 `f`d-a ] [4 v-30 "e v+30 `e`da ] 
	 [4 v-30 "d v+30 `d`cg ] [4 v-30 "d v+30 `dbg  ] [4 v-30 "e v+30 `e`cb  ] [4 v-30 "e v+30 `e`da ] 
   Time(113:1:0); [4 `e`d`ea ] [4 `f`d`fa ] [4 `f`d-`fa ] [4 `e`d`ea ] | [4 `d`c`dg ] [4 `db`dg ] [4 `e`c`eb ] [4 `e`d`ea ]

//------------------------------------------------------------------------------
TR(12); CH(12); // ｼﾝｾﾍﾞｰｽ系の下部ﾊﾟｰﾄ? 
   Time(1:1:0); 
   Time(113:1:0); 
   	[ e12r16e12r16e12r8eere ] [ f12r16f12r16f12r8ffrf ] [ f12r16f12r16f12r8ffrf ] [ e12r16e12r16e12r8eere ] 
	[ d12r16d12r16d12r8ddrd ] [ d12r16d12r16d12r8ddrd ] [ e12r16e12r16e12r8eere ] [ e12r16e12r16e12r8eere ] 

//------------------------------------------------------------------------------

//------------------------------------------------------------------------------
TR(13); CH(13); // SE等 
   Time(1:1:0); 
   Time(61:1:0); v125;o4;l1; P.T(24,106,!1^1^1^1); 
   	  @(126,8); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); 
   Time(109:1:0); v125;o4;l1; P.T(24,106,!1^1^1^1); 
   	  @(126,8); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); 

//------------------------------------------------------------------------------
TR(14); CH(14); // SE等 
   Time(1:1:0); 
   Time(61:1:0); v125;o4;l1; P.T(106,24,!1^1^1^1); 
   	  @(126,8); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); 
   Time(69:1:0); P(64); v120;o3;l1; V.T(0,100,!8,98,30,!1*4);
   	  @(40,16,0); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1 r4 p(64);
   Time(109:1:0); v125;o4;l1; P.T(106,24,!1^1^1^1); 
   	  @(126,8); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); 
   Time(133:1:0); P(64); v110;o3;l1; V.T(0,100,!8,98,30,!1*4); TK(-10)
   	  @(40,16,0); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1 r4 p(64);

//------------------------------------------------------------------------------
TR(15); CH(15); // SE等 
   Time(1:1:0); P.T(24,106,!1^1^1^1);
   	  @(126,8); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1 p(64); [4 r1 ] 
	P.T(106,24,!1^1^1^1); 
   	  @(126,9); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); 
   Time(57:1:0); v(105); RC(20,88); o7; EPC(120,100,!1*4); P(64); P.T(106,24,!1^1^1^1);
   	  @(81,1,0); BR(38); p.T(127,0,!1^1^1^1); 
	  Po(on,64); ``f4  [86 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*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); 
   Time(69:1:0); v(100); RC(0,0); P.T(24,106,!1^1^1^1);
   	  @(126,8); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1 r4 p(64); 
   Time(113:1:0); v(105); RC(20,88); o7; EPC(120,100,!1*4); P(64); P.T(106,24,!1^1^1^1);
   	  @(81,1,0); BR(38); p.T(127,0,!1^1^1^1); 
	  Po(on,64); ``f4  [86 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*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); 
   Time(125:1:0); v(105); RC(20,88); o7; EPC(120,100,!1*4); P(64); P.T(106,24,!1^1^1^1);
   	  @(81,1,0); BR(38); p.T(127,0,!1^1^1^1); 
	  Po(on,64); ``f4  [86 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*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); 

//------------------------------------------------------------------------------
TR(16); CH(16); // SE等 
   Time(1:1:0); P.T(106,24,!1^1^1^1); 
   	  @(126,8); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1 p(64); [4 r1 ] 
	P.T(24,106,!1^1^1^1); 
	  @(126,9); BR(20); p.T(0,127,!1^1^1^2,127,0,!2); a0e1^1^1^1 p(64); [4 r1 ] 
   Time(57:1:0); v(105); RC(20,88); o4; EPC(120,100,!1*4); P(64); P.T(24,106,!1^1^1^1);
   	  @(81,110,4); BR(38); p.T(127,0,!1^1^1^1); 
	  Po(on,64); ``f4  [86 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*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); 
   Time(69:1:0); P.T(106,24,!1^1^1^1); 
   	  @(126,8); BR(20); p.T(127,0,!1^1^1^1); f0c1^1^1^1 r4 p(64); 
   Time(125:1:0); v(105); RC(20,88); o7; EPC(120,100,!1*4); P(64); P.T(24,106,!1^1^1^1);
   	  @(81,1,0); BR(38); p.T(127,0,!1^1^1^1); 
	  Po(on,64); ``f4  [86 ``f32 t-1] [32 Po(off);``f32 t-1] p(64); t(0); EPC(100,120,!1*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); 

//------------------------------------------------------------------------------



