7 .include "osic1p.inc"
\r
10 ; Input routine from 65V PROM MONITOR, show cursor if enabled
\r
12 lda cursor ; show cursor?
\r
15 lda (SCREEN_PTR),y ; fetch current character
\r
16 sta CURS_SAV ; save it
\r
17 lda #$A1 ; full white square
\r
18 sta (SCREEN_PTR),y ; store at cursor position
\r
21 pha ; save retrieved character
\r
22 lda cursor ; was cursor on?
\r
24 lda CURS_SAV ; fetch saved character
\r
26 sta (SCREEN_PTR),y ; store at cursor position
\r
28 pla ; restore retrieved character
\r