]> git.sur5r.net Git - cc65/blobdiff - libsrc/pet/clrscr.s
Dito for the enhanced apple2
[cc65] / libsrc / pet / clrscr.s
index 2cabcc0841f4baff216af36944d5e7e540fd30e5..426a8c5ade5c838ca7c668037260b52d03e3609b 100644 (file)
@@ -7,7 +7,6 @@
        .export         _clrscr
        .import         plot
                .importzp       ptr1
-       .import         xsize
 
        .include        "pet.inc"
 
@@ -23,9 +22,9 @@ _clrscr:
 ; Determine, how many pages to fill
 
        ldx     #4
-       lda     xsize
-       cmp     #40
-               beq     L1
+       lda     SCR_LINELEN     ; Check length of one line
+       cmp     #40+1
+               bcc     L1
        ldx     #8
 
 ; Clear the screen