Fix SPCLR

SMILEBASIC/sprite.d

@@ -973,11 +973,22 @@ class Sprite
     }
     void spclr()
     {
-        synchronized (this) for(int i = 0; i < sprites.length; i++)
+        auto id = spid(0);
+        if(spmax <= id)
+        {
+            synchronized (this) for(int i = id; i < sprites.length; i++)
             {
                 sprites[i].clear;
             }
         }
+        else
+        {
+            synchronized (this) for(int i = 0; i < spmax; i++)
+            {
+                sprites[i].clear;
+            }
+        }
+    }
     void allclear()
     {
         synchronized (this) for(int i = 0; i < sprites.length; i++)