Jump to content

Stephane Boussuge

Moderators
  • Content count

    394
  • Joined

  • Last visited

  • Days Won

    102

Stephane Boussuge last won the day on October 17

Stephane Boussuge had the most liked content!

2 Followers

About Stephane Boussuge

  • Rank
    Advanced Member

Contact Methods

  • Website URL
    stephaneboussuge.com
  • Skype
    stephane.boussuge

Profile Information

  • Gender
    Male

Recent Profile Visitors

2,854 profile views
  1. How to control the beaming of notation ?

    Just for info, it will be more in "Opusmodus style" to write that this way, using make-omn function: (setf some-pitches (gen-repeat 145 'g4)) (setf some-lengths (span some-pitches '(e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e -e -e -e -e -e -e -e -e -e -e e e e e -e -e -e -e -e -e -e -e -e e e e e -e -e -e -e -e -e -e -e -e e -e - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - = = = = = = = = = = - - - - = = = = = = = = = - - - - = = = = = = = = = -))) ;(setf some-division '(12)) ;(setf length-div (gen-divide some-division some-lengths)) (setf part (make-omn :pitch some-pitches :length some-lengths )) (setf time-sig '(12 8)) (def-score time ( :key-signature 'chromatic :time-signature time-sig :tempo 112 :layout (clarinet-layout 'clarinet) ) (clarinet :omn part :channel 1 :sound 'gm :program 'clarinet )) S.
  2. Complementary Rhythms

    May be the function time-point-system could be also interesting for you. It is in the section Lengths/Time point system in the Opusmodus toolbox. Happy Opusmodus ! Cheers S.
  3. Complementary Rhythms

    Hi Julio, About sets, you can also have a look to the numerous Pitch-class sets functions in Opusmodus. For example, you can start to look at the doc of pcs-analysis function, and continue with all the other pcs-... functions from opmo. All the best ! S.
  4. How to span different time signatures ?

    for example if you need 3 bars of 3/4 and 2 of 6/8 you can write: :time-signature '((3 4 3)(6 8 2)) you can also separate your length material with gen-divide and get the time signature. Example here: (setf some-pitches (integer-to-pitch (gen-integer-step 0 64 '(2 1 2 3 -2 -1 -2 -1 -2)))) (setf some-lengths (rnd-sample (length some-pitches) '(e e -e e))) (setf some-division '(8 12 8 6 9)) (setf length-div (gen-divide some-division some-lengths)) (setf time-sig (get-time-signature length-div)) (def-score time ( :key-signature 'chromatic :time-signature time-sig :tempo 112 :layout (clarinet-layout 'clarinet) ) (clarinet :length length-div :pitch some-pitches :channel 1 :sound 'gm :program 'clarinet )) SB.
  5. Pattern streams from Common Music in Opusmodus

    Wonderful !! Thx a lot Torsten ! S.
  6. Name: adding articulations with pattern matching Category: Howto Date Added: 2017-08-29 Submitter: Stephane Boussuge Video example for my function articulation-map-omn. Function available here: adding articulations with pattern matching
  7. adding articulations with pattern matching

    Video example for my function articulation-map-omn. Function available here:
  8. articulation-map-omn

    Here's a small function from my toolbox i use very often for adding articulation on already generated OMN material. Also useful for adding legato slurs. Link to video example: ;;; ============================================= ;;; ARTICULATION-MAP-OMN ;;; AJOUTE DES ARTICULATIONS SUR DES LISTES OMN ;;; BASÉES SUR DU PATTERN MATCHING. ;;; ============================================= (defun articulation-map-omn (map omn &key (otherwise '-)) (do-verbose ("articulation-map-omn") (let ((plist (disassemble-omn omn))) (setf (getf plist :articulation) (pattern-map map (getf plist :length) :otherwise otherwise :swallow t)) (apply 'make-omn plist)))) #| USAGE (setf mat '((q c4 p d4 e e4 f4 s g4 f a4 g4 f4 q e4)(e d4 mp c4 s d4 e4 f4 e4 q d4 e c4 b3)(h a3 f -h))) (setf prules '( ((s s s) (leg leg leg)) ((s s)(leg leg)) ((s e)(- -)) ((s q)(- stacc)) ((q) (stacc)) ((e) (-)) )) (setf out (articulation-map-omn prules mat)) |# SB.
  9. Composing various polyphonic textures concisely

    Hi Torsten, i get a: Error: There is no package named "TU" i like the metric-shift function (not only), i will add it to my toolbox. Thx S.
  10. Parsimounious Voice Leading between collections of notes

    CHORD-RELATIVE-PATH is also interesting for voice leading, you can try it also. S.
  11. merge-rests-with-preceeding-note

    Hi Torsten, very good and very interesting !! thank you for sharing this, i enjoy it greatly ! All the best S.
  12. merge-rests-with-preceeding-note

    Sorry, it is length-legato function. S.
  13. Members Map

    All fine here on Opera Browser.
  14. merge-rests-with-preceeding-note

    filter-tie do the same , no ?
  15. Malta Fantasy

    Hi, Here's a small Woodwinds quartet: SB
×