#NoTrayIcon
#include <GUIConstants.au3>

$gui = GUICreate("Quick Lock", 176, 152, -1, -1, $WS_CAPTION + $WS_POPUP + $WS_SYSMENU)

$group = GUICtrlCreateGroup("Settings", 8, 8, 161, 105)

$reg = GUICtrlCreateCheckbox("Disable Registry Editor", 16, 32, 137, 17)
$task = GUICtrlCreateCheckbox("Disable Task Manager", 16, 56, 129, 17)
$cmd = GUICtrlCreateCheckbox("Disable Command Prompt", 16, 80, 145, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$go = GUICtrlCreateButton("Apply", 8, 120, 123, 25)

$what = GUICtrlCreateButton("?", 146, 120, 25, 25)

GUISetState(@SW_SHOW)

		 $value = RegRead("HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System", "DisableRegistryTools")
		 If @Error Or ($value = 0) Then
		    GuiCtrlSetState($reg, $GUI_UNCHECKED)
		 Else
		     GuiCtrlSetState($reg, $GUI_CHECKED)
		 EndIf
		 
		 $value = RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr")
		 If @Error Or ($value = 0) Then
		    GuiCtrlSetState($task, $GUI_UNCHECKED)
		 Else
		     GuiCtrlSetState($task, $GUI_CHECKED)
		 EndIf
		 
		 $value = RegRead("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\System", "DisableCMD")
		 If @Error Or ($value = 0) Then
		    GuiCtrlSetState($cmd, $GUI_UNCHECKED)
		 Else
		     GuiCtrlSetState($cmd, $GUI_CHECKED)
		 EndIf
		 
While 1
	$msg = GuiGetMsg()
	Select
	Case ($msg = $reg) or ($msg = $task) or ($msg = $cmd)
		GuiCtrlSetState($go, $GUI_ENABLE)
	Case $msg = $GUI_EVENT_CLOSE
		ExitLoop
	Case $msg = $go
		GoClicked()
	Case $msg = $what
		Intro()
	EndSelect
WEnd

Exit

Func GOClicked()
     		$state = GuiCtrlRead($reg)
		 If $state = $GUI_CHECKED Then
		    		RegWrite("HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System", "DisableRegistryTools", "REG_DWORD", 1)
		 Else
		 		 RegWrite("HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System", "DisableRegistryTools", "REG_DWORD", 0)
		 EndIf

		 $state = GuiCtrlRead($task)
		 If $state = $GUI_CHECKED Then
				    RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 1)
		 Else
		 		 RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 0)
		 EndIf
		 
		 $state = GuiCtrlRead($cmd)
		 If $state = $GUI_CHECKED Then
				    RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\System", "DisableCMD", "REG_DWORD", 2)
		 Else
				     RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\System", "DisableCMD", "REG_DWORD", 0)
		 EndIf

		GuiCtrlSetState($go, $GUI_DISABLE)
EndFunc

Func Intro()
	MsgBox(0, "About", "This script is written by Quang Anh Do." & @CRLF & "Visit my website for more scripts:" & @CRLF & "http://qad.donationcoders.com")
EndFunc