JulioHerrlein

Dear Friends, I have this recurrent problem with lists... Please, help... ;;; I have this TWO lists (setf list1 '(v1rp0 v1rp1 v1rp2 v1rp3 v1rp4) (setf list2 '(melch1-0 melch1-1 melch1-2 melch1-3 melch1-4) ;;;AND ;;; I need a list like this (alternating the list) (v1rp0 melch1-0 v1rp1 melch1-1 v1rp2 melch1-2 v1rp3 melch1-3 v1rp4 melch1-4) How can I proceed ? Thanks a lot Best, Julio (a desperate quarantine composer) OBS. help in combining THREE lists are also greatly appreciated, as well as how to combine parts of the lists. Thank you... my brain is ruined for now (I´m doing something BIG... ) All the best ! Julio

Thank you, Stephane !

Dear All, It´is possible to initialize sublists all at once as setf variables ? To transform a list like this: ((c4 ds4 e4)(c4 d4 f4)(c4 d4 g4)(cs4 d4 e4)), automatically into a list of setf materials, like v1 = (c4 d4 e4) v2 = (c4 d4 f4) v3 = (c4 d4 g4) v4 = (cs4 d4 e4) OBS.: v1 can be any letter, like p1, p2 or maybe mat1, mat2, etc... Thank you

Dear Janusz, Thank you ! Yes, I noticed it later. But it was not that error. It was the apply eval thing. Thank you !

Apply-Eval is the solution... (apply-eval listmat)

Dear All, I'm searching ways of making lists of lists. I tried all this because I was wanting to call materials from an array, like this: (setf mat1 '(c4 d4 ds7)) (setf mat2 '(d4 e4 c5)) (setf mat3 '(d4 eb4 cs5)) (setf mat4 '(d4 f4 c5)) (setf mat5 '(d4 g4 c5)) (setf mat6 '(d4 a4 c5)) (setf mat7 '(e4 a4 c5)) (setf mat8 '(f4 a4 c5)) (setf mat9 '(g4 a4 c5)) (setf mat10 '(a4 a4 c5)) (setf mat11 '(b4 a4 c5)) (setf array (build-array '((mat0 mat1 mat2 mat3) (mat4 mat5 mat6 mat7) (mat8 mat9 mat10 mat11)))) ;;;GET-ARRAY : (ROW COLUMN SIZE ARRAY &KEY DIRECTION (get-array 0 1 2 array :direction 'down) (setf listmat (get-array 0 1 2 array :direction 'down)) (list listmat) ; this does not work ; the result should be (list mat1 mat5) ((c4 d4 ds7) (d4 g4 c5)) What I did wrong ? Thanks in advance

Yes, the code for notes are massive blocks of information. The ideia is pointing some note in the snippet and highlight the correspondent code. This would be to create some link between codes and snippets. But has to be done in a dynamic form... Maype a too much drastic change in the architeture... This could be an auxiliary/optional way of working out code and XML, but maybe not the principal. Something like this (at 1´28)

Acording to Janusz, Opusmodus is not graphical oriented. This ensure to us a better compatibility to the crazy software policies of Apple computer. Yes, Lilly permits something like this. Maybe it´s possible ithout compromising the ideia of code based stuff. Best !

Looks great, Janusz ! The new functions omn-dictum looks great. I´m going to investigate this. Thank you !

Dear Friends, I´m seriously doing a composition for String Quartet now. I was procastinating it for more than one year, but now I´m really finding good results that could be part of a composition. The question is that I generate some VERY LONG (sometimes 200 bars) of material and, inside this stream I´d like to use ONE or TWO measures of this particular stream, and more 6 measures generated by other process, interpolate some Free material in between, and so on. In general, this is the expression I use to compile each voice of the quartet: vh1 (VL), vh2 (VL2), vh3 (VLA) and vh4 (Cello) (setf vh1 (make-omn :length rv1 :pitch v1 :span :pitch :velocity (length-map len-map2 rv1 :otherwise '(mf) :repeat t) :articulation (length-map len-map1 rv1 :otherwise '(ord) :repeat t))) I do my hacks before this to transform things, but essentialy, I do my 4 make-omn expressions and, after that, I do a PS expression with my STR Quartet VST template using (list vh1 vh2 vh3 vh4). Sometimes I do one or more hacks inside the PS list like pitch-transpose, length-legato to make things more cantabile, length-diminution to vary durations, etc. THE QUESTION: Is there some way to, after I assembled the list for my 4 voices, to pick specific bars or passages i like and reorder and make some assembling to other generated material ? ONE PARTICULAR PROBLEM is that each draft means 4 streams of lists ( String quartet). I´m not wanting to mix bars 1-4 of the 1st violin with bars 123-127 of cello (altought this can be desirable...). I NEED TO TAKE ENTIRE EXCERPTS CONTAINING ALL THE 4 LISTS IN SYNC. How to deal with this massive (to the eyesight) amount of data in LISP lists without getting loose ? It´s not a simple (assemble-seq) operation (I´m aware of it), but some extracting favorite parts / specific bars, maybe setting (setf) this bars as new variables to finally use as assemble-seq in a further final compiling of a movement or a section. I´m saving everything also as musescore files, but I´m avaoiding at all cost to make this manually. I´d like to test as much as possible my sections with this flexibility. Any toughts are very appreciated ! Thank you ! All the best ! Julio

The first that came to mind is Quantize. There is a lot of functions related to Rhythm (type Length for search some) The is also this one, based in my Doctoral Dissertation about rhythm. Best ! Julio

My perfect solution (for Musescore): 1) Export XML (with right notation) 2) Export midi file (with keyswtches) 3) copy the keyswtches from the midi file 4) paste the tracks with the keyswitches alongside with the XML staves with the right notation, adjust the midi channels to the daw. Thats it !! Now the keyswtches are working in the notation software (you may even hide the tracks with the keyswitches in the final version). BEst ! Julio

Thank you, Ole !! Now it works !! Even with PS ! It was the wrong path to the application folder !! GREAT !!!! BEst ! Julio

I´d like to know if this is possible with PS function output and also with the last snippet. Here is the old post (it was before the advent of the marvellous preview score. The ideal situation for me would be call musescore to open the last score, PS or snippet generated. Ole, I got this error, doing your instructions compile-score #<score preview> musicxml-to-editor #<external-process (/usr/bin/open -a /Applications/MuseScore.app ...)[522] (exited : 1) #x3020050EBABD> I put the code you mentioned in extensions folder in the Source Code.lisp file, like this: (defparameter *snippet-clef-default* :treble-down8) (defun last-score-to-musescore () (compile-score *last-score* :output :musicxml :file "temp-last-score") (musicxml-to-editor "temp-last-score" :application "/Applications/MuseScore.app")) Best, Julio

Thank you, Ole ! Yes, I tried searching this, but could not find. Best ! Julio

Dear Friends, Is there some way to automatically open XML files from Opusmodus to other application (Musescore, Sibelius) ? Some code to open this (or keyword). Best, Julio

Amazing, Ole !! Thanks, Stephane ! Best !

I discovered today that you can use just length-diminution to expand OR contract rhythms, just by using fractions. You can use ti to make some proportional metric modulation stuff. Here are some examples. ORIGINAL (length-diminution 1/1 '(q e e e e s s s s)) CONTRACT (length-diminution 2/1 '(q e e e e s s s s)) EXPAND (length-diminution 1/2 '(q e e e e s s s s)) (length-diminution 1/3 '(q e e e e s s s s)) (length-diminution 3/2 '(q e e e e s s s s)) (length-diminution 3/4 '(q e e e e s s s s)) And so on !! This is cool ! Best, Julio

Just for the record... This way it worked great ! (besides my messy way to build expressions...) I find it easier to read... My mind is messy... (setf vh1 (make-omn :length rv1 :pitch v1 :span :pitch :velocity (length-map len-map2 rv1 :otherwise '(mf) :repeat t) :articulation (length-map len-map1 rv1 :otherwise '(ord) :repeat t)))

Thanks ! This will help a lot !

Thank you !! Underlines as ties. Good !

Interesting... I´m going to check this. Another possibility would be to process the length-map before the make-omn expression to get more safe results. Maybe the span expression inside can spoil the length-map list management span inside the make-omn expression. That ocurred to me.... Thank you ! Best

Dear Friends, I´m working with this Lenght-Map, for articulations and dynamics. It´s not waorking the way I expected. Some are in the map, but won´t map. Some aren´t in the map, but appears... Stephane use it a lot... What I missed ? ;;;FORUM QUESTION ;;;pitches (setf v1 '(q gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4 gs4 bb4 e4 d4 eb4 fs4 b4 gs4 g4 a4 c5 bb4 a4 cs4 d4 d4 d4 g4 d5 b4 g4 f4 eb4 e4 f4 fs4 c5 bb4 eb5 cs5 fs4 g4 fs4 g4 gs4 a4 d5 b4 g4 a4 a4)) ;;; rhythm (setf rv1 '(w s s s s tie q -q s s s s -q -q -q -q q -q -q h -q h. -e. s s s s s s e s -s e. tie q -q)) ;;; Length Map (setf len-map1 '((e (stacc)) (s (ord)) (h (long)) (h. (long)) (w (long)))) (setf len-map2 '((e (rnd-pick '(ff mf))) (s (mf)) (e. (mf)) (h (p<f)) (h. (p<f)) (w (p<f)))) (setf vh1 (make-omn :length (span v1 rv1) :pitch (omn :pitch v1) :velocity (length-map len-map2 rv1 :otherwise '(mf) :repeat t) :articulation (length-map len-map1 rv1 :otherwise '(ord) :repeat t)))

When I installed the latest version, I had to clean the cache to have it working properly. Best !

Thank you, Stephane !! The core is more extended version. All the best !