mp @check_for_reverse
; --- $20-$3f ---  interpunction
:
  cmp #$20
  bcc :+
  jmp @check_for_reverse   ; SC = PET
; --- $00-$1f ---  - illegal -
:
  jmp end_plot_char   ; no output

; --- handle reverse mode---
@check_for_reverse:
  ldx $c7     ; reverse mode?
  beq @put_char
  ora #$80    ; reverse char

; --- put char to screen ---
@put_char:
  ldy $d3     ; get crsr col
  cpy #$28    ;col = 40
  bcc @no_line_wrap
              ;the only way we end up trying to write to column 40 sho