Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Global $Paused
- Global $Stop
- HotKeySet('{PAUSE}', 'HotKeyPressed')
- Func HotKeyPressed()
- Switch @HotKeyPressed
- Case "{PAUSE}"
- $Stop = Not $Stop
- For $i = 0 To 9 Step 1
- HotKeySet($i)
- Next
- HotKeySet('-')
- HotKeySet('=')
- While $Stop
- Sleep(1000)
- WEnd
- For $i = 0 To 9 Step 1
- HotKeySet($i, 'HotKeyPressed')
- Next
- HotKeySet('-', 'HotKeyPressed')
- HotKeySet('=', 'HotKeyPressed')
- Case "{ESC}"
- Exit
- Case "1"
- _click(1180, 470)
- Case "2"
- _click(1280, 470)
- Case "3"
- _click(1180, 555)
- Case "4"
- _click(1280, 555)
- Case "5"
- _click(1230, 640)
- Case "6"
- _click(1530, 470)
- Case "7"
- _click(1630, 470)
- Case "8"
- _click(1530, 555)
- Case "9"
- _click(1630, 555)
- Case "0"
- _click(1580, 640)
- Case "-"
- _just_click('left', 1350, 520)
- Case "="
- _just_click('right', 800, 400)
- EndSwitch
- EndFunc
- Func _click($x, $y)
- Opt("MouseClickDelay", 0)
- $Paused = Not $Paused
- While $Paused
- MouseClick('left', $x, $y, 2, 0)
- MouseClick('left', 1460, 750, 2, 0)
- WEnd
- EndFunc
- Func _just_click($button, $x, $y)
- Opt("MouseClickDelay", 0)
- $Paused = Not $Paused
- While $Paused
- MouseClick($button, $x, $y, 2, 0)
- WEnd
- EndFunc
- While 1
- Sleep(1000)
- WEnd
Advertisement
Add Comment
Please, Sign In to add comment