; This is self-modifying code!\r
BANKS = VIDEORAMSIZE / $100\r
\r
-_clrscr: LDA #$20 ;' '\r
- LDY #BANKS\r
- LDX #$00\r
-STALOC: 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
- RTS\r
+_clrscr:\r
+ lda #$20 ;' '\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
+ rts\r