/*
曲掲示板Part6でははじめまして。
もしくはお久しぶりです。
闇人と申します。
今回の曲を投稿するまでにいろいろな経緯がありましたので、
昔話なので不正確な部分もあるかもしれませんが
簡単に説明させていただきます。

時は2009年の秋、ちょうど１年位前だったかと思いますが、僕は高校三年生でした。
周囲が大学受験に向けて猛勉強をする中、僕は一人ぷらぷらと遊び暮らしていやように思います。
成績は高二の春の時点でこれ以上下がれない地点まで到達し、
毎日遅刻を繰り返しつつ学校へ通っては、授業を子守唄にすやすやという状態。
進路自体はすでに決めていたのですが、その結果受験勉強とはほぼ無縁の毎日を送っていました。
学校では半ばニート状態です。
放課後には自習室に向かい、勉強熱心な同級生達を傍目に
時には礼拝堂に忍び込んでピアノやらオルガンやらを弾いてました。
うまくはないですが、ぽろっとフレーズが出てくるのが楽しくて楽しくて。
白い目で見られながらも鍵盤ばかり触ってました。
この曲のもとになったフレーズは、そうしてぽろっと出てきたものだったんです。

ちょうどそのころですね。
クラスメートの騎士王321さんの大学が決まりました。推薦入試です。
それもあって騎士王さんが僕の道楽につきあってくれるようになりました。
彼とは以前からよくお互いの曲や、曲掲示板の話題などで盛り上がって。
よく僕の曲の助言をもらっていたりしました。
その中で、つくりかけのこの曲のデータを騎士王さんに送ったと記憶しています。
当時はまだ少し作曲していたのですが、僕実は数年前からずっとスランプ状態でして。
ほとんど作曲できず、打ち込みにこぎつけられても未完成のまま手が出せなくなってしまい、
曲掲示板にもあまり顔を出せていませんでした。
この曲もその例に漏れず、完成しないまま放置していました。

それから約1年が経ちましたか、
この曲のことなど跡形もなく忘れてしまったある日のこと。
家に帰りPCをあけSkypeを立ち上げてみると、ログに見覚えのあるデータが…
"Fall.mml"
騎士王さんやさくらもどきさんがものすごい勢いでRemixして下さっていたのでした。
そのデータのうち、騎士王さんが編曲してくださった分がこちらです。
自分で完成させられなかったのが今でも悔しいですが、
見られないと思っていた完成した自分の曲に出会えたことが何よりも嬉しいです。
ぜひ聞いていただければうれしいです。
*/



Int SAKUSYA = 2
//↑ここを1にすると僕(闇人)が昔打ち込んだデータが再生されます
//1                : 闇人
//2(というか1以外) : 騎士王321



If(SAKUSYA==1){
//------------------------------------------------------------------------------
//これは僕(闇人)がかきかけのまま放置していたソースです
//Original MML
//------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.373)
//------------------------------------------------------------------------------
TrackName{""}
Copyright{"闇人"}
MetaText{""}

ResetGM
ResetGS
ResetXG

TimeBase(96)
TimeSignature(4,4)
Tempo(124)
KeyFlag-(beadg)

Track 1
V(127) v127 o6 l16 @1 q106 Panpot(48)  REV(0) CHO(10)
BR(12)
[16r]
[32f^b^e^fd^de^c^d^]

Track 2
V(127) v127 o6 l16 @1 q90 Panpot(80)  REV(0) CHO(0) p%2
BR(12)
[16r]

[32f^b^e^fd^de^c^d^]

Track 4//
V(127) v100 o7 l16 @81,8 q99 Panpot(64) M(0) REV(00) CHO(0)//補欠：@12
[16r]
BR(12)
[8'ef'r'"f"b'r'ef'r'"f"b''ef'r'ef''"f"b'r'ef'r'"f"b'r]

Track 5//
V(127) v127 o3 l16 @39 q90 Panpot(54) M(0) REV(00) CHO(0)
BR(12)
[16r]
//b^^^b^^^g^^^a^^^
[4[b^^^b^abrrb^rr:b^]a^
g^^^g^fgrrg^rrg^
a^^^a^garra^rr`c^]

Track 6//
V(127) v127 o2 l16 @40 q90 Panpot(74) M(0) REV(00) CHO(0)
BR(12)
[16r]
[4[b^^^b^abrrb^rr:b^]a^
g^^^g^fgrrg^rrg^
a^^^a^garra^rr`c^]

Track 7//Steel Guitar
V(127) v127 o1 l8 @20 q120 Panpot(32) M(40) REV(50) CHO(10)
[8r]

BR(12)

/* Expression.onNoteWave(110,127,!4)
p%.onNoteWave(-60,0,!4) */

Track 8
V(127) v127 o3 l16 @33 q100 Panpot(64) M(5) REV(5) CHO(25)
[16r]

Track 9 //Strings
V(127) v100 o5 l4 @49 q99 Panpot(064) M(30) REV(45) CHO(40)
BR(12)
[4r]

//['dfb'^^^^^^'fa`c''gb`d'^^^'ea`c'^^^]
['"bef'^^^'"bdf'^^^'"g"bdf'^^^'"acef'^^^]

Track 10
V(127) v127 o3 l16 @25,90,1 q100 Panpot(64) M(0) REV(0) CHO(0)
[16r]

#DRUM1 = { v127 l16
      Sub{[4f+][3f+f+rr]}
      Sub{rrrr[3rrbr]}
      Sub{[4"a+rrr]}
//      Sub{[frrrrrrr]}
      Sub{[4"errr]}
      Sub{[rrrre+rrr]}
      Sub{[8r]rre[5r]}
//      Sub{[[8r]rr"f-[5r]]}
      Sub{[4crrr]}
          [4"b+rrr]
}
Tempo=124;CH(10);
[16 #DRUM1]*/
/* //<リズムパターンの定義>
#DRUM1 = { v127 l24
	Sub{ っっっっっっ|っっっちっっ|っっっちっっ|っっっちっっ }
	Sub{ つっつつっつ|つっつっっっ|つっつっっっ|つっつっっっ }
	Sub{ っっったっっ|っっったっっ|っっったっっ|っっったっっ }
	     ずっっっっっ|ずっっっっっ|ずっっっっっ|ずっっっっっ
	Sub{ すっっっっっ|すっっっっっ|すっっっっっ|すっっっっっ }
	Sub{ ゅっっっっっ|ゅっっっっっ|ゅっっっっっ|ゅっっっっっ }
}
//</リズムパターンの定義>

//<リズムヘッダ>
Tempo=100;CH(10);
//</リズムヘッダ>

//パターン演奏
[16 #DRUM1] */

Track 11//おまけのけ〜
[16r]

Track 16
V(127) v127 o3 l16 @81,8 q100 Panpot(60) M(0) REV(0) CHO(0)
[16r]

BR(12)

p%.onNoteWave(0,-8191,!16)

[32crrr]

Mute(4)
//Solo(1)
//PlayFrom(010:001:000)
//PlayTo(050:001:000)




　}Else{


//------------------------------------------------------------------------------
//ここからが騎士王321さんによるリミックスです
//Performance MML
//===================================================================================
TrackName     = {"Fall"}
Copyright     = {"闇人"}//騎士王321が尊敬の念をこめて
テンポ 125
拍子   4,4
KeyFlag-(beadg);
TrackSync;
Include(delay.h);Include(groove.h);Include(unison.h);
System.MeasureShift(1);ResetGS;TrackSync;
CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7;
CH(12) SysEx$ = f0,41,10,42,12,{40,1b,15,02},f7;
CH(13) SysEx$ = f0,41,10,42,12,{40,1c,15,02},f7;
//CH(14) SysEx$ = f0,41,10,42,12,{40,1d,15,02},f7;
CuePoint={"TwmParam(120,127,0)"}
CuePoint={"TwmChorus(1,127,60,64,64,48,1)"}
//==ミキサー========================================================================================
トラック1  V(127) P(0)
トラック2  V(127) P(127)
トラック3  V(100) P(64)
トラック4  V(125) P(74)
トラック5  V(125) P(54)
トラック6  V(72) P(16)
トラック7  V(72) P(112)
トラック8  V(64) P(32)
トラック9  V(64) P(96)
//--------------------------------------------------------------------------------------------------
トラック10 V(127) P(64)
トラック11 V(127) P(64)
トラック12 V(100) P(64)
トラック13 V(127) P(64)
トラック14 V(110) P(64)
トラック15 V(100) P(64)
トラック16 V(90) P(64)
//--------------------------------------------------------------------------------------------------
//Solo(1)//トラックソロ。複数トラックで指定可能
//Mute(1)//トラックミュート。
//==エフェクト関連==================================================================================
トラック1  REV(16) CHO(8) M(0) q106 o6 @1,0,0 p%(256)
トラック2  REV(16) CHO(8) M(0) q105 o6 @1,0,0 p%(128)
トラック3  REV(16) CHO(8) M(10) q96 o6 @1,0,0
トラック4  REV(0) CHO(16) M(10) q90 o3 @39,0,0 p%(256)
トラック5  REV(0) CHO(40) M(20) q89 o2 @40,16,0 p%(256)
トラック6  REV(48) CHO(24) M(0) q98 o5 @49,0,0 p%(256)
トラック7  REV(48) CHO(24) M(0) q98 o5 @49,0,0
トラック8  REV(16) CHO(32) M(0) q39 o6 @109,0,0
トラック9  REV(16) CHO(32) M(0) q29 o6 @109,0,0
トラック15 REV(0) CHO(0) M(0) q31 o3 @81,8,0//何かしらの小細工
トラック16 REV(127) CHO(127) M(0) BR(12) q100 o5 @127,0,0//ホワイトノイズ
//--------------------------------------------------------------------------------------------------
トラック10 REV(1) CHO(8) BR(12) p%(-500) q11 o3 @27,90//B.D.
トラック11 REV(16) CHO(32) BR(12) p%(0) q12 o3 @25,90,1//S.D.
トラック12 REV(16) CHO(64) BR(12) p%(0) q13 o3 @25,90,1//H.H.
トラック13 REV(100) CHO(16) BR(12) p%(1000) q14 o3 @26,100,0//C.C.
トラック14 REV(127) CHO(127) BR(12) p%(0) q98 o2 @117,8,0//残りのドラム小細工
//==読み込み関係====================================================================================
STR RS08 = {r%3072}
STR RS16 = {r%6144}
STR PF00 = {EP.T(16,127,3072);CHO.T(127,8,3072);l16 v127[8 f^b^e^fd^de^c^d^]}
STR PF10 = {EP(64);MidiDelay({[4 r1f8b8e8f8r2]},7,!8^16);}
STR PF20 = {EP(64);MidiDelay({[4 r1:f8b8e8f8r2]},7,!8^16);
            EP.T(64,127,!4^8);CHO.T(127,8,!4^8);f^b^e^fd^de^c^d^}
STR PF01 = {l16 v127[8 f^b^e^fd^de^c^d^]}
STR PF90 = {@82,1 l16 v127[8 f^b^e^fd^de^c^d^]@1}
STR PF91 = {@82,110 l16 v100[8 f^b^e^fd^de^c^d^]r-1^1 BR(12) p%.T(43,8191,!1^1)r1^1 @1 BR(2)v127}
STR PF92 = {@82,110 l16 v100[8 f^b^e^fd^de^c^d^]r-1^1 BR(12) p%.T(21,-8191,!1^1)r1^1 @1 BR(2)v127}
STR PF93 = {@82,110 l16 v100[8 f^b^e^fd^de^c^d^]@1 v127}
STR PF95 = {@82,1 l16 v127 EP.T(127,32,3072);CHO.T(8,127,3072);[16 f^b^e^^:f&]f@1}
STR PF96 = {@82,1 l16 v127[8 f^b^e^fd^de^c^d^]r-1^1 CHO.T(8,127,!1^1);r1^1@1}
STR BA00 = {l1 v127[2 b^,100g,100a,100]}
STR BA01 = {l16 v127[2 [ b^^^b^abrrb^rr:b^]a^ g^^^g^fgrrg^rrg^ a^^^a^garra^rr`c^]}
STR BA02 = {EP.T(127,16,!16,16,127,!1^1^1^1^1^1^1^4^8^16,0,0,!2);
            l16 v127[2 [2 b^^^b^abrrb^rr:b^]a^ g^^^g^fgrrg^rrg^ a^^^a^garra^rr`c^]EP(127);}
STR BA03 = {EP.T(127,0,3072);[16 b^^^b^a:b&]r}
STR BA04 = {RS08 r-2 EP.T(16,127,!8);f2}
STR SL00 = {EP.T(0,0,!1^1^1^1^1^1^1,0,127,!1);CHO.T(127,127,!1^1^1^1^1^1^1,127,24,!1);v127
            l1 Sub{f%3072,100}[2 Sub{""b^""g""a}'"b''"a''"b''c',100]}
STR SR00 = {EP.T(0,0,!1^1^1^1^1^1^1,0,127,!1);CHO.T(127,127,!1^1^1^1^1^1^1,127,24,!1);v127
            l1 Sub{f%3072,100}[2 Sub{"f^"g"e,100}'e'  'd'^/*'d'*/'e',100]}
STR SL01 = {l1 Sub{f%3072,100}[2 Sub{""b^""g""a}'"b''"a''"b''c',100]}
STR SR01 = {l1 Sub{f%3072,100}[2 Sub{"f^"g"e,100}'e'  'd'^/*'d'*/'e',100]}
STR SL81 = {REV(48);CHO(24);EP.T(64,96,!4);@90
            l1 Sub{f%3072,100}[2 Sub{""b^""g""a}'"b''"a''"b''c',100]r-2 EP.T(96,127,!2);r2 @49}
STR SR81 = {REV(48);CHO(24);EP.T(64,96,!4);@90
            l1 Sub{f%3072,100}[2 Sub{"f^"g"e,100}'e'  'd'^/*'d'*/'e',100]r-2 EP.T(96,127,!2);r2 @49}
STR SL82 = {REV(48);CHO(24);EP.T(127,96,!4,96,0,!1^1^1);@90 '""b"bf'1^1}
STR SR82 = {REV(48);CHO(24);EP.T(127,96,!4,96,0,!1^1^1);@90 '"fdf'1^1r1^1^1^1""b1}
STR SL91 = {Sub{[8 [2 P.T(16,16,!4,112,112,!4);r2]]P(16)}@52 REV(0)
		l1 Sub{f%3072,100}[2 Sub{""b^""g""a}'"b''"a''"b''c',100]@49 r-2 EP(0)r2 EP(127) REV(48)}
STR SR91 = {Sub{[8 [2 P.T(112,112,!4,16,16,!4);r2]]P(112)}@52 REV(0)
		l1 Sub{f%3072,100}[2 Sub{"f^"g"e,100}'e'  'd'^/*'d'*/'e',100]@49 r-2 EP(0)r2 EP(127) REV(48)}
STR SL92 = {Sub{[8 [2 P.T(16,112,!4,112,16,!4);r2]]}EP.T(127,64,3072);REV.T(48,127,3072);CHO.T(24,127,3072);
            l1 Sub{f%3072,100}[2 Sub{""b^""g""a}'"b''"a''"b''c',100]}
STR SR92 = {Sub{[8 [2 P.T(112,16,!4,16,112,!4);r2]]}EP.T(127,64,3072);REV.T(48,127,3072);CHO.T(24,127,3072);
            l1 Sub{f%3072,100}[2 Sub{"f^"g"e,100}'e'  'd'^/*'d'*/'e',100]}
STR SQ01 = {l16 v127 Sub{[2 EP.T(127,127,!1,127,32,!1,32,0,!1^1);r1^1^1^1]}
            MidiDelay({[2 [2 'ef'r'"f"b'r'ef'r'"f"b''ef'r'ef''"f"b'r'ef'r'"f"b'r]r1^1]},4,!4^8)}
STR BD00 = {Sub{v1[7 [4 '"ac' v+4]][2 '"ac']rr}
            v127[7 [4 '"e-"a-']][2 '"e-"a-']rr}
STR BD01 = {v127[8 [4 '"e-"a-"ac']]}
STR BD02 = {v127[8 [4 '"e-"a-"ac']]r-1^1 CHO.T(8,127,!1^1);r1^1 CHO(8)}
STR SD01 = {v127[8 r4e4r8e-8e4]}
STR HH00 = {EP.T(0,127,3072);CHO.T(127,64,3072);p%.T(-8191,0,3072);
            v127 l16[8 [6 f+]a+8[2 f+f+a+r]]}
STR HH01 = {/*Sub{[2 p%.T(0,-1000,!1,-1000,1000,!1^1,1000,0,!1);r1^1^1^1]}*/p%(0)
            v127 l16[8 [6 f+]a+8[2 f+f+a+r]]}
STR HH02 = {/*Sub{[2 p%.T(0,-1000,!1,-1000,1000,!1^1,1000,0,!1);r1^1^1^1]}*/
            v127 l16[7 [6 f+]a+8[2 f+f+a+r]][6 f+]a+8[8 f+]r-2 p%.T(0,-8191,!2);r2}
STR CC01 = {Sub{v127[8 `c+ v-16]}RS08}
STR SP01 = {v127 RS08 r-1 REV(8)[2 'd'8][4 'd'16]'d'16,,80'd'16[2 'd'16,,80]REV(8,127,!4);[6 'd'24 v-10]v127}
STR SP02 = {v32 RS08 r-1^1 REV(8)[2 [16 d16 v+4]]v80 MidiDelay({`c+4},4,!4);REV(127)v127 r-4}
STR DD01 = {Sub{EP.T(100,127,!4);'"cc'1^1,,127}RS08}
STR DD02 = {Sub{EP.T(64,80,!4);'"cc'1^1,,127}RS08}
STR BO00 = {p%.onNoteWave(0,-8191,!16);v1[7 [4 c v+4]]ccrr}
STR BO01 = {p%.onNoteWave(0,-8191,!16);v127[8 [4 c]]}
STR BO02 = {p%.onNoteWave(0,-8191,!16);v127[8 [4 c]]r-1^1 CHO.T(0,127,!1^1);r1^1 CHO(0)}
STR AP01 = {p%.T(-8191,0,2304,0,8191,!1^1);EP.T(16,127,3072);c%3072,,127}
STR AP02 = {p%.T(-8191,0,2304,0,8191,!1^1,8191,-8191,3072);EP.T(16,127,3072,127,0,3072);Sub{g%3072}c%6144,,127}
//==で、やっと音を並べる作業========================================================================
トラック1
RS08 RS08 RS08 RS08 RS08 RS08 PF00 PF01 PF01 PF90 PF90 PF95 PF10 PF20 PF01 PF01 PF90 PF96 PF01 PF10 PF10
//--------------------------------------------------------------------------------------------------
トラック2
RS08 RS08 RS08 RS08 RS08 RS08 PF00 PF01 PF01 PF90 PF90 PF95 PF10 PF20 PF01 PF01 PF90 PF96 PF01 PF10 PF10
//--------------------------------------------------------------------------------------------------
トラック3
RS08 RS08 RS08 RS08 RS08 RS08 PF00 PF01 PF01 PF90 PF90 PF95 PF10 PF20 PF01 PF01 PF90 PF96 PF01 PF10 PF10
//--------------------------------------------------------------------------------------------------
トラック4
RS08 RS08 RS08 RS08 BA00 BA01 BA02 BA01 BA01 BA01 BA01 BA03 RS08 BA04 BA01 BA01 BA01 BA01 BA00 RS08 RS08
//--------------------------------------------------------------------------------------------------
トラック5
RS08 RS08 RS08 RS08 BA00 BA01 BA02 BA01 BA01 BA01 BA01 BA03 RS08 BA04 BA01 BA01 BA01 BA01 BA00 RS08 RS08
//--------------------------------------------------------------------------------------------------
トラック6
SL00 SL01 SL01 SL01 SL01 SL01 SL91 SL01 SL01 SL01 SL01 SL92 SL81 SL81 SL01 SL01 SL01 SL92 SL81 SL81 SL81 SL82
//--------------------------------------------------------------------------------------------------
トラック7
SR00 SR01 SR01 SR01 SR01 SR01 SR91 SR01 SR01 SR01 SR01 SR92 SR81 SR81 SR01 SR01 SR01 SR92 SR81 SR81 SR81 SR82
//--------------------------------------------------------------------------------------------------
トラック8
RS08 RS08 SQ01 SQ01 SQ01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 SQ01 SQ01 RS08 RS08 RS08 RS08 RS08 SQ01 SQ01
//--------------------------------------------------------------------------------------------------
トラック9 r8^16
RS08 RS08 SQ01 SQ01 SQ01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 SQ01 SQ01 RS08 RS08 RS08 RS08 RS08 SQ01 SQ01
//--------------------------------------------------------------------------------------------------
Key(0);KeyFlag-();
トラック10
BD01 BD01 BD01 BD01 BD01 RS08 BD00 BD01 BD01 BD01 BD01 RS08 RS08 BD00 BD01 BD01 BD01 BD02 RS08 RS08 RS08
//--------------------------------------------------------------------------------------------------
トラック11
SD01 SD01 SD01 SD01 SD01 RS08 RS08 SD01 SD01 SD01 SD01 RS08 RS08 RS08 SD01 SD01 SD01 SD01 SD01 RS08 RS08
//--------------------------------------------------------------------------------------------------
トラック12
RS08 HH00 HH01 HH01 HH01 HH01 HH02 RS08 HH00 HH01 HH01 RS08 RS08 RS08 HH01 HH01 HH01 HH01 HH01 RS08 RS08
//--------------------------------------------------------------------------------------------------
トラック13
RS08 RS08 RS08 RS08 RS08 RS08 RS08 RS08 RS08 CC01 SP01 CC01 RS08 SP01 RS08 SP02 RS08 RS08 CC01 r-%3072 SP02
//--------------------------------------------------------------------------------------------------
トラック14
RS08 RS08 RS08 RS08 RS08 DD01 RS08 RS08 RS08 RS08 RS08 DD01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 DD02 RS08
//--------------------------------------------------------------------------------------------------
トラック15
BO01 BO01 BO01 BO01 BO01 RS08 BO00 BO01 BO01 BO01 BO01 RS08 RS08 BO00 BO01 BO01 BO01 BO02 RS08 RS08 RS08
//--------------------------------------------------------------------------------------------------
トラック16
RS08 RS08 RS08 RS08 AP01 RS08 RS08 RS08 AP01 RS08 RS08 RS08 RS08 RS08 RS08 RS08 RS08 AP02 RS08 RS08 RS08
}


//この場を借りて騎士王321さんに最高の謝意を。
//2010.11.14 闇人