土曜日, 10月 28, 2006

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

今日は、昨日やった「笛と太鼓による官能的な神楽」をちょっとアレンジしてみた。

一つは、太鼓を2台にして左右に配置してみる。もう一つは、笛の音の音程を微妙にずらして、笛っぽい感じを出してみる。

//_ 笛と太鼓による官能的な神楽

Function Compose1(Int NoN, Array LoN){
Array Scale=({``レ},{p%-200``ミ},{``ファ},{p%-200``ラ},{``シ},{```レ},{p%-20```ミ})
 Str ML={}[(NoN) ML=ML+Scale(Random(0,7))+RandomSelect(LoN)] Result=ML
}
Function Compose2(Int NoN, Array LoN){
Array Scale=({ド},{ミ},{ソ})
 Str ML={}[(NoN) ML=ML+Scale(Random(0,3))+RandomSelect(LoN)] Result=ML
}

TR(1) P(64-10) V(080) v.Random(60) REV(100) q080 音色(Piccolo)
TR(2) P(64+10) V(080) v.Random(60) REV(100) q080 音色(Piccolo)
TR(3) P(64-50) V(120) v.Random(60) REV(100) q080 音色(TaikoDrum)
TR(4) P(64+50) V(120) v.Random(60) REV(100) q080 音色(TaikoDrum)

#Part1=Compose1(120,(2,4))
#Part2=Compose1(120,(2,4))
#Part3=Compose2(240,(4,8))
#Part4=Compose2(240,(4,8))

Tempo(240)

TR(1) #Part1 TR(2) #Part1 TR(3) #Part3 TR(4) #Part4

//_______ ここまで _______________