8 ldx #$00 ; Assume revers off
11 ldx #$80 ; Load on value
12 ldy #$00 ; Assume old value is zero
13 L1: lda RVS ; Load old value
14 stx RVS ; Set new value
15 beq L2 ; Jump if old value zero
16 iny ; Make old value = 1
17 L2: ldx #$00 ; Load high byte of result
18 tya ; Load low byte, set CC
22 ;-------------------------------------------------------------------------------
23 ; force the init constructor to be imported
26 conio_init = initconio