From 96b731dd96c77f899f44a5e5bfdb8fa8fb1f25c6 Mon Sep 17 00:00:00 2001
From: "ol.sc"
Date: Mon, 7 Sep 2009 14:00:17 +0000
Subject: [PATCH] Just presume alternate charset to be active on the //e - how
shouldn't it if conio usage activates it.
git-svn-id: svn://svn.cc65.org/cc65/trunk@4127 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
libsrc/apple2/mcbdefault.s | 27 ++++++++-------------------
1 file changed, 8 insertions(+), 19 deletions(-)
diff --git a/libsrc/apple2/mcbdefault.s b/libsrc/apple2/mcbdefault.s
index f270f9d70..c7c51a576 100644
--- a/libsrc/apple2/mcbdefault.s
+++ b/libsrc/apple2/mcbdefault.s
@@ -7,9 +7,6 @@
; be called from an interrupt handler
;
- .ifdef __APPLE2ENH__
- .constructor initmcb
- .endif
.export _mouse_def_callbacks
.include "apple2.inc"
@@ -31,24 +28,16 @@ _mouse_def_callbacks:
.addr movex
.addr movey
-; ------------------------------------------------------------------------
-
- .segment "INIT"
-
- .ifdef __APPLE2ENH__
-initmcb:
- lda ALTCHARSET ; Alternate charset switched in?
- bpl :+ ; No, normal charset
- lda #'B' ; MouseText character
- sta cmpcur+1
- sta getcur+1
-: rts
- .endif
-
; ------------------------------------------------------------------------
.data
+ .ifdef __APPLE2ENH__
+cursor = 'B' ; MouseText character
+ .else
+cursor = '+' | $40 ; Flashing crosshair
+ .endif
+
getcursor:
.ifdef __APPLE2ENH__
bit RD80VID ; In 80 column mode?
@@ -57,11 +46,11 @@ switch: bit LOWSCR ; Patched at runtime
.endif
column: ldx #$00 ; Patched at runtime
getscr: lda $0400,x ; Patched at runtime
-cmpcur: cmp #'+' | $40 ; Possibly patched by initialization
+ cmp #cursor
rts
setcursor:
-getcur: lda #'+' | $40 ; Possibly patched by initialization
+ lda #cursor
setscr: sta $0400,x ; Patched at runtime
.ifdef __APPLE2ENH__
bit LOWSCR ; Doesn't hurt in 40 column mode
--
2.39.5