Public Class FiniteStateMachine

   Private m_State As Integer
   Private m_sLuaPath As String
   Friend ReadOnly Property sLuaPath As String
      Get
         Return m_sLuaPath
      End Get
   End Property

   Sub New(sLuaPath As String)
      m_sLuaPath = sLuaPath
      LuaManager.ExecFile(Map.refMainWindowVM.MainWindowM.sScriptDir & "\" & sLuaPath)
   End Sub

End Class