TrackName{"聖なる夜の鐘が鳴る"}
Copyright{"レイン望（ RainboWish Project ）"}
/*
どうも、PSO2をやり込みながらも日々作曲に勤しんでるレイン望でございます。
当初はクリスマス向けの楽曲を作ろうと張り切っていましたが、やはりというべきか間に合いませんでしたorz
あと、最近の曲掲示板（12月27日現在）で、自分と同じクリスマス向けの楽曲を投稿してらっしゃる方がいて、その人と微妙に曲の雰囲気が
似てしまっている事にも気づき、一時は投稿及び制作を打ち切ろうかと考えてました。
ですが、気づいた時には既に8割方出来上がっていたので、ここで打ち切るのは勿体無いと判断し、投稿にふみきりました。
（というより、これまで沢山の楽曲が投稿されてるなか、全部が全部、楽曲の雰囲気が全く似てないということは無いはず）
どれだけ間に合わなくても、楽曲がもう少しで完成しそうなら最後まで作りきる。
それがわたくし、レイン望の作曲する上でのモットーでございます。（＿ ＿）
*/
拍子 4,4
Include(chord2.h);
Include(unison.h);
//出だし
#4St={ Tempo 80 o5l8q100v100P(80)[ C(1)G(2)C(2) Am7(1) : F(2)G(2) ] Bb(4.)G(8^2)TempoChange(80,102,!1)>t.N(0,4,8)G(1)t(0)<r1 }
#7St={ o7l8 [ efg`c8^1 b4`c4 : g4.f16.e32c2r1 ] `d4.`e16.`d32`c2r1 }
#11St={ r4'cg`c'2r4 }
//前奏
#3A={ o3l8q100v127[ c,30r16.c32r"g16.c32r2 r1 <g,30r16.g32r`d16.g32r2 : f,30r16.f32rfgabg> ] b-,30r16.b-32rb-[g4]> }
#4A={ o5l8q100v100P(80)[ C(2)rC(16)r16r16C(8.)G(4.)C(8^2) Am7(2)rAm7(16)r16r16Am7(8.) : F(4.)G(8^2) ] Bb(4.)G(8^2) }
#5A={ o5l1q100v72P(48)[ C()G(4.)C(8^2)Am7() : F(4.)G(8^2) ] Bb(4.)G(8^2) }
Str Bell_A ={ r-8"g16.c32 fecd e4d4 }
#7A={ o7l8 [ efg`c8^1 b4`c4 : g4.f16.e32c2r1 ] `d4.`e16.`d32`c2r1 }
#8A={ o6l8 [ Bell_A : c1r1^1 ] }
Str Bass_A ={ cr16.c32r4[c]r }
Str Snare_A ={ f+f+,,75'f+e'[f+16.e32]f+,,80 }
Str Tamb_A ={ n54,n54,,,75 }
Str DRM1 ={ Sub{ Bass_A } Snare_A 'f+e'f+,,70 }
Str DRM1A ={ Sub{ Bass_A } Snare_A 'f+e' }
Str DRM1B ={ Sub{ Bass_A } Snare_A }
Str TandJ1 ={ [4 Tamb_A ] }
Str TandJ1A ={ [3 Tamb_A ]'n54,n83,'n54,,,75 }
#10A={ o3l8q100v100[ Sub{ `c+8,,120 r-8 [ TandJ1 TandJ1A ] } [3 DRM1 ] : DRM1A e16.e32 ] DRM1B Sub{n29,n30,}Sub{n48,16.n45,32n43,} er }
//メロ1-1
#1B={ o6l8q100v108[ rd,50dcdc16"g16^8c16.,50c32dc,50d16e,50M(20)d32&e16^2M(0)r-32 rd,50dcdc16"g16^8c16.c32dcde16g16^8ed,50e16.d32
l.onNote(!4.,!16.,!32)M(12)c,80"bcd,80cdM(0)l8 eg : ec4,50c"bc16<a16^8,30 g16.g32`cg`f`e`cg,50> r1 ] ba4,50edc r"acfec"bM(28)c8^1,75M(0) }
#2B={ o6l8q120v75[ r1^1^1^1 <l.onNote(!4.,!16.,!32)M(12)a,80gab,80abM(0)l8 `c`e : `ca> r2^1^1 ] `g``c>r2^1^1 }
//Function BS1(Str Base1,Str Base2){ r'Base1',30'Base1''Base2''Base1'2,20r2 }
Function BS2(Str Base2){ 'Base2',50r16'Base2'16r'Base2',30 }
#3B={ l8[ rc,30c"gc2,20r2c4"b4r"a,30"a"e"a2,20r2"a4"g4 < BS2(f)[g4]BS2(e)[a4] d,30r16.d32r"a : [d4] rg,30g8.g16g,30g4. > ] [g4]d8.g8.,30`c8^2 > }
#4B={ [ C(1^2)r8o6l16efedc8l8'"e"gc'4.,,80'""b"d"g'8^2^1,,72 o5l2t.N(0,2,4)F()G()Em()Am() : Dm(1)t(0)r1 ] Dm()G()Csus4(4.)C(8^2)t(0) }
#5B={ [ r1^1^1^1 l2F()G()Em()Am() : l1Dm()r ] Dm()G()Csus4(4.)C(8^2) }
#10B={[ Sub{`c+,,120} Sub{[ TandJ1 TandJ1A ]} [3 DRM1 ] DRM1A e16.e32 r-4 n84,4 : Sub{TandJ1 TandJ1A TandJ1} [DRM1] DRM1B n48,16.n45,32n43,16.n43,32
r Sub{v.onNote(16,32,64,96,112,127,127,127)[8 n83,]v100}[e,,100]r16.e32e,,80e,,100 Sub{n29,16.n29,32'n30,n84,'} n48,16.n45,32n43, ]
Sub{[TandJ1 TandJ1A]} Sub{`a} [3 DRM1 ] DRM1B Sub{n48,16.n45,32n43,16.n43,32}'en84,'4}
//メロ1-2
#1C={ r-8"g M(20)"a4M(0)reM(20)d4M(0)rc"bcdc4,50<eab `c4`cb4`cbagM(28)e8^2M(0)r8>"g "a4ed4c4"b4cdc4,50cde [gfc]ee4f16.e32M(28)d2.M(0) }
#3C={ [ f4.f,30g2e4. : e16.b32a2[f8.,30]f[g4]a2a4g4 ] ga2[a+8.,30]a+4ea+a [g8.,30]g4cdcg1 }
#4C={ r1^1 l2F()G(4)d16f16g8Am()Am(4)Gsus4(4) r1^1 q20[Bb(8.)]q100Bb(4)l8ea+aq20[G(8.)]q100G(4)cdcG(1) }
#5C={ r1^1 l2F()G()Am(2^4)Gsus4(4) r1^1 l1Bb()v72EP.T(80,80,!1,80,120,!1)G(1^1)EP(127)v52 }
#10C={ [ Sub{n55,,,112}Sub{[c2c4.c]}[4`d+4 : `d+`d+16.`d+32] Sub{n29,16.n29,32n30,}`c16.a32a16.f32 |
Sub{`c+}Sub{TandJ1 TandJ1A}DRM1 DRM1B : 'e`c'a16.'fn84,'32 ]
`c16.a32a16.f32 v.onNote(80,90,100,110,120)[5'e`f+']v100 `a,,120`c16.`c32a16.'fn84,'32 }
//サビ
#1D={ r-4"bc [ [g,50]ga16g16^8,90c"bc [g,50]ga16g16^4,90cde4`cb4gedM(28)e2,50M(0)d4c4
[a,50]ac16d16^8efa : gaedM(20)c4rM(0) "g16c16 [fec]gf32&M(28)g8^2r4M(0)r-32"bc ] geb`c4bge f4refgag16&a4r-16g4,50gfecd16c32&d16^8r-32EP.T(127,0,!8^2.^1)M(28)c8^2.^1M(0)EP(127) }
#2D={ o6[ [e,50]ef16e16^8,90"a"g"a [e,50]ef16e16^4,90"a"bc4ag4ec"bM(28)c2,50M(0)r2^1^1^1^1 ] }
Function BS3(Str Base3){ ['Base3',30]'Base3'[3r16.'Base3'32]'Base3'4,80 }
Function BS4(Str Base4){ 'Base4'8.'Base4'8.,30'Base4',30 }
#3D={ [ BS3(c)BS3(g)[e,30]e[3r16.e32][g] [a,30]a[3r16.a32][g] | BS4(f)[g4]e8.e8.,30e16.b32BS4(a) |: [d8.c8.,30]dg8^1 ] [BS4(d)]g1 }
#4D={ [ l8q70[4rC()][4rG()][rEm()][rG()][3rAm()]rGsus4() | l2q100F()G()Em(4)Em7(4)Am()l1Dm()G() ] }
#5D={ [ l1C()G()Em(2)G(2)Am(2.)Gsus4(4) l2F()G()Em(4)Em7(4)Am()l1Dm() : G() ]q20G()q100 }
#6D={ o7P(96) [ l1[g]l2egar fge4b4`cr1^1 ] }
#8D={ o5l4 r-1P(96)t.N(0,8)OctaveUnison(gfedc)t(0) }
Str Bass_B ={ crc[3r16.c32]cr }
Str Snare_B ={ [4 a+'a+e',,75 ] }
Str Tamb_B ={ n54,'n54,,,75,n83,' }
Str DRM2 ={ Sub{ Bass_B } Snare_B a+'a+e',,75 }
Str DRM2A ={ Sub{ Bass_B } [3 a+'a+e',,75 ]`c16.a32a16.f32 }
Str TandJ2A ={ Tamb_B }
#10D={ [ Sub{ [16 n80,,75n81,,90 ] }Sub{ `c+8 r-8 [15TandJ2A] }[3 Sub{ Bass_B }Snare_B ] Sub{ Bass_B }[3 a+'a+e',,75 ]`c16.a32a16.f32
Sub{ `a8 r-8 TandJ1 TandJ1A }[DRM1] : Sub{ [TandJ1 TandJ1A] }DRM1 Sub{ Bass_B } [3 a+'a+e',,75 ] Div{`c`ca`caf}4 ]
Sub{ TandJ1 }DRM1B `c16.a32a16.f32 `c+2 Div{`c`ca}8 a16.f32`c16.'an84,'32f8 }
//間奏
#10E={ `c+8,,120 r-8 [4 TandJ1 TandJ1A ] }
//メロ2-1
#3F={ [ f4.f,30g2e4. : e16.b32a2f4.f,30g4.g,30a2a4g4 ] ga2[a+8.,30]a+4ea+a [g8.,30]g4cdcg1 }
#4F={ r1^1 /*l2F()G(4)d16f16g8Am()Am(4)Gsus4(4)*/r1^1 r1^1 q20[Bb(8.)]q100Bb(4)l8ea+aq20[G(8.)]q100G(4)cdcG(1) }
#5F={ r1^1 /*l2F()G()Am(2^4)Gsus4(4)*/r1^1 r1^1 l1Bb()v72EP.T(80,80,!1,80,120,!1)G(1^1)EP(127)v52 }
#10F={ Sub{ n55,,,112 r-8 [4 c2c4.c ]}[7 `d+4`d+`d+16.`d+32 ]`d+16.`d+32[`d+]r
Sub{ n55,,,112 r-8 [ c2c4.c ]}[4 `d+4 : `d+`d+16.`d+32 ] Sub{n29,16.n29,32n30,}`c16.a32a16.f32
`c+ r-8 Sub{TandJ1 TandJ1A}DRM1 DRM1B
`c16.a32a16.f32 v.onNote(80,90,100,110,120)[5'e`f+']v100 `a,,120`c16.`c32a16.'fn84,'32 }
//サビ2
#1G={ r-4"bc [g,50]ga16g16^8,90c"bc [g,50]ga16g16^4,90cde4`cb4gedM(28)e2,50M(0)d4c4
[a,50]ac16d16^8efa gaedM(20)c4rM(0) "g16c16 [fec]gf32&M(28)g8^2^2r-32M(0) TrackKey(2)g2^4,80 "bc }
#1Ga={ [g,50]ga16g16^8,90c"bc [g,50]ga16g16^4,90 cde4`cb4>c4d4edM(28)c4.,70M(0)<dc
[a,50]ac16d16^8efa geb`c4bge f4refgag16&a4r-16 b16.a32g2.r4. gfecd16c32&d16^8r-32EP.T(127,0,!8^2.^1)M(28)e8^2.^1M(0)EP(127) }
#2G={ o6[ [e,50]ef16e16^8,90"a"g"a [e,50]ef16e16^4,90"a"bc4ag4 : ec"bM(28)c2,50M(0)r2r1^1^1^1^1TrackKey(2) ]a4b4`cba4.,70 }
#3G={ /*BS3(c)BS3(g)[e,30]e[3r16.e32][g] [a,30]a[3r16.a32][g]*/r1^1^1^1 | BS4(f)[g4]e8.e8.,30e16.b32BS4(a) [d8.c8.,30]dg8^1a1 }
#3Ga={ TrackKey(2) BS3(c)BS3(g)[e,30]e[3r16.e32][g] [a,30]a[3r16.a32][g] | BS4(f)[g4]e8.e8.,30e16.b32BS4(a) [BS4(d)]g1r1 }
#4G={ l1C()G()l2Em()G()Am()r4Gsus4(4) | l2q100F()G()l4Em()Em7()l2Am()l1Dm()G() TrackKey(2)G() }
#4Ga={ l8q70q100[4rC()][4rG()][rEm()][rG()][3rAm()]rGsus4() | l2q100F()G()Em(4)Em7(4)Am()l1Dm()G() t.N(0,8,16)G(1)t(0) }
#5G={ [ l1C()G()Em(2)G(2)Am(2.)Gsus4(4) l2F()G()Em(4)Em7(4)Am()l1Dm() : G()TrackKey(2)G() ]G() }
//#5Ga={ [ l1C()G()Em(2)G(2)Am(2.)Gsus4(4) l2F()G()Em(4)Em7(4)Am()l1Dm() : G()TrackKey(2)G() ]G() }
#6G={ o7P(96) l1[g]l2egar fge4b4`cr1^1r1 }
#6Ga={ TrackKey(2)o7P(96) l1[g]l2egar fge4b4`cr1^1 }
#8G={ o5l4 r-1P(96)TrackKey(2)t.N(0,8)OctaveUnison(gfedc)t(0) }
#10G={ Sub{ [16 n80,,75n81,,90 ] }Sub{ `c+8 r-8 [15TandJ2A] }[3 Sub{ Bass_B }Snare_B ] Sub{ Bass_B }[3 a+'a+e',,75 ]`c16.a32a16.f32
Sub{ `a8 r-8 TandJ1 TandJ1A }[DRM1] Sub{ TandJ1 }DRM1B `c16.a32a16.f32 `c+2 Div{`c`ca}8 a16.f32`c16.'an84,'32f8 `c+1 }
#11H={ r-2 'cg`c'2 }
//終わり
#3H={ o3l8q100v127[ c,30r16.c32r"g16.c32r2 r1 <g,30r16.g32r`d16.g32r2 : f,30r16.f32rfgabg> ] b-,30r16.b-32rb-8^2g1>c1^1 }
#4H={ o5l8q100v100P(80)[ C(2)rC(16)r16r16C(8.)G(4.)C(8^2) Am7(2)rAm7(16)r16r16Am7(8.) : F(4.)G(8^2) ] Bb(1)G(1) C(1^1) }
#5H={ o5l1q100v72P(48)[ C()G(4.)C(8^2)Am7() : F(4.)G(8^2) ] Bb(1)G(1) C(1^1) }
#7H={ TrackKey(2)o7l8 [ efg`c8^1 b4`c4 : g4.f16.e32c2r1 ] `d4.`e16.`d32`c2r1 }
#8H={ o6l8 Bell_A c1r1^1 r-8"g16.c32 TempoChange(60,!1+1) fecd8^2 "acd"g"acdf e1^1r1^1 }
#9H={ o5v80EP.T(127,20,!1)P.T(127,0,!1)`c1-64&&c64r4P(127)EP(127) }
#10H={ o3l8q100v100[ Sub{ `c+8,,120 r-8 [ TandJ1 TandJ1A ] } [3 DRM1 ] : DRM1A e16.e32 ]
Sub{ TandJ1A TandJ1A } DRM1 DRM1B Sub{n48,16.n45,32n45,16.n43,32} er `c+1 }
//音色定義
TR 1 @66 REV(20)CHO(10) //アルトサックス
TR 2 @53 REV(12)CHO(5) //卑猥ア
TR 3 @34 REV(10)CHO(0) //フンガーベース
TR 4 @5,8 REV(20)CHO(10) //エレP
TR 5 @51 REV(40)CHO(20) //伴奏２
TR 6 @89 REV(60)CHO(10) //新時代パッド
TR 7 @99 REV(80)CHO(10) //滝川クリスタル
TR 8 @15 REV(20)CHO(0) //宙ぶらりんベル
TR 9 @125,5REV(20)CHO(10) //ウィンドチャイム（擬似キラキラ）
TR 10 @1 //ドラム
TR 11 @120 REV(20)CHO(0) //リバシン
//演奏タイミング
Int Start =1
Int Intr =1 +10
Int Mel1 =9 +10
Int Sab1 =34 +10
Int Kan =50 +10
Int Mel2 =58 +10
Int Sab2 =67 +10
Int ENd =85 +10
// TR 1 TR 2 TR 3 TR 4 TR 5 TR 6 TR 7 TR 8 TR 9 TR 10 TR 11
Time(Start :1:0)PLAY( , , , ,#4St , , ,#7St , , , , )
Time(Start+9:1:0)PLAY( , , , , , , , , , , ,#11St)
Time(Intr :1:0)PLAY( , , ,#3A ,#4A ,#5A , ,#7A , , ,#10A , )
Time(Intr+3 :1:0)PLAY( , , , , , , , ,#8A , , , )
Time(Mel1 :1:0)PLAY( ,#1B ,#2B ,#3B ,#4B ,#5B , , , , ,#10B ,#11H )
Time(Mel1+16:1:0)PLAY( ,#1C , ,#3C ,#4C ,#5C , , , , ,#10C , )
Time(Sab1 :1:0)PLAY( ,#1D ,#2D ,#3D ,#4D ,#5D ,#6D , ,#8D , ,#10D , )
Time(Kan :1:0)PLAY( , , ,#3A ,#4A ,#5A , ,#7A , , ,#10E , )
Time(Kan+3 :1:0)PLAY( , , , , , , , ,#8A , , , )
Time(Mel2 :1:0)PLAY( ,#1C , ,#3F ,#4F ,#5F , , , , ,#10F ,#11H )
Time(Sab2 :1:0)PLAY( ,#1G ,#2G ,#3G ,#4G ,#5G ,#6G , ,#8D , , , )
Time(Sab2+8 :1:0)PLAY( , , , , , , , , ,#9H , , )
Time(Sab2+9 :1:0)PLAY( ,#1Ga , ,#3Ga ,#4Ga , ,#6Ga , ,#8G , ,#10G ,#11H )
Time(ENd :1:0)PLAY( , , ,#3H ,#4H ,#5H , ,#7H , , ,#10H ,#11H )
Time(ENd+3 :1:0)PLAY( , , , , , , , ,#8H , , , )
Time(ENd+9 :1:0)PLAY( , , , , , , , , ,#9H , , )