From: Stephan Mühlstrasser Date: Sun, 16 Nov 2014 20:57:59 +0000 (+0100) Subject: Adapt to assembler coding conventions. X-Git-Tag: V2.15~22^2~51 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=a20bba0f1e2abd23b79e920bb1504dfdc44a873c;p=cc65 Adapt to assembler coding conventions. --- diff --git a/libsrc/c1p/clrscr.s b/libsrc/c1p/clrscr.s index f219a4550..5550d1d75 100644 --- a/libsrc/c1p/clrscr.s +++ b/libsrc/c1p/clrscr.s @@ -9,15 +9,17 @@ ; This is self-modifying code! BANKS = VIDEORAMSIZE / $100 -_clrscr: LDA #$20 ;' ' - LDY #BANKS - LDX #$00 -STALOC: STA SCRNBASE,X - INX - BNE STALOC - INC STALOC+2 - DEY - BNE STALOC - LDA #>(SCRNBASE) ; load high byte - STA STALOC+2 ; restore base address - RTS +_clrscr: + lda #$20 ;' ' + ldy #BANKS + ldx #$00 +staloc: + sta SCRNBASE,X + inx + bne staloc + inc staloc+2 + dey + bne staloc + lda #>(SCRNBASE) ; load high byte + sta staloc+2 ; restore base address + rts