Hi,

would it be possible to get the same result as harmonic-progression with the diatonic-chord function?
thanks for your help

 

(setf a (harmonic-progression '(1 6 2 5 3 6 2 5 1) scale :base 1 :size 3 :step '((2 2))))

(setf cad1 (diatonic-chord '(:c I vi ii V III vi ii v I)))

Furthermore, I notice the pitch-melodize function does not react in the same way with: harmonic-progression and diatonic-chord

can someone explain?

 

Ok!

this is original

(setf scale '(c4 d4 e4 f4 g4 a4 b4))

(setf a (harmonic-progression '(1 6 2 5 3 6 2 5 1) '(c major) :base 1 :size 3 :step '((2 1))))

I want to use secondary dominants for each 6th degree , I found this solution.  but I would like to keep the step argument, is it possible?

(setf wdoms (harmonic-progression '((0)(4)(1 4 2)(4)(1 4 0)) '((c4 major) (d4 major)(c4 major)(d4 major)(c4 major))))

 

Thank you for your help