if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/ chance = 0.3 elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !! chance = 0.1 else return true end
if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/ chance = 0.3 elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !! chance = 0.1 else return true end
info
Grupo: Artesão
Registrado: 22/07/11
Posts: 101
Reputação: +3
Gênero: Masculino
Char no Tibia: Clode

Valeuuu mais tu sabe mais ou menos esse 0.3 sei la a cada quantos pokemons tem a chance de um ser shiny mais ou menos ??
Tenho que ver o resto da script pra ver como é feito o calculo
info
Grupo: Artesão
Registrado: 22/07/11
Posts: 101
Reputação: +3
Gênero: Masculino
Char no Tibia: Clode

1 hora atrás, alonygrb disse:Tenho que ver o resto da script pra ver como é feito o calculo
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", "Tangela", "Horsea", "Seadra", "Scyther", "Jynx", "Electabuzz", "Pinsir",
"Magikarp", "Gyarados", "Snorlax", "Dragonair", "Machamp", "Dratini", "Feraligatr", "Typhlosion", "Meganium", "Ampharos", "Tauros", "Xatu", "Rhydon", "Crobat", "Magmar", "Pupitar", "Stantler", "Umbreon", "Mr. Mime", "Magneton", "Ariados", "Dodrio", "Ninetales", "Espeon", "Magby", "Dragonite"}
local raros = {"Ditto"}
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
if isNpcSummon(cid) then return true end
if getPlayerStorageValue(cid, 637500) >= 1 then return true end --alterado v1.9
if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/
chance = 2 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 1 --1% chance
else
return true
end
if math.random(1, 1000) <= chance*10 then
doSendMagicEffect(getThingPos(cid), 18)
local name, pos = "Shiny ".. getCreatureName(cid), getThingPos(cid)
doRemoveCreature(cid)
local shi = doCreateMonster(name, pos, false)
setPlayerStorageValue(shi, 74469, 1)
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
info
Grupo: Herói
Registrado: 28/11/10
Posts: 3.4k
Reputação: +585
Gênero: Masculino

info
Grupo: Artesão
Registrado: 22/07/11
Posts: 101
Reputação: +3
Gênero: Masculino
Char no Tibia: Clode
Estou com uma duvida e queria uma ajuda ate na script.
Eu queria uma ajuda pra saber um numero bom pra min coloca no sistema de shiny pois oque eu coloquei que foi 2 como esta na script ainda sim nasce muito pokemon shiny facil, queria deixa algo nao tao dificil porem nao facil um valor bom pra nascer shiny.
SCRIPT
if isInArray(shinys, getCreatureName(cid)) then --alterado v1.9 \/
chance = 2 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 1 --1% chance
else
return true
end
Oque postei foi so a parte do shiny e raro dos pokemon.
Quem puder da uma ajuda REP+++
Editado Junho 14 por Stigal