X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fc128%2Frevers.s;h=f19400b9a0e85b3f59781ec09330d11a876302d2;hb=7ebaec18024dc2a94de538637c20c5b4c65e530c;hp=f722c84a832b9ff182ce3a6d7c269ffca0913d43;hpb=36fe6284a84a279ab94c47a74a6bb572e1aa0e0a;p=cc65 diff --git a/libsrc/c128/revers.s b/libsrc/c128/revers.s index f722c84a8..f19400b9a 100644 --- a/libsrc/c128/revers.s +++ b/libsrc/c128/revers.s @@ -4,24 +4,24 @@ ; unsigned char revers (unsigned char onoff); ; - .export _revers + .export _revers .include "c128.inc" .proc _revers - ldx #$00 ; Assume revers off - tay ; Test onoff - beq L1 ; Jump if off - ldx #$80 ; Load on value - ldy #$00 ; Assume old value is zero -L1: lda RVS ; Load old value - stx RVS ; 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 + ldx #$00 ; Assume revers off + tay ; Test onoff + beq L1 ; Jump if off + ldx #$80 ; Load on value + ldy #$00 ; Assume old value is zero +L1: lda RVS ; Load old value + stx RVS ; 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 .endproc