I'm trying to embed two separate :cc controllers using the gen-dynamic-controller function into a ps function. Basically, I want to be able to use the velocity-dynamics of a sequence to control both dynamics on cc1 and vibrato on cc21 simultaneously so that dynamic and vibrato are linked together. 

 

I'm not sure whether running the two inside (list sequence :cc) form in ps works? The code doesn't throw an error but doesn't work properly only the second :cc seems to work. If not possible within ps, how would one do this within def-score? I presume that it's possible to generate multiple :cc controls within a def-score. Ideally, I'd like to be able to use ps as this is great for sketching ideas quickly.

 

Here's the simple example I'm working on. As noted, the code doesn't throw an error - which is why I think it might be possible - but the first :cc 1 controller is not working on the VI, only the second :cc 21 controller is working.

 

(ps 'r-ens
:sf-vn1a (list (ambitus 'violin genner-vel) 
:cc '(1 (gen-dynamic-controller genner-vel :scale '(0.5 0.6 0.7) :loop t)) 
:cc '(21 (gen-dynamic-controller genner-vel :scale '(0.5 0.6 0.7) :loop t)))
:time-signature '(3 2)
:tempo 110)

 

Any ideas, advice? What am I missing?

 

Many thanks

 

Andrew

PS (preview) is not the real score tool. I would suggest to use def-score.
Anyway, here it is:
 

(setf
 p1 '(q d4 pp s eb4 < leg g4 < leg bb4 < leg a4 q. cs5 mf -e
        3q gs5 > leg fs5 > leg c5 > b4 > leg f4 leg e4)
 p2 '(t d4 < leg eb4 < leg g4 < leg bb4 q. a4 marc
        t fs4 mf leg gs4 leg e. c5 e b4 t f5 leg e5 leg d5 leg
        eb5 3q bb5 > a4 > bb5 > e a4 pp stacc -e)
 )

(ps 'gm
    :vn (list p1 :cc '(1 (gen-dynamic-controller p1 :scale '(0.5 0.6 0.7) :loop t)
                         21 (gen-dynamic-controller p1 :scale '(0.5 0.6 0.7) :loop t)))
    :va (list p2 :cc '(1 (gen-dynamic-controller p2 :scale '(0.4 0.6 0.7) :loop t)
                         21 (gen-dynamic-controller p2 :scale '(0.8 0.6 0.7) :loop t))))