This script I made to help out when fishing. It's poorly commented / documented as I feel lazy while writing this, but it's simple enough for the few comments to explain what to change to set it up and how to comment out parts you don't need.
What this script does not do for you:
-It doesn't fish for you
-It doesn't cook for you
Then what does it do:
-Moves the trash (footwear, rare fish) into your safe trash for tokens bag once you've changed your's ItemID in the script
-Tracks your fishing pole's durability and moves it into your backpack when durability reaches zero and announces the need for repair
-Cuts the fish for you, assuming you took your time to change the blade's ItemID into the script and have it in an open container with you
-Moves the cut raw fish steaks into a container of your choice. This can be a bag of holding, boat's stash, pack animal, but again, you have to change the ID in the script, be in range of it and keep it open
Code: Select all
set %Boots ZVI_PVI_NVI_TVI_YDF_
; Tight Boots, Shoes, Sandals, Boots, Rare Fish
set %Trash UVDMXND ; ItemID of your Trash Bag
set %FishBag BGLWNPD ; Item ID of your Bag of Holding, boat stash, pack animal, ...
set %Fish FQD_GQD_EQD_DQD_
set %Blade WVDMXND ; Item ID of your blade used for cutting, must be in an open pack
set %Backpack #BackpackID
set %min_durability 1
while #True
{
; Time to look for trash and move it to your trash bag
finditem %Boots C_ , %Backpack
if #FindKind <> -1
{
exEvent Drag #FindID
wait 10
exEvent Dropc %Trash
wait 10
}
; Let's check your fishing pole's durability
; If it's 0, remove the pole and announce the need for repair
finditem KDF C_ , #CharID
if #FindKind <> -1
{
event property #FindID
str pos #property durability
set %durmon_k #strres + 10
str del #property 1 %durmon_k
set %durmon_res #strres
str pos %durmon_res /
str del %durmon_res #strres 99
set %durmon_res #strres
if %durmon_res < %min_durability
{
exEvent Drag #FindID
wait 10
exEvent Dropc %Backpack
wait 10
event exmsg #charid 3 111 Fishing pole moved to your backpack
}
}
; Let's cut the fish
; Comment this out if you don't need it
finditem %Fish C_ , #BackpackID
if #FindKind <> -1 ; Alternatively, you could change this to #FindCnt > treshold to cut only when a stack is as large as you want
{
set %OldLObjectID #lObjectID
set %OldTargetID #lTargetID
set %OldTargetKind #lTargetKind
set #lObjectID %Blade
event macro 17 0
set #lTargetKind 1
set #lTargetID #FindID
target 5s
event macro 22
set #lObjectID %OldLObjectID
set #lTargetKind %OldTargetKind
set #lTargetID %OldTargetID
wait 20
}
; Let's move those raw fish steaks to another container
; Comment this out if you don't need it
finditem IND C_ , #BackpackID
if #FindKind <> -1
{
exEvent Drag #FindID #FindStack
wait 10
exEvent Dropc %FishBag
wait 10
}
}