Mercurial > vba-clojure
diff clojure/com/aurellem/run/basic_choreo.clj @ 551:b69a3dba8045
condensed gameboy program into a contigous sequence of bytes.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Thu, 30 Aug 2012 11:19:52 -0500 |
parents | 6ce1d5fd4911 |
children | 96ee9d72aeb9 |
line wrap: on
line diff
1.1 --- a/clojure/com/aurellem/run/basic_choreo.clj Thu Aug 30 09:32:57 2012 -0500 1.2 +++ b/clojure/com/aurellem/run/basic_choreo.clj Thu Aug 30 11:19:52 2012 -0500 1.3 @@ -32,10 +32,10 @@ 1.4 ([script] 1.5 (let [bytes (midi-bytes 1.6 pony-csv 1.7 + music-program-start 1.8 0xC400 1.9 0xC800 1.10 - 0xCC00 1.11 - music-program-start)] 1.12 + 0xCC00)] 1.13 (->> script 1.14 (write-RAM (:address (:voice-1 bytes)) 1.15 (:data (:voice-1 bytes)))