[Encerrado] [Pokemon] Dúvidas? - Pda

kledstonsk8 · Março 17, 2012

Niguem pode me ajuda na parada do food?

Hikigaya · Março 17, 2012

local a = {
[11638] = {level = {9, 10}, balltype = "normal",
    pokemons = {"Slowpoke", "Magnemite", "Doduo", "Seel", "Grimer", "Gastly", "Droowze",
    "Spearow", "Bulbasaur", "Charmander", "Squirtle", "Butterfree", "Beedrill", "Metapod", "Kakuna", "Pidgeotto", "Raticate",
    "Ekans", "Abra", "Mankey", "Psyduck", "Pikachu", "Sandshrew", "Zubat", "Diglett", "Venonat", "Meowth", "Poliwag", "Growlithe", "Machop", "Weepinbell" "Ponyta", "Geodude"}},
[11639] = {level = {44, 45}, balltype = "super",
    pokemons = {"clefairy", "Omanyte", "Kabuto", "Arbok", "Raichu", "Nidorina",
    "Nidorino", "Dodrio", "Muk", "Golbat", "Gloom", "Parasect", "Venomoth", "Dugtrio", "Persian",
    "Golbat", "Clefairy", "Jigglypuff", "Venonat", "Sandshrew", "Vulpix", "Meowth", "Persian", "Psyduck", "Mankey",
    "Poliwhirl", "Victreebel", "Machoke", "Graveler", "Slowbro", "Magnetom", "Geodude", "Farfetch'd", "Haunter", "Kingler",
    "Electrode", "Weezing", "Rhyhorn", "Seadra", "jigglypuff", "Seaking", "Tauros", "Starmie", "Eevee", "Dratini", "Charmeleon",
    "Wartortle", "Ivysaur"}},
[11640] = {level = {59, 60}, balltype = "great",
    pokemons = {"Pidgeot", "Fearow", "Sandslash", "Ninetales", "Vileplume", "Primeape", "Golduck",
    "Kadabra", "Rapidash", "Clefable", "Wigglytuff", "Dewgong", "Onix", "Cloyster", "Hypno", "Exeggutor",
    "Marowak", "Hitmonlee", "Hitmonchan", "Lickitung", "Chansey", "Tangela", "Mr. Mime", "Pinsir", "Vaporeon", "Jolteon",
    "Hypno", "Dragonair", "Porygon"}},

[11641] = {level = {80, 100}, balltype = "ultra",
    pokemons = {"Shiny Hitmonchan", "Shiny Hitmonlee", "Shiny Abra", "Dragonite", "Snorlax", "Kabutops", "Omastar",
    "Ditto", "Lapras", "Gyarados", "Magmar", "Electabuzz", "Jynx", "Scyther", "Kangaskhan", "Golem", "Venusaur",
    "Machamp", "Poliwrath", "Arcanine", "Nidoking", "Nidoqueen", "Charizard", "Blastoise", "Alakazam", "Gengar", "Rhydon",
    "Tentacruel"}}
}[/i][/b]
[b][i]local extrastrength = 1.1	    [/i][/b]

[b][i]function onUse(cid, item, frompos, item2, topos)
	 local b = a[item.itemid]								   
		   if not b then return true end
	 local pokemon = b.pokemons[math.random(#b.pokemons)]
	 local pokeinfo = getPokemonStatus(pokemon)
		   if not pokeinfo then return true end
	 local btype = b.balltype
		   if not pokeballs[btype] then return true end
	 local gender = getRandomGenderByName(pokemon)
	 local level = math.random(b.level[1], b.level[2])
	 local offense = pokeinfo.off * level * extrastrength
	 local defense = pokeinfo.def * level * extrastrength
	 local agility = pokeinfo.agi * level * extrastrength
	 local spatk = pokeinfo.spatk * level * extrastrength
  local vit = pokeinfo.vit * level * extrastrength
	 local happy = 180
	 local leveltable = getPokemonExperienceTable(pokemon)

	 local ball = 0
	 local sendToDepot = false 
 if getCreatureMana(cid) >= 6 then
		   sendToDepot = true
		   ball = doCreateItemEx(2219)
	 else
		   ball = item.uid
	 end 

	   doItemSetAttribute(ball, "poke", pokemon)
	   doItemSetAttribute(ball, "hp", 1)
	   doItemSetAttribute(ball, "level", level)
	   doItemSetAttribute(ball, "exp", leveltable[level])
	   doItemSetAttribute(ball, "nextlevelexp", leveltable[level+1] - leveltable[level])
	   doItemSetAttribute(ball, "offense", offense)
 doItemSetAttribute(ball, "defense", defense)
 doItemSetAttribute(ball, "speed", agility)
 doItemSetAttribute(ball, "vitality", vit)
 doItemSetAttribute(ball, "specialattack", spatk)
 doItemSetAttribute(ball, "happy", happy)
 doItemSetAttribute(ball, "gender", gender)
 doItemSetAttribute(ball, "description", "Contains a "..pokemon..".")
 doItemSetAttribute(ball, "fakedesc", "Contains a "..pokemon..".")   

	 doPlayerSendTextMessage(cid, 27, "You opened a pokemon prize box +"..item.itemid - (11637).."!")
  doPlayerSendTextMessage(cid, 27, "The prize pokemon was a "..pokemon.." (level "..level.."), congratulations!")

  if sendToDepot then
	    doPlayerSendMailByName(getCreatureName(cid), ball, 1)
	    doTransformItem(ball, pokeballs[btype].on)
	 doPlayerSendTextMessage(cid, 27, "You are already holding six pokemons, so your new pokemon was sent to your depot.")
		   doRemoveItem(item.uid)
	 else
		   doTransformItem(ball, pokeballs[btype].on)
  end

  doSendMagicEffect(getThingPos(cid), 29)
return true[/i][/b]
[b][i]end

@All

Alguem Poderia Arrumar Minhas Box's

Eu Simplesmente Adc + Pokes Nelas Igual do PxG Agr ela n abre +

Editado Março 17, 2012 por uchiha1madara

Slicer · Março 17, 2012

@kledstonsk8

achu q ngm sabe mexer muito bem nesse sistema de food do brun.. ;x

@uchiha1madara

mano aprende a usa spoiler PLZZZZZZZZZZ... ta ae o script arrumado.. anyway, soh pra tu saber.. tu soh tinha esquecido uma "," perto da "ponyta"...

local a = {

[11638] = {level = {9, 10}, balltype = "normal",

pokemons = {"Slowpoke", "Magnemite", "Doduo", "Seel", "Grimer", "Gastly", "Droowze",

"Spearow", "Bulbasaur", "Charmander", "Squirtle", "Butterfree", "Beedrill", "Metapod", "Kakuna", "Pidgeotto", "Raticate",

"Ekans", "Abra", "Mankey", "Psyduck", "Pikachu", "Sandshrew", "Zubat", "Diglett", "Venonat", "Meowth", "Poliwag", "Growlithe", "Machop", "Weepinbell", "Ponyta", "Geodude"}

},

[11639] = {level = {44, 45}, balltype = "super",

pokemons = {"clefairy", "Omanyte", "Kabuto", "Arbok", "Raichu", "Nidorina",

"Nidorino", "Dodrio", "Muk", "Golbat", "Gloom", "Parasect", "Venomoth", "Dugtrio", "Persian",

"Golbat", "Clefairy", "Jigglypuff", "Venonat", "Sandshrew", "Vulpix", "Meowth", "Persian", "Psyduck", "Mankey",

"Poliwhirl", "Victreebel", "Machoke", "Graveler", "Slowbro", "Magnetom", "Geodude", "Farfetch'd", "Haunter", "Kingler",

"Electrode", "Weezing", "Rhyhorn", "Seadra", "jigglypuff", "Seaking", "Tauros", "Starmie", "Eevee", "Dratini", "Charmeleon",

"Wartortle", "Ivysaur"}

},

[11640] = {level = {59, 60}, balltype = "great",

pokemons = {"Pidgeot", "Fearow", "Sandslash", "Ninetales", "Vileplume", "Primeape", "Golduck",

"Kadabra", "Rapidash", "Clefable", "Wigglytuff", "Dewgong", "Onix", "Cloyster", "Hypno", "Exeggutor",

"Marowak", "Hitmonlee", "Hitmonchan", "Lickitung", "Chansey", "Tangela", "Mr. Mime", "Pinsir", "Vaporeon", "Jolteon",

"Hypno", "Dragonair", "Porygon"}

},

[11641] = {level = {80, 100}, balltype = "ultra",

pokemons = {"Shiny Hitmonchan", "Shiny Hitmonlee", "Shiny Abra", "Dragonite", "Snorlax", "Kabutops", "Omastar",

"Ditto", "Lapras", "Gyarados", "Magmar", "Electabuzz", "Jynx", "Scyther", "Kangaskhan", "Golem", "Venusaur",

"Machamp", "Poliwrath", "Arcanine", "Nidoking", "Nidoqueen", "Charizard", "Blastoise", "Alakazam", "Gengar", "Rhydon",

"Tentacruel"}

},

}

local extrastrength = 1.1

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

local b = a[item.itemid]

if not b then return true end

local pokemon = b.pokemons[math.random(#b.pokemons)]

local pokeinfo = getPokemonStatus(pokemon)

if not pokeinfo then return true end

local btype = b.balltype

if not pokeballs[btype] then return true end

local gender = getRandomGenderByName(pokemon)

local level = math.random(b.level[1], b.level[2])

local offense = pokeinfo.off * level * extrastrength

local defense = pokeinfo.def * level * extrastrength

local agility = pokeinfo.agi * level * extrastrength

local spatk = pokeinfo.spatk * level * extrastrength

local vit = pokeinfo.vit * level * extrastrength

local happy = 180

local leveltable = getPokemonExperienceTable(pokemon)

local ball = 0

local sendToDepot = false

if getCreatureMana(cid) >= 6 then

sendToDepot = true

ball = doCreateItemEx(2219)

else

ball = item.uid

end

doItemSetAttribute(ball, "poke", pokemon)

doItemSetAttribute(ball, "hp", 1)

doItemSetAttribute(ball, "level", level)

doItemSetAttribute(ball, "exp", leveltable[level])

doItemSetAttribute(ball, "nextlevelexp", leveltable[level+1] - leveltable[level])

doItemSetAttribute(ball, "offense", offense)

doItemSetAttribute(ball, "defense", defense)

doItemSetAttribute(ball, "speed", agility)

doItemSetAttribute(ball, "vitality", vit)

doItemSetAttribute(ball, "specialattack", spatk)

doItemSetAttribute(ball, "happy", happy)

doItemSetAttribute(ball, "gender", gender)

doItemSetAttribute(ball, "description", "Contains a "..pokemon..".")

doItemSetAttribute(ball, "fakedesc", "Contains a "..pokemon..".")

doPlayerSendTextMessage(cid, 27, "You opened a pokemon prize box +"..item.itemid - (11637).."!")

doPlayerSendTextMessage(cid, 27, "The prize pokemon was a "..pokemon.." (level "..level.."), congratulations!")

if sendToDepot then

doPlayerSendMailByName(getCreatureName(cid), ball, 1)

doTransformItem(ball, pokeballs[btype].on)

doPlayerSendTextMessage(cid, 27, "You are already holding six pokemons, so your new pokemon was sent to your depot.")

doRemoveItem(item.uid)

else

doTransformItem(ball, pokeballs[btype].on)

end

doSendMagicEffect(getThingPos(cid), 29)

return true

end

Hikigaya · Março 17, 2012

@Slicer Vou Testar Aqui Se Funfar REP+

kledstonsk8 · Março 17, 2012

@Sciler hmm , é pq eu tava olhando esse P.Flay , dai pra um bixo pedi food lá demora pakas , .. mais msm assim vlw..

@All to querendo sabe se alguem ja tem o Npc Paint ball , se alguem tive me ajuda aqui , tempão que to procurando i nem acho , darei rep +

Editado Março 17, 2012 por kledstonsk8

Maguito · Março 17, 2012

Slicer tu consegue por uma proteção para que quando o poke ta em sleep ele não perca o cd?

Slicer · Março 17, 2012

@Maguito

manin eu n testei isso ainda mas... em tese.. se tu for ate.. talkactions/scripts/move1.lua e ir ate essa parte...

if isSleeping(mypoke) then
newid = setCD(getPlayerSlotItem(cid, 8).uid, cdzin, 8)
doCreatureSay(mypoke, "zZzZ", TALKTYPE_MONSTER)
return 0

e retirar essa parte...

newid = setCD(getPlayerSlotItem(cid, 8).uid, cdzin, 8)

ficando assim...

if isSleeping(mypoke) then
doCreatureSay(mypoke, "zZzZ", TALKTYPE_MONSTER)
return 0

ja era pra n mudar mais o CD do poke se ele tiver com sleep... em TESE... testa ae e me diz depois...

ZeNit91 · Março 17, 2012

@kledstonsk8

Entra no msn que ti explico como arumar =)

Andreynithack@homail.com

Editado Março 17, 2012 por Zerons

Thedjhabbo · Março 17, 2012

Removido Esta logo abaixo xtibia bugou aqui!

npc paint

Editado Março 17, 2012 por Thedjhabbo

Maguito · Março 17, 2012

@Slicer testei aqui mas continua perdendo o cd. Eu queria tipo igual do pxg que quando seu poke ta dormindo e você usa cd aparece aquela msg "Sorry your pokemon cant use cd while sleeping."

ZeNit91 · Março 17, 2012

so add um if por status maguito

Thedjhabbo · Março 17, 2012

@All to querendo sabe se alguem ja tem o Npc Paint ball , se alguem tive me ajuda aqui , tempão que to procurando i nem acho , darei rep +

DATA / NPC / scripts

local keywordHandler = KeywordHandler:new()

local npcHandler = NpcHandler:new(keywordHandler)

NpcSystem.parseParameters(npcHandler)

local talkState = {}

function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end

function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end

function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end

function onThink() npcHandler:onThink() end

npcHandler:setCallback(CALLBACK_GREET, greetCallback)

npcHandler:setMessage(MESSAGE_GREET, 'Bem-vindo à minha loja de pintura |PLAYERNAME|!')

function creatureSayCallback(cid, type, msg)

if(not npcHandler:isFocused(cid)) then

return false

end

local pokesalive = {'12581', '12584', '12587', '12590', '12593', '11452', '12596', '12599', '11826', '11829', '11835', '11832', '12575'}

if(msgcontains(msg, 'paint')) then

selfSay('Você quer pintar a sua pokeball?', cid)

talkState = 1

elseif(msgcontains(msg, 'yes') and talkState == 1) then

selfSay('Olá, você pode escolher: Crystalball, Freshball, Darkball, Goldenball, Orangeball, Loveball, Luaball e Duskball.', cid)

talkState = 2

elseif(msgcontains(msg, 'no') and talkState == 1) then

selfSay('Volte outra vez!', cid)

talkState = 0

npcHandler:releaseFocus(cid)

elseif((msgcontains(msg, 'Crystalball') or msgcontains(msg, 'Crystal ball') or msgcontains(msg, 'crystalball') or msgcontains(msg, 'crystal ball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Crystalball? Ele vai te custar 800 dólares!', cid)

talkState = 3

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 3) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,80000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Crystalball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12578)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Freshball') or msgcontains(msg, 'Fresh ball') or msgcontains(msg, 'freshball') or msgcontains(msg, 'fresh ball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Freshball? Ele vai te custar 300 dólares!', cid)

talkState = 4

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 4) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,30000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Freshball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12581)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Darkball') or msgcontains(msg, 'Dark ball') or msgcontains(msg, 'dark ball') or msgcontains(msg, 'darkball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Darkball? Ele vai te custar 700 dólares!', cid)

talkState = 5

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 5) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,70000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Darkball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12584)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Golden ball') or msgcontains(msg, 'Goldenball') or msgcontains(msg, 'golden ball') or msgcontains(msg, 'goldenball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Darkball? Ele vai te custar 500 dólares!', cid)

talkState = 6

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 6) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,50000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Goldenball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12587)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Orangeball') or msgcontains(msg, 'Orange ball') or msgcontains(msg, 'orange ball') or msgcontains(msg, 'orangeball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Orangeball? Ele vai te custar 700 dólares!', cid)

talkState = 7

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 7) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,70000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Orangeball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12590)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Loveball') or msgcontains(msg, 'Love ball') or msgcontains(msg, 'love ball') or msgcontains(msg, 'loveball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Loveball? Ele vai te custar 300 dólares!', cid)

talkState = 8

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 8) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,30000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Loveball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12593)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Luaball') or msgcontains(msg, 'Lua ball') or msgcontains(msg, 'lua ball') or msgcontains(msg, 'luaball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Luaball? Ele vai te custar 700 dólares!', cid)

talkState = 9

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 9) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,70000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Luaball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12596)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

elseif((msgcontains(msg, 'Duskball') or msgcontains(msg, 'Dusk ball') or msgcontains(msg, 'dusk ball') or msgcontains(msg, 'duskball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Duskball? Ele vai te custar 500 dólares!', cid)

talkState = 10

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 10) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,50000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Duskball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12599)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

end

return true

end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

configuração para muda id preço etc..

aqui você coloca todos os id da ball até as colorida!

local pokesalive = {'12581', '12584', '12587', '12590', '12593', '12596', '12599', '11826', '11829', '11835', '11832', '12575'}

Aqui para adiciona ela para o npc pinta:

elseif((msgcontains(msg, 'Crystalball') or msgcontains(msg, 'Crystal ball') or msgcontains(msg, 'crystalball') or msgcontains(msg, 'crystal ball')) and talkState == 2) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

selfSay('Você realmente quer pintar a sua bola como um Crystalball? Ele vai te custar 800 dólares!', cid)

talkState = 3

else

selfSay('Você deve colocar a bola fechada no slot.', cid)

talkState = 0

end

elseif(msgcontains(msg, 'yes') and talkState == 3) then

if isInArray(pokesalive, getPlayerSlotItem(cid,8).itemid) then

if doPlayerRemoveMoney(cid,80000) == true then

selfSay('Boa escolha, a partir de agora um, ele vai olhar como uma Crystalball! Há qualquer outra coisa que eu possa ajudá-lo?', cid)

doTransformItem(getPlayerSlotItem(cid, 8).uid, 12578)

talkState = 0

else

selfSay('Sorry '.. getCreatureName(cid) ..', mas você não tem dinheiro suficiente.', cid)

talkState = 0

end

else

selfSay('Por favor, mantenha sua bola fechada na slot.', cid)

talkState = 0

end

Em azul é o nome da pokeball que vai se pintada! (é quando player vai fala com npc)

Em marrom, sempre que for faz essa tabela de cima troque o numero 1 a mais por exemplo: esse de cima é 3 próximo é 4!

Em verde é quanto que vai custa! coloque o preço desejado!

Em vermelho é o principal de todos é o id da ball colorida viva(Com poke dentro!).

Ta ae!

Slicer · Março 17, 2012

@Maguito

manin tenta usa esse move1.lua... cabei de testar ele aki e ta 100%.. ;x

local msgs = {"use ", ""}

function doAlertReady(cid, id, movename, n, cd)

if not isCreature(cid) then return true end

local myball = getPlayerSlotItem(cid, 8)

if myball.itemid > 0 and getItemAttribute(myball.uid, cd) == "cd:"..id.."" then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(myball.uid).." - "..movename.." (m"..n..") is ready!")

return true

end

local p = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)

if not p or #p <= 0 then return true end

for a = 1, #p do

if getItemAttribute(p[a], cd) == "cd:"..id.."" then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(p[a]).." - "..movename.." (m"..n..") is ready!")

return true

end

function onSay(cid, words, param, channel)

if param ~= "" then return true end

if string.len(words) > 3 then return true end

if #getCreatureSummons(cid) == 0 then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to use moves.")

return 0

end

if getCreatureCondition(getCreatureSummons(cid)[1], CONDITION_INVISIBLE) and not isGhostPokemon(getCreatureSummons(cid)[1]) then

return 0

end

local mypoke = getCreatureSummons(cid)[1]

if getCreatureCondition(cid, CONDITION_EXHAUST) then return true end

if getCreatureName(mypoke) == "Evolution" then return true end

local name = getCreatureName(mypoke) == "Ditto" and getPlayerStorageValue(mypoke, 1010) or getCreatureName(mypoke)

local it = string.sub(words, 2, 3)

local move = movestable[name].move1

local cdzin = "move"..it..""

if it == "2" then

move = movestable[name].move2

elseif it == "3" then

move = movestable[name].move3

elseif it == "4" then

move = movestable[name].move4

elseif it == "5" then

move = movestable[name].move5

elseif it == "6" then

move = movestable[name].move6

elseif it == "7" then

move = movestable[name].move7

elseif it == "8" then

move = movestable[name].move8

elseif it == "9" then

move = movestable[name].move9

elseif it == "10" then

move = movestable[name].move10

elseif it == "11" then

move = movestable[name].move11

elseif it == "12" then

move = movestable[name].move12

elseif it == "13" then

move = movestable[name].move13

end

if not move then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")

return true

end

--if false and getLevel(mypoke) < move.level then

if getLevel(mypoke) < move.level then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't have enough level to use this move.")

return 0

end

if getCD(getPlayerSlotItem(cid, 8).uid, cdzin) > 0 and getCD(getPlayerSlotItem(cid, 8).uid, cdzin) < (move.cd + 2) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..getCD(getPlayerSlotItem(cid, 8).uid, cdzin).." seconds to use this move again.")

return 0

end

if getTileInfo(getThingPos(mypoke)).protection then

doPlayerSendCancel(cid, "Your pokemon cannot use moves while in protection zone.")

return 0

end

if move.target == 1 then

if not isCreature(getCreatureTarget(cid)) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")

return 0

end

if getCreatureCondition(getCreatureTarget(cid), CONDITION_INVISIBLE) then

return 0

end

if getCreatureHealth(getCreatureTarget(cid)) <= 0 then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your have already defeated your target.")

return 0

end

if not isCreature(getCreatureSummons(cid)[1]) then

return true

end

if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > move.dist then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to use this move.")

return 0

end

if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then

return 0

end

local newid = 0

if isSleeping(mypoke) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry your pokemon cant use cd while sleeping.")

doCreatureSay(mypoke, "zZzZ", TALKTYPE_MONSTER)

return 0

else

newid = setCD(getPlayerSlotItem(cid, 8).uid, cdzin, move.cd)

end

doCreatureSay(cid, ""..getPokeName(mypoke)..", "..msgs[math.random(#msgs)]..""..move.name.."!", TALKTYPE_SAY)

if move.name ~= "Metronome" then

doCreatureSay(mypoke, ""..string.upper(move.name).."!", TALKTYPE_MONSTER)

end

addEvent(doAlertReady, move.cd * 1000, cid, newid, move.name, it, cdzin)

docastspell(mypoke, move.name)

doCreatureAddCondition(cid, playerexhaust)

if useKpdoDlls then

doUpdateCooldowns(cid)

end

return 0

end

Editado Março 17, 2012 por Slicer

Regice · Março 17, 2012

Ajuda eu tentei usar o client do download pra o zoto poder joga n deu ai eu peguei os spr dat e o outro e a dll e puis em outro client ai deu pra eu dar ip changer mais eu coloco on e n da para o zoto entra ajuda si der certo do rep++

ZeNit91 · Março 17, 2012

@all [off]

Galera dem um olhada no meu site e me falem como esta ficando.

(lick)

Entrar

[Encerrado] [Pokemon] Dúvidas? - Pda

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Popular Posts

lucashgas

Slicer

brun123

Posted Images

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

Anúncios