Int no=1

/*
　1　　桜
　2　　エアポート

2はさみしいからつけたおまけなので、別に聞かなくてもよいです(笑
こういうのが作ってみたいなーと思って試してみました。なのでまた似たテイストでExtended.verを発表するかもしれません
1は超シンプルな短い曲なんですが、桜がきれいな時期に出しておきたかったので。
TWM2用ではあったんですが、サクラエディタでも聞けました。

2012.3　ごま製
*/



If(no=2)
{//------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)
//------------------------------------------------------------------------------
曲名{"エアポート"}
作者{""}
コメント{""}
//------------------------------------------------------------------------------
ResetGS
Include(delay.h);拍子4,4Include(unison.h);
テンポ(120)
調#()             // C
CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7;
Key(-4)
トラック１
音量(120)//←ダブルクリックで変更できます
音階3
 音符16音色(Shanai)
[r "ミr"ミr"ミr"ミ]
[r "ミr"ミr"ミr"ミ]

TR 3
l16 o3音色(SynthBass2)v127@39,1
[8"ミミッv-10ミッv+10"ミv-10ミv+10"ミ]
[8"ミミッv-10ミッv+10"ミv-10ミv+10"ミ]
[r "ミr"ミr"ミr"ミ][4"ミミッv-10ミッv+10"ミv-10ミv+10"ミ]
TR 4
l16 o3音色(SynthBass2)P(67)
[8v100"ミミッv80ミッv120"ミミv127"ミ]
[8v100"ミミッv80ミッv120"ミミv127"ミ]
[r "ミr"ミr"ミr"ミ]
r1[4v100"ミミッv80ミッv120"ミミv127"ミ]

TR　5

l12　o7　v127
[r1]//OctaveUnison(MidiDelayS(ソーファ＃ーレー"シー))r1^2

TR　6
音色(ChoirPad)P.W(44,80,!1)音色(SynthStrings1)音色(Strings1)音色(Strings2)REV(80)
[4r1]q99
EP.T(40,127,!1)「"ラド＃ミ」1
EP.T(75,127,!2)「"ラドミ」2EP.T(127,77,!2)「ファ＃レ＃"シ」2
EP.T(25,127,!1)「ミシソ＃」1「ミ"シ"ソ＃"ミ」1//「`シソ＃"ミ」1

TR　7
音色(BowedPad)v60↓
[8EP.T(45,127,!4)「ミシ」4]
[8EP.T(25,127,!4)「"ラミ」4]

Key(0)
トラック10;          // トラックの設定
チャンネル10;        // リズムを使うには必ずチャンネルを10番にする

~{ど}={n(Kick1),}    // 楽器の割り当てl16REV(60)q20CHO(80)BR　15　p　127
~{た}={n(Snare1),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(OpenHiHat),}
~{ぱ}={n(CrashCymbal1),}
~{ぷ}={n(ScratchPush),}~{ぬ}={n(MuteCuica),}
@27,90REV(30)[40ど4]

TR　11　CH(11)

~{ど}={n(Kick1),}    // 楽器の割り当て
~{た}={n(Snare1),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(OpenHiHat),}
~{ぱ}={n(CrashCymbal1),}
~{ぷ}={n(ScratchPush),}BR　20　p　20
l16　
[24どつv60ちrv120]
TIME(1:1:0)q20
~{ぬ}={n(MuteCuica),}

[3P(20)REV(40)ぬ1^1]ぬ
//ここから書きます。
 }

If(no=1)
{
　//　桜　forTWM　　//　ごま

ResetGS
Tempo=117
Include(chord.h);Include(unison.h);　　




TR　1v120　　　q70　　REV(70)　P(70)　//EP　127V　127　REV(70)v105　　音色(Recorder)　　REV(20)音色(Recorder)EP.W(70,127,!2)　EP.Frequency(!32)
l8　　↑
[3eb`d^^deb]
debdebde

v+4
[3eb`d^^deb]
　REV(90)
debdebde

v127
　[4　r1　]

TR　14l8
TIME(13:1:0)
v117o4音色(Shamisen)q80EP　127REV(50)
[3eb`d^^deb]
[3dv+2e：b]

eb`d^^deb　eb`d^^`e`d`e
[5　r1　]

v127
l8Tempo=118
[3eb`d^^deb]
[3dv+2e：b]

[3eb`d^^：deb]`e`d`e
debdebde


  
  TR　15
[8r1]
  v110音色(Koto)l8
q90
[3ba：e]
v-8g+32v+8a16^32gd[ag：d]
[3gf：c]
v-8e32v+8f16^32ec[fe：c]

[3eb`d^^deb]
[3dv+2e：b]
  eb`d^^deb　eb`d^^`e`d`e


  v124
↓
l4bab>df+ef+ga^^bbl16v.T(120,127,!2^4)"シ"ラ"シレミレミソラソラシ//l8eaga

v.T(113,127,!1)
l4　<　OctaveUnison(ド＃レミファ＃)　>

l8 

[3eb`d^^deb]

[3dv+2e：b]

[3eb`d^^：deb]`e`d`e
debdebde
　~{あ}={「ceb」}
　~{い}={「"bf#a」}~{う}={「"aeg」}
  ~{え}={「"g"bf#」}~{お}={「"g"df」}
  
TR　2
　v68@5,8 REV(62)

#PA1={l16あーrあ　rrあr　いんんい　んんいん
うんんう　んんうん　えんんえ　んんえー}

#PA2={l16あrrあ　rrあr　いんんい　んんいん
うんんう　んんうん　えんんお　んんv-3おーv+3}

#PA1　#PA2

v60　M.W(0,30,!2)　q120
あ2　v+3い2　v+4う2　v+5え2

　@5,8
[r1]l4o3q.N(95,70)v100　M　0
OctaveUnison(ファ^^ファミ^^ミレ^^レミ^^ミ)
q.N(95,90)l16v120
[crrc　rrcr　"brr"b　rr"br
"arr"a　rr"ar　"grr"g　rrgr]

crrc　rrcr　"brr"b　rr"br
"arr"a　rr"ar　"grr"g　rrgr


TR　12v84
[6r1]
v+3音色(HonkyTonkPiano)P(70)
q67
l16あrrあ　rrあr　いんんい　んんいん
うんんう　んんうん　v+5えrんv+2お　んんv+8おー

v95P(64) 
q98
l1　@1　REV(30)
#FM7
#Em7
「da`c」
「eb`d」

[#PA2]
あ2　い2　う2　え2

l1

あ
#D
「"e"bd`f+」2v-5「"eb`d`f+」2v+5
「"e"bd`f+」2v-5「"eb`d`f+」2v+5


l16うんんう　んんうん
v100
　[う8][　v+7　う8]


#PA1　#PA2

あ2　い2　う2　え2


l16あrrあ　rrあr　いんんい　んんいん
うんんう　んんうん　v+5えrんv+2お　んんv+8おー

REV(75)
↓「eb`d」2"ミ2^4ミレEP.T(120,80.!1)ミ1//v70"ミ2^4


TR　3
音色(ReverseCymbal)
[8r1]
[8r1]
[4r1][r1]
ソ1^1

TR　4　音色(ElectricGrandPiano)

[8r1]l4o3q.N(95,50)v120　M　0REV(40)
OctaveUnison(ファ^^ファミ^^ミレ^^レミ^^ミ)
q.N(95,70)
[
ド2
"シ2
"a2
"g2]
l16
crrc　rrcr　"brr"b　rr"br
"arr"a　rr"ar　"grr"g　rrgr

ド1レ1ミ1r1

TR　5音色(SynthStrings1)v0//q40

[23r1]
[3eb`d^^deb]

TR 6音色(FingerBass)o3
[23r1]
l16v115
[crrc　rrcr　"brr"b　rr"br
"arr"a　rr"ar　"grr"g　rrgr]
q99
[ド4]
["シ4]
["a4]
["g4]

ド2
v-5
"シ2
"a2
v-3
"g2
//_リズムトラックMute(10)

トラック10;          // トラックの設定
チャンネル10;        // リズムを使うには必ずチャンネルを10番にする

~{ど}={n(Kick1),}    // 楽器の割り当て
~{た}={n(Snare1),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(OpenHiHat),}
~{ぱ}={n(CrashCymbal1),}
~{ぷ}={n(ScratchPush),}

;         // (小節:拍:ティック)でタイムポインタを移動します。
音色(StandardSet)    // 楽器設定     エディタ左側のコマンド挿入タブで一覧から選べます。
          // 0~127まで
            // 基本となる音長BR　10p　127[16ど4]時間(1:1:0)音符16   v90[32rrつつ]
音符16               // 基本となる音長
音量85 
//[8r1]
P(60)
時間(1:1:000)BR　40p　127REV(70）
v+20「どつ」v-20んんんたんんv+20どv-20んんどんたんどん
どんんんv+20たv-20んんどんんどんv+20たv-20んv+20どたv-20
v+20どv-20んんんたんんv+20どv-20んんどんたんどん
どんんんv+20たv-20んんどんんどんv+20たv-20んv+20たどv-20
v+5
[8ど4]
v+20どv-20んんんたんんv+20どv-20んんどんたんどん
どんんんv+20たv-20んんどんんどんv+20たv-20んv+20たどv-20

時間(1:1:0)l16v100[32rrつつ]/*/ここに楽譜情報を書きます。**/

BR　20　p　127
P(64)
音量127　//V　127　EP　127 　REV(25)q20CHO(20)BR　20　p　87

l16REV(0)q20CHO(20)BR　20　p　117
[40ど4]BR　20　p　87[4r1][ど4v+2]v85[16ど32v+3][8ど4v+2][8ど4v+2]


時間(9:1:0)
v90[8v-8つつv-4ちv+12r]

[4[8v-8つつv-4ちv+12r][8v-8つつv-4ちv+12r]]


　 }