rs
erase_line_by_vector:
  ldy #$27      ; col 39
  lda #$20      ; load space
:
  sta (temp_ptr_x),y ; clear char
  dey 
  bpl :-

; set colour
  ldy #$27      ; col 39
  lda #charmode_vanilla      ; load vanilla
:  
  sta (temp_ptr_y),y ; clear char
  dey 
  bpl :-
  
  rts
        


; -------------------------------------
; delete screen line from crsr to end
; (Erase End of Line)
; destroys all registers
; -------------------------------------

erase_to_end_of_line:
  jsr cu