        
  iny
  jmp @next_char

@end_string:
  jsr cursor_on
  rts



; -------------------------------------
; delete screen line 
; (Erase Line)
;
; line number in X
;
; erase_line_by_vector needs line vectors in temp_ptr_x 
;                         and temp_ptr_y
;
; destroys all registers
; returns $20 (space) in A
; -------------------------------------

erase_line_by_number:
  jsr set_line_vectors ; line start in temp_ptr_x
          ; col  start in temp_ptr_y

; erase cha