Jump to content

Papo Cabeça

Destinado a todos aqueles que querem discutir algo sério.

872 topics in this forum

  1. Orshabaal Falls. Capítulo 4

    By Wallacy,   
    • 5 replies
    • 1.7k views

  2. The Ritual Of Minotaurs

    By Fernandinand,
    • 12 replies
    • 3.7k views

  3. Mane De Rook E Os Pergaminhos De Fogo 1 2

    By Magodasabedoria,   
    • 29 replies
    • 6.6k views

  4. Um Evento Mal Entendido 1 2

    By skynagerloas,   
    • 18 replies
    • 4.5k views

  5. A Lâmina De Krover - Capitulo 3

    By Henrique Moura,
    • 1 reply
    • 725 views

  6. A Lâmina De Krover

    By Henrique Moura,
    • 4 replies
    • 1.1k views

  7. A Espada De Looker.

    By Doidin,
    • 8 replies
    • 1.2k views

  8. O Fim Dos Tempos Tibiano

    By phodapkaraca,
    • 1 reply
    • 877 views

  9. Apocalipse

    By Penca,
    • 1 reply
    • 1.5k views

  10. I. Ascensão

    By jaderloko123,   
    • 1 reply
    • 881 views

  11. Argot World

    By Herchcovitch,
    • 8 replies
    • 1.6k views

  12. Sign Of The Cross Quest

    By moskitinho,
    • 6 replies
    • 5k views

  13. Um Mistério...

    By KronusBonecrusher,
    • 2 replies
    • 724 views

  14. A Vila Rookgard

    By arns,
    • 4 replies
    • 1.1k views

  15. Clothis: A Ilha Dos Sonhos!

    By ExNaider,
    • 9 replies
    • 1.7k views

  16. O Fim Dos Tempos Tibiano

    By phodapkaraca,
    • 0 replies
    • 825 views

  17. Halladian

    By Khallas,
    • 1 reply
    • 750 views

  18. Tibia E Seus Mistérios

    By Zoan,
    • 4 replies
    • 2.2k views

  19. Halladian

    By Khallas,
    • 0 replies
    • 718 views

  20. Halladian

    By Khallas,
    • 0 replies
    • 786 views

  21. As Aventuras De Jack

    By Xelipin,
    • 1 reply
    • 880 views

  22. Halladian

    By Khallas,   
    • 1 reply
    • 814 views

  23. Halladian

    By Khallas,
    • 1 reply
    • 726 views

  24. Aventuras Em Rookgaard

    By Lopoi2,
    • 1 reply
    • 1.6k views

  25. Roleplaying Postagem #8

    By Henrique Moura,   
    • 2 replies
    • 736 views

  • Recently Browsing   0 members

    • No registered users viewing this page.

  • Popular Contributors

    Nobody has received reputation this week.

  • Topics

  • Últimos Posts

    • KratosTheBest
      Como upar no tibia global LVL 50 sendo FREE ACCOUNT (MUITO FÁCIL e DIVERTIDO)

      By KratosTheBest · Posted

      Private Lady From Your Town - No Verify - Anonymous Sex Dating https://PrivateLadyEscorts.com [url=https://PrivateLadyEscorts.com/girls.html] Private Lady From Your Town [/url] - Anonymous Adult Dating - No Selfie
    • Xblazzix
      Cliente Mobile

      By Xblazzix · Posted

      Água video ensinando a criar cliente mobile?
    • Norikan
      Receber experiencia por level otx3 tibia860

      By Norikan · Posted

      Galera, estou tentando alterar o recebimento de xp (n curto via stages) Fiz isso da pasta lib, porem xp está vindo ridicula, Behemoth dando 1kk de xp... xp do server é 40 Me ajuda a corrigir    -- Função para calcular a experiência ajustada com redução progressiva local function getAdjustedExperience(cid, baseExp) local level = getPlayerLevel(cid) local maxLevel = 699 local minReductionFactor = 0.1 -- 10% XP mínima if level < 1 then level = 1 elseif level > maxLevel then level = maxLevel end local reductionFactor = 1 - ((level - 1) / (maxLevel - 1)) * (1 - minReductionFactor) local adjustedExp = math.floor(baseExp * reductionFactor) return adjustedExp end -- Função para adicionar níveis ao jogador, ajustando a experiência com redução progressiva function doPlayerAddLevel(cid, amount, round) local experience, level = 0, getPlayerLevel(cid) amount = amount or 1 if amount > 0 then experience = getExperienceForLevel(level + amount) - (round and getPlayerExperience(cid) or getExperienceForLevel(level)) else experience = -((round and getPlayerExperience(cid) or getExperienceForLevel(level)) - getExperienceForLevel(level + amount)) end -- Ajusta a experiência com a redução progressiva local adjustedExp = getAdjustedExperience(cid, experience) -- Exibe mensagem no console com o valor de experiência recebido print(string.format("Player %d received %d experience points (adjusted).", cid, adjustedExp)) return doPlayerAddExperience(cid, adjustedExp) end  
    • SamuelOficial
      TFS 0.3.6 SIMPLE TASK CRIA OUTRA TASK COM OUTRO NPC DIFERENTE

      By SamuelOficial · Posted

      ESSE AQUI NAO PEGA    <?xml version="1.0" encoding="UTF-8"?> <mod name="Blessed Task" version="3.0" author="Vodkart" contact="xtibia.com" enabled="yes"> <config name="task_func"><![CDATA[ tasktabble = { ["asuras"] = {monster_race={"asuras"}, storage_start = 200284, storage = 91084, count = 717217, exp = 100000000000000, money = 100000000000}, ["bashmus"] = {monster_race={"bashmus"}, storage_start = 200285, storage = 91085, count = 717217, exp = 100000000000000, money = 100000000000}, ["carnivors"] = {monster_race={"carnivors"}, storage_start = 200286, storage = 91086, count = 717217, exp = 100000000000000, money = 100000000000}, ["deathlings"] = {monster_race={"deathlings"}, storage_start = 200287, storage = 91087, count = 717217, exp = 100000000000000, money = 100000000000}, ["dreamelves"] = {monster_race={"dreamelves"}, storage_start = 200288, storage = 91088, count = 717217, exp = 100000000000000, money = 100000000000}, ["forest monsters"] = {monster_race={"forest monsters"}, storage_start = 200289, storage = 91089, count = 717217, exp = 100000000000000, money = 100000000000}, ["lost souls"] = {monster_race={"lost souls"}, storage_start = 200290, storage = 91090, count = 717217, exp = 100000000000000, money = 100000000000}, ["underwaters"] = {monster_race={"underwaters"}, storage_start = 200291, storage = 91091, count = 717217, exp = 100000000000000, money = 100000000000}, ["goannas"] = {monster_race={"goannas"}, storage_start = 200292, storage = 91092, count = 717217, exp = 100000000000000, money = 100000000000}, ["iksupans"] = {monster_race={"iksupans"}, storage_start = 200293, storage = 91093, count = 717217, exp = 100000000000000, money = 100000000000}, ["ingols"] = {monster_race={"ingols"}, storage_start = 200294, storage = 91094, count = 717217, exp = 100000000000000, money = 100000000000}, ["mercurial menace"] = {monster_race={"mercurial menace"}, storage_start = 200295, storage = 91095, count = 717217, exp = 1000000000000000, money = 100000000000}, ["nagas"] = {monster_race={"nagas"}, storage_start = 200296, storage = 91096, count = 717217, exp = 100000000000000, money = 100000000000}, ["savants"] = {monster_race={"savants"}, storage_start = 200297, storage = 91097, count = 717217, exp = 100000000000000, money = 100000000000}, ["spectres"] = {monster_race={"spectres"}, storage_start = 200298, storage = 91098, count = 717217, exp = 100000000000000, money = 100000000000}, ["wingeds"] = {monster_race={"wingeds"}, storage_start = 200299, storage = 91099, count = 717217, exp = 100000000000000, money = 100000000000}, } configbosses_task = { {race = "minotaur",Playerpos = {x = 189, y = 57, z = 7}, FromPosToPos = {{x = 186, y = 54, z = 7},{x = 193, y = 60, z = 7}},time = 5}, {race = "necromancer",Playerpos = {x = 196, y = 39, z = 7}, FromPosToPos = {{x = 195, y = 37, z = 7},{x = 198, y = 41, z = 7}}, time = 5}, {race = "dragon",Playerpos = {x = 208, y = 59, z = 7}, FromPosToPos = {{x = 206, y = 56, z = 7},{x = 209, y = 65, z = 7}}, time = 5} } function CheckTask(cid) for k, v in pairs(tasktabble) do if getPlayerStorageValue(cid,v.storage_start) >= 1 then return true end end return false end function finisheAllTask(cid) local config = { exp = {true,1000}, money = {true,200000}, items ={false,{{2124,2},{2173,1}}}, premium ={true,5} } local x = true for k, v in pairs(tasktabble) do if tonumber(getPlayerStorageValue(cid,v.storage)) then x = false end end if x == true then setPlayerStorageValue(cid, 521456, 0) local b = getGlobalStorageValue(63005) if b == -1 then b = 1 end if b < 11 then setGlobalStorageValue(63005,b+1) doBroadcastMessage('[Task Mission Complete] '..getCreatureName(cid)..' was the '..b..' to finish the task!.') doPlayerAddPremiumDays(cid, config.premium[1] == true and config.premium[2] or 0) doPlayerAddExp(cid, config.exp[1] == true and config.exp[2] or 0) doPlayerAddMoney(cid, config.money[1] == true and config.money[2] or 0) if config.items[1] == true then doAddItemsFromList(cid,config.items[2]) end doItemSetAttribute(doPlayerAddItem(cid, 7369), "name", "trophy "..getCreatureName(cid).." completed all the task.") end end end function HavePlayerPosition(cid, from, to) return isInRange(getPlayerPosition(cid), from, to) and true or false end function getRankStorage(cid, value, max, RankName) -- by vodka local str ="" str = "--[".. (RankName == nil and "RANK STORAGE" or ""..RankName.."") .."]--\n\n" local query = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = "..value.." ORDER BY cast(value as INTEGER) DESC;") if (query:getID() ~= -1) then k = 1 repeat if k > max then break end str = str .. "\n " .. k .. ". "..getPlayerNameByGUID(query:getDataString("player_id")).." - [" .. query:getDataInt("value") .. "]" k = k + 1 until not query:next() end return doShowTextDialog(cid, 2529, str) end function getItemsInContainerById(container, itemid) -- Function By Kydrai local items = {} if isContainer(container) and getContainerSize(container) > 0 then for slot=0, (getContainerSize(container)-1) do local item = getContainerItem(container, slot) if isContainer(item.uid) then local itemsbag = getItemsInContainerById(item.uid, itemid) for i=0, #itemsbag do table.insert(items, itemsbag[i]) end else if itemid == item.itemid then table.insert(items, item.uid) end end end end return items end function doPlayerAddItemStacking(cid, itemid, quant) -- by mkalo local item = getItemsInContainerById(getPlayerSlotItem(cid, 3).uid, itemid) local piles = 0 if #item > 0 then for i,x in pairs(item) do if getThing(x).type < 100 then local it = getThing(x) doTransformItem(it.uid, itemid, it.type+quant) if it.type+quant > 100 then doPlayerAddItem(cid, itemid, it.type+quant-100) end else piles = piles+1 end end else return doPlayerAddItem(cid, itemid, quant) end if piles == #item then doPlayerAddItem(cid, itemid, quant) end end function getItemsFromList(items) -- by vodka local str = '' if table.maxn(items) > 0 then for i = 1, table.maxn(items) do str = str .. items[i][2] .. ' ' .. getItemNameById(items[i][1]) if i ~= table.maxn(items) then str = str .. ', ' end end end return str end function doAddItemsFromList(cid,items) -- by vodka if table.maxn(items) > 0 then for i = 1, table.maxn(items) do local count = items[i][2] while count > 0 do if isItemStackable(items[i][1]) then doPlayerAddItemStacking(cid, items[i][1], 1) else doPlayerAddItem(cid, items[i][1],1) end count = count - 1 end end end end function pairsByKeys(t, f) local a = {} for n in pairs(t) do table.insert(a, n) end table.sort(a, f) local i = 0 local iter = function () i = i + 1 if a[i] == nil then return nil else return a[i], t[a[i]] end end return iter end ]]></config> <event type="login" name="TaskLogin" event="script"><![CDATA[ function onLogin(cid) registerCreatureEvent(cid, "KillTask") return true end]]></event> <talkaction words="!taskrgb" event="buffer"><![CDATA[ domodlib('task_func_rgb') local param = string.lower(param) if param == "rank" then getRankStorage(cid, 521456, 20, "Task Rank Finalizadas") return true end local str = "" str = str .. "-=[Task Completed]=-\n\n" for k, v in pairsByKeys(tasktabble) do local contagem = getPlayerStorageValue(cid, v.storage) if (contagem == -1) then contagem = 1 end str = str..k.." = ".. (not tonumber(contagem) and "["..contagem.."]" or "["..((contagem)-1).."/"..v.count.."]") .."\n" end str = str .. "" return doShowTextDialog(cid, 8983, str) ]]></talkaction> <event type="kill" name="KillTask" event="script"><![CDATA[ domodlib('task_func') function onKill(cid, target, lastHit) if(isMonster(target) == true) then local n = string.lower(getCreatureName(target)) for race, mob in pairs(tasktabble) do if getPlayerStorageValue(cid,mob .storage_start) >= 1 then for i = 1,#mob.monster_race do if n == mob.monster_race[i] then local contagem = getPlayerStorageValue(cid, mob.storage) if (contagem == -1) then contagem = 1 end if not tonumber(contagem) then return true end if contagem > mob.count then return true end if contagem > mob.count then return true end setPlayerStorageValue(cid, mob.storage, contagem+1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,""..(contagem == mob.count and "Congratulations! You finished the task of "..race.."." or "defeated. Total [" .. contagem .. "/" .. mob.count .. "] " .. race .. ".").."") end end end end end return true end]]></event> </mod>     domodlib('task_func') local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local msg = string.lower(msg) if isInArray({"task","tasks","missao","mission"}, msg) then npcHandler:say("Me diga o nome do monstro que você deseja fazer a task!", cid) talkState[talkUser] = 1 elseif talkState[talkUser] == 1 then if tasktabble2[msg] then if CheckTask(cid) ~= true then local contagem = getPlayerStorageValue(cid, tasktabble2[msg].storage) if (contagem == -1) then contagem = 1 end if not tonumber(contagem) then npcHandler:say('Desculpe, mas você já terminou a task do '..msg, cid) return true end setPlayerStorageValue(cid, tasktabble2[msg].storage_start, 1) npcHandler:say("Parabéns, agora você está participando da missão task do "..msg..", falta matar "..string.sub(((contagem)-1)-tasktabble2[msg].count, 2).." "..msg, cid) talkState[talkUser] = 0 else npcHandler:say('Desculpe, mas você já faz parte de uma task!', cid) talkState[talkUser] = 0 end else npcHandler:say('digite o nome correto da missão task! para mais informações digite {!taskrgb}', cid) talkState[talkUser] = 1 end elseif isInArray({"receber","reward","recompensa","report","reportar"}, msg) then if CheckTask(cid) then for k, v in pairs(tasktabble2) do racetype = k if getPlayerStorageValue(cid,v.storage_start) >= 1 then local contagem = getPlayerStorageValue(cid, v.storage) if (contagem == -1) then contagem = 1 end if not tonumber(contagem) then npcHandler:say('você só pode receber os items uma única vez!', cid) return true end if (((contagem)-1) >= v.count) then for _, check in pairs(configbosses_task) do if string.lower(check.race) == string.lower(racetype) then local on = getPlayersOnline() for i=1, #on do if HavePlayerPosition(on[i], check.FromPosToPos[1],check.FromPosToPos[2]) then selfSay('aguarde alguns instantes, tem pessoas fazendo a task.', cid) return true end end doTeleportThing(cid, check.Playerpos) local function checkArea(cid) if not isCreature(cid) then return LUA_ERROR end if HavePlayerPosition(cid, check.FromPosToPos[1],check.FromPosToPos[2]) then doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) end end addEvent(checkArea, check.time*60*1000, cid) end end local str = "" if v.exp ~= nil then doPlayerAddExp(cid, v.exp ) str = str.."".. (str == "" and "" or ",") .." "..v.exp.." de exp" end if v.money ~= nil then doPlayerAddMoney(cid, v.money) str = str.."".. (str == "" and "" or ",") ..""..v.money.." gps" end if v.reward ~= nil then doAddItemsFromList(cid,v.reward) str = str.."".. (str == "" and "" or ",") ..""..getItemsFromList(v.reward) end npcHandler:say("Obrigado pela sua ajuda Recompensas: "..(str == "" and "nenhuma" or ""..str.."").." por ter completado a task do "..k, cid) setPlayerStorageValue(cid, v.storage, "Finished") setPlayerStorageValue(cid, v.storage_start, 0) setPlayerStorageValue(cid, 521456, getPlayerStorageValue(cid, 521456) == -1 and 1 or getPlayerStorageValue(cid, 521456)+1) finisheAllTask(cid) else npcHandler:say('Desculpe,mas você só matou '..((contagem)-1)..' de '..v.count..' '..k, cid) end end end else npcHandler:say("você não está em nenhuma missão task", cid) end elseif isInArray({"sair","leave","exit"}, msg) then if CheckTask(cid) then talkState[talkUser] = 2 for k, v in pairs(tasktabble2) do if getPlayerStorageValue(cid,v.storage_start) >= 1 then storagesair = v.storage_start local contagem = getPlayerStorageValue(cid, v.storage) if (contagem == -1) then contagem = 1 end npcHandler:say('você está participando de uma missão task do '..k..' e já tem '..((contagem)-1)..' '..k..' mortos, deseja mesmo sair?', cid) end end else npcHandler:say("você não está em nenhuma missão task", cid) end elseif msgcontains(msg, 'yes') and talkState[talkUser] == 2 then setPlayerStorageValue(cid, storagesair, 0) npcHandler:say("Você foi retirado da task com sucesso!", cid) elseif msg == "no" then selfSay("Tudo bem então", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())   simple_task.lua Simple Task.xml simple_task funciona menos blessed task que nao simple_task pega
    • Noahbruto
      Easy Mapper 2.0 (Remeres 8.60 Customizado) FINAL [Atualizado 22/06/17]

      By Noahbruto · Posted

      poderia liberar de novo os links não funcionam mais 
×
×
  • Create New...