/*
○ダウンロードありがとうございます
・ID_5-3905"etude05"の改訂です。当時、羊飼い様(旧"圭様")に
ヒントをいただき、Harpを使ってみた曲です。今回はPianoの伴奏で。
・音割れや分かりにくい構成などを解消したかったので、音量
などを調整しました。
○label_005ototachi
1部=|"チロシ ツ^シ|ロ^ハ ロ<チツ| シ^^ r^^ | r^^ r^^ |
2部=| r^^ r^^ |r^^ r^^ |<レ^ツ レ^>ハ|<チ^Div{レチレ}チ^r>|
1部=|"チロシ ツ^シ|ツ^レ チツロ|"チ^^ ^^^ |r^^ ^^^ |
2部=| r^^ r^^ |r^^ r^^ | シ^"チ シ^レ|ツ^Div{シツシ}ロ^r|
★オプション 伴奏楽器選択 ……………………………………………*/
Int Inst=1;//…1=ピアノ、2=ハープ
/*
--- from Shakuhachist of Phantom ---
http://www.geocities.jp/apollon_7777
○備忘録
・初掲載 … '07/04/07 ID-5_3905 "etude05_074"
・改訂 …… '07/09/02 ID-同 "ototachi075q"
・改訂 …… '10/09/28 ID-6_0269 "005ototachi1009"
初期設定変更、音量絞る、テンポ若干遅く、
ロツレチ仕様、ピアノ代用可、コード変更、
尺八"&"トル、EP.T→v.Tで代用、繰返数減
・最終更新日'10/10/10 若干調整、誤記を訂正
・本mmlをmidi化したものを『TMIDI-Player』で再生する場合,
『＞演奏モード＞midi map#1～#4』を選択。
『指定なしor自動』では連続スラーの最初が異音となる。
・『>』と『<』は1行内でセットにしておくと、編集時の切り張りが楽。
・TempoChange書式 TempoChange(438,504,!1^1);TempoChange(564,!1^1)初期値省略可
・Modulation.onNoteWave書式…M.W(0,0,!1^1,0,68,!2.)
・Modulation.onTime書式…M.T(0,0,!1^1,0,68,!2.)
*/
//**************************************初期設定 [ META EVENT ]
TrackName={"005ototachi1009_2"}
Copyright={"music by y-nis"}
MetaText ={"乙立花"}//1:33";T=97～100
//**************************************初期設定 [ System Setting ]
ResetXG();ResetGS();ResetGM();
System.TimeBase(96);//--------四分音符分解能
System.MeasureShift(2);//-----小節数のシフト設定
TimeSignature=6,8; //---------拍子(2,4は2/4拍子)
FUNCTION T(Tx){Tempo(Tx)};
FUNCTION TC(Ty,Lg){;テンポ改(Ty,Lg);};//例;TC(92,!2)初期値不要
//~{改}={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は定義していないつもり…)
//■●▲★||尺八設定 … ●Rotsurechi_R101●
//・｢レシ｣重複のため、片仮名｢ドレミ｣と併用不可
//・５孔音量設定 … 基本音v115;
//メリv98(-17);大メリv81(-34);ピv103(-12);カリv127(+12)
~{甲}={>};//そこから8va
~{乙}={<};//そこから-8va
Int Shak8=1;// 1→5孔, 2→7孔
If(Shak8=1){//
//符}={音量音程} 和名| 乙 | 甲 | 大甲 |
~{パ}={v 98b };//盤渉| メハ| メハ| |
~{ヰ}={v127b-};//鸞鏡| |カチ,ヰ| |
~{イ}={v 81b-};//鸞鏡|カチ,半ハ| | |
~{チ}={v115a };//黄鏡| チ| チ| |
~{ウ}={v 98a-};//鳧鐘| メチ| メチ| |
~{レ}={v115g };//双調| レ| |大甲レ|
~{ヘ}={v 98g-};//下無| メレ| メレ| |
~{ツ}={v115f };//勝絶| ツ| ツ|大甲ツ|
~{シ}={v 98e };//平調| メツ| メツ| 四|
~{タ}={v115e-};//断金| | | タ|
~{ッ}={v 81e-};//断金| カロ,ッ|カロ,ッ| |
~{ピ}={v103d };//壱越| | | ピ|
//~{ヒ}={v115d};//壱越| | ヒ| ヒ|//琴譜の記号との関係で削除
~{ロ}={v115d };//壱越| ロ| ロ| |
~{リ}={v 98d-};//上無| メロ| リ| リ|
~{ハ}={v115c };};//神仙| 大メロ| ハ| ハ|
//尺八設定 … ●Rotsurechi_7●
If(Shak8=2){
~{パ}={b};~{ヰ}={b-};~{イ}={b-};~{チ}={a};~{ウ}={a-};
~{レ}={g};~{ヘ}={g-};~{ツ}={f}; ~{シ}={e};~{タ}={e-};~{ッ}={e-};
~{ピ}={d};~{ロ}={d}; ~{リ}={d-};~{ハ}={c};};
//●[イ]を検索すると[ツ]もヒットするのはなぜ？
//Rotsurechi_R101の不具合…「ヘ」は平仮名・片仮名紛らわしい(入力面)
//■●▲★|| Modulation
Str M0={M(11)};//
Str M1={M.W(10,10,!8 ,10,48,!8)};//尺八短
Str M2={M.W(10,10,!4.,10,60,!8)}; //尺八長
Str M3={M.W(10,10,!8 ,10,48,!8)};//ベース短
Str M4={M.W(10,10,!4.,10,58,!8)};//ベース長
//■●▲★|| Harp(Pf)分散和音
~{Ｐ}={r 64;y64,127;r-64};//踏む(y64,127)
~{Ж}={r-64;y64,0 ;r 64};//放す(y64,0)//▼~{}=では「＊」が使えない
~{替}={r-64;y64,0;r16;y64,127;r-32.};//踏み替え(放して踏む)
// ピアノ左 ピアノ右
Str PlDm={替れふ^^^^}; Str PrDm={Жr^Ｐら`れ`ふ`れ};
Str PlEm7b5={替みそ^^^^};Str PrEm7b5={Жr^Ｐし-`れ`み`れ};
Str PlF ={替"ふ"ら^^^^}; Str PrF ={Жr^Ｐどふらふ};
Str PlGm={替"そ"し-^^^^};Str PrGm={Жr^Ｐれそし-そ};
Str PlA ={替"られ-^^^^}; Str PrA ={Жr^Ｐみら`れ-ら};
Str PlBb={替"し-れ^^^^}; Str PrBb={Жr^Ｐふし-`れし-};
Str PlC ={替どみ^^^^}; Str PrC ={Жr^Ｐそ`ど`み`ど};
Str PlC7={替どみ^^^^}; Str PrC7={Жr^Ｐそし-`どし-};
Str PlDbdim={替みそ^^^^};Str PrDbdim={Жr^Ｐし-`れ-`み`れ-};
Str PrBb_Bb1={Ж r ^ Ｐふ し-`れし-|Жr ^ Ｐ>れふし-`れ<};//ピアノ右
Str PlBb_Bb1={替"し-れ ^ ^ ^ ^ |替ふし- ^ ^ ^ ^ };//ピアノ左
Str PrBb_Bb2={>Ж r ^ Ｐふ し->れふ| r ^ ふし->れふ<<<};//ピアノ右
Str PlBb_Bb2={>替"し-れ ^ ^ ^ ^>|"し-れ^ ^ ^ ^ <<};//ピアノ左
Str PrBb_Dm={Ж r ^ ^ Ｐし->れふ|替らふれ ^ ^ ^<};//ピアノ右
Str PlBb_Dm={替"し-れふ ^ ^ ^ |Жr ^ ^ Ｐらふれ};//ピアノ左
//■●▲★|| 打楽器
TR=10;CH=10;
~{マ}={v127;n(Maracas),};//{n70,}
~{ギ}={v57;n(ShortGuiro),};//{n73,}
~{カ}={v73;n(Cabasa),};//{n69}
Str MM1={カ^マママ^ ギ^マママ^};//1節
Str MM4={[4 MM1]};//4節
#MMp={r1.[MM1];[MM4]MM1};
#MMm={[MM4]}
#MMn={[MM4]}
#MMi={[3 MM4]}
#MMz={カ^マママ^ ギ^^^^^}
//■●▲★|| pre(4+4+4+1) inter(4+4+4) 試聴(4+1)
//bNat Dm7 Em7b5 FM7 Gm7 Am7 BbM7 C7 `&"
//bMel DmM7 Em7 (FM7p5) G7 A7 Bm7b5 Dbdim=Edim=Gdim=Bbdim
#SHq={l8; r^^ ^^^|r^^ ^^^|r^^ ^^^ |r^^ ^^^};
#SYq={l8; r^^ ^^^|r^^ ^^^|r^^ ^^^ |r^^ ^^^};
#KTq={l8; r^^ ^^^|r^^ ^^^|r^^ ^^^ |r^^ ^^^};
#SOq={l8;T=97;TC(100,!1); r^^ r^^|r^^ r^^|r^^ r^^ |r^^ ^^^};
#WWq={l8;Slur(2,110) M4;れ^^ ^^^|み^^ ^^^|ふ^^ ^^^M0|そ^^ み^れ-};
//Cq={l4.; [ 1 6 |2 5m]};
#RTq={l4.; [ Dm Bb |Em7b5 A ]};
#PRq={l16;v.T(115,90,!1^4)[PrDm PrBb |PrGm PrA : v.T(110,85,!1^4)]};//v75
#PLq={l16;v.T(115,90,!1^4)[PlDm PlBb |PlGm PlA : v.T(110,85,!1^4)]};//v75
//bNat Dm7 Em7b5 FM7 Gm7 Am7 BbM7 C7 `&"
//bMel DmM7 Em7 (FM7p5) G7 A7 Bm7b5 Dbdim=Edim=Gdim=Bbdim
#SHr={l8 ;X=117"チロシ ツ^シ |M1;ロ^^M0; r^^ |"レハロ シ^シ|M1;ツ^^M0; r^^ };//弱く
#SYr={l8 ;X=117"ツ"チハ ロ^<チ|M1;レ^^M0; r^^ | シツレ>ハ^ハ|M1;ロ^^M0; r^^ };//弱く
#KTr={l8 ;v70 r^^ r^^ | そ>れみ ふ^そ | み^^ <r^^ | ら>れふ み^<ら};
#SOr={l8 ;v70 r^^ r^^ | れそし-`れ^`み |`ど^^ r^^ | ふら`れ`れ-^み};
#WWr={l8 ; M3;れ^^ ふ^^M0| そ^ふ み^れM4| ど^^ ^^^M3| れ^^M0;み^れ-};
//Cr={l4.; 1 | 4 | 7 77 | 1 5m };
#RTr={l4.; Dm Dm | Gm Gm | C C7 | Dm A }
#PRr={l16;v75 PrDm PrDm | PrGm PrGm |PrC PrC7 |PrDm PrA };//v75=v.Tは繰り返してしまうらしい
#PLr={l16;v75 PlDm PlDm | PlGm PlGm |PlC PlC7 |PlDm PlA };
#SHs={ "チロツ ロ^レM1|チ^^M0; r^^ |"チシチ レ^シ |Z(112,77,!1) M2; ロ^^ ^^^||^^^M0;X=127r^^};//弱く
#SYs={ "ツ"チロ"イ^シM1|ツ^^M0; r^^ |"シ"チシ シ^"イ|Z(102,67,!1) M2;"イ^^ ^^^||^^^M0;X=127r^^};//弱く
#KTs={ `れ^^ r^^ |ら>どふ ら^ふ | み^^ r^^ | れ^^ ^^^||^^^<r^^};
#SOs={ ら^^ r^^ |ふら`ど`ふ^`れ |`れ-^^ r^^ | ふ^^ ^^^||TC(99,!2)r^^r^^};
#WWs={M4;れ^^ ^^M0;み|ふ^み れふそM3| ら^^ そ^^M4| ふ^^ ^^^||^^^M0; r^^};
//Cs={ 1 6 |3 1 | 5m 7m | 6 || 6 };
#RTs={ Dm Bb | F Dm | A Dbdim | Bb Bb || Bb Bb };
#PRs={ PrDm PrBb |PrF PrDm |PrA PrDbdim |v.T(85,120,!1^4.)PrBb_Bb1||PrBb_Bb2;v75 };//v75
#PLs={ PlDm PlBb PlF PlDm |PlA PlDbdim |v.T(85,120,!1^4.)PlBb_Bb1||PlBb_Bb2;v75 };//v75
//bNat Dm7 Em7b5 FM7 Gm7 Am7 BbM7 C7 `&"
//bMel DmM7 Em7 (FM7p5) G7 A7 Bm7b5 Dbdim=Edim=Gdim=Bbdim
//●ToCoda
#SHs2={ "チロツ ロ^レM1|チ^^M0; r^^ |"チシチ レ^シ M2|Z(112,77,!2) ロ^^ ^^^M0;v0};
#SYs2={ "ツ"チロ"イ^シM1|ツ^^M0; r^^ |"シ"チシ シ^"イM2|Z(102,67,!2)"イ^^ ^^^M0;v0};
#KTs2={ `れ^^ r^^ |ら>どふ ら^ふ | み^^ r^^ | れ^^ ^^^< };//≒KTs
#SOs2={ ら^^ r^^ |ふら`ど`ふ^`れ |`れ-^^ r^^ |TC(99,!2) ふ^^ ^^^ };//≒SOs
#WWs2={M4;れ^^ ^^M0;み|ふ^み れ^ふM3| ら^^ そ^^ M4|Z(122,70,!2) ふ^^ ^^^M0};//≒WWs
//Cs2={ 1 6 |3 1 | 5m 7m | 6 };//≒/Cs
#RTs2={ Dm Bb |F Dm | A Dbdim | Bb Bb };//≒RTs
#PRs2={ PrDm PrBb |PrF PrDm |PrA PrDbdim |v.T(85,105,!2)PrBb_Bb1 };//≒PRs
#PLs2={ PlDm PlBb |PlF PlDm |PlA PlDbdim |v.T(85,105,!2)PlBb_Bb1 };//≒PLs
//●4+4+5
#SHp={#SHq#SHr#SHs};
#SYp={#SYq#SYr#SYs};
#KTp={#KTq#KTr#KTs};
#SOp={#SOq#SOr#SOs};
#WWp={#WWq#WWr#WWs};
#PRp={#PRq#PRr#PRs};
#PLp={#PLq#PLr#PLs};
//●4+4+4 ●ToCoda
#SHi={#SHq#SHr#SHs2};
#SYi={#SYq#SYr#SYs2};
#KTi={#KTq#KTr#KTs2};
#SOi={#SOq#SOr#SOs2};
#WWi={#WWq#WWr#WWs2};
#PRi={#PRq#PRr#PRs2};
#PLi={#PLq#PLr#PLs2};
//■●▲★|| main 4*6
//bNat Dm7 Em7b5 FM7 Gm7 Am7 BbM7 C7 `&"
//bMel DmM7 Em7 (FM7p5) G7 A7 Bm7b5 Dbdim=Edim=Gdim=Bbdim
#SH1={l8 ; "チロシ ツ^シ |ロ^ハ ロ<チツ M1|X=77シ^^M0;>r^^ | r^^ X=127 r^^ };
#SY1={l8;TC(100,!2);r^^r^^ |r^^ r^^ |<レ^ツ レ^>ハ |<チ^Div{レチレ}チ^r> };
#KT1={l8v60; ふら>ど れ^ど< |し-^そ らふれ | み^れ み^そ | ふ^れ み^^ };
#SO1={l8v60;"られふ ら^ふ |そ^れ ふれ"ら | ど^"そ ど^み | れ^"ら "ら^^ };
#WW1={l8;M3; れ^^ ^M0;みふM3|そ^^ ^M0;らし-M4|`ど^^ ^^M0;し-M4| ら^^ ^^M0;`れ-};
//C1={l4.; 1 1 | 4 1 | 7 77 | 1 5m };
#RT1={l4.; Dm Dm | Gm Dm | C C7 | Dm A };
#PR1={l16; PrDm PrDm |PrGm PrDm |PrC PrC7 |PrDm PrA };
#PL1={l16; PlDm PlDm |PlGm PlDm |PlC PlC7 |PlDm PlA };
#SH2={"チロシ ツ^シ | ツ^レ チツロM1|X=77"チ^^M0;r^^TC(99,!2)| r^^ X=127 r^^ };
#SY2={ r^^ r^^ | r^^ r^^ | シ^"チ シ^レ | ツ^Div{シツシ}ロ^r };
#KT2={ ふら`ど `れ^`ど |`ど^`ど`れ^ら | ら^み そ^し-|`れ^し- ら^^ };
#SO2={ れふら し-^ら | ら^ら ら^ふ | み^れ- み^そ | し-^ふ ふ^^ };
#WW2={`れ^`どM3;し-^^M0| ふ^み れみふM3| ら^^ そ^^M4| ふ^^ ^^^M0};
//C2={ 1 6 | 3 1 | 5m 7m | 6 1 };
#RT2={ Dm Bb | F Dm | A Dbdim| Bb Dm };
#PR2={PrDm PrBb |PrF PrDm |v.T(85,115,!1^4)PrA;PrDbdim|PrBb_Dm;v85};//い3らし-どれ //い4らそふれ
#PL2={PlDm PlBb |PlF PlDm |v.T(85,115,!1^4)PlA;PlDbdim|PlBb_Dm;v85};
#SHm={#SH1#SH2};
#SYm={#SY1#SY2};
#KTm={#KT1#KT2};
#SOm={#SO1#SO2};
#WWm={#WW1#WW2};
#PRm={#PR1#PR2};
#PLm={#PL1#PL2};
//bNat Dm7 Em7b5 FM7 Gm7 Am7 BbM7 C7 `&"
//bMel DmM7 Em7 (FM7p5) G7 A7 Bm7b5 Dbdim=Edim=Gdim=Bbdim
#SH3={l8 ;r^^ ^^^ |r^^ ^^^ | r^^ ^^^ |r^^ ^^^ };
#SY3={l8;TC(100,!2);r^^r^^ |r^^ r^^ | r^^ ^^^ |r^^ ^^^ };
#KT3={l8v80;ら>れみ ふ^み |れ^ど れ<らふ | そ^ふ そ^`ど |ら16.ふ^32Div{そらそ}ら^^};//★l16,l32■Div{そ&ら&そ}
#SO3={l8v80;ふら`ど `れ^`ど|し-^そ らふれ | み^れ み^そ |ふ^れ み^^};//
#WW3={l8;M3;れ^^ ^M0;みふM3|そ^^M0;そらし-M4|`ど^^ ^^M0;し-M4|ら^^ ^^M0;`れ- };//=WW1
//C3={l4.; Dm Dm |Gm Dm | C C7 | Dm A };//=/C1
#RT3={l4.;#RT1};//=#RT1
#PR3={l16;#PR1};//=#PR1
#PL3={l16;#PL1};//=#PL1
#SH4={ r^^ ^^^ | r^^ ^^^ | r^^ r^^ | r^^ r^^ };
#SY4={ r^^ ^^^ | r^^ ^^^ | r^^r^^TC(98,!2)| rr^ r^^ };
#KT4={ ら>れみ ふ^み | ふ^そ らふれ | み^"ら み^そ | ふ^Div{みふみ}れ^^<v60};//■Div{み&ふ&み}
#SO4={ ふら>ど れ^ど | ど^ど れ^<ら | ら^み そ^し-|`れ^し- ら^^ v60};
#WW4={`れ^`どM3;し-^^M0| ふ^み れみふM3| ら^^ そ^^M4| ふ^^ ^^^M0};//=WW2
//C4={ Dm Bb | F Dm | A Dbdim| Bb Dm };//=/C2
#RT4={ Dm Bb | F Dm | A Dbdim| Bb Dm };//=#RT2
#PR4={PrDm PrBb |PrF PrDm|v.T(75,110,!1^4)PrA PrDbdim|PrBb_Dm;v85 };//=#PR2
#PL4={PlDm PlBb |PlF PlDm|v.T(75,110,!1^4)PlA PlDbdim|PlBb_Dm;v85 };//=#PL2
#SHn={#SH3#SH4};
#SYn={#SY3#SY4};
#KTn={#KT3#KT4};
#SOn={#SO3#SO4};
#WWn={#WW3#WW4};
#PRn={#PR3#PR4};
#PLn={#PL3#PL4};
//■●▲★|| Coda 2 替ЖＰ
#SHz={l8 ;v0r};
#SYz={l8 ;v0r};
#KTz={l8 ;v0r};
#SOz={l16;TC(58,!4) r ^ ^ r ^T(54)v0r};
#WWz={l8 ;v0r};
//Cz={l4.; 1 | 1};
#RTz={ Dm | D};
#PRz={l16;v.T(96,120,!4^8)Ж r ^ ^Ｐ>れふら l32|替 r ^ Div{>れそ-ら}^`れ^ ^^^|^^^ ^^^|Жv0r};//★l32;
#PLz={l16; v(96)替れv(104)ふら ^ ^ ^v(112)l32|替>Div{れそ-}ら ^ ^ ^ ^ ^^^|^^^ ^^^|Жv0r};//★l32;
//■●▲★|| 集計
Int Strt=0;//編集用//0=p～、1=m～、2=n～、3=試聴
If(Strt=0){
#SH={#SHp [#SHm]#SHn #SHi #SHz};
#SY={#SYp [#SYm]#SYn #SYi #SYz};
#KT={#KTp [#KTm]#KTn #KTi #KTz};
#SO={#SOp [#SOm]#SOn #SOi #SOz};
#WW={#WWp [#WWm]#WWn #WWi #WWz};
#PR={#PRp [#PRm]#PRn #PRi #PRz};
#PL={#PLp [#PLm]#PLn #PLi #PLz};
#MM={#MMp [#MMm]#MMn #MMi #MMz};};
If(Strt=1){
#SH={#SHm#SHn #SHi #SHz};
#SY={#SYm#SYn #SYi #SYz};
#KT={#KTm#KTn #KTi #KTz};
#SO={#SOm#SOn #SOi #SOz};
#WW={#WWm#WWn #WWi #WWz};
#PR={#PRm#PRn #PRi #PRz};
#PL={#PLm#PLn #PLi #PLz};
#MM={#MMm#MMn #MMi #MMz};};
If(Strt=2){
#SH={#SHn #SHi #SHz};
#SY={#SYn #SYi #SYz};
#KT={#KTn #KTi #KTz};
#SO={#SOn #SOi #SOz};
#WW={#WWn #WWi #WWz};
#PR={#PRn #PRi #PRz};
#PL={#PLn #PLi #PLz};
#MM={#MMn #MMi #MMz};};
If(Strt=3){//試聴用
#SH={#SHq #SHm #SHq #SHz};
#SY={#SYq #SYm #SYq #SYz};
#KT={#KTq #KTm #KTq #KTz};
#SO={#SOq #SOm #SOq #SOz};
#WW={#WWq #WWm #WWq #WWz};
#PR={#PRq #PRm #PRq #PRz};
#PL={#PLq #PLm #PLq #PLz};
#MM={#MMq #MMm #MMq #MMz};};
//■●▲★|| Play
Int Ply=1;
If(Ply=1){//演奏用
TR=1; CH=1; @(Flute);;;;q99;o6;V=99;v.Random=9;//@1
P=64-37;REV=15;CHO=30;M=10;BR=1;p%(-50);FineTune(68);Time(0:0:0);#SH;//+1.25oct→p%(-50)=-6.25cent
TR=2; CH=2; @(PanFlute);q99;o6;V=99;v.Random=9;//@1
P=64-29;REV=15;CHO=30;M=10;BR=1;p%(-50); Time(0:0:0);#SH;//+1.25oct→p%(-50)=-6.25cent
TR=3; CH=3; @(Recorder);q98;o6;V=94;v.Random=9;//@1
P=64-21;REV=15;CHO=30;M=10;BR=1;p%(-40);FineTune(68);Time(0:0:1);#SY;//+1.0oct→p%(-40)=-5.0cent
TR=4; CH=4; @(PanFlute);q98;o6;V=94;v.Random=9;//@1
P=64-13;REV=15;CHO=30;M=10;BR=1;p%(-40); Time(0:0:1);#SY;//+1.0oct→p%(-40)=-5.0cent
TR=5; CH=5; @(Koto);;;;;q95;o5;v64;;v.Random=6;//@1■&
P=64+27;REV=15;CHO=20;M=10;BR=1;p%(-50);FineTune(68);Time(0:0:1);#KT;//+1.25oct→p%(-50)=-6.25cent
TR=6; CH=6; @(Koto);;;;;q95;o5;v64;;v.Random=6;//@1
P=64+35;REV=15;CHO=20;M=10;BR=1;p%(-50); Time(0:0:1);#KT;//+1.25oct→p%(-50)=-6.25cent
TR=7; CH=7; @(Koto);;;;;q94;o5;v60;;v.Random=5;//@1
P=64+43;REV=15;CHO=20;M=10;BR=1;p%(-40);FineTune(68);Time(0:0:0);#SO//+1.0oct→p%(-40)=-5.0cent
TR=8; CH=8; @(Koto);;;;;q94;o5;v60;;v.Random=5;//@1
P=64+51;REV=15;CHO=20;M=10;BR=1;p%(-40); Time(0:0:0);#SO//+1.0oct→p%(-40)=-5.0cent
TR=10;CH=10;q94;音量曖昧さ8;l16;
P(64+19);REV(0);CHO(0);Time(0:0:2);#MM
TR=11;CH=11;@(GrandPiano);q96;o4;V=110;v.Random=9;If(Inst=2){@(OrchestralHarp)q65};
P=64-07;REV=10;CHO=10;M=10;BR=1;p%(+00); Time(0:0:2);#PR//-0oct→//基準
TR=12;CH=12;@(GrandPiano);q96;o4;V=107;v.Random=9;If(Inst=2){@(OrchestralHarp)q65};
P=64-02;REV=10;CHO=10;M=10;BR=1;p%(+20); Time(0:0:2);#PL//-0.5oct→p%(+20)=+2.5cent
TR=13;CH=13;@(Cello);;;;;;;;;;q97;o4;v86;;;v.Random=8;//@1
P=64+08;REV=10;CHO=10;M=10;BR=1;;p%(+10);FineTune(68);Time(0:0:2);#WW//-0.25oct→p%(+10)=+1.25cent
TR=14;CH=14;@(Cello);;;;;;;;;;q97;o4;v86;;;v.Random=8;//@1
P=64+13;REV=10;CHO=10;M=10;BR=1;;p%(+10); ;Time(0:0:2);#WW//-0.25oct→p%(+10)=+1.25cent
TR=15;CH=15;@(PickBass);;;;;;;q93;o3;v58;;;v.Random=5;//@1
P=64+03;REV=10;CHO=10;M=10;BR=1;;p%(+60); ;Time(0:0:3);#WW//-1.25oct→p%(+50)=+6.25cent
};
If(Ply=2){//楽譜印刷
TR=1; CH=1; @(Flute);;;;q99;o6;V=99;v.Random=9;//@1
P=64-29;REV=15;CHO=30;M=10;BR=1;p%(-50); Time(0:0:0);#SH;//+1.25oct→p%(-50)=-6.25cent
TR=2; CH=2; @(Recorder);q98;o6;V=94;v.Random=9;//@1
P=64-13;REV=15;CHO=30;M=10;BR=1;p%(-40); Time(0:0:1);#SY;//+1.0oct→p%(-40)=-5.0cent
TR=3; CH=3; @(Koto);;;;;q95;o5;v64;;v.Random=6;//@1
P=64+35;REV=15;CHO=20;M=10;BR=1;p%(-50); Time(0:0:1);#KT;//+1.25oct→p%(-50)=-6.25cent
TR=4; CH=4; @(Koto);;;;;q94;o5;v60;;v.Random=5;//@1
P=64+51;REV=15;CHO=20;M=10;BR=1;p%(-40); Time(0:0:0);#SO//+1.0oct→p%(-40)=-5.0cent
TR=5;CH=5;@(GrandPiano);q96;o4;V=80;v.Random=8;If(Inst=2){@(OrchestralHarp)q65};
P=64-07;REV=10;CHO=10;M=10;BR=1;p%(+00); Time(0:0:2);#PR//-0oct→//基準
TR=6;CH=6;@(GrandPiano);q96;o4;V=77;v.Random=7;If(Inst=2){@(OrchestralHarp)q65};
P=64-02;REV=10;CHO=10;M=10;BR=1;p%(+20); Time(0:0:2);#PL//-0.5oct→p%(+20)=+2.5cent
TR=7;CH=7;@(Cello);;;;;;q97;o4;v81;;v.Random=8;//@1
P=64+13;REV=10;CHO=10;M=10;BR=1;;p%(+10); ;Time(0:0:2);#WW//-0.25oct→p%(+10)=+1.25cent
TR=8;CH=10;q93;音量曖昧さ8;l16;
P(64+19);REV(0);CHO(0);Time(0:0:2);//#MM
};