From: Greg King <gregdk@users.sf.net>
Date: Fri, 23 Aug 2013 22:19:49 +0000 (-0400)
Subject: Added cursor-flags initiation.
X-Git-Tag: V2.15~238^2
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=1a4d804a5f471ce27dc1cd08e1fc9be762938f9f;p=cc65

Added cursor-flags initiation.

The CBM510 runs programs in a non-system memory bank. It has its own zero page. Some things are copied from the system zero page; but, the cursor flags weren't copied. So, the cursor always blinked. That bug sometimes left cursor ghosts (reversed spaces) at the end of lines.
---

diff --git a/libsrc/cbm510/crt0.s b/libsrc/cbm510/crt0.s
index 871fbb850..836038a06 100644
--- a/libsrc/cbm510/crt0.s
+++ b/libsrc/cbm510/crt0.s
@@ -56,9 +56,9 @@
 
 ;------------------------------------------------------------------------------
 ; A table that contains values that must be transfered from the system zero
-; page into out zero page. Contains pairs of bytes, first one is the address
+; page into our zero page. Contains pairs of bytes; first one is the address
 ; in the system ZP, second one is our ZP address. The table goes into page 2,
-; but is declared here, because it is needed earlier.
+; but is declared here because it is needed earlier.
 
 .SEGMENT        "PAGE2"
 
@@ -67,6 +67,8 @@
         .byte   $9F, DEVNUM
         .byte   $CA, CURS_Y
         .byte   $CB, CURS_X
+        .byte   $E6, CURS_FLAG
+        .byte   $E7, CURS_BLINK
         .byte   $EC, CHARCOLOR
 
 .endproc