caramello

local running = true;
moveDistance = 30;
SpawnDist = 500;

function move_buffer()
--rune spawn points
ShowToClient("SYS", "Move to buffer");
Sleep(4000);
    --rune start buffing
    MoveTo(43441, 108693, -1985, moveDistance);
    Sleep(5000);
    --  Command("/target Buffer");
    TargetNpc("Clan Helper", 35714);
    Talk();
    ClickAndWait("sb_u_p", "");
    Sleep(800);
    ClickAndWait("sb_u_p", "");
    ShowToClient("System","Buffed and ready to fight");

end

function move_spot()
    TargetNpc("Clan Helper", 35714);
    Talk();
    ClickLinkAndWait("abyss_clanhall002.htm");
    ClickAndWait("menu_select?ask=-306&reply=6", "Rune");
    ClickAndWait("teleport_1745943280_9_57", "Stakato Nest - 1000 Adena");
    MoveTo(43264, 108801, -1985, moveDistance);
    WaitForTeleport();
    Sleep(1000);
    ShowToClient("System","On the way to the spot...");
    --move stakato room 1
    MoveTo(89126, -45141, -2142, moveDistance);
    MoveTo(89922, -44654, -2142, moveDistance);
    MoveTo(89941, -44558, -2133, moveDistance);
    MoveTo(90438, -44113, -2128, moveDistance);
    MoveTo(91425, -43167, -2493, moveDistance);
    MoveTo(92198, -43367, -2637, moveDistance);
    MoveTo(92484, -44131, -2802, moveDistance);
    MoveTo(92396, -44232, -2835, moveDistance);
    MoveTo(92318, -44320, -2864, moveDistance);
    MoveTo(92224, -44427, -2879, moveDistance);
    MoveTo(92197, -44459, -2881, moveDistance);
    MoveTo(91799, -44835, -2966, moveDistance);
    MoveTo(90614, -44686, -3290, moveDistance);
    MoveTo(89913, -43416, -3802, moveDistance);
    MoveTo(89542, -43223, -3902, moveDistance);
    MoveTo(88968, -42978, -4059, moveDistance);
    MoveTo(88866, -42991, -4089, moveDistance);
    MoveTo(88079, -43118, -4133, moveDistance);
    MoveTo(87970, -43144, -4133, moveDistance);
    MoveTo(87847, -43175, -4133, moveDistance);
    MoveTo(87419, -43295, -4133, moveDistance);
    end

function need_buffs()
    if not (GetMe():GetBuffsCount() > 2) then
        return true
    end
    return false
end

function need_rez()
    if GetMe():IsAlikeDeath() == true then
        return true
        end
    return false
end

function main()
    if running then
       if need_buffs() and not need_rez() then
          SetPause(true);
          Sleep(900);
          UseItem(1829); --Use SOE.
          WaitForTeleport();
          ShowToClient("System","Auto farming module, loaded succesfully!");
          Sleep(500);
          move_buffer();
          move_spot();
          SetPause(false)
       elseif need_rez() then
              SetPause(true);
              Sleep(900);
              RequestRestartPoint(4)
              ShowToClient("System","Auto farming module, loaded succesfully!");
              move_buffer();
              move_spot();
              SetPause(false);
          end
       end
    return false
end

repeat
    if running then
        main()
    end
    Sleep(3000)
    ClearTargets()
until false;