Announcements

Update to MusicXML notation display. Added functions working with OMN events: GEN-TRIM (gen-trim 12 '(q c4 mf e d4 e4)) => (q c4 mf e d4 e4 q c4 e d4 e4 q c4 e d4 e4 q c4 e d4 e4) (gen-trim '(12 4) '((e c4 mf d4) (e e4 mf s f4 g4))) => ((e c4 mf d4 c4 d4 c4 d4 c4 d4 c4 d4 c4 d4) (e e4 mf s f4 g4 e e4)) GEN-REPEAT (gen-repeat 3 '(s c4 q d4)) => (s c4 mf q d4 s c4 q d4 s c4 q d4) (gen-repeat '(3) '(q c4 d4 e4 f4 g4 a4)) => ((q c4 mf c4 c4) (q d4 mf d4 d4) (q e4 mf e4 e4) (q f4 mf f4 f4) (q g4 mf g4 g4) (q a4 mf a4 a4)) (gen-repeat 3 '((q c4 g4) (s c4 …

New: single-events sequence [Function] Arguments and Values: sequence omn sequence. Description: The function SINGLE-EVENTS brakes-up an omn sequence into a new list of single events (l p v a). (single-events '(s bb3 leg a3 mp leg g3 a3 f c4 f4 a4)) => ((s bb3 mf leg) (s a3 mp leg) (s g3 mp) (s a3 f) (s c4 f) (s f4 f) (s a4 f)) Examples: (single-events '((s bb3 leg a3 mp leg g3 a3 f c4 f4 a4) (-q s bb4 c5 mf stacc b4 c5 mf d5 eb5 fff f5 eb5 d5))) => (((s bb3 mf leg) (s a3 mp leg) (s g3 mp) (s a3 f) …

Velocity symbols displaying correctly now - no more repeat symbols on tied notes.

Fix to dynamic symbol repeats (one-note-dynamic). Extending the num attribiutes: num0 num1 num2 num3 num4 num5 num6 num7 num8 num9 num10 num11 num12 num-1 num-2 num-3 num-4 num-5 num-6 num-7 num-8 num-9 num-10 num-11 num-12

MIDI controller function: gen-dynamic-controller omn-sequence &key scale loop [Function] Arguments and Values: omn-sequence omn-form sequence. scale a floating point number from 0.1 to 2.0. The default is 1.0. loop Nil or T. The T (true) will loop the scale list to the count of the lists in the sequence. The default is Nil. Description: The GEN-DYNAMIC-CONTROLLER function generates controller values from the omn-sequence dynamic symbols. (setf omn '((h. eb4 pp tasto q g3 0…

New: omn-replace type new sequence &key section exclude [Function] Arguments and Values: type :length, :pitch :velocity and :articulation. new list or lists of one type values. sequence omn list or lists. section an integer or list of integers. Selected list or lists to process. The default is NIL. exclude an integer or list of integers. Excluded list or lists from process. The default is N…

The PASSING-TONE function name changed to PASSING-INTERVALS. keyword :flatten change to :flat.

New: passing-intervals map sequence &key chord flat section exclude seed omn [Function] Arguments and Values: map list of integers (<interval> <steps>). sequence a sequence (omn-form list). chord NIL or T (includes or excludes chords from processing). The default is NIL. flat NIL or T. The default is NIL. section an integer or list of integers. Selected list or lists to process. The default is NIL. …

This update fixed the program change bug found in ADD-TEXT-ATTRIBUTES. New: ADD-PROGRAM-ATTRIBUTES. add-program-attributes &rest attributes [Function] Arguments and Values: attributes lists of attributes (programs). Description: This functions allows you to add your own lists of attribute names (program changes) to the system. This function is used when you don't want to display certain attributes within the score notation but would like to control program changes on a particular note (pitch). First you need to create a file 'User Attributes.opmo' in the Opusmodus 'Exte…

New: add-text-attributes &rest attributes [Function] Arguments and Values: attributes lists of attributes (playing techniques). Description: This functions allows you to add your own lists of attributes names (playing techniques) to the system. Examples: (add-text-attributes '(ord-tasto "ord⟶tasto") '(tasto-ponte "sul tasto⟶pont.") ) '(h c4 ppp> ord-tasto+leg cs5 pppp tasto-ponte) First you need to create a file 'User Attributes.opmo' in the Opusmodus 'Extensions' folder - if it hasn't been created already - with th…

More control in PITCH-FRAGMENT function. pitch-fragment count size pitch &key transpose section exclude seed span flat [Function] Arguments and Values: count an integer or list of integers (count of fragments). size an integer list (size of fragments). pitch a list or list of pitches. transpose a list of integers (transposition values). section an integer or list of integers. Selected list or lists to process. The default is NIL. exclude an integer or list of integers. …

Fix to variant symbols in the TIME-POINT-SYSTEM function.

Fix: A one list Snippet with span over 12 whole notes will automatic use (4 4) time signature.

Addition to harmonic-progression function :base (harmonic-progression '(0 3 4 4) '(c major)) => (c4e4g4 f4a4c5 g4b4d5 g4b4d5) (harmonic-progression '(1 4 5 5) '(c major) :base 1) => (c4e4g4 f4a4c5 g4b4d5 g4b4d5) New System Library 'MATHS' (will expand with time).

Minor bug fixes to MusicXML display.

New: ambitus-field range sequence &key section exclude omn [Function] Arguments and Values: range an integer (low high), a pitch symbol (low high) or instrument-name. sequence a list or lists of pitches or omn sequence. section an integer or list of integers. Selected list or lists to process. The default is NIL. exclude an integer or list of integers. Excluded list or lists from process. The default is NIL. omn …

New: rnd-number (n low high &key prob norep seed) [Function] Arguments and Values: n an integer. Amount of numbers to generate. low an integer. Lower limit. high an integer. Upper limit. prob a floating point value between 0.1 and 0.9. The default is 0.5. norep T (no consecutive repeat) or NIL. The default is NIL. seed an integer. Ensures the same result each time the code is evaluated. The default is NIL. Description: This function generates a series of number…

This update fixes minor bug found in LENGTH-LSYSTEM and PITCH-LSYSTEM functions.

Optimisation to AMBITUS family functions and few new text articulations. rub flick chit-pizz snap-pizz

Fix to SPLIT-LENGTHS.

TONALITY-MAP optimisation (much faster now) and change to tonality-form keywords: Tonality Form: tonality tonality name, pitch list, chord, integer list or OMN list. root pitch symbol or an integer. sort NIL or T. The default is T. add an integer (additional intervals). remove a list of integers (remove intervals from the tonality). closest NIL, down or up. The default is NIL (random). rotate and integer (chordal inversion). variant a variant symbol: o, r, i, ri, 4, r4, 5, r5 or ? (at random)…

Fix to TONALITY-MAP if scale are lists with :shift option.

We are in the process of streamlining function variable and keyword names. AMBITUS-SWALLOW is now AMBITUS-FILTER with additional keyword :remain (ambitus-filter '(-11 21) '((q c4ds3 e c4 c1 q d5 g9) (q c4 e d6 d6 d6 d6 c8 q d5 g9))) ((q c4ds3 e c4 - q d5 -) (q c4 -he q d5 -)) (ambitus-filter '(-11 21) '((q c4ds3 e c4 c1 q d5 g9) (q c4 e d6 d6 d6 d6 c8 q d5 g9)) :remain t) => ((-q. e c1 -q g9) (-q e d6 d6 d6 d6 c8 -q g9)) In the following functions the keyword :span is changed to :time TONALITY…

POSITION-FILTER works with OMN-Form (events) now: OMN events: (position-filter '(1 3 3 1 2 1 0 1 2) '(q c4 p e d4 e e4 q f4 s g4 a4 bb4 b4)) => (e d4 p q f4 f4 e d4 e4 d4 q c4 e d4 e4) (position-filter '((1 3 3 1 2 5) (1 0 1 2 7 3)) '(q c4 p e d4 e e4 q f4 s g4 a4 bb4 b4)) => ((e d4 p q f4 f4 e d4 e4 s a4) (e d4 p q c4 e d4 e4 s b4 q f4)) (position-filter '(1 0) '((q c4 p e d4 e e4) (s f4 mf s g4 e a4) (q b4 p s c5 s d5) (e e5 mp s. f5 t g5))) => ((s f4 mf s g4 e a4) (q c4 p e d4 e e4)) (position-filter '((1 0) (0 2)) '((q c4 p e d4 e e4) (s f4 mf s g4 e a4) …

Fix to INTERGER-TO-INTERVAL: (integer-to-interval '((-12) ((2 4) 5 19 -12 (2 4) 5 19))) => ((nil) ((14 2) 1 14 -31 (14 2) 1 14)) Test (interval-to-integer '((nil) ((14 2) 1 14 -31 (14 2) 1 14)) :start -12) => ((-12) ((2 4) 5 19 -12 (2 4) 5 19)) (interval-to-pitch '((nil) ((14 2) 1 14 -31 (14 2) 1 14)) :start -12) => ((c3) (d4e4 f4 g5 c3 d4e4 f4 g5))