]> git.sur5r.net Git - cc65/blobdiff - libsrc/cbm610/clrscr.s
Removed (pretty inconsistently used) tab chars from source code base.
[cc65] / libsrc / cbm610 / clrscr.s
index 6e620f44bfe6a3928da74b7b1f11bad01edfbe01..8ecc4b056d8f2a38c11f76991c2dc564f5fbdac4 100644 (file)
@@ -4,38 +4,38 @@
 ; void clrscr (void);
 ;
 
-       .export         _clrscr
-       .import         plot
+        .export         _clrscr
+        .import         plot
         .import         CURS_X: zp, CURS_Y: zp, CharPtr: zp
 
-       .include        "cbm610.inc"
+        .include        "cbm610.inc"
 
-.proc  _clrscr
+.proc   _clrscr
 
-       lda     #0
-       sta     CURS_X
-       sta     CURS_Y
-               jsr     plot            ; Set cursor to top left corner
+        lda     #0
+        sta     CURS_X
+        sta     CURS_Y
+        jsr     plot            ; Set cursor to top left corner
 
-       lda     IndReg
-       pha
-       lda     #$0F
-       sta     IndReg          ; Switch to the system bank
+        lda     IndReg
+        pha
+        lda     #$0F
+        sta     IndReg          ; Switch to the system bank
 
-       ldx     #8
-       ldy     #$00
-       lda     #$20            ; Screencode for blank
-L1:    sta     (CharPtr),y
-       iny
-       bne     L1
-       inc     CharPtr+1
-       dex
-       bne     L1
+        ldx     #8
+        ldy     #$00
+        lda     #$20            ; Screencode for blank
+L1:     sta     (CharPtr),y
+        iny
+        bne     L1
+        inc     CharPtr+1
+        dex
+        bne     L1
 
-       pla
-       sta     IndReg          ; Restore old indirect segment
+        pla
+        sta     IndReg          ; Restore old indirect segment
 
-       jmp     plot            ; Set screen pointer again
+        jmp     plot            ; Set screen pointer again
 
 .endproc