Attribute VB_Name = "Module1"
Public opcode(5000) As Byte
Public var1(5000) As Byte
Public var2(5000) As Integer
Public var3(5000) As Byte
Public Foraddr(10) As Integer
Public Forval(10) As Integer
Public Subaddr(50) As Integer
Public RetAddr(50) As Integer
Public MotPos(120) As Integer
Public Stack(10) As Integer
Public Bton(12) As Boolean
Public Baddr(12) As Integer
Public CurrentDir As String