-
Posts
806 -
Joined
-
Last visited
Reputation Activity
-
JulioHerrlein reacted to loopyc in Inspiring Idea For Rhythm (with Nested Tuplets)
Thanks Julio, LOVE realtime tuplets 🙂
-
JulioHerrlein got a reaction from loopyc in Inspiring Idea For Rhythm (with Nested Tuplets)
INSPIRING IDEA FOR RHYTHM (Nested Tuplets)
Nestup [[]_[]]
NESTUP.CUTELAB.NYC Nestup, a Language for Musical Rhythms
-
JulioHerrlein got a reaction from opmo in Any templates for Garritan Jazz and Big band 3 ?
Yes, I will. Just checking if somebody already did.
Thanks !
-
JulioHerrlein reacted to opmo in Any templates for Garritan Jazz and Big band 3 ?
You most create you own def-sound-set for it.
-
JulioHerrlein got a reaction from hujairi in Inspiring Idea For Rhythm (with Nested Tuplets)
INSPIRING IDEA FOR RHYTHM (Nested Tuplets)
Nestup [[]_[]]
NESTUP.CUTELAB.NYC Nestup, a Language for Musical Rhythms
-
JulioHerrlein reacted to DanielLumertz in gen-steps strange behaviour
So I was using gen-steps in this simple code, somehow it is lagging all opusmodus, that I need to close or break it. I don't know what it can be, I haven't got much time to explore what it can be, if is a bug or I messed up....
(setf size 13) ;; talea size in rythm cells (setf cell_size 1/16) (setf min 3) ;; min beats in the talea (setf max 7) ;; max beats in the talea (setf n_beat(car (rnd-number 1 min max))) (setf beat_places (subseq (rnd-order (gen-integer-step 0 size 1)) 0 (- n_beat 1))) (setf talea_bin(gen-binary-row size beat_places)) (setf talea_1 (binary-map talea_bin cell_size)) (setf var_t1 (gen-steps 4 talea_bin)) ;; This line seems to be the problem. (setf talea_1_var (binary-map var_t1 cell_size))
thanks people!
-
JulioHerrlein reacted to opmo in gen-steps strange behaviour
Well spotted. Yes it is a bug. A predict omn-formp was missing.
Fixed already.
-
JulioHerrlein reacted to born in Inspiring Idea For Rhythm (with Nested Tuplets)
see:
OpenMusic Documentation - Rhythm Trees Structure
SUPPORT.IRCAM.FR Best, Achim
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
Instrument means track.
-
JulioHerrlein got a reaction from DanielLumertz in Reaper and Opusmodus Script
Very nice idea, Daniel !!
Nice to see more people from Brasil, here ! (specially a student from our University !! )
All the best !
Julio
-
JulioHerrlein reacted to DanielLumertz in Reaper and Opusmodus Script
Hey ppl, I made a script to use other softwares as midi editors for reaper. I tested with Opusmodus and Reaper, they make a good pair of softwares. 🙂 I recently made a video in how to use it with musecore but the concept is the same
I also made a really small screen cap to show with Opusmodus (my macbook is not that fast)
In the video I am using to export midi:
compile-score *last-score* :output :midi :file "path/filename"
(hope I posted in the right subforum here)
-
JulioHerrlein reacted to opmo in Different seeds in a loop expression
(let ((seed '(1 23 467 11))) (loop for i in seed collect (rnd-unique 5 '(1 2 3 4 5) :seed i)) )
-
JulioHerrlein reacted to AM in Interval distance of a list (integers or pitches) in relation to a chosen note
really not 🤣
-
JulioHerrlein reacted to AM in Interval distance of a list (integers or pitches) in relation to a chosen note
simple brain gym 😄
-
JulioHerrlein reacted to AM in Interval distance of a list (integers or pitches) in relation to a chosen note
(defun interval-distance (alist n) (let ((alist (if (pitchp (car alist)) (pitch-to-midi alist) alist)) (n (if (pitchp n) (pitch-to-midi n) n))) (loop for i in alist collect (- i n)))) (interval-distance '(c4 d4 b2 e7) 'c4) => (0 2 -13 40) (interval-distance '(c4 d4) 'c4) => (0 2) (interval-distance '(43 44) '41) => (2 3) (interval-distance '(56 48 11) 'c4) => (-4 -12 -49)
-
JulioHerrlein reacted to Rene in chord-filter-tie, organ
Dear Julio
Thank you very much. I also worked with pitch-demix. With pitch-demix I've got single voices. With single voices filter-tie works, but not with chords (e.g. two chords for piano with common tones).
Best,
René
-
JulioHerrlein reacted to AM in Rhythmic Resultants
is this a solution? ...or some ideas to it...
greetings
andré
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun gen-resultant (r1 r2 &key (rhy 1/4)) (gen-length (difference (remove-duplicates (sort-asc (flatten (append (cons 0 (gen-accumulate r1)) (cons 0 (gen-accumulate r2))))))) rhy)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; example.... correct? (gen-resultant (primes-to 7) (reverse (primes-to 7))) ;;; another example (gen-resultant '(9) '(3 1 4)) (gen-resultant '(9) '(3 1 4) :rhy 1/16) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
n-version...
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; for several layers (defun gen-resultant* (r &key (rhy 1/4)) (gen-length (difference (remove-duplicates (sort-asc (flatten (loop for i in r append (cons 0 (gen-accumulate i))))))) rhy)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; correct? (gen-resultant* '((16) (9) (3 1 4) (7))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
a version with length-input - but test it, correct...?
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; for several layers / with direct rhythm-input (defun gen-resultant** (r) (difference (remove-duplicates (sort-asc (flatten (loop for i in r append (cons 0 (gen-accumulate i)))))))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; correct? (gen-resultant** '((2/4 1/4 3/4) (1/16 3/16 2/12 1/12) (3/4 3/20 2/20))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
JulioHerrlein reacted to AndreOktave in Rhythmic Resultants
Hi André,
thank you very much for your help, your codes are working very good and it is exactly what I was looking for...
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; example.... correct?
;; Yes
;(gen-resultant (primes-to 19) (reverse (primes-to 19)))
;; =================
;;;exactly what I was looking for, thanks alot!!!
(progn
(defun gen-resultant (r1 r2 &key (rhy 1/4))
(gen-length (difference (remove-duplicates
(sort-asc (flatten (append (cons 0 (gen-accumulate r1))
(cons 0 (gen-accumulate r2))))))) rhy))
(setf r1a (primes-to 19))
(setf r2a (reverse (primes-to 19)))
;; Resultant from r1a r2a
(setf rr (gen-resultant r1a r2a :rhy 1/16))
(setf r1b (gen-length r1a '16))
(setf r2b (gen-length r2a '16))
(ps 'gm
:rhy (list r1b)
:rhy (list r2b)
:rhy (list rr)
:time-signature '(4 4 1)
)
....as long as there are no rests involved, rests are interpreted as attacks:
(progn
(defun gen-resultant* (r &key (rhy 1/4))
(gen-length (difference (remove-duplicates
(sort-asc (flatten (loop for i in r
append (cons 0 (gen-accumulate i)))))))
rhy))
(setf r1c (gen-length '(16) '4))
(setf r2c (gen-length '(9) '4))
(setf r3c (gen-length '((3 1 4)) '4))
(setf r4c (gen-length '(7) '4))
;; Resultant from r1c r2c r3c r4c
(setf rrc (gen-resultant* '((16)
(9)
(3 1 4)
(7))))
(ps 'gm
:rhy (list r1c)
:rhy (list r2c)
:rhy (list r3c)
:rhy (list r4c)
:rhy (list rrc)
:time-signature '(4 4 1)
)
)
... or:
(progn
(defun gen-resultant** (r)
(difference (remove-duplicates
(sort-asc (flatten (loop for i in r
append (cons 0 (gen-accumulate i))))))))
(setf rha '(2/4 1/4 3/4))
(setf rhb '(1/16 3/16 2/12 1/12))
(setf rhc '(3/4 3/20 2/20))
(setf rr2 (gen-resultant** (list rha rhb rhc)))
(ps 'gm
:rhy (list rha)
:rhy (list rhb)
:rhy (list rhc)
:rhy (list rr2)
:time-signature '(4 4 1)
)
)
Thank you very much!
best
Stefan
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
Possibly next week.
-
JulioHerrlein got a reaction from opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
This is amazing, Janusz !!
Many thanks !
Looking forward to this update !
Best !
Julio
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
In the next update:
MUSICXML-TO-EDITOR
The MUSICXML-TO-EDITOR function opens a MusicXML file or the last compiled score (DEF-SCORE, PS or snippet) in any notation editor like Sibelius, Dorico, MuseScore etc...
In Opusmodus the default editor is set to Sibelius:
(defparameter *default-notation-editor* "Sibelius.app")
To change the default editor you need to replace the "Sibelius.app" string with the name of your own editor and paste the expression into the ‘User Source.lisp’ file which you will find in the ~/Opusmodus/Extensions directory.
For example:
(defparameter *default-notation-editor* "Dorico 3.5.app")
(defparameter *default-notation-editor* "MuseScore 3.app")
Examples:
To open the last compiled score (DEF-SCORE, PS or snippet) in the notation editor:
(musicxml-to-editor)
To open the 2nd instrument from the last compiled score (DEF-SCORE, PS or snippet) in the notation editor:
(musicxml-to-editor :instrument 2)
To open a MusicXML file in the notation editor:
(musicxml-to-editor "file-name")
To open the file in Finale:
(midi-to-editor "file-name" :application "Finale")
Should the application not open you can use the identifier keyword with the bundle-identifier.
For example the Sibelius 7.5 version identifier is "com.avid.Sibelius75"
(musicxml-to-editor "file-name" :identifier "com.avid.Sibelius75")
MIDI-TO-EDITOR
The MIDI-TO-EDITOR function opens a MIDI file or the last compiled score (DEF-SCORE, PS or snippet) in any notation editor like Sibelius, Dorico, MuseScore etc...
In Opusmodus the default editor is set to Sibelius:
(defparameter *default-notation-editor* "Sibelius.app")
To change the default editor you need to replace the "Sibelius.app" string with the name of your own editor and paste the expression into the ‘User Source.lisp’ file which you will find in the ~/Opusmodus/Extensions directory.
For example:
(defparameter *default-notation-editor* "Dorico 3.5.app")
(defparameter *default-notation-editor* "MuseScore 3.app")
Examples:
To open the last compiled score (DEF-SCORE, PS or snippet) in the notation editor:
(midi-to-editor)
To open the 2nd instrument from the last compiled score (DEF-SCORE, PS or snippet) in the notation editor:
(midi-to-editor :instrument 2)
To open MIDI file in the notation editor:
(midi-to-editor "file-name")
To open the file in Finale:
(midi-to-editor "file-name" :application "Finale")
Should the application not open you can use the identifier keyword with the bundle-identifier.
For example the Sibelius 7.5 version identifier is "com.avid.Sibelius75"
(midi-to-editor "file-name" :identifier "com.avid.Sibelius75")
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
This will work.
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
This you will need to do before.
(midi-to-editor) ;is using the default editor
(midi-to-editor "filename") ;specific midifile (not *last-score*)
(midi-to-editor :application Musescore) ;*last-score* midi will open in Musescore
the default will be:
(defparameter *default-notation-editor* "Sibelius")
which you can changed to your editor application.
The same I will do to the musicxml:
(musicxml-to-editor)
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
I will make a function for it.
(midi-to-editor)
-
JulioHerrlein reacted to opmo in Automatic opening last MIDI file files in Musescore (or Sibelius, etc)
*last-score* is snippet therefore you should be able to open the it in any publishing app.