The Wiki for Tale 4 is in read-only mode and is available for archival and reference purposes only. Please visit the current Tale 11 Wiki in the meantime.

If you have any issues with this Wiki, please post in #wiki-editing on Discord or contact Brad in-game.

Difference between revisions of "User:Cegaiel/Macros/Fishing"

From A Tale in the Desert
Jump to navigationJump to search
Line 1: Line 1:
−
<pre>
+
==Fishing (Autohotkey)==
−
;Ctrl+Alt+F to start macro.
+
Start script with Ctrl+Alt+F
−
;Ctrl+P to pause script and Ctrl+P again to resume
 
−
;The AHK icon in system tray will turn red while paused.
 
−
;Ctrl+R to reload script
 
  
−
^r::reload
+
It will walk you through with GUI menus, but heres what it will ask:
−
^p::Pause
 
−
^!f::
 
  
 +
1) Enter how many times you want to cast (click the fishing icon)
 +
<BR>2) It will ask you to hover and middle click your fishing icon
 +
<BR>3) It will now begin fishing and pause 15 seconds between casts
  
−
IfWinExist eGenesis Client
 
−
{
 
−
WinActivate
 
  
 +
What makes this better than some other fishing scripts?
  
−
InputBox, NumPulls, Fishing, Step 1: Enter how many times do you want to cast?
+
*The fishing icon can change positions depending on where you are standing (ie mud, sand, etc).  This script will ask you where the icon is...
−
Location = 1
 
−
Cycle = 0
 
  
 +
*Once it reaches the the number of casts you entered, it will stop. Great if you fall asleep at your keyboard :P
  
−
Gui, +AlwaysOnTop +ToolWindow
 
−
Gui, Font, bold
 
−
Gui, Add, Text, vLocationText, Step 2: Record the location of fishing icon...
 
−
Gui, Font, norm
 
−
Gui, Add, Text,, Hover and middle-click (Click mouse-wheel) on the fishing icon
 
−
Gui, Show
 
  
  
−
WinGet, GameWinHandle, ID, eGenesis Client
+
[[User:Cegaiel/Macros/Fishing/Code | Get Code!]]
−
loop
 
−
{
 
−
 
 
−
WinActivate, eGenesis Client
 
−
CoordMode, Mouse, Relative
 
−
KeyWait, MButton, D
 
−
KeyWait, MButton
 
−
MouseGetPos, TestX, TestY, WinHandle
 
−
if (WinHandle = GameWinHandle)
 
−
{
 
−
Gosub, RecordIcon
 
−
}
 
−
else
 
−
{
 
−
Gui, Destroy
 
−
break
 
−
}
 
−
}
 
−
return
 
−
 
 
−
RecordIcon:
 
−
MouseGetPos, LocX%Location%, LocY%Location%
 
−
Gui, Destroy
 
−
Gui, +AlwaysOnTop +ToolWindow
 
−
Gui, Font, bold
 
−
Gui, Add, Text, LocationText, Fishing icon captured!
 
−
Gui, Font, norm
 
−
Gui, Add, Text,,
 
−
( LTrim
 
−
Hotkeys:
 
−
Ctrl+P to Pause script, Ctrl+P again to Resume
 
−
Ctrl+R to Reload script
 
−
 
 
−
Note: If you are eating grilled cabbage for +speed, to increase fishing yields,
 
−
then 40 casts is about when stats will wear off...
 
−
 
 
−
Also: Uncheck the box Esc, Options, Interface Options:
 
−
"Ask about mounting record-breaking fishes"
 
−
 
 
−
If you dont, then a popup box occurs, you will lose about 3 casts,
 
−
while waiting on the popup box to disappear on its own.
 
−
 
 
−
Message will say "You are already fishing" while the popup box remains open!
 
−
 
 
−
)
 
−
 
 
−
Gui, Add, Button, default gSetLoops, GO FISHING
 
−
Gui, Show
 
−
return
 
−
 
 
−
 
 
−
SetLoops:
 
−
Gui, Submit
 
−
Gui, Destroy
 
−
Gui, +AlwaysOnTop +ToolWindow
 
−
Gui, Font, bold
 
−
Gui, Add, Text, vLocationText, Ready to fish, Good Luck!
 
−
Gui, Show
 
−
 
 
−
Sleep 2000
 
−
 
 
−
 
 
−
 
 
−
loop, %NumPulls%
 
−
{
 
−
 
 
−
WinActivate, eGenesis Client
 
−
 
 
−
LocPosX := LocX%Location%
 
−
LocPosY := LocY%Location%
 
−
MouseGetPos, OldMX, OldMY
 
−
Click, %LocPosX%, %LocPosY%
 
−
MouseMove, %OldMX%, %OldMY%, 0
 
−
Cycle++
 
−
GuiControl, Text, LocationText, Casting: %Cycle% of %NumPulls%
 
−
 
 
−
 
 
−
Sleep 15500
 
−
 
 
−
 
 
−
 
 
−
if Cycle = %NumPulls%
 
−
{
 
−
Gui, Destroy
 
−
Gui, Font, bold
 
−
Gui, Add, Text, LocationText, Casting: %Cycle% of %NumPulls%
 
−
Gui, Font, norm
 
−
Gui, Add, Text,,
 
−
( LTrim
 
−
All Done!
 
−
 
 
−
Hope you caught lots of fish!
 
−
 
 
−
Middle-click on this window to end the script.
 
−
)
 
−
Gui, Show
 
−
 
 
−
Exit
 
−
}
 
−
 
 
−
 
 
−
 
 
−
 
 
−
}
 
−
Gui, Destroy
 
−
Gui, Add, Text,, Middle-click on this window to end the script.
 
−
Gui, Show
 
−
return
 
−
}
 
−
 
 
−
</pre>
 

Revision as of 19:14, 14 January 2010

Fishing (Autohotkey)

Start script with Ctrl+Alt+F

It will walk you through with GUI menus, but heres what it will ask:

1) Enter how many times you want to cast (click the fishing icon)
2) It will ask you to hover and middle click your fishing icon
3) It will now begin fishing and pause 15 seconds between casts


What makes this better than some other fishing scripts?

  • The fishing icon can change positions depending on where you are standing (ie mud, sand, etc). This script will ask you where the icon is...
  • Once it reaches the the number of casts you entered, it will stop. Great if you fall asleep at your keyboard :P


Get Code!

Retrieved from "http://www.atitd.org/wiki/t4w/index.php?title=User:Cegaiel/Macros/Fishing&oldid=172825"