Postado Maio 16, 2015 10 anos http://www.tibiaking.com/forum/topic/48032-nome-shiny-n%C3%A3o-aparece/ 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
Postado Maio 16, 2015 10 anos 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 Maio 16, 2015 10 anos 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?
Postado Maio 16, 2015 10 anos Autor sou esses quer eu citei Editado Maio 16, 2015 10 anos por 345sat (veja o histórico de edições)
Postado Maio 16, 2015 10 anos testa ae, o script e para acontecer assim: - Voce ta la na hunt de Gloom e do nada o Gloom (Se Transforma) e Vira Red Gloom, - Esse Gloom Pode Virar Shiny (0.1 %) de Apariçao e Red (5%) de Apariçao! Editado Maio 16, 2015 10 anos por Nextbr (veja o histórico de edições)
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.