風が吹いてるねー

木村

MML先頭 2000 文字だけ表示していますダウンロード全文を見る

/*----------------------------------------------------------------------------------------------
風が吹いてるねー … 春一番じゃないです。
2013/03/04　木村
----------------------------------------------------------------------------------------------*/
/*初期設定*/
v.Max(100)
KeyFlag=( 0, 0, 0, 0, 0, 0, 0) //b-をbで表す
//Bass Snare closedHiHat openHiHat crashcymbal ridecymbal
$b={n36,} $s={n38,} $c={n42,} $o={n46,} $C={n49,} $R={n51,}
/*曲データ*/
Str pi11={l8v.N( 0,80,80, 90,80,80, 80,80,90,80,80, 80,70 )
r^^^<a^b^> c^^^<a^b^> c^c^<ab^> c^^<b^^^^> }
Str pi12={l8v.N( 90,80,80,70,70, 80,80,80, 90,80,80,70,70, 70 )
cc^^<ab^> cc^^^^^ cc^^<ab^> c^^^^^^^ }
Str bc11={l8 rceg^^^g rcea^^^g rcfa^^^g rdfg^bgf }
Str bc12={l8 rceg^^^g rcea^ged rcfa^^^g rdeg^^^^ }
Str cd11={l1t.N(0,3,7,12) 'ceg>c<' 'cea>c<' 'cfa>c<' 'dfgb' } // C Am F G
Str cd12={ 'ceg>c< ' 'cea>c<' 'cfa>c<' 'ceg>c<' } // C Am F C
Str bs11={l4 r^^^ <a^^^ f^^^ g^^g> }
Str bs12={l4 c^^c <a^^a f^^f> c^^c }
Str pi21={l8v.N( 80,80,80,70, 80,80,80,70, 80,80,80,70, 80,80,80,70 )
c^<b^>c^d^ e^d^c^<b^> c^<b^>c^d^ c^<b^a^b^> }
Str pi22={l8v.N( 80,80,80,70, 80,80,80,70, 80,80,80,70, 80,80,70,70 )
c^<b^>c^d^ e^d^c^<b^> c^<b^>c^d^ c^<b^a^b^> }
Str bc21={l8 rceg^g^g rcfa^a^g rdfa^a^g rdfg^agf }
Str cd21={ 'ceg>c< ' 'cfa>c<' 'dfa>c<' 'dfgb' } // C F Dm G
Str bs21={l4 c^^c <f^^f> d^^d <g^^g> }
Str pi31={l8v.N( 80,80,70,80, 90,80, 80,80,70,80, 80,80,80,70 )
dc^^^c^ dc^^^^^^ dc^^^c^ d^e^d^c^ }
Str pi32={l8v.N( 80,80, 80,80,70, 80,80,70,80, 80,80,80,70 )
dc^^^^^^ dc^^^<b^^> dc^^^c^ d^e^d^c^ }
Str bc31={l8 rceg^g^g rcea^a^g rdfa^a^g rdfg^agf }
Str cd31={ 'ceg>c<' 'cea>c<' 'dfa>c<' 'dfgb' } // C Am Dm G
Str bs31={l4 c^^c <a^^a> d^^d <g^^g> }
Str pi41={l8v.N( 80,80,80,80,80, 90,80,