Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #RequireAdmin
- #cs
- usage:
- script clicks on point A, waits, clicks on point B, waits, repeat
- keys:
- alt+1: saves position the mouse is currently at as point A
- alt+2: saves position the mouse is currently at as point B
- alt+3: toggle clicking on/off
- if your mouse is clicking in the top left corner of the screen, it means you didnt set the positions
- #ce
- HotKeySet("!1", "SetPointOne")
- HotKeySet("!2", "SetPointTwo")
- HotKeySet("!3", "Toggle")
- Dim $active = false
- Dim $pointOne[2] = [0, 0]
- Dim $pointTwo[2] = [0, 0]
- Dim $clickDelay = 1000 ; delay before/after clicks - super fast clicks tend to trigger bot checks, so tweak the value lower if needed but be sensible
- Dim $mouseSpeed = 50 ; speed of the mouse moving - same deal as click delay, lower = faster (0-100), but be sensible. would not go lower than 15-20
- Func SetPointOne()
- $pointOne = MouseGetPos()
- EndFunc
- Func SetPointTwo()
- $pointTwo = MouseGetPos()
- EndFunc
- Func Toggle()
- $active = Not $active
- EndFunc
- While(1)
- If $active Then
- MouseClick("left", $pointOne[0], $pointOne[1], 1, 50)
- Sleep($clickDelay) ;1 second - might want a higher delay time
- MouseClick("left", $pointTwo[0], $pointTwo[1], 1, 50)
- Sleep($clickDelay)
- Else
- Sleep(10)
- EndIf
- WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement