Jump to content
Sign in to follow this  
Garanator

How I keep script from closing?

Recommended Posts

Garanator

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

Share this post


Link to post
Share on other sites
Garanator

ok yeah i edited it but can u make it so that it will just keep running cuz won't the while1 only last for as long as i say then turn itself off?

Share this post


Link to post
Share on other sites
Valuater

ok yeah i edited it but can u make it so that it will just keep running cuz won't the while1 only last for as long as i say then turn itself off?

try this

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

While 1

    Sleep(10)

Wend

Func Terminate()
Exit
EndFunc

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites
Garanator

ok yeah that works great. Thank you

Garanator

Share this post


Link to post
Share on other sites
Confuzzled

ok yeah that works great. Thank you

Garanator

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

I can see where this would be deployed - I'll submit it to my anti-virus vendor.

Share this post


Link to post
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
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.