tore crsr
  cmp #$38    ; 8?
  bne :+
  ldx saved_row ; restore pos
  ldy saved_column
  jsr cursor_plot
  lda saved_reverse_mode   ; restore ..
  sta $c7     ; .. reverse mode
  ldx saved_font_mode   ; restore font
  stx font_mode
  lda font_attribute_table,x
  sta $0286   ; set colour
  jmp done_escape

; --- unknown ---
:   
; --- reset ESC mode ---
done_escape:
  lda #$00    ; reset escape_mode
  sta escape_mode
  rts 

; --- set Discard mode ---
set_discard_mode:
  lda #$f0    ;