Ir para conteúdo

Fir3element

Héroi
  • Registro em

  • Última visita

Tudo que Fir3element postou

  1. Adiciona isso no login.lua local storage = "first_login" -- não mexe local msg = "msg aqui" -- muda a msg aqui if getPlayerStorageValue(cid, storage) == -1 then setPlayerStorageValue(cid, storage, 0) doPlayerPopupFYI(cid, msg) end
  2. ai no caso ele vai pegar essa magia na pasta ta lib onCastSpell é um evento e doCreatureCastSpell uma ação, são coisas diferentes...
  3. SQLite funciona normalmente no Linux, se é o que quer saber. O erro aparece porque você configurou como MySQL e a database 'theforgottenserver' não existe. Na hora de compilar use isto: --enable-sqlite
  4. Desse jeito ai não, tu pode usar essas tags: CONST_SLOT_HEAD = 1 CONST_SLOT_NECKLACE = 2 CONST_SLOT_BACKPACK = 3 CONST_SLOT_ARMOR = 4 CONST_SLOT_RIGHT = 5 CONST_SLOT_LEFT = 6 CONST_SLOT_LEGS = 7 CONST_SLOT_FEET = 8 CONST_SLOT_RING = 9 CONST_SLOT_AMMO = 10
  5. Fir3element postou uma resposta no tópico em Suporte Tibia OTServer
    Poste o code da página do shop (deve ser shopsystem.php, algo assim).
  6. local config = { check = {"check", "viwer", "verificar", "ver"}, delete = {"del", "delete", "deletar"}, search = {"search", "procurar"} } function getItemsInContainer(cont, sep) local text, tsep, count = "", "", "" for i = 1, sep do tsep = tsep .. "-" end tsep = tsep .. ">" for i = 0, getContainerSize(cont.uid) - 1 do local item = getContainerItem(cont.uid, i) if not isContainer(item.uid) then if item.type > 0 then count = "(" .. item.type .. "x)" end text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " " .. count .. " (" .. item.itemid .. ")" else if getContainerSize(item.uid) > 0 then text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")" text = text .. getItemsInContainer(item, sep + 2) .. " (" .. item.itemid .. ")" else text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")" end end end return text end function onSay(cid, words, param, channel) local slotName = {CONST_SLOT_BACKPACK, CONST_SLOT_RIGHT, CONST_SLOT_FEET} local t = string.explode(param, ",") if(table.isStrIn(param, config.check)) then if getPlayerGroupId(cid) >= 5 then local player = getPlayerByNameWildcard(t[2]) if isPlayer(player) then local text = getPlayerName(player) .. "'s Equipment: " for i = 1, #slotName do text = text .. "\n\n" local item = getPlayerSlotItem(player, slotName[i]) if item.itemid > 0 then if isContainer(item.uid) then text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ") " .. getItemsInContainer(item, 1) else text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")" end else text = text .. slotName[i] .. ": Empty" end end doShowTextDialog(cid, 6579, text) else doPlayerSendCancel(cid, "This player is not online.") end end elseif(table.isStrIn(param, config.delete)) then if getPlayerGroupId(cid) >= 5 then local player = getPlayerByNameWildcard(t[3]) if isPlayer(player) then count = t[4] if(not t[4]) then count = 1 end if getPlayerItemCount(player, t[2]) > 0 then if doPlayerRemoveItem(player, t[2], count) then doPlayerSendCancel(cid, "Item Deletado.") else doPlayerSendCancel(cid, "Este player não esta quantidade.") end else doPlayerSendCancel(cid, "Este player não tem o item.") end end end elseif(table.isStrIn(param, config.search)) then if getPlayerGroupId(cid) >= 5 then local player = getPlayerByNameWildcard(t[3]) local result = db.getResult("SELECT name, online FROM players WHERE id IN (SELECT player_id FROM player_items WHERE itemtype = " .. t[2] .. ");") local msg = "Resultados da busca pelo item " .. t[2] .. " em seu banco de dados:\n\n" if result:getID() ~= -1 then while true do local name = result:getDataString("name") local online = result:getDataInt("online") msg = msg .. name .. " [" .. (online == 1 and "Online" or "Offline") .. "]\n" if not result:next() then break end end else msg = msg .. "O item não foi encontrado em nenhum jogador." end doShowTextDialog(cid, t[2], msg) end end return true end
  7. O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Mapping" Para: "OTServ → Suporte OTServ → Suporte de WebSites"
  8. Fir3element postou uma resposta no tópico em Suporte Tibia OTServer
    Consegui testar agora. player.cpp, troque sua função getDescription por essa:
  9. Fir3element postou uma resposta no tópico em Suporte Bots
    O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "Bots para Tibia → Bots → ElfBot NG" Para: "Bots para Tibia → Suporte Bots"
  10. Não precisa de query, mas tem que editar a source: http://www.tibiaking.com/forum/topic/55082-script-reset-1076/?p=329363
  11. Fir3element postou uma resposta no tópico em Sprites
    Scan: https://www.virustotal.com/pt/file/e4b2b13d45457c4502191cb0550877538537f57f71eea0803af83259e4cb0dce/analysis/1429931902/ Movido para a área correta.
  12. É diferente, mas talvez ajude: https://github.com/gesior/Gesior2012/archive/TFS-1.0.zip
  13. Se não der certo, tenta esse: local config = { check = {"check", "viwer", "verificar", "ver"}, delete = {"del", "delete", "deletar"}, search = {"search", "procurar"} } function getItemsInContainer(cont, sep) local text, tsep, count = "", "", "" for i = 1, sep do tsep = tsep .. "-" end tsep = tsep .. ">" for i = 0, getContainerSize(cont.uid) - 1 do local item = getContainerItem(cont.uid, i) if not isContainer(item.uid) then if item.type > 0 then count = "(" .. item.type .. "x)" end text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " " .. count .. " (" .. item.itemid .. ")" else if getContainerSize(item.uid) > 0 then text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")" text = text .. getItemsInContainer(item, sep + 2) .. " (" .. item.itemid .. ")" else text = text .. "\n" .. tsep .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")" end end end return text end function onSay(cid, words, param, channel) local slotName = {CONST_SLOT_BACKPACK, CONST_SLOT_RIGHT, CONST_SLOT_FEET} local t = string.explode(param, ",") if(table.isStrIn(param, config.check)) then if getPlayerGroupId(cid) >= 5 then local player = getPlayerByNameWildcard(t[2]) if isPlayer(player) then local text = getPlayerName(player) .. "'s Equipment: " for i = 1, #slotName do text = text .. "\n\n" local item = getPlayerSlotItem(player, slotName[i]) if item.itemid > 0 then if isContainer(item.uid) then text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ") " .. getItemsInContainer(item, 1) else text = text .. slotName[i] .. ": " .. getItemNameById(item.itemid) .. " (" .. item.itemid .. ")" end else text = text .. slotName[i] .. ": Empty" end end doShowTextDialog(cid, 6579, text) else doPlayerSendCancel(cid, "This player is not online.") end end elseif(table.isStrIn(param, config.delete)) then if getPlayerGroupId(cid) >= 5 then local player = getPlayerByNameWildcard(t[3]) if isPlayer(player) then count = t[4] if(not t[4]) then count = 1 end if getPlayerItemCount(player, t[2]) > 0 then if doPlayerRemoveItem(player, t[2], count) then doPlayerSendCancel(cid, "Item Deletado.") else doPlayerSendCancel(cid, "Este player não esta quantidade.") end else doPlayerSendCancel(cid, "Este player não tem o item.") end end end elseif(table.isStrIn(param, config.search)) then if getPlayerGroupId(cid) >= 5 then local player = getPlayerByNameWildcard(t[3]) local result = db.getResult("SELECT name, online FROM players WHERE id IN (SELECT player_id FROM player_items WHERE itemtype = " .. t[2] .. ");") local msg = "Resultados da busca pelo item " .. t[2] .. " em seu banco de dados:\n\n" if result:getID() ~= -1 then while true do local name = result:getDataString("name") local online = result:getDataInt("online") msg = msg .. name .. " [" .. (online = 1 and "Online" or "Offline") .. "]\n" if not result:next() then break end end else msg = msg .. "O item não foi encontrado em nenhum jogador." end doShowTextDialog(cid, t[2], msg) end end return true end
  14. Fir3element postou uma resposta no tópico em Suporte Tibia OTServer
    Tente usar esse vocations.xml e vê o que acontece: http://hastebin.com/raw/racagafora O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Programação" Para: "OTServ → Suporte OTServ → Suporte de Scripts"
  15. Tente usar esse TFS: https://github.com/Skazw/forgottenserver036 No seu caso vai precisar trocar só o .exe e o arquivo 050-functions.lua na pasta data/lib, agora se quiser o 0.4 tem que trocar mais coisas.
  16. Fir3element postou uma resposta no tópico em Suporte Tibia OTServer
    Vai ter que buscar cada parte do código na source, e tem bastante coisa =/
  17. creature.cpp, mude essa linha: baseSpeed = 220; Se quiser aumentar a velocidade de um player ou de um grupo, vai ter que fazer por lua mesmo.
  18. local coin = 2152 local lever = { [6029] = {150, 6570}, [6054] = {150, 6571}, [6055] = {150, 12717}, [6056] = {150, 12750}, } local pos = {x = 1000, y = 1000, z = 7} -- configure aqui function onUse(cid, item, fromPosition, itemEx, toPosition) if not doPlayerRemoveItem(cid, coin, lever[item.actionid][1]) then return doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "você precisa de "..lever[item.actionid][1].." " ..getItemNameById(coin)) end doPlayerAddItem(cid, lever[item.actionid][2]) doPlayerSendTextMessage(cid, 22, "você pegou o " .. getItemNameById(lever[item.actionid][2])) doSendMagicEffect(getCreaturePosition(cid), math.random(29,29)) doTeleportThing(cid, pos) return true end
  19. Geralmente quando o char não loga é o ip que está errado no config.lua (eu acho).
  20. Vai aprender quando? Negativado. O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Aprovação de Tópicos de Conteúdos" Para: "OTServ → Suporte OTServ → Suporte de Scripts"
  21. game.cpp, nas funções combatChangeHealth e combatChangeMana
  22. Qual servidor você tá usando?
  23. Última versão: https://github.com/edubart/otclient/archive/master.zip O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Clients"
  24. 1. Abra o arquivo: /usr/include/boost/filesystem/config.hpp Na linha 16, troque != 3 para != 2 2. otsystem.h, antes de: (± linha 125) #define foreach BOOST_FOREACH #define reverse_foreach BOOST_REVERSE_FOREACH #endif adicione: #if BOOST_VERSION < 104400 #define BOOST_DIR_ITER_FILENAME(iterator) (iterator)->path().filename() #else #define BOOST_DIR_ITER_FILENAME(iterator) (iterator)->path().filename().string() #endif luascript.cpp, troque: (± linha 740) std::string s = it->leaf(); por: std::string s = BOOST_DIR_ITER_FILENAME(it); scriptmanager.cpp (± linha 130), faça a mesma coisa
  25. Testou com o datapack oficial?

Informação Importante

Confirmação de Termo