Jump to content

opmo

Administrators
  • Posts

    2,516
  • Joined

  • Last visited

Everything posted by opmo

  1. If you open .opmo file in other text editor (like Emacs etc...) then the icon can/will change. Open Info with the file and select Open with: Opusmodus. This is how macOS works.
  2. Is your 'Load CLM Instruments.lisp' file starting like: ;; ------------------------------------------------------------ ;; Compile and load instruments ;; ------------------------------------------------------------ (in-package :Opusmodus) (load-clm-ins "add" "addflt" "addsnd" "anoi" "add-noise-filtered" ..) Maybe you need to install the Opusmodus folder in your home directory.
  3. If you have followed the instruction form "README FIRST - CLM Installation" file?
  4. Fixed to RND-ORDER Best wishes, Janusz
  5. 2.2.26810 – Additions: OMN-DICTUM - two additional cases: :butlast and :rest. – Documentation: Edit and correction
  6. Thank you Stephane for sharing, great score and sound.
  7. 2.2.26807 – Fixed: POLYPHONY OMN-DICTUM – Additions: MICROPOLYPHONY - length-prob, interval-prob (probability). POLYPHONY - sustain (overlap). – Documentation: Edit and changes
  8. Remove the Quicklisp Start.lisp file from the Extensions folder.
  9. More functionality in MICROPOLYPHONE to control the complexity: (setf interval-series '((0) (1 -1 2 -2) (6 -6 11 -11) (13 -13))) (micropolyphony 4 40 1/16 1/4 :intervals interval-series :interval-prob '(.2 .2 .3 .3) :length-prob '(.1 .9 .1 .9) :proportional t :index 'a :seed 830134 :span 7 ) (micropolyphony 4 40 1/16 1/2 :intervals interval-series :interval-prob '(.2 .2 .3 .9) :length-prob '(.2 .9 .4 .9) :proportional t :index 'b :seed 855650 :span 13 ) (setf rh-a (quantize (ambitus-chord 13 (dissolve-voices (merge-voices a1 a2))) '(1 2 4)) lh-a (quantize (ambitus-chord 13 (dissolve-voices (merge-voices a3 a4))) '(1 2 4)) rh-b (quantize (ambitus-chord 13 (dissolve-voices (merge-voices b1 b2))) '(1 2 4)) lh-b (quantize (ambitus-chord 13 (dissolve-voices (merge-voices b3 b4))) '(1 2 4)) ) (setf rh-1 (omn-to-time-signature (assemble-seq rh-a rh-b) '(4 4)) lh-1 (omn-to-time-signature (assemble-seq lh-a lh-b) '(4 4)) ) (setf rh (omn-dictum '((:all p) (:all mf (1..5)) (:all > (5..7 16..20)) (:last pp 20) (:last fermata 20)) rh-1) lh (omn-dictum '((:all p) (:all mf (1..5)) (:all > (5..7 16..20)) (:last pp 20) (:last fermata 20)) lh-1) ) (ps 'vsl :p (list (ambitus '(0 45) rh) (ambitus '(-32 -1) lh)) :tempo 112 ) MP Series.mp3
  10. Not a bug. Snippet is not a score definition. PS and DEF-SCORE is: (ps 'gm :fl (list (length-augmentation 2 (pcs-rhythm '7-35 :rotate '(11) :omn t))) :time-signature '(12 8))
  11. No problem here, 2.5 seconds to run. Please download the latest version.
  12. It works, no problem here. Midi to Score: input: pacing.mid ;; MIDI Import | Opusmodus Version 2.2.26790 | 2021-11-14 19:45:26 (def-score +imported (:title "+IMPORTED" :composer nil :copyright nil :key-signature '((c maj)) :rewrite-lengths 't :time-signature '((3 4)) :tempo '((120))) (lead :omn '(#|1|# (h. g3 tie) #|2|# (h g3 -q) #|3|# (q f3 q. g3 -e) #|4|# (e. f3 -s h d3 tie) #|5|# (q.. d3 -q -s) #|6|# (-q ds3 s e3 -e.) #|7|# (h g3 q f3 tie) #|8|# (e. f3 -s h d3 tie) #|9|# (q d3 - g3 tie) #|10|# (q g3 q. f3 -e) #|11|# (h. g3 tie) #|12|# (q g3 h^s) #|13|# (s f3 -q.. s d3 -e.) #|14|# (-h.) #|15|# (-q e. b2 -s e. d3 -s) #|16|# (q d3 h f3 tie) #|17|# (e f3 - e. ds3 -s q g3 tie) #|18|# (h. g3 tie) #|19|# (s g3 -q.. q d3) #|20|# (z^h. b2 tie s e3 -he.) #|21|# (q^z b2 - s as2 -e.) #|22|# (-h q gs2) #|23|# (-s he. as2 tie) #|24|# (h as2 -q) #|25|# (q fs2 a2 as2 tie) #|26|# (h. as2 tie) #|27|# (q^s as2 - d3) #|28|# (q f3 h g3 tie) #|29|# (h. g3 tie) #|30|# (q g3 -h) #|31|# (-h.) #|32|# (-h.) #|33|# (-h q g3 tie) #|34|# (q^z g3 e. f3 -s q g3) #|35|# (e. f3 -s q d3 -) #|36|# (q a2 d3 s f3 -e.) #|37|# (hs f3 -e.) #|38|# (-q d3f3 -) #|39|# (-q g3 f3 tie) #|40|# (q f3 z^h c3 tie s d3 -q..) #|41|# (q..^z c3 -s as2 -e.) #|42|# (-h.) #|43|# (h.^s g2) #|44|# (-q. e ds2 q g2) #|45|# (q.^s as2 z^e cs3 z^q. d3 tie s c3 -qs) #|46|# (h^z d3 -q) #|47|# (q gs3 h f3) #|48|# (e f3 s d3f3 - d3 tie) #|49|# (he. d3 -s) #|50|# (-e. q as2 as2 -s) #|51|# (-e. q c3 qs tie) #|52|# (q. c3 -) #|53|# (-h q c3 tie) #|54|# (q^z c3 h as2) #|55|# (h g2 -q) #|56|# (q g2 b2 -e as2 tie) #|57|# (q as2 e a2 q. tie) #|58|# (q a2 h g2 tie) #|59|# (q g2 b2 as2) #|60|# (q a2 h as2 tie) #|61|# (q as2 -h) #|62|# (e. f3 qs d3 -q) #|63|# (q. g3 e3) #|64|# (q gs3 h g3 tie) #|65|# (q.. g3 -q -s) #|66|# (-h q f3) #|67|# (h. g3 tie) #|68|# (qs g3 -q..) #|69|# (-h.) #|70|# (-h.) #|71|# (-h.) #|72|# (q e3 e3 f3) #|73|# (he f3 -e) #|74|# (-q ds3 q^s e3) #|75|# (h. c3 tie) #|76|# (h. c3) #|77|# (-q cs3 cs3 tie) #|78|# (h. cs3 tie) #|79|# (q..^s cs3 qs as2 tie) #|80|# (q^z as2 ds3 ds3) #|81|# (q d3 cs3 d3 tie) #|82|# (h d3 q) #|83|# (q ds3 d3 ds3 tie) #|84|# (q ds3 -h) #|85|# (-h q fs3) #|86|# (q fs3 g3 fs3) #|87|# (h. g3) #|88|# (-h s a3 -e.) #|89|# (q g3 - ds3) #|90|# (q ds3 h fs2 tie) #|91|# (h fs2 -q) #|92|# (q fs2 h tie) #|93|# (q fs2 - gs2) #|94|# (q a2 a2 a2) #|95|# (h. gs2) #|96|# (-h.) #|97|# (-h q c3) #|98|# (q b2 h cs3 tie) #|99|# (h cs3 q c3) #|100|# (q ds3 g3 as3) #|101|# (h. g3) #|102|# (-q e3 ds3) #|103|# (hs g3 -e.) #|104|# (q as3 h g3 tie) #|105|# (s g3 -e. q^s f3 fs3) #|106|# (q f3 f3 d3 tie) #|107|# (q d3 -h) #|108|# (q c3 b2 -) #|109|# (q b2 b2 c3 tie) #|110|# (e.^z c3 -s q a2 a2) #|111|# (q c3 - b2) #|112|# (-q s c3 -q..) #|113|# (q as2 cs3 as2) #|114|# (h as2 -q) #|115|# (-h q cs3 tie) #|116|# (q cs3 as2 s cs3 -e.) #|117|# (q as2 a2 -) #|118|# (q f2 h gs2 tie) #|119|# (h. gs2 tie) #|120|# (q gs2)) :channel 1 :sound 'gm :program 'lead-1-square :volume 100 :pan 64 :controllers (1 '((70 577/384) (72 91/384) (55 191/384) (68 25/96) (67 577/384) (64 23/96) (71 95/384) (62 49/48) (71 569/384) (63 49/96) (74 245/192) (65 41/192) (75 677/384) (68 97/384) (71 47/192) (72 91/384) (67 3/4) (68 1/4) (64 581/384) (79 23/96) (68 21/128) (57 421/384) (62 3/4) (67 29/96) (56 551/384) (64 101/384) (75 91/384) (69 677/384) (64 49/192) (70 767/192) (68 33/64) (71 15/64) (72 47/96) (63 49/96) (74 15/64) (68 103/384) (65 91/384) (79 97/96) (70 145/192) (67 23/96) (75 197/384) (67 197/384) (64 23/48) (72 397/384) (64 13/12) (63 49/384) (77 9/32) (63 63/128) (70 31/384) (56 43/384) (46 305/384) (72 47/192) (59 1/2) (64 65/384) (51 7/24) (55 29/128) (62 1) (52 1/4) (60 1/2) (58 1/4) (70 149/96) (66 199/384) (69 63/128) (70 3/4) (63 1/4) (73 3/8) (59 3/8) (65 1/8) (59 81/128) (67 281/384) (72 25/96) (66 1/4) (71 95/384) (77 481/384) (75 3/16) (53 9/16) (78 73/192) (53 71/192) (76 2) (70 1/4) (75 15/4) (68 1/4) (71 23/96) (59 95/384) (70 389/384) (69 101/384) (70 29/128) (72 169/96) (73 107/384) (70 379/192) (80 95/384) (69 1/4) (76 95/384) (74 31/128) (62 73/96) (66 1/4) (73 1/4) (66 1/4) (62 3/2) (66 1/4) (64 1/2) (69 1/4) (72 5/4) (73 1/4) (68 1/2) (63 1/4) (74 1/4) (66 5/4) (67 1/4) (76 1) (74 1/4) (64 1/4) (61 1/4) (70 9/4) (69 1/4) (81 1/4) (72 1) (79 1/4) (63 1/4) (72 1/4) (65 15/64) (70 65/64) (55 1/4) (67 1/4) (72 3/4) (73 1/4) (67 3/4) (68 1/4) (75 1/4) (72 1/4) (63 1/4) (68 1) (73 1/4) (70 1/2) (71 1/4) (73 1/4) (67 1/2) (78 1/4) (73 1/4) (68 63/128) (71 65/128) (62 1/2) (75 1/4) (71 1/4) (73 1/4) (74 5/4) (69 283/384) (66 101/384) (67 1/4) (80 1/2) (76 1/4) (72)))))
  13. Update 2.2.26781 – Enhancement: pedal on rests omn-dictum - reconstruct velocity rnd-order - probability rnd-sample - probability polyphony - closest octave – Fixed: microintone gliss niente dynamic (last symbol) quantize - zero length/duration octave-shift over bars notehead and rest length noteheads half and whole notes display Midi to Score - Error: The value NIL is not of the expect type – Documentation: Edit and changes Monterey (macOS 12.0 Intel) support.
  14. Opusmodus for Monterey (macOS 12.0 Intel) ready for download.
  15. OM will work on macOS Monterey Intel with the next update (next week).
  16. CCL has started working on the port and if the port will not materialise at the beginning of the next year then we would need to consider other lisp program, and I agree LispWorks could be the system for future Opusmodus.
  17. In the midi file there is no tempo set. We will add 120 as a default if midi without one. We are patching other apps bugs, there should be no midi files without a tempo parameters - no time no music This will be fixed in the next update.
  18. Please send me the midi file and I will have a look.
  19. String Quartet VEMA (work in progress) with micro and spectral strategy. String Quartet VEMA I.mp3
  20. Great compositions and performance, bravo. NVS lives on.
  21. You should have received it by now. Thank you for your patience.
×
×
  • Create New...

Important Information

Terms of Use Privacy Policy