Mercurial > vba-clojure
diff clojure/com/aurellem/run/music.clj @ 482:346b91ae503a
adjusted drum beats.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 05 May 2012 06:19:55 -0500 |
parents | 221b3fea9221 |
children | a6d060a64246 |
line wrap: on
line diff
1.1 --- a/clojure/com/aurellem/run/music.clj Fri May 04 09:03:34 2012 -0500 1.2 +++ b/clojure/com/aurellem/run/music.clj Sat May 05 06:19:55 2012 -0500 1.3 @@ -392,6 +392,7 @@ 1.4 (->signed-8-bit (+ 1.5 ;; two music-steps 1.6 (- (* 2 (count (music-step 0 0 false)))) 1.7 + ;; one noise 1.8 (- (count (music-step nil nil true))) 1.9 -2 ;; this jump instruction 1.10 -2 ;; activate frame 1 1.11 @@ -542,7 +543,7 @@ 1.12 1.13 (def midi-code->gb-noise-code 1.14 {nil 0xFF 1.15 - 35 87 1.16 + 35 90 1.17 38 20 1.18 39 0 1.19 })