Fishing Water Elementals

[milosz]

Hey, couild anyone make a script to fish water elementals, since you can fish them right away now and dont have to wait? because the script that reaphel has you need to wait till they are fishable but thats not neceserry anymore

[mistgun]

Use this atm, updated version will be available soon at Raphael's thread..

init start

    -- local SCRIPT_VERSION = '1.2.0'



    -- DO NOT EDIT BELOW THIS LINE --

    local fishLoot = {281, 282, 3026, 3029, 3032, 9303}



    -- I wish I could have made this a more generic function, but it would most

     -- likely make it less efficient for the current use case; I know... I will

     -- pay for that in the future. Meh... whatever, bring it on!

    local function findwaterfishspots(exceptClose)

          for x = -7, 7 do

              for y = -5, 5 do

                 -- This lets us ignore bodies that are too close and might fuck

                 -- up because of character's first movements, but still account

                 -- for them after it's already standing.

                if not exceptClose or (math.abs(x) > 1 or math.abs(y) > 1) then

                    local curX, curY = $posx + x, $posy + y

                    local item = topuseonitem(curX, curY, $posz).id



                    if table.find({9582, 4037}, item) then

                        return {x = curX, y = curY}

                    end

                end

            end

        end



        return nil

    end

init end



auto(100)



if $lootsaround == 0 and $targetingtarget.hppc == 0 then

    local body = findwaterfishspots(true)



    while body ~= nil and tileshootable(body.x, body.y, $posz) and tileclickable(body.x, body.y, $posz) do

        pausewalking(6^9) -- Yeah babe!



        if body ~= nil then

            local itemCount = {}



            for _, v in ipairs(fishLoot) do

                itemCount[v] = itemcount(v)

            end



            useitemon(3483, 0, ground(body.x, body.y, $posz))

            waitping()



            for _, v in ipairs(fishLoot) do

                local curCount = itemcount(v)



                if curCount > itemCount[v] then

                    increaseamountlooted(v, curCount - itemCount[v])

                end

            end

        end



        -- If starting conditions are no longer met, abort mission!

        if $lootsaround ~= 0 or $targetingtarget.hppc ~= 0 then

            break

        end



        body = findwaterfishspots(false)

    end



    pausewalking(0) -- Orgasm.

end

[milosz]

thank you