月曜日, 10月 30, 2006

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

今日は、昨日やった「尺八のための２声のインベンション」のスケール定義を変えて演奏させてみる。使う音域の範囲も、前半、中間、後半と３段階に変えてみた。

//_　尺八のための２声のインベンション NO.2

Function Compose1(Int NoN, Array LoN){
　Array Scale=({レ},{レ＃},{ファ},{ソ},{ソ＃},{`ドレ},{`レ},{ファ},{`ソ},{`ソ＃},{``ド},{``レ＃})
　Str ML={} Int N=0 Int M
　[(NoN) N++ M=12 If (N<40) m="6}">160) {M=7}
　　ML=ML+Scale(Random(0,M))+RandomSelect(LoN)
　] Result=ML
}
TR(1) P(64-50) V(100) v.Random(60) REV(100) q080 音色(Shakuhachi)
TR(2) P(64+50) V(100) v.Random(60) REV(100) q080 音色(Shakuhachi)

#Part1=Compose1(200,(4,4,8))
#Part2=Compose1(200,(4,4,8))

Tempo(112)

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

//_______ ここまで _______________




　

posted by admin @ 12:39 午前