resolvido [Encerrado] Duvida Respawn Shiny's

arkadioos · Maio 15, 2013

Eu preciso muito saber como eu vou fazer aparecer shiny's no jogo , porque não está dando certo , eu vou no spawn.lua e já tentei de tudo alguem sabe o script correto para que tenho 100% de chances de vim shiny's ? Dou rep. pra quem me ajudar

Meu spawn.lua e não vem shiny

local function doShiny(cid)

if isCreature(cid) then

if isSummon(cid) then return true end

if getPlayerStorageValue(cid, 74469) >= 1 then return true end

if isNpcSummon(cid) then return true end

if isInArray(shinys, getCreatureName(cid)) then

transform = math.random(100, 100) --100% chance

elseif isInArray(raros, getCreatureName(cid)) then

transform = math.random(100, 100) --100% chance

elseif not isInArray(raros, getCreatureName(cid)) and not isInArray(shinys, getCreatureName(cid)) then

return true

end

brun123 · Maio 17, 2013

posta a script toda

eu não estou com ela aqui, mas o seu problema é o seguinte:

local random = math.random(100, 100), vai gerar um número aleatório entre 100 e 100 (vai ser sempre 100) e depois um pouco abaixo na script, é verificado se random é igual a 10, se sim, vai fazer aparecer shiny... o problema é que nunca vai ser 10, já que sempre é 100

arkadioos · Maio 17, 2013

a script toda :

local shinys = {

"Venusaur", "Charizard", "Blastoise", "Butterfree", "Beedrill", "Pidgeot", "Rattata", "Raticate", "Raichu", "Zubat", "Golbat", "Paras", "Parasect",

"Venonat", "Venomoth", "Growlithe", "Arcanine", "Abra", "Alakazam", "Tentacool", "Tentacruel", "Farfetch'd", "Grimer", "Muk", "Gengar", "Onix", "Krabby",

"Kingler", "Voltorb", "Electrode", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan", "Tangela", "Horsea", "Seadra", "Scyther", "Jynx", "Electabuzz", "Pinsir",

"Magikarp", "Gyarados", "Snorlax", "Dragonair", "Dratini"}

local raros = {"Dragonite"} --alterado v1.5

local function ShinyName(cid)

if isCreature(cid) then

if string.find(tostring(getCreatureName(cid)), "Shiny") then

local newName = tostring(getCreatureName(cid)):match("Shiny (.*)")

doCreatureSetNick(cid, newName)

if isMonster(cid) then

doSetCreatureDropLoot(cid, false)

end

end

end

end

local function doSetRandomGender(cid)

if not isCreature(cid) then return true end

if isSummon(cid) then return true end

local gender = 0

local name = getCreatureName(cid)

if not newpokedex[name] then return true end

local rate = newpokedex[name].gender

if rate == 0 then

gender = 3

elseif rate == 1000 then

gender = 4

elseif rate == -1 then

gender = 0

elseif math.random(1, 1000) <= rate then

gender = 4

else

gender = 3

end

doCreatureSetSkullType(cid, gender)

end

local function doShiny(cid)

if isCreature(cid) then

if isSummon(cid) then return true end

if getPlayerStorageValue(cid, 74469) >= 1 then return true end

if getPlayerStorageValue(cid, 22546) >= 1 then return true end --alterado v1.7 -golden-

if isNpcSummon(cid) then return true end

if isInArray(shinys, getCreatureName(cid)) then

transform = math.random(100, 100) --100% chance

elseif isInArray(raros, getCreatureName(cid)) then

transform = math.random(100, 100) --100% chance

else

return true

end

if transform == 10 then

doSendMagicEffect(getThingPos(cid), 18)

local shi = doCreateMonster("Shiny ".. getCreatureName(cid) .."", getThingPos(cid))

setPlayerStorageValue(shi, 74469, 1)

setPlayerStorageValue(cid, 74469, 1)

doRemoveCreature(cid)

else

setPlayerStorageValue(cid, 74469, 1)

end

else

return true

end

end

function onSpawn(cid)

registerCreatureEvent(cid, "Experience")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "DirectionSystem")

registerCreatureEvent(cid, "CastSystem")

if isSummon(cid) then

registerCreatureEvent(cid, "SummonDeath")

return true

end

addEvent(doSetRandomGender, 5, cid)

addEvent(doShiny, 10, cid)

addEvent(ShinyName, 15, cid)

addEvent(adjustWildPoke, 5, cid)

return true

end

kttallan · Maio 17, 2013

local shinys = {
"Venusaur", "Charizard", "Blastoise", "Butterfree", "Beedrill", "Pidgeot", "Rattata", "Raticate", "Raichu", "Zubat", "Golbat", "Paras", "Parasect",
"Venonat", "Venomoth", "Growlithe", "Arcanine", "Abra", "Alakazam", "Tentacool", "Tentacruel", "Farfetch'd", "Grimer", "Muk", "Gengar", "Onix", "Krabby",
"Kingler", "Voltorb", "Electrode", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan", "Tangela", "Horsea", "Seadra", "Scyther", "Jynx", "Electabuzz", "Pinsir",
"Magikarp", "Gyarados", "Snorlax", "Dragonair", "Dratini"}
local raros = {"Dragonite"} --alterado v1.5
local function ShinyName(cid)
if isCreature(cid) then
if string.find(tostring(getCreatureName(cid)), "Shiny") then
local newName = tostring(getCreatureName(cid)):match("Shiny (.*)")
doCreatureSetNick(cid, newName)
if isMonster(cid) then
doSetCreatureDropLoot(cid, false)
end
end
end
end
local function doSetRandomGender(cid)
if not isCreature(cid) then return true end
if isSummon(cid) then return true end
local gender = 0
local name = getCreatureName(cid)
if not newpokedex[name] then return true end
local rate = newpokedex[name].gender
if rate == 0 then
gender = 3
elseif rate == 1000 then
gender = 4
elseif rate == -1 then
gender = 0
elseif math.random(1, 1000) <= rate then
gender = 4
else
gender = 3
end
doCreatureSetSkullType(cid, gender)
end
local function doShiny(cid)
if isCreature(cid) then
if isSummon(cid) then return true end
if getPlayerStorageValue(cid, 74469) >= 1 then return true end
if getPlayerStorageValue(cid, 22546) >= 1 then return true end --alterado v1.7 -golden-
if isNpcSummon(cid) then return true end
if isInArray(shinys, getCreatureName(cid)) then
transform = math.random(100, 100) --100% chance
elseif isInArray(raros, getCreatureName(cid)) then
transform = math.random(100, 100) --100% chance
else
return true
end
if transform == 10 then
doSendMagicEffect(getThingPos(cid), 18)
local shi = doCreateMonster("Shiny ".. getCreatureName(cid) .."", getThingPos(cid))
setPlayerStorageValue(shi, 74469, 1)
setPlayerStorageValue(cid, 74469, 1)
doRemoveCreature(cid)
else
setPlayerStorageValue(cid, 74469, 1)
end
else
return true
end
end
function onSpawn(cid)
registerCreatureEvent(cid, "Experience")
registerCreatureEvent(cid, "GeneralConfiguration")
registerCreatureEvent(cid, "DirectionSystem")
registerCreatureEvent(cid, "CastSystem")
if isSummon(cid) then
registerCreatureEvent(cid, "SummonDeath")
return true
end
addEvent(doSetRandomGender, 5, cid)
addEvent(doShiny, 10, cid)
addEvent(ShinyName, 15, cid)
addEvent(adjustWildPoke, 5, cid)
return true
end

transform = math.random(100, 100) --100% chance

brun123 · Maio 17, 2013

Aqui:

local shinys = {"Venusaur", "Charizard", "Blastoise", "Butterfree", "Beedrill", "Pidgeot",
               "Rattata", "Raticate", "Raichu", "Zubat", "Golbat", "Paras", "Parasect",
               "Venonat", "Venomoth", "Growlithe", "Arcanine", "Abra", "Alakazam", "Tentacool",
               "Tentacruel", "Farfetch'd", "Grimer", "Muk", "Gengar", "Onix", "Krabby",
               "Kingler", "Voltorb", "Electrode", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan",
               "Tangela", "Horsea", "Seadra", "Scyther", "Jynx", "Electabuzz", "Pinsir",
               "Magikarp", "Gyarados", "Snorlax", "Dragonair", "Dratini"}
local raros = {"Dragonite"} --alterado v1.5

local function ShinyName(cid)
   if isCreature(cid) then
       if string.find(tostring(getCreatureName(cid)), "Shiny") then
           local newName = tostring(getCreatureName(cid)):match("Shiny (.*)") 
           doCreatureSetNick(cid, newName)
           if isMonster(cid) then
               doSetCreatureDropLoot(cid, false) 
           end
       end
   end
end

local function doSetRandomGender(cid)
   if not isCreature(cid) then return true end
   if isSummon(cid) then return true end
   local gender = 0
   local name = getCreatureName(cid)
   if not newpokedex[name] then return true end
   local rate = newpokedex[name].gender
   if rate == 0 then
       gender = 3
   elseif rate == 1000 then
       gender = 4
   elseif rate == -1 then
       gender = 0
   elseif math.random(1, 1000) <= rate then
       gender = 4
   else
       gender = 3
   end
doCreatureSetSkullType(cid, gender)
end

local function doShiny(cid)
   if isCreature(cid) then
       if isSummon(cid) then return true end
       if getPlayerStorageValue(cid, 74469) >= 1 then return true end
       if getPlayerStorageValue(cid, 22546) >= 1 then return true end --alterado v1.7 -golden-
       if isNpcSummon(cid) then return true end

       local chance = 100 -- 100% chance
       local transform = false

       if isInArray(shinys, getCreatureName(cid)) or isInArray(raros, getCreatureName(cid)) then
           transform = math.random(1, math.ceil(100/chance)) == math.ceil(chance/100)
       else
           return true
       end 

       if transform then
           doSendMagicEffect(getThingPos(cid), 18)
           local shi = doCreateMonster("Shiny ".. getCreatureName(cid) .."", getThingPos(cid))
           setPlayerStorageValue(shi, 74469, 1)
           setPlayerStorageValue(cid, 74469, 1)
           doRemoveCreature(cid)
       else
           setPlayerStorageValue(cid, 74469, 1)
       end
   else 
       return true
   end
end

function onSpawn(cid)

   registerCreatureEvent(cid, "Experience")
   registerCreatureEvent(cid, "GeneralConfiguration")
   registerCreatureEvent(cid, "DirectionSystem")
   registerCreatureEvent(cid, "CastSystem")

   if isSummon(cid) then
       registerCreatureEvent(cid, "SummonDeath")
   return true
   end

   addEvent(doSetRandomGender, 5, cid)
   addEvent(doShiny, 10, cid)
   addEvent(ShinyName, 15, cid)
   addEvent(adjustWildPoke, 5, cid)

return true
end

Diigo · Maio 21, 2013

local function doShiny(cid)

if isCreature(cid) then

if isSummon(cid) then return true end

if getPlayerStorageValue(cid, 74469) >= 1 then return true end

if isNpcSummon(cid) then return true end

if isInArray(shinys, getCreatureName(cid)) then

transform = math.random(1, 100) -- <<<<<<<<<

elseif isInArray(raros, getCreatureName(cid)) then

transform = math.random(1, 100) --<<<<<<<<<

elseif not isInArray(raros, getCreatureName(cid)) and not isInArray(shinys, getCreatureName(cid)) then

return true

end

so deixar assim!

Bye ¬¬

Editado Maio 21, 2013 por Diigo

vital900 · Agosto 4, 2013

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

Stigal · Abril 21, 2018

A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.

Entrar

resolvido [Encerrado] Duvida Respawn Shiny's

Posts Recomendados

arkadioos 0

Link para o comentário

Compartilhar em outros sites

brun123 369

Link para o comentário

Compartilhar em outros sites

arkadioos 0

Link para o comentário

Compartilhar em outros sites

kttallan 318

Link para o comentário

Compartilhar em outros sites

brun123 369

Link para o comentário

Compartilhar em outros sites

Diigo 2

Link para o comentário

Compartilhar em outros sites

vital900 570

Link para o comentário

Compartilhar em outros sites

Stigal 584

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

script alguém pode me ajudar nessa spells aqui, queira que colocassem pro meu personagem ficar inatingível por 6 segundos e podendo atacar livremente

Object Builder 7.10 até 12.60 + AdobeAIR

Letreiro ao entrar em local

event Erro LineAnimation Snowball Event

Autoloot não stacka os items coletados

Fóruns

Tutoriais

Suporte