# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1346511859 18000
# Node ID 9159187bbf268d86112099633be8ba25a8e65f50
# Parent  bbed038700721c8a57fe5266dad329c77b5384e6
fixed problem in clear-screen.

diff -r bbed03870072 -r 9159187bbf26 clojure/com/aurellem/run/adv_choreo.clj
--- a/clojure/com/aurellem/run/adv_choreo.clj	Sat Sep 01 10:02:25 2012 -0500
+++ b/clojure/com/aurellem/run/adv_choreo.clj	Sat Sep 01 10:04:19 2012 -0500
@@ -160,7 +160,7 @@
                 ;; Reset HL to initial value
 
                 ;; clear screen if we are at 0,0
-                0x57 0xB3 ;; D->A, OR E A ==> (= D E 0)
+                0x7A 0xB3 ;; D->A, OR E A ==> (= D E 0)
                 0x20 ;; skip clear-screen if D and E are not both zero
                 :clear-screen-length])