summaryrefslogtreecommitdiff
path: root/dev
diff options
context:
space:
mode:
authorJake Zerrer <him@jakezerrer.com>2025-11-11 16:58:11 -0500
committerJake Zerrer <him@jakezerrer.com>2025-11-12 13:58:44 -0500
commit6641ad40b168ed505659b305531da05bfe9d6e6d (patch)
tree838493514e495114b9520c4871c45eaf6675d46b /dev
parent63b89561d3d4da125cbea5eb98572621f76b08fd (diff)
Prepare for talk
Diffstat (limited to 'dev')
-rw-r--r--dev/scratch.clj8
1 files changed, 4 insertions, 4 deletions
diff --git a/dev/scratch.clj b/dev/scratch.clj
index 0115233..315df29 100644
--- a/dev/scratch.clj
+++ b/dev/scratch.clj
@@ -4,7 +4,8 @@
[unheard.instrument.minilab3 :as minilab3]
[unheard.instrument.omx-27 :as omx-27]
[unheard.theory :refer [note poly]]
- [missionary.core :as m]))
+ [missionary.core :as m])
+ (:import [javax.sound.midi ShortMessage]))
#_(print-all-midi-devices)
@@ -22,6 +23,7 @@
(poly
(triad clock tonic)
+ #_
(triad clock (m/latest #(+ % 12) tonic))
;; The rest of the "song" is a drum pattern.
@@ -64,7 +66,5 @@
p (song song-config)]
(m/?< (m/latest vector clock p))))))))
-#_(def cancel
- (run prn prn))
-#_(cancel)
+(def cancel (run {} {}))