diff --git a/SANDBOX.PO b/SANDBOX.PO
index e510d2e..08b6e03 100644
Binary files a/SANDBOX.PO and b/SANDBOX.PO differ
diff --git a/src/toolsrc/sb.pla b/src/toolsrc/sb.pla
index 65757cd..e518a83 100644
--- a/src/toolsrc/sb.pla
+++ b/src/toolsrc/sb.pla
@@ -3605,13 +3605,13 @@ def parse_stmnt
                 if token == SET_TKN
                     if !parse_expr; return parse_err(@bad_expr); fin
                     if type & LOCAL_TYPE
-                        if elem_type == BYTE_TYPE
+                        if elem_type & BYTE_TYPE
                             emit_slb(addr + elem_offset)
                         else
                             emit_slw(addr + elem_offset)
                         fin
                     else
-                        if elem_type == BYTE_TYPE
+                        if elem_type & BYTE_TYPE
                             emit_sab(addr, elem_offset)
                         else
                             emit_saw(addr, elem_offset)
diff --git a/src/vmsrc/plvm02.s b/src/vmsrc/plvm02.s
index baf18b6..86a0298 100644
--- a/src/vmsrc/plvm02.s
+++ b/src/vmsrc/plvm02.s
@@ -57,6 +57,8 @@ INTERP	=	$03D0
 *	=	$2000
 	LDX     #$FE
 	TXS
+	LDX	#$00
+	STX	$01FF
 ;*
 ;* DISCONNECT /RAM
 ;*