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     })