Ola Pesoal vou mandar ae para vcs meus scripts
sao quebra galho
primeiro script
key of shiny va na pasta actions scripts depois copie um bloco de notas
renomei o bloco por esse nome Key Of Shiny e coloque isso dentro
local evo = {
["Abra"] = "shiny abra",
["Arcanine"] = "shiny arcanine",
["Scyther"] = "shiny Scyther",
["Electabuzz"] = "shiny electabuzz",
["Hitmonlee"] = "shiny hitmonlee",
["Blastoise"] = "shiny blastoise",
["Onix"] = "Crystal Onix",
["Hitmonchan"] = "shiny hitmonchan",
["Raichu"] = "shiny raichu",
["shiny magikarp"] = "red gyarados",
["Zubat"] = "shiny zubat",
["Venusaur"] = "shiny venusaur",
["Raichu"] = "shiny Raichu",
["Dratini"] = "shiny dratini",
["Seadra"] = "shiny seadra",
["Grimer"] = "shiny grimer",
["Charizard"] = "Elder charizard",
["Tentacool"] = "shiny tentacool",
["Tentacruel"] = "shiny tentacruel",
["Voltorb"] = "shiny voltorb",
["Venomoth"] = "shiny venomoth",
["Rattata"] = "shiny rattata",
["Raticate"] = "shiny raticate",
["Paras"] = "shiny paras",
["Parasect"] = "shiny parasect",
["Krabby"] = "shiny krabby",
["Kingler"] = "shiny kingler",
["Horsea"] = "shiny horsea",
["Butterfree"] = "shiny butterfree",
["Electrode"] = "shiny electrode",
["Farfetchd"] = "shiny farfetchd",
["Psyduck"] = "Cristiman Psyduck",
[""] = "",
[""] = "",
}
local pokeballs = {
[2531] = {"Pokeball"},
[2557] = {"Superball"},
[2524] = {"Greatball"},
[2525] = {"Ultraball"},
[2523] = {"Masterball"},
}
function onUse(cid, item, fromPosition, itemEx, toPosition)
if isMonster(itemEx.uid) and getCreatureMaster(itemEx.uid) == cid then
local monster = getCreatureName(itemEx.uid)
if evo[monster] then
local health, maxHealth = getCreatureHealth(itemEx.uid), getCreatureMaxHealth(itemEx.uid)
doRemoveCreature(itemEx.uid)
doRemoveItem(item.uid)
local summon = doCreateMonster(evo[monster], toPosition)
doConvinceCreature(cid, summon)
local balls = pokeballs[getPlayerSlotItem(cid,8).itemid]
doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "name", ""..evo[monster].." "..balls[1])
doCreatureAddHealth(summon, health-maxHealth)
doSendMagicEffect(getThingPos(summon), 18)
return TRUE
end
end
return FALSE
end
Depois va em actios xml e coloque isso
<action itemid="2091" event="script" allowfaruse="10" value="stones/Key of Shiny.lua"/>
.....................
agora proximo script
nome key of name vai em actions scripts copie um bloco
e renomei para Key Of Name
coloque isso dentro
local evo = {
["Elder Charizard"] = "Armagedon",
["Golduck"] = "Shiny Patolino",
["Tentacruel"] = "Dj.Cruel",
["Golem"] = "War Golem",
["Snorlax"] = "Seu Barriga",
["Arcanine"] = "Dog",
["Electabuzz"] = "Buzz Laitir",
["Hitmonlee"] = "Montal Conbat",
["Hitmonchan"] = "Soco Fodao",
["Venusaur"] = "Sapo",
["Ninetales"] = "Kilbi",
["Scyther"] = "Laminas Destruidoras",
["Pidgeot"] = "Pardal",
["Lickitung"] = "Linguinha",
["Gyarados"] = "Cobra Da Agua",
["Mr.Mime"] = "Mestre",
["Alakazam"] = "UltraZam",
["Aerodactyl"] = "Pedra voadora",
["Fearow"] = "Urubu",
["Mewtwo"] = "PokeMaster",
["Porygon"] = "Latao Voador",
["Chansey"] = "Gorda",
["Charizard"] = "Dragao",
["Ditto"] = "Amoeba",
["Wigglytuff"] = "WarTuff",
["Magmar"] = "Vulcao",
["Raichu"] = "Raio",
["Articuno"] = "Passaro Azul",
["Lapras"] = "Latios",
["Dragonite"] = "Dragao Da Nait",
["Cristman Psyduck"] = "PsyNatalino",
["Vaporeon"] = "CaoAquatico",
["Tauros"] = "TorrOLokoo",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
}
local pokeballs = {
[2531] = {"Pokeball"},
[2557] = {"Superball"},
[2524] = {"Greatball"},
[2525] = {"Ultraball"},
[2523] = {"Masterball"},
}
function onUse(cid, item, fromPosition, itemEx, toPosition)
if isMonster(itemEx.uid) and getCreatureMaster(itemEx.uid) == cid then
local monster = getCreatureName(itemEx.uid)
if evo[monster] then
local health, maxHealth = getCreatureHealth(itemEx.uid), getCreatureMaxHealth(itemEx.uid)
doRemoveCreature(itemEx.uid)
doRemoveItem(item.uid)
local summon = doCreateMonster(evo[monster], toPosition)
doConvinceCreature(cid, summon)
local balls = pokeballs[getPlayerSlotItem(cid,8).itemid]
doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "name", ""..evo[monster].." "..balls[1])
doCreatureAddHealth(summon, health-maxHealth)
doSendMagicEffect(getThingPos(summon), 18)
return TRUE
end
end
return FALSE
end
agora abra o actions xml
<action itemid="2088" event="script" allowfaruse="10" value="stones/Key Of Name.lua"/>
No meu server esse key of name e uma chave que vc coloca o nome do pokemon
eu fiz pra ser sopara vips
agora vamos para o proximo script
va em actions scripts copie um bloco renomei para Master Key
local evo = {
["Electabuzz"] = "Elekid",
["Magmar"] = "Magby",
["Hitmonlee"] = "Tyrogue",
["Hitmonchan"] = "Tyrogue",
["Pikachu"] = "Pichu",
[""] = "",
[""] = "",
[""] = "",
[""] = "",
}
local pokeballs = {
[2531] = {"Pokeball"},
[2557] = {"Superball"},
[2524] = {"Greatball"},
[2525] = {"Ultraball"},
[2523] = {"Masterball"},
}
function onUse(cid, item, fromPosition, itemEx, toPosition)
if isMonster(itemEx.uid) and getCreatureMaster(itemEx.uid) == cid then
local monster = getCreatureName(itemEx.uid)
if evo[monster] then
local health, maxHealth = getCreatureHealth(itemEx.uid), getCreatureMaxHealth(itemEx.uid)
doRemoveCreature(itemEx.uid)
doRemoveItem(item.uid)
local summon = doCreateMonster(evo[monster], toPosition)
doConvinceCreature(cid, summon)
local balls = pokeballs[getPlayerSlotItem(cid,8).itemid]
doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "name", ""..evo[monster].." "..balls[1])
doCreatureAddHealth(summon, health-maxHealth)
doSendMagicEffect(getThingPos(summon), 18)
return TRUE
end
end
return FALSE
end
agora va em actions xml e escreva isso dentro
<action itemid="2089" event="script" allowfaruse="10" value="stones/Master Key.lua"/>
esta stone faz prea que vc destrans forme o (electabuzz no elekid)o(magmar no magby)o (raichu no pichu)
E isso ae pessoal so oq eu tenho espero que vcs usen bem esses scripts e que eles ajuden seu server a se aprimorar
emquanto as pessoas que tem os scripts sertos nao postem
Obrigado xtibia
Gosto +Rep
Nao Gosto (Pelomenos Paro Para Olhar)
e isso ae munto Obrigado
'