Jump to content

NagyMusic

Members
  • Posts

    99
  • Joined

  • Last visited

Contact Methods

Profile Information

  • Gender
    Male
  • Location
    United States

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. What is the main difference between pitch-repeat2 and pitch-repeat3 functions? I'm testing various examples and notice that the first two parameters in pitch-repeat2 are low and high integers; in pitch-repeat3 there's only one parameter, count, which can be expressed as a single digit or a list. When the count is represented as a list, it produces a similar output of randomized high and low counts, similar to pitch-repeat2. Any other comparison observations or differences between these two functions? Thank you!
  2. David, The score should play back just fine through default GM. I attached the revised score that compiles with no errors on my end. Zvony PlutonV1-02.opmo
  3. Fantastic piece, Stephane! I tried compiling it, and the omn-articulation-processor function produces an error. Would you happen to know why? Thanks a lot! Zvony
  4. I'm studying the pitch-segment-variant and noticing when the :segment argument includes a list, it doesn't seem to generate but the number of segments represented by the first digit in the list. (setf bach (attribute-series '(leg 8) '((s g2 d3 b3 a3 b3 d3 b3 d3) (g2 d3 b3 a3 b3 d3 b3 d3)))) (pitch-segment-variant bach :size '((20) (30) (40) (100)) :segment '(1 2) :position '? :variant '? :transpose '((0) (6)) :initial t) => ((s g2 leg d3 leg b3 leg a3 leg b3 leg d3 leg b3 leg d3) (s a3 leg b3 leg) (s g2 leg d3 leg b3 leg a3 leg b3 leg d3 leg b3 leg d3) (s f4 leg f4 leg)) However, when the :segment argument calls for the same number of segments, those are generated correctly: (pitch-segment-variant bach :size '((20) (30) (40) (100)) :segment '(2) :position '? :variant '? :transpose '((0) (6)) :initial t) => ((s g2 leg d3 leg b3 leg a3 leg b3 leg d3 leg b3 leg d3) (s d3 leg b3 leg) (s b3 leg a3 leg) (s g2 leg d3 leg b3 leg a3 leg b3 leg d3 leg b3 leg d3) (s f4 leg f4 leg) (s gs3 leg f4 leg)) I expected the :segment '(1 2) [randomly] to alternate between 1 and 2 segments. Could anyone explain why that is not the case? Thank you!
  5. A quick comment on my post earlier post. When using the attribute-series function, the last dyad is not omitted, and the ped marking is attached and displayed correctly if there's a rest in the last measure. However, when there's no rest at the end of the last measure, the ped marking is not attached. (setf mat '((q c4 e3e4) (q g3 c3c4 h e4) (q c4 g4 e4e5))) (attribute-series '((- 1) (ped 2) (ped 4) (ped 2)) mat) => ((q c4 mf e3e4 ped) (q g3 c3c4 ped h e4 ped) (q c4 ped g4 e4e5)) (setf mat.r '((q c4 e3e4) (q g3 c3c4 h e4) (q c4 g4 e4e5 -q))) (attribute-series '((- 1) (ped 2) (ped 4) (ped 2)) mat.r) => ((q c4 mf e3e4 ped) (q g3 c3c4 ped h e4 ped) (q c4 ped g4 e4e5 ped -))
  6. There appears to be an issue in omitting dyads (chords) in the notation viewer when attaching attribute 'ped, as in this example: '((q c4 e3e4 ped) (q g3 c3c4 ped h e4 ped) (q c4 ped g4 e4e5 ped)) Similar issues occur when using the attribute-series function: (setf mat '((q c4 e3e4) (q g3 c3c4 h e4) (q c4 g4 e4e5))) (attribute-series '((- 1) (ped 2) (ped 4) (ped 1)) mat)
  7. Thanks, Erka. So using get-count, my above example would produce the same result as mapcar: (get-count '((c4 d4 e4) (f4 g4) (a4) (b4 c5)) :length :note)
  8. I was able to attach the pedal to every measure: (setf mat '((q c4 e3e4) (q g3 c3c4 h e4) (q c4 g4 e4e5))) (setf counts-notes (get-count (omn :pitch mat))) (setf att (gen-repeat (length counts-notes) '(ped))) (setf ped-series (mclist att counts-notes)) (setf mat-ped (attribute-series ped-series mat)) I still can't figure out how to filter the particular notes (only two-note octaves - chords?) I want to attach the attribute too. Thanks again!
  9. What directory should one place a custom-made def-instrument-set lisp file in? Thanks!
  10. I have two brief examples taken from a piano piece. In the first one, I'd like to attach the piano pedal marking on every octave, hold it and reattach at the next octave. (setf ex1 '((-q a2a1 a2a1) (-q a3a2) (-wq q b2b1) (-wq q b2b1) (-q a2a1 - g3g2) (-q f3f2 a2a1) (q f3f2) (q f2f1) (-wq q f3f2) (-q g2g1) (-q g2g1 - g2g1) (-q f2f1 e3e2) (-q f2f1 d3d2) (-w q d3d2))) In the second, I'd like to attach the piano pedal on every octave - not single pitches - and hold it until the next octave appears, and reattach it again. (setf ex2 '((-q) (q g4 mp -) (q a4 mp - a4a3) (q cs4 mp - cs4cs3 -) (q f4 mp - f4f3) (q f4 mp - f4f3 -) (q e4 mp - e4 - e4) (-q) (q d4 mp - d4 -) (q e4 mp - e4e3) (q fs4 mp -) (q b4 mp - b4b3) (q b4 mp - b4 -) (q g4 mp - g4g3))) Would anyone be willing to show me how to do that? Many thanks!
  11. Great piece! I understand that the dictum function replaced omn-dictum. Just curious how to rewrite the code by replacing the omn-dictum with the updated dictum function? Thank you!
  12. Is there an Opusmodus function that counts the number of items in each sublist? '((c4 d4 e4) (f4 g4) (a4) (b4 c5)) => (3 2 1 2) Thanks!
  13. Thanks so much, Stephane! This is very helpful.
×
×
  • Create New...

Important Information

Terms of Use Privacy Policy