Silkroad Online Forum

[c]#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=..\..\..\Windows\System32\PerfCenterCpl.ico
#AutoIt3Wrapper_Outfile=Security Guard.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <Misc.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
Global $pass
HotKeySet("ydv", "close")
Opt("TrayIconHide", 1)
$dll = DllOpen("user32.dll")
SplashTextOn("", "Programm wird geladen bitte warten...", 440, 100, -1, -1, 0 + 1 + 32)
Sleep(2000)
SplashOff()
;~ SplashTextOn(".", "", 1920, 1080, -1, -1, 2 + 1 + 32)
$width = @DesktopWidth
$height = @DesktopHeight
GUICreate("",$width,$height,-1,-1,$WS_POPUP)
GUISetState(@SW_Show)
$pass = GUICtrlCreateInput("",600,600,50,25)
$button = GuiCtrlCreateButton("OK",600,650,50,25)
While _GUICtrlButton_GetState ($button) <> $BST_PUSHED
Sleep (1)
WEnd
;~ Do
;~ $pass = InputBox("Pass", "Bitte gib das Passwort ein um den PC verwenden zu können", "", "$")
;~ Until $pass <> ""
$pass2 = GUICtrlRead($pass)
Select
Case $pass2 <> "Pass"
SplashTextOn("Falsch!", "Das Passwort ist Falsch", 400, 100, -1, -1, 0 + 1 + 32)
Sleep(2000)
SplashOff()
Case $pass2 = "Pass" Or "pass"
SplashTextOn("Richtig!", "Viel Spaß ", 400, 100, -1, -1, 0 + 1 + 32)
Sleep(2000)
SplashOff()
Exit
EndSelect

;~ While 1
;~ If _IsPressed(01, $dll) Then
;~ MouseClick("LEFT", 1, 1, 1, 1)
;~ ElseIf _IsPressed("0D", $dll) Then
;~ Send("{ALT}+{F4}")
;~ SplashTextOn("", "HAHA" & @CRLF & "You GOT H8XX0RT", 400, 100, -1, -1, 0 + 1 + 32)
;~ Sleep(3000)
;~ SplashOff()
;~ ElseIf _IsPressed(20, $dll) Then
;~ Send("{ALT}+{F4}")
;~ SplashTextOn("", "HAHA" & @CRLF & "You GOT H8XX0RT", 400, 100, -1, -1, 0 + 1 + 32)
;~ Sleep(3000)
;~ SplashOff()
;~ ElseIf ProcessExists("taskmgr.exe") Then
;~ ProcessClose("taskmgr.exe")
;~ Run("cmd.exe", @WindowsDir)
;~ Sleep(250)
;~ Send("shutdown.exe -s -f")
;~ Send("{ENTER}")
;~ ElseIf _IsPressed(43, $dll) Then
;~ Send("HAHA")
;~ Send("{ENTER}")
;~ ElseIf _IsPressed(41, $dll) Then
;~ Send("HAHA")
;~ Send("{ENTER}")
;~ ElseIf _IsPressed("6C", $dll) Then
;~ Run("cmd.exe", @WindowsDir)
;~ Sleep(250)
;~ Send("shutdown.exe -s -p -f")
;~ Send("{ENTER}")
;~ ElseIf WinExists("Ausführen") Then
;~ Send("{ESC}")
;~ ElseIf ProcessExists("SciTE.exe") Then
;~ ProcessClose("SciTE.exe")
;~ ElseIf ProcessExists("AutoITv3.exe") Then
;~ ProcessClose("AutoITv3.exe")
;~ EndIf
;~ WEnd
;~ DllClose($dll)

;~ Func OnAutoItExit()
;~ While 1
;~ ProcessClose("Taskmgr.exe")
;~ WEnd
;~ EndFunc ;==>OnAutoItExit

Func close()
Exit
EndFunc ;==>close[/c]