Tricoder

iscreatureontile(int x, int y, int z) [boolean]: Retorna true se existe uma criatura no tile definido, se não false. isitemontile(string/int item, int x, int y, int z) [boolean]: Retorna true se o item defido se encontra no tile, se não false. isreachable(int x, int y, int z) [boolean]: Retorna true se o você pode chegar até o tile, se não false. isshootable(int x, int y, int z) [boolean]: Retorna true se o você pode atirar um objeto no tile, se não false. iswalkeable(int x, int y, int z) [boolean]: Retorna true se o você pode andar no tile, se não false. toptileitem(int x, int y, int z) [int]: Representa o ID do item no topo do tile. topitem(int x, int y, int z) [userdata]: Retorna a estrutura do item no topo do tile com as coordenadas. .count [int]: Representa a quantia de items. .id [int]: Representa o ID do item. gettile(int position x, int position y, int position z) [userdata]: Retorna a estrutura do tile definido. .count [int]: Representa a quantia de items no tile. .items [userdata]: Retorna a estrutura de um item no tile, você tem que definir que item quer obter a informação indexando o item. .count [int]: Representa a quantia do item. .id [int]: Representa o ID do item. Créditos: tibiascripts

ignorecreature(int id, bool ignore) [void]: Define a para o bot ignorar a criatura com o ID definido. getcreature(string/int name/id) [userdata]: Retorna a estrutura de uma criatura encontrada com o nome/id. Parâmetros abaixo, nenhum item precisa ser indexado. getcreatures(string filter) [userdata]: Retorna a estrutura de cada criatura encontrada com o filtro usado. Você deve indexar a criatura que deseja acessar. Como filtro você pode usar as seguintes combinações: p: A criatura tem que ser player. m: A criatura tem que ser monstro. f: A criatura tem que estar no mesmo floor que você. s: A criatura tem que estar no mesmo floor que você e visivel na tela. .count [int]: Representa o total de criaturas encontradas. Esse parâmetro não precisa ser indexado. .id [int]: Representa o ID da criatura. .name [string]: Representa o nome da criatura. .hpperc [int]: Representa a porcentagem de hit points da criatura. .x [int]: Representa a posição X da criatura. .y [int]: Representa a posição Y da criatura. .z [int]: Representa a posição Z da criatura. .direction [string]: Representa a direção da criatura como "n", "s", "e" ou "w". .speed [int]: Representa o numero da velocidade da criatura. .dist [int]: Representa a maior distancia entre X e Y da criatura e você. .skull [int]: Representa o ID do tipo de skull da criatura. .party [int]: Representa o ID do tipo de party da criatura. .waricon [int]: Representa o ID do tipo de war banner da criatura. .visible [int]: Representa 1 se a criatura está visivel ou 0 se não. .walking [int]: Representa 1 se a criatura está andando ou 0 se não. .ignored [boolean]: Retorna true se a criatura está ignorada pelo sistema (se foi usada ignorecreature() nela), se não false. .hittime [int]: Representa o tempo em milisegundos de quando a criatura deu seu ultimo hit. .type [int]: Representa o ID do tipo da criatura. .isattackme [boolean]: Retorna true se a criatura esta te atacando, se não false. .isplayerattacker [boolean]: Retorna true se a criatura esta atacando alguem, se não false. .ismonster [boolean]: Retorna true se a criatura é um monstro, se não false. .isplayer [boolean]: Retorna true se a criatura é um player, se não false. .isshootable [boolean]: Retorna true se a você pode atirar na criatura da sua posição, se não false. .isreachable [boolean]: Retorna true se a você pode chegar na criatura da sua posição, se não false. Você pode usar os pointers do mesmo modo das variaveis target e follow com o parâmetro adicional .count: Créditos: tibiascripts

addhudloot(string/int item, int value) [void]: Adiciona um texto no loot counter do hud com o nome e o valor do item looteado. addhudsupplie(string/int item, int value) [void]: Adiciona um texto no loot counter do hud com o nome e o valor do item de suprimentos. addtext(string text, int x, int y) [void]: Adiciona um elemento de texto com o stilo de fonte definido anteriormente, para ser mostrado nas posições definidas. rgbcolor(int red, int green, int blue) [string]: Representa a cor resultante nas combinações de RGB. setfontcolor(string color) [void]: Define a cor da fonte usada. setfontstyle(string name, int size, string style) [void]: Define o nome, o tamanho e o estilo da fonte. setposition(int width, int heigh) [void]: Define a altura e largura da area para a HUD. Créditos: tibiascripts

-- [[ INIT START ]] -- local CONFIG = { RING_NAME = "might ring", } -- [[ DO NOT CHANGE ANYTHING BELOW THIS LINE. ]] -- local RING_ID = Item.GetID(CONFIG.RING_NAME) -- [[ INIT END ]] -- if (Self.Ring().id ~= RING_ID) then Self.MoveItems(RING_ID, "ring", "all", 100) end Créditos: tibiascripts

for CREATURE in Creature.GetAll("ms", false) do if (CREATURE:isValid() and CREATURE:Name() == "Undead Cavebear" and CREATURE:DistanceFromSelf() == 1) then useitemon("maxilla maximus",CREATURE:PositionX(), CREATURE:PositionY(), CREATURE:PositionZ()) break end end Créditos: tibiascripts

if maround(4) == 0 then if itemcount('small enchanted ruby') > 0 and itemcount('worn firewalker boots') > 0 then pausewalking(1000) useitemon('small enchanted ruby','worn firewalker boots',backpackName) wait(2000) end end Créditos: tibiascripts

-- [[ INIT START ]] -- local CONFIG = { CREATURES = {"Sea Serpent", "Young Sea Serpent"}, PLAYERS = { ENABLED = true, DISTANCE = 14, FLOOR_DIFFERENCE = 1, SAFE_LIST = {"Bubble", "Eternal Oblivion"}, }, SPELLS = { --{NAME = "groundshaker", AMOUNT = 6}, {NAME = "fierce berserk", AMOUNT = 4}, {NAME = "berserk", AMOUNT = 3}, {NAME = "front sweep", AMOUNT = 2}, --{NAME = "annihilation", HP_PC = 45}, {NAME = "brutal strike", HP_PC = 10}, {NAME = "whirlwind throw", HP_PC = 10}, }, } -- [[ DO NOT CHANGE ANYTHING BELOW THIS LINE. ]] -- SPELLS_CONFIG = SPELLS_CONFIG or {} LAST_FLOOR = LAST_FLOOR or Self.PositionZ() ATTACK_EXHAUST = ATTACK_EXHAUST or 0 table.lower(CONFIG.CREATURES) local RESET_SPELLS_CONFIG = #CONFIG.SPELLS ~= #SPELLS_CONFIG if (not RESET_SPELLS_CONFIG) then for INDEX, SPELL_ENTRY in ipairs(CONFIG.SPELLS) do if (SPELL_ENTRY.NAME ~= SPELLS_CONFIG[INDEX].NAME or ((SPELL_ENTRY.AMOUNT and SPELL_ENTRY.AMOUNT ~= SPELLS_CONFIG[INDEX].AMOUNT) or (SPELL_ENTRY.HP_PC and SPELL_ENTRY.HP_PC ~= SPELLS_CONFIG[INDEX].HP_PC))) then RESET_SPELLS_CONFIG = true break end end end if (RESET_SPELLS_CONFIG) then SPELLS_CONFIG = {} local CURRENT_INDEX = 1 while (#CONFIG.SPELLS >= CURRENT_INDEX) do CONFIG.SPELLS[CURRENT_INDEX].INFO = Spell.GetByWordsOrName(CONFIG.SPELLS[CURRENT_INDEX].NAME) if (not CONFIG.SPELLS[CURRENT_INDEX].INFO:isValid()) then table.remove(CONFIG.SPELLS, CURRENT_INDEX) else if (#CONFIG.SPELLS[CURRENT_INDEX].INFO:Condition() > 0 and table.find({"BIG_BEAM", "BIG_WAVE", "FRONT", "SMALL_BEAM", "SMALL_WAVE", "STRIKE"}, CONFIG.SPELLS[CURRENT_INDEX].INFO:Condition())) then CONFIG.SPELLS[CURRENT_INDEX].NEED_DIRECTION = true else CONFIG.SPELLS[CURRENT_INDEX].NEED_DIRECTION = false end CURRENT_INDEX = CURRENT_INDEX + 1 end end end -- [[ INIT END ]] -- if (Self.PositionZ() ~= LAST_FLOOR) then LAST_FLOOR, ATTACK_EXHAUST = Self.PositionZ(), System.TimeMilliseconds() + 2000 return end if (System.TimeMilliseconds() > ATTACK_EXHAUST) then for _, SPELL_ENTRY in ipairs(CONFIG.SPELLS) do if (SPELL_ENTRY.INFO:isAbleToCast(nil, false)) then local ATTACKED = Creature.GetAttacked() if (SPELL_ENTRY.AMOUNT and (not CONFIG.PLAYERS.ENABLED or Self.PlayersAroundFloorIgnore(CONFIG.PLAYERS.DISTANCE, CONFIG.PLAYERS.FLOOR_DIFFERENCE, unpack(CONFIG.PLAYERS.SAFE_LIST)) == 0)) then local HIGHEST_AMOUNT, BEST_DIRECTION = 0, Self.LookDirection() if (SPELL_ENTRY.NEED_DIRECTION) then for DIRECTION, CREATURES_AMOUNT in pairs({[DIRECTION_NORTH] = 0, [DIRECTION_EAST] = 0, [DIRECTION_SOUTH] = 0, [DIRECTION_WEST] = 0}) do CREATURES_AMOUNT = Self.MonstersAroundSpell(SPELL_ENTRY.INFO:Condition(), DIRECTION, unpack(CONFIG.CREATURES)) if (CREATURES_AMOUNT > HIGHEST_AMOUNT or (CREATURES_AMOUNT >= HIGHEST_AMOUNT and DIRECTION == Self.LookDirection())) then HIGHEST_AMOUNT, BEST_DIRECTION = CREATURES_AMOUNT, DIRECTION end end else HIGHEST_AMOUNT, BEST_DIRECTION = Self.MonstersAroundSpell(SPELL_ENTRY.INFO:Condition(), Self.LookDirection(), unpack(CONFIG.CREATURES)), Self.LookDirection() end if (HIGHEST_AMOUNT >= SPELL_ENTRY.AMOUNT) then while (Self.LookDirection() ~= BEST_DIRECTION) do Self.Turn(BEST_DIRECTION) System.Wait(25, 75) end if (SPELL_ENTRY.INFO:CastSpell()) then System.Wait(Self.CoolDown(SPELL_GROUP_ATTACK)) end end elseif (SPELL_ENTRY.HP_PC and SPELL_ENTRY.INFO:isAbleToCast(ATTACKED, false) and table.find(CONFIG.CREATURES, ATTACKED:Name():lower()) and SPELL_ENTRY.HP_PC >= ATTACKED:HealthPercent()) then if (SPELL_ENTRY.INFO:CastSpell(ATTACKED)) then System.Wait(Self.CoolDown(SPELL_GROUP_ATTACK)) end end end end end Créditos: tibiascripts

-- max lines to display at once local maxindex = 20 -- spacing between lines local spacing = 10 local index = 0 local msgs = getmessages("Local Chat") local qtd = msgs.count-1 for i=0,qtd do if msgs[qtd-i].type == 6 then setfontcolor("cyan") addtext(msgs[qtd-i].text, worldwin.left+10,worldwin.top+30+(index*spacing)) index=index+1 if index == maxindex then break end end end Créditos: tibiascripts

Uma dúvida, você usa sqlite ou mysql? Se for sqlite > database > Open SQL query editor: DROP TABLE IF EXISTS z_shop_history_item; CREATE TABLE z_shop_history_item ( id INT( 11 ) NOT NULL, to_name VARCHAR( 255 ) NOT NULL DEFAULT '0', to_account INT( 11 ) NOT NULL DEFAULT '0', from_nick VARCHAR( 255 ) NOT NULL, from_account INT( 11 ) NOT NULL DEFAULT '0', price INT( 11 ) NOT NULL DEFAULT '0', offer_id VARCHAR( 255 ) NOT NULL DEFAULT '', trans_state VARCHAR( 255 ) NOT NULL, trans_start INT( 11 ) NOT NULL DEFAULT '0', trans_real INT( 11 ) NOT NULL DEFAULT '0', PRIMARY KEY ( id ) ); Se for mysql:DROP TABLE IF EXISTS `z_shop_history_item`; CREATE TABLE IF NOT EXISTS `z_shop_history_item` ( `id` int(11) NOT NULL AUTO_INCREMENT, `to_name` varchar(255) NOT NULL DEFAULT '0', `to_account` int(11) NOT NULL DEFAULT '0', `from_nick` varchar(255) NOT NULL, `from_account` int(11) NOT NULL DEFAULT '0', `price` int(11) NOT NULL DEFAULT '0', `offer_id` varchar(255) NOT NULL DEFAULT '', `trans_state` varchar(255) NOT NULL, `trans_start` int(11) NOT NULL DEFAULT '0', `trans_real` int(11) NOT NULL DEFAULT '0', PRIMARY KEY (`id`) ) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ; ___________________________________________________ SQLITE:DROP TABLE IF EXISTS z_shop_history_pacc; CREATE TABLE z_shop_history_pacc ( id INT( 11 ) NOT NULL, to_name VARCHAR( 255 ) NOT NULL DEFAULT '0', to_account INT( 11 ) NOT NULL DEFAULT '0', from_nick VARCHAR( 255 ) NOT NULL, from_account INT( 11 ) NOT NULL DEFAULT '0', price INT( 11 ) NOT NULL DEFAULT '0', pacc_days INT( 11 ) NOT NULL DEFAULT '0', trans_state VARCHAR( 255 ) NOT NULL, trans_start INT( 11 ) NOT NULL DEFAULT '0', trans_real INT( 11 ) NOT NULL DEFAULT '0', PRIMARY KEY ( id ) ); MYSQL:DROP TABLE IF EXISTS `z_shop_history_pacc`; CREATE TABLE IF NOT EXISTS `z_shop_history_pacc` ( `id` int(11) NOT NULL AUTO_INCREMENT, `to_name` varchar(255) NOT NULL DEFAULT '0', `to_account` int(11) NOT NULL DEFAULT '0', `from_nick` varchar(255) NOT NULL, `from_account` int(11) NOT NULL DEFAULT '0', `price` int(11) NOT NULL DEFAULT '0', `pacc_days` int(11) NOT NULL DEFAULT '0', `trans_state` varchar(255) NOT NULL, `trans_start` int(11) NOT NULL DEFAULT '0', `trans_real` int(11) NOT NULL DEFAULT '0', PRIMARY KEY (`id`) ) ENGINE=MyISAM DEFAULT CHARSET=latin1 AUTO_INCREMENT=1 ;Veja se saiu o erro.

local MainBP = 'Backpack of Holding' local LootBP = 'Crystal Backpack' local MainDPBP = 'yellow Backpack' local StackDPBP = 'Beach Backpack' local LootDPBP = 'Purple Backpack' while windowcount() > 0 do closewindows() wait(300,500) setsettings("Settings\\CaveBot\\Settings\\OpenNextBp", "no") updateworld() end while windowcount(MainBP) == 0 do openitem(MainBP,'back') wait(1000) updateworld() end while windowcount(LootBP) == 0 do openitem(LootBP,MainBP) wait(1000) resizewindows() updateworld() end while windowcount("locker") == 0 do reachgrounditem("depot") wait(1000) openitem("depot") wait(1000) updateworld() end while windowcount("depot chest") == 0 do openitem("depot chest", "locker") wait(1000) updateworld() end while windowcount(MainDPBP) == 0 do openitem(MainDPBP, "depot chest") wait(1000) updateworld() end for i=1,2 do local ItemToDeposit = getlootitems() for i=0,ItemToDeposit.count-1 do if ItemToDeposit[i].iscumulative then if ItemToDeposit[i].id ~= 3035 and ItemToDeposit[i].id ~= 3031 then depotdeposit(StackDPBP, ItemToDeposit[i].name) wait(300,500) end end end for i=0,ItemToDeposit.count-1 do if not ItemToDeposit[i].iscumulative then depotdeposit(LootDPBP, ItemToDeposit[i].name) wait(300,500) end end openitem(LootBP, LootBP) wait(1000) end Créditos: tibiascripts

local ItemToBuy = 'Brown mushroom' --Item to buy local AmountToBuy = 100 --Amount to buy local MaxPrice = 15 --Wont buy anything more expensive than this local ItemBP = 'Backpack of Holding' --Backpack where to move item setsettings("Settings\\Input\\OpenMenuPolicy", "Do nothing") setsettings("Settings\\CaveBot\\Settings\\OpenNextBp", "no") reachgrounditem("depot") wait(1500,2000) openitem("depot") wait(1500,2000) useitem(12903,"locker") wait(1500, 2000) buyitemmarket(ItemToBuy, (AmountToBuy-itemcount(ItemToBuy)), MaxPrice) setsettings("Settings\\Input\\OpenMenuPolicy", "Confirm if cavebotting") wait(2500) while windowcount(12902) == 0 do openitem(12902, "locker") wait(500,800) end while itemcount(ItemToBuy, ItemBP) < AmountToBuy and itemcount(ItemToBuy, 12902) > 0 do moveitems(ItemToBuy, ItemBP, 100) wait(200,500) end Créditos: tibiascripts

local FirstItem = 'Mana Potion' local FirstAmount = 1000 local FirstPrice = 50 local SecondItem = 'Great health potion' local SecondAmount = 55 local SecondPrice = 210 local First = positive(FirstAmount - itemcount(FirstItem)) * FirstPrice local Second = positive(SecondAmount - itemcount(SecondItem)) * SecondPrice local Total = First + Second say("hi") wait(1500,2500) npcsay("deposit all") wait(200,300) npcsay("yes") wait(200,300) if Total > 0 then npcsay("withdraw "..Total) wait(200,300) npcsay("yes") wait(200,300) npcsay("Balance") wait(200,300) end Créditos: tibiascripts

local FirstItem = 'Mana Potion' local FirstAmount = 1000 local FirstPrice = 50 local SecondItem = 'Great health potion' local SecondAmount = 55 local SecondPrice = 210 local First = positive(FirstAmount - itemcount(FirstItem)) * FirstPrice local Second = positive(SecondAmount - itemcount(SecondItem)) * SecondPrice local Total = First + Second say("hi") wait(1500,2500) npcsay("deposit all") wait(200,300) npcsay("yes") wait(200,300) if Total > 0 then npcsay("withdraw "..Total) wait(200,300) npcsay("yes") wait(200,300) npcsay("Balance") wait(200,300) end Créditos: tibiascripts

local waterIDs = {4597,4598,4599,4600,4601,4602,4603} local range = 7 local captostop = 50 for i=-range,range do for j=-range,range do if toptileitem(posx+i,posy+j,posz) == waterIDs[random(1,#waterIDs)] and itemcount('worm') > 0 and cap > captostop then useitemon('fishing rod',posx+i,posy+j,posz) wait(500,800) end end end Créditos: tibiascripts

local maxdamage = 1 -- configure aqui o maximo de dano para use exana pox local msgs = getnewmessages("Server Log") local qtd = msgs.count-1 local msgsgot = msgs[qtd].text local numeros = {} for w in string.gfind(msgsgot, "%d+") do if msgsgot:find("You lose (.+) hitpoints.") then table.insert(numeros, w) end end local damage = tonumber(numeros[#numeros]) if #numeros > 0 then if poisoned == true then if damage > maxdamage and maround(4) == 0 then if cancast("exana pox") then cast("exana pox") end end end end Créditos: tibiascripts

local serverlog_lines = getnewmessages("Server Log") local serverlog_q = serverlog_lines.count - 1 for i = 0, serverlog_q do if (serverlog_lines[serverlog_q - i].text:find("due to an attack by a stalker.")) and paround() == 0 and maround(3,false,"Stalker") == 0 then usehotkey("F12") -- Rune Yourself. end end Créditos: tibiascripts

--[[ Name: Logout x HOUR Version: v1.0.0 Status: Working Author: Sayild ]]-- local LOGOUT_TIME = '4:55' -- hour to logout -- Dont change below local LOGOUT = tosec(LOGOUT_TIME) local CURRENT_TIME = tosec(time()) if CURRENT_TIME == LOGOUT then if pzone then wait(500) logout() end end Créditos: tibiascripts

if maround(9) == 0 then skin(7,true) end Créditos: tibiascripts

-- [[ INIT START ]] -- local CONFIG = { PLAYERS = { {NAME = "NAME 1", HPPC = 40}, {NAME = "NAME 2", HPPC = 50}, }, } -- [[ INIT END ]] -- local CREATURE_TO_HEAL, HPPC_TO_HEAL = nil, 101 for CREATURE in Creature.GetAll("ps") do local PLAYER_FOUND = table.find(CONFIG.PLAYERS, CREATURE:Name(), "NAME") if (CREATURE:isValid() and CREATURE:isAlive() and PLAYER_FOUND and CREATURE:HealthPercent() < CONFIG.PLAYERS[PLAYER_FOUND].HPPC and CREATURE:HealthPercent() < HPPC_TO_HEAL) then CREATURE_TO_HEAL, HPPC_TO_HEAL = CREATURE, CREATURE:HealthPercent() end end if (Creature.isInstance(CREATURE_TO_HEAL)) then Spell.GetByWordsOrName("heal friend"):CastSpell(CREATURE_TO_HEAL, CREATURE_TO_HEAL:Name()) System.Wait(200) end Créditos: tibiascripts

local serverlog_lines = getnewmessages("Server Log") local serverlog_q = serverlog_lines.count - 1 for i = 0, serverlog_q do if (serverlog_lines[serverlog_q - i].text:find("was not justified.")) then closetibia() end end Créditos: tibiascripts

minimizewindows('equip') Créditos: tibiascripts

if not manashielded and cooldown('utamo vita') == 0 and mp >= 50 then cast('utamo vita') updateworld() end Créditos: tibiascripts

local lifeforequip = 80 -- Quantidade de life em % que o char vai equipar o ring local ringid = 3052 -- Id do ring que vai equipar, ex 3052 = life ring local bpofring = 'backpack' -- BP que esta o ring if mppc == 80 then moveitems(ringid, bpofring, ring, 1) end Créditos: tibiascripts

local label = 'correr' -- Label que o char vai correr se o pk atacar. if underattack('p') then settargeting('off') gotolabel(label) end Créditos: tibiascripts

useIdle = true -- se você quer usar if useIdle then turn('n') wait(15000) turn('s') wait(15000) turn('e') wait(15000) turn('w') wait(15000) end Créditos: tibiascripts