Stephane Boussuge

Hi Torsten, very good and very interesting !! thank you for sharing this, i enjoy it greatly ! All the best S.

Sorry, it is length-legato function. S.

All fine here on Opera Browser.

filter-tie do the same , no ?

Hi, Here's a small Woodwinds quartet: SB

Dear Wim, thank you for your kind words. the transposition was chosen by hear. About the harmonic path, it come from my original idea mat1: (setf mat1 '(#|1|# (ped e a2 p ds3 a3 d4 q c5 fs4 ped+tie) #|2|# (ped w fs4) #|3|# (ped e a2 ds3 a3 d4 q c5 fs4 ped) #|4|# (ped q d5 h. c5) #|5|# (ped e a2 ds3 a3 d4 q c5 fs4) #|6|# (w fs4 ped1) #|7|# (ped e a2 ds3 a3 d4 q d5 c5 ped) #|8|# (w fs4 ped) )) ;;; get the harmonic content from basic material mat1 (setf hmat1 (get-harmonic-path mat1 :chord t :unique t :time '(ww))) After this extraction, i apply some transposition to this material (extended by gen-trim): ;;; Transpose list to apply to harmonic path (setf trsp2 '(-2 4 -2 2 8 -1 8 3 -3 2 6 0 1 0 -1 -1 4 4 9 7)) (setf path2 (pitch-transpose trsp2 (gen-trim 20 (mclist hmat1)))) And finally, i use chord-closest-path function for the voice leading: ;; chord closest path generation to use as harmonic material for variation 3 ;(setf closest-hpath2 (chord-closest-path (car path2) path2)) And i've added the output of this function directly in a variable because the computation time for chord-closest-path is a bit long and i like to be able to run my scripts very often when composing (for reading the score and hearing) and need fast evaluation: (setf closest-hpath2 '((g2cs3g3c4bb4e4) (g2cs3fs3cs4bb4e4fs5) (g2cs3g3c4bb4e4) (gs2d3f3b3b4e4e5) (gs2d3f3b3bb4f4) (gs2cs3gs3b3cs5f4d3) (gs2d3f3b3bb4f4) (fs2c3a3c4f4eb4f5) (fs2c3fs3b3a4eb4) (gs2d3f3b3b4e4e5) (gs2c3fs3eb4a4eb4) (fs2d3a3c4a4eb4d5) (g2cs3bb3bb3eb5e4) (fs2c3a3d4a4eb4d5) (gs2cs3gs3b3d5f4) (gs2cs3gs3b3cs5f4d3) (g2cs3fs3cs4bb4e4) (g2cs3fs3cs4bb4e4fs5) (fs2c3fs3b3a4eb4) (g2cs3a3bb3a4e4e4))) SB.

Name: Composing a piano prelude example Category: Howto Date Added: 2017-07-11 Submitter: Stephane Boussuge Here's a video (in French) i made for a friend to show her how i've used Opusmodus to compose my Piano prelude. SB. And the Link to the score script and full piece: Composing a piano prelude example

Here's a video (in French) i made for a friend to show her how i've used Opusmodus to compose my Piano prelude. SB.

Hi, for study purpose only, you will find attached to this post the score script of this Prelude for Piano. SB. PreludeForNicolai.opmo

Merci :-) Metropolis Ark 2 S.

Atmospheric Orchestral Miniature. SB.

You just have to create your folders and subfolder to create structure in Utility. S.

;; exemple d'utilisation des accords (setf path (tonality-series '((d4 min)(bb3 maj)(g3 min7)))) (setf seq '((e c4 d4 e4 f4 g4 a4 b4 c5)(e c4 d4 e4 f4 g4 a4 b4 c5)(e c4 d4 e4 f4 g4 a4 b4 c5))) (tonality-map path seq) But i think what could be more useful for you is to use harmonic-progressions system: (setf degree '(1 4 5 1 6 4 2 5 1)) (setf progression (harmonic-progression degree '(d4 natural-minor) :size 3 :base 1 )) => (d4f4a4 g4bb4d5 a4c5e5 d4f4a4 bb4d5f5 g4bb4d5 e4g4bb4 a4c5e5 d4f4a4) Once the chords generated this way, you can use them with tonality-series as an harmonic path: (setf path2 (tonality-series (mclist progression))) (tonality-map path2 '((e c4 d4 e4 f4 g4 a4 b4 c5)(e c4 d4 e4 f4 g4 a4 b4 c5)(e c4 d4 e4 f4 g4 a4 b4 c5))) => ((e d4 f4 f4 a4 a4 a4 d5 d5) (e g4 bb4 bb4 d5 d5 d5 g5 g5) (e a4 c5 c5 e5 e5 e5 a5 a5)) SB.