\r
_clrscr:\r
lda #$20 ;' '\r
- ldy #BANKS\r
- ldx #$00\r
+ ldy #BANKS\r
+ ldx #$00\r
staloc:\r
- sta SCRNBASE,X\r
- inx\r
- bne staloc\r
- inc staloc+2\r
- dey\r
- bne staloc\r
- lda #>(SCRNBASE); load high byte\r
- sta staloc+2 ; restore base address\r
+ sta SCRNBASE,X\r
+ inx\r
+ bne staloc\r
+ inc staloc+2\r
+ dey\r
+ bne staloc\r
+ lda #>(SCRNBASE); load high byte\r
+ sta staloc+2 ; restore base address\r
\r
- lda #$00 ; cursor in upper left corner\r
+ lda #$00 ; cursor in upper left corner\r
sta CURS_X\r
sta CURS_Y\r
- jmp plot ; Set the cursor position\r
+ jmp plot ; Set the cursor position\r