2 ; void clrscr (void);
\r
7 .include "osic1p.inc"
\r
9 ; Adapted from the Challenger Character Graphics
\r
10 ; Reference Manual, "2.3.3 MACHINE LANGUAGE SCREEN CLEAR"
\r
11 ; This is self-modifying code!
\r
12 BANKS = VIDEORAMSIZE / $100
\r
25 lda #>(SCRNBASE) ; Load high byte
\r
26 sta staloc+2 ; Restore base address
\r
28 lda #$00 ; Cursor in upper left corner
\r
31 jmp plot ; Set the cursor position
\r