OTBots Forums - LUA Scripts

disable fishing if more than 3 fishes in bp

Tue, 23 Mar 2021 11:58:47 -0500

very simple
disables fishing if you have more than 3 fishes in backpack to, usefull when you make bolts on paladin, it will prevent fishing too many fishes that will take your cap

(COPY)

        if  itemcount('fish') > 3 then

            setsettings("Tools/Auto Fishing/Enabled", false)

        else

            setsettings("Tools/Auto Fishing/Enabled", true)

        end

Pickup Spears

Thu, 31 Jan 2019 12:16:10 -0600

Hello.

This is a basic script to pickup spears/small stones to a BACKPACK, it's able to move dead bodies away and pickup.
It will disable TARGETING, CAVEBOT and LOOTER to pickup the spears and enable it again.

I will NOT give any support on this script, not even to fix bugs. So please, don't ask for help or so, because you will be ignored.

(COPY)

local SPEAR_ID = 1781 -- Spear ID

local SPEAR_BACKPACK = 'blue backpack' -- The backpack that spears/stones will be moved to.

local SPEAR_MIN_AMOUNT = 3 -- Amount start to pickup spears

local SPEAR_MAX_AMOUNT = 5 -- Max. Amount to pickup

local MOVE_BODIES = true -- Move dead bodies to pickup spears





local SPEAR_COUNT = itemcount(SPEAR_ID, SPEAR_BACKPACK, true)

if SPEAR_COUNT < SPEAR_MIN_AMOUNT then

    if not MOVE_BODIES then

        local player_x = posx()

        local player_y = posy()

        local player_z = posz()



        local disabled_stuff = false

        local flag_break = false



        for x = -7, 7, 1 do

            for y = -5, 5, 1 do

                local top_item = topitem(player_x + x, player_y + y, player_z, false)

                if top_item.id == SPEAR_ID then

                    setsettings('Looter/Enabled', false)

                    setsettings('Cavebot/Enabled', false)

                    setsettings('Targeting/Enabled', false)

                    disabled_stuff = true



                    if reachlocation(player_x + x, player_y + y, player_z) then

                        wait(800)



                        local AMOUNT_PICKUP = (SPEAR_MAX_AMOUNT - SPEAR_COUNT)

                        if AMOUNT_PICKUP > top_item.count then

                            AMOUNT_PICKUP = 100

                        end



                        moveitems(SPEAR_ID, SPEAR_BACKPACK, ground(player_x+ x, player_y + y, player_z), AMOUNT_PICKUP)

                        wait(800)



                        flag_break = true

                    end

                end



                if flag_break then

                    break

                end

            end



            if flag_break then

                break

            end

        end



        if disabled_stuff then

            setsettings('Targeting/Enabled', true)

            setsettings('Looter/Enabled', true)

            setsettings('Cavebot/Enabled', true)

        end

    else

        if SPEAR_COUNT == 0 or maround(7) == 0 then



            local player_z = posz()

            local tiles = gettiles()



            local disabled_stuff = false

            local flag_break = false



            for _, tile in ipairs(tiles) do

                if tile.itemcount > 1 and tile.posz == player_z then

                    for __, item in ipairs(tile.items) do

                        if item.id == SPEAR_ID then

                            setsettings('Looter/Enabled', false)

                            setsettings('Cavebot/Enabled', false)

                            setsettings('Targeting/Enabled', false)

                            disabled_stuff = true



                            if reachlocation(tile.posx, tile.posy, tile.posz) then

                                wait(800)

                                while true do

                                    local top_item = topitem(tile.posx, tile.posy, tile.posz, false)

                                    if top_item.id == 0 or top_item.id == SPEAR_ID or (posx() == tile.posx and posy() == tile.posy) then

                                        break

                                    end

                                    moveitems(top_item.id, ground(posx(), posy(), posz()), ground(tile.posx, tile.posy, tile.posz), 100)

                                    wait(800)

                                end



                                local AMOUNT_PICKUP = (SPEAR_MAX_AMOUNT - SPEAR_COUNT)

                                if AMOUNT_PICKUP > item.count then

                                    AMOUNT_PICKUP = 100

                                end



                                moveitems(SPEAR_ID, SPEAR_BACKPACK, ground(tile.posx, tile.posy, tile.posz), AMOUNT_PICKUP)

                                wait(800)



                                SPEAR_COUNT = itemcount(SPEAR_ID, SPEAR_BACKPACK, true)

                                if SPEAR_COUNT >= SPEAR_MAX_AMOUNT then

                                    flag_break = true

                                end

                            end



                            break

                        end

                    end

                end



                if flag_break then

                    break

                end

            end



            if disabled_stuff then

                setsettings('Targeting/Enabled', true)

                setsettings('Looter/Enabled', true)

                setsettings('Cavebot/Enabled', true)

            end

        end

    end

end

Equip/Unequip Small Stone and Weapon

Thu, 31 Jan 2019 11:14:11 -0600

(COPY)

local WEAPON = 'serpent sword' -- IT MUST BE ON LEFT HAND (<<<)

local BACKPACK_WEAPON = 'red backpack' -- Backpack that will save the weapon.



local BACKPACK_STONES = 'red backpack' -- Backpack that will save the stones.

local STONES_COUNT = 3 -- Minimum amount to move stones to hand if you are using weapon.









local STONES_ID = 1294 -- DONT CHANGE THIS LINE

local WEAPON_ID = itemid(WEAPON) -- DONT CHANGE THIS LINE





local left_hand = lhand()



if left_hand.id == 0 then

    if itemcount(STONES_ID, BACKPACK_STONES) >= STONES_COUNT then

        moveitems(STONES_ID, 'lhand', BACKPACK_STONES)

        wait(800)

    else

        moveitems(WEAPON_ID, 'lhand')

        wait(800)

    end

elseif left_hand.id == STONES_ID and itemcount(STONES_ID, BACKPACK_STONES) >= 1 then

    moveitems(STONES_ID, 'lhand', BACKPACK_STONES)

    wait(800)

elseif left_hand.id ~= STONES_ID and itemcount(STONES_ID, BACKPACK_STONES) >= STONES_COUNT then

    moveitems(left_hand.id, BACKPACK_WEAPON, 'lhand')

    wait(800)

    moveitems(STONES_ID, 'lhand', BACKPACK_STONES)

    wait(800)

end

Pause Bot if mana gain is higher than 1 (one)

Wed, 03 Oct 2018 15:53:40 -0500

Hello.

I didn't tested the codes that i will post, but people can use it as "start" to adapt for its own needs.

Check for mana gain. If your mana's value increases more than "1" since last run, it will play a sound, flash client and pause bot.

(COPY)

if connected() then

    LAST_MANA = LAST_MANA or mp()

    local current_mana = mp()

    if (current_mana - LAST_MANA) > 1 then

        playsound('default')

        flashclient()

        pausebot(true)

    end



    LAST_MANA = current_mana

else

    LAST_MANA = nil

end

Enable/Disable Runemaker every X seconds

Wed, 03 Oct 2018 15:53:10 -0500

Hello.

I didn't tested the codes that i will post, but people can use it as "start" to adapt for its own needs.

This script will ENABLE the runemaker every X seconds AFTER MAKING LAST RUNE, but it will only do that if have mana enough. After enabling runemaker, it will wait 10 seconds (which you can increase, this time must be enough to move blanks, cast spell and move "made" rune back to backpack) and disable it.

(COPY)

local Time_MakeRune = 300 -- Time to wait between runes to enable Runemaker, in seconds.

local manaCondition = 'Mana above' -- Condition to mane runes: Mana above or Mana percent

local manaValue = 500 -- Value to make runes.





LAST_RUNE_TIME = LAST_RUNE_TIME or 1



local currentValue = mppc()

if manaCondition:lower() == 'mana above' then

  currentValue = mp()

end



local timeNow = runningtime()



if currentValue >= manaValue and (timeNow - LAST_RUNE_TIME) >= Time_MakeRune then

  setsettings('Runemaker/Enabled', true)

  wait(10000)

  LAST_RUNE_TIME = timeNow

  setsettings('Runemaker/Enabled', false)

else

  local runemakerEnabled = getsettings('Runemaker/Enabled')

  if runemakerEnabled then

      setsettings('Runemaker/Enabled', false)

  end

end

Multi-Floor Player Alert v1.0

Sun, 02 Sep 2018 15:43:52 -0500

Hello.

That's a Multi-Floor Player Alert.
You must enable each option that you wanna do when the alert is triggered.

"MultiFloor" must be a number value which is the maximum floor difference to detect players.
MultiFloor = 0 means detect players on same floor;
MultiFloor = 1 means detect players on same floor and +1 or -1;
MultiFloor = 2 means same floor, +1 or -1, +2 or -2.

(COPY)

local SafeList = { "Player1", "Player2", "Player3" }

local Action = {

  MultiFloor = 0,    -- Whats the max floor difference that it should detect players?

  Visible = false,      -- Does player must be visible? It can detect players one sqm OUT of your screen.

  PlaySound = false,    -- Should it PLAY SOUND if detect a player?

  FlashClient = false,  -- Should it FLASH CLIENT if detect a player?

  FocusClient = false,  -- Should it FOCUS CLIENT if detect a player?

  Logout = false,        -- Should it LOGOUT if detect a player?

  Screenshot = false,   -- Should it TAKE A SCREENSHOT if detect a player?

  XLog = false,         -- Should it XLOG (it also tries to logout first!) if detect a player?

  PauseBot = false,     -- Should it PAUSE BOT if detect a player?

  DisableTools = false,     -- Should it disable listed tools below BOT if detect a player?

  EnableTools = false,     -- Should it enable listed tools below BOT if DON'T detect a player?

  LogPlayers = false,    -- Should it LOG every player that appears on your screen?

  PrintConsole = false,    -- Should it LOG every player that appears on your screen?

}



local Tools = {

  'Cavebot/Enabled',

  'Targeting/Enabled',

  'Looter/Enabled',

  'Healer/Enabled',

  'Runemaker/Enabled'

}



--[[ DON'T EDIT BELOW THIS LINE --]]

--[[ DON'T EDIT BELOW THIS LINE --]]



--[[               Multi-Floor Player Alert v1.0 by Arkilys               --]]

--[[                      https://forums.otbots.com/                      --]]





TOOLS_PAUSED = TOOLS_PAUSED or false

local Creatures = getcreatures('p')



local alertFired = false



if #Creatures > 0 then



    local player_name = name()

    local player_z = posz()

    for i,j in pairs(Creatures) do

        if table.find(SafeList, j.name) == nil and j.name ~= player_name then

            if Action.MultiFloor == 0 or math.abs(j.posz - player_z) <= Action.MultiFloor then

                if Action.Visible == false or (Action.Visible and j.visible) then

                    alertFired = true

                    if Action.PrintConsole then

                        print(j.name)

                    end

                    if Action.LogPlayers then

                        file.writeline(player_name .. " - PlayersOnScreen", date() .. " - " .. formattedtime() .. ": " .. j.name)

                    end

                    if Action.FocusClient then

                        focusclient()

                    end

                    if Action.PlaySound then

                        playsound("alert_playeronscreen")

                    end

                    if Action.FlashClient then

                        flashclient()

                    end

                    if Action.Screenshot then

                        screenshot()

                    end

                    if Action.Logout then

                        logout()

                    end

                    if Action.XLog then

                        xlog()

                    end

                    if Action.DisableTools then

                        for k = 1, #Tools do

                            setsettings(Tools[k], false)

                        end

                    end

                    if Action.PauseBot then

                        pausebot(true)

                    end

                end

            end

        end

    end

end



if not alertFired and Action.EnableTools then

    for k = 1, #Tools do

        setsettings(Tools[k], true)

    end

end

Useful Scripts for Cavebotting

Fri, 24 Aug 2018 15:41:34 -0500

Hello.

I'm posting this thread to share common LUA scripts that are useful for specifically Caveboting.

Pay attention where you should use the script. Because some scripts may be require another code to be used Cavebot->LUA Setup, in that case, I will share both.

If find any bug, please, send a private message and i will fix the script.

|Only Registered members can see download links. | Click here to buy subscription or here to register.
|Only Registered members can see download links. | Click here to buy subscription or here to register.
|Only Registered members can see download links. | Click here to buy subscription or here to register.
|Only Registered members can see download links. | Click here to buy subscription or here to register.
|Only Registered members can see download links. | Click here to buy subscription or here to register.

Loot Sorter

Sat, 04 Aug 2018 12:48:44 -0500

Hello.

It will drop the following items on the specific locations and will also open the next backpacks inside.

(COPY)

local OpenNextBPs = true

local ITEMS_DROP = {

   { Id = 2148, Location = { X = 12345, Y = 12345}},

   { Id = 1234, Location = { X = 12345, Y = 12345}},

   { Id = 4321, Location = { X = 12345, Y = 12345}},



}



local player_z = posz()



for _, item in ipairs(ITEMS_DROP) do

   while itemcount(item.Id) > 0 do

       moveitems(item.Id, ground(item.Location.X, item.Location.Y, player_z), '', 100)

   end

end



if OpenNextBPs then

   local containers = getcontainers()



    for i = 1, #containers do

       local container = containers[i]

       for j = 1, #container.items do

           local item = container.items[j]

           if item ~= nil then

               if itemhasflags(item.id, 4) then

                   openitemslot(item.index, container.index, false)

                   wait(800, 1200)

                   break

               end

           end

       end

   end

end

[v0.2] Check for rune and Open next backpack or Alert

Sat, 04 Aug 2018 12:47:40 -0500

Hello.

This script will check if there are RUNES on specific backpack's and...
1. IF OPEN_BACKPACK is ENABLED... If there are no specific rune and there are a container, it will open this container. I recommend to disable "OPEN_BACKPACK" (set "OPEN_BACKPACK" as false) while using "Healer/Settings/Open next BP for more supply" or "Targeting/Settings/Open next BP for more runes".
2. If there are less or equal to MinCount and there are no container, it will play a sound and flash the client.

I recommend you to use Backpack index instead of names, unless you use that specific backpack (e.g.: "golden backpack') for your runes backpacks only and all runes backpacks INSIDE are the same kind. So if you are using Golden Backpack for runes and gold coins OR not using same color for all runes backpacks, you must use index.

Index is zero-based and according the order that you opened the backpacks.

(COPY)

local Backpack = 'green backpack' -- specific container to check for runes.

local Rune = 'ultimate healing rune' -- rune to check.



local OPEN_BACKPACK = true -- open next backpack for more runes?



local PLAY_ALERT = true -- Play alert on MinCount?

local ALERT_COUNT = 2 -- Min. count to play alert.



--[[ DON'T EDIT BELOW THIS LINE --]]

--[[ DON'T EDIT BELOW THIS LINE --]]

--[[ DON'T EDIT BELOW THIS LINE --]]



if connected() then

    Rune = itemid(Rune)



    local Containers = getcontainers()



    for i = 1, #Containers do

        local cont = Containers[i]

        local ContainerSlot = -1

        local RunesCount = 0



        if (cont.name:lower() == Backpack:lower() or tostring(Backpack) == tostring(cont.index)) then

            for j = 1, #cont.items do

                local item = cont.items[j]

                if itemhasflags(item.id, 4) then

                    ContainerSlot = item.index

                elseif item.id == Rune then

                    RunesCount = RunesCount + item.count

                end

            end



            if OPEN_BACKPACK and RunesCount == 0 and ContainerSlot >= 0 then

                openitemslot(ContainerSlot, cont.index, false)

                wait(1000)

            elseif PLAY_ALERT and RunesCount <= ALERT_COUNT and ContainerSlot == -1 then

                playsound('default')

                flashclient()

                wait(800)            

            end

        end

    end

end

Player on Screen with List

Mon, 30 Jul 2018 10:25:50 -0500

Hello.

This script will execute the options that you enabled (PlaySound, FlashClient, etc.) only if a player that's on the list appears.

(COPY)

local DangerList = { "Player1", "Player2", "Player3" }

local Action = {

    MultiFloor = true,    -- Should it detect player on different floors?

    Visible = false,      -- Does player must be visible? It can detect players one sqm OUT of your screen.

    PlaySound = false,    -- Should it PLAY SOUND if detect a player?

    FlashClient = false,  -- Should it FLASH CLIENT if detect a player?

    Logout = false,        -- Should it LOGOUT if detect a player?

    XLog = false,         -- Should it XLOG (it also tries to logout first!) if detect a player?

    PauseBot = false,     -- Should it PAUSE BOT if detect a player?

    LogPlayers = false,    -- Should it LOG every player that appears on your screen?

    PrintConsole = true,    -- Should it LOG every player that appears on your screen?

}





table.lower(DangerList)

local Creatures = getcreatures('p')



for i,j in pairs(Creatures) do

    if table.find(DangerList, j.name:lower()) ~= nil then

        if Action.MultiFloor or (Action.MultiFloor == false and j.posz == posz) then

            if Action.Visible == false or (Action.Visible and j.visible) then

                if Action.PrintConsole then

                    print(j.name)

                end

                if Action.LogPlayers then

                    file.writeline(name .. " - PlayersOnScreen", date .. " - " .. formattedtime .. ": " .. j.name)

                end

                if Action.PlaySound then

                    playsound("alert_playeronscreen")

                end

                if Action.FlashClient then

                    flashclient()

                end

                if Action.Logout then

                    logout()

                end

                if Action.XLog then

                    xlog()

                end

                if Action.PauseBot then

                    pausebot(true)

                end

            end

        end

    end

end

Shooting fireball runes on best SQM

Mon, 16 Jul 2018 14:14:40 -0500

Hello.

This script will try to shoot a GFB on the best possible SQM to hit as many monsters as possible, but will only shoot the rune if you can hit the least amount of monsters you have set.

(COPY)

local Monsters = { 'Ghoul', 'Scarab', 'Stalker' }

local Rune = 'great fireball rune'

local MinMonsters = 2 -- Min. count to shoot rune.

local SafeHealth = 60 -- Shoot runes only if your HP % is higher or equal to this valaue.

local PlayerSafe = true -- Check if there's another player on screen. If so, don't shoot rune.



if hppc() >= SafeHealth and cancast() and maround(7, unpack(Monsters)) >= MinMonsters and (PlayerSafe == false or (PlayerSafe and paround() == 0)) then

    if shootarearune(Rune, MinMonsters, unpack(Monsters)) then

        wait(1200)

    end

end

Take SS on Level Up!

Mon, 16 Jul 2018 14:10:30 -0500

Hello.

This script gonna take a screenshot when your character reach next level.

(COPY)

if lastLevel == nil then

  lastLevel = level()

else

  local lvl = level()

  if lvl > lastLevel then

      wait(500)

      screenshot(name() .. ' - Level ' .. lvl)

      lastLevel = lvl

  end

end

Berserk ("Exori")

Mon, 16 Jul 2018 14:07:49 -0500

Hello.

This script will cast Berserk ("exori") spell when you are surrounded by X monsters defined on list.
It will also check if your HP % is higher than Y, just to make sure that you won't try to cast it while healing!

Credits to me and .

(COPY)

local Monsters = { 'Frost Giant', 'Dragon' } -- Monsters to kill

local SafeList = { 'Mrcn', 'CM Guido' } -- Your safelist

local MinMonsters = 1 -- Min. count to cast exori.

local SafeHealth = 30 -- Only if your HP % is higher or equal to this valaue.

local CheckPlayers = true -- Check for players? Not going to CAST SPELL if player on screen.

local CheckAllFloor = true -- Checks all floors for players?



if hppc() >= SafeHealth and mp() >= (level()*2) and cancast() and maround(1, unpack(Monsters)) >= MinMonsters then

    if not CheckPlayers or paroundignore(0, CheckAllFloor, unpack(SafeList)) == 0 then

        cast('exori')

        wait(1000, 1200)

    end

end

If player appears and don't leave, start talking!

Mon, 16 Jul 2018 13:34:24 -0500

(COPY)

local SafeList = { 'Player1', 'player2', 'pk3'}

local TextsSay = {

  { 'hello', 'hi', '^^', ':)' }, -- FIRST message, It's gonna say one of those things by random.

  { 'how can i help you?', 'sup mate', 'do you need something?' }, -- SECOND message, It's gonna say one of those things AFTER FIRST MESSAGE by random.

  { 'do you mind?', 'tell me', 'mind?' }, -- THIRD message, It's gonna say one of those things AFTER SECOND MESSAGE by random.

  { 'im doing some stuff.', 'working..', 'doing stuff', 'homework :s' }, -- FOURTH message, It's gonna say one of those things AFTER THIRD MESSAGE by random.

  { 'it can be boring', 'you may lose some time', 'wasting time?' },

  { 'well, told you so', 'just said', 'well...' },

  { 'must change windows', 'alt tab', 'must check something' },

  { 'bye mate', 'bye :(', 'see ya' },

}



local Times = 

{

   StartTalking  = 3000, -- Time to wait before START saying something IN milliseconds!

   BetweenMessages = 8000, -- Time to wait between says IN milliseconds!

}





--[[ DON'T EDIT BELOW THIS LINE --]]

--[[ DON'T EDIT BELOW THIS LINE --]]



table.lower(SafeList)



IGNORED_PLAYERS = IGNORED_PLAYERS or { }



local PlayersList = getcreatures('pfs')



local player_name = name()

local player_z = posz()



for _, player in ipairs(PlayersList) do

   if player.name ~= player_name and player.visible and player.posz == player_z and table.find(IGNORED_PLAYERS, player.name) == nil and table.find(SafeList, player.name:lower()) == nil then

       wait(Times.StartTalking)

       for TALK_INDEX = 1, #TextsSay do

           if paround(7, player.name) > 0 then

               local sortText = random(1, #TextsSay[TALK_INDEX])

               say(TextsSay[TALK_INDEX][sortText])

               wait(Times.BetweenMessages)

               if TALK_INDEX == #TextsSay then

                   table.insert(IGNORED_PLAYERS, player.name)

               end

           else

               break

           end

        end

   end

end

Light Caster

Mon, 16 Jul 2018 13:31:05 -0500

Hello.

This script will cast 'Utevo Lux' and wait 370 seconds to cast again, because it lasts for 370 seconds. So your character will not waste mana and will have a light.
Also will cast if your MANA % is 99% or higher.
You can change to 'Utevo Gran Lux', but it will last for more time and i don't know it's exactly duration.

(COPY)

local CONFIG =

{

    Spell = 'Utevo Lux', -- Spell

    Duration  = { Min = 350, Max = 370 }, -- Spell duration in SECONDS. Light lasts 370 / Great Light lasts 695.

    MinMp = 20, -- Min. mp EXACTY value to cast. If lower, don't cast.

    MaxMp = 99, -- If Mp% higher or equal, it will cast (avoiding full mana).

}



RANDOM_DURATION = RANDOM_DURATION or 0

LAST_CAST = LAST_CAST or 0



local CastSpell = false



if mp() >= CONFIG.MinMp then

    if LAST_CAST > 0 and RANDOM_DURATION > 0 then

        if runningtime() >= (LAST_CAST + RANDOM_DURATION) then

            CastSpell = true

        elseif mppc() >= CONFIG.MaxMp then

            CastSpell = true

        end

    else 

        CastSpell = true

    end



    if CastSpell and cancast() then

        cast(CONFIG.Spell)

        LAST_CAST = runningtime()

        RANDOM_DURATION = random(CONFIG.Duration.Min, CONFIG.Duration.Max)

        wait(800)

    end

end