Jump to content

Recommended Posts

Posted (edited)

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
Posted

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?

Posted

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

Posted

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.

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
  • Recently Browsing   0 members

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