//----------------------------------------------------------------------------------------------------------------------

INT Type = 1;//1ならTWM2用、そのほかならSD-80用

TrackName =  {"深海プラネット"}
Copyright =  {"球場のピアニスト"} 
MetaText  =  {"息抜き息抜き(o´ω`o)"} 


/*----------------------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------*/
System.MeasureShift(1);    //音源初期化用に発音を１小節遅らせる
IF(Type =1){ResetGS;ResetXG;ResetGM;r1;}ELSE{SysEx$=f0,41,10,00,48,12,0,0,0,0,0,0,f7;}//音源初期化
Time(1:1:0); TrackSync;    //全てのトラックを同期する(初期化後必要)
//----------------------------------------------------------------------------------------------------------------------
TimeSignature =  4,4      //4/4
Tempo = 90          //テンポ
Key(-3) 　　　 　//調の設定 # = +,♭= -

Include(delay.h)
TimeKey((43:1:0),1)
//----------------------------------------------------------------------------------------------------------------------
IF(Type==1){
TR(1) @(1) EP(110) v(120) V(110) REV(100) CHO(30) o6 q99 l16
}ELSE{
TR(1) @(20,80) EP(127) v(120) V(110) REV(100) CHO(30) o6 q99 l16
}
//----------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------------------------------------------------------------------------
/* Time */
Str AT1={Time(43:1:0)}

/* EP.T*/
Str AEPT1={EP.T(127,0,!1^1^1^1^ 1^1^1^1)}

#1A={MidiDelay({'e"g''g"b'^'`eg'},7,!8) ^^^^ ^^^^ ^^'`dd''`cd' 'bd'^'g"b''bd' ^^'`ce'^ '`df''gd'^'`df' ^'`eg''`df''`ce'
     'bd''g"b'^'bd' ^^'`ce'^ 'bd''ac''g"b''f"a' ^'g"b''f"a''e"g' 'c"e'^^'d"f' ^^'e"g'^ 'd"f'^^^ 'g"b'^^^ }
#1B={MidiDelay({'e"g''g"b'^'`eg'},7,!8) ^^^^ ^^^^ ^^'`dd''`cd' 'bd'^'g"b''bd' ^^'`ce'^ '`df''gd'^'`df' ^'`eg''`fa''`gb'
     '`a`c'^^'g"b' ^^^^ ^^^^ 'ac'^'bd'^ '`ce'^^'bd' ^^'`ce'^ 'ac'^^^ '`df'^^^}
#1x={[128 r] Tempo(95) #1A#1B v-20 q79 #1A#1B v+20 q99 #1A#1B AEPT1 #1A#1B AT1 EP(127) v-20 q79 #1A#1B }
#TR1={#1x}
//----------------------------------------------------------------------------------------------------------------------
IF(Type==1){
TR(2) @(3) EP(110) v(127) V(100) REV(127) CHO(100) o6 q99 l16
}ELSE{
TR(2) @(22,80) EP(127) v(120) V(120) REV(127) CHO(100) o6 q149 l16
}
//----------------------------------------------------------------------------------------------------------------------
#2A={MidiDelay({e^^"g},3,!4) ^^^^ ^^^^ f^^^ MidiDelay({c^^"f},3,!4) ^^^^ d^e^ d^c^ MidiDelay({"g^^"c},3,!4) ^^^^ "a^"b^ c^d^
     MidiDelay({c"^^g},3,!4) ^^^^ MidiDelay({"g^^"c},3,!4) ^^^^}
#2B={MidiDelay({e^^"g},3,!4) ^^^^ ^^^^ f^^^ MidiDelay({g^^"g},3,!4) ^^^^ a^g^ f^g^ MidiDelay({e^^"g},3,!4) ^^^^ ^^^^ ^^^^
     MidiDelay({d^^"f},3,!4) ^^^^ MidiDelay({c^^"e},3,!4) ^^^^}
#2C={MidiDelay({e^^"g},3,!4) ^^^^ ^^^^ d^e^ f^g^ f^e^ c^e^ d^"g^ MidiDelay({d^^"f},3,!4) ^^^^ ^^^^ ^^^^ MidiDelay({c^^"e},3,!4)
     MidiDelay({d^^"g},3,!4) MidiDelay({e^^"g},3,!4) ^^^^}
#2D={MidiDelay({e^^"g},3,!4) ^^^^ ^^^^ d^e^ f^g^ a^b^ `c^`d^ `c^g^ MidiDelay({a^^d},3,!4) ^^^^ a^g^ f^g^ 
     MidiDelay({`c^^g},3,!4) ^^^^ MidiDelay({`d^^g},7,!4) ^^^^ }
#2x={[256 r] #2A#2B AT1 #2C#2D}
#TR2={#2x}

//----------------------------------------------------------------------------------------------------------------------
IF(Type==1){
TR(4) @(9) EP(110) v(70) REV(100) CHO(30) o7 q99 l16
}ELSE{
TR(4) @(9,99) EP(110) v(70) REV(100) CHO(30) o7 q99 l16
}
//----------------------------------------------------------------------------------------------------------------------
/* Time */
Str DT1={Time(33:1:0)}

/* EP.T*/
Str DEPT1={EP.T(0,110,!1^1^1^1^ 1^1^1^1)}

#4A={MidiDelay({e^^`e},7,!8) ^^^^ ^^^^ ^^`d`c brgb rr`cr `dgr`d r`e`d`c bgrb ^^`c^ bagf rgfe c^^d ^^e^ d^^^ g^^^ }
#4B={MidiDelay({e^^`e},7,!8) ^^^^ ^^^^ ^^`d`c brgb rr`cr `dgr`d r`e`f`g `arrg ^^^^ ^^^^ a^b^ `c^^b ^^`c^ a^^^ `d^^^}
#4x={#4A#4B DT1 DEPT1 #4A#4B}
#TR4={#4x}

//----------------------------------------------------------------------------------------------------------------------
IF(Type=1){
TR(5) @(50) EP(100) v(100) REV(60) CHO(30) P(112) o5 q99 l4
TR(6) @(50) EP(100) v(100) REV(40) CHO(30) P(64) o5 q99 l4
TR(7) @(50) EP(100) v(100) REV(50) CHO(30) P(16) o4 q99 l4
}ELSE{
TR(5) @(50,98) EP(100) v(70) REV(60) CHO(30) P(112) o5 q99 l4
TR(6) @(50,98) EP(100) v(70) REV(40) CHO(30) P(64) o5 q99 l4
TR(7) @(50,98) EP(100) v(70) REV(50) CHO(30) P(16) o4 q99 l4
}

//----------------------------------------------------------------------------------------------------------------------
/* Time */
Str ET1={Time(41:1:0)}

/* EP.W */
Str EEPW1={EP.W(90,110,!4)}

/* EP.T */
Str EEPT1={EP.T(0,127,!1)}


#5A={EEPW1 e^^^ f^a^ g^^^ a^f^ e^^^ d^^^ g^a^ f^d^}
IF(Type=1){
#5B={EEPT1 v(127) `d^^^ v(115) }
}ELSE{
#5B={EEPT1 v(127) `d^^^ v(90) }
}
#5C={g^^^ ^^^^}
#5x={[32r] [3 #5A] ET1 #5B [4 r] [#5A] #5C}
#TR5={#5x}

#6A={EEPW1 c^"b^ c^d^ 'ec'^^^ d^^^ c^"b^ "a^^^ c^^^ "b^^^}
IF(Type=1){
#6B={EEPT1 v(127) a^^^ v(115)}
}ELSE{
#6B={EEPT1 v(127) a^^^ v(90)}
}
#6C={c^^^ ^^^^}
#6x={[32r] [3 #6A] ET1 #6B [4 r] [#6A]#6C}
#TR6={#6x}

#7A={EEPW1 g^^^ 'af'^^^ g^^^ a^b^ g^^^ f^^^ g^f^ f^^^}
IF(Type=1){
#7B={EEPT1 v(127) f^^^ v(115)}
}ELSE{
#7B={EEPT1 v(127) f^^^ v(90)}
}
#7C={e^^^ ^^^^}
#7x={[32r] [3 #7A] ET1 #7B [4 r] [#7A] #7C}
#TR7={#7x}


//----------------------------------------------------------------------------------------------------------------------
IF(Type==1){
TR(10) @(25) EP(100) v(100) REV(100) CHO(30) q99 l16
TR(20) CH(10) v(100) q99 l16
}ELSE{
TR(10) @(25,107) EP(100) v(100) REV(100) CHO(30) q99 l16
TR(20) CH(10) v(100) q99 l16
}
//----------------------------------------------------------------------------------------------------------------------

$a{n35} $b{n36}

#D1={[3 [3 a^^a b^a^ ] a^^a b^a'ab' ][3 a^^a b^a^ ] abba b^a'ab' }
#Dx={[128r] [3 #D1] AT1 [ #D1]}
#TR10={Rhythm{#Dx}}

$c{n42} $d{n44} $f{n46}

#DA1={[ [3 cd^^ c^cd c^dc ^d^c] cd^^ c^cd c^dc fcdc ]}
#DAx={[128r] [3 #DA1] AT1 [ #DA1]}
#TR20={Rhythm{#DAx}}

//----------------------------------------------------------------------------------------------------------------------
TR(1) |#TR1|

TR(2) |#TR2|

TR(4) |#TR4|

TR(5) |#TR5| TR(6) |#TR6| TR(7) |#TR7|

UseKeyShift(off)

TR(10) |#TR10| TR(20) |#TR20|