/*
☆　ダウンロード、ありがとうございます。ブラス曲の入力３つめです。
完全に著作権アリですので、公開は少しだけになります。全曲聞きたい
場合は、下記apollon_7777のホームページの"guest"へ返信アドレスを
ご記入ください。ご感想・アドヴァイスなど、よろしくお願いします。

ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*          現代日本名曲 mml_file化推進機構      *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*                                               *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*                    あまちゃん                 *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*                    大友 良英                  *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*                                               *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*       mml by Apollon Keyboad Brassband        *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*               Sakura Ver.2.372                *:｡..｡:*･ﾟ
ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ･*:｡..｡:*･ﾟ

☆大友 良英(おおとも よしひで;1959/08/01〜)
・日本のギタリスト、ターンテーブル奏者、作曲家 、映画音楽家、
  プロデューサー。--from wikipedia--

☆アポロン キーボード ブラスバンド/Apollon_Keyboad_Brassband
（アポロン 金管       バンド      /Apollon_Kinkan_ Band）
--- from Shakuhachist of Phantom ---
http://www.geocities.jp/apollon_7777

☆　備忘録
・初掲載 …'13/12/30, ID=06-1383
・改訂 ……
・TyokuNal様式チューニング【8vaにつき5.0cent下げる=[BR(1);p%(-40)]】参考ID;5_4455[四季-秋]
・adas様式デチューニング【片方だけFineTune(68)を記入;4/64≒6cent上げる】参考ID;5_4694[electronic parade]
・TempoChange書式…TempoChange(438,504,!1^1);テンポ改60,!2…初期値省略可
・Modulation.onNoteWave書式…M.W(0,0,!1^1,0,68,!2.)
・Modulation.onTime書式…M.T(0,0,!1^1,0,68,!2.)
・v.T書式;v.T(75,42,!1^1)
・v.onNote書式;v.onNote(50,120,80,120);
・Slurタイプ;C:\Program Files\sakura\doc\faq\help01.htm
・検索[テキスト音楽サクラ p%.t]パソコンに付属のMIDI音源はBR 12までしかサポートしてない場合があります。
デフォルトはBR 2（半音分）です。p%の設定範囲は-8192〜8191です。BR 12の場合、半音分は約682です。
(http://oto.chu.jp/cgi/sakura-q/srch.cgi?mode=log&logs=79.txt&page=20&no=0)

・大友良英&あまちゃんスペシャルビッグバンド - LIVE @ FREEDOMMUNE
http://www.youtube.com/watch?v=Wg6k9Xf3tvc
DAX -Space Shower…'13/09/03 

・能年玲奈 あまちゃん 感動をありがとう！！ 
http://www.youtube.com/watch?v=9Pv_FUNiPnk
semisigure470'13/10/29 

・ベイビーレイズ　暦の上ではディセンバー　MF 
http://www.youtube.com/watch?v=nw_PrmYaEac
haruu koikoi'13/10/12


*/
//**************************************初期設定
ResetXG();ResetGS();ResetGM();
TrackName={"amachan_sa61_1312};
Copyright={"Otomo-Yoshihide,midi_by_AKB"};
MetaText ={""};
System.TimeBase(192);
System.Keyshift=(Ky)
//System.Include(chord2.h); //--
TimeSignature=4,2;
System.MeasureShift=2;
読む(fadeio.h) 
Tempo(128);//T=標準108only
~{改}={TempoChange}//使用例=;改(90,20,!1^1^1)★注;初期値省略不可…参考;5_6030鐘が鳴る
FUNCTION X(Ex){EP(Ex)};//A〜Gの文字を使いたくない…使用例;X(90)
FUNCTION Z(Ep,Ez,Ln){EP.T(Ep,Ez,Ln)};//同上…使用例;Z(110,75,!1.)
//●↑[FUNCTION Z]を[FUNCTION Y]とすると,エラー[関数Yを、再定義しています]と出るのは→(関数Yはサクラで定義済みだから)
//Int Rpt=1//繰り返し回数

//■●▲★||尺八音量設定 … ●Rotsurechi5_1001b●
//・｢レ」と「シ｣が重複するため、片仮名｢ドレミ｣と併用不可
~{甲}={>};//そこから8va
~{乙}={<};//そこから-8va
Int Shc=5;//5=5孔,7=7孔
If(Shc=5){;//5孔管音量設定…基本v115,メリ-17,大メリ-34,ピ-12,カリ+12
//符}={音量音程};   和名|     乙  |   甲  | 大甲 |


~{パ}={v  98 b };// 盤渉|     メハ|   メハ|      |新韻
~{ヰ}={v 127 b-};// 鸞鏡|         |カチ,ヰ|      |
~{イ}={v  81 b-};// 鸞鏡|カチ,半ハ|       |      |
~{チ}={v 115 a };// 黄鏡|       チ|     チ|      |
~{ウ}={v  98 a-};// 鳧鐘|     メチ|   メチ|      |
~{レ}={v 115 g };// 双調|       レ|       |大甲レ|
~{ヘ}={v  98 g-};// 下無|     メレ|   メレ|      |新韻
~{ツ}={v 115 f };// 勝絶|       ツ|     ツ|大甲ツ|
~{シ}={v  98 e };// 平調|     メツ|   メツ|    四|
~{タ}={v 115 e-};// 断金|         |       |    タ|
~{ッ}={v  81 e-};// 断金|  カロ,ッ|カロ,ッ|      |
~{ピ}={v 103 d };// 壱越|         |       |    ピ|琴の記号と重複するため~{ヒ}は削除
~{ロ}={v 115 d };// 壱越|       ロ|     ロ|      |
~{リ}={v  98 d-};// 上無|     メロ|     リ|    リ|
~{ハ}={v 115 c};};//神仙|   大メロ|     ハ|    ハ|
//… ●Rotsurechi7●
If(Shc=7){;//7孔管表記設定(音量は通常)
~{パ}={b};~{ヰ}={b-};~{イ}={b-};~{チ}={a};~{ウ}={a-};
~{レ}={g};~{ヘ}={g-};~{ツ}={f}; ~{シ}={e};~{タ}={e-};~{ッ}={e-};
~{ピ}={d};~{ロ}={d}; ~{リ}={d-};~{ハ}={c};};
//●[イ]を検索すると[ツ]もヒットするのは日本語の配列の関係から。
//●Rotsurechi_R101の不具合…「ヘ」は平仮名・片仮名紛らわしい(入力面)

//■●▲★|| Chord_121215b   C7p5,Bbm6
//7
Str Ab7={'"a-ce-g-'};Str Cmb5= {'ce-g-'};
Str A7= {'"ad-eg'};  Str Dbmb5={'d-eg'};
Str Bb7={'"b-dfa-'}; Str Dmb5= {'dfa-'};
Str B7= {'"be-g-a'}; Str Ebmb5={'e-g-a'};
Str C7= {'cegb-'};   Str Emb5= {'egb-'};
Str D7= {'dg-a`c'};  Str Gbmb5={'g-a`c'};
Str Eb7={'e-gb-`d-'};Str Gmb5= {'gb-`d-'};
Str E7= {'ea-b`d'};  Str Abmb5={'a-b`d'};
Str F7= {'"f"ace-'}; Str Amb5= {'"ace-'};
Str Gb7={'"g-"b-d-e'};Str Bbmb5={'"b-d-e'};
Str G7= {'"g"bdf'};  Str Bmb5= {'"bdf'};
//m7
Str Abm7={'"a-be-g-'};Str B= {'be-g-'};
Str Am7= {'"aceg'};   Str C= {'ceg'};
Str Bbm7={'"b-d-fa-'};Str Db={'d-fa-'};
Str Bm7= {'"bdg-a'};  Str D= {'dg-a'};
Str Cm7= {'ce-gb-'};  Str Eb={'e-gb-'};
Str Dbm7={'d-ea-b'};  Str E= {'ea-b'};
Str Dm7= {'dfa`c'};   Str F= {'fa`c'};
Str Ebm7={'e-g-b-`d-'};Str Gb={'g-b-`d-'};
Str Em7= {'egb`d'};   Str G= {'gb`d'}; 
Str Fm7= {'"f"a-ce-'};Str Ab={'"a-ce-'};
Str Gbm7={'"g-"ad-e'};Str A= {'"ad-e'};
Str Gm7= {'"g"b-df'}; Str Bb={'"b-df'};
//M7
Str AbM7={'"a-ce-g'};Str Cm= {'ce-g'};
Str AM7= {'"ad-ea-'};Str Dbm={'d-ea-'};
Str BbM7={'"b-dfa'}; Str Dm= {'dfa'};
Str CM7= {'cegb'};   Str Em= {'egb'};
Str DM7= {'dg-a`d-'};Str Gbm={'g-a`d-'};
Str EbM7={'e-gb-`d'};Str Gm= {'gb-`d'};
Str EM7= {'ea-b`e-'};Str Abm={'a-b`e-'};
Str FM7= {'"f"ace'}; Str Am= {'"ace'};
Str GM7= {'"g"bdg-'};Str Bm= {'"bdg-'};
//M7b5
Str EbM7b5={'e-ga`d'};Str Dsus4= {'ga`d'};
//mM7(3Notes=aug)
Str AmM7={'"acea-'};  Str Caug= {'cea-'};//=Eaug=Abaug
Str AbmM7={'"a-c-e-g'};Str Cbaug= {'c-e-g'};
Str DmM7={'dfa`d-'};  Str Faug= {'fa`d-'};//=Aaug=Dbaug
Str GmM7={'"g"b-dg-'};Str Bbaug={'"b-dg-'};//=Daug=Gbaug
//dim
Str Abdim={'"a-"bdf'};//Str Bmb5={'"bdf'};
Str Adim= {'"ace-g-'};//Str Cmb5={'ce-g-'};
Str Bbdim={'"b-d-eg'};//Str Dbmb5={'d-eg'};
Str Bdim= {'"bdfa-'};//Str Dmb5={'dfa-'};
Str Cdim= {'ce-g-a'};//Str Ebmb5={'e-g-a'};
Str Dbdim={'d-egb-'};//Str Emb5={'egb-'};
Str Ddim= {'dfa-b'};   Str Fmb5={'fa-b'};
Str Ebdim={'e-g-a`c'};//Str Ebmb5={'e-g-a'};
Str Edim= {'egb-`d-'};//Str gmb5={'gb-`d-'};
Str Fdim= {'dfa-b'};//Str Abmb5={'"a-b`d'};
Str Gbdim={'"g-"ace-'};//Str Amb5={'"ace-'};
Str Gdim= {'"g"b-d-e'};//Str Bbmb5={'"b-d-e'};
//7sus4
Str A7sus4={'"adeg'};Str Em7o5={'deg'};
Str Bb7sus4={'"b-e-fa-'};Str Fm7o5= {'e-fa-'};
Str C7sus4={'cfgb-'};Str Gm7o5={'fgb-'};
Str D7sus4={'dga`c'};Str Am7o5={'ga`c'};
Str G7sus4={'"gcdf'};Str Dm7o5={'cdf'};
//6
Str Ab6={'"a-ce-f'};Str F7o3= {'ce-f'};//Ab6=Fm7,F7o3=Cmbb5
Str A6= {'"ad-eg-'};Str Gb7o3={'d-eg-'};
Str Bb6={'"b-dfg'}; Str G7o3= {'dfg'};//Bb6=Gm7,G7o3=Dmbb5
Str B6= {'"be-g-a-'};Str Ab7o3={'e-g-a-'};//B6=Abm7,Ab7o3=Ebmbb5
Str C6= {'cega'};    Str A7o3= {'ega'};
Str D6= {'dg-ab'};   Str B7o3= {'g-ab'};//D6=Bm7,B7o3=Gbmbb5
Str Eb6={'e-gb-`c'}; Str C7o3= {'gb-`c'};//Eb6=Cm7,C7o3=Gmbb5
Str F6= {'"f"acd'};  Str D7o3= {'"acd'};//F6=Dm7,D7o3=Ambb5
Str G6= {'"g"bde'};  Str E7o3= {'"bde'};//G6=Em7,E7o3=Bmbb5
//m6
Str Bbm6={'"b-d-fg'};Str Dbb5= {'d-fg'};//Bb6=Gm7,G7o3=Dmbb5
Str Cm6= {'ce-ga'}; Str Ebb5={'e-ga'};//Cm6=Am7b5
//7b5
Str Gb7b5={'"g-"b-ce'};//Str C7o5={'"b-ce'};
//7p5
Str C7p5={'cea-b-'}  Str Eb5= {'ea-b-'};
//m7b5
Str Am7b5= {'"ace-g'};//Str Cm={'ce-g'};
Str Bm7b5= {'"bdfa'};// Str Dm={'dfa'};
Str Dbm7b5={'d-egb'};// Str Em={'egb'};
Str Dm7b5= {'dfa-`c'};  Str Fm={'fa-`c'};
Str Em7b5= {'egb-`d'};//Str Gm={'gb-`d'};
Str Gbm7b5={'"g-"ace'};//Str Am={'"ace'};
Str Gm7b5= {'"g"b-d-f'};Str Bbm={'"b-d-f'};
//m7p5
Str Gm7p5= {'"g"b-e-f'};Str Bbsus4={'"b-e-f'};
Str Bm7p5={'"bdga'};//Str Dsus4={'dga'};
//M7p5
Str BbM7p5={'"b-dg-a'};//Str D={'dg-a'};
Str CM7p5= {'cea-b'};//Str E={'ea-b'};
Str EbM7p5={'e-gb`d'};//Str G= {'gb`d'};
Str FM7p5= {'"f"ad-e'}//Str A={'"ad-e'};
Str GM7p5= {'"g"be-g-'};//Str B={'"be-g-'};
//_add9
Str Aadd9= {'"ad-eb'}; Str Dbm7o5={'d-eb'};
Str Cadd9= {'ceg`d'};//Str Em7o5= {'eg`d'};
Str Ebadd9={'e-gb-`f'};//Str Gm7o5= {'"gb-`f'};
Str Fadd9= {'"f"acg'};//Str Am7o5={'"acg'}; 
Str Gadd9= {'"g"bda'};  Str Bm7o5={'"bda'};
//m_add9
Str Amadd9={'"aceb'};  Str CM7o5= {'ceb'};
Str Cmadd9={'ce-g`d'}; Str EbM7o5={'e-g`d'};
Str Dmadd9={'dfa`e'};  Str FM7o5= {'fa`e'};
Str Gmadd9={'"g"b-da'};Str BbM7o5={'"b-da'};
//9_改訂120106
Str A9= {'"ad-egb'};//Str Dbm7b5={'d-egb'};
Str C9= {'cegb-`d'};//Str Em7b5={'egb-`d'};
Str Eb9={'e-gb-`d-`f'};//Str Gm7b5={'gb-`d-`f'};
Str F9= {'"f"ace-g'};//Str Am7b5={'"ace-g'};
Str G9= {'"g"bdfa'};//Str Bm7b5={'"bdfa'};
//m9
Str Dm9= {'dfa`c`e'};//Str FM7= {'fa`c`e'};

//#Natu  Em7  Gbm7b5 GM7   Am7 Bm7 CM7   D7 `&"
//#Melo  EmM7 Gbm7 (GM7p5) A7  B7  Db7b5 Ebdim=Gbdim=Adim=Cdim
//####D  EM7  Gbm7   Abm7  AM7 B7  Dbm7  Ebm7b5 ( Gb7 )`&"

//Natu   Am7  Bm7b5  CM7   Dm7 Em7 FM7   G7  `&"
//Melo   AmM7 Bm7  (CM7p5) D7  E7  Gb7b5 Abdim=Bdim=Ddim=Fdim
//###D   AM7  Bm7    Dbm7  DM7 E7  Gbm7  Abm7b5 ( Bb7 )`&"

//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM7p5) G7  A7  Bm7b5 Dbdim=Edim=Gdim=Bbdim
//##Di  DM7  Em7    Gbm7  GM7 A7  Bm7   Dbm7b5 ( Eb7 )`&"

//bbNa  Gm7  Am7b5  BbM7  Cm7 Dm7 EbM7  F7  `&"
//bbMe  GmM7 Am7 (BbM7p5) C7  D7  Em7b5 Gbdim=Adim=Cdim=Ebdim
//#Dia  GM7  Am7    Bm7   CM7 D7  Em7   Gbm7b5 ( Ab7 )`&"

//bbbN  Cm7  Dm7b5  EbM7  Fm7 Gm7 AbM7  Bb7  `&"
//bbbM  CmM7 Dm7 (EbM7p5) F7  G7  Am7b5 Bdim=Ddim=Fdim=Abdim
//Diat  CM7  Dm7    Em7   FM7 G7  Am7   Bm7b5 ( Db7 )`&"

//bbbbN Fm7  Gm7b5  AbM7  Bbm7 Cm7 DbM7  Eb7 `&"
//bbbbM FmM7 Gm7 (AbM7p5) Bb7  C7  Dm7b5 Edim=Gdim=Bbdim=Dbdim
//bDiat FM7  Gm7    Am7   BbM7 C7  Dm7   Em7b5 ( Gb7 )`&"

//bbbbbN Bbm7  Cm7b5  DbM7  Ebm7 Fm7 GbM7  AbM7       `&"
//bbbbbM BbmM7 Cm7 (DbM7p5) Eb7  F7  Gm7b5 Adim=Cdim=Ebdim=Gbdim
//bbDiat BbM7  Cm7    Dm7   EbM7 F7  Gm7   Am7b5 ( B7 )`&"

//bbbbbbN Ebm7  Fm7b5  GbM7  Abm7 Bbm7 CbM7  DbM7         `&"
//bbbbbbM EbmM7 Fm7 (GbM7p5) Ab7  Bb7  Cm7b5 Ddim=Fdim=Abdim=Bdim
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"


//■●▲★|| per
~{き}={v 92;n(Kick1),};//       n36(キック1)
~{す}={v 75;n(Snare1),};//      n38(スネア1)

~{て}={v 93;n(LowTom2),};//     n41(低トム2)
~{く}={v 93;n(ClosedHiHat),};// n42(クローズ)
~{ば}={v 92;n(LowTom1),};//     n43(低トム1)
~{な}={v 90;n(MidTom2),};//     n45(中トム2)
~{こ}={v 87;n(HighTom2),};//    n48(高トム2)
~{し}={v 93;n(CrashCymbal1),};//n49(シンバル)

~{り}={v 93;n(RideCymbal1),};// n51(Rideシンバル)
~{か}={v 53;n(RideBell),};//    n53(あたり鉦)

~{ぼ}={v 93;n(HighBongo),};//   n60(Hボンゴ)
~{ぎ}={v 87;n(ShortGuiro),};//  n73(短ギロ)
~{ぐ}={v 47;n(LongGuiro),};//   n74(長ギロ)

//■■■■||  ||■■■■ #p 4+1節
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKp1={l16;r ^^^ ^^^ ^|r ^^^ ^^^ ^||r ^^ ^ ^ ^^ ^|r ^ ^^ ^^^ ^ };//P,
#RKp1={l16;r ^^^ ^^^ ^|r ^^^ ^^^ ^||r ^^ ^ ^ ^^ ^|r ^ ^^ ^^^ ^ };//P,
#PTp1={l16;r ^^^ ^^^ ^|r ^^^ ^^^ ^||e-^f ^ g ^a-^|b-^>c^ d^e-^<};//P,
#PUp1={l16;r ^^^ ^^^ ^|r ^^^ ^^^ ^||r ^^ ^ ^ ^^^"|b-^ c^ d^e-^ };//P,
#OHp1={l16; #PTp1                                              };//P,
#VNp1={l16;r ^^^ ^^^ ^|r ^^^ ^^^ ^||r ^^ ^ ^^ ^ ^|r ^ ^^ ^^^ ^ };//P,
//Cp1={               |           ||             |
#PRp1={l4 ;[r]       [|r]         ||[r]         [|r]           };//Pf右
#UHp1={l16;r ^^^ ^^^ ^|r ^^^ ^^^ ^||r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^};//P,
#PKp1={l16;き^^^ き^^^|き^^^ き^^^||r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^};//P,
#PMp1={l16;ぼ^^^ ぼ^^^|ぼ^^^ ぼ^^^||ぼ^ぼ^ ぼ^ぼ^|ぼ^ぼ^ ぼ^ぼ^};//P,
#PNp1={l16;か^^^ か^^^|か^^^ か^^^||r ^^ ^ ^^ ^ ^|r ^ ^^ ^^^ ^ };//P,

#TKp2={>g ^^^ e-^^^|c ^^^<b ^^^|b-^ ^ ^ r ^^ ^|r ^^ ^ ^ ^^  ^};//P,
#RKp2={ r ^^^ ^ ^^^|r ^^^ ^ ^^^|r ^ ^ ^ ^ ^^ ^|r ^^ ^ ^ ^^  ^};//P,
#PTp2={>g ^^^ e-^^^|c ^^^<b ^^^|r ^ b-r b-rb-r|b-rb-r b-rb- r};//P,■*b
#PUp2={ g ^^r e-^^r|c ^^r"b ^^r|r ^ d r d rd r|d rd r d rd  r};//P,■*b
#OHp2={>g ^^r e-^^r|c ^^r<b ^^r|r ^ a-r a-ra-r|a-ra-r a-ra- r};//P,■*b
#VNp2={ r ^^^ ^ ^^^|r ^^^ ^ ^^^|r ^ f r f rf r|f rf r f rf  r};//P,
//Cp2={            |           |57            |57
#PRp2={[r]        [|r]        [|Bb7]         [|Bb7]          };//Pf右
#UHp2={ r ^^^ ^ ^^^|r ^^^ ^ ^^^|r ^<b-r b-rb-r|b-rb-r b-rb->r};//P,
#PKp2={ r^^^  ^ ^^^|r ^^^ ^ ^^^|r ^ ^ ^ ^ ^^ ^|r ^^ ^ ^ ^^  ^};//P,
#PMp2={ ぼ^^^ ぼ^^^|ぼ^^^ ぼ^^^|r ^ ぼ^ ぼ^ぼ^|ぼ^ぼ^ ぼ^ぼ^ };//P,
#PNp2={ r^^^  ^ ^^^|r ^^^ ^ ^^^|r ^ ^ ^ ^ ^^ ^|r ^^ ^ ^ ^^  ^};//P,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKp={#TKp1#TKp2};//注「#xx」の「#」には区切りの効果がある
#RKp={#RKp1#RKp2};
#PTp={#PTp1#PTp2};
#PUp={#PUp1#PUp2};
#OHp={#OHp1#OHp2};
#VNp={#VNp1#VNp2};
#PRp={#PRp1#PRp2};
#PRp={#PRp1#PRp2};
#UHp={#UHp1#UHp2};
#PKp={#PKp1#PKp2};
#PMp={#PMp1#PMp2};
#PNp={#PNp1#PNp2};

//■●▲★|| #m1 4*2節
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK11={l16; [4 e-^^^ b-^^^]};//A,
#RK11={l16; r^^^   ^ ^^ ^|r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^};//A,
#PT11={l16;"b-^e-^ r ^e-^|r ^e-^ r ^e-^|r ^e-^ r ^e-^|f ^e-^ f ^g ^};//A,
#PU11={l16; #PT11                                                  };//A,
#OH11={l16; r ^b-^ r ^b-^|r ^b-^ r ^b-^|r ^b-^ r ^b-^|r ^b-^ r ^b-^};//A,
#VN11={l16; r ^g ^ r ^g ^|r ^g ^ r ^g ^|r ^g ^ r ^g ^|r ^g ^ r ^g ^};//A,
//C11={l4 ; 1            |1            |1            |1
#PR11={l4 ;[Eb]         [|Eb]         [|Eb]         [|Eb]          };//Pf右
#UH11={l16; e-^^ r"b-^^ r|e-^^ r"b-^^ r|e-^^ r"b-^^ r|e-^^ r"b-^^ r};//A,
#PK11={l16;[4 き^r^     き^r^ ]};//A,き=キック1
#PM11={l16;[4 か^か0ぼ^ か^ぼ^]};//A,か=あたり鉦,ぼ=Hボンゴ
#PN11={l16;[4 ぐ^^^     ぎ^r ^]};//A,ぎ=短ギロ,  ぐ=長ギロ

#TK12={ #TK11};//A,
#RK12={ r ^^ ^ ^ ^^ ^  |r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^|   r ^^ ^ ^ ^ ^ ^};//A,
~{ヒ0}={BR 12 p%.T(0,-8192,!4);Sub{Time=Time+!4.;BR=1;p%(-30)};};//並引(^^^^ ^^^^)1拍◎[ヒ0]=1oct下げ■※注ロツレチのヒと重複●-683=半音下●-4096=1音下●-8192=1oct下
#PT12=  {Sub{r^^^ ^^^^ |^ ^^ ^ ^ ^^ ^|^ ^^ ^ ^ ^^ ^|ヒ0r ^^ ^ ^ ^ ^ ^};};//A,■p%.T
#PT12=#PT12+{r^^^ r^^^>|d ^^ ^ ^ ^^ ^|f ^f ^ ^ ^^ ^|   ^ ^^ ^<r ^ ^ ^};//A,■p%.T■ピストンを中途半端に押して吹くとよいらしい。できなかったら直江に
#PU12={ r ^g ^ r ^g ^  |r ^g ^ r ^g ^|e-^^ ^ g-^g ^|   e-^^ ^ c ^"b-^};//A,
#OH12={ r ^b-^ r ^b-^  |r ^b-^ r ^b-^|r ^b-^ b-^b-^|   r ^b-^ b-^ b-^};//A,
#VN12={ r ^g ^ r ^g ^  |r ^g ^ r ^g ^|e-^^ ^ g-^g ^|   e-^^ ^ c ^"b-^};//A,
//C12={ 1              |1            |1            |1
#PR12={[Eb]           [|Eb]         [|Eb]         [|Eb]              };//Pf右
#UH12={ e-^^ r"b-^^ r  |e-^^ r"b-^^ r|e-^^ r g-^g ^|   e-^^ r c ^"b-^};//A,
#PK12={ #PK11};//A,
#PM12={ #PM11};//A,
#PN12={ #PN11};//A,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK13={ #TK11};//A,
#RK13={ r^^^   ^^^^ |r^^^  ^^^^ |r^^ ^ ^^^ ^|r^^ ^ ^^^ ^};//A,
#PT13={"b-^e-^ r^e-^|r^e-^ r^e-^|r^e-^ r^e-^|f^e-^ f^e-^};//A,
#PU13={ #RK13                                           };//A,
#OH13={ #OH11                                           };//A,
#VN13={ #VN11                                           };//A,
//C13={ 1           |1          |1          |1
#PR13={[Eb]        [|Eb]       [|Eb]       [|Eb]        };//Pf右
#UH13={ #UH11};//A,
#PK13={ #PK11};//A,
#PM13={ #PM11};//A,
#PN13={ #PN11};//A,

#TK14={ #TK11};//A,
#RK14={ r^^ ^ ^ ^^ ^|r^^ ^ ^^ ^ ^|r ^^ ^  ^ ^^ ^|r ^^ ^ ^ ^ ^ ^};//A,
#PT14={ a^b-r g-^g r|d^e-r"a^"b-r|r ^b-b- b-rb-r|a ^b-r a^  b-r};//A,
#PU14={ r^^ ^ ^ ^^ ^|r^^ ^ ^^ ^ ^|r ^g g  g rg r|g-^g r g-^ g r};//A,
#OH14={ r^b-^ r ^b-^|r^b-^ r^ b-^|r ^b-^  b-^b-^|r ^b-^ r ^ b-^};//A,
#VN14={ r^g ^ r ^g ^|r^g ^ r^ g ^|e-^^ ^ "b-^^ ^|e-^^ ^ c ^"b-^};//A,
//C14={ 1           |1           |1             |1
#PR14={[Eb]        [|Eb]        [|Eb]          [|Eb]           };//Pf右
#UH14={ #UH12};//A,
#PK14={ #PK11};//A,
#PM14={ #PM11};//A,
#PN14={ #PN11};//A,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK15={ #TK11};//B,
#RK15={ r^^^   ^^^^ |r^^^  ^^^^ |r^^ ^ ^^^ ^|r^^ ^ ^^^^};//B,
#PT15={"b-^e-^ r^e-^|r^e-^ r^e-^|r^e-^ r^e-^|f^e-^ f^g^};//B,=11
#PU15={ #PT15                                          };//B,
#OH15={ #OH11                                          };//B,
#VN15={ #VN11                                          };//B,
//C15={ 1           |1          |1          |1
#PR15={[Eb]        [|Eb]       [|Eb]       [|Eb]       };//Pf右
#UH15={ #UH11};//B,
#PK15={ #PK11};//B,
#PM15={ #PM11};//B,
#PN15={ #PN11};//B,

#TK16={ #TK11};//B,
#RK16={ r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^ |r ^ ^^ ^ ^^ ^|   r ^^^ ^ ^^^};//B,
#PT16=  {Sub{r^^^ ^^^^|^ ^^ ^ ^ ^^ ^|^ ^ ^^ ^ ^^ ^|ヒ0r ^^^ ^ ^^^};};//B,■p%.T
#PT16=#PT16+{r^^^ r^^^|a ^^ ^ ^ ^^ ^|b-^ ^^ ^ ^^ ^|   ^ ^^^ r ^^^};//B,■p%.T
//#PT16={ r ^^ ^ ^ ^^^|a ^^ ^ ^ ^^ ^|b-^ r^ ^ ^^ ^|   r ^^^ ^ ^^^};//B,
#PU16={ r ^^ ^ ^ ^^ ^|g-^^ ^ ^ ^^ ^ |g ^ ^^ e-^^ ^|   c ^^^"b ^^^};//B,
#OH16={ r ^b-^ r ^b-^|r ^b-^ r ^b-^>|g ^ ^^ e-^^ ^|   c ^^^<b ^^^};//B,
#VN16={ r ^g ^ r ^g ^|r ^g ^ r ^g ^ |e-^ ^^ a ^b-^|   e-^^^ g-^g^};//B,■*a
//C16={ 1            |1             |1            |1
#PR16={[Eb]         [|Eb]          [|Eb]         [|Eb]           };//Pf右
#UH16={ e-^^ r"b-^^ r|e-^^ r"b-^^ r |e-^ ^r a ^b-^|   e-^^r g-^g^};//B,■*a
#PK16={ #PK11};//B,
#PM16={ #PM11};//B,
#PN16={ #PN11};//B,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK17={ #TK11};//B,
#RK17={ r^^^   ^^^^ |r^^^  ^^^^ |r^^ ^ ^^^ ^|r^^ ^ ^^^ ^};//B,
#PT17={"b-^e-^ r^e-^|r^e-^ r^e-^|r^e-^ r^e-^|f^e-^ f^e-^};//B,=13
#PU17={ #PT17                                           };//B,
#OH17={ #OH11                                           };//B,
#VN17={ #VN11                                           };//B,
//C17={ 1           |1          | 1         |1
#PR17={[Eb]        [|Eb]       [|Eb]       [|Eb]        };//Pf右
#UH17={ #UH11};//B,
#PK17={ #PK11};//B,
#PM17={ #PM11};//B,
#PN17={ #PN11};//B,

#TK18={ r ^"b-^ c^d^|e-^f^ g ^a-^|b-^^^ r ^^ ^|r ^^ ^ ^^ ^ ^};//B,
#RK18={ r ^ ^ ^ ^^^^|r ^^^ ^ ^^ ^|r ^^^ ^ ^^ ^|r ^^ ^ ^^ ^ ^};//B,
#PT18={ r ^ ^ ^ ^^^^|r ^^^ ^ ^^ ^|r ^fr g ra-r|b-^^`c ^^`d ^};//B,
#PU18={ r ^ ^ ^ ^^^^|r ^^^ ^ ^^ ^|r ^fr e rf r|g ^^ g ^^ f ^};//B,
#OH18={ r ^ ^ ^ ^^^^|e-rfr g ra-r|b-^^^ ^ ^^ ^|^ ^^ ^ ^^ r ^};//B,
#VN18={ r ^"b-r crdr|e-rfr g ra-r|b-^^^ ^ ^^ ^|b-^^ b-^^ b-^};//B,
//C18={ 1           |1           |1           |1
#PR18={[Eb]        [|Eb]        [|Eb]        [|Eb]          };//Pf右
#UH18={ e-^"b-^ c^d^|e-^^r"b-^^ r|e-^^r"b-^^ r|e-^^ r d^ ^ r};//B,
#PK18={ [ き^r^     き^r^ ] ||き^r^     き^r^ |き^   r^  r^^ ^};//B,き=キック1
#PM18={ [ か^か0ぼ^ か^ぼ^] ||か^か0ぼ^ か^ぼ^|か0ぼ^^ぼ ^^ぼ^};//B,か=あたり鉦,ぼ=Hボンゴ
#PN18={ [ ぐ^^^     ぎ^r ^] ||ぐ^^^     ぐ^^^ |ぎ^   r^  r^^ ^};//B,ぎ=短ギロ,  ぐ=長ギロ
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKm1={#TK11#TK12#TK13#TK14#TK15#TK16#TK17#TK18};
#RKm1={#RK11#RK12#RK13#RK14#RK15#RK16#RK17#RK18};//リコ
#PTm1={#PT11#PT12#PT13#PT14#PT15#PT16#PT17#PT18};
#PUm1={#PU11#PU12#PU13#PU14#PU15#PU16#PU17#PU18};
#OHm1={#OH11#OH12#OH13#OH14#OH15#OH16#OH17#OH18};
#VNm1={#VN11#VN12#VN13#VN14#VN15#VN16#VN17#VN18};
#PRm1={#PR11#PR12#PR13#PR14#PR15#PR16#PR17#PR18};
#PRm1={#PR11#PR12#PR13#PR14#PR15#PR16#PR17#PR18};
#UHm1={#UH11#UH12#UH13#UH14#UH15#UH16#UH17#UH18};
#PKm1={#PK11#PK12#PK13#PK14#PK15#PK16#PK17#PK18};
#PMm1={#PM11#PM12#PM13#PM14#PM15#PM16#PM17#PM18};
#PNm1={#PN11#PN12#PN13#PN14#PN15#PN16#PN17#PN18};

//■●▲★|| #m1 4*2節
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK21={l16; r ^g^>c^e-^ |g^^^  r^^^ |c ^^<b- ^^`c ^|b-^^ ^  r^ ^ ^};//C,
#RK21={l16; r ^^^ ^^^ ^ |r^^^  ^^^^ |r ^^ ^  ^^ ^ ^|r ^^ ^  ^^ ^ ^};//C,
#PT21={l16;`e-^^^ ^^^ ^`|d^^b- ^^g^`|c ^^ b- ^^`c ^|b-^^ g  ^^ e-^};//C,
#PU21={l16; g ^^^ ^^^ ^ |g^^d  ^^d^ |e-^^ ^  ^^ ^ ^|e ^^"b- ^^"b-^};//C,
#OH21={l16; r ^gr>cre-r |g^^^  ^^^^ |c ^^<b- ^^`c ^|b-^^ ^  ^^ ^ ^};//C,
#VN21={l16;`c ^^^ ^^^ ^`|d^^b- ^^g^ |a-^^ g  ^^ a-^|b-^^ g  ^^ e-^};//C,
//C21={l4 ; 6           |3          |4             |1
#PR21={l4 ;[Cm]        [|Gm]       [|Ab]          [|Eb]           };//C
#UH21={l16; c ^^^ ^^^ ^<|b-^^^ ^^r ^|a-^^ g  ^^ a-^|g ^^ ^  ^^>r ^};//C,
#PK21={l16;[4 き   ^r ^  r ^き   ^]};//C,き=キック1
#PM21={l16;[4 か0ぼ^ぼぼ ぼ^か0ぼ^]};//C,か=あたり鉦,ぼ=Hボンゴ
#PN21={l16;[4 ぐ   ^^ ^  ^ ^ぎ   r]};//C,ぎ=短ギロ,  ぐ=長ギロ

#TKaud={Fadeout(2) #TK21};//
#RKaud={Fadeout(2) #RK21};//
#PTaud={Fadeout(2) #PT21};//
#PUaud={Fadeout(2) #PU21};//
#OHaud={Fadeout(2) #OH21};//
#VNaud={Fadeout(2) #VN21};//
//Caud={Fadeout(2) //C21
#PRaud={Fadeout(2) #PR21};//
#UHaud={Fadeout(2) #UH21};//
#PKaud={Fadeout(2) #PK21};//
#PMaud={Fadeout(2) #PM21};//
#PNaud={Fadeout(2) #PN21};//
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK22={ a-^^g  ^^a-^|g ^^^ r^^ ^|a-^^^ r^^ ^ |r ^b-^ b-^ b-^};//C,
#RK22={ r ^^^  ^^^ ^|r ^^^ ^^^ ^|r ^^^ ^^^ ^ |r ^^ ^ ^ ^ ^ ^};//C,
#PT22={ a-^^g  ^^a-^|g ^^f ^^e-^|a-^^^ ^^^ ^ |r ^f r b-r`d r};//C,
#PU22={ c ^^^  ^^^ ^|e-^^d ^^c ^|f ^^c ^^e-^ |d ^^ ^ ^ ^ ^ ^};//C,
#OH22={>#PU22<                                              };//C,
#VN22={ a-^^g  ^^a-^|g ^^f ^^g ^|a-^^^ ^^^ ^ |r ^b-r b-r b-r};//C,
//C22={ 2           |6          |2           |5XX
#PR22={[Fm]        [|Cm]       [|Fm]        [|Bm]           };//Pf右
#UH22={ f ^^e- ^^f ^|e-^^f ^^g ^|a-^^^ ^^r ^"|b-^^ ^ ^ ^ r ^};//C,
#PK22={ #PK21};//C,
#PM22={ #PM21};//C,
#PN22={ #PN21};//C,

#TK23={ r ^g^>c^e-^ |g ^^^  r^^^ |c ^^<b- ^^`c ^|b-^^^ e-^ ^^};//C,≒21
#RK23={ r ^^^ ^^^ ^ |r ^^^  ^^^^ |r ^^ ^  ^^ ^ ^|r ^^^ ^ ^ ^^};//C,
#PT23={`e-^^^ ^^^ ^`|d ^^b- ^^g^`|c ^^ b- ^^`c ^|b-^^^ e-^ ^^};//C,≒21
#PU23={ g ^^^ ^^^ ^ |g ^^d  ^^d^ |e-^^ ^  ^^ ^ ^|e-^^^ ^ ^ ^^};//C,≒21
#OH23={ #OH21};//C,
#VN23={`c ^^^ ^^^ ^`|d ^^b- ^^g^ |a-^^ g  ^^ a-^|b-^^^ e-^ r^};//C,≒21
//C23={ 6           |3           |4             |1
#PR23={[Cm]        [|Gm]        [|Ab]          [|Eb]         };//Pf右,=21
#UH23={ #UH21};//C,
#PK23={ #PK21};//C,
#PM23={ #PM21};//C,
#PN23={ #PN21};//C,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK24={ [a-^^g  ^^a-^|g ^^^ r^^ ^] };//C,
#RK24={ [r ^^^  ^^^ ^|r ^^^ ^^^ ^] };//C,
#PT24={ [a-^^g  ^^a-^|g ^^f ^^e-^] };//C,
#PU24={ [c ^^c  ^^c ^|c ^^d ^^e-^] };//C,
#OH24={>[f ^^e- ^^f ^|e-^^d ^^c ^]<};//C,
#VN24={ [a-^^g  ^^a-^|g ^^g ^^g ^] };//C,
//C24={ [ 2          |6          ]
#PR24={ [[Fm]       [|Cm]        ] };//Pf右
#UH24={ [f ^^e- ^^f ^|e-^^d ^^c ^] };//C,
#PK24={ #PK21};//C,
#PM24={ #PM21};//C,
#PN24={ #PN21};//C,

#TK25={ a-^^g  ^^a-^|b-^^a- ^^b-^`|c ^^b- ^^>c ^|d ^^c  ^^d ^<};//C,=#PT25
#RK25={ r ^^^  ^^^ ^|r ^^^  ^^^ ^ |r ^^^  ^^ ^ ^|r ^^^  ^^^ ^ };//C,
#PT25={ a-^^g  ^^a-^|b-^^a- ^^b-^`|c ^^b- ^^>c ^|d ^^c  ^^d ^<};//C,
#PU25={ c ^^^  ^^^ ^|d ^^^  ^^^ ^ |e-^^^  ^^ ^ ^|f ^^^  ^^^ ^ };//C,
#OH25={ #PT25                                                 };//C,
#VN25={ f ^^e- ^^f ^|g ^^f  ^^g ^ |a-^^g  ^^ a-^|b-^^a- ^^b-^ };//C,
//C25={ 2           |3            |4            |5
#PR25={[Fm]        [|Gm]         [|Ab]         [|Bb]          };//Pf右
#UH25={ #VN25};//C,
#PK25={ #PK21};//C,
#PM25={ #PM21};//C,
#PN25={ #PN21};//C,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^"b-^};//C,
#RK26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^ ^ ^};//C,
#PT26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^"b-^};//C,
#PU26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^ ^ ^};//C,
#OH26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^ b-^};//C,
#VN26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^ ^ ^};//C,
//C26={ 1         |         |           | 
#PR26={[r]       [|r]      [|r]        [|r]        };//Pf右
#UH26={ r^^^ ^^^^ |r^^^ ^^^^|r^^^ ^ ^^^ |r^^^ ^ ^ ^ ^};//C,
#PK26={ か^か^  か^^ ^|か ^か^  か^^ ^|か^か^  か^か^ |か^か^ か^^^ };//C,き=キック1●か=あたり鉦,
#PM26={ ぼ^ぼぼ ぼ^ぼ^|ぼぼぼぼ ぼ^ぼ^|ぼ^ぼぼ ぼ^ぼぼ|ぼ^ぼ^ ぼ^ぼ^};//C,ぼ=Hボンゴ
#PN26={ ぐ^^ ^  r^ ^ ^|r ^ ^ ^  ^ ^^ ^|r ^^ ^  ^ ^^ ^ |r ^^ ^ ^ ^^ ^};//C,ぎ=短ギロ,  ぐ=長ギロmaru

#TKm2={#TK21#TK22#TK23#TK24#TK25#TK26};
#RKm2={#RK21#RK22#RK23#RK24#RK25#RK26};;//Wood
#PTm2={#PT21#PT22#PT23#PT24#PT25#PT26};
#PUm2={#PU21#PU22#PU23#PU24#PU25#PU26};
#OHm2={#OH21#OH22#OH23#OH24#OH25#OH26};
#VNm2={#VN21#VN22#VN23#VN24#VN25#VN26};
#PRm2={#PR21#PR22#PR23#PR24#PR25#PR26};
#PRm2={#PR21#PR22#PR23#PR24#PR25#PR26};
#UHm2={#UH21#UH22#UH23#UH24#UH25#UH26};
#PKm2={#PK21#PK22#PK23#PK24#PK25#PK26};
#PMm2={#PM21#PM22#PM23#PM24#PM25#PM26};
#PNm2={#PN21#PN22#PN23#PN24#PN25#PN26};

//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK31={l16; #PT31 };//E,
#RK31={l16; r ^^ ^ ^ ^^ ^ |r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^|r ^ ^ ^ ^ ^^ ^ };//E,
#PT31={l16; g ^^ ^ ^ ^e-^ |b-^^ ^ ^ ^g ^|f ^g ^ a-^b-^|g ^ ^ ^ f ^^ ^ };//E,
#PU31={l16; r ^e-^ r ^e-^ |r ^e-^ r ^e-^|r ^d ^ r ^f ^|r ^<b-^ b-^b-^>};//E,
#OH31={l16; b-^^ ^ ^ ^g ^`|c ^^ ^ ^ ^b-^|a-^b-^>c ^d ^|e-^ ^ ^ d ^^ ^<};//E,
#VN31={l16; r ^e-^ r ^e-^ |r ^e-^ r ^e-^|r ^b-^ r ^b-^|r ^ b-^ b-^b-^ };//E,
//C31={l4 ; 1             |4            |5            |8       5
#PR31={l4 ;[Eb]          [|Ab]         [|Bb7]         |E7      Bb7    };//Pf右
#UH31={l16; e-^^ ^"b-^^ ^"|a-^^ ^ e-^^ ^|d ^^ ^"b-^^ ^|e-^ ^ ^ d ^^ r };//E,
#PK31={l16;[4 き   ^r    ^ き^r    ^]};//E,き=キック1
#PM31={l16;[4 か0ぼrか0ぼr ぼ^か0ぼr]};//E,か=あたり鉦,ぼ=Hボンゴ
#PN31={l16;[4 ぐ   ^^    ^ ぎrぎ   r]};//E,ぎ=短ギロ,  ぐ=長ギロ

#TK32={ #PT32};//E,
#RK32={ r ^^^ ^ ^^ ^ |r ^^ ^ ^ ^^ ^|r ^^^  ^ ^^^ |r ^^ ^ ^ ^ ^ ^};//E,
#PT32={ e-^^f ^ ^g ^ |c ^^ ^ ^ ^e-^|d ^^c  ^ ^d^"|b-^^ ^ ^ ^"b-^};//E,
#PU32={ c ^^d ^ ^e-^ |c ^^ ^ ^ ^e-^|a-^^^  ^ ^^^ |r ^b-^ b-^ r ^};//E,
#OH32={>c ^^^ ^ ^^ ^ |r ^e-^ e-^r ^|f ^^e- ^ ^f^ |d ^^ ^ ^ ^<b-^};//E,
#VN32={ g ^^^ ^ ^^ ^ |a-^^ ^ g ^^ ^|f ^^^  a-^^^ |g ^^ ^ f ^ ^ ^};//E,
//C32={ 6            |4            |5            |5
#PR32={[Cm]         [|Ab]         [|Bb7]        [|Bb7]          };//Pf右
#UH32={ c ^^^"b-^^ ^"|a-^^ ^ g ^^ ^|f ^^^  a-^^^ |g ^^ ^ f ^ ^ r};//E,
#PK32={ #PK31};//E,
#PM32={ #PM31};//E,
#PN32={ #PN31};//E,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK33={ #PT33};//E,
#RK33={ r ^^ ^ ^^^ ^ |r ^^ ^ ^^^ ^|r ^^ ^ ^ ^^ ^|r ^ ^ ^ ^ ^^ ^ };//E,
#PT33={ g ^^ ^ ^^e-^ |a-^^ ^ ^^g ^|f ^g ^ a-^b-^|g ^ ^ ^ f ^^ ^ };//E,
#PU33={ r ^e-^ r^e-^ |r ^e-^ r^e-^|r ^d ^ r ^f ^|r ^<b-^ b-^b-^>};//E,
#OH33={ b-^^ ^ ^^g ^`|c ^^ ^ ^^b-^|a-^b-^>c ^d ^|e-^ ^ ^ d ^^ ^<};//E,
#VN33={ r ^e-^ r^e-^ |r ^e-^ r^e-^|r ^b-^ r ^b-^|r ^ b-^ a-^a-^ };//E,
//C33={ 1            |4           |5            |8       5
#PR33={[Eb]         [|Ab]        [|Bb7]         |E7      Bb7    };//Pf右
#UH33={ #UH31};//E,
#PK33={ #PK31};//E,
#PM33={ #PM31};//E,
#PN33={ #PN31};//E,

#TK34={ #PT34};//E,
#RK34={ r ^^^ ^ ^^ ^ |r ^^^  ^^ ^ ^|r ^^^  ^ ^ ^ ^|r ^^ ^  ^^ ^ ^};//E,
#PT34={ e-^^f ^ ^g ^ |a-^^b- ^^ c ^|f ^^g  ^ ^ a-^|b-^^`c  ^^`d ^};//E,
#PU34={ c ^^d ^ ^e-^ |e-^^e- ^^ e-^|e-^^e- ^ ^ e-^|f ^^ e- ^^ f ^};//E,
#OH34={>c ^^d ^ ^e-^ |c ^^^  ^^<r ^|a ^^b- ^ ^`c ^|b-^^`c  ^^`d ^};//E,
#VN34={ g ^^g ^ ^g ^ |a-^^^  g^ ^ ^|f ^^^  e-^ ^ ^|b-^^ a- ^^ a-^};//E,
//C34={ 6            |4            |2             |5
#PR34={[Cm]         [|Ab]         [|Fm7]         [|Bb7]          };//Pf右
#UH34={ c ^^^"b-^^ ^"|a-^^ ^ g ^^ r|f ^^^  e-^ ^ ^|d ^^ c  ^^"b-^};//E,
#PK34={ #PK31};//E,
#PM34={ #PM31};//E,
#PN34={ #PN31};//E,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TK35={`e-^^^ ^^g-^|g^^^ ^^a^|b-^^^ ^ ^>d^ |e-^^^ ^^g^<};//F,■g-,a
#RK35={ r ^^^ ^^^ ^|r^^^ ^^^^|r ^^^ ^ ^ ^^ |r ^^^ ^^^^ };//F,
#PT35={`e-^^^ ^^^ ^|^^^^ ^^^^|^ ^^^ ^ ^ ^^ |^ ^^^ r^^^ };//F,
#PU35={ g ^^^ ^^^ ^|^^^^ ^^^^|^ ^^^ ^ ^ ^^ |^ ^^^ r^^^ };//F,
#OH35={`e-^^^ ^^^ ^|^^^^ ^^^^|^ ^^^ ^ ^ ^^ |^ ^^^ r^^^ };//F,
#VN35={ b-^^^ ^^^ ^|^^^^ ^^^^|^ ^^^ ^ ^ ^^ |^ ^^^ r^^^ };//F,
//C35={ 1          |1        |1            |1
#PR35={[Eb]       [|Eb]     [|Eb]         [|Eb]        };//Pf右
#UH35={ #UH11};//F,
#PK35={ [4 き   ^r ^  r ^き   ^]};//F,き=キック1
#PM35={ [4 ぼ   ^ぼぼ ぼ^ぼ   ^]};//F,ぼ=Hボンゴ
#PN35={ [4 か0ぐ^^ ^  ^ ^か0ぎr]};//F,ぎ=短ギロ,ぐ=長ギロ,●か=あたり鉦,

#TK36={>g ^^^ e-^^^|c ^^^<b^^ ^ |b-^^ ^ a-^^ ^|g ^^ ^ f ^^ ^ };//F,■b-,
#RK36={ r ^^^ ^ ^^^|r ^^^ ^^^ ^ |r ^^ ^ ^ ^^ ^|r ^^ ^ ^ ^^ ^ };//F,
#PT36={ r ^^^ ^ ^^^|r ^^^ ^^^ ^ |r ^b-r b-rb-r|b-rb-r b-rb-r };//F,
#PU36={ r ^^^ ^ ^^^|r ^^^ ^^^ ^ |r ^d r d rd r|d rd r d rd r };//F,
#OH36={ r ^^^ ^ ^^^|r ^^^ ^^^ ^ |r ^b-r b-rb-r|b-rb-r b-rb-r };//F,
#VN36={ r ^^^ ^ ^^^|r ^^^ ^^^ ^ |r ^b-r a-ra-r|g rg r f rf r };//F,
//C36={ 1          |1           |1            |1
#PR36={[Eb]       [|Eb]        [|Bb7]        [|Bb7]          };//Pf右
#UH36={ e-^^^ b-^g^|e-^^^ g^e-^<|r ^b-r b-rb-r|b-rb-r b-rb-r>};//F,
#PK36={ [ き   ^r ^  r ^き   ^] |き^r ^ ^^^^  |r^^^   ^^^^   };//F,き=キック1
#PM36={ [ ぼ   ^ぼぼ ぼ^ぼ   ^] |r ^ぼ^ ぼ^ぼ^|ぼ^ぼ^ ぼ^ぼ^ };//F,ぼ=Hボンゴ
#PN36={ [ か0ぐ^^ ^  ^ ^か0ぎr] |か^ぐr ぐrぐr|ぐrぐr ぐrぐr };//F,ぎ=短ギロ,ぐ=長ギロ,●か=あたり鉦,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKm3={#TK31#TK32#TK33#TK34#TK35#TK36};
#RKm3={#RK31#RK32#RK33#RK34#RK35#RK36};
#PTm3={#PT31#PT32#PT33#PT34#PT35#PT36};
#PUm3={#PU31#PU32#PU33#PU34#PU35#PU36};
#OHm3={#OH31#OH32#OH33#OH34#OH35#OH36};
#VNm3={#VN31#VN32#VN33#VN34#VN35#VN36};
#PRm3={#PR31#PR32#PR33#PR34#PR35#PR36};
#PRm3={#PR31#PR32#PR33#PR34#PR35#PR36};
#UHm3={#UH31#UH32#UH33#UH34#UH35#UH36};
#PKm3={#PK31#PK32#PK33#PK34#PK35#PK36};
#PMm3={#PM31#PM32#PM33#PM34#PM35#PM36};//太鼓
#PNm3={#PN31#PN32#PN33#PN34#PN35#PN36};//太鼓

//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKz1={l16; #TK11};//E,
#RKz1={l16; r^^ ^ ^^^ ^|r ^^ ^ ^^^ ^|r^^^ ^ ^^ ^|r^^ ^ ^ ^^ ^};//E,
#PTz1={l16; #PT11                                            };//E,
#PUz1={l16; #PT11                                            };//E,
#OHz1={l16; #OH11                                            };//E,
#VNz1={l16; #VN11                                            };//E,
//Cz1={l4 ; 1          |1           |1          |1
#PRz1={l4 ;[Eb]       [|Eb]        [|Eb]       [|Eb]         };//Pf右
#UHz1={l16; #UH11                                            };//E,
#PKz1={l16; [4 き^r    ^ き^r ^]                   };//E,き=キック1
#PMz1={l16; か0ぼ^か0ぼ^ か^ぼ^ |[3か^か0ぼ^か^ぼ^]};//E,か=あたり鉦,ぼ=Hボンゴ
#PNz1={l16; [4 ぐ^^    ^ ぎr^ ^]                   };//E,ぎ=短ギロ,ぐ=長ギロ

#TKz2={ #TK11};//E,
#RKz2={ r^^ ^ ^^^ ^ |r^^ ^ ^^^  ^|r^^ ^  ^ ^^ ^|r ^^ ^ ^ ^^ ^};//E,
#PTz2={ r^b-r g^e-r<|a^b-r a^b->r|r^b-b- b-rb-r|a ^b-r a ^b-r};//E,
#PUz2={ r^^ ^ ^^^ ^ |r^^ ^ ^^^  ^|r^g g  g ^g ^|g-^g ^ g-^g ^};//E,
#OHz2={ r^b-^ r^b-^ |r^b-^ r^b- ^|r^b-^  b-^b-^|r ^b-^ r ^b-^};//E,
#VNz2={ #VN14                                                };//E,
//Cz2={ 1           |1           |1            |1
#PRz2={[Eb]        [|Eb]        [|Eb]         [|Eb]          };//Pf右
#UHz2={ #UH14                                                };//E,
#PKz2={ [4 き^r    ^ き^r ^]};//E,
#PMz2={ [4 か^か0ぼ^ か^ぼ^]};//E,
#PNz2={ [4 ぐ^^    ^ ぎr^ ^]};//E,
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKz3={ #TK11};//E,
#RKz3={ r ^^ ^ ^^^ ^|r^^ ^ ^^^ ^|r^^ ^ ^^^ ^|r^^ ^ ^^^^};//E,
#PTz3={"b-^e-^ r^e-^|r^e-^ r^e-^|r^e-^ r^e-^|fre-r fr^^};//E,
#PUz3={ #PTz3                                          };//E,
#OHz3={ #OH11                                          };//E,
#VNz3={ #VN11                                          };//E,
//Cz3={ 1           |1          |1          |1
#PRz3={[Eb]        [|Eb]       [|Eb]       [|Eb]       };//Pf右
#UHz3={ #UH11};//E,
#PKz3={ #PKz2};//E,
#PMz3={ #PMz2};//E,
#PNz3={ #PNz2};//E,

#TKz4={ r ^^^ g-^g^|b-^^^`d^^^`|e-^e-^ e-^e-^|e-^^^<v0r};//E,
#RKz4={ r ^^^ ^ ^^^|r ^^^ ^^^^ |r ^^ ^ ^ ^^ ^|r ^^^ v0r};//E,
#PTz4={ r ^^^ ^ ^^^|r ^^^ ^^^^ |r ^g r g rg r|g ^^^ v0r};//E,
#PUz4={ r ^^^ ^ ^^^|r ^^^ ^^^^ |r ^e-r e-re-r|e-^^^ v0r};//E,
#OHz4={ r ^^^ g-^g^|b-^^^>d^^^ |r ^e-r e-re-r|e-^^^<v0r};//E,
#VNz4={ b-^^^ ^ ^^^|^ ^^^ ^^^^ |r ^b-r b-rb-r|b-^^^ v0r};//E,
//Cz4={ 5          |5          |1            |1
#PRz4={[Bb]       [|Bb]       [|Eb]          |Eb   v0r};//Pf右
#UHz4={ r ^^^ ^ ^^^|r ^^^ ^^^^ |r ^e-r e-re-r|e-^^ v0r};//E,
#PKz4={  [ き^r    ^ き^r ^]   |き^^    ^ き   ^^    ^|き   ^^ v0r};//E,き=キック1
#PMz4={  [ か^か0ぼ^ か^ぼ^]   |か^か0ぼ^ か0ぼ^か0ぼ^|か0ぼ^ v0r};//E,か=あたり鉦,ぼ=Hボンゴ
#PNz4={  [ ぐ^^    ^ ぎr^ ^]   |ぐ^^    ^ ぎ   rぎ   r|ぎ v0r};//E,ぎ=短ギロ,ぐ=長ギロ
//bbbDiat EbM7  Fm7    Gm7   AbM7 Bb7  Cm7   Dm7b5 ( E7 )`&"
#TKz={#TKz1#TKz2#TKz3#TKz4};
#RKz={#RKz1#RKz2#RKz3#RKz4};
#PTz={#PTz1#PTz2#PTz3#PTz4};
#PUz={#PUz1#PUz2#PUz3#PUz4};
#OHz={#OHz1#OHz2#OHz3#OHz4};
#VNz={#VNz1#VNz2#VNz3#VNz4};
#PRz={#PRz1#PRz2#PRz3#PRz4};
#PLz={#PLz1#PLz2#PLz3#PLz4};
#UHz={#UHz1#UHz2#UHz3#UHz4};
#PKz={#PKz1#PKz2#PKz3#PKz4};
#PMz={#PMz1#PMz2#PMz3#PMz4};
#PNz={#PNz1#PNz2#PNz3#PNz4};

//■●▲★|| 試聴
Int St=4 //0…前奏〜、1…m1〜、2…m2p〜、3…m3〜、4…公開ver
If(St=0){
#TK={   #TKp #TKm1 #TKm2 #TKm3 #TKz};
#RK={   #RKp #RKm1 #RKm2 #RKm3 #RKz};
#PT={   #PTp #PTm1 #PTm2 #PTm3 #PTz};
#PU={   #PUp #PUm1 #PUm2 #PUm3 #PUz};
#PV={   #PVp #PVm1 #PVm2 #PVm3 #PVz};
#OH={   #OHp #OHm1 #OHm2 #OHm3 #OHz};
#VN={   #VNp #VNm1 #VNm2 #VNm3 #VNz};
#PR={r8;#PRp #PRm1 #PRm2 #PRm3 #PRz};
#PL={   #PLp #PLm1 #PLm2 #PLm3 #PLz};
#UH={   #UHp #UHm1 #UHm2 #UHm3 #UHz};
#PK={   #PKp #PKm1 #PKm2 #PKm3 #PKz};
#PM={   #PMp #PMm1 #PMm2 #PMm3 #PMz};
#PN={   #PNp #PNm1 #PNm2 #PNm3 #PNz};
};
If(St=1){
#TK={   #TKm1 #TKm2 #TKm3 #TKz};
#RK={   #RKm1 #RKm2 #RKm3 #RKz};
#PT={   #PTm1 #PTm2 #PTm3 #PTz};
#PU={   #PUm1 #PUm2 #PUm3 #PUz};
#PV={   #PVm1 #PVm2 #PVm3 #PVz};
#OH={   #OHm1 #OHm2 #OHm3 #OHz};
#VN={   #VNm1 #VNm2 #VNm3 #VNz};
#PR={r8;#PRm1 #PRm2 #PRm3 #PRz};
#PL={   #PLm1 #PLm2 #PLm3 #PLz};
#UH={   #UHm1 #UHm2 #UHm3 #UHz};
#PK={   #PKm1 #PKm2 #PKm3 #PKz};
#PM={   #PMm1 #PMm2 #PMm3 #PMz};
#PN={   #PNm1 #PNm2 #PNm3 #PNz};
};
If(St=2){
#TK={   #TKm2 #TKm3 #TKz};
#RK={   #RKm2 #RKm3 #RKz};
#PT={   #PTm2 #PTm3 #PTz};
#PU={   #PUm2 #PUm3 #PUz};
#PV={   #PVm2 #PVm3 #PVz};
#OH={   #OHm2 #OHm3 #OHz};
#VN={   #VNm2 #VNm3 #VNz};
#PR={r8;#PRm2 #PRm3 #PRz};
#PL={   #PLm2 #PLm3 #PLz};
#UH={   #UHm2 #UHm3 #UHz};
#PK={   #PKm2 #PKm3 #PKz};
#PM={   #PMm2 #PMm3 #PMz};
#PN={   #PNm2 #PNm3 #PNz};
};
If(St=3){
#TK={   #TKm3 #TKz};
#RK={   #RKm3 #RKz};
#PT={   #PTm3 #PTz};
#PU={   #PUm3 #PUz};
#PV={   #PVm3 #PVz};
#OH={   #OHm3 #OHz};
#VN={   #VNm3 #VNz};
#PR={r8;#PRm3 #PRz};
#PL={   #PLm3 #PLz};
#UH={   #UHm3 #UHz};
#PK={   #PKm3 #PKz};
#PM={   #PMm3 #PMz};
#PN={   #PNm3 #PNz};
};
If(St=4){
#TK={   #TKp #TKm1 #TKaud};
#RK={   #RKp #RKm1 #RKaud};
#PT={   #PTp #PTm1 #PTaud};
#PU={   #PUp #PUm1 #PUaud};
#PV={   #PVp #PVm1 #PVaud};
#OH={   #OHp #OHm1 #OHaud};
#VN={   #VNp #VNm1 #VNaud};
#PR={r8;#PRp #PRm1 #PRaud};
#PL={   #PLp #PLm1 #PLaud};
#UH={   #UHp #UHm1 #UHaud};
#PK={   #PKp #PKm1 #PKaud};
#PM={   #PMp #PMm1 #PMaud};
#PN={   #PNp #PNm1 #PNaud};
};
//■●▲★|| Play …… TyokuNal様式チューニング=8vaにつき5.0cent下げる=[BR(1);p%(-40)]
TR=1r%8;CH=1;@(Glockenspiel)r%8;o6; v74;v.Random=6r%8;q93;P=64-56;REV=20r%8;CHO=20;FineTune(68);BR=1;p%(-50)r%8;//#TK;グロ;+1.25oct

TR=2r%8;CH=2;@(Trumpet)     r%8;o5; v79;v.Random=6r%8;q94;P=64-40;REV=20r%8;CHO=20;FineTune(68);BR=1;p%(-30)r%8;//#PT;ペ1;+0.75oct
TR=3r%8;CH=3;@(Trumpet)     r%8;o5; v79;v.Random=6r%8;q94;P=64-32;REV=20r%8;CHO=20;             BR=1;p%(-30)r%8;//#PT;ペ1;+0.75oct

TR=4r%8;CH=4;@(FrenchHorn)  r%8;o5; v79;v.Random=6r%8;q95;P=64-24;REV=20r%8;CHO=20;FineTune(68);BR=1;p%(-20)r%8;//#PU;ペ2;+0.50oct
TR=5r%8;CH=5;@(FrenchHorn)  r%8;o5; v79;v.Random=6r%8;q95;P=64-16;REV=20r%8;CHO=20;             BR=1;p%(-20)r%8;//#PU;ペ2;+0.50oct

TR=6r%8;CH=6;@(FrenchHorn)  r%8;o4; v84;v.Random=6r%8;q96;P=64- 0;REV=20r%8;CHO=20;FineTune(68);            r%8;//#OH;アル;基準
TR=7r%8;CH=7;@(FrenchHorn)  r%8;o4; v84;v.Random=6r%8;q96;P=64+ 8;REV=20r%8;CHO=20;                         r%8;//#OH;アル;基準

TR= 8r%8;CH=10              r%8;o4; v54;v.Random=6r%8;q92;P=64-11;REV=15r%8;CHO=15;                         r%8;//#PK;//打1
TR= 9r%8;CH=10              r%8;o4; v54;v.Random=6r%8;q92;P=64-11;REV=15r%8;CHO=15;                         r%8;//#PM;//打2
TR=10r%8;CH=10              r%8;o4; v54;v.Random=6r%8;q92;P=64-11;REV=15r%8;CHO=15;                         r%8;//#PN;//打3

TR=11r%8;CH=11;@(FrenchHorn)r%8;o4; v89;v.Random=6r%8;q97;P=64+16;REV=20r%8;CHO=20;FineTune(68);BR=1;p%(+20)r%8;//#VN;トロ;-0.5oct
TR=12r%8;CH=12;@(FrenchHorn)r%8;o4; v89;v.Random=6r%8;q97;P=64+24;REV=20r%8;CHO=20;             BR=1;p%(+20)r%8;//#VN;トロ;-0.5oct

TR=13r%8;CH=13;@(FrenchHorn)r%8;o4;v109;v.Random=8r%8;q98;P=64+32;REV=20r%8;CHO=20;FineTune(68);BR=1;p%(+40)r%8;//#UH;ユフォ;-1.00oct
TR=14r%8;CH=14;@(FrenchHorn)r%8;o4;v109;v.Random=8r%8;q98;P=64+40;REV=20r%8;CHO=20;             BR=1;p%(+40)r%8;//#UH;ユフォ;-1.00oct

TR=15r%8;CH=15;@(FrenchHorn)r%8;o3;v119;v.Random=9r%8;q99;P=64+48;REV=20r%8;CHO=20;FineTune(68);BR=1;p%(+80)r%8;//#UH;チュバ;-2.00oct
TR=16r%8;CH=16;@(FrenchHorn)r%8;o3;v119;v.Random=9r%8;q99;P=64+56;REV=20r%8;CHO=20;             BR=1;p%(+80)r%8;//#UH;チュバ;-2.00oct

//■●▲★　パート練習
Int Is=1;//  1=全パート, 2=ペット2, 3=アルト, 4=トロ, 5=ユホ・チュバ, 6=楽譜

If(Is=1){;//●1=全
TR=1;CH=1;r%8   v74;Time(0:0:0);#TK;//グロ

TR=2;CH=2;r%8   v79;Time(0:0:1);#PT;//ペ1
TR=3;CH=3;r%8   v79;Time(0:0:1);#PT;//ペ1

TR=4;CH=4;r%8   v79;Time(0:0:2);#PU;//ペ2
TR=5;CH=5;r%8   v79;Time(0:0:2);#PU;//ペ2

TR=6;CH=6;r%8   v84;Time(0:0:2);#OH;//アル
TR=7;CH=7;r%8   v84;Time(0:0:2);#OH;//アル

TR= 8;CH=10;r%8 v59;Time(0:0:2);#PK;//打1
TR= 9;CH=10;r%8 v59;Time(0:0:2);#PM;//打2
TR=10;CH=10;r%8 v59;Time(0:0:2);#PN;//打3

TR=11;CH=11;r%8 v89;Time(0:0:2);#VN;//トロ
TR=12;CH=12;r%8 v89;Time(0:0:2);#VN;//トロ

TR=13;CH=13;r%8v109;Time(0:0:1);#UH;//ユフ
TR=14;CH=14;r%8v109;Time(0:0:1);#UH;//ユフ

TR=15;CH=15;r%8v119;Time(0:0:0);#UH;//チュ
TR=16;CH=16;r%8v119;Time(0:0:0);#UH;//チュ
};//

If(Is=2){;//●2=ペット2
TR=1;CH=1;r%8   v39;Time(0:0:0);#TK;//グロ

TR=2;CH=2;r%8   v39;Time(0:0:1);#PT;//ペ1
TR=3;CH=3;r%8   v39;Time(0:0:1);#PT;//ペ1

TR=4;CH=4;r%8  v120;Time(0:0:2);#PU;//ペ2
TR=5;CH=5;r%8  v120;Time(0:0:2);#PU;//ペ2

TR=6;CH=6;r%8   v39;Time(0:0:2);#OH;//アル
TR=7;CH=7;r%8   v39;Time(0:0:2);#OH;//アル

TR= 8;CH=10;r%8 v39;Time(0:0:2);#PK;//打1
TR= 9;CH=10;r%8 v39;Time(0:0:2);#PM;//打2
TR=10;CH=10;r%8 v39;Time(0:0:2);#PN;//打3

TR=11;CH=11;r%8 v49;Time(0:0:2);#VN;//トロ
TR=12;CH=12;r%8 v49;Time(0:0:2);#VN;//トロ

TR=13;CH=13;r%8 v49;Time(0:0:1);#UH;//ユフ
TR=14;CH=14;r%8 v49;Time(0:0:1);#UH;//ユフ

TR=15;CH=15;r%8 v49;Time(0:0:0);#UH;//チュ
TR=16;CH=16;r%8 v49;Time(0:0:0);#UH;//チュ
};//

If(Is=3){;//●3=アルト,
TR=1;CH=1;r%8   v39;Time(0:0:0);#TK;//グロ

TR=2;CH=2;r%8   v39;Time(0:0:1);#PT;//ペ1
TR=3;CH=3;r%8   v39;Time(0:0:1);#PT;//ペ1

TR=4;CH=4;r%8   v39;Time(0:0:2);#PU;//ペ2
TR=5;CH=5;r%8   v39;Time(0:0:2);#PU;//ペ2

TR=6;CH=6;r%8  v124;Time(0:0:2);#OH;//アル
TR=7;CH=7;r%8  v124;Time(0:0:2);#OH;//アル

TR= 8;CH=10;r%8 v39;Time(0:0:2);#PK;//打1
TR= 9;CH=10;r%8 v39;Time(0:0:2);#PM;//打2
TR=10;CH=10;r%8 v39;Time(0:0:2);#PN;//打3

TR=11;CH=11;r%8 v49;Time(0:0:2);#VN;//トロ
TR=12;CH=12;r%8 v49;Time(0:0:2);#VN;//トロ

TR=13;CH=13;r%8 v59;Time(0:0:1);#UH;//ユフ
TR=14;CH=14;r%8 v59;Time(0:0:1);#UH;//ユフ

TR=15;CH=15;r%8 v49;Time(0:0:0);#UH;//チュ
TR=16;CH=16;r%8 v49;Time(0:0:0);#UH;//チュ
};//

If(Is=4){;//●4=トロ
TR=1;CH=1;r%8   v39;Time(0:0:0);#TK;//グロ

TR=2;CH=2;r%8   v39;Time(0:0:1);#PT;//ペ1
TR=3;CH=3;r%8   v39;Time(0:0:1);#PT;//ペ1

TR=4;CH=4;r%8   v39;Time(0:0:2);#PU;//ペ2
TR=5;CH=5;r%8   v39;Time(0:0:2);#PU;//ペ2

TR=6;CH=6;r%8   v39;Time(0:0:2);#OH;//アル
TR=7;CH=7;r%8   v39;Time(0:0:2);#OH;//アル

TR= 8;CH=10;r%8 v39;Time(0:0:2);#PK;//打1
TR= 9;CH=10;r%8 v39;Time(0:0:2);#PM;//打2
TR=10;CH=10;r%8 v39;Time(0:0:2);#PN;//打3

TR=11;CH=11;r%8v127;Time(0:0:2);#VN;//トロ
TR=12;CH=12;r%8v127;Time(0:0:2);#VN;//トロ

TR=13;CH=13;r%8 v49;Time(0:0:1);#UH;//ユフ
TR=14;CH=14;r%8 v49;Time(0:0:1);#UH;//ユフ

TR=15;CH=15;r%8 v49;Time(0:0:0);#UH;//チュ
TR=16;CH=16;r%8 v49;Time(0:0:0);#UH;//チュ
};//

If(Is=5){;//●5=ユホ・チュバ
TR=1;CH=1;r%8   v39;Time(0:0:0);#TK;//グロ

TR=2;CH=2;r%8   v39;Time(0:0:1);#PT;//ペ1
TR=3;CH=3;r%8   v39;Time(0:0:1);#PT;//ペ1

TR=4;CH=4;r%8   v39;Time(0:0:2);#PU;//ペ2
TR=5;CH=5;r%8   v39;Time(0:0:2);#PU;//ペ2

TR=6;CH=6;r%8   v39;Time(0:0:2);#OH;//アル
TR=7;CH=7;r%8   v39;Time(0:0:2);#OH;//アル

TR= 8;CH=10;r%8 v39;Time(0:0:2);#PK;//打1
TR= 9;CH=10;r%8 v39;Time(0:0:2);#PM;//打2
TR=10;CH=10;r%8 v39;Time(0:0:2);#PN;//打3

TR=11;CH=11;r%8 v49;Time(0:0:2);#VN;//トロ
TR=12;CH=12;r%8 v49;Time(0:0:2);#VN;//トロ

TR=13;CH=13;r%8v117;Time(0:0:1);#UH;//ユフ
TR=14;CH=14;r%8v117;Time(0:0:1);#UH;//ユフ

TR=15;CH=15;r%8v127;Time(0:0:0);#UH;//チュ
TR=16;CH=16;r%8v127;Time(0:0:0);#UH;//チュ
};//

If(Is=6){;//●楽譜出力
TR=1r%8;CH=1;@(Glockenspiel)r%8;o6; v74;v.Random=6r%8;q93;P=64-56;BR=1;p%(-50)r%8;#TK;//グロ;+1.25oct
TR=2r%8;CH=2;@(Trumpet)     r%8;o5; v79;v.Random=6r%8;q94;P=64-32;BR=1;p%(-30)r%8;#PT;//ペ1;+0.75oct
TR=3r%8;CH=3;@(FrenchHorn)  r%8;o5; v79;v.Random=6r%8;q95;P=64-16;BR=1;p%(-20)r%8;#PU;//ペ2;+0.50oct
TR=4r%8;CH=4;@(FrenchHorn)  r%8;o4; v84;v.Random=6r%8;q96;P=64+ 8;            r%8;#OH;//アル;基準
TR=7r%8;CH=10               r%8;o4; v54;v.Random=6r%8;q92;P=64-11;            r%8;#PK;//打1
TR=8r%8;CH=10               r%8;o4; v54;v.Random=6r%8;q92;P=64-11;            r%8;#PM;//打2
TR=9r%8;CH=10               r%8;o4; v54;v.Random=6r%8;q92;P=64-11;            r%8;#PN;//打3
TR=5r%8;CH=5;@(FrenchHorn)  r%8;o4; v89;v.Random=6r%8;q97;P=64+24;BR=1;p%(+20)r%8;#VN;//トロ;-0.5oct
TR=6r%8;CH=6;@(FrenchHorn)  r%8;o4;v109;v.Random=8r%8;q98;P=64+40;BR=1;p%(+40)r%8;#UH;//ユフォ;-1.00oct
};

