# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1340418347 18000
# Node ID bc24e4d605e9f3ac299975d712428579183e5ff2
# Parent  7eac27143ab995d91f4e925ffa7f78263048c75c
switched tile and pallette assembly.

diff -r 7eac27143ab9 -r bc24e4d605e9 clojure/com/aurellem/run/image.clj
--- a/clojure/com/aurellem/run/image.clj	Fri Jun 22 21:24:44 2012 -0500
+++ b/clojure/com/aurellem/run/image.clj	Fri Jun 22 21:25:47 2012 -0500
@@ -608,24 +608,24 @@
             character-data-address
             (flatten
              (map gb-tile->bytes (:tiles gb-image))))
-           (select-LCD-bank 1)]
+           (select-LCD-bank 0)]
         B (flatten B)
 
         
-        C [;; [X] specifiy pallets for each character
+        C [;; [X] write image to the screen in terms of tiles
            (write-image
             (+ base-address (+ (count A) (count B)))
             BG-1-address
-            (map second (:data gb-image)))
-           (select-LCD-bank 0)]
+            (map first (:data gb-image)))
+           (select-LCD-bank 1)]
 
         C (flatten C)
 
-        D [;; [X] write image to the screen in terms of tiles
+        D [;; [X] specifiy pallets for each character
            (write-image
             (+ base-address (+ (count A) (count B) (count C)))
             BG-1-address
-            (map first (:data gb-image)))
+            (map second (:data gb-image)))
            
 
            ;; [X] reactivate the LCD display