]> git.sur5r.net Git - cc65/blobdiff - libsrc/geos-common/conio/cgetc.s
Apply "improved" cursor-off handling for native GEOS API too.
[cc65] / libsrc / geos-common / conio / cgetc.s
index 94fd55ef024bcaa8097f276ab93b3f65e8f0f232..2c0f19a515563bd85967a92d26d24a8091f1709b 100644 (file)
@@ -7,7 +7,7 @@
 ; unsigned char cgetc (void);
 
            .export _cgetc
-           .import cursor
+           .import cursor, _PromptOff
            .importzp cursor_x, cursor_y
 
            .include "jumptab.inc"
@@ -33,15 +33,7 @@ L0:  jsr GetNextChar
        tax
        beq L0
        pha
-
-; from 'The Hitchhiker's Guide To GEOS'
-       php
-       sei
-       jsr PromptOff
-       lda #0
-       sta alphaFlag
-       plp
-
+       jsr _PromptOff
        pla
        ldx #0
        rts