For the CBM platforms, make revers() machine dependent and use the RVS flag
of the different machines instead of a separate one. For the C128, make the textcolor() function work in 40 and 80 column mode. git-svn-id: svn://svn.cc65.org/cc65/trunk@1787 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -56,7 +56,6 @@ S_OBJS = c_acptr.o \
|
||||
oserrlist.o \
|
||||
oserror.o \
|
||||
read.o \
|
||||
revers.o \
|
||||
rwcommon.o \
|
||||
scratch.o \
|
||||
sysremove.o \
|
||||
|
||||
@@ -1,26 +0,0 @@
|
||||
;
|
||||
; Ullrich von Bassewitz, 07.08.1998
|
||||
;
|
||||
; unsigned char revers (unsigned char onoff);
|
||||
;
|
||||
|
||||
.export _revers
|
||||
.export revers
|
||||
|
||||
_revers:
|
||||
ldx #$00 ; Assume revers off
|
||||
tay ; Test onoff
|
||||
beq L1 ; Jump if off
|
||||
ldx #$80 ; Load on value
|
||||
L1: ldy #$00 ; Assume old value is zero
|
||||
lda revers ; Load old value
|
||||
stx revers ; Set new value
|
||||
beq L2 ; Jump if old value zero
|
||||
iny ; Make old value = 1
|
||||
L2: ldx #$00 ; Load high byte of result
|
||||
tya ; Load low byte, set CC
|
||||
rts
|
||||
|
||||
.bss
|
||||
|
||||
revers: .res 1
|
||||
Reference in New Issue
Block a user