opmo

Before we continue please download the current OM version - just uploaded an update. I spotted a difference in the names: sea-sounds1-partials and yours is sea_sounds1-partials

How you call the file. Have you try the example - at the end of the file - after restart, are they working? You don't need to load the file, just use the data directly with the library function: (library 'sea-sounds1-partials 'partials nil :collect '(0 3 5)) Every file in the User Source/Extensions or User Source/Libraries directory is loaded at start. Your file looks OK. If you can't see the result of the expression then something is wrong. (library 'sea-sounds1-partials 'partials nil :collect '(0 3 5)) I will make a new update tomorrow.

It is important to add the (in-package :Opusmodus) to the file, at the top.

Please send me the library file.

Just move your library into the ~/Opusmodus/User Source/Libraries/Def-Library - it will load on the start of the app.

You need to eval the function again: (progn (defun filterbank (&key cc value-range (time-range '(1 127)) (port 7) (channel 16)) (let ((values (loop for i in (rnd-sample 100 (gen-integer (first value-range) (second value-range))) for j in (gen-length (gen-integer (first time-range) (second time-range)) 1/128) collect (list i j)))) (live-coding-midi (compile-score (def-score cc-seq (:title "cc-seq" :key-signature 'chromatic :time-signature '(4 4) :tempo 60) (seq :length '(3) :pitch '(c4) :velocity '(ff) :port 1 :channel channel :controllers (1 values))))))) (filterbank :cc 1 :value-range '(40 99) :port 1) )

Send me the code please.

I will remove the duplicate notes in a chord before the process. I will add the chord-pitch-unique function into the function. Will be fixed in the next release.

Of course not, step 0 will not return chords. (pitch-variation 6 1 4 (chord-pitch-unique chords) :type 'c)

I think Torsten needs to make changes to his libraries to work with LW first.

alternative: length-to-ratio

(encode-seq '(w q e -e = =)) => (1 1/4 1/8 -1/8 1/8 1/8)

What are you trying to do (code example input, output). What 'all will do?

Naturally, press + in the top right notation window.

Here it is: (defun length-to-rnd-rest (n sequence &key seed) (let (state) (setf state *init-seed*) (setf seed (rnd-seed seed)) (do-verbose ("length-to-rnd-rest :seed ~s" seed) (let* ((len (length sequence)) (sel (rnd-order (append (gen-repeat n t) (gen-repeat (- len n) nil)) :seed (seed))) (result (loop for i in sel for j in sequence collect (if (null i) j (* j -1))))) (init-state state) result)))) (setf lengths '(15/16 15/32 1/32 1/32 1/32 61/32 1/32 1/2 1/32 5/32 1/32 13/16 17/32 3/2 9/16 7/16)) (length-to-rnd-rest 5 lengths) => (15/16 15/32 1/32 -1/32 1/32 61/32 1/32 -1/2 -1/32 -5/32 1/32 -13/16 17/32 3/2 9/16 7/16) (length-to-rnd-rest 5 lengths :seed 5) => (15/16 -15/32 1/32 1/32 1/32 61/32 1/32 -1/2 1/32 -5/32 1/32 13/16 -17/32 -3/2 9/16 7/16) I could make something more useful with steps, omitting existing rests and of course working with length symbols and events (omn).

The seed is not part of the function therefore it will return different output each time. Check the rnd-seed doc for how to apply seed function into your functions.

This is not possible.

You can change the color in Settings...

This post is about Windows Port? Color can be set in the Settings...

The trial is bound to few things on you machine

Practical Common Lisp GIGAMONKEYS.COM https://www.tutorialspoint.com/lisp/lisp_tutorial.pdf

Without a quote you should get an error. Add quote: '(e. a4 mordent2 s g4 e a4 q. d5)

What are you evaluating. Code please.

You can't use pitches and articulation elements without length element. (setf protochords (gen-repeat 5 (respell '(q eb2eb4g4bb4 arp-down c2c4e4ab4 ab2eb4ab4b4 arp-down d2d4f4a4 arp-down bb2d4f4bb4 arp-down g2eb4g4b4 arp-down c2c4eb4g4 arp-down ab2eb4ab4b4 arp-down d2d4gb4a4 arp-down bb2d4gb4bb4 arp-down g2d4g4bb4 arp-down c2c4eb4g4 arp-down ab2c4eb4ab4 arp-down f2db4f4a4 arp-down bb2db4f4bb4 arp-down g2d4g4bb4 arp-down eb2eb4gb4bb4 arp-down ab2c4eb4ab4 arp-down f2db4f4a4 arp-down d2d4f4a4 arp-down g2d4g4bb4 arp-down eb2eb4g4bb4 arp-down))))

(defparameter *default-notation-editor* "MuseScore 3.app") You find the instruction in the musicxml-to-editor doc.