
　Int no=1

/*★★☆　　↑　1-4　のお好みの数字を入力してください

　1　：　曲名{"あまやどり"}
　2　：　おだい
  3　：　amayadori　　　　　　　　　　　　　　　　　　　　∩＿∩　
  4   : あそび　　　　　　　　　　　　　　　☆★★　GOMA（・×・）ノ
  
*/

/*　解説

こんにちは。ダウンロードありがとうございます
すこし曲の説明します

2・・・チャットでDjhinoさんが出された"みんなでアレンジしてあそぶお題曲"の編曲。
　　　そのらさんの「木漏れ日の森」（ID　1043)と同じ原曲です。

3・・・1「あまやどり」のちがうバージョン。

4・・・Twitterの診断メーカーで出たメロディを利用して作成
//------------------------------------------------------------------------------

余談ですが、

□■　サクラチャット　→　http://irc.gimite.net/channel/sakura_mml　■□

テキスト音楽「サクラ」のトップページの左側にひっそりとリンクがありますが、ひっそりとしすぎているので
改めて広報しておきますｗ　案外知らない人も多そうなので。

サクラユーザーが夜な夜な集まってDTMのことや楽器のことや音楽のことやその他わりとどうでもいいやりとりを
ゆるい感じにしています。最近は誰がしか居ることも多いので、もし少しでも興味のある方はぜひ参加してみてくださいｗ

私もただの一参加者なので、なぜか大きな顔でこういう宣伝をしているのも気がひけるのですが、
お題曲のように企画もので遊ぶことも時々あるので、参加する方が増えると楽しそうだなあ、と思います。

//------------------------------------------------------------------------------

*/

If(no=1){
曲名{"あまやどり"}

コメント{"きばらしBGM　9.7　のんびり"}

//------------------------------------------------------------------------------

音源初期化
拍子4,4
テンポ(166)
CuePoint={"TwmChorus(  0,127, 16, 25, 32, 40, 1)"}

Str　A={
【4"a#「dfa」r「dfa」】
【4"a「ge」r「ge」】}

Str　A2={【4c「d#g」r「d#g」】【d#「ga#`d」r「ga#`d」】g#「`c`g」r「`c`g」"a#「dfa」r「df」
}

トラック１音色(PercussiveOrgan)
v.N(90,88,85)//音色(Kalimba)
音階5 音符4　q50
【A】　v95　A　A2
v.N(100,98,96)
【A】　v97【4c「d#g」r「d#g」】【d#「ga#`d」r「ga#`d」】　【g#「`c`g」r「`c`g」】

//------------------------------------------------------------------------------

TR　3　v110音色(Accordion)
【7r1】rrr
【l8
fga^^^^^l4a：gfefc^^agfef"a^^^^^^^^rrrrrr】
a#agaf^^a#agafe^^^^^^^^b`cev.T(110,127,!1)a#agav125
M(5)//
a#^^a8g8a^^aagfg^^^f`ca#agagaa#^^^^^^
r
//
o5v126【a^^g8a8a^^^a^^g8a8`c^^：^g^^f8g8g^^^def^efgaa#】
`c`da^^^^a#agav.T(125,110,!1)a#a^^^^r^//
//

TR　4音色(Atmosphere)//音色(Rain)
【12r1】v77 q25 P(80)
l8【　`c`d`e`d`e`f`g`f`g^^^：^^^^v-3】`a^^^^
TIME(15:3:0)
l8　P(90)`c`d`e`dP(110)`e`f`g`fv-2`e^^^^^^^

TIME(21:3:0)v87 P(80)【　`c`d`e`d`e`f`g`f：`g^^^^^^^v-2】`a^^^^
TIME(57:1:0)<v.T（70,45,!1+1+1+1）【A】

TR　5音色(VoiceOohs)
o5　l1　q99　v80　P(90)
【3「fd"a#」^^^「eg"a」^^^】
【「cd#g」^】v70「d#ga#`d」^「g#`c`g」r
v88
【「"ffd"a#」^^^「"eeg"a」^^^】
「cd#g」^^^「"d#"a#」^EP.T(70,127,!1+1)「"g#d#」^
TIME(1:1:0)
【4【8EP.T(60,127,!4)ッ4】】
TIME(32:1:0)
【4【8EP.T(80,127,!4)ッ4】】
TR　6音色(FingerBass)P(67)//音色(ElectricGrandPiano)音色(AcousticBass)
o3　l1　q99　v110
【【"a#^】【"a^】】
【"a#^】【"a^】「"cc」^「"cc」c["d#] 【"g#2】"a#
【【"a#^】【"a^】】「"cc」^「"cc」c["d#] 【"g#】

TR　7音色(FretlessBass)P(50)
o3　l1　q70　v70
l8[4"a#^^"a#^^"a#^]
[4"a^^"a^^"a^]
音色(Applause)l4 　q99o3
TIME(31:1:0)g^^^"g^^^
o3l8音色(SynthBass1)v80　q60音色(FretlessBass)v120P(70)
[[4"a#^^"a#^^："a#a#]^^
[4"a^^"a^^："aa]a^]
音色(Applause)l1 　q99o3方向回すv74
TIME(56:1:0)g^^rrv70EP.T（120,20,!1+1+1）"g^^rrv40EP.T（70,20,!1+1+1）"g^^

TR　8l4 　q99音色(ReverseCymbal)
TIME(32:1:0)EP.T(30,127,!2)g^^
TIME(49:1:0)EP.T(50,127,!2)g^^
TIME(59:1:0)音色(Seashore)EP.T(50,127,!1)v70「gg#」^^^^^
r1
EP.T(50,127,!1)v60「"f#gg#」^^^^^
//------------------------------------------------------------------------------

//_リズムトラック

Str　B={
【4`araa`arrr】
【4`eree`errr】
}
TR　2
音色(SynthDrum)
l8　v50　q10　B　<　v43【B】
>v60
【4`araa`arrr】<
【4`eree`errr】
v52
【B】

トラック10;          // トラックの設定
チャンネル10;        // リズムを使うには必ずチャンネルを10番にする

~{ど}={n(Kick1),}    // 楽器の割り当て
~{た}={n(Snare1),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(OpenHiHat),}
~{ぱ}={n(ShortGuiro),}

時間(1:1:0);         // (小節:拍:ティック)でタイムポインタを移動します。
音色(StandardSet)    // 楽器設定     エディタ左側のコマンド挿入タブで一覧から選べます。
音量80           // 0~127まで
音符４               // 基本となる音長
q50REV(30)方向前【8rrrぱ】P(54)【8rrrd#】P(60)【8rrrc】【4rrr`a】v40【4`a#r】v90"a#1v100q100「`c#b」1
l8　方向前　q50
【4v.N(120,90)「ど」っつったっつっv.N(95,92,90,94,90)「ど`d#」どつっ「たd」っつっ
v.N(120,90)「ど」っつったっつっv.N(95,92,90,94,90)どどつっ「たd`d#」っつっ
】
【12ど2】"a#1r1
TIME(60:1:0)v40【4"f#2v-5】【4「d`d#」2】v42REV(80)【10`d#2v-7】

 }
If(no=2){SoundType=1;
コメント={"8/21　AM0:18-1:07 ver3"}

音源初期化
拍子4,4
テンポ(120)

トラック１
音量(120)//←ダブルクリックで変更できます
音階4 音符4　q100音色(Violin)　M(10)
g`c`d`eM(20)EP.T(119,112,!2+4)`e^^
EP　120
M(10)`f`e`d`c`dEP.T(110,98,!1)M(15)`e^^^
q98M(10)
EP　120 v114
v-5gv+3`c`d`e`e^^>fedcv-2gq89v-5e^^^v120
q98<
v-2gv+2`c`d`e`e^^`f`e`d`c`d　v115　`e^^^
q98
g`c`d`e`e^^>fedc"EP.T(120,110,!1)M(15)bc^^^
v122
e8v+2f8v+3g^^e8f8g^^e8f8v+4g^^テンポ(112)v-2g＃v-2eTempo(110)v-2dv-1e
v-5　テンポ(120)
g`c`d`e`e^^`f`e`d`c`d`c^^^
q98
テンポ(110)v120
g`c`d`e`e^^>fedv-3c"EP.T(110,100,!1)M(15)v-2bv-1q140M(30)EP.T(110,90,!1)c^^^

TR　2
TIME(9:1:0)v80　P(70) 音色(MusicBox)
g`c`d`e`e^^`f`e`d`c`d`e^^^

g`c`d`e`e^^>fedc"bc^^

TR　3
音色(SynthStrings1)<q100　v50　P(80)
[4「g`ce」^^^「fa`c」^^^「gb`d」^^^「g`c`e」^^^]
[4r1]
「g`ce」^^^「fa`c」^^^「gb`d」^^^「g`c`e」^^^
[3r1]q120EP.T(100,120,!1)「ceg`c」^^^^
TR　4
　q40　v0　REV(30)　P(95) 音色(PizzicatoStrings)l2
[
[「g`ce」][「fa`c」][「gb`d」][「g`c`e」]]
音色(Strings1)v.N(65,60) q30　<
[[「g`ce」][「fa`c」][「gb`d」][「g`c`e」]]
v75
l4 q37
[「g`ce」"c][「fa`c」"f][「gb`d」"g]v+4[「g#b`d」"e]
v.N(63,60)
[「g`ce」"c][「fa`c」"f][「gb`d」"g][「g`c`e」"c]
q99音色(Flute)v60
g`c`d`e`e^^>fedv-3c"EP.T(110,100,!1)M(15)v-2bv-1q120M(30)c^^^

TR　5
　q90　v80<音色(GrandPiano)P(55)REV(40) 
[4
[「g`ce」"c][「fa`c」"f][「gb`d」"g]「g`c`e」"c「g`c`e」「"dd」]

[「g`ce」"c][「fa`c」"f][「gb`d」"g][「g#b`d」"e]
v-8
[「g`ce」"c][「fa`c」"f][「gb`d」"g]「g`c`e」"c「g`c`e」「"dd」

 }
 
 If(no=4){//------------------------------------------------------------------------------
// テキスト音楽「サクラ」音楽データ (dSakura.dll Version.2.372)
//------------------------------------------------------------------------------

曲名{"つくってあそぼ"}

音源初期化
拍子4,4
テンポ(170)

トラック１
音量(105)EP.T(120,90,!4,80,120,!4)
音階6 音符8音色(JazzGuitar)q60
ドッミーファミミーファミーッ 方向右前ドッミーラソソーラシッッ
[ ドッミーファミミーファミーッレーファ＃ーソファ＃ファ＃ーソラッッ]

時間(12:2:0)音色(Vibraphone)

[ ドッミーファミミーファミーッ
レーファ＃ーソファ＃ファ＃ーソファ＃ッッ
ドッミーファミミーファミーッ
レーファ＃ーソファ＃ファ＃ーソラッッ
]

トラック2
音量(110)
音階7 音符8q60音色(FretNoise)P(70)
ドッミーファミミーファミーッミッソーラソソーラシッッ
[ ドッミーファミミーファミーッ
レーファ＃ーソファ＃ファ＃ーソファ＃ッッ]
時間(11:4:0)
Slur(1)音色(Recorder)
`ファ＃ー&&ーファ＃ー
時間(12:2:0)v89　q60

[ ドッミーファミミーファミーッ
レーファ＃ーソファ＃ファ＃ーソファ＃ッッ
ドッミーファミミーファミーッ
レーファ＃ーソファ＃ファ＃ーソラッッ
]時間(24:4:0)
Slur(1)音色(PanFlute)
`ファ＃ー&&ーファ＃ー

トラック3
音量(110)
音階7 音符8音色(BreathNoise)P(50)
ドッミーファミミーファミーッミッソーラソソーラシッッ


[ ドッミーファミミーファミーッ
レーファ＃ーソファ＃ファ＃ーソファ＃ーー]
時間(11:4:0)
Slur(1)↓↓
`ファ＃ー&&ーファ＃ー

トラック4時間(7:1:0)音色(SawtoothLead)EP.T(120,90,!2,80,120,!2)
l16o2　q70　
方向左前ドドラソファミレーミレミファ
方向前`レ`レ`ミー`レ`レ`ミー`レ`レ`ミー
[r1]
方向左ドドラソファミレーミレミファ

トラック5音色(TremoloStrings)v50

TR(6)時間(18:1:0)音色(ChiffLead)l8　v60 q65
[3ド"ソ"ファ"ソv-2]レッレー

TR(7)l8時間(7:1:0)
[3音色(TaikoDrum)
ドッ音色(Woodblock)ミミッッッ音色(SynthDrum)ソッ"ソ"ソッッッv-19]
時間(12:2:0)v68
`ソ`ソ`ソッv-3ソソソッ
時間(19:1:0)`ソ`ソ`ソッソソソッ
時間(23:4:0)音色(TaikoDrum)v110
ドッ音色(Woodblock)ミミッッッ音色(SynthDrum)方向右前v60ソッ"ソ"ソッッッ

TR(8)l8v20音色(HonkyTonkPiano)
時間(16:1:0)[4ドソファラv+5]ドーーー

トラック10;          // トラックの設定
チャンネル10;        // リズムを使うには必ずチャンネルを10番にする

~{ど}={n(Kick1),}    // 楽器の割り当て
~{た}={n(SquareClick),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(OpenHiHat),}
~{ぱ}={n(CrashCymbal1),}~{ぴ}={n(BellTree),}

;         // (小節:拍:ティック)でタイムポインタを移動します。
音色(StandardSet)    // 楽器設定     エディタ左側のコマンド挿入タブで一覧から選べます。
音量90           // 0~127まで
音符8   

[3レ＃ッドドッ`ファッ「`ソミ」ミッ`レ「"ラ＃ド」ッ
レ＃ッ「`レ＃ド」ドッ`ファッミ：ミッ`レ「`ファド」ッ
]
v107REV(40)CHO(80)P(68)[3ぴv+4]v80q20[4ラ＃16v+19]
時間(14:1:0)v104
[3レ＃ッドドッ`ファッ「`ソミ」ミッ`レ「"ラ＃ド」ッ
レ＃ッ「`レ＃ド」ドッ`ファッミ：ミッ`レ「`ファド」ッ
]
時間(1:1:0)REV(0)CHO(0)P(64)どったどどっ
時間(4:1:0)v90どったどどっ
時間(7:1:0)どったどどっ
時間(16:1:0)どったどどっ時間(19:1:0)どったどどっ

 }

 
If(no=3){
曲名{"てるてる坊主"}

コメント{"きばらしBGM　9.7　ノリノリに　　"}

//　なんかのっぺりしてくる----------------
Include(fadeio.h);
音源初期化
拍子4,4
テンポ(186)
//CuePoint={"TwmChorus(  0,127, 16, 25, 32, 40, 1)"}

Str　A={
【【"a#「da」8「dfa」8"a#8"a#8：「dfa」】「da」8「f"a#」8】
【4"a「ge」8「cge」8"a8"a8：「ge」】「ge」8"a8}
Str　A2={【4c「d#g」8「d#g」8c「d#g」】【d#「g`d」8「ga#`d」8d#「ga#」8d#8】
g#「`c`g」r「`c`g」"a#「dfa」r「df」
}
Str　A4={【4c「d#g」8「d#g」8c「d#g」】【d#「g`d」8「ga#`d」8d#「ga#」8d#8】
g#「`c`g」8「`c`g」8g#「`c`g」　"a#「dfa」r「df」
}
Str　A3={
【4"a#「dfa」r「dfa」】
【4"a「ge」r「ge」】}

トラック１　EP　120音色(HonkyTonkPiano)　
v85
音階5 音符4　q35o4　
A　v85　　q38o4 A o5 v82q35　 A 　v87　　A2
v60o6
【A3】　v.N(97,95,86)o5【4c「d#g」r「d#g」】【d#「ga#`d」r「ga#`d」】　v.N(100,98,96)【g#「`c`g」r「`c`g」】
v.N(85,88,87,83,83,85)o4【A】A4
v.N(99,96,95)o6
【A3】　

//------------------------------------------------------------------------------

TR　3　v100q90音色(SynthBrass1)音量曖昧さ5　音色(Hamonica)//音色(BassLead)音色(Sitar)
【7r1】rrr
【l8
v-2fgv+2a^^^^^l4a：gfv-2efv+2c^^agfefv-3EP.T(96,120,!1)"a^^^^^v+2rr^rrrrrr】
a#agaf^^a#agafv-4EP.T(90,120,!1)e^^^^^^^^v+2b`cev.T(110,120,!1)a#agav115　EP　120
//
a#^^a8g8v-3a^^v+2aagfv-2g^^^fv+1EP.T(100,120,!1+1+1)`ca#agv+1agav+2EP.T(90,120,!1+4)a#^^^^^^
r
//
音量戻すv100　q96【a^^g8a8a^^^a^^g8a8`c^^：^g^^f8g8g^^^def^EP.T(100,120,!1+4)efgaa#】
`c`dv-1a^^^^a#agav.T(125,110,!1)a#a^^^^r^

【7r1】rrr　v　85音色(Clarinet)REV(25)q92
【l8
fga^^^^^l4a：gfefc^^agfef"a^^^rr^^^rrrr】
a#agaf^^a#agafe^^^^^^^^//




TR　4音色(CalliopeLead)
【12r1】v77 q30 P(80)
l8【　`c`d`e`d`e`f`g`f`g^^^：r^^^v-3】`a^^^^
TIME(15:3:0)
l8　P(90)`c`d`e`dP(110)`e`f`g`fv-2`e^^^^^^^

TIME(21:3:0)v88 P(80)【　`c`d`e`d`e`f`g`f：`g^^^^^r^v-2】`a^^^^
//>



TR　5音色(ChurchOrgan)音色(Vibraphone)
o5　l1　q99　　P(90)v57
【3【「fd"a#」<「fd"a#」　>】v-2「eg"a」「eg"a」<「eg"a」>「eg"a」v55】
v0【「cd#g」^】v0「d#ga#`d」^「g#`c`g」r
v60　q50
【【16「f"a#」4】【16「"ae」4】】

TR　9音色(ReedOrgan)P(80)方向右前 TIME(32:4:0)v100
【a^^g8a8a^^^a^^g8a8`c^^：^g^^f8g8g^^^def^efgaa#】　
`c`da^^^^a#agav.T(125,110,!1)a#a^^^^r^
TIME(61:3:0)音色(ReedOrgan)l8　方向前　v85 q85【　`c`d`e`d`e`f`g`f：`g^^^^r^^v-5】`a^r^^^
TIME(69:3:0)l8　v93 q90　`c`d`e`d`e`f`g`f`g^^^

//
TIME(71:2:0)音色(MusicBox)q40v80l4^b`cea#aga
音色(ReedOrgan)
v100r128q90　a#^^a8g8a^^aagfg^^^f`ca#agagaa#^^^^^^

TR　6P(67)音色(FretlessBass)
o3　l1　q99
　v10
【"a#^】【"a^】
v50【【"a#^】【"a^】】

v100「c」^「c」c["d#] 【v+5"g#2】v117"a#
v90
【【「a#"a#」^】【「a"a」^】】

TR　7音色(SlapBass1)音色(SynthBass1)　//
o2　l1　q60　v70　P(57)
l8【3[4"a#^^a#^^："a#a#]"a#^
[4"a^^a^^:"a^]^^】
[4"c^^c^^"c^]
音色(Applause)l4 　q99o3
TIME(31:1:0)g^^^"g^^^
o3l8v82P(70)音色(SlapBass1)q60音色(SynthBass1)
[[4"a#^^"a#^^："a#a#]^^
[4"a^^"a^：^"aa]a#ag]
TIME(81:1:0)o2　l1　q60　v90　P(57)//v.N（70,65,65,65,68,70）音色(GrandPiano)音色(ElectricGrandPiano)
l8【[4"a#^^a#^^："a#a#]"a#^
[4"a^^a^^:"a^]^^】


TR　8l4 　q99音色(ReverseCymbal)
TIME(32:1:0)EP.T(30,127,!2)g^^
TIME(49:1:0)EP.T(50,127,!2)g^^

//------------------------------------------------------------------------------

//_リズムトラック

Str　B={
【4`araa`arrr】
【4`eree`errr】
}
TR　2
音色(SynthDrum)
l8　v45　q10　B　<　v30
【4`araa`arar】
【4`eree`erer】
v43【B】//v60
v60
【B】
トラック10;          // トラックの設定
チャンネル10;        // リズムを使うには必ずチャンネルを10番にする

~{ど}={n(Kick1),}    // 楽器の割り当て
~{た}={n(Snare1),}
~{つ}={n(ClosedHiHat),}
~{ち}={n(Castanets),}
~{ぱ}={n(ShortGuiro),}

時間(1:1:0);         // (小節:拍:ティック)でタイムポインタを移動します。
音色(StandardSet)    // 楽器設定     エディタ左側のコマンド挿入タブで一覧から選べます。
音量80           // 0~127まで
音符４               // 基本となる音長
q50REV(30)方向前【8rrrぱ】音色(AnalogSet)
【8rrrr】【8rrrc】【6rrr「c#」】v90"a#1v100q100「d`dd#」1
l8　方向前　q50音色(StandardSet) 
【4v.N(100,90)「ど`d#」っつったっつっv.N(99,95,98,90)「ど`d#」っつっ「たd」っつっ
v.N(97,90)「ど」っつったっつっv.N(95,92,90,94,90)どっつっ「たd`d#」っつっ
】
  【12ど2】"a#1r1
 
時間(1:1:0)【8l4rrrv60「a#"f#`f#`g」8「`a#」8】【3【8l4rrrv60「a#"f#」8「`a#」8】】
TIME(49:1:0)【4l4rrrv.N（70,60）`a#8`a#8】TIME(57:1:0)v.N（50,30）【【8l4rrr「aち」8`a#8】v.N（60,50）】
TIME(80:1:0)【v.N(100,90)「ど」っつったっつっv.N(99,95,98,90)「ど」っつっ「たd」っつっ
v.N(97,90)「ど」っつったっつっv.N(95,92,90,94,90)どっつっ「たd」っつっ
】
TIME(81:1:0)[28`d#2] 

TR(16)|[90 r1]r2 FadeoutAll(4)|

//------------------------------------------------------------------------------
/*
*/
 }

 