diff --git a/images/apple/DCGR-TK.PO b/images/apple/DCGR-TK.PO
index 826bc44..6d02adc 100755
Binary files a/images/apple/DCGR-TK.PO and b/images/apple/DCGR-TK.PO differ
diff --git a/src/samplesrc/dcgrspred.pla b/src/samplesrc/dcgrspred.pla
index 132f033..b486b59 100644
--- a/src/samplesrc/dcgrspred.pla
+++ b/src/samplesrc/dcgrspred.pla
@@ -6,14 +6,14 @@ include "inc/dcgrutils.plh"
 
 sysflags restxt1|restxt2|resxtxt1|reshgr1|resxhgr1 //  Reserve all the pages
 
-byte sprinit = $55,$00,$00,$55
-byte         = $05,$AA,$AA,$50
-byte         = $A0,$FF,$FF,$0A
-byte         = $A0,$5F,$F5,$0A
-byte         = $A0,$5F,$F5,$0A
-byte         = $A0,$FF,$FF,$0A
-byte         = $05,$AA,$AA,$50
-byte         = $55,$00,$00,$55
+//byte sprinit = $55,$00,$00,$55
+//byte         = $05,$AA,$AA,$50
+//byte         = $A0,$FF,$FF,$0A
+//byte         = $A0,$5F,$F5,$0A
+//byte         = $A0,$5F,$F5,$0A
+//byte         = $A0,$FF,$FF,$0A
+//byte         = $05,$AA,$AA,$50
+//byte         = $55,$00,$00,$55
 byte[40*48] grSprite
 byte[40*24] dcgrSprite
 char[64] filename = "Untitled"
@@ -236,14 +236,13 @@ def dcgrTestView(bounce)#0
     grView
 end
 
-memset(@grSprite, $0505, 40*48)
 arg = argNext(argFirst)
 if ^arg
     memcpy(@filename, arg, ^arg + 1)
     modified = readFile
 fin
 if modified
-    dcgr2gr(8, 8, @sprinit)
+    memset(@grSprite, $0505, 40*48)
     modified = 0
 fin
 grMode(grPage1)