zipter98

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

Movido para pedidos e dúvidas de derivados, mais cuidado da próxima vez. Enfim, deve ter algum arquivo de trade system em creaturescripts/scripts do seu servidor. Basta colocar, no local adequado, uma condição verificando a quantidade de summons do jogador (tanto do cid quanto do target). Por exemplo: if #getCreatureSummons(cid) > 0 or getCreatureSummons(target) > 0 then doPlayerSendCancel(cid, "Você não pode trocar enquanto o seu pokémon (ou o pokémon do alvo) estiver fora da ball...") return false end

Parece bem interessante e diferenciado. Algumas perguntas: os shinies do servidor são os mesmos que vemos na maioria de outros OTs (me refiro aos shinies da PxG e tal)? É possível ser gerado um pokémon shiny em eggs?

Poderia postar o código do Toxic de pokemon moves.lua?

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

Pelo que parece, realmente não há nenhuma storage armazenando o nome do partner. Portanto, isso deve ser alterado por você (quando digo você, me refiro à quem vai alterar o código e tal) mesmo. Você pode, por exemplo, fazer o seguinte: Adicionar esta variável na lib do sistema: partner_storage = 918371 E, abaixo de: setPlayerStorageValue(cid, 9158, 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Você agora é partner de "..invname..". Você será deslogado em 5 segundos.") addEvent(doRemoveCreature, 5000, cid) setPlayerStorageValue(cid, invstatus, -1) Adicionar: setPlayerStorageValue(cid, partner_storage, invname) setPlayerStorageValue(getPlayerByName(invname), partner_storage, getCreatureName(cid)) E abaixo de: doPlayerSetExperienceRate(cid, 1.0) doPlayerPopupFYI(cid, "Seu bônus de partner acabou por você ter atingido o level "..maxlevel..".") setPlayerStorageValue(cid, 9158, 3) Adicionar: setOfflinePlayerStorageValue(getPlayerStorageValue(cid, partner_storage), partner_storage, -1) setPlayerStorageValue(cid, partner_storage, -1) A key/storage 918371 armazena o nome do partner.

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.

Tipo isso? function Exemplo(a, b, c) if not c then c = 1 --Valor padrão. end ... end Se c não for declarado nos parâmetros, seu valor padrão será 1.

A maneira mais fácil de fazer isso é indo em catch.lua, de actions, procurando por: catchinfo.rate = ballcatch[item.itemid].cr E substituindo por: local catch_rate_value = ballcatch[item.itemid].cr if isPremium(cid) then catch_rate_value = catch_rate_value + (math.ceil(catch_rate_value * 20 / 100)) end catchinfo.rate = catch_rate_value Ou, você pode fazer algumas alterações em catch system.lua, de lib.

Tipo isso? local query = db.getResult("SELECT tileMana FROM players WHERE id = "..getPlayerGUID(cid)) if query:getID() == -1 then print("Variável query com valor nulo.") else local value = query:getDataInt("tileMana") print("Variável query com valor verdadeiro. Valor: "..value..".") if value > 0 then print("Valor maior que 0.") else print("Valor igual ou menor que 0.") end end

Tipo isso? db.getResult("SELECT tileMana FROM players WHERE id = "..getPlayerGUID(cid)) Sobre sua segunda pergunta, poderia dar um exemplo?

O código funcionará da seguinte maneira: /comando -> o jogador irá avançar para o rank 5 de seu atual clan. /comando seavell -> o jogador mudará para o clan Seavell e avançará para o rank 5 deste. PS: Isso é um exemplo. Você pode mencionar qualquer outro clan existente no parâmetro da talkaction. Claro, no primeiro caso, se o jogador não pertencer à clan algum, será enviada uma mensagem informado-o da situação. local id, count, rank, level = 2145, 10, 5, 120 --ID do diamond, quantidade. PS: Estes são os dois primeiros valores - 2145 e 10. 5 é o rank, e 120, o nível mínimo para avançar para rank 5. local clans = {"Volcanic", "Seavell", "Orebound", "Wingeon", "Malefic", "Gardestrike", "Psycraft", "Naturia", "Raibolt"} local function doCorrectClanName(str) for _, clan in pairs(clans) do if clan:lower() == str:lower() then return clan end end return false end function onSay(cid, words, param) if not param or param == "" then if getPlayerClanName(cid) == "No Clan!" then return doPlayerSendCancel(cid, "Informe no parâmetro o clan desejado. Por exemplo, "..words.." seavell") else if getPlayerLevel(cid) < level then return doPlayerSendCancel(cid, "You don't have enough level ["..level.."].") elseif getPlayerItemCount(cid, id) < count then return doPlayerSendCancel(cid, "You need "..count.." "..getItemNameById(id)..""..count > 1 and "s" or "".." for advance to rank "..rank..".") elseif getPlayerClanRank(cid) == rank then return doPlayerSendCancel(cid, "You're already at rank "..rank..".") else doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You advanced from rank "..getPlayerClanRank(cid).." to rank "..rank..".") setPlayerClanRank(cid, rank) doPlayerRemoveItem(cid, id, count) end end else local clan = doCorrectClanName(param) if clan then if getPlayerLevel(cid) < level then return doPlayerSendCancel(cid, "You don't have enough level ["..level.."].") elseif getPlayerItemCount(cid, id) < count then return doPlayerSendCancel(cid, "You need "..count.." "..getItemNameById(id)..""..count > 1 and "s" or "".." for advance to rank "..rank.." and change to clan "..clan..".") elseif getPlayerClanRank(cid) == rank and getPlayerClanName(cid) == clan then return doPlayerSendCancel(cid, "You're already at rank "..rank.." of this clan.") elseif getPlayerClanName(cid) == clan then return doPlayerSendCancel(cid, "You're already member of this clan.") else doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You advanced from rank 1 to rank "..rank..".") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Now you're a "..clan.." member.") setPlayerClan(cid, clan) setPlayerClanRank(cid, rank) doPlayerRemoveItem(cid, id, count) end else return doPlayerSendCancel(cid, clan.." isn't a valid clan.") end end return true end

Se já pertencer à algum clan, só vai pular para o rank 5? Ou poderá mudar de clan e também alterar seu rank?

Sério, que discussão ridícula a de vocês. Se o cara se considera programador, é problema dele. O cara não sabe configurar um evento? Ninguém nasce sabendo. Pessoal quer iniciar discussão até por isso, brincadeira. 13 comentários ocultados. Espero que ninguém mais "reviva" tal discussão. Concentrem-se no assunto do tópico. Concentrem-se em ajudar, que é o objetivo dessa área. Se for para cuidar da vida dos outros, querer discutir em particular com alguém, peço que o façam por PM. Obrigado.

Não, essa função fica em level system.lua.

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

Ao pisar no tile, todas as potions serão gastas? Ou apenas uma por vez? Se puder responder.

Movido para pedidos e dúvidas de derivados, mais cuidado da próxima vez.

Agora, substitua sua função getSpeed(cid) por esta: function getSpeed(cid) if not isCreature(cid) then return 0 end local speed = tonumber(getPlayerStorageValue(cid, 1003)) if not speed then speed = 1 local str = getCreatureName(cid).." possui valor nulo para a função getSpeed (storage 1003)." if not pokes[getCreatureName(cid)] then str = str.." Esta criatura não se encontra na tabela pokes, de configuration.lua." end print(str) end return speed end PS: Parece que o erro está sendo causado devido à criaturas que possuem valor nulo das storages de status, como defense, offense, speed, etc. Se for imprimido em seu console alguma das mensagens que deixei programadas no código, peço-lhe que envie-a.

Tutorial aprovado e movido. Obrigado pelo conteúdo.

Movido para pedidos e dúvidas de derivados. E não entendi, os jogadores poderão escolher o pokémon, ou este virá aleatoriamente?

Estranho. Algum erro no console?

Hm, a mensagem de cancel aparece?

Substitua sua função getSpecialDefense por essa: function getSpecialDefense(cid) if not isCreature(cid) then return 0 end local spatk = getSpecialAttack(cid) local defense = getDefense(cid) local str = "" if not spatk then str = "A criatura "..getCreatureName(cid).." possui valor nulo para a função getSpecialAttack. Valor da storage 1005: "..getPlayerStorageValue(cid, 1005) and getPlayerStorageValue(cid, 1005) or "NIL" if not pokes[getCreatureName(cid)] then str = str..". Esta criatura não se encontra na tabela pokes, de configuration.lua." end print(str) spatk = 0 elseif not defense then str = "A criatura "..getCreatureName(cid).." possui valor nulo para a função getDefense. Valor da storage 1002: "..getPlayerStorageValue(cid, 1002) and getPlayerStorageValue(cid, 1002) or "NIL" if not pokes[getCreatureName(cid)] then str = str..". Esta criatura não se encontra na tabela pokes, de configuration.lua." end print(str) defense = 0 end return spatk * 0.85 + defense * 0.2 end