zipter98

Exato, depois, é só configurar o baú no map editor.

Testa esse, qualquer erro, poste aqui.

Sobre a master ball: catch.lua [actions] Adicione essa proteção: local restrictions = {"Mew", "Mewtwo", "Articuno"} --Coloque aqui o nome dos lendários.. if isInArray(restrictions, name) or string.find(name, "shiny") and typeee == "master" then return doPlayerSendCancel(cid, "Você não pode capturar este pokémon com a Mater Ball.") end No typeee, você deve colocar, após o "==", o nome da ball (que você configurou na tabela ballcatch [localizada neste mesmo arquivo]) entre aspas.

Keilost, identação eu faço bunitin e talz no notepad++, mas quando eu passo pra cá o script, ele volta ao 'normal'. Ai como sou meio nb, não sei como passar pra cá já identado ._. se alguém quiser me ajudar, ty

De nada Reportado para moverem p/ Pedidos e dúvidas resolvidos - Scripting xD

Amoeba, não sei se é só impressão minha, ou você esqueceu de setar a storage? Sou meio ruim de visão, ai as vezes é só impressão minha mesmo ._. Fiz o piso aqui rapidin, veja se é isso que você quer: function onStepIn(cid, item, position, fromPosition) local storage_quest = xxx --Storage da quest. if getPlayerStorageValue(cid, storage_quest) < 1 then doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "Você não completou a quest para passar aqui!") doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) end doPlayerSendTextMessage(cid, 27, "Parabéns, agora clique no baú para receber sua recompensa.") return true end Só vai passar por ele quem fez a quest.

Sobre a tag e registrar no login.lua, eu não achei muito necessário informar pq é algo, suponho eu, meio 'óbvio'. Mas tem razão, eu deveria ter incluído estas informações no meu comentário anterior :x E sobre o onTarget q coloquei, na verdade, como eu nunca fiz algo com onCombat e onTarget, não sabia o que seria mais adequado colocar. Ai tirei como base um script que encontrei aqui no fórum como base e.e De qualquer maneira, quais os erros que cometi no meu script? Saberia dizer? Pra não cometer o mesmo erro na próxima vez e.e

Eu tentei fazer uma coisa meio louca aqui, fiz rapidinho, então não tenho a mínima ideia se vai funcionar :s function onTarget(cid, target) local voca_id = xxx --Coloque aqui o ID da vocation. local monsters = {"xxx", "yyy", "zzz"} --Monstros que não poderão ser atacados. for a, b in ipairs(monsters) do if isPlayer(cid) and getPlayerVocation(cid) == voca_id then if getCreatureTarget(cid) == b then return false end end end return true end

Este setPlayerStorageValue, não precisa registrar em lugar algum. Apenas o actionid da porta e do baú (:

Qual seu sistema de vip? Por storage? E, também, haverá alguma condição no script? Por exemplo, se o player já for vip, não poderá usar este item? Ou se não tiver tal storage, não poderá usá-lo? Ou é só um item que ao dar use vai adicionar à account x dias de p.a?

Seria bem legal se tivesse uma história bem bolada, e os personagens não fossem feios.

Tente substituir seu revive.lua e seu medicine.lua por estes meus. Caso não funcione, suponho que o erro seja, na verdade, em outro arquivo. Revive: Medicine: function onUse(cid, item, frompos, item2, topos) if not isSummon(item2.uid) then return doPlayerSendCancel(cid, "Medicine só pode ser usado em pokémons.") end if getPlayerStorageValue(cid, 990) >= 1 then doPlayerSendCancel(cid, "Você não pode usar medicine em batalhas de gym.") return true end if getCreatureMaster(item2.uid) ~= cid then return doPlayerSendCancel(cid, "Você só pode usar medicine em seu próprio pokémon.") end if getPlayerStorageValue(cid, 52481) >= 1 then return doPlayerSendCancel(cid, "Você não pode usar medicine durante um duel.") end local pokeball = getPlayerSlotItem(cid, 8) doCureBallStatus(pokeball.uid, "all") doCureStatus(item2.uid, "all", false) if (getCreatureCondition(item2.uid, CONDITION_PARALYZE) == true) then doRemoveCondition(item2.uid, CONDITION_PARALYZE) end if getCreatureSpeed(item2.uid) < getSpeed(item2.uid) then doRegainSpeed(item2.uid) end doSendMagicEffect(getThingPos(item2.uid), 14) doRemoveItem(item.uid, 1) return true end

Eita, dessa eu não sabia Obrigado pela informação \o

De nada, funcionou tudo? Algum moderador já pode mover o tópico?

Realmente, acho meio feio a porta teleportar o player e.e Sobre a possibilidade de trocar de sexo, não fica pensado nisso. Vlw \o Não teria uma maneira de "quebrar" isso de mudar sexo e ficar com a outfit do sexo anterior? Talvez um onlogin daria?

EDIT: O player receberá quantas partes do addon? 1? E, como eu não conheço essa outfit, poderia informar se ela tem tanto versão female quanto male? De qualquer maneira, tentei fazer a porta e baú. O último, fiz como se a outfit tivesse male e female. Se tiver de apenas um sexo, basta tirar essa parte: if (getPlayerSex(cid) == 0)then doPlayerAddOutfit(cid, cfg.addon_female, cfg.addon_qnt) else doPlayerAddOutfit(cid, cfg.addon_male, cfg.addon_qnt) end E colocar essa, no lugar: doPlayerAddOutfit(cid, xxx, cfg.addon_qnt) --Troque xxx pelo ID da outfit. Porta: function onUse(cid, item, frompos, item2, topos) local storage = xxx --Coloque aqui a storage da quest que necessita estar completa para passar pela porta. local pos = {x = xxx, y = yyy, z = zzz} --Para onde será teleportado ao clicar na porta. if getPlayerStorageValue(cid, storage) < 1 then doTeleportThing(cid, frompos) doPlayerSendCancel(cid, "Você não completou a quest para passar por esta porta.") doSendMagicEffect(frompos, CONST_ME_POFF) else doPlayerSendTextMessage(cid, 27, "Parabéns, agora clique no baú para receber sua recompensa.") end return true end Baú: function onUse(cid, item, frompos, item2, topos) local cfg = { addon_male = xxx, --ID da outfit male. addon_female = xxx, --ID da outfit female. addon_qnt = xxx, --Quantas partes do addon vai ganhar. } if getPlayerStorageValue(cid, 112819) >= 1 then return doPlayerSendCancel(cid, "Você já completou essa quest.") end doPlayerSendTextMessage(cid, 27, "Parabéns, você completou a quest com sucesso! Tome como prémio uma parte da Demon Outfit.") setPlayerStorageValue(cid, 112819, 1) doPlayerAddOutfit(cid, cfg.addon_female, cfg.addon_qnt) doPlayerAddOutfit(cid, cfg.addon_male, cfg.addon_qnt) return true end

Pra capturar, só editar normalmente no configuration.lua (o 'nome' da corpse do pokémon deve ser igual ao nome do pokémon. Por exemplo, usando o Crystal Onix: --Isso do 'nome' da corpse se edita no items.xml. Incorreto: a fainted shiny onix Correto: a fainted crystal onix Pelo menos, comigo é assim. Para não poder capturar x pokémon, você também pode configurar na tabela pokecatches (retirando a linha do pokémon desejado), ou adicionar esta proteção em seu catch.lua [data/actions/scripts/catch.lua]: Suponho que já haja a variável name em seu código, então basta mudar apenas o nome do pokémon na proteção (ou caso queria adicionar mais de um pokémon, adicionar uma tabela). Um pokémon apenas: if isInArray("Aerodactyl", name) then return doPlayerSendCancel(cid, "Você não pode capturar este pokémon.") end Mais de um pokémon: local uncatch_pokes = {"Aerodactyl", "Mew", "Mewtwo"} --Edite aqui os pokémons que não poderão ser capturados. if isInArray(uncatch_pokes, name) then return doPlayerSendCancel(cid, "Você não pode capturar este pokémon.") end

Ele postou o script assim, só editei o que ele pediu ._. Mas se for mesmo necessário, eu retiro o if words. EDIT: Pronto, editei o post lá.

Prontinho, corrigido os erros, funcionando perfeitamente. No xml, coloque como words '/name'. Depois, in game, digite, por exemplo, /name test,testzin. function onSay(cid, words, param, channel) local p = string.explode(param, ',') local item_id = 2145 local item_count = 1 --Mude aqui a qnt de diamonds q vai remover do player. if(param == "") then doPlayerSendCancel(cid, "Command requires param.") return true end if getPlayerItemCount(cid, item_id) <= 4 then return doPlayerSendCancel(cid, "vc precisa de 5 diamonds.") end if(db.getResult("SELECT `id` FROM `players` WHERE `name` = " .. db.escapeString(p[1]) .. ";"):getID() == -1) then return doPlayerSendCancel(cid, "Sorry, but player [" .. p[1] .. "] does not exist.") elseif(isPlayerBanished(p[1], PLAYERBAN_LOCK)) then return doPlayerSendCancel(cid, "Sorry, but " .. p[1] .. " is name locked.") elseif(db.getResult("SELECT `id` FROM `players` WHERE `name` = " .. db.escapeString(p[2]) .. ";"):getID() == 1) then return doPlayerSendCancel(cid, "Sorry, but the name [" .. p[2] .. "] already exists.") end doPlayerRemoveItem(cid, item_id, item_count) db.executeQuery("UPDATE `players` SET `name` = '" .. p[2] .. "' WHERE name = '" .. p[1] .. "';") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have changed " .. p[1] .. "'s name to " .. p[2] .. ".") return true end

Parece estar muito bom, meus parabéns. Não sei se você já respondeu isso à alguém, mas há alguma data para o lançamento oficial, ou para um beta (caso você pretenda realizar um, claro)?

Não to em casa, então n testei function onSay(cid, words, param, channel) local p = string.explode(param, ',') local item_id = 2195 local item_count = 1 --Mude aqui a qnt de diamonds q vai remover do player. if getPlayerItemCount(cid, item_id) < 5 then return doPlayerSendCancel(cid, "vc precisa de 5 diamonds.") end if(param == "") then doPlayerSendCancel(cid, "Command requires param.") return true end if(words == "/name") then if(db.getResult("SELECT `id` FROM `players` WHERE `name` = " .. db.escapeString(p[1]) .. ";"):getID() == -1) then return doPlayerSendCancel(cid, "Sorry, but player [" .. p[1] .. "] does not exist.") elseif(isPlayerBanished(p[1], PLAYERBAN_LOCK)) then return doPlayerSendCancel(cid, "Sorry, but " .. p[1] .. " is name locked.") elseif(db.getResult("SELECT `id` FROM `players` WHERE `name` = " .. db.escapeString(p[2]) .. ";"):getID() == 1) then return doPlayerSendCancel(cid, "Sorry, but the name [" .. p[2] .. "] already exists.") end doPlayerRemoveItem(cid, item_id, item_count) db.executeQuery("UPDATE `players` SET `name` = '" .. p[2] .. "' WHERE name = '" .. p[1] .. "';") and doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have changed " .. p[1] .. "'s name to " .. p[2] .. ".") end end

Algum erro no console? Em alguma das tentativas? Ou, por incrível que pareça, em nenhuma delas constou erro lá?

Se deixar com os sistemas básicos 'perfeitos', será de ÓTIMO tamanho. Se quebrasse o limite de sprs/effects então, vish

3 tentativas, veja se vai printar o test, e se n funcionar, poste os erros q der no console. /\ melhor prevenir do que remediar, talvez funcione assim, já q de várias de tentativas, nenhuma funcionou

Inicialmente, eu pensei em apenas uma ideia. Sobre a versão, sou indiferente quanto. Seria bem legal um Tournament System, tipo o da pxg, com modalidades de level, e, SE POSSÍVEL, categorias 1x1, 2x2 e 3x3. Suponho que você já saiba como este sistema é, portanto, não vejo necessidade em explicá-lo. Os motivos? Não são tão relevantes, mas pode-se citar: Imagino que não haja em fórum algum este sistema; sendo os únicos tournament system que já vi aqui de pokémon, survival; com um tournament system assim, muitas pessoas, obviamente, passariam a utilizá-lo, e, consequentemente, aumentaria a competição nos OTs. Como eu disse, não são coisas tão relevantes, mas um Tournament System quase "perfeito" seria algo totalmente inovador em servidores disponíveis para download. Suponho que seja algo BEM difícil de fazer (principalmente para disponibilizar para todos), então entendo caso você não consiga.