Added option to disable the force-to-uppercase behavior of the apple2 target. (#2474)

* Added option to disable the force-to-uppercase behavior of the apple2 target. * Fixed dangling spaces.
2024-08-07 18:27:09 +02:00
parent 925a589b90
commit feb5026823
7 changed files with 52 additions and 2 deletions
--- a/libsrc/apple2/cputc.s
+++ b/libsrc/apple2/cputc.s
@@ -11,6 +11,9 @@
        .export         _cputcxy, _cputc
        .export         cputdirect, newline, putchar, putchardirect
        .import         gotoxy, VTABZ
+        .ifndef __APPLE2ENH__
+        .import         uppercasemask
+        .endif

        .include        "apple2.inc"

@@ -43,7 +46,7 @@ _cputc:
        .ifndef __APPLE2ENH__
        cmp     #$E0            ; Test for lowercase
        bcc     cputdirect
-        and     #$DF            ; Convert to uppercase
+        and     uppercasemask
        .endif

 cputdirect: