Opusmodus 1.1.17640

[opmo]

We are excited to announce new functions in Opusmodus and we hope you will find them helpful in your work.

 

NEW:

Spectral Composition Tools

;;; Spectral Tools
(import-spectral-spear "Imports spectral data from the SPEAR application.")
(highest-partial "Returns the highest partial value of a given collection of partials data.")
(lowest-partial "Returns the lowest partial value of a given collection of partials data.")
(normalize-partials "Returns a float-vector with the amplitudes normalized so that their magnitudes add to 1.0.")
(partial-divide "Divide a list of partials into sublists of a given length.")
(partial-row "Converts frequency data of partials into a unique pitch row (each pitch becoming a root).")
(partial "Returns partials of a given type of data.")
(partial-remove "Removes partials from a given type of data with its value (min, max).")
(partial-sort "Sorts partials of a given data type.")

 

PITCH-ROW

This function allows a pitch series to be altered into a unique pitch row (each pitch is quasi a root). 

(setf mat 
      (vector-to-pitch
       'piano
       (mod-sine-waves
        4 64 4 0.6
        :modulation (gen-sine 64 1 '(0.5 0.2 0.1) :phase 60))))

=> (f4 cs6 gs7 b7 f7 c7 bb3 g3 e2 a0 bb0 a0 fs4 fs2
    fs2 d6 bb6 c7 a0 b0 bb0 a0 b7 gs7 c7 bb7 bb4 b2
    b4 a0 a0 d1 eb6 bb2 d2 e3 b6 eb4 d3 c2 bb0 cs7
    a0 a2 cs3 f7 c7 e6 d7 eb7 f2 a0 g7 gs7 a7 c5
    cs1 c5 bb7 c8 e6 b2 bb3 fs6)

(pitch-row mat)
=> (f4 cs6 gs7 b7 c7 bb3 g3 e2 a0 fs4 d6 eb6)

 

More options have been added to:

 

CREATE-LIBRARY 

Another option we have is to save the library output as a file directly into the DEF-LIBRARY directory. To do that we use the :file keyword. The :file name must be a string "name-of-the-file".

(create-library 'Binary-Rhythmics '4-bit-binary 'bin
                (combination2 4 '(1 0 1 0))
                :file "4-bit-library")

We also can add an annotation (e.g. explanation or comment) by using the :note keyword:

(create-library 'Binary-Rhythmics '4-bit-binary 'bin
                (combination2 4 '(1 0 1 0))
                :file "4-bit-library"
                :note "Library explanation or comment")

The next time we open the application the file will load at the start and will be ready for use.

 

LIBRARY

(library 'binary-rhythmics '4-bit-binary 'bin15)
=> (1 1 1 1)

(library 'binary-rhythmics '4-bit-binary nil
         :random 10)
=> ((1 1 0 1) (1 0 1 1) (0 1 0 1)
    (0 1 0 1) (1 1 0 1) (0 1 0 0)
    (0 0 1 0) (1 0 0 0) (0 1 1 0)
    (0 1 1 0))

(library 'binary-rhythmics '4-bit-binary nil
         :collect '(1 2 3 2 1))
=> ((0 0 0 1) (0 0 1 0) (0 0 1 1)
    (0 0 1 0) (0 0 0 1))

(library 'binary-rhythmics '4-bit-binary nil
         :collect :all)

Above there is an example of a defined library file followed by four possible output options. The first is to output a single library entry. The second picks 10 entries at random. The third allows an integer list to determine which entries in the library list can be collected together in a set order. The fourth :all will collect the entire library.