Implement CALL SPRITE

SMILEBASIC/node.d

@@ -51,6 +51,8 @@ enum NodeType
     Exec,
     Use,
     Linput,
+    CallSprite,
+    CallBG,
 }
 abstract class Node
 {
@@ -697,3 +699,19 @@ class Linput : Statement
         this.expression = expr;
     }
 }
+class CallSprite : Statement
+{
+    this(SourceLocation loc)
+    {
+        super.location = loc;
+        this.type = NodeType.CallSprite;
+    }
+}
+class CallBG : Statement
+{
+    this(SourceLocation loc)
+    {
+        super.location = loc;
+        this.type = NodeType.CallBG;
+    }
+}