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

[tubercuculo 7]

Aqui Tem 1 Pack Dos Pokes da 5 Geraçao Sprites

 

 

 

http://www.4shared.com/rar/E836cXv0/Pokemon_Sprite_5_Gerao_-_Stiga.html

 

Creditos:Stigal

[Stigal 584]

Aqui Tem 1 Pack Dos Pokes da 5 Geraçao Sprites

 

 

 

http://www.4shared.c...ao_-_Stiga.html

 

Creditos:Stigal

e so ver na minha assinatura... "Meus Trabalhos"

 

[21/09/2012 17:22:50] [Error - Action Interface]

[21/09/2012 17:22:50] data/actions/scripts/evolution.lua:onUse

[21/09/2012 17:22:50] Description:

[21/09/2012 17:22:50] data/actions/scripts/evolution.lua:522: attempt to index field '?' (a nil value)

[21/09/2012 17:22:50] stack traceback:

[21/09/2012 17:22:50] data/actions/scripts/evolution.lua:522: in function <data/actions/scripts/evolution.lua:40>

 

totodile nao evolui com nem uma stone

Tente esse meu jovem:

 

local special = specialevo
local types = {
[leaf] = {"Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute", "Chikorita", "Bayleef", "Hoppip", "Skiploom", "Sunkern"},
[water] = {"Squirtle", "Wartortle", "Horsea", "Goldeen", "Magikarp", "Psyduck", "Poliwag", "Poliwhirl", "Tentacool", "Krabby", "Staryu", "Omanyte", "Eevee", "Totodile", "Croconow", "Chinchou", "Marill", "Wooper", "Slowpoke", "Remoraid", "Seadra"},
[venom] = {"Zubat", "Ekans", "Nidoran male", "Nidoran female", "Nidorino", "Nidorina", "Gloom", "Venonat", "Tentacool", "Grimer", "Koffing", "Spinarak", "Golbat"},
[thunder] = {"Magnemite", "Pikachu", "Voltorb", "Eevee", "Chinchou", "Pichu", "Mareep", "Flaaffy", "Elekid"},
[rock] = {"Geodude", "Graveler", "Rhyhorn", "Kabuto", "Slugma", "Pupitar"},
[punch] = {"Machop", "Machoke", "Mankey", "Poliwhirl", "Tyrogue"},
[fire] = {"Charmander", "Charmeleon", "Vulpix", "Growlithe", "Ponyta", "Eevee", "Cyndaquil", "Quilava", "Slugma", "Houndour", "Magby"},
[coccon] = {"Caterpie", "Metapod", "Weedle", "Kakuna", "Paras", "Venonat", "Scyther", "Ledyba", "Spinarak", "Pineco"},
[crystal] = {"Dratini", "Dragonair", "Magikarp", "Omanyte", "Kabuto", "Seadra"},
[dark] = {"Gastly", "Haunter", "Eevee", "Houndour", "Pupitar"},
[earth] = {"Cubone", "Sandshrew", "Nidorino", "Nidorina", "Diglett", "Onix", "Rhyhorn", "Wooper", "Swinub", "Phanpy", "Larvitar"},
[enigma] = {"Abra", "Kadabra", "Psyduck", "Slowpoke", "Drowzee", "Eevee", "Natu", "Smoochum"},
[heart] = {"Rattata", "Pidgey", "Pidgeotto", "Spearow", "Clefairy", "Jigglypuff", "Meowth", "Doduo", "Porygon", "Chansey", "Sentret", "Hoothoot", "Cleffa", "Igglybuff", "Togepi", "Snubull", "Teddiursa"},
[ice] = {"Seel", "Shellder", "Smoochum", "Swinub"},
[king] = {"Slowpoke", "Poliwhirl"},
[metal] = {"Onix", "Scyther"},
[dragon] = {"Seadra"},
[upgrade] = {"Porygon"},
[sun] = {"Sunkern", "Gloom"},
--[sfire] = {"Shiny Charmander", "Shiny Charmeleon", "Shiny Vulpix", "Shiny Growlithe", "Shiny Ponyta", "Shiny Eevee"},
[swater] = {"Shiny Squirtle", "Shiny Wartortle", "Shiny Horsea", "Shiny Goldeen", "Shiny Magikarp", "Shiny Psyduck", "Shiny Poliwag", "Shiny Poliwhirl", "Shiny Tentacool", "Shiny Krabby", "Shiny Staryu", "Shiny Omanyte", "Shiny Eevee"},
[sleaf] = {"Shiny Bulbasaur", "Shiny Ivysaur", "Shiny Oddish", "Shiny Gloom", "Shiny Bellsprout", "Shiny Weepinbell", "Shiny Exeggcute"},
[sheart] = {"Shiny Rattata", "Shiny Pidgey", "Shiny Pidgeotto", "Shiny Spearow", "Shiny Clefairy", "Shiny Jigglypuff", "Shiny Meowth", "Shiny Doduo", "Shiny Porygon", "Shiny Chansey"},
[senigma] = {"Shiny Abra", "Shiny Kadabra", "Shiny Psyduck", "Shiny Slowpoke", "Shiny Drowzee", "Shiny Eevee"},
[srock] = {"Shiny Geodude", "Shiny Graveler", "Shiny Rhyhorn", "Shiny Kabuto"},
[svenom] = {"Shiny Zubat", "Shiny Ekans", "Shiny Nidoran male", "Shiny Nidoran female", "Shiny Nidorino", "Shiny Nidorina", "Shiny Gloom", "Shiny Venonat", "Shiny Tentacool", "Shiny Grimer", "Shiny Koffing"},
[sice] = {"Shiny Seel", "Shiny Shellder"},
[sthunder] = {"Shiny Magnemite", "Shiny Pikachu", "Shiny Voltorb", "Shiny Eevee"},
[scrystal] = {"Shiny Dratini", "Shiny Dragonair", "Shiny Magikarp", "Shiny Omanyte", "Shiny Kabuto"},
[scoccon] = {"Shiny Caterpie", "Shiny Metapod", "Shiny Weedle", "Shiny Kakuna", "Shiny Paras", "Shiny Venonat", "Shiny Scyther"},
[sdarkness] = {"Shiny Gastly", "Shiny Haunter", "Shiny Eevee"},
[spunch] = {"Shiny Machop", "Shiny Machoke", "Shiny Mankey", "Shiny Poliwhirl"},
[searth] = {"Shiny Cubone", "Shiny Sandshrew", "Shiny Nidorino", "Shiny Nidorina", "Shiny Diglett", "Shiny Onix", "Shiny Rhyhorn"}
}
function onUse(cid, item, frompos, item2, topos)
local pokeball = getPlayerSlotItem(cid, 8)
if not isMonster(item2.uid) or not isSummon(item2.uid) then
return true
end
if getCreatureCondition(item2.uid, CONDITION_INVISIBLE) then return true end
local pevo = poevo[getCreatureName(item2.uid)]
if not isInArray(specialevo, getCreatureName(item2.uid)) then
 if not pevo then
  doPlayerSendCancel(cid, "This pokemon can't evolve.")
 return true
 end
 if not isPlayer(getCreatureMaster(item2.uid)) or getCreatureMaster(item2.uid) ~= cid then
  doPlayerSendCancel(cid, "You can only use stones on pokemons you own.")
 return true
 end
 if pevo.stoneid ~= item.itemid and pevo.stoneid2 ~= item.itemid then
  doPlayerSendCancel(cid, "This isn't the needed stone to evolve this pokemon.")
 return true
 end
end
local minlevel = 0

if getPokemonName(item2.uid) == "Eevee" then
 local eevee = ""
 if item.itemid == thunder then
  eevee = "Jolteon"
 elseif item.itemid == water then
  eevee = "Vaporeon"
 elseif item.itemid == fire then
  eevee = "Flareon"
 elseif item.itemid == enigma and allEvolutionsCanBeInduzedByStone then
  eevee = "Espeon"
 elseif item.itemid == dark and allEvolutionsCanBeInduzedByStone then
  eevee = "Umbreon"
 else
  doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")
  return true
 end
 minlevel = pokes[eevee].level
 if getPlayerLevel(cid) < minlevel then
 doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
 return true
 end
 doRemoveItem(item.uid, 1)
 doEvolvePokemon(cid, item2, eevee, 0, 0)
return true
end
if getPokemonName(item2.uid) == "Shiny Eevee" then
 local eevee = ""
 if item.itemid == sthunder then
  eevee = "Shiny Jolteon"
 elseif item.itemid == swater then
  eevee = "Shiny Vaporeon"
 elseif item.itemid == sfire then
  eevee = "Shiny Flareon"
 else
  doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")
  return true
 end
 minlevel = pokes[eevee].level
 if getPlayerLevel(cid) < minlevel then
 doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
 return true
 end
 doRemoveItem(item.uid, 1)
 doEvolvePokemon(cid, item2, eevee, 0, 0)
return true
end

if isInArray(specialevo, getPokemonName(item2.uid)) then
if getPokemonName(item2.uid) == "Poliwhirl" then
 local evolution = 0
 local theevo = ""
 local nlevel = 45
 if item.itemid == water then
  if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, king) >= 1 then
   evolution = king
   theevo = "Politoed"
  elseif getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then
   evolution = punch
   theevo = "Poliwrath"
  else
   if allEvolutionsCanBeInduzedByStone then
 if getPlayerItemCount(cid, king) <= 0 and getPlayerItemCount(cid, punch) <= 0 then
  doPlayerSendCancel(cid, "You need a water stone and a punch stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
 return true
 end
   else
 if getPlayerItemCount(cid, king) <= 0 then
  doPlayerSendCancel(cid, "You need a Water Stone and a King's Rock to evolve this pokemon to a Politoed.")
 return true
 end
   end
  end
  minlevel = pokes[theevo].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, punch) >= 1 and getPlayerItemCount(cid, king) >= 1 and allEvolutionsCanBeInduzedByStone then
   doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a King's Rock to a Politoed.")
  return true
  end
  if evolution == 0 then
   if allEvolutionsCanBeInduzedByStone then
 doPlayerSendCancel(cid, "You need at least one Water Stone, and a Punch Stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
   else
 doPlayerSendCancel(cid, "You need at least one Water Stone and a King's Rock to evolve this pokemon.")
   end
  return true
  end
  if evolution ~= 0 then
  doEvolvePokemon(cid, item2, theevo, evolution, water)
  return true
  end
 elseif item.itemid == punch then
  minlevel = pokes["Poliwrath"].level
  if not allEvolutionsCanBeInduzedByStone then
   doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
  return true
  end
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, water) <= 0 then
  doPlayerSendCancel(cid, "You need at least one Punch Stone and one Water Stone to evolve this pokemon.")
  return true
  end
  local theevo = "Poliwrath"
  doEvolvePokemon(cid, item2, theevo, water, punch)

 elseif item.itemid == king then
  minlevel = pokes["Politoed"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, water) <= 0 then
  doPlayerSendCancel(cid, "You need at least one Punch Stone and one King's Rock to evolve this pokemon.")
  return true
  end
  local theevo = "Politoed"
  doEvolvePokemon(cid, item2, theevo, water, king)
 end
 elseif getPokemonName(item2.uid) == "Shiny Poliwhirl" then
 local evolution = 0
 local theevo = ""
 local nlevel = 45
 if item.itemid == swater then
  if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then
   evolution = spunch
   theevo = "Shiny Poliwrath"
  else
   if allEvolutionsCanBeInduzedByStone then
 if getPlayerItemCount(cid, punch) <= 0 then
  doPlayerSendCancel(cid, "You need a shining water stone and a shining punch stone to evolve this pokemon.")
 return true
 end
   else

   end
  end
  minlevel = pokes[theevo].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, spunch) >= 1 and allEvolutionsCanBeInduzedByStone then
   doPlayerSendCancel(cid, "Please, use your shining Punch Stone to evolve this pokemon to a Poliwrath.")
  return true
  end
  if evolution == 0 then
   if allEvolutionsCanBeInduzedByStone then
 doPlayerSendCancel(cid, "You need at least one shining Water Stone and a shining Punch Stone to evolve this pokemon.")
   else
 doPlayerSendCancel(cid, "You need at least one shining Water Stone evolve this pokemon.")
   end
  return true
  end
  if evolution ~= 0 then
  doEvolvePokemon(cid, item2, theevo, evolution, swater)
  return true
  end
 elseif item.itemid == spunch then
  minlevel = pokes["Shiny Poliwrath"].level
  if not allEvolutionsCanBeInduzedByStone then
   doPlayerSendCancel(cid, "This is not the required shining stone to evolve this pokemon.")
  return true
  end
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, swater) <= 0 then
  doPlayerSendCancel(cid, "You need at least one shining Punch Stone and one shining Water Stone to evolve this pokemon.")
  return true
  end
  local theevo = "Shiny Poliwrath"
  doEvolvePokemon(cid, item2, theevo, swater, spunch)

 end
elseif getPokemonName(item2.uid) == "Gloom" then
if item.itemid == leaf then
 local theevo = ""
 local evolution = 0
  if getPlayerItemCount(cid, venom) >= 1 and getPlayerItemCount(cid, sun) >= 1 then
  doPlayerSendCancel(cid, "Please, use your Venom Stone to evolve this pokemon to a Vileplume, or a Sun Stone to a Bellossom.")
  return true
  end
  if getPlayerItemCount(cid, venom) <= 0 and getPlayerItemCount(cid, sun) <= 0 then
  doPlayerSendCancel(cid, "You need at least one Leaf Stone, and a Sun Stone (Bellossom) or a Venom Stone (Vileplume) to evolve this pokemon.")
  return true
  end
  if getPlayerItemCount(cid, venom) >= 1 then
  theevo = "Vileplume"
  evolution = venom
  elseif getPlayerItemCount(cid, sun) >= 1 then
  theevo = "Bellossom"
  evolution = sun
  end
  minlevel = pokes[theevo].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  doEvolvePokemon(cid, item2, theevo, evolution, leaf)
 elseif item.itemid == venom then
  minlevel = pokes["Vileplume"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, leaf) <= 0 then
  doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Venom Stone to evolve this pokemon.")
  return true
  end
  doEvolvePokemon(cid, item2, "Vileplume", venom, leaf)
 elseif item.itemid == sun then
  minlevel = pokes["Bellossom"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, leaf) <= 0 then
  doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Sun Stone to evolve this pokemon.")
  return true
  end
  doEvolvePokemon(cid, item2, "Bellossom", sun, leaf)
 end
  elseif getPokemonName(item2.uid) == "Shiny Gloom" then
if item.itemid == sleaf then
 local theevo = ""
 local evolution = 0
  if getPlayerItemCount(cid, svenom) >= 1 then
  doPlayerSendCancel(cid, "Please, use your shining Venom Stone to evolve this pokemon to a Shiny Vileplume.")
  return true
  end
  if getPlayerItemCount(cid, svenom) <= 0 then
  doPlayerSendCancel(cid, "You need at least one shining Leaf Stone or a shining Venom Stone to evolve this pokemon.")
  return true
  end
  if getPlayerItemCount(cid, svenom) >= 1 then
  theevo = "Shiny Vileplume"
  evolution = svenom
  end
  minlevel = pokes[theevo].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  doEvolvePokemon(cid, item2, theevo, evolution, sleaf)
 elseif item.itemid == svenom then
  minlevel = pokes["Shiny Vileplume"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  if getPlayerItemCount(cid, sleaf) <= 0 then
  doPlayerSendCancel(cid, "You need at least one Leaf Stone and one shining Venom Stone to evolve this pokemon.")
  return true
  end
  doEvolvePokemon(cid, item2, "Shiny Vileplume", svenom, sleaf)
 end
elseif getPokemonName(item2.uid) == "Slowpoke" then
 if item.itemid == enigma then
  if not allEvolutionsCanBeInduzedByStone then
   doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
  return true
  end
  minlevel = pokes["Slowbro"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  doEvolvePokemon(cid, item2, "Slowbro", enigma, 0)
 elseif item.itemid == king then
  minlevel = pokes["Slowking"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  doEvolvePokemon(cid, item2, "Slowking", king, 0)
 end

elseif getPokemonName(item2.uid) == "Shiny Slowpoke" then
 if item.itemid == senigma then
  if not allEvolutionsCanBeInduzedByStone then
   doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
  return true
  end
  minlevel = pokes["Shiny Slowbro"].level
  if getPlayerLevel(cid) < minlevel then
  doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
  return true
  end
  doEvolvePokemon(cid, item2, "Shiny Slowbro", senigma, 0)
 end

elseif getPokemonName(item2.uid) == "Tyrogue" then
 if not allEvolutionsCanBeInduzedByStone then
  doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")
 return true
 end
 local evolution = ""
 if getOffense(item2.uid) == getDefense(item2.uid) then
  evolution = "Hitmontop"
 elseif getOffense(item2.uid) > getDefense(item2.uid) then
  evolution = "Hitmonlee"
 else
  evolution = "Hitmonchan"
 end
 minlevel = pokes[evolution].level
 if getPlayerLevel(cid) < minlevel then
 doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
 return true
 end
 doEvolvePokemon(cid, item2, evolution, punch, 0)
end
return true
end
local count = poevo[getPokemonName(item2.uid)].count
local stnid = poevo[getPokemonName(item2.uid)].stoneid
local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2
local evo = poevo[getPokemonName(item2.uid)].evolution
local nlevel = poevo[getPokemonName(item2.uid)].level
local count = poevo[getPokemonName(item2.uid)].count
local stnid = poevo[getPokemonName(item2.uid)].stoneid
local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2
local evo = poevo[getPokemonName(item2.uid)].evolution
local nlevel = poevo[getPokemonName(item2.uid)].level

if stnid2 > 1 and (getPlayerItemCount(cid, stnid2) < count or getPlayerItemCount(cid, stnid) < count) then
doPlayerSendCancel(cid, "You need at least one "..getItemNameById(stnid).." and one "..getItemNameById(stnid2).." to evolve this pokemon!")
return true
end
if getPlayerItemCount(cid, stnid) < count then
local str = ""
if count >= 2 then
str = "s"
end
return doPlayerSendCancel(cid, "You need at least "..count.." "..getItemNameById(stnid)..""..str.." to evolve this pokemon!")
end
minlevel = pokes[evo].level
if getPlayerLevel(cid) < minlevel and evolutionByStoneRequireLevel then
doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
return true
end
if count >= 2 then
stnid2 = stnid
end
doEvolvePokemon(cid, item2, evo, stnid, stnid2)
return TRUE
end

 

Atenciosamente, Stigal.

 

 

[zlegend 0]

como faço pra diminuir o tempo que o pokemon fica dormindo depois de receber sleep powder?

[RaitoYagami 0]

@Slicer

Na Prox Atualizaçao do Serv o Stylo Vai editar o mapa todo bonitin e tals...

vai vir com Outlands no serv?

[StyloMaldoso 330]

/\ Não sera meu mapa que virá na proxima atalizaçao, e sim o mapa do Stigal editado por min.

e não virá outland. (:

[galhem 0]

fala ae galera é que eu queria saber como colocar pra cair stones mais faceis é que as stones ta muito dificil de cair.

[Slicer 1070]

@zlegend

vai em lib/pokemon moves.lua e procura por "sleep powder"... vai achar isso..

local ret = {}
ret.id = 0
ret.cd = math.random(6, 9)
ret.check = 0
ret.first = true					    --alterado v1.6
ret.cond = "Sleep"

 

ret.cd = math.random(6, 9) isso eh o tempo de duraçao do sleep...

 

@galhem

tens q arrumar manualmente no .xml de cada poke!... ;x em monsters/pokes/...

por exemplo o do alaka eh esse..

<item id="11452" chance="100" count="1" countmax="1"/>

tens q aumentar o 'chance' ali...

[Stigal 584]

@Slicer

Na Prox Atualizaçao do Serv o Stylo Vai editar o mapa todo bonitin e tals...

Jovem, o mapa utilisado na proxima atualisação sera da minha autoria com otimas modificações do Stylo...

Meu mapa (*sem modificações do stylo) esta disponivel para download no meu perfil!

 

Atenciosamente, Stigal.

[galhem 0]

@Slicer Vlw mano funfo aquiii brigadãooo

[zlegend 0]

Galera eu to usando um script pra task que o Stigal postou em outro tópico mas queria que aparece se as tasks no quest log, ja tentei seguindo um tutorial mais não deu certo..

o script é esse:

 

 

 

local keywordHandler = KeywordHandler:new()

local npcHandler = NpcHandler:new(keywordHandler)

NpcSystem.parseParameters(npcHandler)

local talkState = {}

function doBuyPokemonWithCasinoCoins(cid, poke) npcHandler:onSellpokemon(cid) end

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

function creatureSayCallback(cid, type, msg)

if(not npcHandler:isFocused(cid)) then

return false

end

------------------------------------------------------------

local m = {

["Rattata"] = {storage = 91001, count= 30},

["Raticate"] = {storage = 91002, count= 30},

["Caterpie"] = {storage = 91003, count= 30 },

["Metapod"] = {storage = 91004, count= 40},

["Butterfree"] = {storage = 91005, count= 50 },

["Weedle"] = {storage = 91006, count= 30},

["Kakuna"] = {storage = 91007, count= 40 },

["Beedrill"] = {storage = 91008, count= 50},

["Ekans"] = {storage = 91009, count= 25},

["Arbok"] = {storage = 91010, count= 45 },

["Oddish"] = {storage = 91011, count= 15},

["Gloom"] = {storage = 91012, count= 30},

["Vileplume"] = {storage = 91013, count= 50},

["Bellsprout"] = {storage = 91014, count= 15},

["Weepinbell"] = {storage = 91015, count= 30},

["Vitreebel"] = {storage = 91016, count= 50},

["Tangela"] = {storage = 91017, count= 60},

["Voltorb"] = {storage = 91018, count= 25},

["Electrode"] = {storage = 91019, count= 45},

["Pikachu"] = {storage = 91020, count= 30},

["Raichu"] = {storage = 91021, count= 60},

["Paras"] = {storage = 91022, count= 10} ,

["Parasect"] = {storage = 91023, count= 30},

["Geodude"] = {storage = 91024, count= 20},

["Graveler"] = {storage = 91025, count= 5},

["Golem"] = {storage = 91026, count= 12},

["Machop"] = {storage = 91027, count= 20},

["Machoke"] = {storage = 91028, count= 40},

["Machamp"] = {storage = 91029, count= 65},

["Mankey"] = {storage = 91030, count= 15},

["Primeape"] = {storage = 91031, count= 5},

["Krabby"] = {storage = 91032, count= 25},

["Kingler"] = {storage = 91033, count= 50},

["Goldeen"] = {storage = 91034, count= 25},

["Seaking"] = {storage = 91035, count= 50},

["Poliwag"] = {storage = 91036, count= 20},

["Poliwhirl"] = {storage = 91037, count= 40},

["Poliwrath"] = {storage = 91038, count= 60},

["Snorlax"] = {storage = 91039 , count= 50},

}

local task1 = {"Kingler", "Poliwhirl", "Seaking"}

local task2 = {"Graveler", "Golem", "Primeape"}

local task3 = {"Electrode", "Raichu", "Pikachu"}

-------

local Check1 = "Kingler, Poliwhirl, Seaking"

local Check2 = "Graveler, Golem, Primeape"

local Check3 = "Electrode, Raichu, Pikachu"

function showTask(task, showNum)

local first = "["

if (showNum == true) then

for a = 1, #task do

if a == #task then

first = first.."("..m[task[a]].count..") "..task[a].."]"

break

end

first = first.."("..m[task[a]].count..") "..task[a]..", "

end

else

for a = 1, #task do

if a == #task then

first = first..task[a].."]"

break

end

first = first..task[a]..", "

end

end

return first

end

function checkTask(task, m)

local complet = 0

local t = string.explode(task, ",")

for d = 1, #t do

if getPlayerStorageValue(cid, m[t[d]].storage) >= m[t[d]].count then

complet = complet+1

end

end

if complet ~= #t then

return false

else

return true

end

end

------------------------------------------------------------------------------

if msgcontains(msg, 'task') or msgcontains(msg, 'Task') then

if getPlayerStorageValue(cid, 910000) ~= -1 and (checkTask(getPlayerStorageValue(cid, 910000), m) == false) then

selfSay("You already have one task to do!", cid)

talkState[cid] = 0

return true

elseif getPlayerStorageValue(cid, 910000) ~= -1 and (checkTask(getPlayerStorageValue(cid, 910000), m) == true) then

selfSay("Ohhh i see that you already finished the task! Here is your award!", cid)

doPlayerAddExp(cid, 150000)

doPlayerAddMoney(cid, 50000)

setPlayerStorageValue(cid, 910000, -1)

talkState[cid] = 0

return true

end

local str = "Hello, I have trhee tasks for you! "

str = str.."{First} "..showTask(task1, false).." {Second} "..showTask(task2, false).." {Third} "..showTask(task3, false)..". How do you choose?"

selfSay(str, cid)

talkState[cid] = 1

elseif (msgcontains(msg, 'First') or msgcontains(msg, 'first')) and talkState[cid] == 1 then

if (checkTask(Check1, m) == true) then

selfSay("You already completed this task... Please choose other!", cid)

talkState[cid] = 1

return true

end

selfSay("humm.. You choose kill some Kinglers, Poliwraths and Seakings... Are you sure?", cid)

talkState[cid] = 2

elseif (msgcontains(msg, 'Second') or msgcontains(msg, 'second')) and talkState[cid] == 1 then

if (checkTask(Check2, m) == true) then

selfSay("You already completed this task... Please choose other!", cid)

talkState[cid] = 1

return true

end

selfSay("humm.. You choose kill some Gravelers, Golems, Primeapes... Are you sure?", cid)

talkState[cid] = 3

elseif (msgcontains(msg, 'third') or msgcontains(msg, 'Third')) and talkState[cid] == 1 then

if (checkTask(Check3, m) == true) then

selfSay("You already completed this task... Please choose other!", cid)

talkState[cid] = 1

return true

end

selfSay("humm.. You choose kill some Electrodes, Raichus, Pikachus... Are you sure?", cid)

talkState[cid] = 4

elseif (msgcontains(msg, 'no') or msgcontains(msg, 'nao')) and talkState[cid] == 2 then

selfSay("Humm.. You want to choose another task? I have more two task.. The {Second} and {Third} too...", cid)

talkState[cid] = 1

elseif (msgcontains(msg, 'no') or msgcontains(msg, 'nao')) and talkState[cid] == 3 then

selfSay("Humm.. You want to choose another task? I have more two task.. The {First} and {Third} too...", cid)

talkState[cid] = 1

elseif (msgcontains(msg, 'no') or msgcontains(msg, 'nao')) and talkState[cid] == 4 then

selfSay("Humm.. You want to choose another task? I have more two task.. The {First} and {Second} too...", cid)

talkState[cid] = 1

elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 2 then

local str2 = task1[1]

for b = 2, 3 do

str2 = str2..", "..task1

end

setPlayerStorageValue(cid, 910000, str2)

selfSay("So you have to kill "..showTask(task1, true).." and come back to me. Go!", cid)

talkState[cid] = 0

elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 3 then

local str3 = task2[1]

for b = 2, 3 do

str3 = str3..", "..task2

end

setPlayerStorageValue(cid, 910000, str3)

selfSay("So you have to kill "..showTask(task2, true).." and come back to me. Go!", cid)

talkState[cid] = 0

elseif (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) and talkState[cid] == 4 then

local str4 = task3[1]

for b = 2, 3 do

str4 = str4..", "..task3

end

setPlayerStorageValue(cid, 910000, str4)

selfSay("So you have to kill "..showTask(task3, true).." and come back to me. Go!", cid)

talkState[cid] = 0

end

end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

 

 

Edited September 23, 2012 by zlegend

[Daniel Bighouse 31]

@DanielBadhu

 

Se você abrir o .spr do cliente PDA vai observar que 60% é só coisas de tibia que certamente você não irá usar no seu server, então pense bem. Já que não vou querer usar sprite de tibia, então? Substitui-lo

 

Problema 60% é de tibia mais lembrando que parte disto é itens como chão, parede, telhado, grama, nature, etc...

Então não é bem certo 60%.

E mesmo assim 62.100 sprites para mim é muito pouco onde eu quero colocar todos os 646pokes + 646 shiny = +- 64.500 sprites!!!!

O @Maguito me falou que se tiver sources dá para aumentar o espaço. Que se puder peço que faça um tutorial.

Pois eu tenho todos os pokémons só me falta espaço!

[fagundes14 7]

Problema 60% é de tibia mais lembrando que parte disto é itens como chão, parede, telhado, grama, nature, etc...

Então não é bem certo 60%.

E mesmo assim 62.100 sprites para mim é muito pouco onde eu quero colocar todos os 646pokes + 646 shiny = +- 64.500 sprites!!!!

O @Maguito me falou que se tiver sources dá para aumentar o espaço. Que se puder peço que faça um tutorial.

Pois eu tenho todos os pokémons só me falta espaço!

 

Vc Esta Tentando Add As Sprites Recortadas Ou Ja Esta Em IDC?

 

ABRASS

[webmasterxd 0]

@Slicer

 

[21/09/2012 17:22:50] [Error - Action Interface]

[21/09/2012 17:22:50] data/actions/scripts/evolution.lua:onUse

[21/09/2012 17:22:50] Description:

[21/09/2012 17:22:50] data/actions/scripts/evolution.lua:522: attempt to index field '?' (a nil value)

[21/09/2012 17:22:50] stack traceback:

[21/09/2012 17:22:50] data/actions/scripts/evolution.lua:522: in function <data/actions/scripts/evolution.lua:40>

Esse erro ai que nao evolui o totodile com nem uma stone quando usa a water stone no totodile ele dar esse erro

Edited September 23, 2012 by webmasterxd

[galhem 0]

fala ae galera eu novamente agora é que tem um bug do duel vc da party na pessoa ai tudo tranquilo mas na hora de duela nenhum poke ataka é como se n tivesse em party ou seii la alguem pode me ajudar aee vlw

[zlegend 0]

@galhem

 

vê se vc não esta tentando duelar em alguma área com protect zone