/*
◎ご試聴、ありがとうございます。よかったら保存してね。
◎ジャンルを「ダンス・シャミセニカ」としました…ダンス・エレ
クトロニカの仲間に入れていただきたいのですが…「ダメ」とか、
「イマイチ」といった意見も、たくさんいただきたいので、よろし
くお願いします。

○Aメロ
|ロ^^^ ロ^^ツ|チ^チ^ ^^チ^|イ^チ^ レ^ イ^|チ^^^r^^^|
|ツ^^^ ツ^^ロ|チ^チ^ ^^ツ^|レ^レ^ レツレ^|チ^^^r^^^|
○Bメロ
| ロ^^^ ^^シ^|ツ^^^ ^^ロ^ |ツ^^^  レツレ^|チ^^^ ^^r^|
|>ロ^^^ ロ^^^|ハ^^^ ^^ロ^<|チ^^ツ ^^レ^  |チ^^^ ^^r^|

◎『南砺市井波』
　私事ですが、2011年、南砺市(旧井波町)勤務になりました…車を
走らせていると、八乙女山付近にだけ雲がかかっているのを見るこ
とがあります。
　その左右の山々も、特別に高いとか低いということがないのに、
八乙女山付近だけ、向こう(南)側から雲が舞い降りているような光
景です。その様子から、八乙女山の周辺が『風の通り道』になって
いるのではないかと推察します。それはまた、ちょっと神秘的な感
じもします。
　そんな時、私は通勤路を外れ、高瀬神社の前へ出ます。愛用のデ
ジカメは古い物ですが、横巾3000ドットぐらいで撮ることができる
ので、うまく撮れた部分を1600ドット分だけトリミングして保存し
ています。
　歴史的には、紀元前13年ごろに高瀬神社ができたこと（景行天皇
の時代ではないかと推察されている）、1390年に綽如上人が瑞泉寺
を建立したこと……などを聞きますと、やはり八乙女山のふもとは
パワースポットなのかもしれません。

◎編集時の留意事項
・津軽三味線の雰囲気出しを、リズミカルに。
・テンポ120BPMあたり,３拍目にHandClap,
・和風にこだわり、時々和太鼓を散りばめる…（インドのタブラも可）
・H゛様のアドバイス(ID5_4499"INTO MY FIRE"のコメント)を参考に。
　　90年代以降のユーロビートの特徴は、（H゛様作のようなユーロ曲とは同列にできないでしょうが）
　　・リフ/Aメロ/Bメロ/サビ/リフ〜EXTENDED部(繰り返しなど)の構成
　　・上下の単純なベースと単純な四つ打ちパーカス
　　・分かりやすいキャッチャー(ベタ)なメロディライン・歌詞
　　・大量生産！
　　これが必須条件。あとは
　　・サビのタイトルコール
　　・アウトロのフェードアウト
　　・後から声だけ抜き出してREMIXしやすくするためにEXTENDED部でBGMだけの部分を作る
　　・フロア向け音楽だけど、ビートはあまり崩さないしブレイクなどもない。拍をずらすのも不可。
　　こんな感じです。

--- from Shakuhachist of Phantom ---
http://www.geocities.jp/apollon_7777

◎備忘録
・初掲載 … '11/11/08 ID6_0741 … File-No'10/01/09(=編集開始日)
  同時掲載  '11/11/08 ID5_6352 … TW-Musicで試聴可
・改訂b  … '11/11/11 低音楽器を中央に配置(騎士王様の助言)
・改訂c  … '11/11/14 終末部のタイミングを揃える。
・TyokuNal様式チューニング【8vaにつき5.0cent下げる=[BR(1);p%(-40)]】参考ID_4455[四季-秋]
・adas様式デチューニング【片方だけFineTune(68)を記入;4/64≒6cent上げる】参考ID_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
・[FUNCTION Y]…サクラでは"Y"は既予約関数なので、設定できない(ID6_0670"n.様のコメント")
・[イ]を検索すると[ツ]もヒットするのは、サクラが「文字コード表」を探すとき、
大文字・小文字の関係で0x20を足した文字も拾うから。(ID6_0670"n.様のコメント")
*/

//■●▲★||初期設定
ResetXG();ResetGS();ResetGM();
TrackName={"033power_spot2011c"};
Copyright={"music by y_nis"};
MetaText ={"Inami-Wind"};
System.TimeBase(192);
//System.Include(chord2.h); //--
TimeSignature=4,2;
System.MeasureShift=2;
Int ky=0 ; //キーの高さ( 0;1尺8寸管、-3;2尺1寸管)
System.Keyshift=(ky)		
FUNCTION T(Tx){;Tempo(Tx);};T=120;//T=Tempo
~{改}={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)};

//■●▲★||尺八設定 … ●Rotsurechi1001●
//・Ist=1→5孔,Ist=2→7孔
//・｢レシ｣重複のため、片仮名｢ドレミ｣と併用不可
//・５孔音量設定 … 基本音v115; 
//メリv98(-17);大メリv81(-34);ピv103(-12);カリv127(+12)
~{甲}={>};//そこから8va
~{乙}={<};//そこから-8va
If(Ist=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(Ist=2){
~{パ}={b};~{ヰ}={b-};~{イ}={b-};~{チ}={a};~{ウ}={a-};
~{レ}={g};~{ヘ}={g-};~{ツ}={f}; ~{シ}={e};~{タ}={e-};~{ッ}={e-};
~{ピ}={d};~{ロ}={d}; ~{リ}={d-};~{ハ}={c};};
//Rotsurechi_R101の不具合…「ヘ」は平仮名・片仮名紛らわしい(入力面)

//■●▲★|| Modulation/Exp
Str M0={M(11)};
Str Ml={M.W(11,11,!8.,11,66,!16)};//尺八長
Str Ms={M.W(11,11,!8, 11,54,!16)};//尺八短
Str Mk={M.W(64,11,!8.)}; //琴
Str Mw={M.W(11,11,!8.,11,50,!16)};//ベース長
Str Mx={M.W(11,11,!8 ,11,46,!16)};//ベース短

Str Mv={M.W(11,11,!8.,11,58,!16)};//Vn長
Str Mu={M.W(11,11,!8, 11,54,!16)};//Vn短
Str PU={EP.T(107,127,!4)};//Vn_cresc
Str PL={EP.T(127,107,!2)};//Vn_dec

//■●▲★|| Chord_110402_最終Dm9_triad"aug"→"mM7"
//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 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 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 Cm6= {'ce-ga'}; Str Ebb5={'e-ga'};//Cm6=Am7b5
//7b5
Str Gb7b5={'"g-"b-ce'};//Str C7o5={'"b-ce'};
//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 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-'};
//m7p5
Str Gm7p5= {'"g"b-e-f'};Str Bbsus4={'"b-e-f'};
Str Bm7p5={'"bdga'};//Str Dsus4={'dga'};
//9_改訂110402
Str A9= {'"ad-gb'};  Str Dbm7b5o3={'d-gb'};
Str C9= {'ceb-`d'};  Str Em7b5o3={'eb-`d'};
Str Eb9={'e-g`d-`f'};Str Gm7b5o3={'g`d-`f'};
Str F9= {'"f"ae-g'}; Str Am7b5o3={'"ae-g'};
Str G9= {'"g"bfa'};  Str Bm7b5o3={'"bfa'};
//m9
Str Dm9= {'df`c`e'};   Str FM7o3= {'f`c`e'};
//M_add9
Str Aadd9= {'"ad-eb'}; Str Dbm7o5={'d-eb'};
Str Cadd9= {'ceg`d'};//Str Em7o5= {'eg`d'};
Str Ebadd9={'e-gb-`f'};Str Bm7o5= {'"gb-`f'};
Str Fadd9= {'"f"acg'};//Str Am7o5={'"acg'}; 
//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'};

//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 )`&"

//bDia  FM7  Gm7    Am7  BbM7 C7  Dm7   Em7b5 ( Gb7 )`&"

//■●▲★|| 転調 Dmの場合
Str MIN={調#();};//D-Minor
Str MJR={調#(fbc);};//D-Major
//調#(fbc)で上がる音
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7
//      fc   b-     f     b-f c   b-f   b-
//##Di  DM7  Em7    Gbm7  GM7 A7  Bm7   Dbm7b5 ( Eb7 )


//■●▲★|| pre & inter
~{く}={n(ClosedHiHat),}//n42(クローズ)
~{お}={n(OpenHiHat),}//n46(オープン)
~{き}={v 97;n(Kick1),}//n36(キック)
~{て}={v 87;n(HandClap),};//n39(手)
~{ろ}={v 83;n(LowTom2),};//n41(ロー)
~{み}={v 80;n(MidTom2),};//n45(ミッド)
~{は}={v 77;n(HighTom2),};//n48(ハイ)
~{し}={v105;n(CrashCymbal1),}//n49(シンバル)
//■●▲★|| pre & inter
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHp1={l16;  r^^^    ^^^^  |r^ツ^ ロ^r^|r^^^    ^^^^  |r^ツ^  ロ^r^};//甲
#KTp1={l16;  ロロ^ロ"チ^ハ^|r^ロ^ ロ^r^|ロロ^ロ"チ^ハ^|r^ロ^  ロ^r^};
#SMp1={l16;  r^^^    ^^^^  |r^^^  ^^^^ |r^^^    ^^^^  |r^^^   r^^^ };//調弦["dad]
#JJp1={l4 ; [F]           [|F]        [|Dm]          [|Dm]         };
//Cp1={l4 ;  1             |1          |6             |6           };
#PLp1={l4 ;['d`d']       ['|d`d']   ['"|b-b-']     ['"|b-b-']      };
#RTp1={l4 ; [Dm7]         [|Dm7]      [|BbM7]        [|BbM7]       };
#WWp1={l16;  r^^^    ^^^^  |r^d^  d^^^ |r^^^    ^^^^  |r^"b-^"b-^r^};
#PKp1={l16;  き^^^   て^^^ |き^^^ て^^^|き^^^   て^^^ |き^^^  て^^^};

//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHp2={l16;M0;r^^^    r^^^  |r^イ^ レ^r^||r^^^ r^^^<|チチrチ チrチr>};//甲
#KTp2={l16;M0;レレ^レ ロ^ツ^|r^レ^ レ^r^||aa^a a^a^ |r^  ^^  r^ ^^  };
#SMp2={l16;   r^^^    r^^^  |r^^^  r^^^ ||r^^^ ^^^^ |r^  ^^  ^^ ^^  };//調弦["dad]
#JJp2={l4 ;  [Bb]          [|Bb]       [||Dbmb5]   [|Dbmb5]       };
//Cp2={l4 ;   4             |4          ||5         |5          };
#PLp2={l4 ;['"gg']       ['"|gg']    ['"||aa']   ['"|aa']     };
#RTp2={l4 ;  [Gm7]         [|Gm7]      [||A7]      [|A7]          };
#WWp2={l16;M0;r^^^    ^^^^  |r^"g^"g^r^ ||r^^^ ^^^^<|aa  ^a  a^ a^> };
#PKp2={l16;   き^^^   て^^^ |き^^^ て^^^||き^^^て^^^|き^^^   て^^^  };

#SHp3={M0;r^^^  ^^^^  |r^^^  ^^^^    ||r^^^   ^^^^  |r^^^    ^^^^ };
#KTp3={M0;aa^a  a^a^  |r^^^  ^^^^   "||a^aa  "g^gg "|f^ff   "e^ee };
#SMp3={   r^^^  ^^^^ <|aa^a  a^a^>   ||r^aa   r^gg  |r^ff    r^ee };//調弦["dad]
#JJp3={  [Dbmb5]     [|Dbmb5]        ||F      Bb    |Dm      Dbmb5};
//Cp3={   5           |5             ||1      4     |6       5m   };
#PLp3={['"aa']     ['"|aa']         '||d`d'  'd`d''"|b-b-' '"aa'  };
#RTp3={  [A7]        [|A7]           ||Dm7    Gm7   |BbM7    A7   };
#WWp3={M0;r^^^  ^^^^ <|aa^a  a^a^>Mw;||d^^^  "b-^^^"|b-^^^  "a^^^ };
#PKp3={ き^^^'ては'^^^|き^^^'てみ'^^^||は^は^ て^み^|みみ^み'しろ'ろろろ};
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHp={#SHp1#SHp2#SHp3#SHp4};
#KTp={#KTp1#KTp2#KTp3#KTp4};
#JJp={#JJp1#JJp2#JJp3#JJp4};
#PLp={#PLp1#PLp2#PLp3#PLp4};
#RTp={#RTp1#RTp2#RTp3#RTp4};
#WWp={#WWp1#WWp2#WWp3#WWp4};
#SMp={#SMp1#SMp2#SMp3#SMp4};
#PKp={#PKp1#PKp2#PKp3#PKp4};

//■●▲★|| Aメロ
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SH11={l16;Ms;ロ^^^M0;ロ^^ツ    |チ^Ms;チ^ ^^M0;チ^   |イ^チ^ レ^イ^ Ms|チ^^^M0; r^^^ };//甲ロより
#KT11={l16;Mk;d^^^M0; d^ e^Mk   |f^^^M0;   f^f^     Mk|g^^^M0;a^ b-^ Mk|a^^^     ^^M0;a^};//
#SM11={l16;['"da'^fa]         '"|da'^[3f&a]          "|g^gg  "b-^b-b-  |c^>cc    cccc< };//調弦["dad]
#JJ11={l4 ;  [F]               [|Dm]                 [|Emb5]          [|Am]           };//
//C11={l4 ;   1                 |6                    |7               |3            };//
#PL11={l4 ; ['d`d']          ['"|b-b-']             ['|c`c']        ['"|ff']        };//
#RT11={l4 ;  [Dm7]             [|BbM7]               [|C7]            [|FM7]          };//
#WW11={l16;Mw;d^^^    ^^M0;c^Mw"|b-^^^     ^^M0;"b-^Mw|c^^^   ^^M0;e^Mw|f^^^     ^^M0;e^};//
#PK11={l16;   き^^^  'ては'^^^  |き^^^    'てみ'^^^   |き^^^ 'ては'^^^'|きみ'^ろ^て^ろ^ };

#SH12={Ms;ツ^^^M0;ツ^^ロ     |チ^Ms;チ^ ^^M0;ツ^|レ^レ^  レツレ^  Ms|チ^^^M0; r^^^   };
#KT12={Mk;a^^^M0; a^ g^      |f^    e^  d^c^ <Mk|b-^^^M0;b-^ b-^  Mk|a^^^M0;  b^>d-^   };//▲b or b-？
#SM12={['"da'^fa]          '"|da'^f&a   f&af&a "|g^gg   "b-^b-b-    |d-^>d-d- d-d-d-d-<};//調弦["dad]
#JJ12={  [F]                [|Dm]              [|Gm]               [|Dbmb5]          };
//C12={   1                  |6                 |2                  |5m            };
#PL12={ ['d`d']           ['"|b-b-']          ['|e`e']           ['"|aa']        };
#RT12={  [Dm7]              [|BbM7]            [|Em7b5]            [|A7]           };
#WW12={Mw;d^^^    ^^M0;"a^Mw"|b-^^^M0;  c^d^  Mw|e^^^    ^^M0;<b-^Mw|a^^^M0;  b^>d-^};//▲b or b-？
#PK12={#PK11};
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SH13={#SH11};
#KT13={#KT11};
#SM13={#SM11};//調弦[da`d]
#JJ13={#JJ11};//=
//C13={   1   |6   |7  |3};
#PL13={#PL11};
#RT13={#RT11};
#WW13={#WW11};
#PK13={#PK11};

#SH14={ Ms;ツ^^^M0;ツ^^チ  `|ピ^Ms;`ピ^ ^^M0;ツ^    |シ^レチ ツ^シ^  Ms|ロ^^^M0;r^^^  };
#KT14={ Mk;a^^^M0; b-^a^  Mk|g^^^M0;    f^e^      Mk|d-^^^M0;d-^<b^  Mk|a^^^M0; b-^>c^};//▲b or b-？
#SM14={ ['"da'^fa]         "|e^e&g      e&g e&g    "|a^aa    d-^`d-`d- |d^>dd   dddd< };//調弦["dad]
#JJ14={   [Dm]             [|Gm]                   [|Dbmb5]           [|F]           };
//C14={    6                |2                      |5m                |1         };
#PL14={ ['"b-b-']         ['|e`e']               ['"|aa']            ['|d`d']      };
#RT14={   [BbM7]           [|Em7b5]                [|A7]              [|Dm7]         };
#WW14={Mw;"b-^^^   ^^M0;f^Mw|e^^^       ^^M0;"b-^Mw"|a^^^    ^^M0;d-^Mw|d^^^    ^^M0;d^};
#PK14={#PKp3};
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHm1={#SH11#SH12#SH13#SH14};
#KTm1={#KT11#KT12#KT13#KT14};
#SMm1={#SM11#SM12#SM13#SM14};
#JJm1={#JJ11#JJ12#JJ13#JJ14};
#PLm1={#PL11#PL12#PL13#PL14};
#RTm1={#RT11#RT12#RT13#RT14};
#WWm1={#WW11#WW12#WW13#WW14};
#PKm1={#PK11#PK12#PK13#PK14};

//■●▲★|| Bメロ
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SH21={l16;Ms;ロ^^^  ^^M0;シ^Ms|ツ^^^  ^^M0;ロ^ |ツ^^レ  ^^ツレ Ms|チ^^^M0;r^^^};
#KT21={l16;Mk;d^^^M0;e^f^    Mk|a^^^M0;a^a^   Mk|b-^^^M0;b-^b-^   |a^g^    f^e^};
#SM21={#SM11};
#JJ21={l4 ;  [F]              [|F]             [|Bb]             [|Am]  };
//C21={l4 ;   1                |1               |4                |3      };
#PL21={l4 ; ['d`d']          ['|d`d']        ['"|gg']          ['"|ff']     };
#RT21={l4 ;  [Dm7]            [|Dm7]           [|Gm7]            [|FM7]       };
#WW21={l16;Mw;d^^^   ^^d^      |^^M0;c^ <b-^a^Mw|g^^^    ^^M0;e^Mw|f^^^    ^^M0;a^>};//b
#PK21={#PK11};//eを8va低く

#SH22={>Ms;ピ^^^  ピ^^^ |ハ^^^  ^^M0;ピ^<|チ^^ツ  ^^レ^ Ms|チ^^^M0;r^^^};
#KT22={ Mk;d^^^M0;e^f^Mk|a^^^M0;a^a^   Mk|b-^^^M0;b-^b-^  |a^g^    f^e^};//fを8va高く
#SM22={#SM12};
#JJ22={   [Dm]         [|Dm]            [|Gm]            [|Dbmb5]  };
//C22={    6            |6               |2               |5         };
#PL22={ ['"b-b-']    ['"|b-b-']        ['|e`e']        ['"|aa']        };
#RT22={   [BbM7]       [|BbM7]          [|Em7b5]         [|A7]           };
#WW22={Mw;"b-^^^  ^^"b-^|^^^^M0;d^f^     |e^d^    c^<b-^Mw|a^^^    ^^M0;>d-^};//
#PK22={#PK11};//
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SH23={#SH21};
#KT23={#KT21};
#SM23={#SM21};
#JJ23={#JJ21};
//C23={        1  |1  |4  |3};
#PL23={#PL21};
#RT23={#RT21};
#WW23={#WW21};
#PK23={#PK11};

#SH24={Ms;シ^^^  ツ^^^  |レ^^^   ^^M0;ヰ^ |チ^Div{レチレ}^ ツ^シ^ Ms|ロ^^^M0;r^^^ };
#KT24={Mk;e^^^M0;d^c^Mk"|b-^^^M0;c^  d^Mk |e^^^M0;         f^ g^  Mk|a^^^M0; f^e^ };
#SM24={ ["e^gb-]       "|e^e&g   e&g e&g "|a^aa            d-^`d-`d-|d^>dd   dddd<};//≒14,調弦["dad]
#JJ24={  [Gm]          [|Gm]             [|Dbmb5]                  [|F]         };
//C24={   2             |2                |5m                       |1        };
#PL24={ ['e`e']       ['|e`e']         ['"|aa']                   ['|d`d']   };
#RT24={  [Em7b5]       [|Em7b5]          [|A7]                     [|Dm7]      };
#WW24={Mw;e^^^   ^^e^   |^^M0;d^ c^"b-^Mw"|a^^^M0;        "b-^d-^Mw;|d^^^    ^^^^M0;};//▲b or b-？
#PK24={#PKp3};//▲b or b-？
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHm2={#SH21#SH22#SH23#SH24};
#KTm2={#KT21#KT22#KT23#KT24};
#SMm2={#SM21#SM22#SM23#SM24};
#JJm2={#JJ21#JJ22#JJ23#JJ24};
#PLm2={#PL21#PL22#PL23#PL24};
#RTm2={#RT21#RT22#RT23#RT24};
#WWm2={#WW21#WW22#WW23#WW24};
#PKm2={#PK21#PK22#PK23#PK24};

//■●▲★|| Coda
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHz1={#SH11};
#KTz1={#KT11};
#SMz1={#SM11};//調弦["dad]
#JJz1={#JJ11};
//Cz1={//C11};
#PLz1={#PL11};
#RTz1={#RT11};
#WWz1={#WW11};
#PKz1={#PK11};//調弦["dad]

#SHz2={ Ms;ツ^^^M0;ツ^^チ   `|ピ^Ms;`ピ^ ^^M0;ツ^|シ^レチ ツ^シ^ Ms|ロ^r^   `ピ^^  v0r};//≒14(末尾を修正)
#KTz2={ Mk;a^^^M0; b-^a^   Mk|g^^^M0;    f^e^  Mk|d-^^^M0;d-^<b^   |a^r^    'a`a'^^v0r};//≒14//▲b or b-？
#SMz2={ ['"da'^fa]          "|e^e&g      e&g e&g"|a^aa    d-^d-d- "|a^r^   '"dad'^^v0r};//調弦["dad]
#JJz2={   [Dm]              [|Gm]               [|Dbmb5]         v0|r16               };//≒14
//Cz2={    6                 |2                  |5m               |1                 };//≒14
#PLz2={ ['"b-b-']          ['|e`e']           ['"|aa']       l16; '|d`d'^r^ 'd`d'^^v0r};//≒14
#RTz2={   [BbM7]            [|Em7b5]            [|A7]             [|Dm7]              };//≒14
#WWz2={   "b-^Mw;"b-^ ^^M0;f^|e^Mw;e^    ^^M0<b-^|a^Mw;a^ ^^>M0;d-^|d^r^    `d^^   v0r};
#PKz2={    き^^^    'ては'^^^|き^^^     'てみ'^^^|は^は^  て^み^  '|きみ'^^^'しは'^^v0r};//≒14
//bNat  Dm7  Em7b5  FM7   Gm7 Am7 BbM7  C7  `&"
//bMel  DmM7 Em7  (FM715) G7  A7  Bm7b5 Dbdpm=Edpm=Gdpm=Bbdpm
#SHz={#SHz1#SHz2#SHz3};
#KTz={#KTz1#KTz2#KTz3};
#SMz={#SMz1#SMz2#SMz3};
#JJz={#JJz1#JJz2#JJz3};
#PLz={#PLz1#PLz2#PLz3};
#RTz={#RTz1#RTz2#RTz3};
#WWz={#WWz1#WWz2#WWz3};
#PKz={#PKz1#PKz2#PKz3};

//■●▲★|| 集計
Int Opn=0 //0;p、1;m1、2;p,m2、3;m2〜、4;MJR_m1、5;MJR_p、6:Audition、7:Score
If(Opn=0){
#SH={MIN    #SHp [#SHm1]#SHp#SHm2 MJR #SHm1#SHp#SHm2 MIN #SHm1#SHz};
#KT={MIN    #KTp [#KTm1]#KTp#KTm2 MJR #KTm1#KTp#KTm2 MIN #KTm1#KTz};
#SM={MIN    #SMp [#SMm1]#SMp#SMm2 MJR #SMm1#SMp#SMm2 MIN #SMm1#SMz};
#JJ={MIN r8;#JJp [#JJm1]#JJp#JJm2 MJR #JJm1#JJp#JJm2 MIN #JJm1#JJz};
#PL={MIN    #PLp [#PLm1]#PLp#PLm2 MJR #PLm1#PLp#PLm2 MIN #PLm1#PLz};
#RT={MIN    #RTp [#RTm1]#RTp#RTm2 MJR #RTm1#RTp#RTm2 MIN #RTm1#RTz};
#WW={MIN    #WWp [#WWm1]#WWp#WWm2 MJR #WWm1#WWp#WWm2 MIN #WWm1#WWz};
#PK={MIN    #PKp [#PKm1]#PKp#PKm2 MJR #PKm1#PKp#PKm2 MIN #PKm1#PKz};};
If(Opn=1){
#SH={MIN    #SHm1 #SHp#SHm2 MJR #SHm1#SHp#SHm2 MIN #SHm1#SHz};
#KT={MIN    #KTm1 #KTp#KTm2 MJR #KTm1#KTp#KTm2 MIN #KTm1#KTz};
#SM={MIN    #SMm1 #SMp#SMm2 MJR #SMm1#SMp#SMm2 MIN #SMm1#SMz};
#JJ={MIN r8;#JJm1 #JJp#JJm2 MJR #JJm1#JJp#JJm2 MIN #JJm1#JJz};
#PL={MIN    #PLm1 #PLp#PLm2 MJR #PLm1#PLp#PLm2 MIN #PLm1#PLz};
#RT={MIN    #RTm1 #RTp#RTm2 MJR #RTm1#RTp#RTm2 MIN #RTm1#RTz};
#WW={MIN    #WWm1 #WWp#WWm2 MJR #WWm1#WWp#WWm2 MIN #WWm1#WWz};
#PK={MIN    #PKm1 #PKp#PKm2 MJR #PKm1#PKp#PKm2 MIN #PKm1#PKz};};
If(Opn=2){
#SH={MIN    #SHp#SHm2 MJR #SHm1#SHp#SHm2 MIN #SHm1#SHz};
#KT={MIN    #KTp#KTm2 MJR #KTm1#KTp#KTm2 MIN #KTm1#KTz};
#SM={MIN    #SMp#SMm2 MJR #SMm1#SMp#SMm2 MIN #SMm1#SMz};
#JJ={MIN r8;#JJp#JJm2 MJR #JJm1#JJp#JJm2 MIN #JJm1#JJz};
#PL={MIN    #PLp#PLm2 MJR #PLm1#PLp#PLm2 MIN #PLm1#PLz};
#RT={MIN    #RTp#RTm2 MJR #RTm1#RTp#RTm2 MIN #RTm1#RTz};
#WW={MIN    #WWp#WWm2 MJR #WWm1#WWp#WWm2 MIN #WWm1#WWz};
#PK={MIN    #PKp#PKm2 MJR #PKm1#PKp#PKm2 MIN #PKm1#PKz};};
If(Opn=3){
#SH={MIN    #SHm2 MJR #SHm1#SHp#SHm2 MIN #SHm1#SHz};
#KT={MIN    #KTm2 MJR #KTm1#KTp#KTm2 MIN #KTm1#KTz};
#SM={MIN    #SMm2 MJR #SMm1#SMp#SMm2 MIN #SMm1#SMz};
#JJ={MIN r8;#JJm2 MJR #JJm1#JJp#JJm2 MIN #JJm1#JJz};
#PL={MIN    #PLm2 MJR #PLm1#PLp#PLm2 MIN #PLm1#PLz};
#RT={MIN    #RTm2 MJR #RTm1#RTp#RTm2 MIN #RTm1#RTz};
#WW={MIN    #WWm2 MJR #WWm1#WWp#WWm2 MIN #WWm1#WWz};
#PK={MIN    #PKm2 MJR #PKm1#PKp#PKm2 MIN #PKm1#PKz};};
If(Opn=4){
#SH={MJR    #SHm1#SHp#SHm2 MIN #SHm1#SHz};
#KT={MJR    #KTm1#KTp#KTm2 MIN #KTm1#KTz};
#SM={MJR    #SMm1#SMp#SMm2 MIN #SMm1#SMz};
#JJ={MJR r8;#JJm1#JJp#JJm2 MIN #JJm1#JJz};
#PL={MJR    #PLm1#PLp#PLm2 MIN #PLm1#PLz};
#RT={MJR    #RTm1#RTp#RTm2 MIN #RTm1#RTz};
#WW={MJR    #WWm1#WWp#WWm2 MIN #WWm1#WWz};
#PK={MJR    #PKm1#PKp#PKm2 MIN #PKm1#PKz};};

If(Opn=5){;//MJR_p
#SH={MJR    #SHp#SHm2 MIN #SHm1#SHz};
#KT={MJR    #KTp#KTm2 MIN #KTm1#KTz};
#SM={MJR    #SMp#SMm2 MIN #SMm1#SMz};
#JJ={MJR r8;#JJp#JJm2 MIN #JJm1#JJz};
#PL={MJR    #PLp#PLm2 MIN #PLm1#PLz};
#RT={MJR    #RTp#RTm2 MIN #RTm1#RTz};
#WW={MJR    #WWp#WWm2 MIN #WWm1#WWz};
#PK={MJR    #PKp#PKm2 MIN #PKm1#PKz};};
If(Opn=6){;//Audition
#SH={MIN    #SHp #SHm1#SHz};
#KT={MIN    #KTp #KTm1#KTz};
#SM={MIN    #SMp #SMm1#SMz};
#JJ={MIN r8;#JJp #JJm1#JJz};
#PL={MIN    #PLp #PLm1#PLz};
#RT={MIN    #RTp #RTm1#RTz};
#WW={MIN    #WWp #WWm1#WWz};
#PK={MIN    #PKp #PKm1#PKz};};
If(Opn=7){;//Score
#SH={MIN    #SHp #SHm1#SHm2 MJR #SHm1#SHp#SHm2 MIN #SHz};
#KT={MIN    #KTp #KTm1#KTm2 MJR #KTm1#KTp#KTm2 MIN #KTz};
#SM={MIN    #SMp #SMm1#SMm2 MJR #SMm1#SMp#SMm2 MIN #SMz};
#JJ={MIN r8;#JJp #JJm1#JJm2 MJR #JJm1#JJp#JJm2 MIN #JJz};
#PL={MIN    #PLp #PLm1#PLm2 MJR #PLm1#PLp#PLm2 MIN #PLz};
#RT={MIN    #RTp #RTm1#RTm2 MJR #RTm1#RTp#RTm2 MIN #RTz};
#WW={MIN    #WWp #WWm1#WWm2 MJR #WWm1#WWp#WWm2 MIN #WWz};
#PK={MIN    #PKp #PKm1#PKm2 MJR #PKm1#PKp#PKm2 MIN #PKz};};

//■●▲★|| Play,Score
If(Opn<7){;//■■Play
TR=1;CH=1;@(Flute);      ;o6;V=96;v.Random=8;//@1
q99;P=64-50;REV=15;CHO=20;BR=1;p%(-40);FineTune(68);Time(0:0:0);#SH;//+1oct
TR=2;CH=2;@(PanFlute);   ;o6;V=96;v.Random=8;//@1
q99;P=64-46;REV=15;CHO=20;BR=1;p%(-40);            ;Time(0:0:0);#SH;//同

TR=3;CH=3;@(Koto);       ;o5;v91; v.Random=8;//@1
q98;P=64-42;REV=20;CHO=10;BR=1;p%(- 0);FineTune(68);Time(0:0:0);#KT;//+0oct(TR5〜TR8の範囲内)
TR=4;CH=4;@(Koto);       ;o5;v91; v.Random=8;//@1
q98;P=64-38;REV=20;CHO=10;BR=1;p%(- 0);            ;Time(0:0:1);#KT;//同

TR=5;CH=5;@(Shamisen);   ;o6;v85; v.Random=7;//@1
q94;P=64+24;REV=25;CHO=10;BR=1;p%(- 0);FineTune(68);Time(0:0:2);#SM;//&有・基準(TR5〜TR8の中心)
TR=6;CH=6;@(Shamisen);   ;o6;v85; v.Random=7;//@1
q93;P=64+32;REV=25;CHO=10;BR=1;p%(- 0);            ;Time(0:0:1);#SM;//同

TR=7;CH=7;@(Shamisen);   ;o5;v85; v.Random=7;//@1
q92;P=64+40;REV=25;CHO=10;BR=1;p%(- 0);FineTune(68);Time(0:0:1);#SM;//&有・基準
TR=8;CH=8;@(Shamisen);   ;o5;v85; v.Random=7;//@1
q91;P=64+48;REV=25;CHO=10;BR=1;p%(- 0);            ;Time(0:0:0);#SM;//同

TR= 9;CH=10;            ;o4;V=115;v.Random=8;
q90;P=64+ 8;REV= 5;CHO= 5;BR=1;p%(- 0);FineTune(68);Time(0:0:2);#PK;//____
TR=10;CH=10;            ;o4;V=115;v.Random=8;
q89;P=64+16;REV= 5;CHO= 5;BR=1;p%(- 0);            ;Time(0:0:2);#PK;//____

TR=11;CH=11;@(GrandPiano);o4;v78; v.Random=6;//@1
q49;P=64-30;REV= 8;CHO= 8;BR=1;p%(+20);FineTune(68);Time(0:0:1);#JJ;//-0.5oct
TR=12;CH=12;@(GrandPiano);o3;v78; v.Random=6;//@1
q95;P=64-34;REV= 8;CHO= 8;BR=1;p%(+60);            ;Time(0:0:1);#PL;//-1.5oct

TR=13;CH=13;@(DistortionGuitar);o3;v88; v.Random=7;//@1
q97;P=64-16;REV=10;CHO=10;BR=1;p%(+80);FineTune(68);Time(0:0:2);#WW;//-2oct
TR=14;CH=14;@(DistortionGuitar);o3;v88; v.Random=7;//@1
q97;P=64-24;REV=10;CHO=10;BR=1;p%(+80);            ;Time(0:0:2);#WW;//同

TR=15;CH=15;@(SlapBass1)       ;o2;v83; v.Random=7;//@1
q96;P=64- 0;REV=15;CHO=10;BR=1;p%(+120);FineTune(68);Time(0:0:2);#WW;//-3oct
TR=16;CH=16;@(SlapBass1)       ;o2;v83; v.Random=7;//@1
q96;P=64- 8;REV=15;CHO=10;BR=1;p%(+120);            ;Time(0:0:2);#WW};//同

If(Opn=7){  ;//■■Score
TR=1;CH=1;@(Flute);      ;o6;V=96;v.Random=8;//@1
q99;P=64-50;REV=15;CHO=20;BR=1;p%(-40);            ;Time(0:0:0);#SH;//+1oct
TR=2;CH=2;@(Koto);       ;o5;v91; v.Random=8;//@1
q98;P=64-42;REV=20;CHO=10;BR=1;p%(- 0);            ;Time(0:0:0);#KT;//+0oct(TR5〜TR8の範囲内)
TR=3;CH=3;@(Shamisen);   ;o6;v85; v.Random=7;//@1
q94;P=64+24;REV=25;CHO=10;BR=1;p%(- 0);            ;Time(0:0:2);#SM;//&有・基準(TR5〜TR8の中心)

TR=10;CH=10;             ;o4;V=115;v.Random=8;
q90;P=64+ 8;REV= 5;CHO= 5;BR=1;p%(- 0);            ;Time(0:0:2);#PK;//____
TR=4;CH=4;@(GrandPiano);o4;v78; v.Random=6;//@1
q49;P=64-30;REV= 8;CHO= 8;BR=1;p%(+20);            ;Time(0:0:1);#JJ;//-0.5oct
TR=5;CH=5;@(GrandPiano);o3;v78; v.Random=6;//@1
q95;P=64-34;REV= 8;CHO= 8;BR=1;p%(+60);            ;Time(0:0:1);#PL;//-1.5oct

TR=6;CH=6;@(DistortionGuitar);o3;v88; v.Random=7;//@1
q97;P=64-16;REV=10;CHO=10;BR=1;p%(+80);            ;Time(0:0:2);#WW;}//-2oct




