Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;tab nation with help from Chris Kimbrell
- xpos1=
- xpos2=
- SetMouseDelay,-1
- SetBatchLines, -1
- CoordMode, Mouse, Screen
- CoordMode, Pixel, Screen
- Process, Priority,, High
- InputBox, howmuchbait, Bait Amount,How much bait to use?, ; Input Amount of Bait to Use
- tooltip, Put mouse in top left corner of pond and press F1
- Return
- f1::
- If xpos1 =
- {
- MouseGetPos, xpos1, ypos1
- tooltip, Put mouse in bottom right corner of pond and press F1
- Return
- }
- If xpos2 =
- {
- MouseGetPos, xpos2, ypos2
- ; tooltip, Put mouse in the Left Middle of pond and press F1
- ; Return
- }
- tooltip, fishing will begin in 3 seconds. Press F2 to end early
- sleep 3000
- tooltip
- Random randsleep1, 600, 900
- loop {
- loop {
- PixelSearch, 1Px, 1Py, %xpos1%, %ypos1%, %xpos2%, %ypos2%, 0x50452F, 90, Fast ; Find Fish
- if (ErrorLevel = 1)
- {
- ; tooltip, No Fish Found
- }
- else if (ErrorLevel = 0)
- {
- 1Py:= 1Py+=30
- 1Px:= 1Px-15
- MouseClick, left, %1Px%, %1Py% ; Click on Fish
- ; tooltip, Fish Found, Click
- fishcount++ ; Increase Fish Count
- break
- }
- }
- sleep %randsleep1%
- loop 10 {
- ; loopcount++ ; Displays a count on screen to verify search is progressing
- PixelSearch, 2Px, 2Py, %xpos1%, %ypos1%, %xpos2%, %ypos2%, 0xFF0000, 5, Fast ; Find Blue Button
- if (ErrorLevel = 1)
- {
- ; tooltip, No Circle Found. Attempt %loopcount%
- }
- else if (ErrorLevel = 0)
- {
- ; tooltip, I found the Circle!
- 2Py:= 2Py+=50
- MouseMove, %2Px%, %2Py% ; Used to test Mouse Click Position
- MouseClick, left, %2Px%, %2Py% ; Click on Blue Button
- ; tooltip, I tried to click the Circle!
- break
- }
- }
- sleep %randsleep1%
- if fishcount = %howmuchbait% ; End Fishing if Fishcount = Bait Wanted to Use
- break
- }
- f2::
- Msgbox, Fishing Completed! You have caught around %fishcount% fish! ; Display number of fish caught
- reload ;exitapp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement