Ir para conteúdo

Featured Replies

Postado

Ando devagar, porque já tive pressa. E levo esse sorriso, porque já chorei demais...

________________________________________________________________________________

Minhas Sprites:

Mega Metagross

Mega Abomasnow

Pack de Shinys

[Posso atualizá-lo com novos shinys a qualquer momento]

Tutoriais:

[Completo] Criando e adicionando um novo Pokémon

[Actions] Criando quest no RME

Editores Lua/Xml/Sync Entre outros:

Editores Win/Mac/Linux

  • Respostas 15
  • Visualizações 1.4k
  • Created
  • Última resposta

Top Posters In This Topic

Most Popular Posts

Postado
  • Autor

 Nextbr

[16/05/2015 14:05:23] [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/spawn.lua:65: ')' expected near 'Red'

[16/05/2015 14:05:23] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/spawn.lua)
[16/05/2015 14:05:23] data/creaturescripts/scripts/spawn.lua:65: ')' expected near 'Red'
 
ESTA DANDO ESSE ERROR NA DISTRO

 Nextbr

[16/05/2015 14:05:23] [Error - LuaScriptInterface::loadFile] data/creaturescripts/scripts/spawn.lua:65: ')' expected near 'Red'

[16/05/2015 14:05:23] [Warning - Event::loadScript] Cannot load script (data/creaturescripts/scripts/spawn.lua)
[16/05/2015 14:05:23] data/creaturescripts/scripts/spawn.lua:65: ')' expected near 'Red'
 
ESTA DANDO ESSE ERROR NA DISTRO
Postado

local PokemonRed = {


"Metapod","Gloom" ,"Haunter","Dratini",
}
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 RedName(cid)
if isCreature(cid) then
if string.find(tostring(getCreatureName(cid)), "Red") then
local newNameRed = tostring(getCreatureName(cid)):match("Red (.*)")
doCreatureSetNick(cid, newNameRed)
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 isNpcSummon(cid) then return true end
if isInArray(shinys, getCreatureName(cid)) then
transform = math.random(1, 1000) --0.1% chance
if isInArray(PokemonRed, getCreatureName(cid)) then
transformar = math.random(50, 1000) -- 5 % ALTERA A CHANCE DE APARECER
elseif isInArray(raros, getCreatureName(cid)) then
transform = math.random(1, 1000) --0.1% chance
elseif not isInArray(raros, getCreatureName(cid)) and not isInArray(PokemonRed, getCreatureName(cid)) and not isInArray(shinys, getCreatureName(cid)) then
return true
end
if transformar == 10 then
doSendMagicEffect(getThingPos(cid), 18)
local Red = doCreateMonster("Red ".. getCreatureName(cid) .."", getThingPos(cid))
setPlayerStorageValue(Red, 74469, 1)
setPlayerStorageValue(cid, 74469, 1)
doRemoveCreature(cid)
else
setPlayerStorageValue(cid, 74469, 1)
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
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(RedName, 15, cid)
addEvent(adjustWildPoke, 5, cid)

return true
end

- Voce quer que troque o Nome Shiny para Nome Red? ou Somente alguns Pokemons que voce Citou?


 

 

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

Quem Está Navegando 0

  • Nenhum usuário registrado visualizando esta página.

Estatísticas dos Fóruns

  • Tópicos 96.9k
  • Posts 519.7k

Informação Importante

Confirmação de Termo