talkaction Erro talkaction Tp!

Aberos · Outubro 26, 2013

Galera estou com um erro no tp , sera que alguem poderia me ajudar

erro

[26/10/2013 14:28:30] [Error - TalkAction Interface]

[26/10/2013 14:28:30] data/talkactions/scripts/tele.lua:onSay

[26/10/2013 14:28:30] Description:

[26/10/2013 14:28:30] data/talkactions/scripts/tele.lua:201: attempt to index field '?' (a nil value)

[26/10/2013 14:28:30] stack traceback:

[26/10/2013 14:28:30] data/talkactions/scripts/tele.lua:201: in function <data/talkactions/scripts/tele.lua:35>

script

local poke = {"Shiny Mr. Mime", 'Mew', 'Mewtwo', 'Abra', 'Kadabra', 'Alakazam', 'Drowzee', 'Hypno', 'Mr. Mime', 'Porygon', 'Shiny Abra', 'Shiny Alakazam',

'Shiny Hypno', 'Porygon2'} --alterado v1.9

local etele = 9499

local cdtele = 1800

local config = {

premium = false, -- se precisa ser premium account (true or false)

battle = true -- se precisa estar sem battle (true). Se colocar false, poderá usar teleport no meio de batalhas

}

local places = {

[1] = {name = "Cerulean", id = 1, sto = 897530},

[2] = {name = "Saffron", id = 2, sto = 897531},

[9] = {name = "Lavender", id = 9, sto = 897532},

[5] = {name = "Fuchsia", id = 5, sto = 897533},

[4] = {name = "Celadon", id = 4, sto = 897534},

[7] = {name = "Viridian", id = 7, sto = 897535}, --alterado v1.7

[3] = {name = "Vermilion", id = 3, sto = 897536},

[6] = {name = "Pewter", id = 6, sto = 897537},

[8] = {name = "Cinnabar", id = 8, sto = 897538},

[10] = {name = "Outland North", id = 10, sto = 897539},

[12] = {name = "Golden", id = 14, sto = 897540},

}

function onSay(cid, words, param)

if #getCreatureSummons(cid) == 0 then

doPlayerSendCancel(cid, "You need a pokemon to use teleport.")

return true

end

if not isInArray(poke, getCreatureName(getCreatureSummons(cid)[1])) then

return 0

end

if getPlayerStorageValue(cid, Agatha.stoIni) >= 1 and getPlayerStorageValue(cid, Agatha.stoIni) < 50 then --alterado v1.9

doPlayerSendCancel(cid, "You can't do that here!")

return true

end

if getPlayerStorageValue(cid, 22545) == 1 then --golden arena

doPlayerSendCancel(cid, "You can't do that while the golden arena!")

return true

end

if getPlayerStorageValue(cid, 212124) >= 1 then --alterado v1.6

return doPlayerSendCancel(cid, "You can't do it with a pokemon with mind controlled!")

end

if getPlayerStorageValue(cid, 52480) >= 1 then

return doPlayerSendCancel(cid, "You can't do it while a duel!") --alterado v1.6

end

if getPlayerStorageValue(cid, 6598754) == 1 or getPlayerStorageValue(cid, 6598755) == 1 then

return doPlayerSendCancel(cid, "You can't do it while in the PVP Zone!") --alterado v1.7

end

if exhaustion.get(cid, etele) and exhaustion.get(cid, etele) > 0 then

local tempo = tonumber(exhaustion.get(cid, etele)) or 0

local min = math.floor(tempo)

doPlayerSendCancel(cid, "Your pokemon is tired, wait "..getStringmytempo(tempo).." to teleport again.")

return true

end

if config.premium and not isPremium(cid) then

doPlayerSendCancel(cid, "Only premium members are allowed to use teleport.")

return true

end

if config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then

doPlayerSendCancel(cid, "Your pokemon can't concentrate during battles.")

return true

end

if (param == '') then

local str = ""

str = str .. "Places to go :\n\nHouse\n"

for a = 1, #places do

str = str..""..places[a].name.."\n"

end

doShowTextDialog(cid, 7416, str)

return true

end

local item = getPlayerSlotItem(cid, 8)

local nome = getPokeballName(item.uid)

local summon = getCreatureSummons(cid)[1]

local lastppos = getThingPos(cid)

local lastspos = getThingPos(summon)

local telepos = {}

local myplace = ""

local townid = 0

local citySto = 0 --alterado v1.7

if string.lower(param) == "house" then

if not getHouseByPlayerGUID(getPlayerGUID(cid)) then

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.")

return true

end

telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid)))

myplace = "our home"

else

for x = 1, #places do

if string.find(string.lower(places[x].name), string.lower(param)) then

townid = places[x].id

myplace = places[x].name

citySto = places[x].sto or -1 --alterado v1.7

end

if myplace == "" then

doPlayerSendCancel(cid, "That place doesn't exist.")

return true

end

if myplace ~= "" and townid > 0 then

telepos = getTownTemplePosition(townid)

end

if string.lower(param) ~= "house" and citySto ~= -1 and getPlayerStorageValue(cid, citySto) <= -1 then --alterado v1.7

doPlayerSendCancel(cid, "You have to talk with nurse in this place, before you can teleport for there!")

return true

end

if getDistanceBetween(getThingPos(cid), telepos) <= 15 then

doPlayerSendCancel(cid, "You are too near to the place you want to go!")

return true

end

doSendMagicEffect(getThingPos(summon), 29)

doSendMagicEffect(getThingPos(cid), 29)

doTeleportThing(cid, telepos, false)

local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH))

doTeleportThing(summon, pos2, false)

doSendMagicEffect(getThingPos(cid), 29)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos)

doCreatureSetLookDir(cid, SOUTH)

doCreatureSetLookDir(summon, SOUTH)

doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT)

exhaustion.set(cid, etele, cdtele)

return true

end

desde ja agradeço a atenção

Tony Araujo · Outubro 26, 2013

Teste esse daqui

local poke = {"Shiny Mr. Mime", "Mew", "Mewtwo", "Abra", "Kadabra", "Alakazam", "Drowzee", "Hypno", "Mr. Mime", "Porygon", "Shiny Abra", "Shiny Alakazam", "Shiny Hypno", "Porygon2"} --alterado v1.9

local etele = 9499

local cdtele = 1800

local config = {

premium = false, -- se precisa ser premium account (true or false)

battle = true -- se precisa estar sem battle (true). Se colocar false, poderá usar teleport no meio de batalhas

}

local places = {

[1] = {name = "Cerulean", id = 1, sto = 897530},

[2] = {name = "Saffron", id = 2, sto = 897531},

[9] = {name = "Lavender", id = 9, sto = 897532},

[5] = {name = "Fuchsia", id = 5, sto = 897533},

[4] = {name = "Celadon", id = 4, sto = 897534},

[7] = {name = "Viridian", id = 7, sto = 897535}, --alterado v1.7

[3] = {name = "Vermilion", id = 3, sto = 897536},

[6] = {name = "Pewter", id = 6, sto = 897537},

[8] = {name = "Cinnabar", id = 8, sto = 897538},

[10] = {name = "Outland North", id = 10, sto = 897539},

[12] = {name = "Golden", id = 14, sto = 897540},

}

function onSay(cid, words, param)

if #getCreatureSummons(cid) == 0 then

doPlayerSendCancel(cid, "You need a pokemon to use teleport.")

return true

end

if not isInArray(poke, getCreatureName(getCreatureSummons(cid)[1])) then

return 0

end

if getPlayerStorageValue(cid, Agatha.stoIni) >= 1 and getPlayerStorageValue(cid, Agatha.stoIni) < 50 then --alterado v1.9

doPlayerSendCancel(cid, "You can't do that here!")

return true

end

if getPlayerStorageValue(cid, 22545) == 1 then --golden arena

doPlayerSendCancel(cid, "You can't do that while the golden arena!")

return true

end

if getPlayerStorageValue(cid, 212124) >= 1 then --alterado v1.6

return doPlayerSendCancel(cid, "You can't do it with a pokemon with mind controlled!")

end

if getPlayerStorageValue(cid, 52480) >= 1 then

return doPlayerSendCancel(cid, "You can't do it while a duel!") --alterado v1.6

end

if getPlayerStorageValue(cid, 6598754) == 1 or getPlayerStorageValue(cid, 6598755) == 1 then

return doPlayerSendCancel(cid, "You can't do it while in the PVP Zone!") --alterado v1.7

end

if exhaustion.get(cid, etele) and exhaustion.get(cid, etele) > 0 then

local tempo = tonumber(exhaustion.get(cid, etele)) or 0

local min = math.floor(tempo)

doPlayerSendCancel(cid, "Your pokemon is tired, wait "..getStringmytempo(tempo).." to teleport again.")

return true

end

if config.premium and not isPremium(cid) then

doPlayerSendCancel(cid, "Only premium members are allowed to use teleport.")

return true

end

if config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then

doPlayerSendCancel(cid, "Your pokemon can't concentrate during battles.")

return true

end

if (param == '') then

local str = ""

str = str .. "Places to go :\n\nHouse\n"

for a = 1, #places do

str = str..""..places[a].name.."\n"

end

doShowTextDialog(cid, 7416, str)

return true

end

local item = getPlayerSlotItem(cid, 8)

local nome = getPokeballName(item.uid)

local summon = getCreatureSummons(cid)[1]

local lastppos = getThingPos(cid)

local lastspos = getThingPos(summon)

local telepos = {}

local myplace = ""

local townid = 0

local citySto = 0 --alterado v1.7

if string.lower(param) == "house" then

if not getHouseByPlayerGUID(getPlayerGUID(cid)) then

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.")

return true

end

telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid)))

myplace = "our home"

else

for x = 1, #places do

if string.find(string.lower(places[x].name), string.lower(param)) then

townid = places[x].id

myplace = places[x].name

citySto = places[x].sto or -1 --alterado v1.7

end

if myplace == "" then

doPlayerSendCancel(cid, "That place doesn't exist.")

return true

end

if myplace ~= "" and townid > 0 then

telepos = getTownTemplePosition(townid)

end

if string.lower(param) ~= "house" and citySto ~= -1 and getPlayerStorageValue(cid, citySto) <= -1 then --alterado v1.7

doPlayerSendCancel(cid, "You have to talk with nurse in this place, before you can teleport for there!")

return true

end

if getDistanceBetween(getThingPos(cid), telepos) <= 15 then

doPlayerSendCancel(cid, "You are too near to the place you want to go!")

return true

end

doSendMagicEffect(getThingPos(summon), 29)

doSendMagicEffect(getThingPos(cid), 29)

doTeleportThing(cid, telepos, false)

local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH))

doTeleportThing(summon, pos2, false)

doSendMagicEffect(getThingPos(cid), 29)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos)

doCreatureSetLookDir(cid, SOUTH)

doCreatureSetLookDir(summon, SOUTH)

doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT)

exhaustion.set(cid, etele, cdtele)

return true

end

Aberos · Outubro 26, 2013

ainda da o mesmo erro

Tony Araujo · Outubro 27, 2013

Agora teste esse

local poke = {"Shiny Mr. Mime", "Mew", "Mewtwo", "Abra", "Kadabra", "Alakazam", "Drowzee", "Hypno", "Mr. Mime", "Porygon", "Shiny Abra", "Shiny Alakazam", "Shiny Hypno", "Porygon2"} --alterado v1.9

local etele = 9499

local cdtele = 1800

local config = {

premium = false, -- se precisa ser premium account (true or false)

battle = true -- se precisa estar sem battle (true). Se colocar false, poderá usar teleport no meio de batalhas

}

function onSay(cid, words, param)

if #getCreatureSummons(cid) == 0 then

doPlayerSendCancel(cid, "You need a pokemon to use teleport.")

return true

end

if not isInArray(poke, getCreatureName(getCreatureSummons(cid)[1])) then

return 0

end

if getPlayerStorageValue(cid, Agatha.stoIni) >= 1 and getPlayerStorageValue(cid, Agatha.stoIni) < 50 then --alterado v1.9

doPlayerSendCancel(cid, "You can't do that here!")

return true

end

if getPlayerStorageValue(cid, 22545) == 1 then --golden arena

doPlayerSendCancel(cid, "You can't do that while the golden arena!")

return true

end

if getPlayerStorageValue(cid, 212124) >= 1 then --alterado v1.6

return doPlayerSendCancel(cid, "You can't do it with a pokemon with mind controlled!")

end

if getPlayerStorageValue(cid, 52480) >= 1 then

return doPlayerSendCancel(cid, "You can't do it while a duel!") --alterado v1.6

end

if getPlayerStorageValue(cid, 6598754) == 1 or getPlayerStorageValue(cid, 6598755) == 1 then

return doPlayerSendCancel(cid, "You can't do it while in the PVP Zone!") --alterado v1.7

end

if exhaustion.get(cid, etele) and exhaustion.get(cid, etele) > 0 then

local tempo = tonumber(exhaustion.get(cid, etele)) or 0

local min = math.floor(tempo)

doPlayerSendCancel(cid, "Your pokemon is tired, wait "..getStringmytempo(tempo).." to teleport again.")

return true

end

if config.premium and not isPremium(cid) then

doPlayerSendCancel(cid, "Only premium members are allowed to use teleport.")

return true

end

if config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then

doPlayerSendCancel(cid, "Your pokemon can't concentrate during battles.")

return true

end

if (param == '') then

local str = ""

str = str .. "Places to go :\n\nHouse\n"

for a = 1, #places do

str = str..""..places[a].name.."\n"

end

doShowTextDialog(cid, 7416, str)

return true

end

local item = getPlayerSlotItem(cid, 8)

local nome = getPokeballName(item.uid)

local summon = getCreatureSummons(cid)[1]

local lastppos = getThingPos(cid)

local lastspos = getThingPos(summon)

local telepos = {}

local myplace = ""

local townid = 0

local citySto = 0 --alterado v1.7

if string.lower(param) == "house" then

if not getHouseByPlayerGUID(getPlayerGUID(cid)) then

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.")

return true

end

telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid)))

myplace = "our home"

else

----- OrochiElf Modification.

local places = {

[1] = {name = "Cerulean", id = 1, sto = 897530},

[2] = {name = "Saffron", id = 2, sto = 897531},

[9] = {name = "Lavender", id = 9, sto = 897532},

[5] = {name = "Fuchsia", id = 5, sto = 897533},

[4] = {name = "Celadon", id = 4, sto = 897534},

[7] = {name = "Viridian", id = 7, sto = 897535}, --alterado v1.7

[3] = {name = "Vermilion", id = 3, sto = 897536},

[6] = {name = "Pewter", id = 6, sto = 897537},

[8] = {name = "Cinnabar", id = 8, sto = 897538},

[10] = {name = "Outland North", id = 10, sto = 897539},

[12] = {name = "Golden", id = 14, sto = 897540},

}

for a, b in ipairs(places) do

if string.find(string.lower(places[x].name), string.lower(param)) then

townid = b.id

myplace = b.name

citysto = b.sto or -1

end

-----------------------------------------------------------------------------------

if myplace == "" then

doPlayerSendCancel(cid, "That place doesn't exist.")

return true

end

if myplace ~= "" and townid > 0 then

telepos = getTownTemplePosition(townid)

end

if string.lower(param) ~= "house" and citySto ~= -1 and getPlayerStorageValue(cid, citySto) <= -1 then --alterado v1.7

doPlayerSendCancel(cid, "You have to talk with nurse in this place, before you can teleport for there!")

return true

end

if getDistanceBetween(getThingPos(cid), telepos) <= 15 then

doPlayerSendCancel(cid, "You are too near to the place you want to go!")

return true

end

doSendMagicEffect(getThingPos(summon), 29)

doSendMagicEffect(getThingPos(cid), 29)

doTeleportThing(cid, telepos, false)

local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH))

doTeleportThing(summon, pos2, false)

doSendMagicEffect(getThingPos(cid), 29)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos)

doCreatureSetLookDir(cid, SOUTH)

doCreatureSetLookDir(summon, SOUTH)

doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT)

exhaustion.set(cid, etele, cdtele)

return true

end

Aberos · Outubro 29, 2013

@orochielf

vlw ,problema resolvido

Omega · Outubro 29, 2013

Essa seção não deve ser usada para pedidos ou dúvidas, temos uma seção específica para isso. Por favor, preste mais atenção da próxima vez.
Movido para Pedidos e Dúvidas Resolvidos - Scripting.

Entrar

talkaction Erro talkaction Tp!

Pergunta

Aberos 71

Link para o comentário

Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

Tony Araujo 282

Link para o comentário

Compartilhar em outros sites

Aberos 71

Link para o comentário

Compartilhar em outros sites

Tony Araujo 282

Link para o comentário

Compartilhar em outros sites

Aberos 71

Link para o comentário

Compartilhar em outros sites

Omega 377

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

otserv 8.x [Original]Global Compacto Completo 8.60 [I'm Back](Links Atualizados) 1 2 3 4 10

script alguém pode me ajudar nessa spells aqui, queira que colocassem pro meu personagem ficar inatingível por 6 segundos e podendo atacar livremente

Letreiro ao entrar em local

event Erro LineAnimation Snowball Event

Autoloot não stacka os items coletados

Fóruns

Tutoriais

Suporte