jenison06

Poderia mandar o cliente descompilado?

.Qual servidor ou website você utiliza como base? TFS 0.3.6 Qual o motivo deste tópico? Queria saber se é possivel adaptar para action ( Item Use) [vocation id] = {level, nova voc, looktype, id.item, efeito} Queria saber se tem como adaptar esse Campo id.Item. caso nao der, pode ser sem esse campo. Você tem o código disponível? Se tiver publique-o aqui: local config = { --[vocation id] = {level, nova voc, looktype, efeito} -- Goku [1] = {30, 2, 129, 38}, [2] = {50, 3, 130, 38}, [3] = {75, 4, 5, 114}, [4] = {100, 5, 6, 121}, [5] = {150, 6, 7, 114}, [6] = {180, 7, 8, 116}, [7] = {200, 8, 9, 114}, [9] = {50, 10, 11, 114}, [10] = {100, 11, 12, 114}, [11] = {150, 12, 13, 114}, [12] = {200, 13, 14, 125}, [13] = {250, 14, 15, 121}, [14] = {400, 15, 16, 34}, [15] = {600, 16, 18, 32}, [16] = {600, 473, 17, 41} } function onSay(player, words, param) local voc = config[player:getVocation():getId()] if voc then if player:getLevel() >= voc[1] then player:setVocation(voc[2]) player:sendTextMessage(MESSAGE_STATUS_WARNING, "Voce se transformou!") player:say("Voce se transformou!") player:setOutfit({lookType = voc[3]}) player:getPosition():sendMagicEffect(voc[4]) else player:sendTextMessage(MESSAGE_STATUS_WARNING, "Voce precisa estar no level " .. voc[1] .. " para transformar.") end else player:sendCancelMessage("Nao é possível se transformar.") end return true end Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.

.Qual servidor ou website você utiliza como base? Preciso fazer com o que o Npc Remova o Pokemon Pedido Exemplo Me traga um Electabuzz + Itens ... Você tem o código disponível? Se tiver publique-o aqui: elseif(msgcontains(msg, 'Yes') and talkState[talkUser] == 6) then -- Confirmou Thor Costume if (getPlayerItemCount(cid, 2381) >= 10 and getPlayerItemCount(cid, 2108) >= 1 and getPlayerItemCount(cid, 17487) >= 1 and getPlayerItemCount(cid, 9135) >= 10) then selfSay('Very well! You proved me your are a very determined person. Here is your Thor Costume. Now find my wife Trisha somewhere far away from here. This place might be to south-east.', cid) doPlayerAddItem(cid, 17487, 1) doPlayerRemoveItem(cid, 2381, 10) doPlayerRemoveItem(cid, 2108, 1) doPlayerRemoveItem(cid, 17487, 1) doPlayerRemoveItem(cid, 9135, 10) setPlayerStorageValue(cid, 7751, 1) doSendMagicEffect(playerPos, 162) talkState[talkUser] = 0 else Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui. Addontrade.lua

estou com o mesmo problema.

up

UP

Basta pegar a Spell "Rollout" e modificar as sprites.

.Qual servidor ou website você utiliza como base? pokestorm Qual o motivo deste tópico? Alguem adapta contagem de ball no meu sistema de catch esse so conta 1 ball msmo tendo jogado 100 Está surgindo algum erro? Se sim coloque-o aqui. Action ( Catch.lua) Lib (catch system.lua) talkactions (checathc.lua) function onSay(cid, words, param, channel) if param == "" then return true end getBrokesIn(cid, param) return true end

eu ate tava usando pra estudar a base o erro esta no banco de dados, usa esse banco de dados. dxp database.sql

achei o problema e que precisa de 2 script pra dar certo.. deu certo porem nao pede nick abaixo vou postar os arquivos . o que vc fez esse que esta certo e a parte que liga nesse script outra pergunta tem como por para remover o pokemon exemplo: alem dos itens remover tambem o Electabuzz

Qual o motivo deste tópico? alguem tem esses sistema ( ja uso o Trade-off ) porem in-game e melhor

nussa mosquei no Npc agora nao passa da parte 20:15 Billy Fantasy: Sorry, but I have nothing to talk to you. 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 questSt = 7750 local checkQuest = getPlayerStorageValue(cid,questSt) local playerPos = getCreaturePosition(cid) local playerLevel = getPlayerLevel(cid) local questLevel = 10 local tab = { [1] = {fName = "Thor Costume", fId = 17487, pName = "Addon Electabuzz"}, } if(msgcontains(msg, 'Fantasy')) then if checkQuest < 1 then -- Quer saber mais selfSay('Sorry, but I have nothing to talk to you.', cid) elseif checkQuest >= 1 and checkQuest <= 3 then -- Quer saber mais mas já fez a Parte 1. selfSay('Oh! How is my husband? Is he fine? There are two years since I last seen him! By the way, are you here to give me {something}?', cid) talkState[talkUser] = 1 else -- Quer saber mais mas já fez a Parte Final. selfSay('How are you doing with your addon pokémon?', cid) end elseif(msgcontains(msg, 'Something') and talkState[talkUser] == 1) then -- Tem algo pra dar talkState[talkUser] = 2 selfSay('Yes, as I expected. Let me check one thing.', cid) selfSay('As I see, Billy Fantasy has given you the '..tab[checkQuest].fName..'. After many years of study and dedication, I discovered a new method to crafit fantasy pokemon. Do you want me to transform your '..tab[checkQuest].fName..' into '..tab[checkQuest].pName..'? Just say {yes} or {no}.', cid) elseif talkState[talkUser] == 2 then if msgcontains(msg, 'Yes') then -- Quer transformar o fossil if getPlayerItemCount(cid, tab[checkQuest].fId) >= 1 then if getItemAttribute(getPlayerSlotItem(cid, CONST_SLOT_FEET).uid, name) then selfSay('Sorry, your pokemon not have nickname', cid) talkState[talkUser] = 0 end selfSay('Fine then! There it is, your '..tab[checkQuest].fName..' has been transformed into '..tab[checkQuest].pName..'! Congratulations!', cid) if #getPlayerPokeballs(cid) >= 6 then local newpokeball = doCreatePokeball(tab[checkQuest].pName, 2469) doPlayerSendMailByName(getCreatureName(cid), newpokeball) doPlayerSendTextMessage(cid, 27, "You are holding six pokémons, your ("..tab[checkQuest].pName..") will be teleported to the Pokemon Center!") else local newpokeball = doCreatePokeball(tab[checkQuest].pName, 2470) doPlayerAddItemEx(cid, newpokeball) end doPlayerRemoveItem(cid, tab[checkQuest].fId, 1) doSendMagicEffect(playerPos, 162) doSendMagicEffect(playerPos, 28) addEvent(doSendMagicEffect, 600, playerPos, 29) addEvent(doSendMagicEffect, 1200, playerPos, 28) setPlayerStorageValue(cid, questSt, 4) else selfSay("Sorry, but you have no "..tab[checkQuest].fName.." with you.",cid) end talkState[talkUser] = 0 elseif msgcontains(msg, 'No') then -- Nao quer transformar o fossil selfSay('Right then. Then come back when you want it!', cid) talkState[talkUser] = 1 end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

deu este erro I/O warning : failed to load external entity "data/npc/Billy Fantasy.xml" [Warning - Npc::loadFromXml] Cannot load npc file (data/npc/Billy Fantasy.xml). Info: failed to load external entity "data/npc/Billy Fantasy.xml"

.Qual servidor ou website você utiliza como base? pokestorm Qual o motivo deste tópico? Ajuda com Adaptação Salve Galera queria saber se é possivel fazer com que o npc troca o item pelo pokemon como abaixo e apenas aceitar a troca se setar o Nick no pokemon Você tem o código disponível? Se tiver publique-o aqui: Abaixo Npc que troca Item por poke 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 questSt = 6650 local checkQuest = getPlayerStorageValue(cid,questSt) local playerPos = getCreaturePosition(cid) local playerLevel = getPlayerLevel(cid) local questLevel = 100 local tab = { [1] = {fName = "Dome Fossil", fId = 8776, pName = "Kabuto"}, [2] = {fName = "Helix Fossil", fId = 8777, pName = "Omanyte"}, [3] = {fName = "Ancient Fossil", fId = 8775, pName = "Aerodactyl"}, } if(msgcontains(msg, 'Harry')) then if checkQuest < 1 then -- Quer saber mais selfSay('Sorry, but I have nothing to talk to you.', cid) elseif checkQuest >= 1 and checkQuest <= 3 then -- Quer saber mais mas já fez a Parte 1. selfSay('Oh! How is my husband? Is he fine? There are two years since I last seen him! By the way, are you here to give me {something}?', cid) talkState[talkUser] = 1 else -- Quer saber mais mas já fez a Parte Final. selfSay('How are you doing with your ancient pokémon?', cid) end elseif(msgcontains(msg, 'Something') and talkState[talkUser] == 1) then -- Tem algo pra dar talkState[talkUser] = 2 selfSay('Yes, as I expected. Let me check one thing.', cid) selfSay('As I see, Harry has given you the '..tab[checkQuest].fName..'. After many years of study and dedication, I discovered a method to bring fossils back to life. Do you want me to transform your '..tab[checkQuest].fName..' into '..tab[checkQuest].pName..'? Just say {yes} or {no}.', cid) elseif talkState[talkUser] == 2 then if msgcontains(msg, 'Yes') then -- Quer transformar o fossil if getPlayerItemCount(cid, tab[checkQuest].fId) >= 1 then selfSay('Fine then! There it is, your '..tab[checkQuest].fName..' has been transformed into '..tab[checkQuest].pName..'! Congratulations!', cid) if #getPlayerPokeballs(cid) >= 6 then local newpokeball = doCreatePokeball(tab[checkQuest].pName, 2469) doPlayerSendMailByName(getCreatureName(cid), newpokeball) doPlayerSendTextMessage(cid, 27, "You are holding six pokémons, your ("..tab[checkQuest].pName..") will be teleported to the Pokemon Center!") else local newpokeball = doCreatePokeball(tab[checkQuest].pName, 2470) doPlayerAddItemEx(cid, newpokeball) end doPlayerRemoveItem(cid, tab[checkQuest].fId, 1) doSendMagicEffect(playerPos, 162) doSendMagicEffect(playerPos, 28) addEvent(doSendMagicEffect, 600, playerPos, 29) addEvent(doSendMagicEffect, 1200, playerPos, 28) setPlayerStorageValue(cid, questSt, 4) else selfSay("Sorry, but you have no "..tab[checkQuest].fName.." with you.",cid) end talkState[talkUser] = 0 elseif msgcontains(msg, 'No') then -- Nao quer transformar o fossil selfSay('Right then. Then come back when you want it!', cid) talkState[talkUser] = 1 end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Npc Nick que uso na Base local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 local talkState = {} function creatureSayCallback(cid, _type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid NickQuestStorage = 8850 NickQuestBookId = 1955 NickQuestGameBoyId = 2630 local questStatus = getPlayerStorageValue(cid, NickQuestStorage) local playerLevel = getPlayerLevel(cid) if msgcontains(msg, "nicknames") then if isPremium(cid) then if playerLevel >=50 then if questStatus == -1 then selfSay("Before I give nicknames to your pokemons, can you do some favours to me?", cid) selfSay("I need a book that I lent to Albert, because it contains so much information that I use in my job. Last time I visited Albert he was living in a little house, in the east of Viridian.", cid) setPlayerStorageValue(cid, NickQuestStorage, 0) elseif questStatus == 0 then selfSay("I need a book that I lent to Albert, because it contains so much information that I use in my job. Last time I visited Albert he was living in a little house, in the east of Viridian.", cid) elseif questStatus == 1 then if doPlayerRemoveItem(cid, NickQuestBookId, 1) then setPlayerStorageValue(cid, NickQuestStorage, 2) selfSay("Thank you! I was really missing this book. Now just one more favour, can you get my Game Boy, which is with Ralf? I left with him to fix it, his workshop is in Celadon.", cid) else selfSay("I need a book that I lent to Albert, because it contains so much information that I use in my job. Last time I visited Albert he was living in a little house, in the east of Viridian.", cid) end elseif questStatus == 2 then selfSay("Can you get my Game Boy, which is with Ralf? I left with him to fix it, his workshop is in Celadon.", cid) elseif questStatus == 3 then if doPlayerRemoveItem(cid, NickQuestGameBoyId, 1) then setPlayerStorageValue(cid, NickQuestStorage, 4) selfSay("Thank you VERY MUCH! Now my son won't cry no more and I can do my job tranquil. Do you want me to give {nicknames} to your pokemons?", cid) else selfSay("Can you get my Game Boy, which is with Ralf? I left with him to fix it, his workshop is in Celadon.", cid) end elseif questStatus >= 4 then selfSay("Oh, ok. Would you like to {give} or {remove} a nickname?", cid) talkState[talkUser] = 1 end else selfSay("Sorry, come back when you are level 50 or higher.", cid) end else selfSay("Hey, I'm so sorry, but you must be premium account to give nicknames to your pokemons", cid) end elseif talkState[talkUser] == 1 then if msgcontains(msg, "give") then selfSay("Oh, ok. Which nickname would you like to give to the pokemon in the slot?", cid) talkState[talkUser] = 2 elseif msgcontains(msg, "remove") then selfSay("Oh, ok. You want to remove the nickname to the pokemon in the slot for 5K?", cid) talkState[talkUser] = 3 end elseif talkState[talkUser] == 2 then local msg = msg:trim() if msg:len() < 4 then selfSay("This nickname is too short.", cid) elseif msg:len() > 15 then selfSay("This nickname is too long.", cid) elseif not isValidName(msg) then selfSay("This name contains invalid symbols.", cid) elseif getMonsterPokedex(msg, false) then selfSay("You can't use other's pokemon name.", cid) else selfSay("Would you like to give the nickname \""..msg.."\" to the pokemon in the slot for 10K?", cid) talkState[talkUser] = msg end elseif talkState[talkUser] == 3 then if msgcontains(msg, "yes") then local pokeball = getPlayerSlotItem(cid, CONST_SLOT_FEET) if isPokeballOut(pokeball.itemid) then selfSay("Call your pokemon back before changing his nickname.", cid) elseif isPokeballIn(pokeball.itemid) then if doPlayerRemoveMoney(cid, 500000) then local pokeballInfo = getPokeballInfo(pokeball.uid) setPokeballDescription(pokeball.uid, pokeballInfo.name, false, pokeballInfo.health, pokeballInfo.healthmax) selfSay("Now your pokemon not have a nickname!", cid) else selfSay("Sorry, you don't have 5K.", cid) end else selfSay("There's no pokeball in the slot!", cid) end else selfSay("Ok then.", cid) end talkState[talkUser] = 0 elseif type(talkState[talkUser]) == "string" then if msgcontains(msg, "yes") then local pokeball = getPlayerSlotItem(cid, CONST_SLOT_FEET) if isPokeballOut(pokeball.itemid) then selfSay("Call your pokemon back before changing his nickname.", cid) elseif isPokeballIn(pokeball.itemid) then if doPlayerRemoveMoney(cid, 1000000) then local pokeballInfo = getPokeballInfo(pokeball.uid) setPokeballDescription(pokeball.uid, pokeballInfo.name, talkState[talkUser], pokeballInfo.health, pokeballInfo.healthmax) selfSay("Now your pokemon have a new nickname! Enjoy it :)", cid) else selfSay("Sorry, you don't have 10K.", cid) end else selfSay("There's no pokeball in the slot!", cid) end elseif msgcontains(msg, "no") then selfSay("Why not? This nickname was so good!", cid) end talkState[talkUser] = 0 else talkState[talkUser] = 0 end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

tem como reposta o link manin

Bom dia meu amigo não sei que e bem isso que vc quer mais ira te ajudar. crie um arquivo chamando chave.lua function onUse(cid, item, frompos, item2, topos) local pausa = 1000 local door = {x=944, y=230, z=7, stackpos=1} local ddoor = getThingfromPos(door) local open_door = 6251 local itemU = 24000 local verify = 0 if item2.uid == itemU then if ddoor.itemid ~= verify then doTransformItem(ddoor.uid,open_door) addEvent(close,pausa,door) end else doPlayerSendCancel(cid,"voce nao pode usar a chave aqui!") end return 1 end function close(door) local to_close_door = 6249 local the_close_door = getThingfromPos(door) doTransformItem(the_close_door.uid,to_close_door) end Local pausa = o tempo porta ficara aberta no caso 1000 = a 1s Local door = pos da porta local open_door = id da porta local itemU - Uid que esta na porta via rme (se n estiver usando o UID nao precisa trocar) local varify Nao mecha local to_close_door = id da porta fechada agoa em actions xml add <action itemid="ID DA CHAVE" script="chave.lua" />

Base: PokeStorm Bom dia Queria um Sistema de Usar Potion na Pokeball ou na Portrait se possivel. Aqui esta meu Potion.lua local potions = { [8783] = {baseHeal = 1800, healTimes = 10, msgColor = 175}, --Full Potion [2112] = {baseHeal = 950, healTimes = 8, msgColor = 181}, --Hyper Potion [2113] = {baseHeal = 600, healTimes = 7, msgColor = 23}, --Ultra Potion [2115] = {baseHeal = 350, healTimes = 6, msgColor = 30}, --Great Potion [2114] = {baseHeal = 200, healTimes = 5, msgColor = 177}, --Small Potion [9270] = {baseHeal = 225, healTimes = 5, msgColor = 177}, --Starter's Small Potion } local texts = { [PORTUGUESE] = {"Use isso em você mesmo ou em seu pokémon.", "Você já está se curando.", "Seu pokémon já está sendo curado."}, [ENGLISH] = {"Use it in your pokemon or in yourself.", "You are already healing yourself.", "Your pokemon is already being healed."}, } local potionState = {} local function potionHeal(cid, heal, healed, maxHeal) if isCreature(cid) and healed <= maxHeal then doCreatureAddHealth(cid, heal) doSendMagicEffect(getCreaturePosition(cid), 12) addEvent(potionHeal, 1000, cid, heal, healed+1, maxHeal) else potionState[cid] = nil end end function onUse (cid,item,frompos,item2,topos) local txt = texts[getPlayerLanguage(cid)] local potion = potions[item.itemid] if not isCreature(item2.uid) or getCreatureMaster(item2.uid) ~= cid then doPlayerSendCancel(cid, txt[1]) return true end if not potionState[item2.uid] then if isPokeballIn(item2.itemid) then healQuant = potion.baseHeal*(1+getPlayerSkillLevel(cid, SKILL_FIRSTAID)*0.05) elseif isSummon(item2.uid) then healQuant = potion.baseHeal*(1+getPlayerSkillLevel(cid, SKILL_FIRSTAID)*0.05) else healQuant = potion.baseHeal*(1+getPlayerSkillLevel(cid, SKILL_FIRSTAID)*0.05/2) end potionState[item2.uid] = true doRemoveItem(item.uid, 1) doSendAnimatedText(getCreaturePosition(item2.uid), 'HEALING!', potion.msgColor) potionHeal(item2.uid, healQuant, 1, potion.healTimes) else if isPlayer(item2.uid) then doPlayerSendCancel(cid, txt[2]) else doPlayerSendCancel(cid, txt[3]) end end return true end

Usa Znoteacc

qualquer coisa tambem pode ir na database e limpar as houses.

Boa tarde.., nao sei se é a Area correta mudem pf. Queria um NPC que Aluga-se uma Rod por um Tempo.. (8.54)

Renomeie o Dat2 para Tibia novamente para editar depois so Renomear Novamente para Dat2. o tibia que tem junto a dll e so uma arquivo para chamar o Dat2

Up

Olá.., tenho uma ideia porem não sei se e possível. estava pensando aqui no caso para poketibia. ( ao surfar como no gameboy queria que o player teletransporta - se para uma area onde pode batalhar com o poke e ao matar voltar de onde estava). como se fosse no game boy msmo.

Show Muito Obrigado !!!

Voce pode usar o Modern Acc do Otpoke, ele e Compativel!