23 horas atrás, marmita2 disse:Versão do Servidor:Tipo de Script: creaturescriptCódigo:local shinys = {""} local raros = {"Lucario", "Gyarados", "Gengar", "Blaziken", "Blastoise", "Beedrill", "Alakazam", "Charizard"} local function MegaName(cid) if isCreature(cid) then if string.find(tostring(getCreatureName(cid)), "Mega") then local newName = tostring(getCreatureName(cid)):match("Mega (.*)") doCreatureSetNick(cid, newName) if isMonster(cid) then doSetCreatureDropLoot(cid, true) 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 == 500 then gender = 4 elseif rate == -1 then gender = 0 elseif math.random(1, 500) <= rate then gender = 4 else gender = 3 end doCreatureSetSkullType(cid, gender) end local function doMega(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(megas, getCreatureName(cid)) then --alterado v1.9 \/ chance = 2.0 --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, 500) <= chance*10 then doSendMagicEffect(getThingPos(cid), 18) local name, pos = "Mega ".. 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(doMega, 10, cid) addEvent(MegaName, 15, cid) addEvent(adjustWildPoke, 5, cid) return true endGalera estou querendo que o mega spawna aleatório. tentei adaptar o spaw.lua e deixei assim porem não esta spawnando. alguem poderia me falar se é erro no codigo,
pois não for, ele não deve estar para spawnar
Mas a chance está baixa, talvez não tenha nascido porque a chance está pouca. Aumenta para 100 para testar e me fala se ainda não nasce.





info
Grupo: Campones
Registrado: 24/02/19
Posts: 30
Reputação: +1
Galera estou querendo que o mega spawna aleatório. tentei adaptar o spaw.lua e deixei assim porem não esta spawnando. alguem poderia me falar se é erro no codigo,
pois não for, ele não deve estar para spawnar