# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1331839930 18000
# Node ID c8b48102b17ca4ffb7c37e4934b12b92dd514c05
# Parent  d3c0b990e163df52b789245606000b104f05e4f5
saving progress

diff -r d3c0b990e163 -r c8b48102b17c clojure/com/aurellem/assembly.clj
--- a/clojure/com/aurellem/assembly.clj	Thu Mar 15 03:40:40 2012 -0500
+++ b/clojure/com/aurellem/assembly.clj	Thu Mar 15 14:32:10 2012 -0500
@@ -78,7 +78,7 @@
 (defn read-buttons []
   (let [button-pressed (tick (step (mid-game) [:d]))]
     (-> button-pressed
-        (IE! 0)
+        (IE! 0) ; disable interrupts
         (inject-item-assembly
          (concat
           ;; write 00010000 to 0xFF00 to select joypad
@@ -92,7 +92,7 @@
            0x01   ;D324                 ; load 0xFF00 into BC
            0x00   ;D325
            0xFF   ;D326
-           0x02   ;D327                 ; load (00010000) into FF00
+           0x02   ;D327    (BC)->A      ; load (00010000) into FF00
                                         ; to select directional
                                         ; buttons