Jump to content

How to set cc value in the Def-Instrument-Sets file


Recommended Posts

Hi,

 

I want to set the vibrato amount of the string library I use for ps to 0.

Its on cc21.

I can't figure out in which form I have to put it in the Def-Instrument-Sets file:

          :v1 (:layout treble-layout
                       :port "OM-VE1"
                       :channel 12
                       :controllers (21 '(0))  ;this does not work
                       :sound 'sq-sf
                       :volume 127)

thanks for help!

 

best  ole

 

Link to post
Share on other sites

I did go through the docs again, tried

 

Quote

:cc

inside the list bracket but can't figure out the right syntax for what comes after the :cc

greatful for a hint, thanks!

 

Link to post
Share on other sites
(ps 'gm :ob (list p1 :cc '(expression (gen-dynamic-controller p1))))

(ps 'gm :b5 (list
             (list p1 :cc '(expression (gen-dynamic-controller p1)))
             (list p2 :cc '(expression (gen-dynamic-controller p2)))
             (list p3 :cc '(expression (gen-dynamic-controller p3)))
             (list p4 :cc '(expression (gen-dynamic-controller p4)))
             (list p5 :cc '(expression (gen-dynamic-controller p5)))))

 

Link to post
Share on other sites

Thanks, I found that too but I need cc21, value 0 and this does not work:

:cc '(21 ((0 1)))

nor does:

:cc (21 '((0 1)))

nor does:

:cc '(21 '((0 1)))

 

so what am I missing?

 

Thank you!

Link to post
Share on other sites

Ok, now I made it work, following the trail you made:

(defun novib (x)
 (position-replace
 '(0) '(0)(gen-dynamic-controller x)))

then

(setf test4 '(q c4 b3 d4 b3 e4 b3 fs5 - e4))

(ps 'vep
    :va (list  test4
              :cc '(21 (novib test4)))   
)

is this the way to go or is there something more simple to achive the same thing..?

Link to post
Share on other sites

So, it could also be something like this:

 

(ps 'vep
    :va (list  test4
              :cc '(21 (gen-controller 2 '(0) :time (omn :length test4))))
)

 

or like this:

(setf lensum (list (list '0 (find-sum (omn :length test4)))))
(ps 'vep
    :va (list  test4
              :cc '(21 lensum))
)

 

or an increasing vibrato as in the def-score docs:

(ps 'vep
    :va (list  test4
              :cc '(21 '((:asc 0 127 1/4 4))))
)

 

I think now I've got it, thanks (again) for your patience!

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...

Important Information

Terms of Use Privacy Policy