zipter98

Talvez o problema esteja na seguinte variável, responsável por armazenar uma posição para onde o pokémon é teleportado ao ser criado. farAwayPos

@@Diretor Fixin Pelo menos neste caso, sim. Tópico movido para dúvidas / pedidos resolvidos.

Ops, falta de atenção minha. Corrigido.

Isso acontece com todos os pokémons?

Hm, troque: local pokemonName = getPlayerStorageValue(pk, storages.pokeName) por: local pokemonName = getCreatureName(pk) Se não funcionar, troque a mesma variável por: local pokemonName = i

Acima de: setPlayerStorageValue(pk, storages.pokeName, i) coloque: pk = getCreatureSummons(cid)[1]

Pelo fato de usarem a mesma lógica, ambas as spells terão códigos iguais, com apenas a configuração diferindo. local config = { door_id = xxx, --ID da porta da porta aberta/fechada. effect = xxx, --Efeito ao abrir/fechar a porta. action_id = xxx --Actionid. } function onCastSpell(cid) local front_pos = getPosByDir(getThingPos(cid), getCreatureLookDirection(cid)) front_pos.stackpos = 1 local front_item = getThingfromPos(front_pos) if front_item.actionid == config.action_id and front_item.itemid ~= config.door_id then doTransformItem(front_item.uid, config.door_id) doSendMagicEffect(front_pos, config.effect) end return true end

Acima dessa linha coloque: print(pokemonName) print(pokes[pokemonName] and "true" or "false") Informe o que for imprimido no console.

local t = { xx = {375,394}, -- começo e final do x da area yy = {143,158}, -- começo e final do y da area zz = {7}, -- aqui coloca Z maioria das vez e 7 efeito = {11} -- efeito no mostro assim que ele parece } function onSay(cid, words, param, channel) if param == "cleanMonster" then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Arena cleared.") for x = t.xx[1], t.xx[2] do for y = t.yy[1], t.yy[2] do local pid = getTopCreature({x = x, y = y, z = t.zz[1]}).uid if isMonster(pid) then doRemoveCreature(pid) end end end else local w = param:explode(";") local monster_raid = {} for i = 1, #w do local m_info = w:explode(",") local count, monster_name = tonumber(m_info[1]), m_info[2] if not count or not monster_name then return doPlayerSendCancel(cid, "Wrong parameters.") end monster_raid = {count, monster_name} end for i = 1, #monster_raid do for monster_count = 1, monster_raid[1] do local summon_position = {x = math.random(t.xx[1], t.xx[2]), y = math.random(t.yy[1], t.yy[2]), z = t.zz[1]} doSummonCreature(monster_raid[2], summon_position) doSendMagicEffect(summon_position, t.efeito[1]) end end end return true end

Tópico movido para dúvidas / pedidos resolvidos.

Qual o conteúdo da linha 1289?

Tópico movido para dúvidas / pedidos resolvidos.

Só faltou um end pra fechar o loop, Anderson. local quest = { [90003] = {name = "Box+1", done = 1}, } function onUse(cid, item, fromPosition, itemEx, toPosition) local tabela = {} for a, b in pairs(quest) do table.insert(tabela, b.name.." "..(getPlayerStorageValue(cid, a) == b.done and "[Feito]" or "")) end doShowTextDialog(cid, item.itemid, "Quests disponíveis:\n\n"..table.concat(tabela, "\n")) return true end

Tópico movido para dúvidas / pedidos resolvidos.

Não apareceu a opção de melhor resposta porque você criou o tópico na área de códigos prontos, né coleguinha. Movido para resolvidos.

Tópico movido para dúvidas / pedidos resolvidos.

local toPos = {x = 1596, y = 738, z = 7} --pos para onde o player vai ser teleportado local tempo = 3 --tempo q ele vai ficar la... em segs local cooldown = xxx --Tempo, em segundos, de exhaust. local function teleport(cid, pos) if isCreature(cid) then doSendMagicEffect(pos, 20) doTeleportThing(cid, pos, false) end end function onCastSpell(cid, var) if getPlayerStorageValue(cid, 2938) > os.time() then return doPlayerSendCancel(cid, "Wait "..getPlayerStorageValue(cid, 2938) - os.time().." second(s) to use this spell again.") end local pos = getPlayerPosition(cid) doTeleportThing(cid, toPos, false) setPlayerStorageValue(cid, 2938, os.time() + exhaust) doSendMagicEffect(pos, 20) addEvent(teleport, tempo*1000, cid, pos) return true end

Tópico movido para dúvidas / pedidos resolvidos.

Tópico movido para dúvidas / pedidos resolvidos.

local pos = {x = 3254, y = 3066, z = 7} local storage = 11120 function onUse(cid) if getPlayerStorageValue(cid, storage) < 1 then return true end for _, summon in pairs(getCreatureSummons(cid)) do if getCreatureName(summon):lower() == "bandit" then doTeleportThing(cid, pos) break end end return true end Isso, é claro, caso a versão do seu TFS seja inferior as mais atuais (1.x).

local promotion_level = 2 --Nível da promoção. function onLogin(cid) local prem_days = getPlayerPremiumDays(cid) if prem_days > 0 and getPlayerPromotionLevel(cid) ~= promotion_level then setPlayerPromotionLevel(cid, promotion_level) elseif prem_days <= 0 and getPlayerPromotionLevel(cid) == promotion_level then setPlayerPromotionLevel(cid, promotion_level - 1) doTeleportThing(cid, {x = 3170, y = 3476, z = 7}) end return true end

OK, editado.

OK, editado.

local config = { itemid = xxx, --ID da grade. effect = xxx, --Efeito ao remover as grades. posis = { {x = x, y = y, z = z}, --Posições das grades. {x = x, y = y, z = z}, --etc } } function onSay(cid, words, param) local time = tonumber(param) if not time then return doPlayerSendCancel(cid, "/abrir time (in minutes)") end broadcastMessage("As grades foram abertas.") addEvent(broadcastMessage, time * 1000 * 60, "As grades foram fechadas.") for i = 1, #config.posis do local item = getTileItemById(config.posis, config.itemid).uid if item > 0 then doRemoveItem(item) doSendMagicEffect(config.posis, config.effect) addEvent(doCreateItem, time * 1000 * 60, config.itemid, 1, config.posis) end end return true end

Não faço ideia de como o tempo é armazenado nesta tabela, logo supus que, tendo valor superior a zero, a conta seria VIP. function onSay(cid, words, param) local query, vip_players = db.getResult("SELECT id FROM accounts WHERE viptime > 0"), {} if query:getID() == -1 then return true end repeat local account_info = db.getResult("SELECT name FROM players WHERE account_id = "..query:getDataInt("id")) if account_info:getID() ~= -1 then repeat table.insert(vip_players, account_info:getDataString("name")) until not account_info:next() account_info:free() end until not query:next() query:free() doShowTextDialog(cid, param, "VIP players: "..table.concat(vip_players, "\n")) return true end