view tools/package.lisp @ 329:f54848e1f74c

Flag use of cents; define diatonic-pitch correctly for cents

(cl:defpackage #:amuse-tools
  (:use #:common-lisp #:amuse #:amuse-utils #:midi)
  (:export #:play
	   #:write-midi
	   #:make-midi
	   #:global-messages
	   #:tempo-message
	   #:event-messages
	   #:get-patch-for-midi
	   #:get-channel-for-midi
	   #:get-pitch-for-midi
	   #:get-velocity-for-midi
	   #:default-tempo-for-midi
	   ))