Moved the 'conio' files from 'geos-cbm' to 'geos-common' which are believed to work as-is on Apple GEOS too.

git-svn-id: svn://svn.cc65.org/cc65/trunk@5486 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
ol.sc
2012-02-07 13:53:14 +00:00
parent 829609133c
commit b944a6acdf
17 changed files with 2 additions and 2 deletions

View File

@@ -0,0 +1,36 @@
;
; Maciej 'YTM/Elysium' Witkowiak
;
; 27.10.2001
; unsigned char revers (unsigned char onoff);
.export _revers
.importzp tmp1
.include "geossym.inc"
.include "const.inc"
_revers:
tax
bne L0 ; turn on
lda #0
.byte $2c
L0: lda #SET_REVERSE
sta tmp1
lda currentMode
tax
and #SET_REVERSE
tay ; store old value
txa
and #%11011111 ; mask out
ora tmp1 ; set new value
sta currentMode
ldx #0
tya
beq L1
lda #1
L1: rts