7 .export soft80_cpeekc, soft80_cpeekchar
39 ; test non-inverted character (left side)
48 cmp soft80_hi_charset+(line*$80),x
59 txa ; return char in A
60 ldx #$00 ; revers flag
67 ; test inverted character (left side)
77 cmp soft80_hi_charset+(line*$80),x
88 txa ; return char in A
89 ldx #$01 ; revers flag
105 ; test non-inverted character (right side)
114 eor soft80_lo_charset+(line*$80),x
126 ; test inverted character (right side)
135 eor soft80_lo_charset+(line*$80),x