Olá galera uso a base Pokemon Stage com megas. o comando !pokeballs nome do pokemon (Ex: !pokeballs scyther), não está contando quantas ball você joga no pokemon. Mesmo se vc jogar 10 pokeballs e usar o comando ele vai dizer que você não jogou nenhuma.
local function sendBrokesMsg2(cid, name, str) --alterado v1.9 \/ TUDO!!
if not isCreature(cid) then return false end
local storage = getPlayerStorageValue(cid, str)
if storage == -1 then
return sendMsgToPlayer(cid, 27, "Você ainda não gastou nenhuma ball para catar esse pokemon!")
end
local t = "normal = (.-), great = (.-), super = (.-), ultra = (.-), saffari = (.-), dark = (.-);"
local msg = {}
table.insert(msg, "Você ja gastou: ")
for n, g, s, u, s2, d in storage:gmatch(t) do
if tonumber(n) and tonumber(n) > 0 then
table.insert(msg, tostring(n).." Poke ball".. (tonumber(n) > 1 and "s" or ""))
end
if tonumber(g) and tonumber(g) > 0 then
table.insert(msg, (#msg > 1 and ", " or "").. tostring(g).." Great ball".. (tonumber(g) > 1 and "s" or ""))
end
if tonumber(s) and tonumber(s) > 0 then
table.insert(msg, (#msg > 1 and ", " or "").. tostring(s).." Super ball".. (tonumber(s) > 1 and "s" or ""))
end
if tonumber(u) and tonumber(u) > 0 then
table.insert(msg, (#msg > 1 and ", " or "").. tostring(u).." Ultra ball".. (tonumber(u) > 1 and "s" or ""))
end
if tonumber(s2) and tonumber(s2) > 0 then
table.insert(msg, (#msg > 1 and ", " or "").. tostring(s2).." Saffari ball".. (tonumber(s2) > 1 and "s" or ""))
end
if tonumber(d) and tonumber(d) > 0 then
table.insert(msg, (#msg > 1 and ", " or "").. tostring(d).." Dark ball".. (tonumber(d) > 1 and "s" or ""))
end
end
if #msg == 1 then
return doPlayerSendTextMessage(cid, 27, "Você ainda não gastou nenhuma ball para catar um "..name..".")
end
if string.sub(msg[#msg], 1, 1) == "," then
msg[#msg] = " and".. string.sub(msg[#msg], 2, #msg[#msg])
end
table.insert(msg, " tentando catar um "..name..".")
return sendMsgToPlayer(cid, 27, table.concat(msg))
end
function onSay(cid, words, param)
if(param == '') then
doPlayerSendTextMessage(cid, 27, "Coloque um nome de pokemon...")
return true
end
if newpokedex[doCorrectPokemonName(param)] then
local storage = newpokedex[doCorrectPokemonName(param)].stoCatch
local name = doCorrectPokemonName(param)
sendBrokesMsg2(cid, name, storage)
else
doPlayerSendTextMessage(cid, 27, "Issu não e um pokemon...")
end
return true
end