Jump to content

Chord variations (chordal rotation)


Recommended Posts

PITCH-ROTATE
(flatten-sublist
 (gen-loop 12
           (pitch-rotate
            (rnd-sample 12 (gen-integer -6 6))
            '((d4fs4a4 a4e5c5a4))) :seed 245))

=> ((d3fs3a3 e4c4a3a4)
    (d5fs5a5 a4a5e6c6)
    (e4c4a3a4 fs3a3d4)
    (a3d4fs4 a3a4e5c5)
    (e4c4a3a4 fs3a3d4)
    (e4c4a3a4 fs3a3d4)
    (d5fs5a5 a4a5e6c6)
    (c5a4a5e6 d5fs5a5)
    (d3fs3a3 e4c4a3a4)
    (a4e5c5a4 fs4a4d5)
    (a3a4e5c5 d4fs4a4)
    (e4c4a3a4 fs3a3d4))

 

pitch-rotate-01.png

 

GEN-CHORD2

(gen-chord2 12 '(4 3)
            '(c4 cs4 e4 eb4 b4 fs4 gs4 a4 bb4 d4 f4 g4)
            :offset '(2 3 -2)
            :transpose '(0 6 1 13)
            :rnd-octaves t
            :seed 83523)

=> (e5eb5b4fs4 c4d4eb4
    e4c4g4a4 g5a4bb4
    bb6d7f7g6 d6eb6e6
    b3eb4fs3gs3 gs4cs4d4
    d2f2g1c2 cs6fs5g5
    f1e1c1g1 cs7d7f6)

 

gen-chord2-01.png

 

CHORD-VARIATION

(gen-loop 12 (chord-variation '(d4fs4a4 a4e5c5a4)) :seed 3145)

=> ((d4bb3g3 a4d4fs4a4)
    (e5c5a4 a4d4fs4a4)
    (bb4fs4eb4 b5e5gs5b5)
    (d4bb3g3 a4d4fs4a4)
    (d4bb3g3 eb5gs4c5eb5)
    (bb4fs4eb4 eb5gs4c5eb5)
    (d4bb3g3 eb5gs4c5eb5)
    (bb4fs4eb4 a4d4fs4a4)
    (d4bb3g3 a4d4fs4a4)
    (e5c5a4 b5e5gs5b5)
    (bb4fs4eb4 a4d4fs4a4)
    (d4bb3g3 a4d4fs4a4))

 

chord-variation-01.png

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...

Important Information

Terms of Use Privacy Policy