Jump to content

opmo

Administrators
  • Posts

    2,894
  • Joined

  • Last visited

Everything posted by opmo

  1. The display of the two examples is correct. The Ped is a default controller and can't be overwritten. How to use controllers as program changes please check the "VSL Cello Solo" file.
  2. The controllers you are using in the program are missing: :group Matrix cc1 1 cc20 20 cc21 21 cc22 22 This should fix the problem.
  3. Thank you Jamil, I am sure many users will find the presets useful indeed.
  4. Done. The legato (leg) attribute duration is extended with 1/256 value, this will produce tiny overlap. 1.2.23108 Janusz
  5. In 1.2.23106 I made few correction to the accents relative duration. Only stacc and stacs is a bit shorter now, all other accents will not change the midi duration. Janusz
  6. Thank you Yuichi for sharing, great piece, I am very happy to see Opusmodus is able to help you realise your ideas.
  7. Interesting proposition. I am in a country for a few days, back in my studio next week.
  8. The function you are looking for is GEN-DIVIDE
  9. PATTERN-MAP (pattern-map '((1 0) 2) (gen-binary-euclidean 1 14 8 8)) => (2 1 2 2 2 1 2 2)
  10. The best way is to print the graph is to print directly form the graph panel. Gen your graph then click on the graph panel and command print, this way you will get high resolution print. Or save the file as pdf file (the default is .pdf): (length-list-plot (vector-to-length 8 8 -8 (gen-white-noise 100)) :file "vector-length")
  11. as well: (find-unique (sort-asc (combination 3 (pcs '6-1))))
  12. Few QUANTIZE examples: (setf val1 (gen-white-noise 19 :seed 56)) => (0.42731586 0.21048035 0.14944322 0.05199222 0.33933866 0.8851649 0.93565786 0.93476516 0.3839242 0.03127964 0.39819628 0.18478736 0.9568939 0.6663358 0.26542348 0.4052874 0.68264747 0.95090246 0.12790146) (quantize val1 '(3 5 7)) => (7h. 7q 7q 7q 7q_3q 3h_t e. t_e.. t_s t s. t t_5w 5q_e s s_5q 5h. 5q_e. s) (setf val2 (gen-white-noise 19 :scale 2.2 :seed 875)) => (0.5896695 1.3854954 1.7601246 0.15660097 1.0577743 2.005573 0.8151905 0.83697665 0.17089269 1.5035293 0.97181803 0.54288834 1.810276 1.551678 2.1626956 0.7790575 1.5867842 1.6030518 1.3905888) (quantize val2 '(3 5 7)) => (e e_e.. t_q_7wq 7q 7q_e.. t_q_e.. t_3h 3q_e s s_q_e e_s e s_q_e e_q_s e._q_e e_5q 5w_e e_q_e e_q) (setf val3 (vector-range -1.0 1.0 (gen-white-noise 19 :seed 154))) => (-0.24158841 -0.9634026 -0.99552864 -0.4178778 0.9713292 -0.58351946 -0.77635634 0.532539 0.4349326 -0.85446167 -0.9610649 -0.9799211 1.000001 -0.4322123 0.3123653 -1.0 0.74611676 0.66992795 -0.034718752) (quantize val3 '(3 5 7)) => (-3q -3h -3q -3h -3q -3q 3q_e -e -7q -7wq 7q_3q 3q -3q -3h -3q -e -e -e e_e -e -s s -e -e e_e e) Best wishes, J
  13. Achim Bornhoeft and I we had a brain storming session on quantisation here in Venice for two days. The code will be ready for testing in few days. The holidays might delay the release a bit. The test are already very promising :-)
  14. Could you explain a bit more what you are looking for.
  15. (setf g-tonality (tonality-series '( (0 3 5 7 10)) :map '(step) :root '(8 11 4 7 0 4 11 4 7 0 3 8 0 7 0 4 11 4 8 3 8 0 7 0 8 3)))
  16. This will save a PNG file in the Opusmodus/Graphs folder: (setf length '(q e = s = = = -q e - = s = = -e.) pitch '(c4 cs5 d4 ds5 e4 f5 fs4 g5 gs4 a5 as4 b5)) (length-pitch-list-plot length pitch :file "length-pitch-plot.png") As for the piano roll you will need to create a screenshot with cmd/shift/4.
  17. of course: (pcs '3-11b) => (0 4 7) INTERVAL-CLASS: (interval-class '(0 1 2 11 10 9 5 4 3 6 7 8)) => (1 1 3 1 1 4 1 1 3 1 1) (interval-class '(0 1 3 8 4 9 10 7 6 5 11 2)) => (1 2 5 4 5 1 3 1 1 6 3) (interval-class '(0 11 5 7 6 1 3 4 2 9 8 10)) => (1 6 2 1 5 2 1 2 5 1 2)
×
×
  • Create New...

Important Information

Terms of Use Privacy Policy