木曜日, 10月 26, 2006

「サクラ」でアルゴリズム作曲 - 7.1 -

昨日やった「三弦と鼓による風雅２００６」、鼓の音がGM音源にないのでSynthDrumで代用している。

そこで、SoundFontに鼓の音がないかを探してみたら、これが簡単に見つかった。ということで、今日は鼓のSoundFont版を作ってみた。

//_　三弦と鼓による風雅２００６

Function Compose1(Int NoN, Array LoN){
Array Scale=({"シ},{レ},{ミ},{ファ},{ラ},{シ},{`レ},{`ミ})
　Str ML={}[(NoN) ML=ML+Scale(Random(0,8))+RandomSelect(LoN)] Result=ML
}
Function Compose2(Int NoN, Array LoN){
Array Scale=({""ソ},{""ソ},{""ファ#}) // for asia_ethnic.sf2
　Str ML={}[(NoN) ML=ML+Scale(Random(0,3))+RandomSelect(LoN)] Result=ML
}

TR(1) P(64-30) V(100) v.Random(60) REV(100) q080 音色(Shamisen)
TR(2) P(64-00) V(100) v.Random(60) REV(100) q080 音色(Shamisen)
TR(3) P(64+30) V(100) v.Random(60) REV(100) q080 音色(SynthDrum)

#Part1=Compose1(120,(2,4)) #Part2=Compose1(120,(2,4))
#Part3=Compose2(060,(1,2))

TR(1) #Part1 TR(2) #Part2 TR(3) #Part3

//_______ ここまで _______________




　

posted by admin @ 10:03 午後