mardi 16 février 2010

hz to midicent in LISP

Bon,

pour ceux que ça intéresse voici comment faire la conversion de fréquence (hz) vers note midi en LISP:

(round (+ (* 12 (log (/ FREQUENCE 440) 2)) 69))

et bonne soirée!
Publié par à l'adresse

1 commentaires:

  1. (defun freq-to-midic (listpraat)
    (loop for (a b c) in listpraat
    ;mettre les frequences hz en midicents
    ;n = 69 + 12*log(freq/440)/log(2)

    for y = (round (* 100 (+ 69 (/ (* 12 (log (/ b 440)) ) (log 2)))))
    collect (list a y c)
    )
    )

    RépondreSupprimer

Inscription à : Publier les commentaires (Atom)