JulioHerrlein Posted April 28, 2019 Share Posted April 28, 2019 Dear Friends, Very basic question: I use some old VSL sample .gig files with gplayer. I really like this libraries and the way it sounds. The combination patches alternate sounds via keyswitches in the lower range of keyboard (or the upper range in some instruments). Something like: C normal sound C# pizz D marcato etc Can I use this keyswitches in the OMN lingo, without having to send the midi note itself to activate the keyswitch, something like: (marcato e c4 d4 s legato fs4 g4 cs5 eb5 ) Opusmodus will send the keyswitches as a hidden midi note in the expression ? All the best, Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted April 28, 2019 Share Posted April 28, 2019 Naturally you can do that. You find the answer in the Def-Sound-Set Library examples, look for VSL files. Example: ;; Patches, keyswitches and controllers change events. (def-sound-set VSL-Harmonium-KS :programs (:group Stops Aeoline (:key c6 :key a0) Bassoon-Hautbois (:key cs6 :key a0) Clairon-Fifre (:key d6 :key a0) Clarinette-Bourdon (:key ds6 :key a0) Flute-Coranglais (:key e6 :key a0) Grandjeu (:key f6 :key a0) Percussion (:key fs6 :key a0) Voix-Celeste (:key g6 :key a0) ) :controllers (:group Default-Settings Pitch 0 Velocity-XF 2 Volume 7 Pan 10 Expression 11 Reverb-Dry/Wet 14 Reverb-On/Off 15 Slot-XF 20 Start-Scaler 21 Master-Attack 22 Master-Release 23 Master-Filter 24 Delay-Scaler 25 Tuning-Scaler 26 Humanize 27 Velocity-XF-On-Off 28 Rsamp-On-Off 29 Dynamics-Scaler 30 :group Pedal Ped 64 Sost-Ped 66 Una-Corda 67 :group Matrix cc1 1 ) ) JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 16, 2019 Author Share Posted November 16, 2019 Dear Janusz and friends, I still have some doubts about the keyswitches. I will put in a form of an example: Let´s consider the following sketch: ;; SOME MATERIAL (setf mat1 '((e d4 stacc gs4 stacc e5 stacc - - a4 - cs4 d4 -) (-s - - - gs4 leg e5 a4 pizz cs4 d4 ord) (-s - marc gs4 e5 stacc a4 cs4 d4 pizz - -) (s gs4 - - e5 - a4 cs4 d4 -) (-s d3 - - eb3 d3 - a3))) (ps 'gm :sq (list (pitch-transpose 12 mat1) (gen-retrograde (pitch-transpose 7 mat1)) (pitch-transpose -5 mat1) (gen-rotate 3 (pitch-transpose -12 mat1))) :key-signature 'atonal :time-signature '(2 4 1) :tempo 112 :title "STR4tetVSL" :display :window) Followiing what you mentioned earlier, I put a file called "Custom_Instrument Set.lisp" in the folder /Users/acmevm/Documents/Opusmodus/Def-Libraries/Def-Instrument-Sets In this file, I found the line corresponding to the layout I used above, the "sq" layout (string quartet). I put it in the PORT 0, so the MIDI out is going to the right place and channels, playing the VSL instruments. ;; CUSTOM_INSTRUMENT SET.LISP - STRING QUARTET LAYOUT - PORT 0 :sq (:layout string-quartet-layout :port 0 :channel '(13 14 15 16) :sound 'gm :program '(violin violin viola cello) :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) Ok, until here there is no problems. THE QUESTIONS How can a send a command in the OMN expression to change my keyswitches (my keyswitches are MIDI notes, not the matrix in VSL. I don´t use the matrix stuff, I prefer just using MIDI notes outside the range of the instrument to change the sounds/articulations. Do I have to change any other file(s) in some folder within Opusmodus ? Maybe each instrument of the quartet layout ? where ? How the expresssion "stacc" above can actually change the keyswitch to staccato sound ? And the same for the pizz, marc, leg, etc (and back to ord) ? Can I use some OMN expression that CHANGE the XML score and NOT SEND the keyswitch (notation-only expression) and vice-versa, i.e., some OMN that CHANGE the keyswitches but NOT CHANGE the XML notation ? Having this independently can be handy sometimes. I want to write a real String Quartet now and all this would be very handy for me. Otherwise I can work with little snippets of excerpts and change the keyswitches manually (or in my Pure Data patch) but I would prefer to have it in OMN, for the sake of elegance. Thank you ! Best, Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted November 16, 2019 Share Posted November 16, 2019 Def-Instrument-Sets are sets to be used with PS function - nothing to do with sound sets. To setup sound set you need to use DEF-SOUND-SET function. In the Library directory you find many examples how to define your own sound set for your instruments. JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 16, 2019 Author Share Posted November 16, 2019 Dear Janusz, In the Def-Sound-Set function explanation there are an GM example. General Midi instruments does not use keyswitches for changing sounds. More likely to use program changes to do that. And there is no explanation on how it is related to the OMN articulation. I need to know how to define the relation between the OMN expression and the keyswitches (or any general controller). And something about this questions: 3) How the expresssion "stacc" above can actually change the keyswitch to staccato sound ? And the same for the pizz, marc, leg, etc (and back to ord) ? 4) Can I use some OMN expression that CHANGE the XML score and NOT SEND the keyswitch (notation-only expression) and vice-versa, i.e., some OMN that CHANGE the keyswitches but NOT CHANGE the XML notation ? Having this independently can be handy sometimes. Thank you, Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted November 16, 2019 Share Posted November 16, 2019 (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; VIENNA INSTRUMENTS - CELLO (keyswitches) ;;;--------------------------------------------------------- ;; Patches, keyswitches and controllers change events. (def-sound-set VSL-Cello :programs (:group Perf-Legato perf-legato (:key c7) :group Perf-Marcato perf-marcato (:key cs7) :group Perf-Spiccato spiccato (:key d7) :group Short-Notes staccato (:key ds7 :key c1) detache-shot (:key ds7 :key cs1) detache-long (:key ds7 :key d1) :group Long-Notes sus-vib (:key e7 :key c1) sus-vib-marc (:key e7 :key cs1) sus-vib-espr (:key e7 :key d1) sus-vib-progr (:key e7 :key ds1) sus-down (:key e7 :key e1) sus-novib (:key e7 :key f1) :group Dynamic dyn-me-vib-2s (cc1 0 :key f7 :key c1 :key a0) dyn-me-vib-3s (cc1 0 :key f7 :key cs1 :key a0) dyn-me-vib-4s (cc1 0 :key f7 :key d1 :key a0) dyn-str-vib-2s (cc1 25 :key f7 :key c1 :key a0) dyn-str-vib-3s (cc1 25 :key f7 :key cs1 :key a0) dyn-str-vib-4s (cc1 25 :key f7 :key d1 :key a0) dyn-me-novib-2s (cc1 60 :key f7 :key c1 :key a0) dyn-me-novib-3s (cc1 60 :key f7 :key cs1 :key a0) dyn-me-novib-4s (cc1 60 :key f7 :key d1 :key a0) pfp-vib-2s (cc1 100 :key f7 :key c1 :key a0) pfp-vib-4s (cc1 100 :key f7 :key cs1 :key a0) fp-vib (cc1 127 :key f7 :key c1 :key a0) sfz-vib (cc1 127 :key f7 :key cs1 :key a0) sffz-vib (cc1 127 :key f7 :key d1 :key a0) :group Tremolo trem-sus (:key fs7 :key c1 :key a0) trem-sus-fA-auto (:key fs7 :key cs1 :key a0) trem-sus-dyn-2s (:key fs7 :key d1 :key a0) trem-sus-dyn-3s (:key fs7 :key ds1 :key a0) :group Trills trill-1 (cc1 0 :key g7 :key c1 :key a0) trill-1-dyn (cc1 0 :key g7 :key cs1 :key a0) trill-1-acc (cc1 0 :key g7 :key d1 :key a0) trill-1-acc-dyn (cc1 0 :key g7 :key ds1 :key a0) trill-2 (cc1 127 :key g7 :key c1 :key a0) trill-2-dyn (cc1 127 :key g7 :key cs1 :key a0) trill-2-acc (cc1 127 :key g7 :key d1 :key a0) trill-2-acc-dyn (cc1 127 :key g7 :key ds1 :key a0) :group Pizzicato pizzicato (cc1 0 :key gs7 :key c1) col-legno (cc1 0 :key gs7 :key cs1) pizz-secco (cc1 80 :key gs7 :key c1) pizz-snap (cc1 127 :key gs7 :key c1) :group Harmonic-Artificial harm-art-stac (:key a7 :key c1) harm-art-sus (:key a7 :key cs1) harm-art-perf-rep (:key a7 :key d1) :group Harmonic-Natural harm-nat-sus (:key as7 :key c1 :key a0) harm-nat-perf-rep (:key as7 :key cs1 :key a0) harm-nat-gliss (:key as7 :key d1 :key a0) :group Ponticello pon-staccato (cc1 0 :key b7 :key c1 :key a0) pon-sus (cc1 0 :key b7 :key cs1 :key a0) pon-sfz (cc1 0 :key b7 :key d1 :key a0) pon-trem (cc1 0 :key b7 :key ds1 :key a0) pon-perf-rep-leg (cc1 0 :key b7 :key e1 :key a0) pon-detache (cc1 127 :key b7 :key c1 :key a0) pon-sus-fA-auto (cc1 127 :key b7 :key cs1 :key a0) pon-sffz (cc1 127 :key b7 :key d1 :key a0) pon-trem-fA-auto (cc1 127 :key b7 :key ds1 :key a0) pon-perf-rep-dyn-leg (cc1 127 :key b7 :key e1 :key a0) :group Tasto tas-staccato (cc1 0 :key c8 :key c1 :key a0) tas-sus (cc1 0 :key c8 :key cs1 :key a0) tas-sfz (cc1 0 :key c8 :key d1 :key a0) tas-trem (cc1 0 :key c8 :key ds1 :key a0) tas-detache (cc1 127 :key c8 :key c1 :key a0) tas-sus-fA-auto (cc1 127 :key c8 :key cs1 :key a0) tas-trem-fA-auto (cc1 127 :key c8 :key ds1 :key a0) :group OMN leg (:key c7) marc (:key cs7) spicc (:key d7) stacc (:key ds7 :key c1) deta (:key ds7 :key cs1) deta+vib (:key ds7 :key d1) deta+non-vib (:key ds7 :key ds1) vib (:key e7 :key c1) vib+marc (:key e7 :key cs1) non-vib (:key e7 :key f1) trem (:key fs7 :key c1 :key a0) tr1 (cc1 0 :key g7 :key c1 :key a0) tr2 (cc1 127 :key g7 :key c1 :key a0) pizz (cc1 0 :key gs7 :key c1) legno (cc1 0 :key gs7 :key cs1) secco (cc1 80 :key gs7 :key c1) snap (cc1 127 :key gs7 :key c1) harm (:key a7 :key c1 :key a0) harm2 (:key as7 :key c1 :key a0) ponte+stacc (cc1 0 :key b7 :key c1 :key a0) ponte+vib (cc1 0 :key b7 :key cs1 :key a0) ponte+deta (cc1 127 :key b7 :key c1 :key a0) ponte+trem (cc1 0 :key b7 :key ds1 :key a0) tasto+stacc (cc1 0 :key c8 :key c1 :key a0) tasto+vib (cc1 0 :key c8 :key cs1 :key a0) tasto+deta (cc1 127 :key c8 :key c1 :key a0) tasto+trem (cc1 0 :key c8 :key ds1 :key a0) ) :controllers (:group Default-Settings Pitch 0 Velocity-XF 2 Volume 7 Pan 10 Expression 11 Reverb-Dry/Wet 14 Reverb-On/Off 15 Slot-XF 20 Start-Scaler 21 Master-Attack 22 Master-Release 23 Master-Filter 24 Delay-Scaler 25 Tuning-Scaler 26 Humanize 27 Velocity-XF-On-Off 28 Rsamp-On-Off 29 Dynamics-Scaler 30 :group Pedal Ped 64 Sost-Ped 66 Una-Corda 67 :group Matrix cc1 1 ) ) Note the omn group: :group OMN leg (:key c7) marc (:key cs7) spicc (:key d7) stacc (:key ds7 :key c1) deta (:key ds7 :key cs1) deta+vib (:key ds7 :key d1) deta+non-vib (:key ds7 :key ds1) vib (:key e7 :key c1) vib+marc (:key e7 :key cs1) non-vib (:key e7 :key f1) trem (:key fs7 :key c1 :key a0) tr1 (cc1 0 :key g7 :key c1 :key a0) tr2 (cc1 127 :key g7 :key c1 :key a0) pizz (cc1 0 :key gs7 :key c1) legno (cc1 0 :key gs7 :key cs1) secco (cc1 80 :key gs7 :key c1) snap (cc1 127 :key gs7 :key c1) harm (:key a7 :key c1 :key a0) harm2 (:key as7 :key c1 :key a0) ponte+stacc (cc1 0 :key b7 :key c1 :key a0) ponte+vib (cc1 0 :key b7 :key cs1 :key a0) ponte+deta (cc1 127 :key b7 :key c1 :key a0) ponte+trem (cc1 0 :key b7 :key ds1 :key a0) tasto+stacc (cc1 0 :key c8 :key c1 :key a0) tasto+vib (cc1 0 :key c8 :key cs1 :key a0) tasto+deta (cc1 127 :key c8 :key c1 :key a0) tasto+trem (cc1 0 :key c8 :key ds1 :key a0) Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 16, 2019 Author Share Posted November 16, 2019 There is a sound-set (VSL) document that is close to what I'm looking, with detailed description of the articulation. I think that there is also a filter for selecting articulations according to the length of the notes. Is it correct ? This would be handy. But do I have to copy that parameters in every score I do, or it functions in the background ? Thank you. Best, Julio Thank you, Janusz The VSL example you provided have keyswitches. Nice. Almost there. The VSL Cello lisp file contained in Opusmodus package is in the folder inside opusmodus package and looks like this (without keyswitches). (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; VIENNA INSTRUMENTS - VIOLONCELLO SOLO ;;;--------------------------------------------------------- ;; Patches, keyswitches and controllers change events. (def-sound-set VSL-Cello-Solo :programs (:group short ;stacc (cc12 0 cc13 0) detache-short (cc12 0 cc13 17) detache-long (cc12 0 cc13 28) :group long sus-vib (cc12 17 cc13 0) sus-vib-fa (cc12 17 cc13 17) Where do I have to put the new lisp file like you provided (or edited by me) with the keyswitching option ? Thank you, Julio Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 16, 2019 Author Share Posted November 16, 2019 Dear Janusz, I really need a more detailed example, for getting there. I'm understanting this way: 1) There is a file with customized score layouts that probably do a "call out" of this instrument definition table and also midi ports (this point I think I got). I put my custom instrument setup in the folder /Users/acmevm/Documents/Opusmodus/Def-Libraries/Def-Instrument-Sets. But this settings are more related to ports and channels, not articulation. There is no informations about keyswitches here. But it worked for changin the port and channels. 2) There must be a place where we put the instrument setup like the Cello with keyswitches you provided, i.e, a file where we can define how the specific instruments of teh custom setup behave and works (if it have or not keyswitches, etc). Each brand have some specific stuff. I don't know where to put the new Cello with keyswitches lisp file in order to call it out later in the OMN expression. 3) The third thing is an instruction for how Opusmodus treat the articulation inside the OMN expression, i.e., how the OMN expression integrated with the notation triggers the keyswitching in an actual score. And also a secondary question: will it works just on def-score expression (and not in the PS function) ? 4) Last, is the building of expression that change or not change the keyswitching (notation versus sound control independently). I nice idea would be you provide a little but complete in terms of the technical stuff example (just 3 or 4 bars of music, with changing keyswitches in OMN expression) with all we need to run it. It's a little complex setup, I see. Maybe a video tutorial. I would love to make a video tutorial, as soon as I understand the thing... But I'm not getting there yet. Best, Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted November 16, 2019 Share Posted November 16, 2019 You define the keyswitches in the DEF-SOUND-SET, after, you place the file in the ~/Opusmodus/Def-Libraries/Def-Sound-Sets folder (next time you start the app the file will load automatically). Copy one of the existing files, change the name and fill it will your instrument setup (controllers, keyswitches etc...). All articulation you define in your sound-set can be used in omn. Nothing else you need to do. The list of attributes names you can use in your setup you will find in 4th Element - Attributes doc. You can create your own - if needed - with ADD-TEXT-ATTRIBUTES function. (q c4 stacc) If there is a sound set with a name STACC in your setup then that program (sample) will be triggered. Stephane gives lessons on all OM technics and subjects:https://opusmodus.com/forums/lessons/ JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 16, 2019 Author Share Posted November 16, 2019 Thanks, Janusz. Best ! Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 17, 2019 Author Share Posted November 17, 2019 Dear Janusz, 1) I copied the Cello with keyswitch you provided above to the folder you provided. 2) I edited the string quartet in my custom instrument file, like this: I put the VSL-Cello inside the layout... (is it wrong ?) ;; STRING QUARTET LAYOUT - PORT 0 :sq (:layout string-quartet-layout :port 0 :channel '(13 14 15 16) :sound 'gm :program '(violin violin viola VSL-Cello) :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) I got this error: Error: #<sound-set #x3020009F987D> has no program named: vsl-cello > While executing: get-sound-set-program, in process Listener-1(7). > Type cmd-. to abort, cmd-\ for a list of available restarts. > Type :? for other options. Help, please ! Best, Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted November 18, 2019 Share Posted November 18, 2019 Here is my VSL instrument setup example: :sq (:layout string-quartet-layout :port 3 :channel '(1 2 3 4) :sound '(vi-violin vi-violin vi-viola vi-cello) :program 0 :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) As you can see the :program is set to 0. The program is not important here, only the :sound is. Here is the Violin sound setup: (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; VIENNA INSTRUMENTS - VIOLIN ;;;--------------------------------------------------------- (def-sound-set vi-violin :programs (:group perf-universal vl-perf-sustain (:key c2 cc1 5) vl-perf-marcato (:key c2 cc1 64) vl-perf-spic (:key c2 cc1 120) :group perf-legato-all vl-perf-legato (:key cs2 :key c1 cc1 40) vl-perf-legato-sul (:key cs2 :key cs1 cc1 40) vl-perf-legato-zigane (:key cs2 :key d1 cc1 40) vl-perf-legato-vib-progr (:key cs2 :key ds1 cc1 40) vl-perf-portamento (:key cs2 :key c1 cc1 80) :group articulation-combi vl-staccato (:key d2 :key c1 cc1 40) vl-sus-vib (:key d2 :key cs1 cc1 40) vl-fp-vib (:key d2 :key d1 cc1 40) vl-trem-sus (:key d2 :key ds1 cc1 40) vl-trill-1 (:key d2 :key e1 cc1 40) vl-pon-staccato (:key d2 :key f1 cc1 40) vl-pon-trem (:key d2 :key fs1 cc1 40) vl-harm-art-stac (:key d2 :key g1 cc1 40) vl-octav-gliss-me (:key d2 :key gs1 cc1 40) vl-pizz (:key d2 :key a1 cc1 40) vl-detache-short (:key d2 :key c1 cc1 80) vl-sus-vib-marc (:key d2 :key cs1 cc1 80) vl-sfz-vib (:key d2 :key d1 cc1 80) vl-trem-sus-af-auto (:key d2 :key ds1 cc1 80) vl-trill-2 (:key d2 :key e1 cc1 80) vl-pon-sus (:key d2 :key f1 cc1 80) vl-pon-trem-fa-auto (:key d2 :key fs1 cc1 80) vl-harm-art-sus (:key d2 :key g1 cc1 80) vl-octav-gliss-fa (:key d2 :key gs1 cc1 80) vl-pizz-snap (:key d2 :key a1 cc1 80) :group pref-repetitions-combi vl-perf-rep-sl (:key ds2 :key c1) vl-perf-rep-por-me (:key ds2 :key cs1) vl-perf-rep-stac (:key ds2 :key d1) vl-perf-rep-spi (:key ds2 :key ds1) vl-perf-rep-harsh (:key ds2 :key e1) :group combi-cre9 vl-rep-cre9-por-fa-1 (:key e2 :key c1 cc1 10) vl-rep-cre9-por-fa-2 (:key e2 :key cs1 cc1 10) vl-rep-cre9-por-fa-3 (:key e2 :key d1 cc1 10) vl-rep-cre9-por-fa-4 (:key e2 :key ds1 cc1 10) vl-rep-cre9-por-fa-5 (:key e2 :key e1 cc1 10) vl-rep-cre9-por-fa-6 (:key e2 :key f1 cc1 10) vl-rep-cre9-por-fa-7 (:key e2 :key fs1 cc1 10) vl-rep-cre9-por-fa-8 (:key e2 :key g1 cc1 10) vl-rep-cre9-por-fa-9 (:key e2 :key gs1 cc1 10) vl-rep-cre9-sta-1 (:key e2 :key c1 cc1 25) vl-rep-cre9-sta-2 (:key e2 :key cs1 cc1 25) vl-rep-cre9-sta-3 (:key e2 :key d1 cc1 25) vl-rep-cre9-sta-4 (:key e2 :key ds1 cc1 25) vl-rep-cre9-sta-5 (:key e2 :key e1 cc1 25) vl-rep-cre9-sta-6 (:key e2 :key f1 cc1 25) vl-rep-cre9-sta-7 (:key e2 :key fs1 cc1 25) vl-rep-cre9-sta-8 (:key e2 :key g1 cc1 25) vl-rep-cre9-sta-9 (:key e2 :key gs1 cc1 25) vl-rep-cre9-spi-1 (:key e2 :key c1 cc1 70) vl-rep-cre9-spi-2 (:key e2 :key cs1 cc1 70) vl-rep-cre9-spi-3 (:key e2 :key d1 cc1 70) vl-rep-cre9-spi-4 (:key e2 :key ds1 cc1 70) vl-rep-cre9-spi-5 (:key e2 :key e1 cc1 70) vl-rep-cre9-spi-6 (:key e2 :key f1 cc1 70) vl-rep-cre9-spi-7 (:key e2 :key fs1 cc1 70) vl-rep-cre9-spi-8 (:key e2 :key g1 cc1 70) vl-rep-cre9-spi-9 (:key e2 :key gs1 cc1 70) vl-rep-cre9-harsh-1 (:key e2 :key c1 cc1 120) vl-rep-cre9-harsh-2 (:key e2 :key cs1 cc1 120) vl-rep-cre9-harsh-3 (:key e2 :key d1 cc1 120) vl-rep-cre9-harsh-4 (:key e2 :key ds1 cc1 120) vl-rep-cre9-harsh-5 (:key e2 :key e1 cc1 120) vl-rep-cre9-harsh-6 (:key e2 :key f1 cc1 120) vl-rep-cre9-harsh-7 (:key e2 :key fs1 cc1 120) vl-rep-cre9-harsh-8 (:key e2 :key g1 cc1 120) vl-rep-cre9-harsh-9 (:key e2 :key gs1 cc1 120) :group perf-harsh-combi vl-sus-vib-fa (:key f2 :key c1 cc1 5) vl-sus-vib-progr (:key f2 :key cs1 cc1 5) vl-pon-sus-fa (:key f2 :key d1 cc1 5) :group omn ord (:key c2 cc1 5) stacc (:key d2 :key c1 cc1 40) stacs (:key e2 :key c1 cc1 25) marc (:key c2 cc1 64) spicc (:key c2 cc1 120) leg (:key cs2 :key c1 cc1 40) tasto (:key cs2 :key cs1 cc1 40) leg+tasto (:key cs2 :key cs1 cc1 40) tasto+leg (:key cs2 :key cs1 cc1 40) vib+marc (:key d2 :key cs1 cc1 80) marc+vib (:key d2 :key cs1 cc1 80) deta (:key d2 :key c1 cc1 80) pizz (:key d2 :key a1 cc1 40) snap (:key d2 :key a1 cc1 80) trem (:key d2 :key ds1 cc1 40) tr1 (:key d2 :key e1 cc1 40) tr2 (:key d2 :key e1 cc1 80) stacc+ponte (:key d2 :key f1 cc1 40) ponte+stacc (:key d2 :key f1 cc1 40) ponte+trem (:key d2 :key fs1 cc1 40) trem+ponte (:key d2 :key fs1 cc1 40) ponte (:key d2 :key f1 cc1 80) ) :controllers (:group default-settings pitch 0 velocity-xf 2 volume 7 pan 10 expression 11 reverb-dry/wet 14 reverb-on/off 15 slot-xf 20 start-scaler 21 master-attack 22 master-release 23 master-filter 24 delay-scaler 25 tuning-scaler 26 humanize 27 velocity-xf-on-off 28 rsamp-on-off 29 dynamics-scaler 30 :group Pedal Ped 64 Sost-Ped 66 Una-Corda 67 :group matrix cc1 1 ) ) JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 19, 2019 Author Share Posted November 19, 2019 Thanks, Janusz ! Looks very clear ! I´ll try it. Best ! Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted November 19, 2019 Share Posted November 19, 2019 And if the :sound is 'gm then :program is the instrument name or an integer of the gm setup with :port set to nil. JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 19, 2019 Author Share Posted November 19, 2019 Thanks, Janusz This is handy when you want to use the simple sounds of computer motherboard. Best, Julio Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 20, 2019 Author Share Posted November 20, 2019 Dear Janusz, The articulation control work with the ps function (preview score) ? Or just in def-score ? In ps function I´m not getting the keyswitches to work. Everything worked fine, the channels, the port and it´s sending to the right place. Just no keyswitches. Best, Julio Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 20, 2019 Author Share Posted November 20, 2019 ;; MATERIAL (setf mat1 '((e d4 stacc gs4 stacc e5 stacc - - pizz a4 - pizz cs4 marc d4 -) (-s - - - gs4 leg e5 a4 pizz cs4 d4 ord) (-s - marc gs4 e5 stacc a4 cs4 d4 pizz - -) (s gs4 - - e5 - a4 cs4 d4 -) (-s d3 - - eb3 d3 - a3))) (setf violin1 (ambitus 'violin (pitch-transpose 12 mat1))) (setf violin2 (ambitus 'violin (gen-retrograde (pitch-transpose 7 mat1)))) (setf viola (ambitus 'viola (gen-rotate -3 (pitch-transpose -5 mat1)))) (setf violoncello (ambitus 'violoncello (gen-rotate 0 (pitch-transpose -12 mat1)))) (setf ts (get-time-signature violin1)) ;;--------------------------------------------------------- ;; SCORE and LAYOUT ;;--------------------------------------------------------- (def-score string-quartet (:title "String Quartet" :composer "acme" :copyright "test VSL artic" :key-signature 'chromatic :time-signature ts :tempo 100 :layout (string-quartet-layout 'violin1 'violin2 'viola 'violoncello)) (violin1 :omn violin1 :port 0 :channel 1 :sound 'vi-violin :program 0 :volume 100 :pan 44 :controllers (91 '(48)) ) (violin2 :omn violin2 :port 0 :channel 2 :sound 'vi-violin :program 0 :volume 100 :pan 54 :controllers (91 '(48)) ) (viola :omn viola :port 0 :channel 5 :sound 'vi-viola :program 0 :volume 90 :pan 74 :controllers (91 '(60)) ) (violoncello :omn violoncello :port 0 :channel 7 :sound 'vi-cello :program 0 :volume 90 :pan 84 :controllers (91 '(60)) ) ) (init-seed nil) My last unsuccessful try, with DEF-SCORE. Same as above: right channel, right port, right sounds, no keyswitches. Best, Julio Quote Link to comment Share on other sites More sharing options...
opmo Posted November 20, 2019 Share Posted November 20, 2019 Of course all depends on what Vienna Instrument present you are loading into the Vienna Ensember Pro app. On 11/20/2019 at 2:30 AM, JulioHerrlein said: The articulation control work with the ps function (preview score) ? Or just in DEF-SCORE ? With both. JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted November 23, 2019 Author Share Posted November 23, 2019 Finally I had success !! Thank you. My old .gig VSL have the keyswitches in the C1 octave, instead of C2. I had to edit the files you provided. Best, Julio opmo 1 Quote Link to comment Share on other sites More sharing options...
torstenanders Posted December 17, 2019 Share Posted December 17, 2019 Hi Julio, Could you perhaps share your final setup files for the old VSL instrument library with the community? Thanks! Best, Torsten JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted December 17, 2019 Author Share Posted December 17, 2019 Dear Torsten, Of course ! Here is the "vi-cello.lisp" file: (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; VIENNA INSTRUMENTS - CELLO (keyswitches) ;;;--------------------------------------------------------- ;; Patches, keyswitches and controllers change events. (def-sound-set vi-cello :programs (:group Perf-Legato perf-legato (:key c7) :group Perf-Marcato perf-marcato (:key cs7) :group Perf-Spiccato spiccato (:key d7) :group Short-Notes staccato (:key ds7 :key c1) detache-shot (:key ds7 :key cs1) detache-long (:key ds7 :key d1) :group Long-Notes sus-vib (:key e7 :key c1) sus-vib-marc (:key e7 :key cs1) sus-vib-espr (:key e7 :key d1) sus-vib-progr (:key e7 :key ds1) sus-down (:key e7 :key e1) sus-novib (:key e7 :key f1) :group Dynamic dyn-me-vib-2s (cc1 0 :key f7 :key c1 :key a0) dyn-me-vib-3s (cc1 0 :key f7 :key cs1 :key a0) dyn-me-vib-4s (cc1 0 :key f7 :key d1 :key a0) dyn-str-vib-2s (cc1 25 :key f7 :key c1 :key a0) dyn-str-vib-3s (cc1 25 :key f7 :key cs1 :key a0) dyn-str-vib-4s (cc1 25 :key f7 :key d1 :key a0) dyn-me-novib-2s (cc1 60 :key f7 :key c1 :key a0) dyn-me-novib-3s (cc1 60 :key f7 :key cs1 :key a0) dyn-me-novib-4s (cc1 60 :key f7 :key d1 :key a0) pfp-vib-2s (cc1 100 :key f7 :key c1 :key a0) pfp-vib-4s (cc1 100 :key f7 :key cs1 :key a0) fp-vib (cc1 127 :key f7 :key c1 :key a0) sfz-vib (cc1 127 :key f7 :key cs1 :key a0) sffz-vib (cc1 127 :key f7 :key d1 :key a0) :group Tremolo trem-sus (:key fs7 :key c1 :key a0) trem-sus-fA-auto (:key fs7 :key cs1 :key a0) trem-sus-dyn-2s (:key fs7 :key d1 :key a0) trem-sus-dyn-3s (:key fs7 :key ds1 :key a0) :group Trills trill-1 (cc1 0 :key g7 :key c1 :key a0) trill-1-dyn (cc1 0 :key g7 :key cs1 :key a0) trill-1-acc (cc1 0 :key g7 :key d1 :key a0) trill-1-acc-dyn (cc1 0 :key g7 :key ds1 :key a0) trill-2 (cc1 127 :key g7 :key c1 :key a0) trill-2-dyn (cc1 127 :key g7 :key cs1 :key a0) trill-2-acc (cc1 127 :key g7 :key d1 :key a0) trill-2-acc-dyn (cc1 127 :key g7 :key ds1 :key a0) :group Pizzicato pizzicato (cc1 0 :key gs7 :key c1) col-legno (cc1 0 :key gs7 :key cs1) pizz-secco (cc1 80 :key gs7 :key c1) pizz-snap (cc1 127 :key gs7 :key c1) :group Harmonic-Artificial harm-art-stac (:key a7 :key c1) harm-art-sus (:key a7 :key cs1) harm-art-perf-rep (:key a7 :key d1) :group Harmonic-Natural harm-nat-sus (:key as7 :key c1 :key a0) harm-nat-perf-rep (:key as7 :key cs1 :key a0) harm-nat-gliss (:key as7 :key d1 :key a0) :group Ponticello pon-staccato (cc1 0 :key b7 :key c1 :key a0) pon-sus (cc1 0 :key b7 :key cs1 :key a0) pon-sfz (cc1 0 :key b7 :key d1 :key a0) pon-trem (cc1 0 :key b7 :key ds1 :key a0) pon-perf-rep-leg (cc1 0 :key b7 :key e1 :key a0) pon-detache (cc1 127 :key b7 :key c1 :key a0) pon-sus-fA-auto (cc1 127 :key b7 :key cs1 :key a0) pon-sffz (cc1 127 :key b7 :key d1 :key a0) pon-trem-fA-auto (cc1 127 :key b7 :key ds1 :key a0) pon-perf-rep-dyn-leg (cc1 127 :key b7 :key e1 :key a0) :group Tasto tas-staccato (cc1 0 :key c8 :key c1 :key a0) tas-sus (cc1 0 :key c8 :key cs1 :key a0) tas-sfz (cc1 0 :key c8 :key d1 :key a0) tas-trem (cc1 0 :key c8 :key ds1 :key a0) tas-detache (cc1 127 :key c8 :key c1 :key a0) tas-sus-fA-auto (cc1 127 :key c8 :key cs1 :key a0) tas-trem-fA-auto (cc1 127 :key c8 :key ds1 :key a0) :group omn stacc (:key c1 :key c1 cc1 40) stacs (:key c1 :key c1 cc1 25) ord (:key eb1 cc1 5) portato (:key cs1 cc1 5) sfz (:key e1 :key e1 cc1 25) cres (:key f1 :key f1 cc1 25) marc (:key e1 cc1 64) spicc (:key c1 cc1 120) leg (:key d1 :key d1 cc1 40) tasto (:key cs2 :key cs1 cc1 40) leg+tasto (:key cs2 :key cs1 cc1 40) tasto+leg (:key cs2 :key cs1 cc1 40) vib+marc (:key d2 :key cs1 cc1 80) marc+vib (:key d2 :key cs1 cc1 80) deta (:key d2 :key c1 cc1 80) pizz (:key g1 :key g1 cc1 40) snap (:key d2 :key a1 cc1 80) trem (:key fs1 :key fs1 cc1 40) tr1 (:key d2 :key e1 cc1 40) tr2 (:key d2 :key e1 cc1 80) stacc+ponte (:key d2 :key f1 cc1 40) ponte+stacc (:key d2 :key f1 cc1 40) ponte+trem (:key d2 :key fs1 cc1 40) trem+ponte (:key d2 :key fs1 cc1 40) ponte (:key d2 :key f1 cc1 80) ) :controllers (:group Default-Settings Pitch 0 Velocity-XF 2 Volume 7 Pan 10 Expression 11 Reverb-Dry/Wet 14 Reverb-On/Off 15 Slot-XF 20 Start-Scaler 21 Master-Attack 22 Master-Release 23 Master-Filter 24 Delay-Scaler 25 Tuning-Scaler 26 Humanize 27 Velocity-XF-On-Off 28 Rsamp-On-Off 29 Dynamics-Scaler 30 :group Pedal Ped 64 Sost-Ped 66 Una-Corda 67 :group Matrix cc1 1 ) ) vi-viola.lisp (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; VIENNA INSTRUMENTS - VIOLIN ;;;--------------------------------------------------------- (def-sound-set vi-violin :programs (:group perf-universal vl-perf-sustain (:key c2 cc1 5) vl-perf-marcato (:key c2 cc1 64) vl-perf-spic (:key c2 cc1 120) :group perf-legato-all vl-perf-legato (:key cs2 :key c1 cc1 40) vl-perf-legato-sul (:key cs2 :key cs1 cc1 40) vl-perf-legato-zigane (:key cs2 :key d1 cc1 40) vl-perf-legato-vib-progr (:key cs2 :key ds1 cc1 40) vl-perf-portamento (:key cs2 :key c1 cc1 80) :group articulation-combi vl-staccato (:key d2 :key c1 cc1 40) vl-sus-vib (:key d2 :key cs1 cc1 40) vl-fp-vib (:key d2 :key d1 cc1 40) vl-trem-sus (:key d2 :key ds1 cc1 40) vl-trill-1 (:key d2 :key e1 cc1 40) vl-pon-staccato (:key d2 :key f1 cc1 40) vl-pon-trem (:key d2 :key fs1 cc1 40) vl-harm-art-stac (:key d2 :key g1 cc1 40) vl-octav-gliss-me (:key d2 :key gs1 cc1 40) vl-pizz (:key d2 :key a1 cc1 40) vl-detache-short (:key d2 :key c1 cc1 80) vl-sus-vib-marc (:key d2 :key cs1 cc1 80) vl-sfz-vib (:key d2 :key d1 cc1 80) vl-trem-sus-af-auto (:key d2 :key ds1 cc1 80) vl-trill-2 (:key d2 :key e1 cc1 80) vl-pon-sus (:key d2 :key f1 cc1 80) vl-pon-trem-fa-auto (:key d2 :key fs1 cc1 80) vl-harm-art-sus (:key d2 :key g1 cc1 80) vl-octav-gliss-fa (:key d2 :key gs1 cc1 80) vl-pizz-snap (:key d2 :key a1 cc1 80) :group pref-repetitions-combi vl-perf-rep-sl (:key ds2 :key c1) vl-perf-rep-por-me (:key ds2 :key cs1) vl-perf-rep-stac (:key ds2 :key d1) vl-perf-rep-spi (:key ds2 :key ds1) vl-perf-rep-harsh (:key ds2 :key e1) :group combi-cre9 vl-rep-cre9-por-fa-1 (:key e2 :key c1 cc1 10) vl-rep-cre9-por-fa-2 (:key e2 :key cs1 cc1 10) vl-rep-cre9-por-fa-3 (:key e2 :key d1 cc1 10) vl-rep-cre9-por-fa-4 (:key e2 :key ds1 cc1 10) vl-rep-cre9-por-fa-5 (:key e2 :key e1 cc1 10) vl-rep-cre9-por-fa-6 (:key e2 :key f1 cc1 10) vl-rep-cre9-por-fa-7 (:key e2 :key fs1 cc1 10) vl-rep-cre9-por-fa-8 (:key e2 :key g1 cc1 10) vl-rep-cre9-por-fa-9 (:key e2 :key gs1 cc1 10) vl-rep-cre9-sta-1 (:key e2 :key c1 cc1 25) vl-rep-cre9-sta-2 (:key e2 :key cs1 cc1 25) vl-rep-cre9-sta-3 (:key e2 :key d1 cc1 25) vl-rep-cre9-sta-4 (:key e2 :key ds1 cc1 25) vl-rep-cre9-sta-5 (:key e2 :key e1 cc1 25) vl-rep-cre9-sta-6 (:key e2 :key f1 cc1 25) vl-rep-cre9-sta-7 (:key e2 :key fs1 cc1 25) vl-rep-cre9-sta-8 (:key e2 :key g1 cc1 25) vl-rep-cre9-sta-9 (:key e2 :key gs1 cc1 25) vl-rep-cre9-spi-1 (:key e2 :key c1 cc1 70) vl-rep-cre9-spi-2 (:key e2 :key cs1 cc1 70) vl-rep-cre9-spi-3 (:key e2 :key d1 cc1 70) vl-rep-cre9-spi-4 (:key e2 :key ds1 cc1 70) vl-rep-cre9-spi-5 (:key e2 :key e1 cc1 70) vl-rep-cre9-spi-6 (:key e2 :key f1 cc1 70) vl-rep-cre9-spi-7 (:key e2 :key fs1 cc1 70) vl-rep-cre9-spi-8 (:key e2 :key g1 cc1 70) vl-rep-cre9-spi-9 (:key e2 :key gs1 cc1 70) vl-rep-cre9-harsh-1 (:key e2 :key c1 cc1 120) vl-rep-cre9-harsh-2 (:key e2 :key cs1 cc1 120) vl-rep-cre9-harsh-3 (:key e2 :key d1 cc1 120) vl-rep-cre9-harsh-4 (:key e2 :key ds1 cc1 120) vl-rep-cre9-harsh-5 (:key e2 :key e1 cc1 120) vl-rep-cre9-harsh-6 (:key e2 :key f1 cc1 120) vl-rep-cre9-harsh-7 (:key e2 :key fs1 cc1 120) vl-rep-cre9-harsh-8 (:key e2 :key g1 cc1 120) vl-rep-cre9-harsh-9 (:key e2 :key gs1 cc1 120) :group perf-harsh-combi vl-sus-vib-fa (:key f2 :key c1 cc1 5) vl-sus-vib-progr (:key f2 :key cs1 cc1 5) vl-pon-sus-fa (:key f2 :key d1 cc1 5) :group omn stacc (:key c1 :key c1 cc1 40) stacs (:key c1 :key c1 cc1 25) ord (:key eb1 cc1 5) portato (:key cs1 cc1 5) sfz (:key e1 :key e1 cc1 25) cres (:key f1 :key f1 cc1 25) marc (:key e1 cc1 64) spicc (:key c1 cc1 120) leg (:key d1 :key d1 cc1 40) tasto (:key cs2 :key cs1 cc1 40) leg+tasto (:key cs2 :key cs1 cc1 40) tasto+leg (:key cs2 :key cs1 cc1 40) vib+marc (:key d2 :key cs1 cc1 80) marc+vib (:key d2 :key cs1 cc1 80) deta (:key d2 :key c1 cc1 80) pizz (:key g1 :key g1 cc1 40) snap (:key d2 :key a1 cc1 80) trem (:key fs1 :key fs1 cc1 40) tr1 (:key d2 :key e1 cc1 40) tr2 (:key d2 :key e1 cc1 80) stacc+ponte (:key d2 :key f1 cc1 40) ponte+stacc (:key d2 :key f1 cc1 40) ponte+trem (:key d2 :key fs1 cc1 40) trem+ponte (:key d2 :key fs1 cc1 40) ponte (:key d2 :key f1 cc1 80) ) :controllers (:group default-settings pitch 0 velocity-xf 2 volume 7 pan 10 expression 11 reverb-dry/wet 14 reverb-on/off 15 slot-xf 20 start-scaler 21 master-attack 22 master-release 23 master-filter 24 delay-scaler 25 tuning-scaler 26 humanize 27 velocity-xf-on-off 28 rsamp-on-off 29 dynamics-scaler 30 :group Pedal Ped 64 Sost-Ped 66 Una-Corda 67 :group matrix cc1 1 ) ) vi-violin.lisp (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; VIENNA INSTRUMENTS - VIOLIN ;;;--------------------------------------------------------- (def-sound-set vi-violin :programs (:group perf-universal vl-perf-sustain (:key c2 cc1 5) vl-perf-marcato (:key c2 cc1 64) vl-perf-spic (:key c2 cc1 120) :group perf-legato-all vl-perf-legato (:key cs2 :key c1 cc1 40) vl-perf-legato-sul (:key cs2 :key cs1 cc1 40) vl-perf-legato-zigane (:key cs2 :key d1 cc1 40) vl-perf-legato-vib-progr (:key cs2 :key ds1 cc1 40) vl-perf-portamento (:key cs2 :key c1 cc1 80) :group articulation-combi vl-staccato (:key d2 :key c1 cc1 40) vl-sus-vib (:key d2 :key cs1 cc1 40) vl-fp-vib (:key d2 :key d1 cc1 40) vl-trem-sus (:key d2 :key ds1 cc1 40) vl-trill-1 (:key d2 :key e1 cc1 40) vl-pon-staccato (:key d2 :key f1 cc1 40) vl-pon-trem (:key d2 :key fs1 cc1 40) vl-harm-art-stac (:key d2 :key g1 cc1 40) vl-octav-gliss-me (:key d2 :key gs1 cc1 40) vl-pizz (:key d2 :key a1 cc1 40) vl-detache-short (:key d2 :key c1 cc1 80) vl-sus-vib-marc (:key d2 :key cs1 cc1 80) vl-sfz-vib (:key d2 :key d1 cc1 80) vl-trem-sus-af-auto (:key d2 :key ds1 cc1 80) vl-trill-2 (:key d2 :key e1 cc1 80) vl-pon-sus (:key d2 :key f1 cc1 80) vl-pon-trem-fa-auto (:key d2 :key fs1 cc1 80) vl-harm-art-sus (:key d2 :key g1 cc1 80) vl-octav-gliss-fa (:key d2 :key gs1 cc1 80) vl-pizz-snap (:key d2 :key a1 cc1 80) :group pref-repetitions-combi vl-perf-rep-sl (:key ds2 :key c1) vl-perf-rep-por-me (:key ds2 :key cs1) vl-perf-rep-stac (:key ds2 :key d1) vl-perf-rep-spi (:key ds2 :key ds1) vl-perf-rep-harsh (:key ds2 :key e1) :group combi-cre9 vl-rep-cre9-por-fa-1 (:key e2 :key c1 cc1 10) vl-rep-cre9-por-fa-2 (:key e2 :key cs1 cc1 10) vl-rep-cre9-por-fa-3 (:key e2 :key d1 cc1 10) vl-rep-cre9-por-fa-4 (:key e2 :key ds1 cc1 10) vl-rep-cre9-por-fa-5 (:key e2 :key e1 cc1 10) vl-rep-cre9-por-fa-6 (:key e2 :key f1 cc1 10) vl-rep-cre9-por-fa-7 (:key e2 :key fs1 cc1 10) vl-rep-cre9-por-fa-8 (:key e2 :key g1 cc1 10) vl-rep-cre9-por-fa-9 (:key e2 :key gs1 cc1 10) vl-rep-cre9-sta-1 (:key e2 :key c1 cc1 25) vl-rep-cre9-sta-2 (:key e2 :key cs1 cc1 25) vl-rep-cre9-sta-3 (:key e2 :key d1 cc1 25) vl-rep-cre9-sta-4 (:key e2 :key ds1 cc1 25) vl-rep-cre9-sta-5 (:key e2 :key e1 cc1 25) vl-rep-cre9-sta-6 (:key e2 :key f1 cc1 25) vl-rep-cre9-sta-7 (:key e2 :key fs1 cc1 25) vl-rep-cre9-sta-8 (:key e2 :key g1 cc1 25) vl-rep-cre9-sta-9 (:key e2 :key gs1 cc1 25) vl-rep-cre9-spi-1 (:key e2 :key c1 cc1 70) vl-rep-cre9-spi-2 (:key e2 :key cs1 cc1 70) vl-rep-cre9-spi-3 (:key e2 :key d1 cc1 70) vl-rep-cre9-spi-4 (:key e2 :key ds1 cc1 70) vl-rep-cre9-spi-5 (:key e2 :key e1 cc1 70) vl-rep-cre9-spi-6 (:key e2 :key f1 cc1 70) vl-rep-cre9-spi-7 (:key e2 :key fs1 cc1 70) vl-rep-cre9-spi-8 (:key e2 :key g1 cc1 70) vl-rep-cre9-spi-9 (:key e2 :key gs1 cc1 70) vl-rep-cre9-harsh-1 (:key e2 :key c1 cc1 120) vl-rep-cre9-harsh-2 (:key e2 :key cs1 cc1 120) vl-rep-cre9-harsh-3 (:key e2 :key d1 cc1 120) vl-rep-cre9-harsh-4 (:key e2 :key ds1 cc1 120) vl-rep-cre9-harsh-5 (:key e2 :key e1 cc1 120) vl-rep-cre9-harsh-6 (:key e2 :key f1 cc1 120) vl-rep-cre9-harsh-7 (:key e2 :key fs1 cc1 120) vl-rep-cre9-harsh-8 (:key e2 :key g1 cc1 120) vl-rep-cre9-harsh-9 (:key e2 :key gs1 cc1 120) :group perf-harsh-combi vl-sus-vib-fa (:key f2 :key c1 cc1 5) vl-sus-vib-progr (:key f2 :key cs1 cc1 5) vl-pon-sus-fa (:key f2 :key d1 cc1 5) :group omn stacc (:key c1 :key c1 cc1 40) stacs (:key c1 :key c1 cc1 25) ord (:key eb1 cc1 5) portato (:key cs1 cc1 5) sfz (:key e1 :key e1 cc1 25) cres (:key f1 :key f1 cc1 25) marc (:key e1 cc1 64) spicc (:key c1 cc1 120) leg (:key d1 :key d1 cc1 40) tasto (:key cs2 :key cs1 cc1 40) leg+tasto (:key cs2 :key cs1 cc1 40) tasto+leg (:key cs2 :key cs1 cc1 40) vib+marc (:key d2 :key cs1 cc1 80) marc+vib (:key d2 :key cs1 cc1 80) deta (:key d2 :key c1 cc1 80) pizz (:key g1 :key g1 cc1 40) snap (:key d2 :key a1 cc1 80) trem (:key fs1 :key fs1 cc1 40) tr1 (:key d2 :key e1 cc1 40) tr2 (:key d2 :key e1 cc1 80) stacc+ponte (:key d2 :key f1 cc1 40) ponte+stacc (:key d2 :key f1 cc1 40) ponte+trem (:key d2 :key fs1 cc1 40) trem+ponte (:key d2 :key fs1 cc1 40) ponte (:key d2 :key f1 cc1 80) ) :controllers (:group default-settings pitch 0 velocity-xf 2 volume 7 pan 10 expression 11 reverb-dry/wet 14 reverb-on/off 15 slot-xf 20 start-scaler 21 master-attack 22 master-release 23 master-filter 24 delay-scaler 25 tuning-scaler 26 humanize 27 velocity-xf-on-off 28 rsamp-on-off 29 dynamics-scaler 30 :group Pedal Ped 64 Sost-Ped 66 Una-Corda 67 :group matrix cc1 1 ) ) Put the three above in Opusmodus/Def-Soud-Sets Folder of your system. Put the archive below that I named "Custom_Instrument Set.lisp in Opusmodus/Def-Instrument_Sets (in-package :Opusmodus) ;;;--------------------------------------------------------- ;;; GM Instrument Set ;;;--------------------------------------------------------- (def-instrument-set gm :instruments (:group clefs :treble (:layout treble-layout :port nil :channel 2 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :alto (:layout alto-layout :port nil :channel 3 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :tenor (:layout tenor-layout :port nil :channel 4 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :bass (:layout bass-layout :port nil :channel 5 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :group Grand :grand (:layout grand-layout :port 0 :channel 1 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :group Wind :pic (:layout piccolo-layout :port nil :channel 6 :sound 'gm :program '(flute) :controllers nil :pan (pan -12) :volume 92) :fl (:layout flute-layout :port nil :channel 7 :sound 'gm :program '(flute) :controllers nil :pan (pan -12) :volume 92) :afl (:layout alto-flute-layout :port nil :channel 1 :sound 'gm :program '(flute) :controllers nil :pan (pan -12) :volume 92) :bfl (:layout bass-flute-layout :port nil :channel 1 :sound 'gm :program '(flute) :controllers nil :pan (pan -12) :volume 92) :ob (:layout oboe-layout :port nil :channel 8 :sound 'gm :program '(oboe) :controllers nil :pan (pan 12) :volume 92) :eh (:layout english-horn-layout :port nil :channel 8 :sound 'gm :program '(english-horn) :controllers nil :pan (pan 12) :volume 92) :oda (:layout oboe-d-amore-layout :port nil :channel 8 :sound 'gm :program '(oboe) :controllers nil :pan (pan 12) :volume 92) :cl (:layout clarinet-layout :port nil :channel 9 :sound 'gm :program '(clarinet) :controllers nil :pan (pan -12) :volume 92) :acl (:layout alto-clarinet-layout :port nil :channel 9 :sound 'gm :program '(clarinet) :controllers nil :pan (pan -12) :volume 92) :bcl (:layout bass-clarinet-layout :port nil :channel 9 :sound 'gm :program '(clarinet) :controllers nil :pan (pan -12) :volume 92) :bn (:layout bassoon-layout :port nil :channel 11 :sound 'gm :program '(bassoon) :controllers nil :pan (pan 12) :volume 92) :cbn (:layout contrabassoon-layout :port nil :channel 11 :sound 'gm :program '(bassoon) :controllers nil :pan (pan 12) :volume 92) :ssax (:layout soprano-sax-layout :port nil :channel 13 :sound 'gm :program '(soprano-sax) :controllers nil :pan (pan -25) :volume 92) :asax (:layout alto-sax-layout :port nil :channel 14 :sound 'gm :program '(alto-sax) :controllers nil :pan (pan -25) :volume 92) :tsax (:layout tenor-sax-layout :port nil :channel 15 :sound 'gm :program '(tenor-sax) :controllers nil :pan (pan -25) :volume 92) :bsax (:layout baritone-sax-layout :port nil :channel 16 :sound 'gm :program '(baritone-sax) :controllers nil :pan (pan -25) :volume 92) :group Brass :tpt (:layout trumpet-layout :port nil :channel 12 :sound 'gm :program '(trumpet) :controllers nil :pan (pan -12) :volume 92) :hn (:layout horn-layout :port nil :channel 13 :sound 'gm :program '(french-horn) :controllers nil :pan (pan -25) :volume 92) :tbn (:layout trombone-layout :port nil :channel 14 :sound 'gm :program '(trombone) :controllers nil :pan (pan 12) :volume 92) :tba (:layout tuba-layout :port nil :channel 15 :sound 'gm :program '(tuba) :controllers nil :pan (pan 25) :volume 92) :group Strings :vn (:layout violin-layout :port nil :channel 2 :sound 'gm :program '(violin) :controllers nil :pan (pan -30) :volume 92) :vn1 (:layout violin-layout :port nil :channel 2 :sound 'gm :program '(violin) :controllers nil :pan (pan -30) :volume 92) :vn2 (:layout violin-layout :port nil :channel 3 :sound 'gm :program '(violin) :controllers nil :pan (pan -10) :volume 92) :va (:layout viola-layout :port nil :channel 4 :sound 'gm :program '(viola) :controllers nil :pan (pan 10) :volume 92) :vc (:layout violoncello-layout :port nil :channel 5 :sound 'gm :program '(cello) :controllers nil :pan (pan 30) :volume 92) :cb (:layout contrabass-layout :port nil :channel 5 :sound 'gm :program '(Acoustic-Bass) :controllers nil :pan (pan 30) :volume 92) :group Wind-Ensemble :w3 (:layout wind-trio-layout :port nil :channel '(2 3 4) :sound 'gm :program '(flute oboe bassoon) :controllers nil :pan (pan '(-12 0 12)) :volume 92) :w4 (:layout wind-quartet-layout :port nil :channel '(2 3 4 5) :sound 'gm :program '(flute oboe clarinet bassoon) :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) :w5 (:layout wind-quintet-layout :port nil :channel '(2 3 4 5 6) :sound 'gm :program '(flute oboe clarinet french-horn bassoon) :controllers nil :pan (pan '(-12 12 -15 -25 20)) :volume 92) :group Brass-Ensemble :b3 (:layout brass-trio-layout :port nil :channel '(7 8 9) :sound 'gm :program '(trumpet trombone tuba) :controllers nil :pan (pan '(-12 0 12)) :volume 92) :b4 (:layout brass-quartet-layout :port nil :channel '(7 8 9 11) :sound 'gm :program '(trumpet 'trumpet 'trombone 'tuba) :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) :b5 (:layout brass-quintet-layout :port nil :channel '(7 8 9 11 12) :sound 'gm :program '(trumpet trumpet french-horn trombone tuba) :controllers nil :pan (pan '(-25 -12 0 12 25)) :volume 92) :group Piano :p (:layout piano-layout :port 0 :channel 1 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :pg (:layout piano-grand-layout :port nil :channel 1 :sound 'gm :program 0 :controllers nil :pan (pan 15) :volume 92) :p1 (:layout piano-layout :port nil :channel 1 :sound 'gm :program 0 :controllers nil :pan (pan -15) :volume 92) :p2 (:layout piano-layout :port nil :channel 2 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :p3 (:layout piano-layout :port nil :channel 3 :sound 'gm :program 0 :controllers nil :pan (pan 15) :volume 92) :group String-Ensemble :s3 (:layout string-trio-layout :port nil :channel '(13 14 15) :sound 'gm :program '(violin viola cello) :controllers nil :pan (pan '(-12 0 12)) :volume 92) ;;;STRING QUARTET LAYOUT - PORT 0 :sq (:layout string-quartet-layout :port 0 :channel '(1 2 5 7) :sound '(vi-violin vi-violin vi-viola vi-cello) :program 0 :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) :sq2 (:layout string-quartet-layout :port 0 :channel '(1 2 5 7) :sound 'gm :program '(violin violin viola cello) :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) :group Choir :satb (:layout choir-satb-layout :port nil :channel '(13 14 15 16) :sound 'gm :program '(Choir-Aahs) :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) :group Rhythm :rhy (:layout rhythm-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :group drum-set :ds-bd (:layout dk-bass-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 0) :volume 92) :ds-sd (:layout dk-snare-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 10) :volume 92) :ds-lt (:layout dk-low-tom-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan -15) :volume 92) :ds-mt (:layout dk-mid-tom-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan -8) :volume 92) :ds-ht (:layout dk-high-tom-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 15) :volume 92) :ds-hh (:layout dk-hihat-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 25) :volume 92) :ds-cc (:layout dk-crash-cymbal-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 20) :volume 92) :ds-rc (:layout dk-ride-cymbal-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan -40) :volume 92) :ds-chc (:layout dk-china-cymbal-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan -30) :volume 92) :ds-sc (:layout dk-splash-cymbal-layout :port nil :channel 10 :sound 'gm :program 0 :controllers nil :pan (pan 30) :volume 92) ) ) If you are lucky enough, this should work... ;; SOME MATERIAL (setf mat1 '((s c4 pp stacc d4 stacc e4 leg f4) (s c4 mp d4 sfz marc e4 leg f4) (s c4 pppp leg d4 e4 leg f4))) (ps 'gm :sq (list (pitch-transpose 11 mat1)(pitch-retrograde (pitch-transpose 7 mat1)) (pitch-transpose -5 mat1) (pitch-retrograde (pitch-transpose -10 mat1))) :key-signature 'atonal :time-signature '(2 4 1) :tempo 80 :title "STR4tetVSL" :display :window) According to the user defined setup file, the String Quartet :sq will play On 12/17/2019 at 9:18 PM, JulioHerrlein said: ;;;STRING QUARTET LAYOUT - PORT 0 :sq (:layout string-quartet-layout :port 0 :channel '(1 2 5 7) :sound '(vi-violin vi-violin vi-viola vi-cello) :program 0 :controllers nil :pan (pan '(-30 -10 10 30)) :volume 92) exactly on channels 1 (VL1) 2 (VL2) 5 (VLA) 7 (CELLO). Good Luck ! Best ! Julio Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted September 16, 2020 Author Share Posted September 16, 2020 Dear Friends, I´m getting this error at opusmodus opening. IN conjunction with this, my PS functionality is not working as before. Preview score is not calling the right midi out port to my DAW. With the def score I can use it but keyswithches go wrong... My midi destinations: ((0 . "Session 1")) Session 1 is MIDI via Wifi (used to work before, when I was at El Capitan). I dont know what is this. There is also this warning at start: Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted September 16, 2020 Author Share Posted September 16, 2020 HEMLOCK Resolved ! Right Folder... Dear Janusz, I don´t know in what folder I must put the file Load CLM Instruments.lisp you mentioned here: and here: Thanks in advance ! Best, Julio FOUND !! ~/Opusmodus/Extensions/“ directory. Quote Link to comment Share on other sites More sharing options...
JulioHerrlein Posted September 16, 2020 Author Share Posted September 16, 2020 I get rid of the errors but for some reason my articulations wont change anymore... Quote Link to comment Share on other sites More sharing options...
opmo Posted September 17, 2020 Share Posted September 17, 2020 Quote I get rid of the errors but for some reason my articulations wont change anymore... Check the sound-set name of the articulation and the program. JulioHerrlein 1 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.