Skip to content

Instantly share code, notes, and snippets.

@AndreiD
Last active February 15, 2016 11:11
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save AndreiD/10b780cbc256ad768dea to your computer and use it in GitHub Desktop.
Save AndreiD/10b780cbc256ad768dea to your computer and use it in GitHub Desktop.
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