Skip to content

Instantly share code, notes, and snippets.

@AndreiD
Last active Feb 15, 2016
Embed
What would you like to do?
XHello
HotKeySet("{ESC}", "Terminate")
Opt("SendKeyDelay", 50)
ToolTip("XHello Running", screen_height/2, screen_width/2, "XHello", 1) ; ex: 2560 1440 or 1920 1080 etc.
SplashTextOn("", "XHello", -1, -1, -1, -1, 33, "", 24)
Sleep(3000)
SplashOff()
Global $MESSAGES[4] = ["whatzup ?", "g morning", "Knock!!!Knock!!!", "8-)"] ; your messages
Global $FRIENDS[150] =["John Doe","Tom Sawyer"] ; your big friends list. remember to update the count in front
For $i = 0 to 149 ; count -1 your total friends
$r_message = $MESSAGES[Random(0,3,1)]
SendMessageToUser($FRIENDS[$i], $r_message)
Sleep(10000)
Next
Beep(200,500)
Beep(600,250)
Func SendMessageToUser($mUser, $mMessage)
Local $firstName = $mUser
RunWait("C:\Program Files (x86)\Google\Chrome\Application\chrome.exe https://www.facebook.com/messages/new") ; chrome location.
Sleep(4000)
ZzZ()
Send($mUser)
ZzZ()
Send("{TAB}")
ZzZ()
Send("{TAB}")
ZzZ()
$firstName = StringSplit($mUser, " ")[1]
If @error Then
$firstName = $mUser
EndIf
Send($firstName & ", " & $mMessage)
ZzZzZ()
; Send("{ENTER}")
ZzZzZ()
WinKill("[ACTIVE]", "")
ZzZ()
Send("{ENTER}")
EndFunc
Func Terminate()
Exit
EndFunc ;==>Terminate
Func ZzZ()
Sleep(Random(50, 200, 1))
EndFunc
Func ZzZzZ()
Sleep(Random(512, 2000, 1))
EndFunc
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment