 stop at left..
  lda #$00    ; ..margin
:
  tay         ; y is col
  ldx $d6     ; x is row
  jsr cursor_plot   ; set crsr
  jmp @end_escape_seq

; --- m ---  font attributes
@not_D:
  cmp #$6d    ; m?
  bne @not_m
@next_font_attribute:
  jsr get_number_from_esc_seq
  pha         ; save nondigit char
  lda escape_parameter    ; parameter to A
  ; -- 0 --
  bne :+    ; 0?
  sta font_mode    ; set font = vanilla
  sta $c7     ; reverse off
  jmp @end_font_attribute    ; jmp next par
  ; 