Jump to content

opmo

Administrators
  • Content Count

    2,293
  • Joined

  • Last visited

5 Followers

About opmo

  • Rank
    Admin

Contact Methods

Profile Information

  • Gender
    Male

Recent Profile Visitors

10,273 profile views
  1. 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.
  2. 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)
  3. *last-score* is snippet therefore you should be able to open the it in any publishing app.
  4. The density increases with the size of the interval/s. For example (cs2 g7) is more dense than (cs2 g2). The more difficult (complex) is to recognise the intervals the more dense is the pitch sequence. (density-analysis '((cs2 g7) (cs2 g2))) => (1.0 0.5)
  5. Yes (density-analysis '((h q e =) (e = = = = = = =))) => (0.25 0.5) (density-analysis '((h q e =) (s = t =))) => (0.25 1.0)
  6. The bigger the interval the lower the density. (density-analysis '((c4 d4) (c4 a4))) => (0.16666667 0.75) (density-analysis '((c4 d4 e4 f4) (c4 a4 g5 c7))) => (0.1388889 0.86111116)
  7. Done (gen-divide 3 '(q -q -e e e e q q -s s s s)) => ((1/4 -1/4 -1/8) (1/8 1/8 1/8) (1/4 1/4 -1/16) (1/16 1/16 1/16)) (gen-divide 3 '(q -q -e -e -e e q q -s s s s) :omit-rest t) => ((1/4 -1/4 -1/8 -1/8 -1/8 1/8 1/4) (1/4 -1/16 1/16 1/16) (1/16)) (gen-divide 3 '(q -q -e -e -e e q q -s s s s) :omit-rest t :omn t) => ((q - -e - - = q) (q -s = =) (s)) (gen-divide 3 '(q c4 -q -e d4 e e4 e f4 e g4 q a4 q b4 -s s c5 d5 e5)) => ((q c4 mf - -e) (e d4 mf e4 f4) (e g4 mf q a4 b4) (-s c5 mf d5) (s e5 mf)) (gen-divide 3 '(q c4 -q -e d4 e e4 e f4 e g4 q a4 q b4 -s s c5 d5 e5) :omit
  8. Opusmodus version in German is in the making and will be released soon. Best wishes, Janusz
  9. Good work Stephane, Nigel would love it. I wish Nigel could see the OM COUNTERPOINT and POLYPHONY in action. Soon I will make a new release with the enchantments to OMN-DICTUM and POLYPHONY functions.
  10. REWRITE-ACCIDENTALS - in forthcoming release. (setf sequence '((q d4 pp s eb4 leg g4 p leg bb4 leg a4) (q. cs5 mf -e 3q gs5 leg fs5 leg c5 b4 ff leg f4 leg e4))) (rewrite-accidentals sequence :map :chromatic) => ((q d4 pp s ds4 leg g4 p leg bb4 leg a4) (q. cs5 mf -e 3q ab5 leg gb5 leg c5 b4 ff leg f4 leg e4)) (rewrite-accidentals sequence :map :sharp) => ((q d4 pp s ds4 leg g4 p leg as4 leg a4) (q. cs5 mf -e 3q gs5 leg fs5 leg c5 b4 ff leg f4 leg e4)) (rewrite-accidentals sequence :map :flat) => ((q d4 pp s eb4 leg g4 p leg bb4 leg a4) (q. db5 mf -e 3q ab5
×
×
  • Create New...

Important Information

Terms of Use Privacy Policy