//------------------------------------------------------------------------------
曲名{"[Stardust Children] by sonny"}
作者{"sonny"}
//------------------------------------------------------------------------------
/*2012 06 win7用にバランス調整*/
音源初期化
拍子4,4
テンポ(159)//156
/*
メニューを選択できます
(1)ノーマル
(2)アコースティック
(3)ノーマルカラオケ
(4)アコースティックカラオケ  
(5)アコギレス                         */
INT MODE=(1) //←()の中の数字を変更してください

IF(MODE==2){ Mute 6,7,14,15,16,9 }
IF(MODE==3){ Mute 5,8,9 }
IF(MODE==4){ Mute 5,8,9, 6,7,14,15,16}
IF(MODE==5){ Mute 4}




Include(guitar.h);
Include(unison.h);
INT K=-1 //Key
// ********************************  ************************************************
INT O=127//　主音量
INT UH=2// バッキング音量補正用
INT YH=110//弱拍
INT KH=127//強迫
INT YW=120 //歌の弱拍
INT KOE=82// vocal tone
INT GN=31// guitar tone
TR 10 Channel 10 V(O-20) v 100 EP.onCycle(!8,YH,YH, KH,KH, YH,YH ,KH-7,KH) TrackKey(0)// キック
TR 21 Channel 10      v 100 TrackKey(0)// スネア
TR 22 Channel 10      v 100 TrackKey(0)// 金物関係

TR 1  V(O-10-UH) v 127 P 64 EP.onCycle(!8,YH,YH, KH,KH, YH,YH ,KH-7,KH) TrackKey(K)//　ベース
TR 11 V(0) v 127 TrackKey(K)//bass2
TR 12 V(0) v 127 TrackKey(K)//bass3
TR 2  V(O-0-UH) v 90 TrackKey(K)// 効果音
TR 3  V(O-0-UH) v 90 M 127 p% 1000 TrackKey(K)// 効果音　2
TR 4  V(O-35-UH) v 107 P 30 TrackKey(K)// 　アコースティックギター 
TR 5  V(O) v 76 音色(KOE) P 64 TrackKey(K) EP.onCycle(!8,YW,YW, KH,KH, YW,YW ,KH,KH)// 歌
TR 6  V(O-15-UH) v 110 P 94 EP.onCycle(!8,YH,YH, KH,KH, YH,YH ,KH-7,KH) TrackKey(K)//ディストーション・ギター 
TR 7  V(O-25-UH) v 110 P 45 FineTune(71) EP.onCycle(!8,YH,YH, KH,KH, YH,YH ,KH-7,KH) TrackKey(K)//ディストーション・ギター2
TR 8 V(O-90) v 127 音色(KOE) P 127 M 80  FineTune(71) TrackKey(K) EP.onCycle(!8,YW,YW, KH,KH, YW,YW ,KH,KH)//Mute 8,9// UTA 2
TR 9 V(O-90) v 127 音色(KOE) P 0   M 80 FineTune(57) TrackKey(K)  EP.onCycle(!8,YW,YW, KH,KH, YW,YW ,KH,KH)//UTA 3
TR 14 V(O-27-UH) 音色(GN) o5 l8 M 17 q110 Slur(0)         P 127 v 127 TrackKey(K)// lead guitar
TR 15 V(O-27-UH) 音色(GN)         o5 l8 M 87 q110  v 127 FineTune(69) r32 P 0 TrackKey(K)// lead guitar 2
TR 16 V(O-37-UH) 音色(GN) o5 l8 M 127 q110 v 127 FineTune(59) r24 P 76 TrackKey(K)// lead guitar 3
//Mute 4
// 10キック**************　　****************************************

トラック10;          // キック
チャンネル10;        
BR(2) //p%(4192)

時間(1:1:0);         // (小節:拍:ティック)でタイムポインタを移動します。
音色(StandardSet)    // 楽器設定     エディタ左側のコマンド挿入タブで一覧から選べます。         // 0~127まで
 

音符４               // 基本となる音長
$d{'n(36)n(Kick2)'}
$h{n(PedalHiHat),}
$H{n(OpenHiHat),}
$s{'n(Snare2)n(37)n(62) n(65),,,30 | n(65),,,20,24'}
$C{n(CrashCymbal1),}
$c{n(CrashCymbal2),}
$Q{n(HighTom1),}
$W{n(HighTom2),}
$E{n(MidTom1),}
$R{n(MidTom2),}
$T{n(LowTom1),}
$Y{n(LowTom2),}
$x{n(ClosedHiHat),?,1,1}
$a{n(59),?,,80}
$b{n(RideCymbal2),?,,60}
$Z{'n(LowTom1)n(Snare2)n(37)n(62)'}
$z{'n(MidTom1)n(Snare2)n(37)n(62)'}

#intro={dddd dddd dddd dddd8d8
         dddd dddd dddd dddd8d8}
#amero={dddd dddd dddd dddd8d8
         dddd dddd dddd dddd}
#bmero={dddd dddd dddd dddd
         dddd dddd dddd dddd}
#bmero2={dddd dddd dddd dddd
         dddd dddd dddd d8d8d4r4.}
	   
	   
#sabi ={dd8ddd dddd dddd dddd
         dddd dddd dddd dddd
	   dddd dddd}
#sabi2 ={dd8ddd dddd dddd dddd
         dddd dddd dddd dddd
	   dddd dddd}
#cmero={dddd dddd dddd dddd
        dddd dddd dddd dddd dddd d8d8d4r4.}
#dmero={dddd dddd dddd dddd dddd dddd dddd dddd
        dddd dddd dddd dddd 
	  l8drddrdd^^ drdrdrd
	    drddrdd^^ rdrdrdr
	    drddrdd^^ ddrdddr 
	    drddrdd^^ rdrdrdr
	  l4dddd dddd dddd dddd dddd dddd dddd8 d}
	  
	    
	     	    

Rhythm{
r1r1
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero;#bmero2;#sabi;#cmero;#sabi2;#dmero;


} 
//11スネア*******************************************************************************************************************
トラック21
チャンネル10

l4 INT H=110 INT H2=100 INT H3=H+7//スネア補強を外し、(v.N(H,H2))を(v.onNote(00,H,00,(H2)))にするのもあり
#intro={rrrr8s8 rrrr8s8 rrrr8s8 rrrr8s8
         rrrr8s8 rrrr8s8 rrrr8s8 rrrr8s8}
#amero={(v(H))rsrs rsrs rsrs rsrs
         rsrs rsrs rsrs rsr8 (v(H3)) s8r8s8}
#bmero={(v(H))rsrs rsrs rsrs rs(v(H3))r8s8r8s8
         (v(H))rsrs rsrs rsrs rs(v(H3))r8s8s8r8}
#bmero2={(v(H))rsrs rsrs rsrs rs(v(H3))r8s8r8s8
         (v(H))rsrs rsrs rsrs (v(H3))Z8Z8Z4r4.}
	   
#sabi= {s8(v(H))rsrs rsrs rsrs rsrs
         rsrs rsrs rsrs rs(v(H3))r8s8E8T8
	   (v(H))rsrs rs(v(H3)) Z4Z4}
#sabi2= {s8(v(H))rsrs rsrs rsrs rsrs
         rsrs rsrs rsrs rs(v(H3))r8s8E8T8
	   (v(H))rsrs (v(H3))l8sssszzzzl4}
#cmero={rrrr rrrr rrrr rrrr 
        rrrr rrrr rrrr rrrr (v(H3)) rsrs s8s8s4r4.}
#dmero={(v(H))rsrs rsrs rsrs rsrs rsrs rsrs rsrs rsrs
        rsrs rsrs rsrs rsrs(v(H3)) 
	  s4.s4.s4.l8rsrsrsr   
	  s4.s4.s4.  QWERTTY 
	  s4.s4.s4.  rsrrRTT 
	  s4.s4.s4.  rsrsrss
	  l4(v(H))rsrs rsrs rsrs rsrs rsrs rsrs (v(H3))rsr8s8s8 s}
	  
	   
Rhythm{
r1r1
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero;#bmero2;#sabi;#cmero;#sabi2;#dmero;
}
//12金物*******************************************************************************************************************
トラック22
チャンネル10
l4 
#intro={hhhh8c4. hhh hhhh8C4.hhh8H8
         hhhh8c4. hhh hhhh8C4.hhh8H8}
#amero={hhhh hhhh hhhh hhhh8H8
         hhhh hhhh hhhh hhh8H8h8c8}
#bmero={hhhh hhhh hhhh hhH8h8h8C8
         hhhh hhhh hhhh hhh8H8h8c8}
#bmero2={hhhh hhhh hhhh hhH8h8h8C8
         hhhh hhhh hhhh h8h8h4r4.}
#sabi= {c4.hhh8 H8hhhh8 H8hhhh8 H8hhhh8
         c4.hhh8 H8hhhh chhh8 c4.hhh
	   Chhh hhc4C4}
#sabi2= {c4.hhh8 H8hhhh8 H8hhhh8 H8hhhh8
         c4.hhh8 H8hhhh chhh8 c4.hhh
	   Chhh chCh}
#cmero={hhhh hhhh hhhh hhhh 
        Chhh hhhh hhhh hhhh hhhh c8C8c4r4.}
#dmero={caba baba baba bab8b8a Caba baba baba baba8b16b16
        caba baba baba bab H8h8 
	  C4.c4.C4.l8rhrhrhr 
	  C4.c4.C4.  rrrrrrr 
	  C4.c4.C4.  rHxhrhr 
	  C4.c4.C4.  rcrCrcr
	  l4Caba baba baba bab8a24b24b24a8a8 Caba baba bax8H8x8 'C'}

	   
	   	   
Rhythm{
hhhh hhrr
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero;#bmero2;#sabi;#cmero;#sabi2;#dmero;

}
//1ベース*******************************************************************************************************************
トラック1
音色(FingerBass)
o2
l8
q99

#intro={e2.f#g&g1a2.b>c&c2c<bag
        e2.f#g&g1a2.b>c&c2c<bag}
#amero={eeeeeeee eeeeeeee >cccccccc ccccc<bag
         eeeeeeee eeeeeeee >cccccccc ccccccc#d^}
#bmero={ddddcc#d^ ddddddc^c cccccc^c ccccc#d
         ^ddddcc#d^ ddddddc^c cccccc^c cccccc<}
#bmero2={ddddcc#d^ ddddddc^c cccccc^c ccccc#d
         ^ddddcc#d^ ddddddc^c cccccc^c crrrr<}
#sabi={e4eeeeeeg^gggggg>d^dddddd<a^aaaaaae4
        eeeeeeg^ggggggg>d^ddddd<a^aaaaaaa
	  >c^^^^^^^ ^^^^<brb^}
#sabi2={e4 eeeeeeg^gggggg>d^dddddd<a^aaaaaae4
        eeeeeeg^ggggggg>d^ddddd<a^aaaaaaa
	  >c^^^^^^^ cccc>cccc<<}		   
#cmero={eeeeeeee eeeeeeee eeeeeeee eeeeeeee
	  eeeeeeee eeeeeeee eeeeeeee eeeeeeee eeeeeeee e8e8e4.r4 }
#dmero={l8g4gg4ggg >d4dd4ddd<e4ee4eee e4ee4eee
        >c4cc4ccc<g4gg4ggg>d4dd4ddd d4dd4ddd
	  <e4ee4eee>c4cc4ccc<g4gg4ggg>d4dd4ddd
	  c4.c4.c4.ccccccc<a4.a4.a4.aaaaaaa>c4.c4.c4.ccccccc d4.d4.d4.ddddddd
	  <gggggggg gggggggg>  cccccccc cccccccc <
	  gggggggg gggggggg> ccccccc c1} 

r1r1
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero;#bmero2;#sabi;#cmero;#sabi2;#dmero;
//11bass 2*********************************************************************************
TR 11 o2 l8 q99 音色(35) P 127 
r1r1
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero;#bmero2;#sabi;#cmero;#sabi2;#dmero;
//11bass 2*********************************************************************************
TR 12 o2 l8 q99 音色(35) P 0 
r1r1
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero;#bmero2;#sabi;#cmero;#sabi2;#dmero;



//6ディストーション・ギター****************************************************************************
TR 6
音色(DistortionGuitar)

o3
l8
q97

r1r1
#DI={Unison5th(
e2.f#g&g1a2.b>c&c2c<)b-16&b16ag
Unison5th(
e2.f#g&g1a2.b>c&c2c<)b-16&b16ag}

#DA={Unison5th(
q25  [16e][12`c])`cbagUnison5th([16e][13`c])`c`c#}

#DB={>[Unison5th(q50d4q25 dddd):cc#]dr
 [Unison5th(q50c4q25 cccc):cc]cc#
[Unison5th(q50d4q25 dddd):cc#]dr
[Unison5th(q50c4q25 cccc)cr]c<}
#DB2={>[Unison5th(q50d4q25 dddd):cc#]dr
 [Unison5th(q50c4q25cccc):cr]cc#
[Unison5th(q50d4q25 dddd):cc#]dr
[12'cg']rrrr}
#DC={<Unison5th(q50e4q25eeeeeeq50g4q25gggggg>q50d4q25dddddd<q50a4q25aaaaaa
      q50e4q25eeeeeeq50g4q25ggggggg>q50d4q25ddddd<q50a4q25aaaaaaa
	q70`c1&`c2q50b4b4)}
#DD={r1r1r1r1 r1r1r1r1 EP(110)Unison5th(eeeeeeee eee)rrrrq25>EP(127)}
#DE={<Unison5th(q50e4q25eeeeeeq50g4q25gggggg>q50d4q25dddddd<q50a4q25aaaaaa
      q50e4q25eeeeeeq50g4q25ggggggg>q50d4q25ddddd<q50a4q25aaaaaaa
	q99`c1&`c1)}
#DF={Unison5th(q70gq25ggggggg >q70dq25ddddddd <q70eq25eeeeeee q70eq25eeq70eq25eeq70eq25e
               >q70cq25ccccccc <q70gq25ggggggg > q70dq25ddddddd q70dq25ddddddd<
		   q70eq25eeeeeee>q70cq25ccccccc<q70gq25ggggggg>q70dq25ddddddd
		    q80c4q25cq80c4q25cq80q99c2q25cccccc
		   <q80a4q25aq80a4q25aq80q99a2q25aaaaaa>
		    q80c4q25cq80c4q25cq80q99c2q25cccccc
                q80d4q25dq80d4q25dq80q99d2q25dddddd
//***** coda
<
q50gq25gggggg q50gq25ggggggq40gq25g >q50cq25cccccc q50cq25cccccccc<
q50gq25gggggg q50gq25ggggggq40gq25g >q50cq25ccccq40cq25c  q99c1 

)}

#DI;#DA;#DB;#DA;#DB2;#DC;#DA;#DB2;#DC;#DD;#DE;#DF;
//7ディストーション2****************************************************************
TR 7 
音色(DistortionGuitar)
o3
l8
q97
　   r40

r1r1
#DI;#DA;#DB;#DA;#DB2;#DC;#DA;#DB2;#DC;#DD;#DE;#DF;

//2ピコピコピ******************************************************************************************
トラック2
音色(SynthBass1)
o6 l4  q100 M 100 

Include(unison.h);
#intro={r1r1r1r1 r1r1r1r1}
#amero={r1r1r1r1 r1r1r1r1}
#bmero={r1r1r1r1 r1r1r1r4r4l16 P.onNote(0,127,0,127,0);Sub{e>e<e>e<e}r64e>e<e>e<e32. P(0)rrrl4}
#sabi={r1r1r1r1 r1r1r1r1 r1r1}
#amero2={r1r1r1 r4g#8e4.r4 r1r1r1r1}
#bmero2={r1r1r1r1 r1r1r1r1}
#bmero3={r1r1r1r1 r1r1r4q140o6@81 M 127  /*e8.e16d8<b8a8q99g2*/}


r1r1
//OctaveUnison(
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero2;#bmero3;//#sabi;//#cmero;#sabi2;#dmero;)
//3ピコピコピ2******************************************************************************************
トラック3
音色(BassLead)
o6l4  q60  

Include(unison.h);
#intro={r1r1r1r1 r1r1r1r1}
#amero={r1r1r1r1 r1r1r1r1}
#bmero={r1r1r1r1 r1r1r1r4r4l16 P.onNote(20,107,20,107,20);Sub{e>e<e>e<e}r64e>e<e>e<e32. P(127)rrrl4}
#sabi={r1r1r1r1 r1r1r1r1 r1r1}
#amero2={r1r1r1 r4g#8e4.r4 r1r1r1r1}
#bmero2={r1r1r1r1 r1r1r1r1}
#bmero3={r1r1r1r1 r1r1r4 r24 p%0 q140o6@81 M 60  /*e8.e16d8<b8a8q99g2*/}



r1r1
//OctaveUnison(
#intro;#amero;#bmero;#amero;#bmero2;#sabi;#amero2;#bmero3;//#sabi;//#cmero;#sabi2;#dmero;)
//** guitar ************************************************
TR 4
音色(SteelcGuitar)
o4 l8  q99 
INT Q=100 //強い
INT J=Q-10 // 弱い
INT X=Q //Dメロ用
INT L=Q-10 //Dメロ用
#DD={o4'dg`d' 'dg+`d'}
Function Emb6(Int ST,Str LEN){Str _CHORD={t.N(-2*ST,-1*ST,0*ST,1*ST,2*ST,3*ST)'o3e*b*>e*g*>c*e*'};_CHORD = _CHORD + LEN ; _CHORD;}
Function Em6(Int ST,Str LEN){Str _CHORD={t.N(-2*ST,-1*ST,0*ST,1*ST,2*ST,3*ST)'o3e*b*>e*g*>c#*e*'};_CHORD = _CHORD + LEN ; _CHORD;}
Function Ems(Int ST,Str LEN){Str _CHORD={t.N(-2*ST,-1*ST,0*ST,1*ST,2*ST,3*ST)'o3e*b*>e*g*>d*e*'};_CHORD = _CHORD + LEN ; _CHORD;}
Function Em9(Int ST,Str LEN){Str _CHORD={t.N(-2*ST,-1*ST,0*ST,1*ST,2*ST,3*ST)'o3e*b*>e*g*>d*f#*'};_CHORD = _CHORD + LEN ; _CHORD;}
Function B9(Int ST,Str LEN){Str _CHORD={t.N(-1*ST,0*ST,1*ST,2*ST)'o3b*>e-*a*>d*'};_CHORD = _CHORD + LEN ; _CHORD;}


r1r1
// イントロ
EP(Q)
[2l2.Em(8,)r8G(-8,1)r8A(9,)r8C(-8,1)r8]
// Aメロ
#AM={q145
EP(Q) Em(2,4) EP(J) Em(1,8) EP(Q) Em(-2,4) EP(J) Em(-1,8) EP(Q) Em(1,8) EP(Q) Em(-1,4)
EP(J) Em(-1,8)  Em(1,8) EP(Q) Em(-2,4) EP(J) Em(-1,8) EP(Q) Em(1,8) EP(Q) Em(-1,8)
EP(Q) CM7(2,4) EP(J) CM7(1,8) EP(Q) CM7(-2,4) EP(J) CM7(-1,8) EP(Q) CM7(1,8) EP(J) CM7(-1,4)
EP(J) CM7(-1,8) CM7(1,8) EP(Q) CM7(-2,4) EP(J) CM7(-1,8) EP(Q) CM7(1,8) EP(J) CM7(-1,8)

EP(Q) Em(2,4) EP(J) Em(1,8) EP(Q) Em(-2,4) EP(J) Em(-1,8) EP(Q) Em(1,8) EP(Q) Em(-1,4)
EP(J) Em(-1,8)  Em(1,8) EP(Q) Em(-2,4) EP(J) Em(-1,8) EP(Q) Em(1,8) EP(Q) Em(-1,8)

EP(Q) CM7(2,4) EP(J) CM7(1,8) EP(Q) CM7(-2,4) EP(J) CM7(-1,8) EP(Q) CM7(1,8) EP(Q) CM7(-1,4)
EP(J) CM7(-1,8) EP(J) CM7(1,8) EP(Q) CM7(-2,4) }
// Bメロ
#BM={
EP(J) G6(-1,8) q10 EP(J) G6(1,8) q145
EP(Q) D(-1,4) EP(J)D(-1,8) D(1,8) D(-1,8)  D(1,8) 
EP(J) D(-1,8) q10 D(1,8) q145
EP(Q) D(-1,4) EP(J)D(-1,8) D(1,8) D(-1,8) D(1,8)

D(-1,8) q10 D(1,8) q145
EP(Q) CM7(-1,4) EP(J) CM7(-1,8) CM7(1,8) CM7(-1,8)  CM7(1,8) 
CM7(-1,8) q10 CM7(1,8) q145
EP(Q) CM7(-1,4) EP(J) CM7(-1,8) CM7(1,8) CM7(-1,8) CM7(1,8)

EP(J) G6(-1,8) q10 EP(J) G6(1,8) q145 
EP(Q) D(-1,4) EP(J)D(-1,8) D(1,8) D(-1,8) D(1,8)
EP(J) D(-1,8) q10 EP(J) D(1,8) q145
EP(Q) D(-1,4) EP(J)D(-1,8) D(1,8) D(-1,8) D(1,8)
D(-1,8) q10 D(1,8) q145}

#B1={EP(Q) CM7(-1,4) EP(J) CM7(-1,8) CM7(1,8) CM7(-1,8) CM7(1,8)
CM7(-1,8) q10 CM7(1,8) q145
EP(Q) CM7(-1,4) EP(J) CM7(-1,8) CM7(1,8) CM7(-1,8) CM7(1,8)
CM7(-1,8) q10 CM7(1,8) q145
CM7(-1,8)}
#B2={EP(Q) CM7(-1,4) EP(J) CM7(-1,8) CM7(1,8) CM7(-1,8) CM7(1,8)
CM7(-1,8) CM7(1,8) CM7(-1,8)
EP(Q) q 99 [3CM7(1,8)]r rrrq145
}
#CM={EP(Q) Em(-3,4) EP(J) Em(-1,8) Em(1,4)  EP(Q) Em(1,8) EP(J) Em(-1,8) Em(1,8)
EP(Q) G(-3,4) EP(J) G(-1) G(1,4)  EP(Q) G(1) EP(J) G(-1) G(1) 
EP(Q) D(-3,4) EP(J) D(-1) D(1,4)  EP(Q) D(1) EP(J) D(-1) D(1)
EP(Q) A(-3,4) EP(J) A(-1) A(1,4)  EP(Q) A(1) EP(J) A(-1) A(1)

EP(Q) Em(-3,4) EP(J) Em(-1,8) Em(1,4)  EP(Q) Em(1,8) EP(J) Em(-1,8) Em(1,8)
EP(Q) G(-3,4) EP(J) G(-1) G(1,8) G(-1,8)  EP(Q) G(1,8)  EP(J) G(-1)  G(1,8) G(-1,8) 
EP(Q) D(3,4) EP(J) D(1) D(-1) EP(Q) D(1,8) D(-1,8)  D(1) 
EP(Q) A(-3,4) EP(J) A(-1) A(1,8) A(-1,8)  EP(Q) A(1) EP(J) A(-1) A(1,8) A(-1,8)
EP(Q) l1.CM7 (4,)}
#C1={l8q99 B9(1)rB9(1)r q145}
#C2={l8v--20 C(1)v++10C(-1)v++5C(1)v++5C(-1)}

#DM={EP(X) Em(5,4) EP(L) Em(1)Em(-1)EP(X)Em(1)EP(L)Em(-1)Em(1)  EP(X)Emb6(-5,4) EP(L)Emb6(-1,) Emb6(1,8) EP(X) Emb6(-1,4) EP(L) Emb6(-1)Emb6(1)Emb6(-1)
    EP(X)Em6(5,4)EP(X)Em6(1)EP(L)Em6(-1)  EP(X)Em6(1)EP(L) Em6(-1)Em6(1) EP(X) Ems(-5,4) EP(L)Ems(-1)  Ems(1,8) EP(X) Ems(-1,4) EP(L)Ems(-1) Ems(1) Ems(-1)
    
    //
     EP(X) Em(5,4) EP(X)Em(1)EP(L)Em(-1)EP(X)Em(1)Em(-1)Em(1)  EP(X)Emb6(-5,4) EP(L)Emb6(-1,8) Emb6(1,8) EP(X)Emb6(-1,4) EP(L)Emb6(-1)Emb6(1) 
     EP(X)Em6(-5,4) EP(L)Em6(-1,8) Em6(1,8)  EP(X)Em6(-1,4)EP(L) Em6(-1)EP(X)Em6(1)EP(L)Em6(-1)
    EP(X)Ems(5,4) EP(L)Ems(1,8) EP(X)Ems(-1,4)EP(L) Ems(-1)EP(X)Ems(1)EP(L) Ems(-1)
    
    EP(X)Em9(3,4) [3Em9(1)Em9(-1)]
    
    EP(Q)q99 [3Em9(1,8)]q145rrrr}
    
#EM={EP(Q) G(2,4)EP(J)G(1,8)G(-1,4)G(-1,8)EP(Q)G(1,8)EP(J)G(-1,8)
EP(Q) D(2,4)EP(J)D(1,8)D(-1,4)D(-1,8)EP(Q)D(1,8)EP(J)D(-1,8)
[2EP(Q) Em(2,4)EP(J)Em(1,8)Em(-1,4)Em(-1,8)EP(Q)Em(1,8)EP(J)Em(-1,8)]
EP(Q) C(2,4)EP(J)C(1,8)C(-1,4)C(-1,8)EP(Q)C(1,8)EP(J)C(-1,8)
EP(Q) G(2,4)EP(J)G(1,8)G(-1,4)G(-1,8)EP(Q)G(1,8)EP(J)G(-1,8)
EP(Q) D(2,4)EP(J)D(1,8)D(-1,4)D(-1,8)EP(Q)D(1,8)EP(J)  EP(Q) D(-3,4)EP(J)Dsus4(-1,8)Dsus4(1,4)D(1,4)EP(Q)D(1,8)EP(J)D(1,16)D(-1,16)
EP(Q) Em(2,4)EP(J)Em(1,8)Em(-1,4)Em(-1,8)EP(Q)Em(1,8)EP(J)Em(-1,8)    
EP(Q) C(2,4)EP(J)C(1,8)C(-1,4)C(-1,8)EP(Q)C(1,8)EP(J)C(-1,8)
EP(Q) G(2,4)EP(J)G(1,8)G(-1,4)G(-1,8)EP(Q)G(1,8)EP(J)G(-1,8)
EP(Q) D(2,4)EP(J)D(1,8)D(-1,4)D(-1,8)EP(Q)D(1,8)EP(J)D(-1,8)
EP(Q) q99 [2q99C(2,4)q5C(3)]q145C(2,1)rr
EP(Q) q99 [2q99A(2,4)q5A(3)]q145A(2,1)rr
EP(Q) q99 [2q99C(2,4)q5C(3)]q145C(2,1)rr
EP(Q) q99 [2q99D(2,4)q5D(3)]q145D(2,1)r G6(1,16)G6(-1,16)
[2EP(J) G6(2,4)EP(J)G(1,8)G6(-1,4)G6(-1,8)EP(Q)G6(1,8)EP(J)G6(-1,8)]
[2EP(J) CM7(2,4)EP(J)CM7(1,8)CM7(-1,4)CM7(-1,8)EP(Q)CM7(1,8)EP(J)CM7(-1,8)]
[2EP(J) G6(2,4)EP(J)G(1,8)G6(-1,4)G6(-1,8)EP(Q)G6(1,8)EP(J)G6(-1,8)]
EP(J) CM7(2,4)EP(J)CM7(1)CM7(-1)EP(Q)q5CM7(3)q99CM7(-1)q5CM7(3)q145 EP(Q)CM7(-1,1)
r1r1}
l8 #AM;#BM;#B1;#AM;#BM;#B2;#CM;#C1;
#AM;#BM;#B2;#CM;#C1;#DM;#CM;#C2;
#EM;


//VOCAL ********************************************************
TR 5

o6 l8  q99 
KeyFlag+(f)
#UTA={r1r1
[8r1]
// １番
<ee>ee-r<br>dr<br>c#r<a^bb>c<ba^gg^^rrrr2>
<ee>ee-r<br>dr<br>c#r<a^bb>c<ba^g^^rrrrrgg

a^^`dra&gg+a^a`d^ag^ge^^rrrrrrrrrrgg
a^^`dragra^a&ggab>d16r16e^^^^^^^^rrrrrrrr

//２番
<ee>ee-r<br>dr<br>c#r<arbb>c<ba^gg^^rrrr2>
<ee>ee-r<br>dr<br>c#r<arbb>c<ba^gg^^rrrrgg16r16

a^^`daarga^aaga^bara&g^^rrrrrrrrgg
a^^`dragg+a^aa12&g24gab>de^^^^^^^^rrrr

//サビ
v+7
ggrerdd^rdg16r16 e^dd^rgga^^aga8.r16b16r16a^gg^^rrg^gedegabrbaga^g^rr
agaaba^gg^^rrr
g^e^d^<bag^^^>rrrrv-7

//３番
<rr>e e-24&e24&e-24r<br>dr<br>c#r<arbb>c<ba^gg^^rrrr2>
<ee>ee-r<br>dr<br>c#^<a^bb>c<ba^gg^^rrrrgg

a^^`dragg+a^aaga^barag^^rrrrrrrrgg
a^^`dragg+a^aa12&g24gab>de^^^^^^^^rrrr

//サビ2
v+7
ggre^dd&d12r24rdg12r24 e.r16 ed^rgga^aag16g16a^b16r16a^gg^^rrg^gede16r16ge16r16b^b'a+a'24a12g12r24a^g^rr
agaaba^gg^rrrr
gre^d^<bag^^^brbrv-7

//中サビ
b^^^^^^a^^^^^gfe^^^^^^^^rrrrrrrr
b^^^^^a`c^^^^^^b>c#^^^^^^^^d^^^^^^^f^^^^^^^rrrr

//サビ3
v+7
ggrerdd^rdg er ed^rgga^aaga8.r16b24r12a^gg^^rrg^gedegab^baga^g^rr
aga^ba^g^^rrrr
g^e^d^<bag^^^rv-7

//大サビ
gabrrrrrbbba^a`d^ffg^rrrrrrrrrrrr>ddd^ccc^<b^a&b^rrb>cdd^<ba^rrrrrrr>dd^
fff^gf^^ggag^grgaab^`cg^gaa^^rrg^f^
a&ggg^^rrrrrrf^g^a^bb^gg^^^rrg^f^a^gg^^^^^rrr
rrrrrr rrrrrrr}
Sub{#UTA;}Sub{>#UTA;}>#UTA;
//*************************** uta 2 ******************************************
TR 8

o7 l8  q99
KeyFlag+(f)

OctaveUnison(#UTA;)
//*************************** uta 3 ******************************************
TR 9

o7 l8  q99 
KeyFlag+(f)

OctaveUnison(#UTA;)

//***************** guitar solo *****************************************************************
TR 14 
#EG={
//**** intro **************
r1r1 `d16&`e16^^^^a+24&a12ga^^&b^^^^^a`a&`g`e4`g8`a24&`a+24&`a24`g^>a16&b16`d`da16&b.`da24&a+24&a24
g^e^a^eb^`cl24b&`c&bl8gf-gbgc16&c+16eagl24f&g&fl8efgl16<b-&b>ed<b-&ag^e1&e2r2r1l8 
//**** A mero ************************ 
v-35rrrrrdeb^ae1r 
r1r1r4`c16&`d16^^bag d^dfdg&fdd^dfdg&fd c^cecf&ecc^cecf&ec&d^dfdg&fgg16&a16^agfl16f&g&f&gl8fc1r1
//**** A mero 2 **********************
r1r1r1r8ge^^^ ^^^^
r1r1r2r4
g16&a16^aaag12&a12&g12fd^dfdg&fd d^dfd16d16g&fd&
c^cecf&ec c^cecf&ec &d^dfdg&fg&a^l16a&b`c&`d&`cbl8`d`e`g`e^^g16&a16b`d`e`a&`g^^^^^
//**** sabi 1 ************************
r4
a16&b16^b`eb`fbb`gbb`ab`gb`fb^ d16,60 d16,60 l8 Sub{c#16&d16&d8d8d8d8}g-16g16g16g16 g8f8 f8,50 Sub{"a2r4r8}d16&e8.a'a`d'8['a`d'16]'a`d'8'a`c+'8 a8,50
b^b`eb`fbb`gbb`fba16&b16`db16&a16gd1e1g1`g2  Sub{`b4`b4}`a16&`b8. `a16&`b8.
r1r1r1r1
r1r1r1r2<
//**** A mero 3 **********************
f-16&f16a`d |`dr`d,30`f`d,30`g`f`d |`dr`d,30 `f[`d16,30]`g`f`d |&`cr`c,30`e`c,30`f`e`c|`cr`c,30`e[`c16,30]`f`e`c
 &`d,80r`d,30`f`d,30`g`f`d |`d,80r`d,30 `f[`d16,30]`g`f`g|`g16&`a16^`a`a16&`b16``e16&``d16l16`b`a>>df+g16&a^&g^d32&e32ga& a16&b^^^^^^
 //**** sabi 2 ***********************
r8<l8 a16&b16^b`eb`fbb`gbb`ab`gb`fb^ | l16 d-32&d32df^drg16&a16l8gf Sub{"a1}d16&e8.`dr`c+ra^
b^b`eb`fbb`gbb`fba16&b16`gb16&a16g l4a`d`e`g`f+16&`a16&`a2&`a4. `g+16&`b16&`b1&`b4. Sub{`b4`b4}`g+16&`b8. `g+16&`b8.
// ******** Dmero ******************
r1r1r1r1r1r1r1r1f1r2r4.l8
//****last sabi *********************
a16&b16^b`eb`fbb`gbb`ab`gb`fb^ 
"a16,60 "a16,60 l8 Sub{"a8r8r8 "a8r8}d8r8 d8d-8 d8,50
 Sub{"a2r4r8}d+16&e8.g8a8d+16&e16g8a8a+8
 b^b`eb`fbb`gbb`fba16&b16`gb16&a16g l4a`gl16`f&`g&`f&`g&`f&`g&`f^`f+16&`a1-16 `g+16&`b16&`b1&`b4. &`b4.r8

//**** last last last! **************
}

#EG2={l8
rrrdrrfg rrrfrrag rrrgrrfg agrgrrfg
rrrgrrfg rrrdrrag rrrfrrfg agrfrrfg
rrrerrfg rrrerrag rrrgrrfg agrv+20a-16&a16^>ed<ab-16&b16&

b1r1-8
a-16&a1-16r1
`c-16&`c1-16r1
`d-16&`d1-16r2>dc24d24c24"bc
c16&d16^^^rgfd^^^^rc"bcc^^"g^^"f"g^^^rdc24d24c24"bc
d^^^rgfg16&a16^^^^^gfga16&b16^ab16&`c16^^b`c16&`d16&`d1



}
#EG;#EG2;
TR 15 


#EG;#EG2;
TR 16 
#EG;#EG2;