//------------------------------------------------------------------------------
Include(gs.h);Include(4neria.h);Include(SC-8850.h);Include(voice-gs-sc88pro.h);
//------------------------------------------------------------------------------
 TrackName={"宙の果て"};             //タイトル
 Copyright={"ケース"};             //著作権表示
 TimeSignature=4,4;           //拍子記号の設定
 Tempo(144);                  //テンポの設定
 System.MeasureShift = 1;     //(弄らないこと)
 ResetGM; r2 ResetGS; r2      //音源初期化命令
 TrackSync;                   //全てのトラックを同期する
 System.Keyshift= 2 //数字をいじると調が変えられます。(基本値は0)
 //------------------------------------------------------------------------------
 
  Function TD(a,  b,  c,  d,  e,  f,  g){
  @(a); V(b); EP(c);  P(d); REV(e); CHO(f); M(g);
   }
 /*----------先行指定----------*/
 //          @  V  EP   P  REV CHO  M
 TR=1  TD( (26,32),80,100, 80, 50, 30,  0); //スティールギター
 TR=2  TD( (28,4), 45,100, 32, 30, 50,  5); //クリーンギター
 TR=3  TD(  1,80,100, 30,100, 30,  0); //ピアノ1
 TR=4  TD(  1,100,100, 64, 40,  0,  0); //エレキピアノ2
 TR=5  TD( 37, 60,127, 64, 50,  0,  0); //ベース1
 TR=6  TD( 33, 85,127, 64, 40,  0,  0); //ベース2
 TR=7  TD(  1,100,127, 64, 40,  0,  0); //ストリングス1
 TR=8  TD(  1,100,127, 64, 40,  0,  0); //ストリングス2
 TR=9  TD(  40,75,127, 64,140, 90,  0); //シンセベース
 TR=11 TD( (121,3,0),100,100, 80, 80, 30,  0); //ブラッシング1
 TR=12 TD( 28,100,100, 32, 30, 50,  0); //ブラッシング2
 TR=13 TD( 27, 80,127, 32, 40,  10,  0); //アルペジオ1
 TR=14 TD( 28, 70,127, 16,110, 40,  20); //アルペジオ2
 TR=15 TD( 73,100,127, 64, 80,  0,  0); //ボーカル1
 TR=16 TD(  5, 77,127, 64, 40,  0,  0); //ボーカル2
 
 //------------------------------------------------------------------------------
 
 /*----マクロ----*/
 /*-----ギター TR1,2-----*/
 //ダウンピッキング
 #GD1 = {t.onNote(0,3,6,9);'eg`d`f#'};
 #GD2 = {t.onNote(0,3,6,9);'db`c`f#'};
 #GD3 = {t.onNote(0,3,6,9,12);'"aeg`c`e'};
 #GD4 = {t.onNote(0,3,6,9);'db`c`g'};
 #GD5 = {t.onNote(0,2,4,6);''};
 #GD6 = {t.onNote(0,2,4,6);''};
 //アップピッキング
 #GU1 = {t.onNote(0,2,4,6);'`f#`dge'};
 #GU2 = {t.onNote(0,2,4,6);'`f#`cbd'};
 #GU3 = {t.onNote(0,2,4,6,8);'`e`cge"a'};
 #GU4 = {t.onNote(0,2,4,6);'db`c`g'};
 //ストローク
 #GS1 = {y64,127;#GD1;ry64,0;y64,127;#GD1;r y64,0;y64,127;r#GU1;y64,0;y64,127;r#GU1; ry64,0;y64,127;#GU1;y64,0;y64,127;#GD1;r y64,0;y64,127;#GD1;ry64,0;y64,127;#GD1;ry64,0;};
 #GS2 = {y64,127;#GD2;ry64,0;y64,127;#GD2;r y64,0;y64,127;r#GU2;y64,0;y64,127;r#GU2; ry64,0;y64,127;#GU2;y64,0;y64,127;#GD2;r y64,0;y64,127;#GD2;ry64,0;y64,127;#GD2;ry64,0;};
 #GS3 = {y64,127;#GD3;ry64,0;y64,127;#GD3;r y64,0;y64,127;r#GU3;y64,0;y64,127;r#GU3; ry64,0;y64,127;#GU3;y64,0;y64,127;#GD3;r y64,0;y64,127;#GD3;ry64,0;y64,127;#GD3;ry64,0;};
 #GS4 = {y64,127;#GD2;ry64,0;y64,127;#GD2;r y64,0;y64,127;r#GU2;y64,0;y64,127;r#GU4; ry64,0;y64,127;#GU4;y64,0;y64,127;r#GU2; rrrr y64,0;};
 #GS5 = {y64,127;#GD2;ry64,0;y64,127;#GD2;r y64,0;y64,127;r#GU2;y64,0;y64,127;r#GU4; ry64,0;y64,127;#GU4;y64,0;y64,127;r#GU2; r#GU2;#GD2;#GU2; y64,0;};
 
 //アルペジオ
 #GA1 = {y64,127eg`d`f# ^`dg^y64,0};
 #GA2 = {y64,127db`cd `f#`cd `cdb`c`f# ^`cb^y64,0};
 #GA3 = {y64,127aeg`c ^g^`e ^`c^g ^eg^y64,0};
 #GA4 = {y64,127db`c`f# ^`c^`g ^`g&`f#`f# ^^^^y64,0};
 
 //ブラッシング
 #GB1 = {rrrr #GD1;r#GD1;r rrrr rrrr};
 #GB2 = {rrrr #GD2;r#GD2;r rrrr rrrr};
 #GB3 = {rrrr #GD3;r#GD3;r rrrr rrrr};
 
 /*-----ピアノ TR3,4-----*/
 //コード
 #EC1 = {'eg`d`f#'};
 #EC2 = {'d`c`f#'};
 #EC3 = {'eg`c`e'};
 //M
 #PC1 = {t.N(-6,2,14)'g`d`f#'t0};
 #PC2 = {t.N(-6,2,14)'g`c`e't0};
 //mero
 #PM1 = {@1#PC1;^^^ ^^^^ ^eg`d `f#`g`f#`d `e^^`d ^^^^ b^^`d ^^^^ };
 #PM2 = {@1#PC2;^^^ ^^^^ ^g`c`e `f#`g`f#`d `e^^`d ^^^^ `g^^`f# ^^^^};
 //伴奏
 #ER1 = {@5,8#EC1;^^^ ^^^^ ^^^^ ^#EC1;^^};
 #ER2 = {@5,8#EC2;^^^ ^^^^ ^^^^ ^#EC2;^^};
 #ER3 = {@5,8#EC3;^^^ ^^^^ ^^^^ ^#EC3;^^};
 #ES1 = {@5,8#ER1; #ER2; #ER3; #ER2;};
 
 /*-----ベース-----*/ 
 //ライン
 #BL1 = {e^ge rere ^ege aege};
 #BL2 = {d^gd rdrd ^dgd adgd};
 #BL3 = {"a^g"a r"ar"a ^"ag"a a"ag"a};
 #BL4 = {d^gd rdrd ^dff f#f#gg};
 
 /*-----シンセベースTR9-----*/
 #SB1 = {EP.T(127,70,!1^1)P.onNote(32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0,32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0)[8eg`d`f#]};
 #SB2 = {EP.T(127,70,!1^1)P.onNote(32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0,32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0)[8dbc`f#]};
 #SB3 = {EP.T(127,70,!1^1)P.onNote(32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0,32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0)[8"aeg`c]};
 #SB4 = {EP.T(127,70,!1^1)P.onNote(32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0,32,0,96,127,32,96,0,127,96,32,0,96,127,32,96,0)[8`dbc`g]};
 
 
 /*-----ボーカルTR15,16-----*/
 #VT1 = {M(0) rrrf,,40& f#M(30)f#f#f# ^^d^ "b^d^ rrrM(0)f,,40& f#M(30)f#f#f# ^^g^ f#^d^};
 #VT2 = {M(0) rrrd,,40& eM(30)eee ^^d^ e^d^ M(30) e^&^M.T(0,80,!3)d  ^^^r rrrr rrrr};
 /*--------ドラム--------*/
 //単音マクロ
 $d{n35,,,110,};//バス
 $h{n42,,,100,};//クローズハイハット1
 $H{n42,,,70,};//クローズハイハット2
 $o{n46,,,60,};//オープンハイハット1
 $O{n46,,,30,};
 $c{n49,,,70,};//クラッシュ右(低い)
 $C{n57,,,90,};//クラッシュ左(高い)
 $s{n51,};//ライド
 $t{n40,,,55,};//スネア
 $T{'n40,,100,n65,,40,'};//オープンリムショット
 $S{n65,,,100};//ティンバレス
 $e{n50,};//タム1
 $f{n47,};//タム2
 $g{n45,};//タム3
 $i{n43,};//タム4
 //リズムマクロ
 #DRS1 = {Rhythm{{hHor|rOor|hHor|rOor}drrr|Trrr|drrr|Trrt}};
 #DRS2 = {Rhythm{{CHor|rOor|hHor|rOor}drrr|Trrr|drrr|Trrt}};
 #DRS3 = {Rhythm{{hHor|rOor|hHor|rOoc}drrr|Trrr|drrr|Trrt}};
 #DR1 = {Key(1)#DRS1;Key(0)};
 #DR2 = {Key(0)#DRS1;};
 #DR3 = {Key(0)#DRS2;};
 #DR4 = {Key(0)#DRS3;};
 //Fill In
 #FI1 = {Rhythm{erer ffrf grgg Tfor}};
 #FI2 = {Rhythm{odTd Trtd TdTl32ttl16TTTT}};
 #FI3 = {Rhythm{oiTg Tel24fgil16 TiTl32ttl16TTTT}};
 #FI4 = {Key(1)Rhythm{{hHor|rOor}drrr|Trrt {ohHo hHhH}drrr|rrdt}Key(0)};
 
 TR=10 CH=10 @(1,0) REV(50) EP(107)
 l16 
 PitchBend(8128)
 Key(0)
 [15rrrr rrrr rrrr rrrr]
 #FI1;
 [7#DR1;]
 #FI4;
 [7#DR1;]
 #FI3;
 #DR3;[6#DR2;]#DR4;
 #DR3;[7#DR2;]
 
 TR=100 CH=10
 V(100)
 l16
 PitchBend(8128)
 [128rrrr]
 [[7#DR1;]#FI4;]
 
 Key(2)
 
 TR=1 //ギター1
o4 l8  PitchBend(400)
[6 #GS1;
   #GS2;
   #GS3;
   #GS5;
 ]
 
 TR=2 //ギター2
 o5 l64  PitchBend(-150)
 r
 l8
[6 #GS1;
   #GS2;
   #GS3;
   #GS5;
 ]
 
 TR=11 //ブラッシング1
 o4 l8 q8
v50
[6 #GB1;
   #GB2;
   #GB3;
   #GB2;]
 TR=12 //ブラッシング2
 o5 l8 q8
v15
[6 #GB1;
   #GB2;
   #GB3;
   #GB2;]
 TR=13
 o4 l8 q8  PitchBend(100)
 EP.N(100,90,!8)
 [[#GA1;]
 #GA2;
 #GA3;
 #GA4;]
 [32rrrr]
 [[#GA1;]
 #GA2;
 #GA3;
 #GA4;]
 
 TR=14
 o5 l8 q8  PitchBend(-50)
 EP.onCycle(!8,100,127,90,110)
 [[#GA1;]
 #GA2;
 #GA3;
 #GA4;]
 [32rrrr]
 [[#GA1;]
 #GA2;
 #GA3;
 #GA4;]
 
 
 TR=3 //ピアノ1
 o4 l8
 y64,127
 [#ES1;]
 o5
 [#PM1;
 #PM2;]
 [#ES1;]
 TR=5//ベース1
 o2 l8 EP.onCycle(!8,122,127)
 [15rrrr]
 rr  b&&e
 [5#BL1;
 #BL2;
 #BL3;
 #BL4;]
 
 TR=6//ベース1
 o3 l8
 [15rrrr]
 rr b&&e 
 [5#BL1;
 #BL2;
 #BL3;
 #BL4;]
 
 TR=9//シンセベース
 o4 l16
 [128rrrr]
 [o3#SB1;
 o4
 #SB2;
 o3
 #SB3;
 #SB4;]
 
 TR=15
 o7 l8 q120
 [32rrrr]
 [#VT1;
 #VT2;]
 
 
 TR=16
 o6 l8 q120
 [32rrrr]
 [#VT1;
 #VT2;
 ]