Another Login Script

[uber125]

I was looking around on the forums and saw some login scripts that looked well needlessly complicated.

I thought I would share mine with you all. It works with Games FULL SCREEN. (No need for mouse clicks) Web sties, domain logins. Just about everything that will allow the use of the TAB key. I got the idea from the little note pad example. Anyway here it is, for a web login such as Google Mail.

expandcollapse popup

; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
$answer = MsgBox(4, "Auto Login V.1", "Put the cursor in the chat windoe you wanna flood")


; Check the user's answer to the prompt (see the help file for MsgBox return values)
; If "No" was clicked (7) then exit the script
If $answer = 7 Then
    MsgBox(0, "OOPS!", "OOPS!")
    Exit
EndIf


; Run MS-DOS Shell
Run ("C:\Program Files\Internet Explorer\IEXPLORE.EXE http://www.gmail.com")



; Wait for the Internet Explorer become active - it is titled "Welcome to Gmail - Microsoft Internet Explorer" on English systems
WinWaitActive("Welcome to Gmail - Microsoft Internet Explorer")

; Now that the Welcome to Gmail - Microsoft Internet Explorer window is active, waite for site to load.
; Finished!
 
; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
$answer = MsgBox(4, "Text Flood V.1", "Put the cursor in the chat windoe you wanna flood")


; Check the user's answer to the prompt (see the help file for MsgBox return values)
; If "No" was clicked (7) then exit the script
If $answer = 7 Then
    MsgBox(0, "OOPS!", "OOPS!")
    Exit
EndIf

Send ("username")
Send("{TAB}")
Send ("password")
Send("{ENTER}")


; Finished!

LoL I also made a annoying little chat flooder from the same script. Just make sure that your cursor is in the box you want to spam. Works with ALL messengers.

; Prompt the user to run the script - use a Yes/No prompt (4 - see help file)
$answer = MsgBox(4, "Text Flood V.1", "Put the cursor in the chat windoe you wanna flood")


; Check the user's answer to the prompt (see the help file for MsgBox return values)
; If "No" was clicked (7) then exit the script
If $answer = 7 Then
    MsgBox(0, "Pfffttt", "Changed your mind huh?")
    Exit
EndIf

Send ("(duck) QUACK!!!)")
Send("{ENTER}")
Send ("(duck) QUACK!!!)")
Send("{ENTER}")
Sleep(500) 
Send ("(@) MEOW!!!)")
Send("{ENTER}")
Sleep(500) 
Send ("(duck) QUACK!!!)")
Send("{ENTER}")
Send ("(duck) QUACK!!!)")
Send("{ENTER}")
Sleep(500) 
Send ("(&) WOOF!!!)")
Send("{ENTER}")
Sleep(500) 
Send ("(duck) QUACK!!!)")
Send("{ENTER}")
Send ("(duck) QUACK!!!)")
Send("{ENTER}")
Sleep(500) 
Send ("8-0 WOW!!!)")
Send("{ENTER}")

; Finished!

Let me know what ya think.