]> git.sur5r.net Git - cc65/blobdiff - libsrc/atari/cclear.s
Removed (pretty inconsistently used) tab chars from source code base.
[cc65] / libsrc / atari / cclear.s
index 8ab7dee968460cbbd5519e4ce2144d929ad562a4..ceb17aca569a6fc31e56df0a119c4205c5242954 100644 (file)
@@ -5,25 +5,25 @@
 ; void cclear (unsigned char length);
 ;
 
-       .export         _cclearxy, _cclear
-       .import         popa, _gotoxy, cputdirect
-       .importzp       tmp1
+        .export         _cclearxy, _cclear
+        .import         popa, _gotoxy, cputdirect
+        .importzp       tmp1
 
 _cclearxy:
-               pha                     ; Save the length
-       jsr     popa            ; Get y
-               jsr     _gotoxy         ; Call this one, will pop params
-               pla                     ; Restore the length and run into _cclear
+        pha                     ; Save the length
+        jsr     popa            ; Get y
+        jsr     _gotoxy         ; Call this one, will pop params
+        pla                     ; Restore the length and run into _cclear
 
 _cclear:
-               cmp     #0              ; Is the length zero?
-               beq     L9              ; Jump if done
-       sta     tmp1                                 
-L1:            lda     #0              ; Blank - screen code
-       jsr     cputdirect      ; Direct output
-       dec     tmp1
-       bne     L1
-L9:    rts
+        cmp     #0              ; Is the length zero?
+        beq     L9              ; Jump if done
+        sta     tmp1                                 
+L1:     lda     #0              ; Blank - screen code
+        jsr     cputdirect      ; Direct output
+        dec     tmp1
+        bne     L1
+L9:     rts