Forum Thread: My Password Wont Work for My PC Locker

I am working with an open source pc locker code is below. As you can see the password is ''cat'' to unlcock it, but how do i make the inputbox pop up once the pc locker is executed. What is the hot key

If IsPressed("10", $hDLL) and IsPressed("12",$hDLL) and _IsPressed("78",$hDLL) Then
WinSetOnTop($hgui, chr(0), 0)
$pass = InputBox("Enter the Unlock Key to Begin", "Please Enter the unlock key", chr(0))
If $pass = "cat" Then

If @OSArch = "X64" Then

RegWrite("HKEYLOCALMACHINE64\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "Shell", "REG_SZ", "explorer.exe")

Else

RegWrite("HKEYLOCALMACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "Shell", "REG_SZ", "explorer.exe")

EndIf
FileDelete(@StartupDir & "\" & @ScriptName & ".lnk")
RegWrite("HKEYLOCALMACHINE\SYSTEM\CurrentControlSet\Control\SafeBoot", "AlternateShell", "REG_SZ", "cmd.exe")

RegWrite("HKEYLOCALMACHINE\Software\Policies\Microsoft\Internet Explorer\Restrictions", "NoBrowserContextMenu", "REG_DWORD", "0")

RegWrite("HKEYLOCALMACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoViewContextMenu", "REG_DWORD", "0")

RegWrite("HKEYLOCALMACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\System", "EnableLUA", "REG_DWORD", "1")

Local $sCmdFile
FileDelete(@TempDir & "\scratch.bat")

$sCmdFile = "ping -n " & 15 & "127.0.0.1 > nul" & @CRLF & "del " & ChrW(34) & @AutoItExe & ChrW(34) & @CRLF & "explorer.exe" & @CRLF & "del " & @TempDir & "\scratch.bat"

FileWrite(@TempDir & "\scratch.bat", $sCmdFile)
Run(@TempDir & "\scratch.bat", @TempDir, @SW_HIDE)
Exit

1 Response

Is this for Linux? If you put "PC" in the title, many people will assume it is for Windows and Linux-savvy people will probably ignore this.

Share Your Thoughts

  • Hot
  • Active