]> git.sur5r.net Git - cc65/blobdiff - libsrc/cbm/chline.s
Beautified comment.
[cc65] / libsrc / cbm / chline.s
index 26603b2febbbcdcfa77dfcb1a6f36b8e6669e79d..73782f344ec283fe3401bebc1b2ac2c818251ccf 100644 (file)
@@ -6,25 +6,20 @@
 ;
 
         .export         _chlinexy, _chline
-        .import         popa, _gotoxy, cputdirect
-        .importzp       tmp1
+        .import         gotoxy, cputdirect
+        .importzp       tmp1, chlinechar
 
 _chlinexy:
         pha                     ; Save the length
-        jsr     popa            ; Get y
-        jsr     _gotoxy         ; Call this one, will pop params
+        jsr     gotoxy          ; Call this one, will pop params
         pla                     ; Restore the length
 
 _chline:
         cmp     #0              ; Is the length zero?
         beq     L9              ; Jump if done
         sta     tmp1
-L1:     lda     #64             ; Horizontal line, screen code
+L1:     lda     #chlinechar     ; Horizontal line, screen code
         jsr     cputdirect      ; Direct output
         dec     tmp1
         bne     L1
 L9:     rts
-
-
-
-