Jump to content

Opusmodus 1.3.24844


Recommended Posts

– New function:

CHORD-PROGRESSION - sorts a sequence of chords and pitches to the lowest or highest chord note.

 

– Update:
AMBITUS function allows range smaller than 6 semitones.

– Fixed:
Quick Start - Lesson 1 - OMN


– Documentation updates.

 

 

CHORD-PROGRESSION

This function will sort a sequence of chords and pitches to the lowest or highest chord note.

 

Sorting to lowest chord note:

(chord-progression '(g2g3 a2a4 a2a3 g2d4 g2g4 a2e4))
=> (g2g3 g2d4 g2g4 a2a3 a2e4 a2a4)

8C229A3B-7A0A-4A60-9F76-7E174F8F2006.png

 

Sorting to highest chord note:

(chord-progression '(g2g3 a2a4 a2a3 g2d4 g2g4 a2e4) :sort 'high)
=> (g2g3 a2a3 g2d4 a2e4 g2g4 a2a4)

D720E44F-2DB9-4991-A10D-13B9B641C1E9.png

 

 

Examples:

(setf omn '((q d4a4g5 fs4eb5bb5 eb4fs5d5 bb4g5a5 fs4eb5d6 bb4a5g6)
            (q g4d4a4 bb4fs4eb4 a4g5d6 eb5bb5fs6 bb4a5g5 eb5d5fs5)))

 

C55A2624-602A-4AB6-ADB5-17DF01D8423C.png

(chord-progression omn)

 

750710D7-D622-4A6F-9D63-59CA94443202.png

 

(chord-progression omn :sort 'high)

 

984D68A2-4876-4626-A829-714346AD9A8A.png

 

 

(chord-progression omn :sort '(high low) :reverse '(nil t))

DE0788C8-062C-4EDE-937F-884B0BBFE945.png

 

Best wishes,

Janusz

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

Terms of Use Privacy Policy