shorter ClearScreen

2022-08-05 23:56:27 -04:00
parent 2bec64c38e
commit 312bca4866
2 changed files with 8 additions and 9 deletions
@@ -464,17 +464,16 @@ endcircleloop
 ;--------------------------------------------------
 .proc ClearScreen
 ;--------------------------------------------------
-
+    mwa #display temp
-    lda #$ff
+    ldy #0
-    ldx #0
+@     lda #$ff
-@
+      sta (temp),y
-    :31 sta display+($100*#),x
+      inw temp
-    sta display+$1e50,x  ; this is so no space outside of the screen is cleared
+      cpw temp #display+screenheight*screenBytes+1
                         ; of course we are clearing $100 instead of $50, but who cares :]
    inx
    bne @-
   rts 
 .endp
 ;-------------------------------*------------------
 .proc placetanks
 ;--------------------------------------------------