posted 16 April 2006 14:05            

{(1 to: 14) collect: [ :i | (((i * 1/8) + (!Offset - 24)) / 12.0) twoExp - 1]} " 16ths of a tone"

{#(0 0 2 4 4 4 5 7 7 7 9 11 12 12) collect: [ :i | (((i ) + (!Offset - 24)) / 12.0) twoExp - 1]} "Major, biased Tonic"

{#(0 2 4 5 5 5 7 9 9 9 11 12 13 13) collect: [ :i | (((i ) + (!Offset - 24)) / 12.0) twoExp - 1]}" "Major, biased subdominant"

Is it possible to select form this arrays in real time by having an array of arrays? Something like:

{!Mode of: #( {first array above}
{second array}
{third array})}

Any ideas on how I can make this work? Thanks in advance.

posted 16 April 2006 16:31            

Here is one possible solution (not tested in Kyma, so there may be small syntax errors):

{| a1 a2 a3 |

a1 := (1 to: 14) collect: [ :i | (((i * 1/8) + (!Offset - 24)) / 12.0) twoExp - 1]. "16ths of a tone"

a2 := #(0 0 2 4 4 4 5 7 7 7 9 11 12 12) collect: [ :i | ((i + (!Offset - 24)) / 12.0) twoExp - 1]}. "Major, biased Tonic"

a3 := #(0 2 4 5 5 5 7 9 9 9 11 12 13 13) collect: [ :i | ((i + (!Offset - 24)) / 12.0) twoExp - 1]. "Major, biased subdominant"

(1 to: a1 size) collect: [ :i | !Mode of: (Array with: (a1 at: i) with: (a2 at: i) with: (a3 at: i))]}

posted 17 April 2006 08:07            

Oh wait, I just found it! Just an extra curly bracket in the second line. Works like a charm now!

Thanks so much, this is great! I'll upload the final patch in the twiki eventually.