
 ldx scroll_region_end     ; x = row = scroll_region_end   
@skip:
  ldy $d3     ; y is col
  jsr cursor_plot   ; set crsr
  jmp @end_escape_seq

; --- C --- crsr right
@not_B:
  cmp #$43    ; C?
  bne @not_C
  jsr get_number_from_esc_seq  ; get argument        
  lda escape_parameter    ; escape_parameter = 0...
  bne :+
  inc escape_parameter    ; .. means 1
:
  lda $d3     ; get crsr col        
  clc
  adc escape_parameter    ; col = col + right
  cmp #$27    ; outside screen?
  bcs