System.Include(stdmsg.h)
System.MeasureShift(1);
ResetGM();
TrackSync;
TrackName={'風鈴(Fiddle)'}
Copyright={'Moritoizumi'}
TimeSignature=4,4
Tempo=80
TR=1 CH=1 @(Fiddle) V(100) v100o5 q98 P.onNoteWave(54,74,!4)
l12 a v80o6c^ v100o5a^^b^ v80o6eg v60o7c v80o6g
l12 a v60o7d^f^ecd^^^^
l16 e^^ae v80o6b^^^^^a v60o7ddf^
l3 de^
l12 d^^^^^ v80o6agaf^f
l3 gbb
l12 a^^^^g v60o7c v80o6a^^f^
l8 fb^ v60o7dd^ v80o6a v60o7d
l8 c^^ v80o6g^b^^
l6 ag v60o7c^ v80o6bb
l8  v60o7de v80o6b v60o7c^^fd
l3 c^ v80o6b
l16 gd^dg^^g^^b^^ v60o7e^c
l12  v80o6a^^^^^g^^^^d
l8 eg^^^^ v60o7c^
l3 c^^
l8  v80o6bge^^^^a
l6 edec^c
l6 efa^b^
l16 g^^ v60o7c^ v80o6bg^ v60o7c^^^ v80o6agg^
l3 ged
l6  v100o5a^ v80o6c^f^
l3 d^c
l12  v100o5ge^^^^^d^ v120o4a^f
l12 dg^^^ v100o5c^ v120o4a^b v100o5d^
l4 ef^^
l3 b^g
l4 fe v120o4b^
l6 gb^a v100o5d^
l4 e^ v120o4b v100o5d
l12 gaefba^b v80o6c^ee
l6 g^^a^f
l4 b v60o7cf^
l8 e^^^^ v80o6b^^
l8 b v60o7dd^^ v80o6bf^
l3 b^ v60o7d
l4  v80o6a^^a
l4 f^c v100o5b
l3  v80o6ef^
l3 d^d
l12 fgaa^^ v60o7cd^fe^
l4 gbgb
l16 ff^^gg^e^g^ae^c v80o6a
l8 g^e^^^^c
l3  v100o5g^^
l3 f^f
l4 a^e^
l3 gd^
l8  v120o4aba^ v100o5c v120o4abb
l8 f^dfd^^g
l6 a v100o5c v120o4a^ v100o5dc
l6 f^b^ v80o6c^
l8 eegae^ef
l6 d v100o5b^^ v80o6c v100o5g
l8 ge^g^ v80o6c^ v100o5a
l6  v80o6d^^e^d
l12  v100o5b^ga^a v80o6d v100o5aef^e
l12 g^g^^^fe^^ v120o4b^
l3  v100o5c^^
l3 cc^
l4 ede^
l8 d^^d^gbg
l4  v80o6c^ v100o5ba
l8 f^^e^^fe
l6 ga^^f^
l4 c^d^
l16 e^^cfb^^^^^^g^^^
l12 b^a^bf^f^bb^
l6  v80o6cec v100o5g^b
l3 g^e
l3 dfg
l12 e^e v120o4b v100o5ega^ v80o6c^^^
l16  v100o5g^^g^^fb^ v80o6dg^^^^e
l8  v100o5b v80o6d^^^ v100o5ab^
l8  v80o6e^g^g^b^
l3  v60o7e^^
l4 eecd
l6 c^^^^^
l6 egf^^c
l8 e v80o6b^ v60o7d^ v80o6b v60o7eg
l4 ga^a
l4 b^ee
l4  v80o6bb v60o7df
l12 f^^^g^^a^^f^
l6 c^d^^^
l6  v80o6bag^a^
l8 ga^^^ v60o7ccc
l3 cc^
l3  v80o6gaf
l3 b^^
l3  v60o7ecf
l8 gcdec^^ v80o6g
l6 f^^^c^
l4  v100o5bfb^
l4 g^b v80o6c
l6  v100o5gef^aa
l4  v80o6c^ v100o5a^
l8 b^ v80o6ee v100o5b v80o6d^^
l12 cc^e^^^ v100o5baa^^
l12  v80o6d^^ v100o5a^^agg^^^

//ピコサクラでサンプル曲を聴けます。テキスト音楽サクラではランダムに曲が変わります。
//cdefgabの7音と、オクターブ4〜7を使用しています。
//テキスト音楽サクラ使用時は先頭から次行までを削除してください。
/*




Int R1
Int X 
Int X9=X
Int LL
Int NN
Int NN9=4
Str NNA="e"
Int OO=5
Int VV=100
Str MM={System.Include(stdmsg.h)
System.MeasureShift(1);
ResetGM();
TrackSync;
TrackName={'風鈴(Fiddle)'}
Copyright={'Moritoizumi'}
TimeSignature=4,4
Tempo=80
TR=1 CH=1 @(Fiddle) V(100) v100o5 q98 P.onNoteWave(54,74,!4)}

For(Int I=0; I<100; I++){
R1=Random(6)
If(R1==0){LL=3}
If(R1==1){LL=4}
If(R1==2){LL=6}
If(R1==3){LL=8}
If(R1==4){LL=12}
If(R1==5){LL=16}
MM=MM+{
l}+LL+{ }

For(Int J=0; J<LL; J++){
R1=Random(7)
If(R1==0){NN=0;NNA="c";}
If(R1==1){NN=2;NNA="d";}
If(R1==2){NN=4;NNA="e";}
If(R1==3){NN=5;NNA="f";}
If(R1==4){NN=7;NNA="g";}
If(R1==5){NN=9;NNA="a";}
If(R1==6){NN=11;NNA="b";}             

R1=Random(2)
IF(J==0||R1==0){IF(NN-NN9>6&&OO>4){OO--;VV=VV+20;MM=MM+" v"+VV+"o"+OO;}
                IF(NN-NN9<-6&&OO<7){OO++;VV=VV-20;MM=MM+" v"+VV+"o"+OO;}
		    MM=MM+NNA;NN9=NN;}
Else{MM=MM+"^"}
}
}
Print(MM)                         //MML表示
Play(MM)                          //演奏*/