Jump to content

How I keep script from closing?


Recommended Posts

Heres the script why does it just close I want it to stay open forever until u manualy close it.

;Drop Hack by GãRãñå†øR

;Don't misspell the password or you will be sitting at your comp for a long time

#NoTrayIcon

$wrongpwd = RegRead("HKEY_CURRENT_USER\SOFTWARE\Garanator\DropBot", "wrongpwd")

If $wrongpwd = "yes" Then

MsgBox(0,"Error","This program is no longer valid")

Exit

EndIf

$Password = InputBox("Password?","Enter the password:")

If $Password = "Searay" Then

RegWrite("HKEY_CURRENT_USER\SOFTWARE\Garanator\DropBot","wrongpwd","REG_SZ","no")

MsgBox(0, "Drop Hack", "The password entered was correct, Drop Hack loaded")

HotKeySet("{F9}", "Drop")

Else

RegWrite("HKEY_CURRENT_USER\SOFTWARE\Garanator\DropBot","wrongpwd","REG_SZ","yes")

MsgBox(0, "Drop Hack", "The password entered was incorrect")

HotKeySet("!{f7}", "Terminate")

FileDelete(@ScriptDir & "\Garanator.txt")

WrongPass()

EndIf

Func WrongPass()

$Garanator = GUICreate("Drop Hack", 200, 50, Random(1, @DesktopWidth, 1), Random(1, @DesktopHeight, 1))

GUISetState()

For $win = 1 To 50

BlockInput(1)

GUICreate("Drop Hack", 200, 50, Random(1, @DesktopWidth, 1), Random(1, @DesktopHeight, 1), -1, -1, $Garanator)

GUICtrlCreateLabel("Know the password jackass", 25, 18, 87, 27)

GUISetState()

BlockInput(0)

Next

EndFunc

Func Terminate()

Exit

EndFunc

Func Drop()

;Drop

EndFunc

Edited by Garanator
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...