zipter98

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Tópico movido para a seção de dúvidas e pedidos resolvidos.

data/lib: tasks = { ["easy"] = { POKES = { ["Squirtle"] = {15, 1500, 1, 2160}, ["Charmander"] = {15, 1500, 1, 2160}, ["Bulbasaur"] = {15, 1500, 1, 2160}, }, }, ["medium"] = { POKES = { ["Forretress"] = {25, 2000, 3, 2160}, ["Charmeleon"] = {35, 2000, 3, 2160}, ["Starmie"] = {45, 2500, 3, 2160}, }, }, ["hard"] = { POKES = { ["Charizard"] = {15, 4500, 5, 2160}, ["Ursaring"] = {15, 4000, 5, 2160}, ["Dragonite"] = {30, 5000, 5, 2160}, }, }, ["veryhard"] = { POKES = { ["Santa Diglett"] = {1, 10000, 10, 2160}, ["Santa Psyduck"] = {1, 10000, 10, 2160}, ["Santa Pikachu"] = {1, 10000, 10, 2160}, }, }, } TASK_STO = 91834 TASK_POKES_STO = 91835 TASK_EXPERIENCE = 91836 TASK_QUANTITY_STO = 91837 EXTRA_STO = 91838 EXTRA_PRIZE_STO = 91839 function isInTask(cid) if getPlayerStorageValue(cid, TASK_STO) ~= -1 then return true end return false end data/creaturescripts/scripts, exp2.0.lua: Procure por: if valor >= getCreatureHealth(cid) then if isInArray(cannotKill, combat) and isPlayer(cid) then valor = getCreatureHealth(cid) - 1 else valor = getCreatureHealth(cid) end end valor = math.floor(valor) Substitua por: if valor >= getCreatureHealth(cid) then if isInArray(cannotKill, combat) and isPlayer(cid) then valor = getCreatureHealth(cid) - 1 else if not isSummon(cid) then local owner = attacker if isSummon(attacker) then owner = getCreatureMaster(attacker) end if isInTask(owner) then --TASK_QUANTITY_STO --TASK_POKES_STO --TASK_EXPERIENCE --TASK_STO if getCreatureName(cid) == getPlayerStorageValue(owner, TASK_POKES_STO) then local poke = getPlayerStorageValue(owner, TASK_POKES_STO) local prize = getPlayerStorageValue(owner, TASK_EXPERIENCE) local dificuldade = getPlayerStorageValue(owner, TASK_STO) local tabela = tasks[dificuldade] local pokemons = tabela.POKES local pokemon = pokemons[poke] local max_quantity = pokemon[1] if getPlayerStorageValue(owner, TASK_QUANTITY_STO) >= 2 then setPlayerStorageValue(owner, TASK_QUANTITY_STO, getPlayerStorageValue(owner, TASK_QUANTITY_STO)-1) doPlayerSendTextMessage(owner, MESSAGE_STATUS_CONSOLE_ORANGE, "[•"..dificuldade:upper().."]->["..getPlayerStorageValue(owner, TASK_QUANTITY_STO).."/"..max_quantity.."] "..poke..""..(getPlayerStorageValue(owner, TASK_QUANTITY_STO) > 1 and "s" or "").." derrotados.") else doPlayerSendTextMessage(owner, MESSAGE_STATUS_CONSOLE_ORANGE, "[•"..dificuldade:upper().."] DONE!") doPlayerSendTextMessage(owner, 27, "Prize: "..prize.." experience! You can say !extra to get another prize.") doPlayerAddExp(owner, prize) doSendAnimatedText(getThingPos(owner), prize, 215) setPlayerStorageValue(owner, EXTRA_STO, dificuldade) setPlayerStorageValue(owner, EXTRA_PRIZE_STO, poke) setPlayerStorageValue(owner, TASK_POKES_STO, -1) setPlayerStorageValue(owner, TASK_QUANTITY_STO, -1) setPlayerStorageValue(owner, TASK_EXPERIENCE, -1) setPlayerStorageValue(owner, TASK_STO, -1) end end end end valor = getCreatureHealth(cid) end end valor = math.floor(valor) data/talkactions/scripts: !easy, !medium, !hard e !veryhard: function onSay(cid, words) local word = words:gsub("!", "") if tasks[word] then local task = tasks[word] local pokemons = task.POKES local sto = TASK_QUANTITY_STO local sto1 = TASK_POKES_STO local sto2 = TASK_EXPERIENCE local sto3 = TASK_STO if not isInTask(cid) then local tabb = "" local tb = {} local tabbb = {} for a, b in pairs(pokemons) do table.insert(tabbb, a) end for a, pid in pairs(pokemons) do if tabb == "" then tabb = a else tabb = tabb..","..a end end local d = tabb:explode(",") for i = 1, #tabbb do table.insert(tb, d[i]) end local poke = tb[math.random(#tb)] local value = pokemons[poke] local quantity = value[1] local experience = value[2] setPlayerStorageValue(cid, sto, quantity) setPlayerStorageValue(cid, sto2, experience) setPlayerStorageValue(cid, sto1, poke) setPlayerStorageValue(cid, sto3, word) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Agora você está fazendo uma task "..word:upper().." de "..poke..". ["..getPlayerStorageValue(cid, sto).."/"..quantity.."]•[Prize: "..experience.." EXP]") else return doPlayerSendCancel(cid, "Você já está fazendo uma task.") end end return true end !extra: function onSay(cid, words) if type(getPlayerStorageValue(cid, EXTRA_STO)) == "number" then return doPlayerSendCancel(cid, "Você não terminou task alguma para pegar seu prêmio adicional.") end local dificuldade = getPlayerStorageValue(cid, EXTRA_STO) local pokemon = getPlayerStorageValue(cid, EXTRA_PRIZE_STO) local tabela = tasks[dificuldade] local tab = tabela.POKES local poke = tab[pokemon] local id = poke[4] local prize = poke[3] doPlayerSendTextMessage(cid, 27, "[•"..dificuldade:upper().."] Como prêmio por ter terminado a task de "..pokemon..", você recebeu "..prize.." "..getItemNameById(id)..". Parabéns!") doPlayerAddItem(cid, id, prize) setPlayerStorageValue(cid, EXTRA_STO, -1) setPlayerStorageValue(cid, EXTRA_PRIZE_STO, -1) return true end Como configurar: tasks = { ["dificuldade(deve ser a mesma do comando !dificuldade)"] = { POKES = { ["Nome do pokémon"] = {quantidade, prêmio em experiência, quantidade do item ao lado -> que ganhará no !extra, ID do item que ganhará no !extra}, }, }, }

Sobre o primeiro exemplo, basta colocar uma proteção tipo essa no seu código de fly: if getCreatureCondition(cid, CONDITION_INFIGHT) then return doPlayerSendCancel(cid, "Você está em battle, não pode usar fly.") end Já sobre o segundo, coloque uma proteção tipo essa no seu código de fishing: local sto = xxx --Storage de quando está surfando. if getPlayerStorageValue(cid, sto) >= 1 then return doPlayerSendCancel(cid, "Você não pode pescar enquanto está surfando!") end

Acho que explicações são desnecessárias. local item = {id, quantidade} local msg = "Mensagem que será enviada após os 8 segundos." function onUse(cid, item, frompos, item2, topos) if getPlayerStorageValue(cid, 91821) >= 1 then return doPlayerSendCancel(cid, "Você já completou essa quest.") else doPlayerAddItem(cid, item[1], item[2]) setPlayerStorageValue(cid, 91821, 1) addEvent(function() if not isCreature(cid) then return true end doPlayerSendTextMessage(cid, 27, msg) end, 8*1000) end return true end

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Sobre esse comando adicional, !extra: O prêmio será variável de acordo com a dificuldade? Por exemplo: dificuldade easy sempre vai ganhar x item e x quantidade, já dificuldade medium sempre ganhará y item e y quantidade; ou o prêmio será variável de acordo com o pokémon? E um pedido: se possível, já poderia ir informando o(s) item(s), juntamente com a quantidade?

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Legal essa variável aqui, local tempopravoltaraonormaldepoisdetercorridobastante = 10 Outra: pra quê usar isso if isInArray(getPlayersOnline(), cid) then ... end Se pode usar isso? if not isCreature(cid) then return true end Você economiza uma linha. De qualquer maneira, local exausted = 2 function onSay(cid, words, param) if not isPremium(cid) then return doPlayerSendCancel(cid, "You need P.A to use speed.") elseif getPlayerStorageValue(cid, 91821) > os.time() then return doPlayerSendCancel(cid, "Wait "..getPlayerStorageValue(cid, 91821).." seconds.") end local tempopravoltaraonormaldepoisdetercorridobastante = 10 function tira() if isInArray(getPlayersOnline(), cid) then doChangeSpeed(cid,-1200) end end doChangeSpeed(cid, 600) addEvent(tira, tempopravoltaraonormaldepoisdetercorridobastante*1000) doCreatureSay(cid, "Strong Haste", TALKTYPE_ORANGE_1) setPlayerStorageValue(cid, 91821, os.time() + exausted) return true end

Se for PDA, data/actios/order.lua: local time = 140 + 2 * getPokemonLevel(mysum)

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Este, que você se refere?

Sanado, movido para pedidos e dúvidas resolvidos de scripting. PS: Já é a quarta vez, pelas minhas contas, que você erra a seção. Da próxima vez, será alertado.

Qual a base do seu servidor? PDA? Outra pergunta: e os prêmios? Serão fixos ou definidos na tabela (por exemplo, ao matar x Charmanders da task easy você ganha x experiência e x cash; já matando x Pikachus, você ganha y experiência e y cash)?

Área incorreta, tópico movido. Mais cuidado da próxima vez. PS: Para pedidos e/ou dúvidas relacionados à servidores derivados (como Pokémon, no seu caso), opte por postar em Pedidos e dúvidas - Servidores derivados.

Tópico movido para a seção de dúvidas e pedidos resolvidos.

data/movements/scripts. O actionid, você pode colocar no teleporte.

Sanado, movido.

Sanado, movido.

Tópico movido para a seção de dúvidas e pedidos resolvidos.

Resolvido, fechado e movido para pedidos e duvidas resolvidos.

Resolvido, fechado e movido para pedidos e duvidas resolvidos.

Resolvido, fechado e movido para pedidos e duvidas resolvidos.