diff --git a/grafproc.asm b/grafproc.asm
index f25ef57..073a8e9 100644
--- a/grafproc.asm
+++ b/grafproc.asm
@@ -464,17 +464,16 @@ endcircleloop
 ;--------------------------------------------------
 .proc ClearScreen
 ;--------------------------------------------------
-
-    lda #$ff
-    ldx #0
-@
-    :31 sta display+($100*#),x
-    sta display+$1e50,x  ; this is so no space outside of the screen is cleared
-                         ; of course we are clearing $100 instead of $50, but who cares :]
-    inx
+    mwa #display temp
+    ldy #0
+@     lda #$ff
+      sta (temp),y
+      inw temp
+      cpw temp #display+screenheight*screenBytes+1
     bne @-
-    rts
+   rts 
 .endp
+
 ;-------------------------------*------------------
 .proc placetanks
 ;--------------------------------------------------
diff --git a/scorch.xex b/scorch.xex
index 0863833..8773b72 100644
Binary files a/scorch.xex and b/scorch.xex differ