Stephane Boussuge

A small solo cello piece composed this evening. Stéphane WaitingIntoTheRoom.opmo WaitingIntoTheRoomForSoloCello.mp3

Here's one of my way to compose with harmony and voice leading. Best regards Stéphane ;;; FANTAISIE POUR CORDES ;;; SB. 28.10.2020 ;;; ========================= ;;; Section size (setf size 32) ;;; Chords Structures (setf boz '((-4 -9 -12 -16)(-6 -10 -15 -22)(-5 -8 -12 -24))) ;;; Melodic construction material generation (setf melomat (omn-to-measure (make-omn :pitch (filter-repeat 1 (vector-to-pitch '(g4 c6) (vector-smooth 0.14 (gen-white-noise 96)))) :length (flatten (rnd-sample 12 '(h q (e e) (3q = =) h (h. q) h))) ) '4/4)) ;;; Melody generation (setf melo (ambitus '(g4 g6) (bind-to-interval '(2 -2) (rnd-sample size melomat)))) ;;; Melody vertical harmonisation (setf melharmo (gen-chord3 melo boz)) ;;; Separation between melody and harmony ;;; Remove the top note (defun rmv-top-nt (chord) (butlast (melodize (sort-asc chord))) ) #| ;exemple d'application sur plusieurs accords. (chordize-list (mapcar (lambda(x) (rmv-top-nt x)) (mclist '(d5g4c4b4e4 d5g4c4b4e4 d5g4c4b4e4)))) |# ;;; Apply closest path to all voices under the melody (setf harmo (closest-path (make-omn :pitch (chordize-list (mapcar (lambda(x) (rmv-top-nt x)) (mclist (flatten (omn :pitch melharmo)) ))) :length (omn :length melharmo) ))) ;;; Pitch demix (setf line1 melo) (setf line2 (pitch-demix 1 harmo)) (setf line3 (pitch-demix 2 harmo)) (setf line4 (pitch-demix 3 harmo)) (setf line5 (pitch-demix 4 harmo)) ;;; Adding rest and tie (setf line1.o line1) (setf line2.o (length-legato (length-weight line2))) (setf line3.o (length-legato (length-weight line3))) (setf line4.o (length-legato (length-weight line4))) (setf line5.o (length-legato (length-weight line5))) ;;; Distribute to instruments (setf vn1 (ambitus '(g3 g6) line1.o)) (setf vn2 (ambitus '(g3 g5) line2.o)) (setf vla (ambitus '(c3 c5) line3.o)) (setf vlc (ambitus '(c2 e4) line4.o)) (setf ctb (ambitus '(c1 g2) (pitch-transpose 0 line5.o))) (setf violin1 vn1) (setf violin2 vn2) (setf viola vla) (setf violoncello vlc) (setf contrabass ctb) ;;;--------------------------------------------------------- ;;; Score and Layout ;;;--------------------------------------------------------- (def-score ftsy (:title "Fantaisie pour cordes" :composer "S.Boussuge" :copyright "Copyright © 2020 s.boussuge" :key-signature 'chromatic :time-signature '((1 1 1 1) 4) :tempo 72 :layout (bracket-group (violin1-layout 'violin1) (violin2-layout 'violin2) (viola-layout 'viola) (violoncello-layout 'violoncello) (contrabass-layout 'contrabass))) (violin1 :omn violin1 :channel 1 :sound 'gm :program 'string-ensemble-1 :volume 100 :pan 16 :controllers (91 '(48)) ) (violin2 :omn violin2 :channel 2 :sound 'gm :program 'string-ensemble-1 :volume 95 :pan 111 :controllers (91 '(48)) ) (viola :omn viola :channel 3 :sound 'gm :program 'string-ensemble-1 :volume 90 :pan 32 :controllers (91 '(60)) ) (violoncello :omn violoncello :channel 4 :sound 'gm :program 'string-ensemble-1 :volume 90 :pan 95 :controllers (91 '(60)) ) (contrabass :omn contrabass :channel 5 :sound 'gm :program 'string-ensemble-1 :volume 90 :pan 95 :controllers (91 '(72)) ) )

Hi, as a starting point you can look at passing-intervals function and also length-divide function. Best ! Stéphane

Hi, here's the video rendering of my score "Voile Suspendu" S.

Hi folks, here's the files from today's session. Enjoy ! Stéphane ZoomIntoOM241020-Videos.zip auto-split.lisp Zoom241020a.opmo split-point.lisp

I’m not on my computer but by memory i think the 3rd argument is the start point on the circle. legato remove rests and tie the notes. example: s -s s s. Become e s s with legato. sb.

Dear Rangarajan, that's indeed a really good point I'm dreamed about from long time. Hope Janusz will find a bit of time to focus on this aspect I suppose a first solution would be to do a lisp Library from OM. But you are a specialist of development (and not me) , so your ideas are welcome in this domain. Best wishes Stéphane

Hi, here's the material from this sessions. Enjoy !! Stéphane Videos-ZoomIntoOM-session20.zip ZoomOmSession20-171020a.opmo Bassoon-c1.aif

Here's the file from this session and the videos recording of the session. Happy studies !! Stéphane ZoomOM-101020a.opmo Videos-Zoom-OM-10102020.zip

Amazing !! Well done, André !

Hi folks, Here's the files from this session showing my process for a work in progress " Extrapolation" for Pierrot Ensemble. You will find also exceptionally the video recording. All this material is shared here for study purpose naturally, please, don't use it "as this" but use this material as an example to inspire yourself and help you to construct your own workflow and algorithms. All the best and happy Opusmodus-ing Stéphane Part1-Basic-idea.opmo Part2-Main-Process.opmo Part3-Looping-Process.opmo Part4-ScoreOutput.opmo pitch-rotate-vary-segment.lisp Stephane-Video-ZoomOM2609-20.zip

Hi, sorry for this interruption by "pirates"... here's the file used for this session showing some possible ways to connect pitch/intervals to lengths. All the best ! Stéphane Zoom19-9-2020.opmo

yes, you can do that and replace :sound with your own soundest definition. S. I've just edited now the mp3 file, changed some few things... SB.

A short piano piece using GEN-FRAGMENT function. SB. Voile Suspendu.mp3 Voile Suspendu - Partition complète.pdf

Here's the files used in this session and a short mp3 as demo output of this code. All the best ! Stéphane EpicFantasy12-09-2020.opmo Fantasy1Template.logicx.zip iac.lisp Fantasy1LiveCoding120920.mp3

Great Peter ! All the best ! Stéphane

Hi folks, here's the main algorithm I've used to create my "Triptyque pour 6 instruments". https://opusmodus.com/forums/topic/1843-triptyque-pour-6-instruments/ Hope you will enjoy it like me because it was a lot of fun to do it (thanks Janusz for OM !). Stéphane gen-insieme1.opmo

Hi, here's a new score made with Opusmodus and Sibelius. SB.

Hi folks, I apologise for not being able to animate today's Zoom session, unfortunately I couldn't get my hands on a computer. Looking forward to the next session. Next session: 12 September 2020 6:00 PM All the best ! Stéphane

Here's the file from this session. Enjoy ! Stéphane BackToBasics-Def-Score150820.opmo

Hi folks, here's the file from this session. It was quite a challenge to show this piece but I was very happy to share it with all of you . Enjoy and happy study ! Stéphane ZoomOnPluton.opmo

> we can call the specific sets in the unfold function without having to evaluate the complete procedure of each method ? Yes naturally, you can create your own unfold-set, save it in unfold-set folder and call it in counterpoint or unfold with the optional keyword :set and specify here the name of your set. SB.

Here's the ostinato file from this session with harmonic remapping etc... It was fun !! Enjoy ! Stéphane. Ostinato1opmo.opmo

hello, here's the files from this last session. Enjoy ! S. OchEx1opmo.opmo OchEx2opmo.opmo OchEx3opmo.opmo

I agree totally SB