Erro ao abrir o distro

Marcos VMA · Agosto 9, 2019

Alguem poderia me ajudar a arrumar esse erro Se puder agradeço muito (não sei mecher em nadaaa)

Boa tarde a todos !!

Marshmello · Agosto 10, 2019

Manda todo seu script do Spawn.lua Pf

Marcos VMA · Agosto 10, 2019

2 horas atrás, Marshmello disse:

Manda todo seu script do Spawn.lua Pf

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 = 1 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 2.0 --0.5% 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

Aki esta amigo

Marshmello · Agosto 11, 2019

Da uma testada , mais sepa n e nem erro do spawn.lua

Spoiler

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 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 = 1 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 2.0 --0.5% 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(adjustWildPoke, 5, cid)

return true
end

Marcos VMA · Agosto 11, 2019

13 horas atrás, Marshmello disse:

Da uma testada , mais sepa n e nem erro do spawn.lua

Mostrar conteúdo oculto

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 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 = 1 --1% chance
elseif isInArray(raros, getCreatureName(cid)) then --n coloquem valores menores que 0.1 !!
chance = 2.0 --0.5% 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(adjustWildPoke, 5, cid)

return true
end

Deu isso ai agr

Entrar

Erro ao abrir o distro

Pergunta

Marcos VMA 6

Link para o comentário

Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

Marshmello 270

Link para o comentário

Compartilhar em outros sites

Marcos VMA 6

Link para o comentário

Compartilhar em outros sites

Marshmello 270

Link para o comentário

Compartilhar em outros sites

Marcos VMA 6

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Fóruns

Tutoriais

Suporte