Ir para conteúdo

(Resolvido)[AJUDA] Scripts

Por xPollo
em Suporte Tibia OTServer (Resolvidos)

Featured Replies

Postado
  • Autor

No Shiny Stone:

local lvlmin = 100 -- level mínimo

local evo = {
--nome do shiny, qnts stones precisa
["Snorlax"] = {"Shiny Snorlax", 1},
["Clefable"] = {"Shiny Clefable", 1},
["Snorlax"] = {"Shiny Snorlax", 1},
["Gengar"] = {"Shiny Gengar", 1},
["Mew"] = {"Shiny Mew", 1},
["Mewtwo"] = {"Shiny Mewtwo", 1},
["Articuno"] = {"Shiny Articuno", 1},
["Moltres"] = {"Shiny Moltres", 1},
["Zapdos"] = {"Shiny Zapdos", 1},
["Snorlax"] = {"", 1},
["Aerodactyl"] = {"Shiny Aerodactyl", 1},
["Ninetales"] = {"Shiny Ninetales", 1},
["Raichu"] = {"Shiny Raichu", 1},
["Alakazam"] = {"Shiny Alakazam", 1},
["Venusaur"] = {"Shiny Venusaur", 1},
["Charizard"] = {"Shiny Charizard", 1},
["Blastoise"] = {"Shiny Blastoise", 1}, --alterado v2.4
["Butterfree"] = {"Shiny Butterfree", 1},
["Beedrill"] = {"Shiny Beedrill", 1},
["Pidgeot"] = {"Shiny Pidgeot", 1},
["Rattata"] = {"Shiny Rattata", 1},
["Raticate"] = {"Shiny Raticate", 1},
["Fearow"] = {"Shiny Fearow", 1},
["Omastar"] = {"Shiny Omastar", 1},
["Omanyte"] = {"Shiny Omanyte", 1},
["Nidoking"] = {"Shiny Nidoking", 1},
["Zubat"] = {"Shiny Zubat", 1},
["Golbat"] = {"Shiny Golbat", 1},
["Rhyperior"] = {"Shiny Rhyperior", 1},
["Onix"] = {"Shiny Onix", 1},
["Oddish"] = {"Shiny Oddish", 1},
["Vileplume"] = {"Shiny Vileplume", 1},
["Paras"] = {"Shiny Paras", 1},
["Parasect"] = {"Shiny Parasect", 1},
["Venonat"] = {"Shiny Venonat", 1},
["Venomoth"] = {"Shiny Venomoth", 1},
["Growlithe"] = {"Shiny Growlithe", 1},
["Arcanine"] = {"Shiny Arcanine", 1},
["Abra"] = {"Shiny Abra", 1},
["Tentacool"] = {"Shiny Tentacool", 1},
["Tentacruel"] = {"Shiny Tentacruel", 1},
["Golem"] = {"Shiny Golem", 1},
["Farfetch'd"] = {"Shiny Farfetch'd", 1},
["Grimer"] = {"Shiny Grimer", 1},
["Muk"] = {"Shiny Muk", 1},
["Hypno"] = {"Shiny Hypno", 1},
["Krabby"] = {"Shiny Krabby", 1},
["Kingler"] = {"Shiny Kingler", 1},
["Voltorb"] = {"Shiny Voltorb", 1},
["Electrode"] = {"Shiny Electrode", 1},
["Cubone"] = {"Shiny Cubone", 1},
["Marowak"] = {"Shiny Marowak", 1},
["Hitmonlee"] = {"Shiny Hitmonlee", 1},
["Hitmonchan"] = {"Shiny Hitmonchan", 1},
["Tangela"] = {"Shiny Tangela", 1},
["Horsea"] = {"Shiny Horsea", 1},
["Seadra"] = {"Shiny Seadra", 1},
["Scyther"] = {"Shiny Scyther", 1},
["Jynx"] = {"Shiny Jynx", 1},
["Electabuzz"] = {"Shiny Electabuzz", 1},
["Kabutops"] = {"Shiny Kabutops", 1},
["Kabuto"] = {"Shiny Kabuto", 1},
["Pinsir"] = {"Shiny Pinsir", 1},
["Magikarp"] = {"Shiny Magikarp", 1},
["Gyarados"] = {"Shiny Gyarados", 1},
["Vaporeon"] = {"Shiny Vaporeon", 1},
["Jolteon"] = {"Shiny Jolteon", 1},
["Flareon"] = {"Shiny Flareon", 1},
["Dratini"] = {"Shiny Dratini", 1},
["Dragonair"] = {"Shiny Dragonair", 1},
["Dragonite"] = {"Shiny Dragonite", 1},
["Wigglytuff"] = {"Shiny Wigglytuff", 1},
["Charmander"] = {"Shiny Charmander", 1},
["Metagross"] = {"Shiny Metagross", 1},
["Machamp"] = {"Shiny Machamp", 1},
}
local balls = {
[11826] = {newBall = 11826},
[11832] = {newBall = 11832},
[11835] = {newBall = 11835},
[11829] = {newBall = 11829},
}

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
if getLevel(itemEx.uid) < lvlmin then
if getPlayerItemCount(cid, item.itemid) >= evo[monster][2] then
doPlayerSendTextMessage(cid, 27, "Parabens! Seu "..getPokeName(itemEx.uid).." evoluiu para "..evo[monster][1].."!")
local health, maxHealth = getCreatureHealth(itemEx.uid), getCreatureMaxHealth(itemEx.uid)
doSendMagicEffect(getThingPos(itemEx.uid), 18)
doRemoveCreature(itemEx.uid)
doPlayerRemoveItem(cid, item.itemid, evo[monster][2]-1)
doRemoveItem(item.uid, 1)
doSummonMonster(cid,evo[monster][1])
local pokeball = getPlayerSlotItem(cid, 8)
doItemSetAttribute(pokeball.uid, "poke", evo[monster][1])
doItemSetAttribute(pokeball.uid, "level", pokes[evo[monster][1]].level)
doItemSetAttribute(ball, "hp", 1)
doItemSetAttribute(ball, "happy", 110)
local pk = getCreatureSummons(cid)[1]
adjustStatus(pk, pokeball.uid, true, false, true)
return TRUE
else
return doPlayerSendTextMessage(cid, 27, "You need atleast ".. evo[monster][2] .." stones to do it!")
end
else
    doPlayerSendCancel(cid, "Your pokemon is low level to use this item, "..lvlmin.." he needs at least level.")
return false
end
end
end
return FALSE
end

 

Teste assim o do Rare Candy.

    function onUse(cid, item, frompos, item2, topos)

if not isCreature(item2.uid) or not isSummon(item2.uid) then
doPlayerSendCancel(cid, "You can only give this candy to trainers pokemons.")
return true
end

if getCreatureMaster(item2.uid) ~= cid then
doPlayerSendCancel(cid, "You can only give this candy in yours pokemons.")
return true
end

if getCreatureHealth(item2.uid) == 0 then
return true
end
 
local pb = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
 
if getLevel(item2.uid) >= 100 then
doPlayerSendCancel(cid, "Seu pokemon esta no level maximo.")
return true
end
 
doPlayerSendTextMessage(cid, 27, "Você deu um rare candy ao "..getPokeName(item2.uid)..".")
 
doCreatureSay(cid, getPokeName(item2.uid)..", coma isso!", TALKTYPE_SAY)
doRemoveItem(item.uid, 1)
 
 
local level = getItemAttribute(pb.uid, "level")
local exp = getItemAttribute(pb.uid, "exp")
local neededexp = getItemAttribute(pb.uid, "nextlevelexp")
 
if getHappiness(item2.uid) < 50 then
doSendMagicEffect(getThingPos(item2.uid), 168)
return true
end
 
doCreatureSay(item2.uid, "Hummm", TALKTYPE_ORANGE_1)
doItemSetAttribute(pb.uid, "rarecandy", level + 1)
doItemSetAttribute(pb.uid, "exp", exp + neededexp)
doPlayerSendTextMessage(getCreatureMaster(item2.uid), 27, "Seu "..getPokeName(item2.uid).." comeu um Rare Candy!")
doSendFlareEffect(getThingPos(item2.uid))
doSendAnimatedText(getThingPos(item2.uid), "Upei XD!", 215)
adjustPokemonLevel(pb.uid, getCreatureMaster(item2.uid), pb.itemid, true)
 
return true
end

 

Boa sorte.

Não deu certo a Shiny Stone, continua evoluindo, a rare candy deu, vllw ai!

 

 

ta ae.

candy

function onUse(cid, item, frompos, item2, topos)

if not isCreature(item2.uid) or not isSummon(item2.uid) then

doPlayerSendCancel(cid, "Você só pode dar rare candy para pokemons.")

return true

end

if getCreatureHealth(item2.uid) == 0 then return true end

local pb = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)

if getLevel(item2.uid) >= 150 then

doPlayerSendCancel(cid, "Seu pokemon não pode subir mais leveis com essa candy.")

return true

end

local e = getCreatureMaster(cid)

if isSummon(item2.uid) and getCreatureName(item2.uid) == "Evolution" then

doPlayerSendCancel(cid, "Seu pokemon está evoluindo!")

return true

end

doPlayerSendTextMessage(cid, 27, "Você deu uma rare candy para "..getPokeName(item2.uid)..".")

doCreatureSay(cid, getPokeName(item2.uid)..", eat this candy!", TALKTYPE_SAY)

doRemoveItem(item.uid, 1)

local level = getItemAttribute(pb.uid, "level")

local exp = getItemAttribute(pb.uid, "exp")

local neededexp = getItemAttribute(pb.uid, "nextlevelexp")

if getHappiness(item2.uid) < 50 then

doSendMagicEffect(getThingPos(item2.uid), 168)

return true

end

doCreatureSay(item2.uid, "Yum.", TALKTYPE_ORANGE_1)

doItemSetAttribute(pb.uid, "rarecandy", level + 1)

doItemSetAttribute(pb.uid, "exp", exp + neededexp)

doPlayerSendTextMessage(getCreatureMaster(item2.uid), 27, "Seu "..getPokeName(item2.uid).." comeu uma rare candy!")

doSendFlareEffect(getThingPos(item2.uid))

doSendAnimatedText(getThingPos(item2.uid), "Level up!", 215)

adjustPokemonLevel(pb.uid, getCreatureMaster(item2.uid), pb.itemid, true)

return true

end

 

shiny stone

local evo = {

--nome do shiny, qnts stones precisa

["Snorlax"] = {"Shiny Snorlax", 1},

["Clefable"] = {"Shiny Clefable", 1},

["Snorlax"] = {"Shiny Snorlax", 1},

["Gengar"] = {"Shiny Gengar", 1},

["Mew"] = {"Shiny Mew", 1},

["Mewtwo"] = {"Shiny Mewtwo", 1},

["Articuno"] = {"Shiny Articuno", 1},

["Moltres"] = {"Shiny Moltres", 1},

["Zapdos"] = {"Shiny Zapdos", 1},

["Snorlax"] = {"", 1},

["Aerodactyl"] = {"Shiny Aerodactyl", 1},

["Ninetales"] = {"Shiny Ninetales", 1},

["Raichu"] = {"Shiny Raichu", 1},

["Alakazam"] = {"Shiny Alakazam", 1},

["Venusaur"] = {"Shiny Venusaur", 1},

["Charizard"] = {"Shiny Charizard", 1},

["Blastoise"] = {"Shiny Blastoise", 1}, --alterado v2.4

["Butterfree"] = {"Shiny Butterfree", 1},

["Beedrill"] = {"Shiny Beedrill", 1},

["Pidgeot"] = {"Shiny Pidgeot", 1},

["Rattata"] = {"Shiny Rattata", 1},

["Raticate"] = {"Shiny Raticate", 1},

["Fearow"] = {"Shiny Fearow", 1},

["Omastar"] = {"Shiny Omastar", 1},

["Omanyte"] = {"Shiny Omanyte", 1},

["Nidoking"] = {"Shiny Nidoking", 1},

["Zubat"] = {"Shiny Zubat", 1},

["Golbat"] = {"Shiny Golbat", 1},

["Rhyperior"] = {"Shiny Rhyperior", 1},

["Onix"] = {"Shiny Onix", 1},

["Oddish"] = {"Shiny Oddish", 1},

["Vileplume"] = {"Shiny Vileplume", 1},

["Paras"] = {"Shiny Paras", 1},

["Parasect"] = {"Shiny Parasect", 1},

["Venonat"] = {"Shiny Venonat", 1},

["Venomoth"] = {"Shiny Venomoth", 1},

["Growlithe"] = {"Shiny Growlithe", 1},

["Arcanine"] = {"Shiny Arcanine", 1},

["Abra"] = {"Shiny Abra", 1},

["Tentacool"] = {"Shiny Tentacool", 1},

["Tentacruel"] = {"Shiny Tentacruel", 1},

["Golem"] = {"Shiny Golem", 1},

["Farfetch'd"] = {"Shiny Farfetch'd", 1},

["Grimer"] = {"Shiny Grimer", 1},

["Muk"] = {"Shiny Muk", 1},

["Hypno"] = {"Shiny Hypno", 1},

["Krabby"] = {"Shiny Krabby", 1},

["Kingler"] = {"Shiny Kingler", 1},

["Voltorb"] = {"Shiny Voltorb", 1},

["Electrode"] = {"Shiny Electrode", 1},

["Cubone"] = {"Shiny Cubone", 1},

["Marowak"] = {"Shiny Marowak", 1},

["Hitmonlee"] = {"Shiny Hitmonlee", 1},

["Hitmonchan"] = {"Shiny Hitmonchan", 1},

["Tangela"] = {"Shiny Tangela", 1},

["Horsea"] = {"Shiny Horsea", 1},

["Seadra"] = {"Shiny Seadra", 1},

["Scyther"] = {"Shiny Scyther", 1},

["Jynx"] = {"Shiny Jynx", 1},

["Electabuzz"] = {"Shiny Electabuzz", 1},

["Kabutops"] = {"Shiny Kabutops", 1},

["Kabuto"] = {"Shiny Kabuto", 1},

["Pinsir"] = {"Shiny Pinsir", 1},

["Magikarp"] = {"Shiny Magikarp", 1},

["Gyarados"] = {"Shiny Gyarados", 1},

["Vaporeon"] = {"Shiny Vaporeon", 1},

["Jolteon"] = {"Shiny Jolteon", 1},

["Flareon"] = {"Shiny Flareon", 1},

["Dratini"] = {"Shiny Dratini", 1},

["Dragonair"] = {"Shiny Dragonair", 1},

["Dragonite"] = {"Shiny Dragonite", 1},

["Wigglytuff"] = {"Shiny Wigglytuff", 1},

["Charmander"] = {"Shiny Charmander", 1},

["Metagross"] = {"Shiny Metagross", 1},

["Machamp"] = {"Shiny Machamp", 1},

}

local balls = {

[11826] = {newBall = 11826},

[11832] = {newBall = 11832},

[11835] = {newBall = 11835},

[11829] = {newBall = 11829},

}

function onUse(cid, item, fromPosition, itemEx, toPosition)

if getLevel(item2.uid) < 100 then

doPlayerSendCancel(cid, "Seu pokemon ainda não pode evoluir para Shiny , somente level 100..")

return true

end

if isMonster(itemEx.uid) and getCreatureMaster(itemEx.uid) == cid then

local monster = getCreatureName(itemEx.uid)

if evo[monster] then

if getPlayerItemCount(cid, item.itemid) >= evo[monster][2] then

doPlayerSendTextMessage(cid, 27, "Parabens! Seu "..getPokeName(itemEx.uid).." evoluiu para "..evo[monster][1].."!")

local health, maxHealth = getCreatureHealth(itemEx.uid), getCreatureMaxHealth(itemEx.uid)

doSendMagicEffect(getThingPos(itemEx.uid), 18)

doRemoveCreature(itemEx.uid)

doPlayerRemoveItem(cid, item.itemid, evo[monster][2]-1)

doRemoveItem(item.uid, 1)

doSummonMonster(cid,evo[monster][1])

local pokeball = getPlayerSlotItem(cid, 8)

doItemSetAttribute(pokeball.uid, "poke", evo[monster][1])

doItemSetAttribute(pokeball.uid, "level", pokes[evo[monster][1]].level)

doItemSetAttribute(ball, "hp", 1)

doItemSetAttribute(ball, "happy", 110)

local pk = getCreatureSummons(cid)[1]

adjustStatus(pk, pokeball.uid, true, false, true)

return TRUE

else

return doPlayerSendTextMessage(cid, 27, "You need atleast ".. evo[monster][2] .." stones to do it!")

end

end

end

return FALSE

end

 

Não deu certo a Shiny Stone, ele não evolui..

                                                                                           SE TE AJUDEI CLICA EM  :accept:, NÃO CUSTA NADA  ;D 

Atenciosamente

     xPollo                                         

Da Play No Reggaezin Ai Boy

http://www.mjbstudio.com/myspace/mjb_playlist/jamming.mp3
 

  • Citar
  • Mention
    • Respostas 19
    • Visualizações 727
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Most Popular Posts

    Postado

    Não da erro, não executa nenhuma mensagem?

    Gosta do meu trabalho?

    Curta e siga a página do meu projeto de 2016 e 2017 (Lab Z Games) que trará vários servidores OTServs.

     

    Atenciosamente,
    Adriano Swatt'

     

    Para ver meus tutoriais acesse meu perfil.

     

    cbCyOSZ.png

  • Citar
  • Mention
    • Postado
    • Autor

    Não executa nenhuma mensagem, erro na onde?

                                                                                               SE TE AJUDEI CLICA EM  :accept:, NÃO CUSTA NADA  ;D 

    Atenciosamente

         xPollo                                         

    Da Play No Reggaezin Ai Boy

    http://www.mjbstudio.com/myspace/mjb_playlist/jamming.mp3
     

  • Citar
  • Mention
    • Postado

    Meus trabalhos  :rock: 

    °Pacote de shinys da 3ª e 4ª geração

    http://www.tibiaking.com/forum/topic/37128-patch-pokemons-shinys-3%C2%AA-e-alguns-da-4%C2%AA-gera%C3%A7%C3%A3o/

    °Como criar novos pokemons no pda

    http://www.tibiaking.com/forum/topic/37546-tutorial-como-criar-novos-pokemons-para-seu-servidor/#entry212787

    °Script de boost stone do otpokemon
    http://www.tibiaking.com/forum/topic/37849-action-script-de-boost-stone-parecido-com-otpokemon/

    °Fly só para vips
    http://www.tibiaking.com/forum/topic/40868-poketibia-fly-para-vips/

  • Citar
  • Mention
    • Postado

    xD...conseguiu arrumar ja.

    Editado por kbpaulo (veja o histórico de edições)


    Meus topicos.
    [Gesior]Layout pokemon vrs1.0
    [854]OtServer Digimon Vrs.1.1

     

    Spoiler

    http://free.timeanddate.com/countdown/i48ub0vi/n213/cf11/cm0/cu4/ct0/cs0/ca0/cr0/ss0/cac009/cpc000/pcf90/tcfff/fs100/szw448/szh189/tatTempo%20Para%20Resetar/tac000/tptDigimon%20World%20Cerberus%20Online/tpc000/matDigimon%20World%20Cerberus%20Online/mac000/mptEstá%20Online%20à/mpc000/iso2014-07-19T00:01:00/bas3/bat8/bac00f/pa3
     


    32227_6.png

    Meu Servidor Digimon World Cerberus Online
    Digimon World Cerberus Online
    Agradecer sempre a todos que ajudaram, o server a ficar pronto
    deis de Sprites que não conheço,scripts, etc....como o jogo
    esta na internet e para todos usarem vlw a todos bjus...

  • Citar
  • Mention

    • 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
    Ir para a lista de tópicos

    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

    I accept