[Common Lisp] Common Music

Common Music をいじってみた。Common Music とは "an object-oriented music composition environment".

他には OpenMusic というのもある。Common Lisp は Music が充実している。きっと MCL のおかげなんだろうな。

Common Music の全体像がまだ分からないけど、ひとまず MIDI で音を鳴らしてみた。音を鳴らすには timidity が必要。

(eval-when (:compile-toplevel :load-toplevel :execute)
  (require :cm)
  (in-package :cm))
(events (process for i in '(c d e 0 c d e 0 g e d c d e c 0
                            g g e g a a g 0 e e d d c)
                 output (new midi :time (now) :keynum i)
                 wait 0.5) "b.midi")

とっかかりとしては Common Music Tutorials あたりがよさそう。