Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- HotKeySet('{END}', 'Quit')
- HotKeySet('{HOME}', 'Pause')
- Global $Paused
- $A = 1
- Tap()
- Func Tap()
- WinActivate("Bluestacks App Player")
- Sleep(500)
- While $A = 1
- Sleep(10)
- PixelSearch(788, 68, 792, 72, 0xF1573E, 3, 0, 0) ;Friend Event (Party invite, chat, or friend request)
- If Not @error Then
- Sleep(100)
- MouseClick("left", 790, 70, 1, 5)
- Sleep(2000)
- PixelSearch(1071, 171, 1077, 177, 0x8AE63B, 3, 0, 0) ;Party Invite!
- If Not @error Then
- Sleep(100)
- MouseClick("left", 1074, 174, 1, 4)
- Sleep(1000)
- EndIf
- Sleep(100)
- Send('{ESC}') ;Back
- Sleep(1000)
- EndIf
- Sleep(10)
- PixelSearch(900, 659, 919, 669, 0xB23B27, 4, 0, 0) ;Ad Block!
- If Not @error Then
- MouseClick("left", 909, 662, 1, 2)
- Sleep(250)
- EndIf
- Sleep(10)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- MouseClick("left", 964, 285, 1, 1)
- Sleep(30)
- WEnd
- EndFunc
- Func Quit()
- Exit
- EndFunc
- Func Pause()
- $Paused = Not $Paused
- While $Paused
- Sleep(100)
- ToolTip('Paused...', 0, 0)
- WEnd
- ToolTip("")
- EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement