SoundType=0;//---------------------------------------------------------------------------------------------------------------------- INT Type = 1;//1ならTWM2用、そのほかならSD-80用 TrackName = {"you was born ..."} Copyright = {"球場のピアニスト"} MetaText = {"知り合いが誕生日を迎えたらしいので"} /*---------------------------------------------------------------------------------------------------------------------- ----------------------------------------------------------------------------------------------------------------------*/ System.MeasureShift(1); //音源初期化用に発音を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 = 130 //テンポ Key(-4) //調の設定 # = +,♭= - IF(Type=1){ CuePoint={"TwmParam(120,120,0)"} CuePoint={"TwmChorus(1,64,60,64,64,48,1)"} }ELSE{ } Str DTime={Time(2:1:0)} //SD-80用に再生開始場所をずらす //--------------------------------------------------------------------------------------------------------------------- IF(Type=1){ TR(1) @(1,16) EP(127) v(80) V(127) REV(100) CHO(10) o7 q99 l8 }ELSE{ TR(1) @(21,80) EP(127) v(100) V(127) REV(100) CHO(70) o7 q99 l8 } //---------------------------------------------------------------------------------------------------------------------- //---------------------------------------------------------------------------------------------------------------------- /* Time */ Str S1T1={Time(68:3:0)} /* v.N */ Str S1V1={v.N(60,70,80,100)} #1A={e^^^ ^^^^ ^^^^ cde^ d^^^ ^^^^ "g^^^ ^^^^ f^^^ ^^^^ ^^^^ fed^ e^^^ ^^"g^ e^^^ ^^^^ } #1B={g^^^ ^^^^ ^^^^ gfe^ f^^^ ^^c^ f^^^ ^^^^ e^^^ ^^dc "b^^^ ^^c^ TempoChange(130,120,!1) c^^^ ^^^^ ^^^^ ^^^^} #1C={S1V1 Div{l32 q999 "gceg q99}^^^ ^^^^ v100 a^^^ e^^^ f^^^ ^^fe d^^^ ^^^^ S1V1 Div{l32 q999 "e"g"be q99}^^^ ^^^^ v100 e^d^ d^e^ "g^^^ ^^^^ "f^^^ ^^^^} #1D={S1V1 Div{l32 q999 "gceg q99}^^^ ^^^^ v100 g^f^ f^g^ `c^^^ b^^^ a^^^ b^^^ S1V1 Div{l32 q999 "g"bdg q99}^^^ ^^^^ v100 f^^^ e^^^ S1V1 Div{l32 q999 "e"gce q99}^^^ ^^^^ v100 d^^^ ^^^^} #1E={> rr"g^ Div{l32 q999 "gceg q99}^^^ ^^^^ ^^^^ gfe^ f^^^ ^^c^ f^^^ ^^^^ TempoChange(120,100,!1) e^^^ ^^dc "b^^^ ^^c^ ^^^^ ^^^^ Tempo(130) c^^^ ^^^^} #1x={#1A#1B#1C#1D S1T1 #1E } #TR1={#1x} //---------------------------------------------------------------------------------------------------------------------- IF(Type=1){ TR(2) @(1,16) EP(127) v(60) V(127) REV(100) CHO(20) o6 q101 l4 }ELSE{ TR(2) @(21,80) EP(127) v(60) V(127) REV(100) CHO(70) o6 q101 l4 } //---------------------------------------------------------------------------------------------------------------------- /* Time */ Str S2T1={Time(18:1:0)} /* EP.W */ Str S2EW1={EP.W(127,50,!1^1)} /* v.N */ Str S2V1={v.N(60,40,50,70,90,100)} #2A={S2EW1 'ec"e'^^^ "a^^^ 'c"g"c'^^^ ^^^^ 'd"a"d'^^^ ^^^^ 'c"f"c'^^^ '"g "e""g'^^^ } #2B={'ec"e'^^^ "g^^^ 'fd"f'^^^ ^^^^ 'e"b"e'^^^ ^^^^ 'd"a"d'^^^ << TempoChange(120,130,!1) S2V1 "g6"c6"e6"g6c6d6 v100 e6f6g6 a6b6`c6 } #2C={> 'ec"e'^^^ 'e"b"e'^^^ 'd"a"d'^^^ 'd"b"d'^^^ 'c"g"c'^^^ 'c"f"c'^^^ 'd"a"d'^^^ '"b"g""b'^^^ } #2D={'d"a"d '^^^ 'd"b"d'^^^ 'ec"e'^^^ 'e"b"e'^^^ 'c"a"c'^^^ 'c"g"c'^^^ '"d"g""d'^^^ '"a"d""a'^^^} #2E={o4 v110 "g6"c6"e6"g6c6d6 'e"e'6'f"f'6'g"g'6 'a"a'6'b"b'6'`cc'6 } #2F={> ['ec"e'^] ['e"b"e'^] ['f"a"f'^] ['f"b"f'^] ['gc"g'^] ['gd"g'^] ['ge"g'^] ['ae"a'^]} #2G={['gc"g'^] ['g"b"g'^] ['f"a"f'^] ['f"b"f'^] ['gc"g'^] ['g"b"g'^] ['c"g"c'^] TempoChange(130,120,!1) 'c"g"c'^^^} #2H={>> v-30 e^^^ ^^^^ f^^^ ^^^^ e^^^ "b^^^ ^^^^ v+30 o4 v110 "g6"c6"e6"g6c6d6 'e"e'6'f"f'6'g"g'6 'a"a'6'b"b'6'`cc'6 'c"c'^^^ ^^^^ } #2x={S2T1 #2A#2B q98 #2C#2D#2E #2F#2G #2H} #TR2={#2x} //---------------------------------------------------------------------------------------------------------------------- IF(Type=1){ TR(3) @(41,8) EP(127) v(110) V(127) REV(100) CHO(10) o5 q101 l4 }ELSE{ TR(3) @(3,81) EP(127) v(110) V(127) REV(100) CHO(70) o5 q101 l4 } //---------------------------------------------------------------------------------------------------------------------- /* Time */ Str S3T1={Time(35:1:0)} /* EP.W */ Str S3EW1={EP.W(100,127,!2,127,127,!2,127,100,!2)} /* EP.T */ Str S3ET1={EP.T(50,110,!1)} #3A={S3EW1 > e^^^ ^^ag e^^^ ^dcd c^^^ ^^^^ d^^^ d+^^^ e^^^ edcd g^^^ ^^c^ `c^^^ b^^^ a^^^ ^^^^ q99 `a^^^ ^^} #3B={'d"d''d+"d+'l8 'e"e'^^^ ^^^^ ^^^^ 'c"c''d"d''e"e'^ 'd"d'^^^ ^^^^ '"g""g'^^^ ^^^^ 'f"f'^^^ ^^^^ ^^^^ 'f"f''e"e''d"d'^ 'e"e'^^^ ^^'"g""g'^ 'e"e'^^^ ^^^^} #3C={'g"g'^^^ ^^^^ ^^^^ 'g"g''f"f''e"e'^ 'f"f'^^^ ^^'c"c'^ 'f"f'^^^ ^^^^ 'e"e'^^^ ^^'d"d''c"c' '"b""b'^^^ ^^'c"c'^ 'c"c'^^^ ^^^^ ^^^^ ^^^^} IF(Type=1){ #3x={S3T1 #3A @(50) #3B#3C} }ELSE{ #3x={S3T1 #3A @(13,81) #3B#3C} } #TR3={#3x} //---------------------------------------------------------------------------------------------------------------------- IF(Type=1){ TR(4) @(51,8) EP(100) v(80) REV(100) CHO(50) P(112) o6 q99 l4 TR(5) @(51,8) EP(100) v(90) REV(100) CHO(50) P(64) o6 q99 l4 TR(6) @(51,8) EP(100) v(100) REV(100) CHO(50) P(16) o5 q99 l4 }ELSE{ TR(4) @(51,99,1) EP(100) v(80) REV(100) CHO(30) P(112) o6 q99 l4 TR(5) @(51,99,1) EP(100) v(80) REV(100) CHO(30) P(64) o6 q99 l4 TR(6) @(51,99,1) EP(100) v(80) REV(100) CHO(30) P(16) o5 q99 l4 } //---------------------------------------------------------------------------------------------------------------------- /* Time */ Str AT1={Time(33:1:0)} Str AT2={Time(76:1:0)} /* EP.W */ Str AEPW1={EP.W(60,120,!1,120,120,!2,120,60,!2)} Str AEPW2={EP.W(100,120,!1,120,120,!2,120,100,!2)} /* EP.T */ Str AEPT1={EP.T(30,40,!2,40,60,!2,60,80,!2,80,120,!2)} Str AEPT2={EP.T(100,120,!1,120,120,!2,120,0,!1^1)} #4A={AEPW1 g^^^ ^^^^ f^^^ ^^^^ a^^^ ^^^^ g^^^ a^^^ g^^^ ^^^^ a^^^ g^^^ f^^^ d^^^ e^^^ ^^^^} #4B={AEPT1 v+30 a^^^ b^^^ v-20} #4C={AEPW2 e^^^ ^^^^ d^^^ ^^^^ c^^^ ^^^^ e^^^ ^^^^ f^^^ ^^^^ g^^^ ^^^^ f^^^ e^^^ d^^^ ^^^^} #4D={v+10 e^^^ v+10 'f"f'^^^ v-20} #4E={'g"g'^^^ ^^^^ 'f"f'^^^ ^^^^ 'f"f'^^^ ^^^^ 'g"g'^^^ ^^^^ 'g"g'^^^ ^^^^ 'f"f'^^^ ^^^^ 'g"g'^^^ ^^^^ AEPT2 'g"g'^^^ ^^^^ ^^^^ ^^^^} #4F={AEPW2 'g"g'^^^ 'a"a'^'b"b'^ '`cc'^^^ ^^^^} #4x={#4A AT1 < #4B#4C#4D#4E AT2 #4F} #TR4={#4x} #5A={AEPW1 c^^^ ^^^^ "a^^^ ^^^^ d^^^ ^^^^ "b^^^ d^^^ c^^^ ^^^^ "a^^^ "b^^^ "a^^^ "f^^^ "g^^^ ^^^^} #5B={AEPT1 v+30 d^^^ e^^^ v-20} #5C={AEPW2 "g^^^ ^^^^ "f^^^ ^^^^ "g^^^ ^^^^ "g^^^ "g+^^^ "a^^^ ^^^^ "g^^^ ^^^^ "a^^^ "g^^^ "f^^^ ^^^^} #5D={v+10 "g^^^ v+10 'a"a'^^^ v-20} #5E={'c"c'^^^ '"b""b'^^^ '"a""a'^^^ ^^^^ 'c"c'^^^ ^^^^ 'c"c'^^^ ^^^^ '"b""b'^^^ ^^^^ 'c"c'^^^ 'c+"c+'^^^ 'd"d'^^^ '"g""g'^^^ AEPT2 'c"c'^^^ ^^^^ ^^^^ ^^^^} #5F={AEPW2 'e"e'^^^ 'f"f'^'g"g'^ 'g"g'^^^ ^^^^ } #5x={#5A AT1 < #5B#5C#5D#5E AT2 #5F} #TR5={#5x} #6A={AEPW1 e^^^ ^^^^ f^^^ ^^^^ d^^^ ^^^^ e^^^ a^^^ g^^^ ^^^^ f^^^ e^^^ d^^^ "a^^^ c^^^ ^^^^ } #6B={AEPT1 v+30 f^^^ g^^^ v-20} #6C={AEPW2 c^^^ ^^^^ d^^^ ^^^^ c^^^ ^^^^ e^^^ ^^^^ d^^^ ^^^^ e^^^ ^^^^ f^^^ e^^^ d^^^ ^^^^} #6D={v+10 e^^^ v+10 'f"f'^^^ v-20} #6E={'e"e'^^^ ^^^^ 'd"d'^^^ ^^^^ 'f"f'^^^ ^^^^ 'g"g'^^^ ^^^^ 'e"e'^^^ ^^^^ 'f"f'^^^ ^^^^ 'e"e'^^^ ^^^^ AEPT2 'g"g'^^^ ^^^^ ^^^^ ^^^^} #6F={AEPW2 'g"g'^^^ 'a"a'^'g"g'^ 'e"e'^^^ ^^^^} #6x={#6A AT1 < #6B#6C#6D#6E AT2 #6F} #TR6={#6x} //---------------------------------------------------------------------------------------------------------------------- TR(7) @(51,99,1) EP(127) v(110) REV(60) CHO(30) o6 q99 l8 //---------------------------------------------------------------------------------------------------------------------- /* Time */ Str BT1={Time(52:1:0)} #7A={rrrr 'd"d'^'d+"d+'^ 'e"e'^^^ ^^^^ ^^^^ 'c"c''d"d''e"e'^ 'd"d'^^^ ^^^^ '"g""g'^^^ ^^^^ 'f"f'^^^ ^^^^ ^^^^ 'f"f''e"e''d"d'^ 'e"e'^^^ ^^'"g""g'^ 'e"e'^^^ ^^^^} #7B={'g"g'^^^ ^^^^ ^^^^ 'g"g''f"f''e"e'^ 'f"f'^^^ ^^'c"c'^ 'f"f'^^^ ^^^^ 'e"e'^^^ ^^'d"d''c"c' '"b""b'^^^ ^^'c"c'^ 'c"c'^^^ ^^^^ ^^^^ ^^^^} #7x={BT1 #7A#7B} #TR7={#7x} //---------------------------------------------------------------------------------------------------------------------- TR(8) @(47,96,0) EP(127) v(127) REV(60) CHO(30) o4 q149 l16 TR(9) @(47,96,0) EP(127) v(127) REV(60) CHO(30) o4 q149 l16 //---------------------------------------------------------------------------------------------------------------------- /* Time */ Str CT1={Time(51:1:0)} Str CT2={Time(76:1:0)} /* V.W */ Str CVW1={V.W(40,127,!32)} /* EP.T */ Str CEPT1={EP.T(30,127,!1^2)} /* P.T */ Str CPT1={P.T(64,127,!1^1)} Str CPT2={P.T(64,0,!1^1)} #8A={CVW1 CEPT1 [4 cdefgab > ] cdef <<<<<} #8x={CT1 CPT1 #8A CT2 CPT1 #8A } #TR8={#8x} #9x={CT1 CPT2 #8A CT2 CPT2 #8A} #TR9={#9x} //---------------------------------------------------------------------------------------------------------------------- TR(10) @(74) EP(100) v(100) REV(100) CHO(30) q99 l8 //---------------------------------------------------------------------------------------------------------------------- //---------------------------------------------------------------------------------------------------------------------- TR(1) DTime |#TR1| TR(2) DTime |#TR2| TR(3) DTime |#TR3| TR(4) DTime |#TR4| TR(5) DTime |#TR5| TR(6) DTime |#TR6| TR(7) DTime |#TR7| TR(8) DTime |#TR8| TR(9) DTime |#TR9|