bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Adapt to assembler coding conventions.

Browse Source
This commit is contained in:
Stephan Mühlstrasser
2014-11-16 21:57:59 +01:00
parent 14958949c2
commit a20bba0f1e
1 changed files with 14 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
libsrc/c1p/clrscr.s
View File

@@ -9,15 +9,17 @@
; This is self-modifying code! ; This is self-modifying code!
BANKS = VIDEORAMSIZE / $100 BANKS = VIDEORAMSIZE / $100
_clrscr: LDA #$20 ;' ' _clrscr:
LDY #BANKS lda #$20 ;' '
LDX #$00 ldy #BANKS
STALOC: STA SCRNBASE,X ldx #$00
INX staloc:
BNE STALOC sta SCRNBASE,X
INC STALOC+2 inx
DEY bne staloc
BNE STALOC inc staloc+2
LDA #>(SCRNBASE) ; load high byte dey
STA STALOC+2 ; restore base address bne staloc
RTS lda #>(SCRNBASE) ; load high byte
sta staloc+2 ; restore base address
rts