TrackName     = {"『星降る夜に』"}
Copyright     = {"作曲：ふみこみどり"}
MetaText      = {"公開日：2011/05/14
ジャンル：しっとりピアノ"} 
/*
作者：ふみこみどり
	http://asiangreen.boo.jp/
	hajike_green@hotmail.com
音源
　制作者音源：KONTAKT 4 などなど
  　推奨音源：MS-GS(Windows7)で調整しています。
		　もしくはmp3(いろんなVST版)でどうぞ。

長さ：2分6秒
調性：ホ短調

mp3版はこちらからどうぞです。
	http://asiangreen.boo.jp/music/2011-0514hoshi.mp3
//------------------------------------------------------------------------------

	星降る夜に捧げる、小さな祈り。

//------------------------------------------------------------------------------
■作者より
はじめまして　または　おひさしぶりです。
ダウンロードどうもありがとうございます♪

久々に作曲しよう、と思って作ってみたピアノソロの小曲です。
穏やかに聴いていただければ幸いです♪

どうぞよろしくお願いします。

■注■
この曲は音源によって音色を変えられる仕組みになってます。
[0] ふつう用(MS-GS(Vista)で調整しています。)
[1] 作者環境用(いろんなVSTを使用)
　　※ちなみにmp3は[1]がもとになっています。*/
Int TYPE = 0; /* "="の後の数字を0 or 1にしてください。*/
//------------------------------------------------------------------------------
TIME(0:1:1)Tempo(96)
TIME(0:1:0)拍子3,8
調+(f)
TimeBase=480
//------------------------------------------------------------------------------
Str PO = {" y64,127 "}
Str PF = {" y64,0 "}
//------------------------------------------------------------------------------
IF((TYPE==0)) {
	ResetGM();
	TrackSync;
	System.MeasureShift(1);    //音源初期化用
	
}IF((TYPE==1)||(TYPE==2)) {
	TrackSync;
	System.MeasureShift(1);    //音源初期化用
}
//------------------------------------------------------------------------------
Function SetTrack(Int nTrack)
{
	IF(TYPE!=0 && TYPE!=1 && TYPE!=2){
		Str ALT = {"TYPEの後の数字は、0〜2の整数でお願いします〜"};
		Print(ALT);
		End();
	}
	IF(TYPE==0) {
		Track(nTrack)
	}IF(TYPE==1) {
		Track(nTrack)
		IF(nTrack <= 16){Port(0);Channel(nTrack);}
		IF((nTrack <= 32)&&(nTrack > 16)){Port(1);Channel(nTrack - 16);}
		IF(nTrack > 32){Port(2);Channel(nTrack - 32);}
	}
}
Function InitTrack(Int nTrack,
			Int nNote,
			Int nNote2,
			Int nNote3,
			Int nVol,
			Int nPan,
			Int nRev,
			Int nCho,
			Int nRezo,
			Int nAtt,
			Int nCut)
{
	IF(TYPE!=0 && TYPE!=1 && TYPE!=2){
		Str ALT = {"TYPEの後の数字は、0〜2の整数でお願いします〜"};
		Print(ALT);
		End();
	}
	IF(TYPE==0) {
		Track(nTrack) Voice(nNote)
		IF(nTrack <= 16){Port(0);Channel(nTrack);}
		IF(nTrack > 16){Mute(nTrack);}
		M(10)
	}IF(TYPE==1) {
		Track(nTrack)
		IF(nTrack <= 16){Port(0);Channel(nTrack);}
		IF((nTrack <= 32)&&(nTrack > 16)){Port(1);Channel(nTrack - 16);}
		IF(nTrack > 32){Port(2);Channel(nTrack - 32);}
		Voice(nNote, nNote2, nNote3)
		y71,nRezo y73,nAtt y74,nCut
	}
	EP(nVol) P(nPan) REV(nRev) CHO(nCho)
}
IF(TYPE == 0){
//InitTrack( 1,  1,  0,  0,100, 64,  0,  0, 64, 64, 64);//標準
//	   No  Note           Vol Pan Rev Cho Rez Att Cut
InitTrack( 1,     1,  0,  0,120, 64, 10,  0, 64, 64, 64);//音色(Piano)
}
IF(TYPE == 1){
//InitTrack( 1,  1,  0,  0,100, 64,  0,  0, 64, 64, 64);//標準
//	   No  Note           Vol Pan Rev Cho Rez Att Cut
InitTrack( 1,     1,  0,  0,120, 64, 10,  0, 64, 64, 64);//音色(Piano)
}
//------------------------------------------------------------------------------
// Port(0)
//------------------------------------------------------------------------------
Track(1)Port(0) v100 o6
q100 M(0) V(120) EP(120)

Str Piano1_={"
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*

PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r* PO l2^4-24 r* PF l24 r*
"}
Str Piano1R={"
v.N(110,100,100, 105,90,90, 110,90,90, 95,85,90)
l8 gfdgfd gfdd<b>d
v.N(110,100,100, 105,90,90, 100,90,90, 80)
l8 gfdgfd gfd<b^^>
v.N(70, 110,100,100, 105,90,90, 110,90,90, 95,85,90)
l8 t.N(-20,0) 'fg' t0 fdgfd gfdd<b>d
v.N(90,90,100, 100,100,100, 110,90,90, 100,90,80)
l8 '<b>dg'^^agf gdc<bg Tempo(92) d> Tempo(96)

v.N(110,100,100, 105,90,90, 110,90,90, 95,85,90)
l8 gfdgfd gfdd<b>d
v.N(110,100,100, 105,90,90, 100,90,90, 80)
l8 gfdgfd gfd<b^^>
v.N(70, 100,90,90, 100,90,90, 110,90,90, 95,85,90)
l8 t.N(-20,0) 'fg' t0 fdgfd gfdd<b>d
v.N(90,90,100, 100,100,100, 110,90,90, 100,90,80)
l8 '<b>dg'^^agf gdc<b> Tempo(90) c Tempo(76) d Tempo(96)

v.N(90,90,115, 110,110, 100,120, 100,110,90)
l8 t.N(-40,-20,0) 'gb>d'^^^ t0 de t.N(-20,0) '<f>d'^^ t0 < 'da'^d
v.N(90,115, 105,105, 90,90,110, 95,95,115, 90)
l8 'df'^^'<b>e'^^ '<a>df'^^'<b>dg'^f
v.N(90,90,110, 110,110,100, 110,110, 110,110, 90,90,110)
l8 t.N(-40,-20,0) '<g>ce'^^ t0 ceb 'da'^'a>d<'^'<a>df'^
v.N(100,100,110, 100,100, 90,90,105, 90,90,115)
l8 '<b>df'^^'<b>e'^^ '<a>df'^^ Tempo(94) '<g>dg'^^ Tempo(96)

v.N(110,110,115, 110,110, 100,120, 110,110,90)
l8 'gb>d'^^^de t.N(-20,0) '<f>d'^^ t0 < 'da'^d
v.N(90,115, 105,105, 90,90,110, 100,100,115, 100)
l8 'df'^^'<b>e'^^ '<a>df'^^'<b>dg'^f
v.N(90,90,110, 110,110,100, 110,110, 110,110, 100,110)
l8 t.N(-40,-20,0) '<g>ce'^^ t0 ceb 'da'^'dg'^'<a>f'^
v.N(100,100,110, 90,90, 110,80,80,80,80,80)
l8 '<b>df'^^^ed e<egb> Tempo(90) df Tempo(96)

v.N(110,100,100, 105,90,90, 110,90,90, 95,85,90)
l8 gfdgfd gfdd<b>d
v.N(110,100,100, 105,90,90, 100,90,90, 80)
l8 gfdgfd gfd<b^^>
v.N(70, 110,100,100, 105,90,90, 110,90,90, 95,85,90)
l8 t.N(-20,0) 'fg' t0 fdgfd gfdd<b>d
v.N(90,90,100, 100,100,100, 110,90,90, 100,80,90,80, 80)
l8 '<b>dg'^^agf gdc< l16 b>c<bg l8 Tempo(92) d> Tempo(96)

v.N(80, 110,100,100, 105,90,90, 80, 110,90,90, 95,85,90)
l8 'dg'fdgfd '<b>g'fdd<b>d
v.N(80, 110,100,100, 105,90,90, 80, 100,90,90, 80)
l8 'dg'fdgfd '<b>g'fd<b^^>
v.N(80, 100,90,90, 100,90,90, 80, 110,90,90, 95,85,90)
l8 'dg'fdgfd '<b>g'fdd<b>d
v.N(100,100,100, 100,100,100, 90,90,110, 90,90,100,90,90)
l8 '<b>dg'^^agf '<g>dg'dc<b> Tempo(90) c Tempo(76) d Tempo(96)

v.N(110,110,115, 110,110, 100,120, 110,110,90)
l8 'gb>d'^^^de t.N(-20,0) '<f>d'^^ t0 < 'da'^d
v.N(100,115, 95,105, 100,100,110, 100,100,115, 90)
l8 'df'^^'<b>e'^^ '<a>df'^^'<b>dg'^f
v.N(90,90,110, 110,110,100, 100,110, 100,110, 100,110)
l8 t.N(-40,-20,0) '<g>ce'^^ t0 ceb 'da'^'a>d<'^'<a>f'^
v.N(100,100,110, 100,100, 100,100,110, 90,90,110, 95,95)
l8 '<b>df'^^'<b>e'^^ '<a>df'^^'<g>dg'b>c<

v.N(110,110,115, 110,110, 100,120, 110,110,90)
l8 'gb>d'^^^de t.N(-20,0) '<f>d'^^ t0 < 'da'^d
v.N(100,115, 105,105, 90,90,110, 100,100,115, 100)
l8 'df'^^'<b>e'^^ '<a>df'^^'<b>dg'^b
v.N(90,90,115, 100,90,100, 90,90, 100,100, 110,110)
l8 t.N(-40,-20,0) 'g>ce<'^^ t0 ede '<a>f'^'dg'^'fa'^
v.N(90,90,100, 100,90, 100,100, 100,90, 90,90)
l8 '<b>df'^^^ed '<b>e'^^ Tempo(94) g^b t.N(-20,0) 'b>e<'^^^^^ ^^^^^^ t0
"}
Str Piano1L={"
v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagf Tempo(94) d Tempo(96)
v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagfd

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagf Tempo(94) d Tempo(96)
v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagfd

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <d>dfa^^ <
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <b>b>dfd<b eb>ege<b>
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <c>cegec <d>dfafd
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <<b>b>fafd eb>ege<b

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <d>dfa^^ <
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <b>b>dfd<b eb>ege<b>
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <c>cegec <d>dfafd
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <<b>b>fafd eb>ege<b

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagf Tempo(94) d Tempo(96)
v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagfd

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagf Tempo(94) d Tempo(96)
v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <c>ceb^^ <
v.N(95,90,90,90, 95,90,90,90,90,80)
l8 <g>g>dg^^< g>gagfd

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <d>dfa^^ <
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <b>b>dfd<b eb>ege<b>
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <c>cegec <d>dfafd
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <<b>b>fafd eb>ege<b

v.N(95,90,90,90, 95,90,90,90)
l8 <c>ceb^^ <d>dfa^^ <
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <b>b>dfd<b eb>ege<b>
v.N(95,90,90,90,90,90, 95,90,90,90,90,80)
l8 <c>cegec <d>dfafd
v.N(95,90,90,90,90,90, 95,90,90,90,90,80, 85,85)
l8 <<b>b>fafd <e>egbgd < '<e>e'^^^^^ ^^^^^^
"}

TIME(1:1:0)o4 t-1 Piano1_ t0
TIME(1:1:0)o6 Piano1R
TIME(1:1:0)o4 Piano1L