Fishing frenzy

1# This is an automated backup - check out https://outlands.uorazorscripts.com/script/21d97f5a-ac78-4a69-a03f-7be2fe461137 for latest2# Automation by Jaseowns3## Script: Fishing frenzy4## Created by: Nevor#90515#############################################6 7//This script is continously checking for a fishing frenzy within range of sight8//If in range it will automatically start fishing as long as there is a fishing pole equipped or in backpack9//For players with tracking skill it will activate hunting mode and stop if an enemy is detected10//You can input the name of your 'escape script' down below at the '//--->' marked areas if you want to use auto escape with tracking11//Unfortunately it is not possible to discriminate between real and house-deco koi, since they have the same serial and hue12 13clearsysmsg14 15say 'Mornin`!' 10016@setvar! speechCycle 1 17 18//activate hunting mode19if skill 'Tracking' > 0 and not findbuff 'Tracking Hunting'20    skill 'Tracking'21    waitforgump 426746765922    gumpresponse 623    waitforgump 426746765924    gumpclose 426746765925    wait 20026endif27 28//main loop, remove this while and the endwhile at end of script in case you do not want the script to cycle29while not dead30    31    //tracking detection check32    if insysmsg 'now tracking'33        overhead '*** RED ALERT ***' 3334//--->  insert the name of your escape script and remove the // below if you want to use auto escape35        //script 'myEscapeScript'36        stop37    endif38    39    //check for a fishing frenzy, standard range of sight is 18 tiles, range for fishing is 8 tiles40    if findtype 'koi' ground -1 -1 18 as myFrenzy41        42        //equip fishing pole if necessary, stop if we do not have one in our backpack43        if lhandempty and findtype 'fishing pole' backpack as myStick44            lift myStick45            drop self lefthand46            while queued47                wait 5048            endwhile49        elseif lhandempty and not findtype 'fishing pole' backpack50            overhead 'No fishing pole' 3351            stop52        endif53        54        //frenzy in range, fishing55        if find myFrenzy ground -1 -1 856            dclick myFrenzy57            //fishing time for a frenzy is 3 seconds, this for loop can potentially be reduced to 4 if you suffer less lag than I am (there is another 1 sec anti-spam wait below)58            for 559                //tracking detection check while fishing60                if insysmsg 'now tracking'61                    overhead '*** RED ALERT ***' 3362//--->              insert the name of your escape script and remove the // below if you want to use auto escape63                    //script 'myEscapeScript'64                    stop65                else66                    wait 50067                endif68            endfor69        //frenzy out of range notification70        elseif find myFrenzy ground -1 -1 971            overhead 'Fishing frenzy 9 tiles' 6872            overhead 'Move closer...' 6873        elseif find myFrenzy ground -1 -1 10    74            overhead 'Fishing frenzy 10 tiles' 5875            overhead 'Move closer...' 5876        elseif find myFrenzy ground -1 -1 1177            overhead 'Fishing frenzy 11 tiles' 5678            overhead 'Move closer...' 56    79        elseif find myFrenzy ground -1 -1 1280            overhead 'Fishing frenzy 12 tiles' 5481            overhead 'Move closer...' 5482        elseif find myFrenzy ground -1 -1 1383            overhead 'Fishing frenzy 13 tiles' 5084            overhead 'Move closer...' 5085        elseif find myFrenzy ground -1 -1 1486            overhead 'Fishing frenzy 14 tiles' 4587            overhead 'Move closer...' 4588        elseif find myFrenzy ground -1 -1 1589            overhead 'Fishing frenzy 15 tiles' 4390            overhead 'Move closer...' 4391        elseif find myFrenzy ground -1 -1 1692            overhead 'Fishing frenzy 16 tiles' 4193            overhead 'Move closer...' 4194        elseif find myFrenzy ground -1 -1 1795            overhead 'Fishing frenzy 17 tiles' 3996            overhead 'Move closer...' 3997        elseif find myFrenzy ground -1 -1 1898            overhead 'Fishing frenzy 18 tiles' 3799            overhead 'Move closer...' 37100        endif101        102        //role playing addition for high quality fishing103        //video suggestion for maximum fishertainment: https://www.youtube.com/watch?v=PEe-ZeVbTLo&t=1984s104        if speechCycle = 0105            say 'Mornin`!' 100106            @setvar! speechCycle 1 107        elseif speechCycle = 1108            say 'Nice day for fishing ain`t it!' 100109            @setvar! speechCycle 2110        elseif speechCycle = 2111            say 'Hu ha!' 100112            @setvar! speechCycle 0113        endif114        115    endif116 117    //anti-spam wait118    wait 1000119    120    //frenzy done check121    if insysmsg 'The fishing frenzy subsides'122        overhead 'Frenzy done'123    endif124 125endwhile