JulioHerrlein

Thanks a lot ! Best !

Dear All, Sometimes you are working on a very cluttered file with many setf variables that you need to evalate before starting. Is there a way to put a shortcut inside and .opmo score to evaluate a set of code in a different .opmo score, without having to move to the other document to evaluate it ? Best, Julio

Thanks, Janusz This could implemented as a native function, like FILTER-SET A general function to filter sets out of sets. Best, Julio

Hey, people ! I´m doing a function to extract the complementary set of notes. For example: 1) Specify a set of notes, like a chord, Dm7 (setf note-list '(d5 f5 a5 c6)) Specify a tonality, like Cmajor or D dorian (same notes) (expand-tonality '(c5 major)) Now, I want a function that gives me all the other available notes from the mode, except the chord tones (the first set of notes). So, this function gives me exactly what I need (for ONE tonality at a time and ONE chord at a time): (let ((rem (expand-tonality '(c5 major))) (super (ambitus '(c5 b5) note-list))) (loop for i in super do (setf rem (remove i rem)) finally (return rem))) Ok, this give me the right result, I.E., the complementary set of notes of C major in relation to Dm7 => (e5 g5 b5) The question is simple: How can I do it for a list with many tonalities and many chords. How to do this recursively in nested lists, like (setf note-list '((d5 f5 a5 c6)(eb4 gb4 bb4 db4)(fs4 as4 cs4))) to sucessive tonalities, like: (expand-tonality '((c5 major) (db4 major) (gb4 major))) Since this WON´T work (let ((rem (ambitus '(c5 b5) (expand-tonality '((c5 major) (db5 major) (gb5 major))))) (super (ambitus '(c5 b5) '((d5 f5 a5 c6)(eb4 gb4 bb4 db4)(fs4 as4 cs4))))) (loop for i in super do (setf rem (remove i rem)) finally (return rem))) The expected result, if the above worked would be: ((e5 g5 b5) (f5 ab5 c5) (gs4 cb5 ds5)) Thanks in advance !! Best ! Julio

Thanks a lot, Stephane ! This is interesting for getting lists ordered ! Best ! Julio

Thanks a lot, Stephane ! I just get vaccinated yesterday ! Very happy ! All the best ! Julio

Dear Friends, I think a good companion to the gen-divide option to count rests would be a function that counts the positive rhythm items (the positive value attacks, excluding the pauses). It would be great to calculate the size and to align rhythms and its groupings for later span processing of lists related to pitches (or any other use you might think). Is there already a function like this: GET-COUNT-ATTACKS (get-count-attacks '((1/8 7/8) (1/8 7/8) (1/4 1/12 1/12 1/12 3/16 5/16) (-3/8 1/8 1/4 -1/8 1/8))) would return: (2)(2)(7)(3) or maybe (2 2 7 3) in flatten version Best, Julio I think (get-count omnseq :length :note) do the job... Best

Thanks a lot, Janusz !

A.S. Mailbox (three serial miniatures for string quartet) dur: circa 4´30 Composer: Julio HERRLEIN Porto Alegre - Jun/2021 I. Email from Anton II. [SPAM] Re: Hauer III. Letter from Alban A.S. (Arnold Schoenberg) Mailbox are a set of three miniatures for string quartet using 12-tone serial techniques and parametric composition processes. The idea is a imaginary mailbox of Schoenberg dialogues with his main disciples Webern and Berg, and also Hauer, his rival in the creation of a 12-tone composition method. All the pieces are (loosely) based in the same all interval 12-tone row: c4 eb4 a4 db4 b4 ab4 g4 d4 e4 f4 bb4 gb4 PERFORMANCE NOTE: The score and parts accidentals favor the FLATS (b) for easier enharmonic reading. Some of the uses of the tone row are also related to the rhythmic span of the orchestration and the algorithmic method for spreading the tones through the lisp lists in the Opusmodus software. The first miniature “Email from Anton” are inspired by the pointilistic textures used by Webern in his op. 28. In a later section, the textures are intensified by melodic figures and tremolos across the instruments of the quartet. The second miniature “[SPAM] Re: Hauer” is an imaginary email from Hauer (lost in “Arnie´s” spam box…) where he shows to A.S. his klangreihen method (as actually described by Dominik SEDIVÝ, 2011, pp. 25-30) to harmonize and make a smooth parsimonious voice-leading of a 12-tone row. The last piece “Letter from Alban” set up some 6-attack melodic motifs based on the hexachords of the basic row, combined with rhythmic ostinato textures of accompaniment and sweet chords derived from retrograde version of the row. All the best !! Thanks to everyone in this forum who have patience with me ! Julio Herrlein, 2021/JUNE

Just installed the last file with NO PROBLEMS at all ! Thanks !

I had the same problem in EL CAPITAN 10.11 TRY THIS: 1) Download 2) Copy to a desktop folder like "Opusmodus_22" 3) unzip inside this folder 4) Right-Click Copy "opusmodus.app" 5) Go to applications folder in finder 6) Right-click paste opusmodus 7) Choose "replace" the old opusmodus 8.) THIS IS THE THING DID NOT HAPPENED BEFORE: OSX ask for your admin password. For some reason it did not asked before... Probably this was causing the permission problems... It´s very important that OSX ask your admin password !! 8.) After pasting it to applications folder, delete the de.iproj folder inside resources 9) empty the trash 10) Right-click OPEN over opusmodus 11) Put the serial 12) DONE !

Dear Stephane, Thanks ! Hope you stay well and healthy ! Congrats for the music ! Best, Julio

Yes, I will. Just checking if somebody already did. Thanks !

Dear Friends, Is there any templates for Garritan Jazz and Big Band 3 ? Some lisp files with correct keyswitches for this ? Best, Julio

Thanks !! Best ! But, NESTUP is cool/fun and works in real time. OpenMusic is kinda laggy stuff

INSPIRING IDEA FOR RHYTHM (Nested Tuplets) Nestup [[]_[]] NESTUP.CUTELAB.NYC Nestup, a Language for Musical Rhythms

Beautiful !

One remark, It´s important, in the midi export, to filter things by TRACK and not only BY instrument. The only reason I need midi files is to take the articulation keyswitches. A string quartet midi file opens in Musescore like four piano staves. The upper stave are the notes and the lower are the keyswitches. I just delete the treble clef notes and get the bass clef keyswitches to paste onto my xml version of the same snippet / score, etc. I have a blank template with the staves for voices and staves for keyswitches. I paste the keyswitches slightly earlier (like a 64th or 32nd note earlier) to activate the keyswitches before the note attacks. It´s kind of weird and labourious but the playback is magnific and worth the effort. So, something like this would be cool (musicxml-to-editor :track (2 4 6 8)) Even cooler with an option of playing a little earlier (like a 64th note earlier (musicxml-to-editor :track (2 4 6 8) :offset -1/64) Best ! Julio

Very nice idea, Daniel !! Nice to see more people from Brasil, here ! (specially a student from our University !! ) All the best ! Julio

Thanks, Janusz ! Best, Julio

Dear All, How can I get controlled seeds in a expression like this? (let ((r-lis nil)) (dotimes (i 4) (push (rnd-unique 5 '(1 2 3 4 5)) r-lis)) r-lis) This will result four different seeds (one for each loop iteration), like this: rnd-unique :seed 361914 rnd-unique :seed 275956 rnd-unique :seed 883737 rnd-unique :seed 46981 ((3 1 4 5 2) (4 2 1 5 3) (2 5 4 1 3) (1 3 5 4 2)) And this will result the same seed for all four iterations: (let ((r-lis nil)) (dotimes (i 4) (push (rnd-unique 5 '(1 2 3 4 5):seed 1) r-lis)) r-lis) Like this: rnd-unique :seed 1 rnd-unique :seed 1 rnd-unique :seed 1 rnd-unique :seed 1 ((3 1 5 4 2) (3 1 5 4 2) (3 1 5 4 2) (3 1 5 4 2)) How to make it with a specific seed chosen for each loop iteration? THIS WON´T WORK... (let ((r-lis nil)) (dotimes (i 4) (push (rnd-unique 5 '(1 2 3 4 5):seed '(1 23 467 11)) r-lis)) r-lis) All the best ! Thank you ! Julio

Any progress related to this Stemlets in XML ? All the best ! Julio

Genius !

Great, André !! Thanks a lot ! Best ! Julio

Dear All, Is there a function for get all intervals of a row (or any list of integers or pitches) in relation to one note ? For example, given this 12 tone row: (a3 gs4 c4 d4 bb3 b3 fs4 f4 cs4 g4 ds4 e4) Get all intervals related to a4 ? The result should be: (-12 -1 -9 -7 -11 -10 -3 -4 -8 -2 -6 -5) This is for getting a resultant set of numbers related to a chromatic octave-module. Each order of the set result in a different set. Maybe can be a mapping function.