牧瀬氏からもらったメロディをスーパーコライダーに移植。
まずハ長調に移すと、コードや移調がわかりやすい。
今回は音程にmidinoteを使わずにdegreeを使う。
最初のメロディ
a=Pbind(
\amp,0.2,
\degree, Pseq([3,2,1,2,1,4,2,0,\rest,
3,2,1,2,1,4,\,\,\rest,
5,5,6,3,2,0,\,
3,2,1,2,1,4,\,\,\rest], inf),
\dur, Pseq([
0.5,0.5,0.5,0.5,1,1,1,1,2,
0.5,0.5,0.5,0.5,1,1,1,1,2,
1,1,1,1,1,1,2,
0.5,0.5,0.5,0.5,1,1,1,1,2
], inf),
\pan,[0,1],
\legato, Pseq([0.05,0.01],inf),
\octave, 6 ,
\root, 9
);