Jump to content

opmo

core_group_4
  • Content Count

    1,616
  • Joined

  • Last visited

  • Days Won

    246

Everything posted by opmo

  1. opmo

    Startup issue

    Delete the source code of the DOUBLE function from the 'User Source.opmo' file.
  2. opmo

    Startup issue

    Just delete the function double for the Opusmodus Extensions folder, the function is just an example.
  3. opmo

    LessThanEigth for String Quartet and Clarinet

    The function name length-rest-weight has changed to length-weight. I fixed the score of above as well.
  4. This will be fixed in ver. 1.3
  5. The midi channels should to be the same in each score.
  6. You will find the answer in the Stephane score "DseExta.opmo" in the 4. Score Examples/Strings and Piano.
  7. opmo

    On the Functions of death......

    GEN-AMBITUS-SERIES - expanding and narrowing
  8. opmo

    OM OSC Setup

    OSC is build in version 1.3
  9. I would need a few examples, input and output to see how could this work in our system.
  10. opmo

    Upgrade from SCOM

    Upgrade/crossgrade from Symbolic Composer to Opusmodus is the price of the academic licence.
  11. opmo

    Opusmodus 1.3 Upgrade

    Developers Progress The Opusmodus development team is making progress on the new release of our Opusmodus 1.3 software. We are planning to have 1.3 version ready for release in December 2018 with the upgrade price of EUR 145. Opusmodus Prices Going Up In the meantime, for those of you who have not yet purchased Opusmodus 1.2 the price will increase to EUR 399 for personal and EUR 250 for academic licence in December 2018 so now is the time to buy. Are you Eligible for a Free Upgrade? If you purchased an Opusmodus license on or after July 1st, 2018 you are entitled to the upgrade to version 1.3 at no charge. Opusmodus 1.3, December 2018 Whats new in version 1.3 Compatibility with macOS Mojave macOS 10.14 Dark Mode CLM integration OSC integration MIDI player improvements New functions circle-pitch-plot circle-rhythm-plot pc-thythm xy-plot edit-event process-omn fit-to-span osc-thread osc-stop-threads osc-data Enhancement single-events quantize and bug fixes. Best wishes, JP
  12. opmo

    how to keep omn-notation?

    (setf sequence '((t s t) (3q 3e_s. t) (5h 5h 5q_7q 7q 7q 7q 7q 7q 7q_5q 5h 5h) (t s._3e 3q))) (gen-retrograde sequence) => ((t s t) (t s._3e 3q) (5h 5h 5q_7q 7q 7q 7q 7q 7q 7q_5q 5h 5h) (3q 3e_s. t)) best, JP
  13. opmo

    how to keep omn-notation?

    Will be fixed in the next update. The problem not the ratios but the tied lengths. What we need to do is to reverse the order of tied lengths: 5q_7q = 7q_5q
  14. opmo

    transpose-on-event-number

    With EDIT-EVENT (ver1.3) function you will be able to edit any parameter in any given bar: (edit-event '( (0 0 '(pitch-transpose 12 x) :pitch) (0 2 '(chord-inversion 2 x) :pitch) (0 3 '(pitch-variant x :variant 'i) :pitch) (2 1 '(chord-inversion 1 x) :pitch) (2 2 '(chord-inversion 1 (pitch-transpose 12 x)) :pitch) (3 1 '(chord-inversion 1 (pitch-transpose 12 x)) :pitch) (3 2 '(chord-inversion 2 x) :pitch) (3 3 '(chord-inversion 2 x) :pitch) (3 5 '(chord-inversion 4 x) :pitch) (3 6 'g3e4c5 :pitch) ) '((e c2 c3e3g3 c3e3g3 c3e3g3) (e f2 c3f3a3 c3f3a3 c3f3a3) (e e2 e3g3c4 e3g3c4 e3g3c4) (e gs2 e3b3 e3b3 e3b3 g2 d3g3b3 d3g3b3 d3g3b3))) => ((e c3 mf c3e3g3 g3c4e4 c3gs2f2) (e f2 c3f3a3 c3f3a3 c3f3a3) (e e2 mf g3c4e4 g4c5e5 e3g3c4) (e gs2 mf b4e5 e4b4 e4b4 g2 g4b4d5 g3e4c5 d3g3b3))
  15. opmo

    Creating Custom Chord Symbols

    There are limitation with text attributes in the music-xml script espacially with more than two layers. Chord symbols are manly for popular music and should not me proceed if you wish to display them in the score.
  16. opmo

    Creating Custom Chord Symbols

    The chord symbols are fixed. You find the list of chord symbols in the chord-library doc. (setf harmpath '((h (b3 maj7) (d3 7)) (h (g3 maj7) (bb3 7)) (h (eb3 maj7) (eb3 maj7)) (h (a3 m7) (d3 7)) (h (g3 maj7) (bb3 7)) (h (eb3 maj7) (gb3 7)) (h (b3 maj7) (b3 maj7)) (h (f3 m7) (bb3 7)) (h (eb3 maj7) (eb3 maj7)) (h (a3 m7) (d3 7)) (h (g3 maj7) (g3 maj7)) (h (cs3 m7) (fs3 7)) (h (b3 maj7) (b3 maj7)) (h (f3 m7) (bb3 7)) (h (eb maj7) (eb maj7)) (h (cs3 m7) (fs3 7))) My display:
  17. opmo

    Pattern for Piano

    Yes, we can add the function to our system. I will try to make it happen for 1.3
  18. opmo

    conTimbre library + pitchbend

    We will delay the midi note-on events that start at time 0 by 5 ticks this might will solve the problem.
  19. opmo

    Circle-Pitch-Plot

    A new CIRCLE-PITCH-PLOT function (examples below) will be part of the forthcoming Opusmodus 1.3. The function CIRCLE-PIOTCH-PLOT returns a geometrical representation of relationships among the 12 pitch classes of the chromatic scale in pitch class space and provides an easy way to identify patterns and similarities between harmonic structures. Clockwise motion represents ascending pitch motion, and counterclockwise motion represents descending pitch motion. Examples: Major Triad (circle-pitch-plot '(c4e4g4)) Minor Triad (circle-pitch-plot '(c4f4ab4)) Augmented Triad (circle-pitch-plot '(c4e4gs4)) All 4 augmented triads (circle-pitch-plot '(c4e4gs4 db4f4a4 d4fs4bb4 eb4g4b4)) With :style :fill (circle-pitch-plot '(c4e4gs4 db4f4a4 d4fs4bb4 eb4g4b4) :style :fill) Example with chord names. Fully-Diminished 7th Chord (circle-pitch-plot 'dim7) All 3 fully-diminished 7th chords (circle-pitch-plot '((c4 dim7) (cs4 dim7) (d4 dim7))) Whole-Tone Scale (circle-pitch-plot '(0 2 4 6 8 10)) The complex of 2 Whole-Tone Scale (circle-pitch-plot '((0 2 4 6 8 10) (1 3 5 7 9 11)) :style :fill) Chromatic Scale (circle-pitch-plot 'chromatic :point-radius 4) The complex of 6 tritones (circle-pitch-plot '((0 6) (1 7) (2 8) (3 9) (4 10) (5 11)) :point-radius 4) Tonalities (circle-pitch-plot 'mixolydian-greek :point-radius 4) (circle-pitch-plot 'bartok :point-radius 4) (circle-pitch-plot 'messiaen-mode3 :point-radius 4) (circle-pitch-plot 'hyojo :point-radius 4) Contrary Motion (circle-pitch-plot '(0 1 11 2 10 3 9 4 8 5 7 6) :sort nil :join-first nil) (circle-pitch-plot '((0 1) (0 2) (0 3) (0 4) (0 5) (0 6) (0 7) (0 8) (0 9) (0 10) (0 11)) :point-radius 4) Example with Forte notation (circle-pitch-plot '(6-32 6-7)) Example with omn-form sequence and :type :pitches (circle-pitch-plot '(((leg s g2 p dbow+sul d3 sul b3 dig1 a3 b3 d3 b3 d3) (leg g2 d3 b3 a3 b3 d3 b3 d3))) :type :pitches) Circle types (circle-pitch-plot '((4 9 11) (3 5 10) (0 3 6 9)) :style :fill) (circle-pitch-plot '((4 9 11) (3 5 10) (0 3 6 9)) :type :pitches :style :fill) (circle-pitch-plot '((4 9 11) (3 5 10) (0 3 6 9)) :type :fifths :style :fill) Examples with :sort and :remove-duplicates set to nil (circle-pitch-plot '(0 2 6 0 3 7 0 4 8)) (circle-pitch-plot '(0 2 6 0 3 7 0 4 8) :sort nil) (circle-pitch-plot '(0 2 6 0 3 7 0 4 8) :sort nil :remove-duplicates nil) (circle-pitch-plot '(0 2 6 0 3 7 0 4 8) :sort nil :remove-duplicates nil :join-first nil) (circle-pitch-plot '(8 4 2 0 10 2 8 10 4 6 8) :sort nil :remove-duplicates nil) Best wishes, Janusz
  20. opmo

    PAT MARTINO Idiomatic Jazz Lines Generator

    Maybe this is what you are looking for: (setf sec (flatten (gen-eval 10 '(rnd-unique 12 '(0 1 2 3 4 5 6 7 8 9 10)))))
  21. You should't use :span :pitch with tupets otherwise the time signature will be of not much use. In the new QUANTIZE function there is no more :tolerance keyword.
  22. The future pitch (v1.4) will look like: c4 c4[50] fs4[50] d6[-30] etc... chord c4fs5[50] Every cents value which falls into microtonal notation (50, 30 -50 -75 ...) will be part of the notation all others will be written above the note: -43c
  23. The error is a known problem when you copy and past from html pages. Go to documents and use the original score file. No errors here.
  24. Quite simple to do: (setf soprano '((-h. q g4) (q g4 a4 bb4 c5) (h. d5 fermata q d5) (q d5 c5 bb4 c5) (h. a4 fermata q a4) (q bb4 c5 d5 d5) (h c5 q d5 fermata d5) (q bb4 c5 d5 d5) (h c5 q bb4 fermata d5) (q f5 d5 d5 d5) (h c5 q c5 fermata c5) (q d5 c5 bb4 c5) (h a4 q g4 fermata))) (setf alto '((-h. q d4) (q eb4 e e4 gb4 q g4 g4) (h. gb4 fermata q gb4) (q g4 e g4 gb4 q g4 a4) (h. gb4 fermata q gb4) (q g4 a4 bb4 bb4) (q bb4 e a4 g4 q a4 fermata gb4) (q d4 c4 f4 g4) (q g4 e f4 eb4 q d4 fermata f4) (q f4 e f4 g4 q a4 g4) (e g4 f4 g4 e4 q f4 fermata e f4 eb4) (q d4 e e4 gb4 q g4 g4) (q g4 gb4 d4 fermata))) (setf tenor '((-h. q bb3) (q c4 c4 d4 eb4) (h. a3 fermata q a3) (q bb3 c4 d4 eb4) (h. d4 fermata q d4) (q d4 eb4 f4 f4) (q g4 e f4 eb4 q d4 fermata a3) (q bb3 e f4 eb4 d4 c4 q bb3) (q bb3 a3 f3 fermata bb3) (q c4 d4 e d4 c4 q bb3) (e bb3 a3 bb3 g3 q a3 fermata a3) (q bb3 a3 e g3 bb3 q eb4) (e d4 s c4 bb3 q c4 b3 fermata))) (setf bass '((-h. q g3) (e c4 bb3 q a3 e g3 f3 q eb3) (h. d3 fermata q c3) (q bb2 a2 g2 c3) (h. d3 fermata q d3) (q g3 e f3 eb3 d3 c3 q bb2) (q eb3 f3 gb3 fermata d3) (q g3 a3 e bb3 a3 g3 f3) (q eb3 f3 bb2 fermata bb3) (q a3 bb3 gb3 e g3 f3) (q e3 c3 f3 fermata f3) (q bb2 e c3 d3 q eb3 e d3 c3) (h d3 q g2 fermata))) (def-score bach-bwv-0005 (:title "Bach, BWV-0005" :composer "J. S. Bach" :key-signature '(g min) :time-signature '(4 4) :tempo 96 :layout (piano-layout '(soprano alto) '(tenor bass))) (soprano :omn soprano :channel 1 :sound 'gm :program 0) (alto :omn alto :channel 2) (tenor :omn tenor :channel 3) (bass :omn bass :channel 4) ) 2nd possibility: ;;;--------------------------------------------------------- ;;; Bach, BWV 0005 ;;;--------------------------------------------------------- (setf soprano '((-h. q g4) (q g4 a4 bb4 c5) (h. d5 fermata q d5) (q d5 c5 bb4 c5) (h. a4 fermata q a4) (q bb4 c5 d5 d5) (h c5 q d5 fermata d5) (q bb4 c5 d5 d5) (h c5 q bb4 fermata d5) (q f5 d5 d5 d5) (h c5 q c5 fermata c5) (q d5 c5 bb4 c5) (h a4 q g4 fermata))) (setf alto '((-h. q d4) (q eb4 e e4 gb4 q g4 g4) (h. gb4 fermata q gb4) (q g4 e g4 gb4 q g4 a4) (h. gb4 fermata q gb4) (q g4 a4 bb4 bb4) (q bb4 e a4 g4 q a4 fermata gb4) (q d4 c4 f4 g4) (q g4 e f4 eb4 q d4 fermata f4) (q f4 e f4 g4 q a4 g4) (e g4 f4 g4 e4 q f4 fermata e f4 eb4) (q d4 e e4 gb4 q g4 g4) (q g4 gb4 d4 fermata))) (setf tenor '((-h. q bb3) (q c4 c4 d4 eb4) (h. a3 fermata q a3) (q bb3 c4 d4 eb4) (h. d4 fermata q d4) (q d4 eb4 f4 f4) (q g4 e f4 eb4 q d4 fermata a3) (q bb3 e f4 eb4 d4 c4 q bb3) (q bb3 a3 f3 fermata bb3) (q c4 d4 e d4 c4 q bb3) (e bb3 a3 bb3 g3 q a3 fermata a3) (q bb3 a3 e g3 bb3 q eb4) (e d4 s c4 bb3 q c4 b3 fermata))) (setf bass '((-h. q g3) (e c4 bb3 q a3 e g3 f3 q eb3) (h. d3 fermata q c3) (q bb2 a2 g2 c3) (h. d3 fermata q d3) (q g3 e f3 eb3 d3 c3 q bb2) (q eb3 f3 gb3 fermata d3) (q g3 a3 e bb3 a3 g3 f3) (q eb3 f3 bb2 fermata bb3) (q a3 bb3 gb3 e g3 f3) (q e3 c3 f3 fermata f3) (q bb2 e c3 d3 q eb3 e d3 c3) (h d3 q g2 fermata))) (def-score bach-bwv-0005 (:title "Bach, BWV-0005" :composer "J. S. Bach" :key-signature '(g min) :time-signature '(4 4) :tempo 96 :layout (piano-layout 'lh 'rh)) (lh :omn (dissolve-voices (merge-voices soprano alto)) :channel 1 :sound 'gm :program 0) (rh :omn (dissolve-voices (merge-voices tenor bass)) :channel 2) ) Best, JP
×