Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
- ;@ Author: @Ler_GG
- ;@ Release Date: 22.01.2016
- ;@ Purpose: Automatically accepts game invites
- ;@ on the Reborn Dota 2 Client.
- ;@ Usage: - F5 to start auto accept.
- ;@ - F6 to pause the script.
- ;@ - F7 to exit the script.
- ;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
- ;-------------------------------------------------
- ;-------------------------------------------
- ; @@@@@@@ VARIABLES @@@@@@@@@@@@@@@@@@@@@@@@
- ;-------------------------------------------
- $hWnd = WinGetHandle("Dota 2")
- ;-------------------------------------------
- ; @@@@@@@ HOTKEYS @@@@@@@@@@@@@@@@@@@@@@@@
- ;-------------------------------------------
- HotKeySet("{F5}", "_main")
- HotKeySet("{F6}", "_pause")
- HotKeySet("{F7}", "_exit")
- ;-------------------------------------------
- ; @@@@@@@ MAIN @@@@@@@@@@@@@@@@@@@@@@@@
- ;-------------------------------------------
- TrayTip("", "Auto accept Script started", 1)
- _pause()
- ; ----------------------------------------------------------------------------
- ; @Function: _main()
- ; ----------------------------------------------------------------------------
- Func _main()
- _loopEnter()
- EndFunc ;==> _main()
- ; ----------------------------------------------------------------------------
- ; @Function: _pause()
- ; ----------------------------------------------------------------------------
- Func _pause()
- Tooltip("")
- While 1
- Sleep(1000)
- WEnd
- EndFunc ;==> _pause
- ; ----------------------------------------------------------------------------
- ; @Function: _loopEnter()
- ; ----------------------------------------------------------------------------
- Func _loopEnter()
- ToolTip("Auto accept activated", 0, 0)
- WinActivate($hWnd)
- While 1
- ControlSend("", "", $hWnd, "{ENTER}")
- Sleep(1000)
- Wend
- EndFunc ;==> _loopEnter
- ; ----------------------------------------------------------------------------
- ; @Function: _exit()
- ; ----------------------------------------------------------------------------
- Func _exit()
- Exit
- EndFunc ;==> _exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement