TrackName     = {"『さむらい』"}
Copyright     = {"作曲：ふみこみどり"}
MetaText      = {"公開日：2010/05/30
ジャンル：どっしり和風"} 
/*
作者：ふみこみどり
	http://asiangreen.boo.jp/
	hajike_green@hotmail.com
音源
　制作者音源：MS-GS(Vista) / Kontakt4
  　推奨音源：MS-GS(Vista)で調整しています。
		　もしくはmp3(Kontakt4版)でどうぞ。

長さ：2分4秒
調性：ニ短調

mp3版はこちらからどうぞです。
	http://asiangreen.boo.jp/music/2010-0530samurai.mp3
//------------------------------------------------------------------------------

	いざ尋常に、勝負！

//------------------------------------------------------------------------------
■作者より
はじめまして　または　おひさしぶりです。
ダウンロードどうもありがとうございます♪

この曲は自作Kontakt用篠笛音源のデモとして作成した
どっしりがっしり和風の楽曲です。
デモということであんまり実用的でない音域も
イコライザなしでがっつり使ってみてます。

下記のものがあればサクラからでも使えますので
ご興味のあるかたはどうぞ～♪
(一応フリーソフトだけで準備できます。)
・VSTホスト(フリーだとMU.LABなど)
・Kontakt/Kontakt player(playerはフリーです)
・仮想MIDIケーブル(MIDI Yoke、Maple Midiなど)

Kontaktライブラリ「篠笛みどり」配布ページ
http://asiangreen.boo.jp/dtm/779

■注■
この曲は音源によって音色を変えられる仕組みになってます。
[0] ふつう用(MS-GS(Vista)で調整しています。)
[1] 作者環境用(Kontakt4を使用)
　　※ちなみにmp3は[1]がもとになっています。*/
Int TYPE = 0; /* "="の後の数字を0～2の整数にしてください。*/
//------------------------------------------------------------------------------
TIME(0:1:1)Tempo(148)
拍子4,4
調-(b)
TimeBase=480
//------------------------------------------------------------------------------
Str Ti={""}
Str Ti_={""}

// ～LowGウクレレ～
//Maj
Str C={"Ti '<g*>c*e*>c*<'"}
Str Db={"Ti '<g*+>c*+e*+>c*+<'"}
Str D={"Ti '<a*>d*f*+a*'"}Str D_={"Ti_ '<a*>d*f*+a*'"}
Str Eb={"Ti '<a*+>d*+f*++a*+'"}
Str E={"Ti '<a*++>d*++f*+++a*++'"}Str F={"Ti '<a*>c*f*a*'"}
Str Gb={"Ti '<a*+>c*+f*+a*+'"}Str G={"Ti '<a*++>c*++f*++a*++'"}
Str Ab={"Ti '<a*+++>c*+++f*+++a*+++'"}Str A={"Ti '<a*>c*+e*a*'"}
Str Bb={"Ti '<a*+>c*++e*+a*+'"}Str B={"Ti '<a*++>c*+++e*++a*++'"}
//Min
Str Cm={"Ti '<g*>c*+++e*+++a*+++'"}Str Dbm={"Ti '<g*+>c*++++e*++++a*++++'"}
Str Dm={"Ti '<a*>d*f*a*'"}Str Ebm={"Ti '<a*+>d*+f*+a*+'"}
Str Em={"Ti '<a*++>d*++f*++a*++'"}Str Fm={"Ti '<g*+>c*f*g*+'"}
Str Gbm={"Ti '<a*>c*+f*+a*'"}Str Gm={"Ti '<g*>d*g*a*+'"}
Str Abm={"Ti '<g*+>d*+g*+a*++'"}Str Am={"Ti '<a*>c*e*a*'"}
Str Bbm={"Ti '<a*+>c*+e*+a*+'"}Str Bm={"Ti '<a*++>c*++e*++a*++'"}
//Aug
Str Caug={"Ti '<g*+>c*e*>c*<'"}Str Dbaug={"Ti '<g*++>c*+e*+>c*+<'"}
Str Daug={"Ti '<g*+++>c*++e*++>c*++<'"}Str Ebaug={"Ti '<b*>d*+g*b*'"}
Str Eaug={"Ti '<g*+>c*e*>c*<'"}Str Faug={"Ti '<g*++>c*+e*+>c*+<'"}
Str Gbaug={"Ti '<g*+++>c*++e*++>c*++<'"}Str Gaug={"Ti '<b*>d*+g*b*'"}
Str Abaug={"Ti '<g*+>c*e*>c*<'"}Str Aaug={"Ti '<g*++>c*+e*+>c*+<'"}
Str Bbaug={"Ti '<g*+++>c*++e*++>c*++<'"}Str Baug={"Ti '<b*>d*+g*b*'"}
//Dim
Str Cdim={"Ti '<a*>d*+f*+>c*<'"}Str Dbdim={"Ti '<g*>c*+e*a*+'"}
Str Ddim={"Ti '<g*+>c*++e*+a*++'"}Str Ebdim={"Ti '<a*>d*+f*+>c*<'"}
Str Edim={"Ti '<g*>c*+e*a*+'"}Str Fdim={"Ti '<g*+>c*++e*+a*++'"}
Str Gbdim={"Ti '<a*>d*+f*+>c*<'"}Str Gdim={"Ti '<g*>c*+e*a*+'"}
Str Abdim={"Ti '<g*+>c*++e*+a*++'"}Str Adim={"Ti '<a*>d*+f*+>c*<'"}
Str Bbdim={"Ti '<g*>c*+e*a*+'"}Str Bdim={"Ti '<g*+>c*++e*+a*++'"}
//sus4
Str C4={"Ti '<g*>c*e*+>c*<'"}Str Db4={"Ti '<g*+>c*+e*++>c*+<'"}
Str D4={"Ti '<a*>d*f*++a*'"}Str Eb4={"Ti '<a*+>d*+f*+++a*+'"}
Str E4={"Ti '<a*++>d*++f*++++a*++'"}Str F4={"Ti '<a*+>c*f*a*+'"}
Str Gb4={"Ti '<a*++>c*+f*+a*++'"}Str G4={"Ti '<a*+++>c*++f*++a*+++'"}
Str Ab4={"Ti '<a*++++>c*+++f*+++a*++++'"}Str A4={"Ti '<a*>c*++e*a*'"}
Str Bb4={"Ti '<a*+>c*+++e*+a*+'"}Str B4={"Ti '<a*++>c*++++e*++a*++'"}
//Maj6
Str C6={"Ti '<a*>e*g*>c*<'"}Str Db6={"Ti '<g*+>c*+e*+a*+'"}
Str D6={"Ti '<g*++>c*++e*++a*++'"}Str Eb6={"Ti '<g*+++>c*+++e*+++a*+++'"}
Str E6={"Ti '<g*++++>c*++++e*++++a*++++'"}Str F6={"Ti '<a*>d*f*>c*<'"}
Str Gb6={"Ti '<a*+>d*+f*+>c*+<'"}Str G6={"Ti '<a*>d*e*b*'"}
Str Ab6={"Ti '<a*+>d*+e*+b*+'"}Str A6={"Ti '<a*++>d*++e*++b*++'"}
Str Bb6={"Ti '<g*>d*f*a*+'"}Str B6={"Ti '<g*+>d*+f*+a*++'"}
//Min6
Str Cm6={"Ti '<g*++>c*+++e*+++a*+++'"}Str Dbm6={"Ti '<g*+>c*+e*a*+'"}
Str Dm6={"Ti '<g*++>c*++e*+a*++'"}Str Ebm6={"Ti '<g*+++>c*+++e*++a*+++'"}
Str Em6={"Ti '<g*>c*+e*b*'"}Str Fm6={"Ti '<g*+>c*++e*+b*+'"}
Str Gbm6={"Ti '<g*++>c*+++e*++b*++'"}Str Gm6={"Ti '<g*>d*e*a*+'"}
Str Abm6={"Ti '<g*+>d*+e*+a*++'"}Str Am6={"Ti '<g*++>d*++e*++a*+++'"}
Str Bbm6={"Ti '<g*>c*+e*+a*+'"}Str Bm6={"Ti '<g*+>c*++e*++a*++'"}
//7th
Str C7={"Ti '<g*>c*e*a*+'"}Str Db7={"Ti '<g*+>c*+e*+a*++'"}
Str D7={"Ti '<g*++>c*++e*++a*+++'"}Str Eb7={"Ti '<g*+++>c*+++e*+++a*++++'"}
Str E7={"Ti '<g*+>d*e*b*'"}Str F7={"Ti '<g*++>d*+e*+b*+'"}
Str Gb7={"Ti '<g*+>d*e*b*'"}Str G7={"Ti '<g*>d*e*+b*'"}
Str Ab7={"Ti '<g*+>d*+e*++b*+'"}Str A7={"Ti '<g*>c*+e*a*'"}
Str Bb7={"Ti '<g*+>c*++e*+a*+'"}Str B7={"Ti '<g*++>c*+++e*++a*++'"}
//Maj7
Str CM7={"Ti '<g*>c*e*b*'"}Str DbM7={"Ti '<g*+>c*+e*+b*+'"}
Str DM7={"Ti '<g*++>c*++e*++b*++'"}Str EbM7={"Ti '<g*+++>c*+++e*+++b*+++'"}
Str EM7={"Ti '<g*+>d*+e*b*'"}Str FM7={"Ti '<g*++>d*++e*+b*+'"}
Str GbM7={"Ti '<g*+++>d*+++e*++b*++'"}Str GM7={"Ti '<g*>d*f*+b*'"}
Str AbM7={"Ti '<g*+>d*+f*++b*+'"}Str AM7={"Ti '<g*>c*+e*a*'"}
Str BbM7={"Ti '<a*+>d*f*a*'"}Str BM7={"Ti '<a*++>d*+f*+a*+'"}
//Min7
Str Cm7={"Ti '<g*+++>c*+++e*+++a*+++'"}Str Dbm7={"Ti '<g*+>c*+e*b*'"}
Str Dm7={"Ti '<g*++>c*++e*+b*+'"}Str Ebm7={"Ti '<g*+++>c*+++e*++b*++'"}
Str Em7={"Ti '<g*>d*e*b*'"}Str Fm7={"Ti '<g*+>d*+e*+b*+'"}
Str Gbm7={"Ti '<g*++>d*++e*++b*++'"}Str Gm7={"Ti '<g*>d*f*a*+'"}
Str Abm7={"Ti '<g*+>d*+f*+a*++'"}Str Am7={"Ti '<g*++>d*++f*++a*+++'"}
Str Bbm7={"Ti '<g*+>c*+e*+a*+'"}Str Bm7={"Ti '<g*++>c*++e*++a*++'"}
//9th
Str C9={"Ti '<g*>d*e*a*+'"}Str Db9={"Ti '<g*+>d*+e*+a*++'"}
Str D9={"Ti '<g*++>d*++e*++a*+++'"}Str Eb9={"Ti '<g*>c*+e*+a*+'"}
Str E9={"Ti '<g*+>c*++e*++a*++'"}Str F9={"Ti '<g*++>c*+++e*+++a*+++'"}
Str Gb9={"Ti '<g*+>c*+e*a*+'"}Str G9={"Ti '<g*++>c*++e*+a*++'"}
Str Ab9={"Ti '<g*+++>c*+++e*++a*+++'"}Str A9={"Ti '<g*>c*+e*b*'"}
Str Bb9={"Ti '<g*+>c*++e*+b*+'"}Str B9={"Ti '<g*++>c*+++e*++b*++'"}

//弦楽器味付け用。
Str SU={"p.T(52,70,!32,70,64,!32)"}
Str Su={"p.T(42,70,!16,70,64,!32)"}
Str US={"p.T(64,68,!16,64,50,!4-16)"}
Str UUSS={"p.T(64,68,!16,68,30,!4-16)"}
Str Us={"p.T(86,60,!16,60,64,!32)"}
Str SUS={"p.T(30,68,!12,68,64,!24)"}
Str USU={"p.T(74,30,!12,30,64,!24)"}

Str EPl11={"EP.T(100,110,!2^4,110,40,!1^2)M.T(30,70,!1,70,0,!1)"}
Str EPl11s={"EP.T(100,120,!1^4,120,40,!1^4)M.T(30,70,!1,70,0,!1)"}
Str EPl1={"EP.T(115,110,!2,110,40,!1)M.T(10,70,!1)"}
Str EPl1s={"EP.T(105,125,!2^4,125,40,!2^4)M.T(30,70,!2,70,0,!2)"}
Str EPl2={"EP.T(100,110,!4,110,40,!4)M.T(30,70,!4,70,0,!4)"}
Str EPl2s={"EP.T(100,115,!4,115,40,!4)M.T(30,70,!4,70,0,!4)"}
Str EPl4={"EP.T(100,110,!8,110,40,!8)M.T(30,40,!8,40,0,!8)"}
Str EPl4s={"EP.T(100,115,!8,115,40,!8)M.T(30,70,!8,70,0,!8)"}
Str EPEP={"EP(110)M(10)"}

Str PO={" y64,0 y64,127 "}
Str PF={" y64,0 "}
Str SO={" y68,0 y68,127 "}
Str SF={" y68,0 "}

/* 笙 */
Int intShouKey = 0;
/*乞*/Str Sh01={"Key(intShouKey) '<a*>e*a*b*>e*f*+<' Key(0)"}
/*市*/Str Sh02={"Key(intShouKey) '<b*>d*e*a*b*>f*+<' Key(0)"}//ほんとは「一」
/*工*/Str Sh03={"Key(intShouKey) 'c*+d*e*g*+ab' Key(0)"}
/*几*/Str Sh04={"Key(intShouKey) 'd*e*a*b*>e*f*+<' Key(0)"}//ほんとは上に´付きの几
/*乙*/Str Sh05={"Key(intShouKey) 'e*a*b*>d*f*g*a*+<' Key(0)"}
/*下*/Str Sh06={"Key(intShouKey) 'f*+g*+a*b*>d*f*+<' Key(0)"}
/*十*/Str Sh07={"Key(intShouKey) 'f*+g*a*b*>d*e*<' Key(0)"}
/*斗*/Str Sh08={"Key(intShouKey) 'g*a*b*>d*e*<' Key(0)"}//ほんとは「｀十」
/*美*/Str Sh09={"Key(intShouKey) 'g*+a*b*>c*d*f*+<' Key(0)"}
/*彳*/Str Sh10={"Key(intShouKey) 'a*b*>d*e*f*+<' Key(0)"}
/*比*/Str Sh11={"Key(intShouKey) 'a*b*>c*d*e*f*+<' Key(0)"}

// 尺八
Str SHK_NORMAL={"v1 o2 e*"}
Str SHK_FORTE={"v1 o2 f*"}
Str SHK_STC={"v1 o2 f*+"}
Str SHK_VIB1={"v1 o2 g*"}
Str SHK_VIB2={"v1 o2 g*+"}
Str SHK_LICK1={"v1 o2 a*"}
Str SHK_LICK2={"v1 o2 a*+"}
Str SHK_LICK3={"v1 o2 b*"}
Str SHK_LICK4={"v1 o3 c*"}
Str SHK_LICK5={"v1 o3 c*+"}
Str SHK_LICK6={"v1 o3 d*"}
Str SHK_LICK7={"v1 o3 d*+"}

// 二胡
Str ERH_VIB={"v1 o2 e*,1"}
Str ERH_ESP={"v1 o2 f*,1"}
Str ERH_VIB_FORTE={"v1 o2 f*+,1"}
Str ERH_TR={"v1 o2 g*,1"}
Str SHK_LICK={"v1 o2 g*+,1"}
Str SHK_SLIDEUP2={"v1 o2 a*,1"}
Str SHK_SLIDEUP3={"v1 o2 a*+,1"}
Str SHK_SLIDEDOWN3={"v1 o2 b*,1"}
Str SHK_STC_PIANO={"v1 o3 c*,1"}
Str SHK_STC_FORTE={"v1 o3 c*+,1"}
Str SHK_PIZZ={"v1 o3 d*,1"}

// 筝
Str KT_NORMAL={"v1 o2 c*,1"}
Str KT_VIB={"v1 o2 c*+,1"}
Str KT_LICK={"v1 o2 d*,1"}
Str KT_DOWN={"v1 o2 d*+,1"}

// Strings
Str STR_SUS_SHORT={"v1 o0 c*,1"}
Str STR_M_SUS_SHORT={"v1 o0 c*+,1"}
Str STR_UP_DOWN={"v1 o0 d*,1"}
Str STR_UP={"v1 o0 d*+,1"}
Str STR_DOWN={"v1 o0 e*,1"}
Str STR_PIZZ={"v1 o0 f*,1"}
Str STR_TRM_SHORT={"v1 o0 f*+,1"}
Str STR_TRM={"v1 o0 g*,1"}
Str STR_M_HALF_TR={"v1 o0 g*+,1"}
Str STR_HALF_TR={"v1 o0 a*,1"}
Str STR_M_TR={"v1 o0 a*+,1"}
Str STR_TR={"v1 o0 b*,1"}

// 馬頭琴ベース
Str MORINBS_NORMAL={"v1 o2 c*,1"}
Str MORINBS_VIB={"v1 o2 c*+,1"}
Str MORINBS_TREMOLO={"v1 o2 d*,1"}
Str MORINBS_STC={"v1 o2 d*+,1"}
Str MORINBS_PIZZ={"v1 o2 e*,1"}
Str MORINBS_PIZZ_MUTE={"v1 o2 f*,1"}
Str MORINBS_PIZZ_UP={"v1 o2 f*+,1"}
Str MORINBS_PIZZ_DOWN={"v1 o2 g*,1"}
//------------------------------------------------------------------------------
IF((TYPE==0)) {
	ResetGM();
	TrackSync;
	System.MeasureShift(1);    //音源初期化用
	
}IF((TYPE==1)||(TYPE==2)) {
	TrackSync;
	System.MeasureShift(1);    //音源初期化用
}
//------------------------------------------------------------------------------
Function SetTrack(Int nTrack)
{
	IF(TYPE!=0 && TYPE!=1 && TYPE!=2){
		Str ALT = {"TYPEの後の数字は、0～2の整数でお願いします～"};
		Print(ALT);
		End();
	}
	IF(TYPE==0) {
		Track(nTrack)
	}IF(TYPE==1) {
		Track(nTrack)
		IF(nTrack <= 16){Port(0);Channel(nTrack);}
		IF((nTrack <= 32)&&(nTrack > 16)){Port(1);Channel(nTrack - 16);}
		IF(nTrack > 32){Port(2);Channel(nTrack - 32);}
	}
}
Function InitTrack(Int nTrack,
			Int nNote,
			Int nNote2,
			Int nNote3,
			Int nVol,
			Int nPan,
			Int nRev,
			Int nCho,
			Int nRezo,
			Int nAtt,
			Int nCut)
{
	IF(TYPE!=0 && TYPE!=1 && TYPE!=2){
		Str ALT = {"TYPEの後の数字は、0～2の整数でお願いします～"};
		Print(ALT);
		End();
	}
	IF(TYPE==0) {
		Track(nTrack) Voice(nNote)
		IF(nTrack <= 16){Port(0);Channel(nTrack);}
		IF(nTrack > 16){Mute;}
		M(10)
	}IF(TYPE==1) {
		Track(nTrack)
		IF(nTrack <= 16){Port(0);Channel(nTrack);}
		IF((nTrack <= 32)&&(nTrack > 16)){Port(1);Channel(nTrack - 16);}
		IF(nTrack > 32){Port(2);Channel(nTrack - 32);}
		Voice(nNote, nNote2, nNote3)
		y71,nRezo y73,nAtt y74,nCut
	}
	EP(nVol) P(nPan) REV(nRev) CHO(nCho)
}
IF(TYPE == 0){
//InitTrack( 1,  1,  0,  0,100, 64,  0,  0, 64, 64, 64);//標準
//	   No  Note           Vol Pan Rev Cho Rez Att Cut
InitTrack( 1,    74,  0,  0,125, 64, 10,  0, 64, 64, 64);//音色(Fue)
InitTrack( 2,   108,  0,  0,105, 35, 10,  0, 64, 64, 64);//音色(Koto)
InitTrack( 3,   107,  0,  0,125, 50, 10,  0, 64, 64, 64);//音色(Shamisen)
InitTrack( 4,    33,  0,  0,120, 80, 30,  0, 64, 64, 64);//音色(BassPizz)
InitTrack( 5,   117,  0,  0,125, 70, 10,  0, 64, 64, 64);//音色(Taiko)
InitTrack( 6,    48,  0,  0,120, 40, 10,  0, 64, 64, 64);//音色(Timpani)
InitTrack( 7,    78,  0,  0,110, 82,100,  0, 64, 64, 64);//音色(Shakuhachi)

InitTrack( 8,   123,  0,  0,110, 80,100,  0, 64, 64, 64);//音色(Wind)
InitTrack(10,     1,  0,  0,110, 64,  0,  0, 64, 64, 64);//音色(GM)

InitTrack(11,    41,  0,  0, 90, 32, 10,  0, 64, 64, 64);//音色(Violin1Alco)
InitTrack(12,    41,  0,  0, 90, 80, 10,  0, 64, 64, 64);//音色(Violin2Alco)
InitTrack(13,    42,  0,  0, 90, 50, 10,  0, 64, 64, 64);//音色(VioraAlco)
InitTrack(14,    43,  0,  0, 90, 96, 10,  0, 64, 64, 64);//音色(CelloAlco)
}
IF(TYPE == 1){
//InitTrack( 1,  1,  0,  0,100, 64,  0,  0, 64, 64, 64);//標準
//	   No  Note           Vol Pan Rev Cho Rez Att Cut
InitTrack( 1,    74,  0,  0,125, 64, 10,  0, 64, 64, 64);//音色(Fue)
InitTrack( 2,   108,  0,  0,110, 35, 10,  0, 64, 64, 64);//音色(Koto)
InitTrack( 3,   107,  0,  0,110, 50, 10,  0, 64, 64, 64);//音色(Shamisen)
InitTrack( 4,    33,  0,  0,110, 80,100,  0, 64, 64, 64);//音色(BassPizz)
InitTrack( 5,   117,  0,  0,125, 70, 10,  0, 64, 64, 64);//音色(Taiko)
InitTrack( 6,    48,  0,  0,100, 40, 10,  0, 64, 64, 64);//音色(Timpani)
InitTrack( 7,    78,  0,  0,110, 82,100,  0, 64, 64, 64);//音色(Shakuhachi)

InitTrack( 8,   123,  0,  0,110, 80,100,  0, 64, 64, 64);//音色(Wind)
InitTrack( 9,   118,  0,  0,110, 80,100,  0, 64, 64, 64);//音色(銅鑼)
InitTrack(10,     1,  0,  0,110, 64,  0,  0, 64, 64, 64);//音色(GM)

InitTrack(11,    41,  0,  0,110, 32, 10,  0, 64, 64, 64);//音色(Violin1Alco)
InitTrack(12,    41,  0,  0,110, 80, 10,  0, 64, 64, 64);//音色(Violin2Alco)
InitTrack(13,    42,  0,  0,110, 50, 10,  0, 64, 64, 64);//音色(VioraAlco)
InitTrack(14,    43,  0,  0,110, 96, 10,  0, 64, 64, 64);//音色(CelloAlco)
}
//------------------------------------------------------------------------------
Track(1) p(64)
q100 V(110) o6 M(0)

Str ModOn={"
p.T(64,64,!10, 64,75,!10, 75,56,!10, 56,75,!10,
75,56,!10, 56,75,!10, 75,56,!10, 56,75,!10,
75,56,!10, 56,75,!10, 75,56,!10, 56,75,!10,
75,56,!10, 56,75,!10, 75,56,!10, 56,75,!10,
75,56,!10, 56,75,!10, 75,56,!10, 56,75,!10,
75,56,!10, 56,75,!10, 75,56,!10, 56,75,!10,
75,56,!10, 56,75,!10, 75,56,!10, 56,75,!10,
75,64,!10)
"}

Str ModOff={"
p(64)
"}

Str Fue1={"
v.N(120,100)
l16 r*^cd

v100
l16 ModOn a^^^^^ ModOff ga g^^^f^^^
l16 gf ModOn V.T(100,115,!4^8, 115,80,!8) d^^^^^ ^^^^ V(110) ModOff r*^a>c
l16 ModOn d^^^^^ModOff cd ModOn c^^^^^ModOff <f>c<
l16 ModOn V.T(100,115,!4^8, 115,80,!8) a^^^^^^^ ModOff V(110) r*^ga>c,70 r*<a,70 r*

l16 ModOn g^^^^^ ModOff a^ ModOn g^^^^^f^ ModOff
v.N(100,100,100,110, 90,90,100,100,90)
l16 g^f^d^c^ d,70r*cdfdc^
v100
l16 ModOn d^^^^^ ModOff a^ g^a^>c^ l8-48 d l48 c
l16 ModOn V.T(100,115,!4^8, 115,70,!4) d^^^^^^^ ^^,96 V(110) ModOff r*^<c^d^

l16 ModOn a^^^^^ ModOff ga g^^^f^^^
l16 gf ModOn V.T(100,115,!4^8, 115,80,!8) d^^^^^ ^^^^ V(110) ModOff r*^a>c
l16 ModOn d^^^^^ ModOff cd ModOn c^^^^^ ModOff <f>c<
l16 ModOn V.T(100,115,!4^8, 115,80,!8) a^^^^^^^ ModOff V(110) r*^ga>c,70 r*<a,70 r*

l4^8-48 g l48 a l16 ga ModOn g^^^^^f^ ModOff
v.N(100,100,100,110, 90,90,100,100,90)
l16 g^f^d^c^ d,70r*cdfdc^
v100
l16 ModOn d^^^^^ ModOff a^ g^a^>c^ l8-48 d l48 c
l1 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) d,98 ModOff V(110)
"}

Str Fue2={"
l16 ModOn a^^^^^^^ ModOff a^^g^^f^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) g^^^^^^^ ^^^^^^,90 ModOff V(110) c^
l16 ModOn g^^^^^^^ ModOff g^^>c^^<g^
l16 ModOn g^^^^^^^ ModOn a^^^^^^^,90 ModOff

l16 ModOn a^^^^^^^ ModOff a^^g^^f^
l16 g^^^f^^^ d^^^c^^^
l24 dc l1^1-12-2 ModOn d,92 ModOff
l16 c^^^d^^^

l16 ModOn a^^^^^^^ ModOff a^^g^^f^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) g^^^^^^^ ^^^^^^,90 ModOff V(110) c^
l16 ModOn g^^^^^^^ ModOff g^^>c^^<g^
l16 ModOn g^^^^^^^ ModOn a^^^^^^^,90

l16 ModOn f^^^^^^^ ModOff f^^g^^a^
l16 g^^^a^^^>c^d^e^f^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) a^^^^^^^ ^^^^,96 ModOff V(110) g^f^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) d^^^^^^^ ^^^^,92 ModOff V(110) c^^^
"}

Str Fue3={"
l16 ModOn d^^^^^ ModOff cd e^^d^^e^
l16 f^^^e^^^f^^^>c^^^<
l1^1-8 ModOn V.T(100,115,!1, 115,100,!4, 100,40,!2^4) a,96 ModOff V(110)
"}

Str Fue1a={"
v.N(120,100)
l16 r*^cd

v100
l16 ModOn a^^^^^ ModOff ga g^^^f^^^
l16 gf ModOn V.T(100,115,!4^8, 115,80,!8) d^^^^^ ^^^^ V(110) ModOff r*^a>c
l16 ModOn d^^^^^cd ModOn c^^^^^<f>c<
l16 ModOn V.T(100,115,!4^8, 115,80,!8) a^^^^^^^ ModOff V(110) r*^ga>c,70 r*<a,70 r*

l16 ModOn g^^^^^ ModOff a^ ModOn g^^^^^f^ ModOff
v.N(100,100,100,110, 90,90,100,100,90)
l16 g^f^d^c^ d,70 r*cdfdc^
v100
l16 ModOn d^^^^^ ModOff a^ g^a^>c^ l8-48 d l48 c
l16 ModOn V.T(100,115,!4^8, 115,70,!4) d^^^^^^^ ^^,98 V(110) ModOff r*^<c^d^

l16 ModOn a^^^^^ ModOff ga g^^^f^^^
l16 gf ModOn V.T(100,115,!4^8, 115,80,!8) d^^^^^ ^^^^ V(110) ModOff r*^a>c
l16 ModOn d^^^^^ ModOff cd ModOn c^^^^^<f>c<
l16 ModOn V.T(100,115,!4^8, 115,80,!8) a^^^^^^^ ModOff V(110) r*^ga>c,70 r*<a,70 r*

l4^8-48 ModOn g ModOff l48 a l16 ga ModOn g^^^^^f^ ModOff
v.N(100,100,100,110, 90,90,100,100,90)
l16 g^f^d^c^ d,70 r*cdfdc^
v100
l16 ModOn d^^^^^ ModOff a^ g^a^>c^ l8-48 d l48 c
l1 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) d,98 ModOff V(110)
"}

Str Fue2a={"
v100
l16 ModOn a^^^^^^^ a^^g^^f^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) g^^^^^^^ ^^^^^^,90 ModOff V(110) c^
l16 ModOn g^^^^^^^ g^^>c^^<g^
l16 ModOn g^^^^^^^ ModOn a^^^^^^^,90

l16 ModOn a^^^^^^^ a^^g^^f^
l16 g^^^f^^^ d^^^c^^^
l24 dc l1^1-12-2 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) d,96 ModOff V(110)
l16 c^^^d^^^

l16 ModOn a^^^^^^^ ModOff a^^g^^f^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) g^^^^^^^ ^^^^^^,90 ModOff V(110) c^
l16 ModOn g^^^^^^^ ModOff g^^>c^^<g^
l16 ModOn g^^^^^^^ ModOn a^^^^^^^,90

l16 ModOn f^^^^^^^ ModOff f^^g^^a^
l16 g^^^a^^^>c^e^a^>c^
l1 ModOn e ModOff
l16 ModOn e^^^^^^^ ModOff f^^e^^c^

v.N(100, 125,100,100, 115)
l1-4 ModOn V.T(100,115,!4, 115,60,!2) d,92 ModOff V(110) l16 e^dc l8 d
"}

TIME(4:4:0)o6 Fue1
TIME(21:1:0)o6 Fue2
TIME(37:1:0)o7 Fue3
TIME(40:4:0)o6 Fue1a
TIME(57:1:0)o6 Fue2a
//------------------------------------------------------------------------------
Track(2) p(64)
q100 V(110) o5

Str Koto0={"
l8 '<a>d'^cd^<a^g^
l8 a^fgfdc>

l8 '<a>d'^cd^<a^g^
l8 a^fgfd^>
"}
Str Koto1={"
l8 '<a>d'^cd^<a^g^
l8 a^fgfdc>
l8 '<a>d'^cd^<a^g^
l8 a^fgfg>c<

l8 'cg''cg''cg'^'da''da''da'^
l8 g^f^d^c^
l8 '<a>d'^cd'<b>e'^de
l8 r*f^e fecd>

l8 '<a>d'^cd^<a^g^
l8 a^fgfdc>
l8 '<a>d'^cd^<a^g^
l8 a^fgfg>c<

l8 'cg''cg''cg'^'da''da''da'^
l8 g^f^d^c^
l8 '<a>d'^cd'<b>e'^de
l8 r*f^e fecd>
"}
Str Koto2={"
l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge USU e^^^ USU d^^^
l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge d^a^> USU d^<a^

l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge USU e^^^ USU d^^^
l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge d^a^> USU d^<a^
"}
Str Koto3={"
l8 t.N(-50,-20,10)'<a>da'^ t0 gf gfdc
"}
Str Koto2a={"
l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge USU e^^^ USU d^^^
l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge d^a^> USU d^<a^

l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge USU e^^^ USU d^^^
l8 r*da>dfd<af USU c^^^^^^^
l8 r*cg>cec<ge d^a^> USU d^<a^

l8 r*da>dfa> l16 c<agf l1^ '<d>d'
"}

TIME(1:1:0)o6 Koto0
TIME(5:1:0)o6 Koto1
TIME(21:1:0)o5 Koto2
TIME(40:1:0)o5 Koto3
TIME(41:1:0)o6 Koto1
TIME(57:1:0)o5 Koto2a
//------------------------------------------------------------------------------
Track(3) p(64)
q100 IF(TYPE==0){V(125)}IF(TYPE==1){V(110)} o5

Str Shamisen0={"
l8 d^dd^dd^dd^d dddd
l8 d^dd^dd^dd^d d^ l16 dd l8 d
"}
Str Shamisen1={"
l8 d^dd^dd^dd^d ddc^
l8 f^fg^g>c^cc^c< a^f^
l8 g^^ l16 cg l8 a^^ l16 ca l8 gfdcr*d^c
l8 d^dd^dd^dd^d d^ l16 dd l8 c

l8 d^dd^dd^dd^d ddc^
l8 f^fg^g>c^cc^c< a^f^
l8 g^^ l16 cg l8 a^^ l16 ca l8 gfdcr*d^c
l8 d^dd^dd^ce^e ddc^
"}
Str Shamisen2={"
l8 d^^e^^f^ e^^^^^^^
l8 e^^f^^g^ g^^^ l16 a^^g^^f^
l8 d^^e^^f^ e^^^c^^^
l8 e^^^^^^c d^^^^^^^

l8 d^^e^^f^ e^^^^^^^
l8 e^^f^^g^ g^^^ l16 a^^g^^f^
l8 d^^e^^f^ e^^^c^^^
l8 d^^^^^^c d^e^f^g^
"}
Str Shamisen3={"
l16 a^^^^^gf g^^f^^d^
l4 efe>c< l8 a^ga^ga>c
l1 e
"}
Str Shamisen2a={"
l8 d^^e^^f^ e^^^^^^^
l8 e^^f^^g^ g^^^ l16 a^^g^^f^
l8 d^^e^^f^ e^^^c^^^
l8 e^^^^^^c d^^^^^^^

l8 d^^e^^f^ e^^^^^^^
l8 e^^f^^g^ g^^^ l16 a^^g^^f^
l8 d^^e^^f^ e^^^c^^^
l8 a^^^^^^ l16 ge l8 e^de l16 f^^e^^c^

l8 f^^f^^f^ f^^^^^^^
"}

TIME(1:1:0)o4 v110 Shamisen0
TIME(5:1:0)o4 v110 Shamisen1
TIME(21:1:0)o4 v110 Shamisen2
TIME(37:1:0)o4 v110 Shamisen3
TIME(41:1:0)o4 v110 Shamisen1
TIME(57:1:0)o4 v110 Shamisen2a
//------------------------------------------------------------------------------
Track(4) p(64)
q100 IF(TYPE==0){V(125)}IF(TYPE==1){V(100)} o5

Str BassPizz0={"
l8 ddr*d eer*e
l8 ffr*f eer*e
l8 ddr*d eer*e
l8 ffr*f eer*e
"}

Str BassPizz1={"
l8 ddr*d eer*e
l8 ffr*f eer*e
l8 ffr*f ggr*g
l8 aar*a ffr*f

l8 ggr*g aar*a
l8 gr*fr*dr*^^
l8 <bbr*b>ccr*c
l8 ddr*d eer*e

l8 ddr*d eer*e
l8 ffr*f eer*e
l8 ffr*f ggr*g
l8 aar*a ffr*f

l8 ggr*g aar*a
l8 gr*fr*dr*^^
l8 <bbr*b>ccr*c
l8 ddr*d d^c^
"}

Str BassPizz2={"
l8 <bbrbr*br*b> ccr*cr*cr*c
l8 ccr*cr*cr*c ccr*cr*dr*c
l8 <bbrbr*br*b> ccr*cr*<a>r*e
l8 ddr*dr*dr*d d^<a^>d^c^

l8 <bbrbr*br*b> ccr*cr*cr*c
l8 ccr*cr*cr*c ccr*cr*dr*c
l8 <bbrbr*br*b> ccr*cr*cr*c
l8 ddr*dr*dr*d d^<a^>d^c^
"}

Str BassPizz3={"
l16 d^^^^^cd e^^^^^de
l16 f^^^^^ef g^^^^^fg
l8 a^ga^ga>c<a^^^^^^^
"}

Str BassPizz2a={"
l8 <bbrbr*br*b> ccr*cr*cr*c
l8 ccr*cr*cr*c ccr*cr*dr*c
l8 <bbrbr*br*b> ccr*cr*cr*<a>
l8 ddr*dr*dr*d d^<a^>d^c^

l8 <bbrbr*br*b> ccr*cr*cr*c
l8 ccr*cr*cr*c ccr*cr*dr*c
l8 <bbrbr*br*b> ccr*cr*cr*c
l8 ccr*cr*cr*c ccr*cr*er*c

l8 ddr*dr*dr*d d
"}

IF(TYPE==0){V(125)
TIME(1:1:0)o3 v110 BassPizz0
TIME(5:1:0)o3 v110 BassPizz1
TIME(21:1:0)o3 v110 BassPizz2
TIME(37:1:0)o3 v110 BassPizz3
TIME(41:1:0)o3 v110 BassPizz1
TIME(57:1:0)o3 v110 BassPizz2a
}IF(TYPE==1){
TIME(1:1:0)o5 v110 BassPizz0
TIME(5:1:0)o5 v110 BassPizz1
TIME(21:1:0)o5 v110 BassPizz2
TIME(37:1:0)o5 v110 BassPizz3
TIME(41:1:0)o5 v110 BassPizz1
TIME(57:1:0)o5 v110 BassPizz2a
}
//------------------------------------------------------------------------------
Track(5) p(64)
q100 o5 t.Random(10) v.Random(10)

IF(TYPE==0)
{
V(125)

Rhythm{
// 太鼓３人分
$a{v115 n48,}/*デ*/
$A{v127 n48,}/*デ*/
$b{v90  n48,}/*テ*/
$B{v100 n48,}/*テ*/
$c{v70  n48,}/*ツ*/
$C{v80  n48,}/*ツ*/
$d{v50  n48,}/*ヅ*/
$D{v125 t.N(-5,10)'n48, n52,' t0 }/*テレン*/

$e{v115 n50,}/*ケ*/
$E{v127 n50,}/*ケ*/
$f{v90  n50,}/*レ*/
$F{v100 n50,}/*レ*/
$g{v70  n50,}/*ク*/
$G{v80  n50,}/*ク*/
$h{v50  n50,}/*ク*/
$H{v125 t.N(-10,10)'n50, n53,' t0}/*テレン*/

$i{v85  n62,}/*カ*/
$I{v110 n62,}/*カ*/

$j{v85  n64,}/*ラ*/
$J{v110 n64,}/*ラ*/

(TIME(1:1:0))
l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbfBFae
(TIME(1:1:15))
l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbfBFae

(TIME(5:1:0))
l16 [4 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^
(TIME(5:1:15))
l16 [4 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

(TIME(21:1:0))
l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'
(TIME(21:1:15))
l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

(TIME(37:1:0))
l16 D^^^^^fb D^^^^^fb
l16 D^^^^^fb D^^^^^fb
l16 A^fbf^A^fbf^A^fb l4 'IJ'ij D
(TIME(37:1:15))
l16 D^^^^^fb D^^^^^fb
l16 D^^^^^fb D^^^^^fb
l16 A^fbf^A^fbf^A^fb l4 'IJ'ij D

(TIME(41:1:0))
l16 [4 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^
(TIME(41:1:15))
l16 [4 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

(TIME(57:1:0))
l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 DEA'IJ'

l16 A^fbf^A^fbf^A^fb l1 D
(TIME(57:1:15))
l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 DEA'IJ'

l16 A^fbf^A^fbf^A^fb l1 D
}
}
IF(TYPE==1)
{
V(90)

Rhythm{
// 太鼓３人分
$a{v115 n48,}/*デ*/
$A{v127 n48,}/*デ*/
$b{v90  n48,}/*テ*/
$B{v100 n48,}/*テ*/
$c{v70  n48,}/*ツ*/
$C{v80  n48,}/*ツ*/
$d{v50  n48,}/*ヅ*/
$D{v125 t.N(-5,10)'n48, n52,' t0 }/*テレン*/

$e{v115 n50,}/*ケ*/
$E{v127 n50,}/*ケ*/
$f{v90  n50,}/*レ*/
$F{v100 n50,}/*レ*/
$g{v70  n50,}/*ク*/
$G{v80  n50,}/*ク*/
$h{v50  n50,}/*ク*/
$H{v125 t.N(-10,10)'n50, n53,' t0}/*テレン*/

$i{v85  n49,}/*カ*/
$I{v110 n49,}/*カ*/

$j{v85  n51,}/*ラ*/
$J{v110 n51,}/*ラ*/

(TIME(1:1:0))
l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbfBFae

(TIME(5:1:0))
l16 [4 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

(TIME(21:1:0))
l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

(TIME(37:1:0))
l16 D^^^^^fb D^^^^^fb
l16 D^^^^^fb D^^^^^fb
l16 A^fbf^A^fbf^A^fb l4 'IJ'ij D

(TIME(41:1:0))
l16 [4 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 D^fbE^ [3 A^fbE^] CGbfBFae
l16 [4 A^fbE^] CGbf'IJ'^^^

l16 [2 A^fbE^] Afb^ l8 A^E^A^^^
l16 [4 A^fbE^] CGbf'IJ'^^^

(TIME(57:1:0))
l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 Aea'IJ'

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 AeaE

l16 A^fbf^A^fbf^A^fb l4 Aeae
l16 A^fbf^A^fbf^A^fb l4 DEA'IJ'

l16 A^fbf^A^fbf^A^fb l1 D
}
}
//------------------------------------------------------------------------------
Track(6) p(64)
q100 V(90) o5

Str Tim1={"
v.T(110,122,!2^4, 122,122,!4)
l8 r*ddd dddd
"}

Str Tim2={"
v125
l4 d^^^ ^<g>c<a
l4 g^^^ ^a>d<a

l4 b^^^ >c^^^
l4 d^^^ ^<a>d<a

l4 b^^^ ^g>c<a
l4 g^^^ ^a>d<a

l4 b^^^ >c^^^
l4 d^^^ ^<a>d<a
"}

Str Tim2a={"
v125
l4 d^^^ ^<g>c<a
l4 g^^^ ^a>d<a

l4 b^^^ >c^^^
l4 d^^^ ^<a>d<a

l4 b^^^ ^g>c<a
l4 g^^^ ^a>d<a

l4 b^^^ >c^^^
l4 c^^^ ^ce<a
l8 d^^d^^ l16 d^dd l8 d^^^^^^^
"}

TIME(20:1:0)o4 Tim1
TIME(21:1:0)o4 Tim2
TIME(56:1:0)o4 Tim1
TIME(57:1:0)o4 Tim2a
//------------------------------------------------------------------------------
Track(7) p(64)
q100 V(110) o6 M(0)

Str Shakuhachi1={"
l1 r* l8 r*^^^ l16 r*^defr*gr*
l16 a^^^^^ga g^^^^^ce
l8 f^e^d^c^

l16 d^^^^^^e c^^^^^^g
l8 dc<agar*^^
l8 b^^^>c^e^<a^^^^^^^
"}
Str Shakuhachi2={"
l16 f^^^^^^^ f^^e^^d^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,50,!4) c^^^^^^^ ^^^^^^,90 ModOff V(110) <g^>
l16 c^^^^^^^ c^^e^^c^
l16 c^^^^^^^ d^^^^^^^,90

l16 f^^^^^^^ f^^e^^d^
l16 c^^^<a^^^g^^^>e^^^
l24 fe l1^1-12-2 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) f,96 ModOff V(110)
l16 <a^^^b^^^>

l16 f^^^^^^^ f^^e^^d^
l16 ModOn V.T(100,115,!2, 115,100,!4, 100,60,!4) c^^^^^^^ ^^^^^^,90 ModOff V(110) <g^>
l16 c^^^^^^^ c^^e^^c^
l16 e^^^^^^^ f^^^^^^^,90

l16 d^^^^^^^ d^^e^^f^
l16 e^^^f^^^ >c^^^e^^^
l2 c<a>
l16 c^^^^^^^ e^^c^^<g^

l1 a l8 >d<
"}

TIME(49:1:0)o6 Shakuhachi1
TIME(57:1:0)o6 Shakuhachi2
//------------------------------------------------------------------------------
Track(8) p(64)
q100 V(110) o5

Rhythm{
$a{v90 n34,}/*風*/

(TIME(1:1:0)) 
l1^1^1^1^1^1^1 (V.T(70,110,!1,110,110,!1^1^1,110,0,!1^1^1)) a
}
//------------------------------------------------------------------------------
Track(9) p(64) 
q100 V(90) o5 t.Random(10) v.Random(10)

IF(TYPE==1)
{
Rhythm{
$a{v105 n81,}/*銅鑼*/

(TIME(21:1:0)) l1^1^1^1 a
(TIME(57:1:0)) l1^1^1^1 a
(TIME(74:1:0)) l1^1^1^1 a
}
}
//------------------------------------------------------------------------------
Track(10) p(64) 
q100 V(90) o5 t.Random(10) v.Random(10)

Rhythm{
$a{v80 n54,}/*タンバリン*/
$A{v100 n54,}/*タンバリン*/

q70

(TIME(1:1:0))
l1^1-8 A l16 aa
l1^1-8 A l16 aa
l1 A

(TIME(10:3:0)) l8 r*aA^ ^^^^
(TIME(18:3:0)) l8 r*aA^ ^^^^

(TIME(21:1:0))
l8 [3 Aa^a^a^a] Aa^a^AA^
l8 [3 Aa^a^a^a] Aa^a^AAa

l8 [3 Aa^a^a^a] Aa^a^AA^
l8 [3 Aa^a^a^a] Aa^a^AAa

(TIME(37:1:0))
l8 [2 Aa^a^a^a]
l8 A^aA^aAa A^a^a^a^

(TIME(46:3:0)) l8 r*aA^ ^^^^
(TIME(54:3:0)) l8 r*aA^ ^^^^

(TIME(57:1:0))
l8 [3 Aa^a^a^a] Aa^a^AA^
l8 [3 Aa^a^a^a] Aa^a^AAa

l8 [3 Aa^a^a^a] Aa^a^AA^
l8 [3 Aa^a^a^a] Aa^a^AAa

l8 AaaAaaAa l1 a

$b{v100 n81,}/*トライアングル*/
$B{v125 n81,}/*トライアングル*/
$c{v100 n80,}/*トライアングル*/
$C{v125 n80,}/*トライアングル*/

q60

(TIME(4:1:0))
l4 cc l16 ccc^b^^^

(TIME(5:1:0))
l8 c l16 cc^^ l8 ccc^c cc^cC^c^
l8 c l16 cc^^ l8 ccc^c cc^cb^cc
l8 c l16 cc^^ l8 ccc^c C^C^C^^^
l8 c l16 cc^^ l8 ccc^c cc^cCccc

l8 c l16 cc^^ l8 ccc^c cc^cC^c^
l8 c l16 cc^^ l8 ccc^c cc^cb^cc
l8 c l16 cc^^ l8 ccc^c C^C^CBB^
l8 c l16 cc^^ l8 ccc^c cc^cb^cc

l1 b

(TIME(40:1:0))
l16 r*^ccb^c^ ccbr*B^^^

(TIME(41:1:0))
l8 c l16 cc^^ l8 ccc^c cc^cC^c^
l8 c l16 cc^^ l8 ccc^c cc^cb^cc
l8 c l16 cc^^ l8 ccc^c C^C^C^^^
l8 c l16 cc^^ l8 ccc^c cc^cCccc

l8 c l16 cc^^ l8 ccc^c cc^cC^c^
l8 c l16 cc^^ l8 ccc^c cc^cb^cc
l8 c l16 cc^^ l8 ccc^c C^C^CBB^
l8 c l16 cc^^ l8 ccc^c cc^cb^cc

l1 b

$d{v125 n76,}/*ウッドブロック*/
$e{v100 n76,}/*ウッドブロック*/

(TIME(5:1:0))
l1^1^1 r* l8 r*^^^^dd^
l8 d^^^d^^^d^d^d^^^
l8 r*^^^^^^^ r*^^^^dd^

l1^1^1 d l8 r*^^^^dd^
l8 d^^^d^^^d^d^d^^^
l8 r*^^^^^^^ r*^^^^dd^

(TIME(37:1:0))
l8 r*d^d^dd^ r*d^d^ddd
l16 d^edd^ d^edd^ d^ed l1 deee

(TIME(41:1:0))
l1^1^1 d l8 r*^^^^dd^
l8 d^^^d^^^d^d^d^^^
l8 r*^^^^^^^ r*^^^^dd^

l1^1^1 d l8 r*^^^^dd^
l8 d^^^d^^^d^d^d^^^
l8 r*^^^^^^^ r*^^^^dd^

$e{v105 n57,}/*シンバル*/
$E{'v125 n57, v125 n59,'}/*シンバル*/

(TIME(4:4:0)) l1 e
(TIME(18:3:0)) l8 r*e l1 E
(TIME(40:4:0)) l1 e
(TIME(54:3:0)) l8 r*e l1 E

}

IF(TYPE==0)
{
Rhythm{
$a{v125 n49,}/*銅鑼*/

(TIME(21:1:0)) l1^1^1^1 a
(TIME(57:1:0)) l1^1^1^1 a
(TIME(74:1:0)) l1^1^1^1 a
}
}
//------------------------------------------------------------------------------
Track(11) p(64)
q100 V(110) o5 IF(TYPE==0){M.onNoteWave(0,35,!4, 35,0,!1)}IF(TYPE==1){M(90)}

Str Violin1Alco0={"
l8 d^^^e^^^f^^^e^^^
l8 d^^^e^^^f^^^g^^^
"}

Str Violin1Alco1={"
l8 d^^^e^^^f^^^e^^^
l8 f^^^g^^^a^^^>c^^^<

l8 g^^^a^^^g^f^d^c^
l8 <b^^^>c^^^d^^^e^^^

l8 d^^^e^^^f^^^e^^^
l8 f^^^g^^^a^^^>c^^^<

l8 g^^^a^^^g^f^d^c^
l8 <b^^^>c^^^d^^^^^^^
"}

Str Violin1Alco2={"
l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fg
l16 a^^^g^^^f^^^g^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fe
l16 d^^^e^^^f^^^g^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fg
l16 a^^^g^^^f^^^g^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fe
l16 d^^^^^^^ ^^^^^^^^
"}

Str Violin1Alco3={"
l8 d^^^e^^^f^^^g^^^
l8 a^^^^^^^r*^^^^^^^
"}

Str Violin1Alco2a={"
l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fg
l16 a^^^g^^^f^^^g^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fe
l16 d^^^e^^^f^^^g^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fg
l16 a^^^g^^^f^^^g^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fe
l16 e^^^^^^^ f^^e^^c^

l8 d^^^^^^^ d
"}

TIME(1:1:0)o6 v110 Violin1Alco0
TIME(5:1:0)o6 v110 Violin1Alco1
TIME(21:1:0)o6 v110 Violin1Alco2
TIME(37:1:0)o6 v110 Violin1Alco3
TIME(41:1:0)o6 v110 Violin1Alco1
TIME(57:1:0)o6 v110 Violin1Alco2a
//------------------------------------------------------------------------------
Track(12) p(64)
q100 V(110) o5 IF(TYPE==0){M.onNoteWave(0,35,!4, 35,0,!1)}IF(TYPE==1){M(90)}

Str Violin2Alco0={"
l8 f^^^g^^^ a^^^g^^^
l8 f^^^g^^^ a^^^e^^^
"}

Str Violin2Alco1={"
l8 f^^^g^^^ a^^^g^^^
l8 a^^^b^^^ >c^^^<a^^^

l8 b^^^>c^^^< b^a^f^e^
l8 f^^^g^^^ a^^^g^^^

l8 f^^^g^^^ a^^^g^^^
l8 a^^^b^^^ >c^^^<a^^^

l8 b^^^>c^^^< b^a^f^e^
l8 f^^^g^^^ a^^^^^^^
"}

Str Violin2Alco2={"
l16 a^^^^^^^ ^^^^^^gf
l16 e^^^^^^^ ^^^^^^^^
l16 g^^^^^^^ ^^^^^^fg
l16 g^^^^^^^ f^^^^^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^^^^^ g^^^^^^^
l16 g^^^^^^^ ^^^^^^^a
l16 g^^^^^^^ f^^^^^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^^^^^ ^^^^^^^^
l16 g^^^^^^^ ^^^^^^fg
l16 g^^^^^^^ f^^^^^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fe
l16 d^^^^^^^ ^^^^^^^^
"}

Str Violin2Alco3={"
l8 f^^^g^^^a^^^b^^^
l8 >c^^^^^^^<r*^^^^^^^
"}

Str Violin2Alco2a={"
l16 a^^^^^^^ ^^^^^^gf
l16 e^^^^^^^ ^^^^^^^^
l16 g^^^^^^^ ^^^^^^fg
l16 g^^^^^^^ f^^^^^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^^^^^ g^^^^^^^
l16 g^^^^^^^ ^^^^^^^a
l16 g^^^^^^^ f^^^^^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^^^^^ ^^^^^^^^
l16 g^^^^^^^ ^^^^^^fg
l16 g^^^^^^^ f^^^^^^^

l16 a^^^^^^^ ^^^^^^gf
l16 e^^^g^^^>c^^^<a^^^
l16 g^^^^^^^ ^^^^^^fe
l16 e^^^^^^^ a^^g^^e^

l8 f^^^^^^^ f
"}

TIME(1:1:0)o5 v110 Violin2Alco0
TIME(5:1:0)o5 v110 Violin2Alco1
TIME(21:1:0)o5 v110 Violin2Alco2
TIME(37:1:0)o5 v110 Violin2Alco3
TIME(41:1:0)o5 v110 Violin2Alco1
TIME(57:1:0)o5 v110 Violin2Alco2a
//------------------------------------------------------------------------------
Track(13) p(64)
q100 V(110) o5 IF(TYPE==0){M.onNoteWave(0,35,!4, 35,0,!1)}IF(TYPE==1){M(100)}

Str VioraAlco0={"
l8 a^^^>c^^^ d^^^c^^^<
l8 a^^^>c^^^ d^^^c^^^<
"}

Str VioraAlco1={"
l8 a^^^>c^^^ d^^^c^^^
l8 c^^^d^^^ e^^^f^^^

l8 d^^^e^^^ d^c^<a^g^
l8 a^^^>c^^^ d^^^c^^^<

l8 a^^^>c^^^ d^^^c^^^
l8 c^^^d^^^ e^^^f^^^

l8 d^^^e^^^ d^c^<a^g^
l8 a^^^>c^^^ d^^^^^^^
"}

Str VioraAlco2={"
l4 f^^^<g^^^> e^^^^^<a^>
l4 f^^^<g^^^> c^^^<a^^^>

l4 f^^^<g^^^> e^^^^^<a^>
l4 f^^^<g^^^> c^^^<a^^^>
"}

Str VioraAlco3={"
l8 <a^^^b^^^>c^^^d^^^
l8 e^^^^^^^r*^^^^^^^
"}

Str VioraAlco2a={"
l4 f^^^<g^^^> e^^^^^<a^>
l4 f^^^<g^^^> c^^^<a^^^>

l4 f^^^<g^^^> e^^^^^<a^>
l4 f^^^<g^^^> <a^^^>c^^^

l8 <a^^^^^^^a>
"}

TIME(1:1:0)o4 v110 VioraAlco0
TIME(5:1:0)o4 v110 VioraAlco1
TIME(21:1:0)o5 v110 VioraAlco2
TIME(37:1:0)o5 v110 VioraAlco3
TIME(41:1:0)o4 v110 VioraAlco1
TIME(57:1:0)o5 v110 VioraAlco2a
//------------------------------------------------------------------------------
Track(14) p(64)
q100 V(110) o5 IF(TYPE==0){M.onNoteWave(0,35,!4, 35,0,!1)}IF(TYPE==1){M(100)}

Str CelloAlco0={"
l8 d^^^e^^^f^^^e^^^
l8 d^^^e^^^f^^^g^^^
"}

Str CelloAlco1={"
l8 d^^^e^^^f^^^e^^^
l8 f^^^g^^^a^^^f^^^

l8 g^^^a^^^g^f^d^c^
l8 <b^^^>c^^^d^^^e^^^

l8 d^^^e^^^f^^^e^^^
l8 f^^^g^^^a^^^f^^^

l8 g^^^a^^^g^f^d^c^
l8 <b^^^>c^^^d^^^^^^^
"}

Str CelloAlco2={"
l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ ^^^^^^^^,90
l16 c^^^^^^^ ^^^^^^de
l16 e^^^^^^^ f^^e^^c^

l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ c^^d^^e^
l16 e^^^^^^^ ^^^^^^,96 dc
l16 d^^^^^^^ ^^^^^^^^

l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ ^^^^^^^^,90
l16 c^^^^^^^ ^^^^^^de
l16 e^^^^^^^ f^^^^^^^,96

l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ c^^d^^e^
l16 e^^^^^^^ ^^^^^^,96 dc
l16 d^^^^^^^ ^^^^^^^^
"}

Str CelloAlco3={"
l8 d^^^e^^^f^^^g^^^
l8 a^^^^^^^r*^^^^^^^
"}

Str CelloAlco2a={"
l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ ^^^^^^^^,90
l16 c^^^^^^^ ^^^^^^de
l16 e^^^^^^^ f^^e^^c^

l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ c^^d^^e^
l16 e^^^^^^^ ^^^^^^,96 dc
l16 d^^^^^^^ ^^^^^^^^

l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ ^^^^^^^^,90
l16 c^^^^^^^ ^^^^^^de
l16 e^^^^^^^ f^^^^^^^,96

l16 <b^^^^^^^ ^^^^^^>cd
l16 c^^^^^^^ c^^d^^e^
l16 e^^^^^^^ ^^^^^^,96 de
l16 <a^^^^^^^> g^^f^^e^

l8 d^^^^^^^ d
"}

TIME(1:1:0)o4 v110 CelloAlco0
TIME(5:1:0)o4 v110 CelloAlco1
TIME(21:1:0)o4 v110 CelloAlco2
TIME(37:1:0)o4 v110 CelloAlco3
TIME(41:1:0)o4 v110 CelloAlco1
TIME(57:1:0)o4 v110 CelloAlco2a