; void __fastcall__ textframe (unsigned char width, unsigned char height,
; unsigned char style);
;
+ .ifdef __APPLE2ENH__
.export _textframexy, _textframe
.import popa, pusha, _gotoxy
; - hibit set means normal printable character
; - hibit clear means MouseText character
CHAR: .byte '_'|$80, '_', 'L', 'Z', 'L', 'Z', '_'|$80, '_'
+
+ .endif ; __APPLE2ENH__
;
; unsigned __fastcall__ videomode (unsigned mode);
;
+ .ifdef __APPLE2ENH__
.export _videomode
.import COUT
bpl :+
lda #$12 ; Ctrl-char code for 80 cols
: rts ; X was preserved all the way
+
+ .endif ; __APPLE2ENH__