MirLua: add Evaluate option page to test scripts

1 files changed, 31 insertions, 3 deletions

diff --git a/plugins/MirLua/src/options.h b/plugins/MirLua/src/options.h
index 9b540bc392..879f06b55a 100644
--- a/plugins/MirLua/src/options.h
+++ b/plugins/MirLua/src/options.h
@@ -1,14 +1,16 @@
 #pragma once

 

-class CMLuaOptions : public CDlgBase

+class CMLuaOptionsMain : public CDlgBase

 {

 private:

+	CMPlugin &m_plugin;

+

 	bool isScriptListInit;

 	

 	CCtrlCheck m_popupOnError;

 	CCtrlCheck m_popupOnObsolete;

 

-	CCtrlListView m_scripts;

+	CCtrlListView m_scriptsList;

 	CCtrlButton m_reload;

 

 	void LoadScripts();

@@ -23,5 +25,31 @@ protected:
 	INT_PTR DlgProc(UINT msg, WPARAM wParam, LPARAM lParam) override;

 

 public:

-	CMLuaOptions();

+	CMLuaOptionsMain(CMPlugin &plugin);

+};

+

+/***********************************************/

+

+class CMLuaEvaluateOptions : public CDlgBase

+{

+private:

+	lua_State *L = nullptr;

+	int threadRef = 0;

+

+	CCtrlEdit m_script;

+	CCtrlEdit m_result;

+

+	CCtrlCheck m_autoEval;

+	CCtrlButton m_evaluate;

+

+protected:

+	bool OnInitDialog() override;

+	bool OnApply() override;

+

+	void OnAutoEvalChange(CCtrlBase*);

+	void OnEvaluate(CCtrlBase*);

+

+public:

+	CMLuaEvaluateOptions(CMPlugin &plugin);

+	~CMLuaEvaluateOptions();

 };