Eu gostaria de um Script de quando Nascesse (Spawnasse) Um pokemon anunciasse no servidor em vermelho !

 

Rep+ and Best answer

Qual a base do seu servidor? Possui as sources? É possível fazer isto usando onSpawn.

O Meu é PDA sem Sources  ;-; !

Pode postar o conteúdo do arquivo spawn.lua (data/creaturescripts/scripts)?

Sim aki esta

 

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"}                               

 

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 = 6    --1% chance        

elseif isInArray(raros, getCreatureName(cid)) then   --n coloquem valores menores que 0.1 !!

   chance = 6   --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