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