/*

ダウンロードありがとうございます。
Akira.Kというものです。（ハンドルを変えたいのですがタイミングがないですね。）

さて、今回は以前に投稿しました曲をパワーアップ(?)させて戻ってきました。
この曲を作り終えたのが2006年04月06日なので、もうあれから4年以上経っているということですね。
いや、なんというか時というものは残酷なもので。

今回はMMLよりもMP3がメインです。
というかMP3です。いや、MMLがどうとかそういうことじゃなくて、いやあれだよあれあの炊きたてご飯とかそういうあの焼きたてのパンみたいなそ（ｒｙ

http://soundpuzzle.net/mp3/akira/STARGAZER.mp3
ID	:	sakura
PW	:	sakura

久しぶりにユーロビート(?)を作ったからか、なにやら変な満足感でいっぱいです。
しばらく2年程スランプ続きだったので、新鮮な気持ちになりました。

メロディの音はいい音が見つからなかったので、こんなんなってますが…。
故にここの音だけはいろいろ変わるかもしれません。


-----

実を言うとさくらさんの作曲実況（http://www.nicovideo.jp/watch/sm10703769）から何かヒントを得ました。
インスピレーションを与えてくれたさくらさん、本当にありがとうございます。これからも置換頑張ってください。（ぁ

-----


これからもちょこちょこと顔を見せるつもりですので、今後ともよろしくお願いいたします。

Akira.K

*/



//ここより先は以前投稿した2006年4月当時と"ほぼ"同じソースです。TWM2にてお楽しみくださいませ。


Copyright={"Akira.K"} TrackName={"STARGAZER -スターゲイザー-"}Tempo(144)音源初期化//初期化ー！

STR w={ペダル}STR x={放す}

//Melo
TR(1)CH(1)@12Key(12)CHO(50)REV(50)v(100)P(64)q(100)l8V(110)
STR MA1={a^^a#^^`c^g^^e^eefg^g`c^^ee^ff2deffef^^deffef^^deffef^ageeff2fg}
STR MA2={a^^a#^^`c^g^^e^eefg^^`c^^g^`f^^`e^^`c^f^^d^^f^e^^c^^e^d^^c^^f^d^^d^^^^}
STR MB1={a^^f^^d^g^^e^^g^e^^c^^e^f^^^e^fga^^f^^d^g^^e^^g^e^^c^^e^d^^d^^^^}
STR MM1={agfd^fgag^^e^^c^gfec^efgfeff^ga^agfd^fgag^^`c^^e^e^^^^eded^^^^efg}
STR MM2={agfd^fgag^^e^^c^gfec^efgfeff^ga^agfd^fgag^^`c^^e^e^^^^eded1}
STR TRA1={[24r1]MA1;MA2;MB1;MM1;MM2;[8r1]MA1;MA2;MB1;MM1;MM2;[16r1]r2fdfgMB1;MM1;MM2;}TRA1;
TR(101)CH(1)@12Key(00)CHO(50)REV(50)v(100)P(64)q(100)l8TRA1;

//Hamo
TR(2)CH(2)@12Key(12)CHO(50)REV(50)v(90)P(127)q(100)l8V(110)
STR MMH={ddd"a#^"a#"a#"a#c^^c^^"g^ccc"a^"a"a"adddd^cc^ddd"a#^"a#"a#"a#e^^e^^c^c^^^^"a"a"a"a1}
STR TRA2={[48r1][2MMH;][32r1][2MMH;][25r1][2MMH;]}TRA2;
TR(3)CH(3)@12Key(00)CHO(50)REV(50)v(90)P(0)q(100)l8V(110)TRA2;

//BASS1
TR(4)CH(4)@89Key(-12)CHO(50)REV(50)v(110)P(64)q(100)l8V(90)
STR MBB={"a#a#"a#a#}STR MBC={c`cc`c}STR MBA={"aa"aa}STR MBD={d`dd`d}
STR MBP1={l8[2MBB;][2MBC;][2MBA;]MBD;MBC;}
STR MBP2={l8[2MBB;][2MBC;][2MBA;]l1d}
STR MBP3={l8[2MBB;][2MBC;][2MBD;]l1d}
STR TRA4={[16r1]MBP1;MBP2;[3MBP1;]MBP2;MBP1;MBP2;[3MBP1;]MBP2;MBP1;MBP2;[3MBP1;]MBP2;MBP1;MBP2;[3MBP1;]MBP2;MBP1;MBP2;MBP1;MBP2;[9r1][3MBP1;]MBP2;}TRA4;
Key(-8)[3MBP1;]MBP2;
TR(104)CH(4)@89Key(-24)CHO(50)REV(50)v(110)P(64)q(100)l8V(90)
TRA4;Key(-20)[3MBP1;]MBP2;

//RF
TR(5)CH(5)@89Key(+12)STR TRA5SET={CHO(50)REV(50)V(90)P(64)q(100)l8}TRA5SET;
STR RF1={v.onNote(110,65)l16`aa#`fa#`da#`aa#`fa#`da#`aa#`da#`gg`eg`cg`gg`eg`cg`gg`cg`aa`ea`ca`aa`ea`ca`aa`ca`fa`ea`da`fa`eg`dg`eg`cg}
STR RF2={v.onNote(110,65)l16`aa#`fa#`da#`aa#`fa#`da#`aa#`da#`gg`eg`cg`gg`eg`cg`gg`cg`aa`ea`ca`aa`ea`ca`aa`ca`fa`ea`da`fa`eg`dg`eg`fg}
STR RF3={v.onNote(110,65)l16`aa#`fa#`da#`aa#`fa#`da#`aa#`da#`gg`eg`cg`gg`eg`cg`gg`cg`aa`ea`ca`aa`ea`ca`aa`cav(100)`d1}
STR RFP1={RF2;RF3;}STR TRA5={[16r1]RFP1;[40r1]RFP1;[40r1]RFP1;[33r1]}TRA5;
Key(16)STR TRA6={RF2;RF2;RF2;RF3;}TRA6;
TR(105)CH(5)@89Key(+24)TRA5SET;TRA5;Key(28)TRA6;
TR(6)CH(6)@103Key(+00)TRA5SET;TRA5;Key(4)TRA6;
TR(106)CH(6)@103Key(+12)TRA5SET;TRA5;Key(16)TRA6;
TR(7)CH(7)@100Key(+00)TRA5SET;TRA5;Key(4)TRA6;
TR(107)CH(7)@100Key(+12)TRA5SET;TRA5;Key(16)TRA6;

//Piano
TR(8)CH(8)@1Key(+00)CHO(50)REV(50)v(80)P(74)q(100)l8
STR PPB={"a#0d0f}STR PPC={c0e0g}STR PPA={"a0c0e}STR PPD={d0f0a}
STR PPBP={r8l8PPB;l4PPB;l8.PPB;l8.PPB;l8PPB;}
STR PPCP={r8l8PPC;l4PPC;l8.PPC;l8.PPC;l8PPC;}
STR PPAP={r8l8PPA;l4PPA;l8.PPA;l8.PPA;l8PPA;}
STR PPDP={r8l8PPD;l4PPD;l8.PPD;l8.PPD;l8PPD;}
STR PPDC={r8l8PPD;l4PPD;l8.PPC;l8.PPC;l8PPC;}
STR PPP1={PPBP;PPCP;PPAP;PPDC;}STR PPP2={PPBP;PPCP;PPAP;PPDP;}

STR PBB1={"a#0d0f^}STR PBC1={c0e0g^}STR PBA1={"a0c0e^}STR PBD1={d0f0a^}
STR PBB2={"a#0d0f}STR PBC2={c0e0g}STR PBA2={"a0c0e}STR PBD2={d0f0a}
STR PBP1={l2wPBB1;xwPBC1;xwPBA1;xwPBD2;xwPBC2;x}
STR PBP2={l4[4PBB2;][4PBC2;][4PBA2;][2PBD2;][2PBC2;]}
STR PBP3={l4[4PBB2;][4PBC2;][4PBD2;]l1PBD2;}
STR PBP4={l4[4PBB2;][4PBC2;][4PBA2;]l1PBD2;l4}
STR PBP5={l2wPBB1;xwPBC1;xwPBA1;xwPBD1;x}

v(40)[2PBP1;][2PBP2;]
v(100)[2PPP1;PPP2;[3PPP1;]PPP2;PPP1;PPP2;[3PPP1;]PPP2;]
[2PPP1;PPP2;]r1PBP1;PBP5;[3PPP1;]PPP2;Key(4)[3PPP1;]PPP2;

TR(9)CH(9)@1Key(-12)CHO(50)REV(50)v(60)P(54)q(100)l2V(100)
v(40)[2PBP1;][2PBP2;]
v(70)[2[8r1][3PPP1;]PPP2;PPP1;PPP2;[3PPP1;]PPP2;]
[2PPP1;PPP2;]r1PBP1;PBP5;[3PPP1;]PPP2;Key(-8)[3PPP1;]PPP2;

//KIRAKIRA
TR(11)CH(11)@11Key(+00)CHO(50)REV(50)v(120)V(100)l8Panpot.onNote(64,32,96,0,127,12,115,64)
STR VON1={v.onNote(120,90,90,60,60,40,40,30)}STR VON2={v.onNote(120,90,90,60)}
STR VON3={v.onNote(100,70,70,40,40,20,20,10)}STR VON4={v.onNote(100,70,70,40)}
[5VON1;w[8`a]xw[8`g]xw[8`a]VON2;xw[4`f]xw[4`e]x]VON1;w[8`a]xw[8`g]xw[8`a]x[25r1]

[3VON3;w[8`a]xw[8`g]xw[8`a]VON4;xw[4`f]xw[4`e]x]
VON3;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON1;w[8`a]xw[8`g]xw[8`a]VON2;xw[4`f]xw[4`e]x
VON1;w[8`a]xw[8`g]xw[8`a]x[25r1]

[3VON3;w[8`a]xw[8`g]xw[8`a]VON4;xw[4`f]xw[4`e]x]
VON3;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON1;w[8`a]xw[8`g]xw[8`a]VON2;xw[4`f]xw[4`e]x
VON1;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON3;w[8`a]xw[8`g]xw[8`a]VON4;xw[4`f]xw[4`e]x
VON3;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
[9r1][2VON3;w[8`a]xw[8`g]xw[8`a]VON4;xw[4`f]xw[4`e]x
VON3;w[8`a]xw[8`g]xw[8`a]xw[8`f]x]
Key(4)VON1;w[8`a]xw[8`g]xw[8`a]VON2;xw[4`f]xw[4`e]x
VON1;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON1;w[8`a]xw[8`g]xw[8`a]VON2;xw[4`f]xw[4`e]x
VON1;w[8`a]xw[8`g]xw[8`a]x

TR(12)CH(12)@11Key(+12)CHO(50)REV(50)v(90)V(100)l8Panpot.onNote(64,96,32,127,0,115,12,64)
STR VON5={v.onNote(90,60,60,30,30,10,10,0)}STR VON6={v.onNote(90,60,60,30)}
STR VON7={v.onNote(70,40,40,10,10,0,0,0)}STR VON8={v.onNote(70,40,40,10)}

[5VON5;w[8`a]xw[8`g]xw[8`a]VON6;xw[4`f]xw[4`e]x]
VON5;w[8`a]xw[8`g]xw[8`a]x
[25r1]

[3VON7;w[8`a]xw[8`g]xw[8`a]VON8;xw[4`f]xw[4`e]x]
VON7;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON5;w[8`a]xw[8`g]xw[8`a]VON6;xw[4`f]xw[4`e]x
VON5;w[8`a]xw[8`g]xw[8`a]x[25r1]

[3VON7;w[8`a]xw[8`g]xw[8`a]VON8;xw[4`f]xw[4`e]x]
VON7;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON5;w[8`a]xw[8`g]xw[8`a]VON6;xw[4`f]xw[4`e]x
VON5;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON7;w[8`a]xw[8`g]xw[8`a]VON8;xw[4`f]xw[4`e]x
VON7;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
[9r1][2VON7;w[8`a]xw[8`g]xw[8`a]VON8;xw[4`f]xw[4`e]x
VON7;w[8`a]xw[8`g]xw[8`a]xw[8`f]x]
Key(16)VON5;w[8`a]xw[8`g]xw[8`a]VON6;xw[4`f]xw[4`e]x
VON5;w[8`a]xw[8`g]xw[8`a]xw[8`f]x
VON5;w[8`a]xw[8`g]xw[8`a]VON6;xw[4`f]xw[4`e]x
VON5;w[8`a]xw[8`g]xw[8`a]x

//STR
TR(13)CH(13)@49Key(+00)CHO(50)REV(50)v(40)P(64)q(100)l2V(120)

STR SBB1={""a#0"a#0d0`d^}STR SBC1={"c0c0g0`e^}STR SBA1={""a0"a0e0`e^}STR SBD1={"d0d0a0`f^}
STR SBB2={""a#0"a#0d0`d}STR SBC2={"c0c0g0`e}STR SBA2={""a0"a0e0`e}STR SBD2={"d0d0a0`f}
STR SBP1={SBB1;SBC1;SBA1;SBD2;SBC2;}
STR SBP2={SBB1;SBC1;SBA1;SBD1;}
STR SBP3={SBB1;SBC1;SBD1;SBD1;}

[2SBP1;]v(50)[2SBP1;]v(50)SBP1;SBP2;v(50)[3SBP1;]SBP2;SBP1;SBP2;[3SBP1;]SBP2;v(50)SBP1;SBP2;

v(50)[3SBP1;]SBP2;SBP1;SBP2;[3SBP1;]SBP2;v(50)SBP1;SBP2;v(50)SBP1;SBP2;

r1v(40)SBP1;SBP2;v(50)[3SBP1;]SBP2;v(50)Key(4)[3SBP1;]SBP2;

//BASS2
TR(14)CH(14)@34Key(-24)CHO(50)REV(50)v(60)P(64)q(100)l2V(100)
STR EBB1={"a#0a#^}STR EBC1={c0`c^}STR EBA1={"a0a^}STR EBD1={d0`d^}
STR EBB2={"a#0a#}STR EBC2={c0`c}STR EBA2={"a0a}STR EBD2={d0`d}
STR EBP1={EBB1;EBC1;EBA1;EBD2;EBC2;}
STR EBP2={EBB1;EBC1;EBA1;EBD1;}
STR EBP3={EBB1;EBC1;EBD1;EBD1;}
[2EBP1;]v(100)[2EBP1;]v(110)EBP1;EBP2;v(100)[3EBP1;]EBP2;EBP1;EBP2;[3EBP1;]EBP2;v(110)EBP1;EBP2;
v(100)[3EBP1;]EBP2;EBP1;EBP2;[3EBP1;]EBP2;v(110)EBP1;EBP2;v(100)EBP1;EBP2;
r1v(60)EBP1;EBP2;v(100)[3EBP1;]EBP2;v(110)Key(-20)[3EBP1;]EBP2;

//POKOPOKO
TR(15)CH(15)@47Key(00)CHO(50)REV(50)v(120)P(64)q(100)l16
STR TKP1={w```d``a``f``e``d`a`f`e`dafed"a"f"ex}
STR TKP2={w"e"f"adefa`d`e`f`a``d``e``f``a```dx}
STR TKP3={w```d``a``f``e``d`a`f`e`dafed"a"f"er1x}
[15r1]v(90)TKP2;v(120)[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[16r1]TKP1;[15r1]Key(04)TKP2;[15r1]v(127)TKP3;r1
TR(115)CH(15)@47Key(12)CHO(50)REV(50)v(80)P(64)ゲート100l16
[15r1]v(50)TKP2;[7r1]v(80)TKP1;[15r1]TKP2;[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[15r1]TKP2;[7r1]TKP1;[16r1]TKP1;[15r1]Key(16)TKP2;[15r1]v(90)TKP3;r2

//KIRAKIRA
TR(16)CH(16)@11Key(12)CHO(60)REV(50)V(70)v(100)P(64)q(100)l16
STR GB={"a#dfa#}
STR GC={ceg`c}
STR GA={"acea}
STR GD={dfa`d}
STR GP1={v.onNote(100,100,100,100,60,60,60,60,40,40,40,40,10,10,10,10)[4GB;][4GC;][4GA;]v.onNote(100,100,100,100,60,60,60,60)[2GD;][2GC;]}
STR GP2={v.onNote(100,100,100,100,60,60,60,60,40,40,40,40,10,10,10,10)[4GB;][4GC;][4GA;][4GD;]}
Panpot.onNote(96,32,96,0,127,12,115,12)[24r1]V(50)[24r1]V(70)[3GP1;]GP2;V(50)[32r1]V(70)[3GP1;]GP2;V(50)[25r1]V(70)[3GP1;]GP2;

TR(10)CH(10)Key(00)CHO(10)REV(10)l8v(127)q(100)
STR MK1={"""a0"""b0""c}
STR MK2={"""a0"""b0""c0"""e0""d#}
STR MKP1={l4[15l4v(127)MK1;v(120)MK2;]v(127)MK1;l8v(120)MK2;l16MK2;MK2;}
STR MKP2={l4[3[4v(127)MK1;v(120)MK2;]][2v(127)MK1;v(120)MK2;]r1}
STR MKPTN={l4[4v(127)MK1;v(120)MK2;]}
STR MSPTNT={v(110)l8[2[4""f#""a#0"d#]]}
STR MSPTN={v(110)l8[2[3""f#""a#0"d#]""f#""a#0"d#16""a#0"d#16]}
STR MSP={v100l8[4[2[3""f#""a#0"d#]""f#""a#0"d#16""a#0"d#16]]}
STR MCS={""a#0"c#0"a}
p%3000
[8r1]V(120)[4MSPTNT;]SUB{MSP;}MKP1;[13SUB{MSP;}MKP1;][9r1][4SUB{MSP;}MKP1;]