From: ol.sc Date: Mon, 7 Sep 2009 14:00:17 +0000 (+0000) Subject: Just presume alternate charset to be active on the //e - how shouldn't it if conio... X-Git-Tag: V2.13.0rc1~129 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=96b731dd96c77f899f44a5e5bfdb8fa8fb1f25c6;p=cc65 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 --- 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