Postado Janeiro 6, 2015 10 anos Olá galera do Tibiaking.com Está dando esse erro na distro do meu servidor: é nesse .lua aqui: local starterpokes = { ["Cyndaquil"] = {x = 167, y = 593, z = 7} ["Totodille"] = {x = 166, y = 593, z = 7} ["Chikorita"] = {x = 168, y = 593, z = 7}, } local level = 5 local extrastr = 1.5 local btype = "normal" function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) > 10 then return true end local pokemon = "" for a, b in pairs (starterpokes) do if isPosEqualPos(topos, b) then pokemon = a end end if pokemon == "" then return true end local gender = getRandomGenderByName(pokemon) local mypoke = getPokemonStatus(pokemon) if not mypoke then return true end local offense = mypoke.off * level * extrastr local defense = mypoke.def * level * extrastr local speed = mypoke.agi * level * extrastr local vit = mypoke.vit * level * extrastr local spatk = mypoke.spatk * level * extrastr local happy = 180 local leveltable = getPokemonExperienceTable(pokemon) doPlayerAddItem(cid, 2152, 2) doPlayerAddItem(cid, 2394, 10) doPlayerAddItem(cid, 12344, 2) local balls = doPlayerAddItem(cid, 2394, 10) doItemSetAttribute(balls, "unique", cid) local item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", pokemon) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "level", level) doItemSetAttribute(item, "exp", leveltable[level]) doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level]) doItemSetAttribute(item, "offense", offense) doItemSetAttribute(item, "defense", defense) doItemSetAttribute(item, "speed", speed) doItemSetAttribute(item, "vitality", vit) doItemSetAttribute(item, "specialattack", spatk) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "description", "Contains a "..pokemon..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".") doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v2.6 doPlayerAddItemEx(cid, item, true) doTransformItem(item, pokeballs[btype].on) doPlayerSendTextMessage(cid, 27, "Você achou um novo pokemon, boa jornada.") doPlayerSendTextMessage(cid, 27, "Não esqueca de usar a pokedex neste novo pokemon.") doSendMagicEffect(getThingPos(cid), 29) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 29) return TRUE end Poderiam me ajudar a resolver? Rep+ pra quem ajudar e.e Atensiosamente, Gabriel L.
Postado Janeiro 6, 2015 10 anos Aqui : local starterpokes = { ["Cyndaquil"] = {x = 167, y = 593, z = 7}, ["Totodille"] = {x = 166, y = 593, z = 7}, ["Chikorita"] = {x = 168, y = 593, z = 7} } local level = 5 local extrastr = 1.5 local btype = "normal" function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) > 10 then return true end local pokemon = "" for a, b in pairs (starterpokes) do if isPosEqualPos(topos, b) then pokemon = a end end if pokemon == "" then return true end local gender = getRandomGenderByName(pokemon) local mypoke = getPokemonStatus(pokemon) if not mypoke then return true end local offense = mypoke.off * level * extrastr local defense = mypoke.def * level * extrastr local speed = mypoke.agi * level * extrastr local vit = mypoke.vit * level * extrastr local spatk = mypoke.spatk * level * extrastr local happy = 180 local leveltable = getPokemonExperienceTable(pokemon) doPlayerAddItem(cid, 2152, 2) doPlayerAddItem(cid, 2394, 10) doPlayerAddItem(cid, 12344, 2) local balls = doPlayerAddItem(cid, 2394, 10) doItemSetAttribute(balls, "unique", cid) local item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", pokemon) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "level", level) doItemSetAttribute(item, "exp", leveltable[level]) doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level]) doItemSetAttribute(item, "offense", offense) doItemSetAttribute(item, "defense", defense) doItemSetAttribute(item, "speed", speed) doItemSetAttribute(item, "vitality", vit) doItemSetAttribute(item, "specialattack", spatk) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "description", "Contains a "..pokemon..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".") doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v2.6 doPlayerAddItemEx(cid, item, true) doTransformItem(item, pokeballs[btype].on) doPlayerSendTextMessage(cid, 27, "Você achou um novo pokemon, boa jornada.") doPlayerSendTextMessage(cid, 27, "Não esqueca de usar a pokedex neste novo pokemon.") doSendMagicEffect(getThingPos(cid), 29) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 29) return TRUE end Ajudei = REP+ Não dou suporte por PM qualquer dúvida procure no fórum,caso não encontre oque procura crie um tópico. [email protected]" /> | TFS 0.4 DEV | %5Bcreaturescript%5D Icones no minimap com descrição%5Btalkaction%5D Adicionar ou remover VIP do player.%5Bcreaturescripts%5D Senha para porta%5Btalkaction%5D Mandar mensagem para pasta do servidorMapa Evento War Castle%5Baction%5D Canoa em MovimentoTeleport Scroll System%5Bcreaturescripts%5D Recompensa por level para X vocations%5Btalkaction%5D Adicionar X item para o player%5Btalkactions%5D Adicionar item para todos players online%5Baction%5D Item que teleporta o player para house[action+movement] Passaporte para entrar no barco
Postado Janeiro 6, 2015 10 anos Solução local starterpokes = { ["Cyndaquil"] = {x = 167, y = 593, z = 7}, ["Totodille"] = {x = 166, y = 593, z = 7}, ["Chikorita"] = {x = 168, y = 593, z = 7} } local level = 5 local extrastr = 1.5 local btype = "normal" function onUse(cid, item, frompos, item2, topos) if getPlayerLevel(cid) > 10 then return true end local pokemon = "" for a, b in pairs (starterpokes) do if isPosEqualPos(topos, b) then pokemon = a end end if pokemon == "" then return true end local gender = getRandomGenderByName(pokemon) local mypoke = getPokemonStatus(pokemon) if not mypoke then return true end local offense = mypoke.off * level * extrastr local defense = mypoke.def * level * extrastr local speed = mypoke.agi * level * extrastr local vit = mypoke.vit * level * extrastr local spatk = mypoke.spatk * level * extrastr local happy = 180 local leveltable = getPokemonExperienceTable(pokemon) doPlayerAddItem(cid, 2152, 2) doPlayerAddItem(cid, 2394, 10) doPlayerAddItem(cid, 12344, 2) local balls = doPlayerAddItem(cid, 2394, 10) doItemSetAttribute(balls, "unique", cid) local item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", pokemon) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "level", level) doItemSetAttribute(item, "exp", leveltable[level]) doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level]) doItemSetAttribute(item, "offense", offense) doItemSetAttribute(item, "defense", defense) doItemSetAttribute(item, "speed", speed) doItemSetAttribute(item, "vitality", vit) doItemSetAttribute(item, "specialattack", spatk) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "description", "Contains a "..pokemon..".") doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".") doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v2.6 doPlayerAddItemEx(cid, item, true) doTransformItem(item, pokeballs[btype].on) doPlayerSendTextMessage(cid, 27, "Você achou um novo pokemon, boa jornada.") doPlayerSendTextMessage(cid, 27, "Não esqueca de usar a pokedex neste novo pokemon.") doSendMagicEffect(getThingPos(cid), 29) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(getThingPos(cid), 27) doSendMagicEffect(getThingPos(cid), 29) return TRUE endpokemon)doItemSetAttribute(item, "hp", 1)doItemSetAttribute(item, "level", level)doItemSetAttribute(item, "exp", leveltable[level])doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])doItemSetAttribute(item, "offense", offense)doItemSetAttribute(item, "defense", defense)doItemSetAttribute(item, "speed", speed)doItemSetAttribute(item, "vitality", vit)doItemSetAttribute(item, "specialattack", spatk)doItemSetAttribute(item, "happy", happy)doItemSetAttribute(item, "gender", gender)doItemSetAttribute(item, "description", "Contains a "..pokemon..".")doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v2.6doPlayerAddItemEx(cid, item, true)doTransformItem(item, pokeballs[btype].on)doPlayerSendTextMessage(cid, 27, "Você achou um novo pokemon, boa jornada.")doPlayerSendTextMessage(cid, 27, "Não esqueca de usar a pokedex neste novo pokemon.")doSendMagicEffect(getThingPos(cid), 29)doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))doSendMagicEffect(getThingPos(cid), 27)doSendMagicEffect(getThingPos(cid), 29)return TRUEendTente assim Tente assim. @edit, acabei de ver q o viting foi mais rapido que eu. Hsushau Editado Janeiro 6, 2015 10 anos por danihcv (veja o histórico de edições) Te ajudei?? REP + e ficamos quites... http://www.tibiaking.com/forum/uploads/emoticons/default_happyy.png' alt=';D'> Atenciosamente, Daniel. Abraços! Meus tutoriais: Programação: Resolvendo QUALQUER erro na data base. Scripts (system's, creaturescripts, mod's, NPC's, etc): (Sistema) GOD Ambient Light Full. Adicionando novas mounts ao servidor [NPC] Papai Noel que dá presente todo ano. Web-site: Resolvendo problema de caracteres especiais em PHP Formatando textos em PHP! Mudando a cor, tamanho, fonte, etc. Criando e configurando tabelas para paginas PHP
Participe da conversa
Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.