X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fgeos%2Fconio%2Frevers.s;fp=libsrc%2Fgeos%2Fconio%2Frevers.s;h=0000000000000000000000000000000000000000;hb=e6d74e7205c1fc2fe90e0e69465c62c5587b7155;hp=cd5ea66bb997e29c9b8c98acf5f498bccbdde187;hpb=70a3bcb0df2afc4ccd9c60e000a2402254fa1240;p=cc65 diff --git a/libsrc/geos/conio/revers.s b/libsrc/geos/conio/revers.s deleted file mode 100644 index cd5ea66bb..000000000 --- a/libsrc/geos/conio/revers.s +++ /dev/null @@ -1,36 +0,0 @@ - -; -; Maciej 'YTM/Elysium' Witkowiak -; -; 27.10.2001 - -; unsigned char revers (unsigned char onoff); - - .export _revers - .importzp tmp1 - - .include "../inc/geossym.inc" - .include "../inc/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