adapt to atarixl target

diff --git a/libsrc/atari/cgetc.s b/libsrc/atari/cgetc.s
index f8948a5bcb07eac6157f1674802ccc4a08c142e3..43969c2aad0172e04ea12d719887f7ce14642a2e 100644 (file)
--- a/libsrc/atari/cgetc.s
+++ b/libsrc/atari/cgetc.s
@@ -7,22 +7,28 @@
 
         .include "atari.inc"
         .export _cgetc,setcursor
+         .import KEYBDV_wrapper
         .import cursor,mul40
 
 _cgetc:
         jsr     setcursor
+        lda     #12
+        sta     ICAX1Z          ; fix problems with direct call to KEYBDV
+.if .not .defined(__ATARIXL__)
         jsr     @1
+.else
+       jsr     KEYBDV_wrapper
+.endif
         ldx     #0
         rts
 
-@1:     lda     KEYBDV+5
+.if .not .defined(__ATARIXL__)
+@1:    lda     KEYBDV+5
         pha
         lda     KEYBDV+4
         pha
-        lda     #12
-        sta     ICAX1Z          ; fix problems with direct call to KEYBDV
-        rts
-
+       rts
+.endif
 
 .proc   setcursor