6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-04-07 11:38:02 +00:00
Code Issues Projects Releases Wiki Activity

adapt to atarixl target

Browse Source
This commit is contained in:
Christian Groessler 2013-05-31 01:38:16 +02:00
parent c1468f11b2
commit 7aa2231702
1 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
libsrc/atari/cgetc.s
View File

@ -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