Jump to content


  • Content Count

  • Joined

  • Last visited

About EAIP

  • Rank
    Advance Member

Contact Methods

Profile Information

  • Gender
  • Location

Recent Profile Visitors

2,614 profile views
  1. The result when sorting ascending on top note would in the above case be: '(a2a3 a2e4 d4e4 c3f4 f4cs4 a2a4) When the top note is the same, the bottom note decides. Another example: ; sorting on bottom note ; '(g2g3 g2d4 g2g4 a2a3 a2e4 a2a4) ; sorting on top note ; '(g2g3 a2a3 g2d4 a2e4 g2g4 a2a4)
  2. Is there built-in functionality to sort a chord-progression using the top note? The following example uses the bottom note: (sort-asc '(a2a3 a2a4 a2e4))
  3. Thanks, this will work for my purposes. Kind regards, Erik
  4. Hi, I am working on a table for harmonics on the theorbo. Is there a way to mark strings with numbers higher than 5? Or perhaps a way to add your custom roman numeral? By the way, I am still on 1.2.23260, maybe there are more options in 1.3 regarding custom markings? Kind Regards, Erik
  5. Thanks Janusz, this was exactly was what I was wishing for, really useful I think!
  6. Thanks for the patience and clarification Janusz, and thanks also to Lasse for the useful lisp function.
  7. Yes, of course, but in terms of workflow it isn't very practical, I think you would like to keep things separated when trying out individual lines of a score. Is there a way of somehow getting the seed or random state used under the hood when not providing one yourself? (Sorry about the typo, I meant to write Cmd + 3 in the code example, as in "OMN notation")
  8. Also you can't use the method above for a single line if you want to evaluate OMN Notation (cmd + 3 or ctrl + cmd + N) at the same time (or at least I don't know how to do that). (setf seed (rnd-range 1 999999)) (init-seed seed) (setf pitch (rnd-sample 5 '(c4 e4 g4 b4))) ; Select all then Evaluate and Notation (ctrl + 3) => Error: The value 793536 is not of the expected type list.
  9. Yes, I know about init-seed, it's great for setting the overall seed in a complete score context, I guess you mean something like this: (setf seed (rnd-range 1 999999)) (init-seed seed) (setf pitch (rnd-sample 5 '(c4 e4 g4 b4))) (setf len (rnd-sample 5 '(s e))) (setf phrase (make-omn :pitch pitch :length len )) (def-score flute ( :key-signature 'chromatic :time-signature '(4 4) :tempo 112 :layout (flute-layout 'flt) ) (flt :omn phrase :channel 1 :sound 'gm :program 'flute ) ) If you are happy with the result you can then evaluate the seed variable and paste the posted number into the :seed keyword in one or both of the forms including random functions and thus achieve locking one or several parameters. However, if you just want to evaluate for example the 3rd line over and over again untill you find a pitch line you like, this is quite a cumbersome method. It would be great to somehow get a report of the current internal state of a single random function, or at least be able to after evaluation get the current random state or seed used. Perhaps I'm misunderstanding something crucial regarding the way the seed functionality is implemented in OM.
  10. Here is a suggestion for posting the random seed value used by a function. When using Open Music way back in time I remember that you could "lock" a random function if you liked the result, which IMO was a great workflow feature. Perhaps a similar thing could be achived in Opusmodus if the random seed used for a function was posted to the post window in addition to the result of the evaluation. If you like the result of a particular seed you could then manually "lock" the randomization using the :seed keyword for the function: ; first try different randomizations (setf bin-rhythm (gen-binary-rnd 5 5 2 1)) => gen-binary-rnd :seed 752 (setf bin-rhythm (gen-binary-rnd 5 5 2 1)) => gen-binary-rnd :seed 234 ; then lock seed if you like the result (setf bin-rhythm (gen-binary-rnd 5 5 2 1) :seed 234) Perhaps if possible also with the variable name as a label to keep track of things when using several random functions in complex code: (setf bin-rhythm (gen-binary-rnd 5 5 2 1)) => bin-rhytm gen-binary-rnd :seed 37 I think that this or a similar approach would be a really powerful way of trying different results when working with randomization in Opusmodus.
  11. EAIP


  12. Hi, I was wondering how to get an octave treble clef and the correct transposing notation when writing for guitar. At the moment my def-score look like this: (def-score Crossing_Waves (:key-signature 'chromatic :time-signature timesigs :tempo 72 :layout (guitar-layout 'inst)) (inst :length lengths :pitch pitches :velocity dynamics :channel 1 :sound 'gm :sound 'acoustic-guitar-nylon) Notation is in treble clef in one system as it should, but as sounding pitch without the 8 under the treble clef. Kind Regards, Erik
  13. Sorry about the noise, I've solved the problem! Kind Regards, Erik
  14. Hello, I recently upgraded to Sierra, and somehow the default playback mechanism stopped working. When trying some basic examples in OM there is no sound. Any suggestions as to where to begin troubleshooting? I'm on Version 1.2.22101M. Kind Regards, Erik
  • Create New...