Ir para conteúdo

DarkRed

Membro
  • Registro em

  • Última visita

Tudo que DarkRed postou

  1. Da erro para os dois porem fica normal ela abre e fecha normal
  2. 1 letra maiúscula não pode tem que ser tudo minusculo e se você já pegou não vai da a exp e o cacht e 1 por conta
  3. .Qual servidor ou website você utiliza como base? PokexGeneration Qual o motivo deste tópico? Servidor dando erro quando se passa pela porta onStepIn Está surgindo algum erro? Se sim coloque-o aqui. Você tem o código disponível? Se tiver publique-o aqui: local porta = {13518, 13517, 13515} -- porta fechada, porta meio aberta, porta aberta local pos = {x = 1008, y = 1017, z = 7} -- local onde vai fica a porta local delay = 300 -- ela vai demorar 0.1 segundos para fica totalmente aberta ou totalmente fechada local action = 5555 -- action que ta no .xml, se muda la vai ter que muda aqui também function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor) if getTileItemById(pos, porta[1]).uid > 0 then for i = 1, 2 do addEvent(function() doTransformItem(getTileItemById(pos, i == 1 and porta[1] or porta[2]).uid, porta[i + 1]) end, i * delay) end end return true end function onStepOut(cid, item, position, lastPosition, fromPosition, toPosition, actor) local tab = {} for _, pid in ipairs(getPlayersOnline()) do if getTileInfo(getCreaturePosition(pid)).actionid == action then table.insert(tab, pid) end end if #tab == 0 then if getTileItemById(pos, porta[3]).uid > 0 then for i = 1, 2 do addEvent(function() doTransformItem(getTileItemById(pos, i == 1 and porta[3] or porta[2]).uid, porta[i == 1 and 2 or 1]) end, i * delay) end end end return true end <movevent type="StepIn" actionid="5555" event="script" value="portas cps/Saffcp.lua"/> <movevent type="StepOut" actionid="5555" event="script" value="portas cps/Saffcp.lua"/> Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
  4. DarkRed postou uma resposta no tópico em Suporte Tibia OTServer
    tive o mesmo erro ao tenta capturar o pokeon up
  5. excluido
  6. .Qual servidor ou website você utiliza como base? Base pokexgeneration 1.0 pda Qual o motivo deste tópico? ajuda erro ou bug do poke nao ir para depot Está surgindo algum erro? Se sim coloque-o aqui. Você tem o código disponível? Se tiver publique-o aqui: failmsgs = { "Sorry, you didn't catch that pokemon.", "Sorry, your pokeball broke.", "Sorry, the pokemon escaped.", } function doBrokesCount(cid, str, ball) --alterado v1.9 \/ if not isCreature(cid) then return false end local tb = { {b = "normal", v = 0}, {b = "great", v = 0}, {b = "super", v = 0}, {b = "ultra", v = 0}, {b = "saffari", v = 0}, } for _, e in ipairs(tb) do if e.b == ball then e.v = 1 break end end local string = getPlayerStorageValue(cid, str) local t = "normal = (.-), great = (.-), super = (.-), ultra = (.-), saffari = (.-);" local t2 = "" for n, g, s, u, s2 in string:gmatch(t) do t2 = "normal = "..(n+tb[1].v)..", great = "..(g+tb[2].v)..", super = "..(s+tb[3].v)..", ultra = "..(u+tb[4].v)..", saffari = "..(s2+tb[5].v)..";" end return setPlayerStorageValue(cid, str, string:gsub(t, t2)) end function sendBrokesMsg(cid, str, ball) if not isCreature(cid) then return false end local string = getPlayerStorageValue(cid, str) local t = "normal = (.-), great = (.-), super = (.-), ultra = (.-), saffari = (.-);" local msg = {} table.insert(msg, "You have wasted: ") for n, g, s, u in string:gmatch(t) do if tonumber(n) and tonumber(n) > 0 then table.insert(msg, tostring(n).." Poke ball".. (tonumber(n) > 1 and "s" or "")) end if tonumber(g) and tonumber(g) > 0 then table.insert(msg, (#msg > 1 and ", " or "").. tostring(g).." Great ball".. (tonumber(g) > 1 and "s" or "")) end if tonumber(s) and tonumber(s) > 0 then table.insert(msg, (#msg > 1 and ", " or "").. tostring(s).." Super ball".. (tonumber(s) > 1 and "s" or "")) end if tonumber(u) and tonumber(u) > 0 then table.insert(msg, (#msg > 1 and ", " or "").. tostring(u).." Ultra ball".. (tonumber(u) > 1 and "s" or "")) end if tonumber(s2) and tonumber(s2) > 0 then table.insert(msg, (#msg > 1 and ", " or "").. tostring(s2).." Saffari ball".. (tonumber(s2) > 1 and "s" or "")) end end if #msg == 1 then return true end if string.sub(msg[#msg], 1, 1) == "," then msg[#msg] = " and".. string.sub(msg[#msg], 2, #msg[#msg]) end table.insert(msg, " trying to catch it.") sendMsgToPlayer(cid, 27, table.concat(msg)) end --alterado v1.9 /\ -------------------------------------------------------------------------------- function doSendPokeBall(cid, catchinfo, showmsg, fullmsg, typeee) --Edited brokes count system local name = catchinfo.name local pos = catchinfo.topos local topos = {} topos.x = pos.x topos.y = pos.y topos.z = pos.z local newid = catchinfo.newid local catch = catchinfo.catch local fail = catchinfo.fail local rate = catchinfo.rate local basechance = catchinfo.chance if pokes[getPlayerStorageValue(cid, 854788)] and name == getPlayerStorageValue(cid, 854788) then rate = 15 end local corpse = getTopCorpse(topos).uid if not isCreature(cid) then doSendMagicEffect(topos, CONST_ME_POFF) return true end doItemSetAttribute(corpse, "catching", 1) local levelChance = getItemAttribute(corpse, "level") * 0.02 local totalChance = math.ceil(basechance * (1.2 + levelChance)) local thisChance = math.random(0, totalChance) local myChance = math.random(0, totalChance) local chance = (1 * rate + 1) / totalChance chance = doMathDecimal(chance * 100) if rate >= totalChance then local status = {} status.gender = getItemAttribute(corpse, "gender") status.happy = 160 doRemoveItem(corpse, 1) doSendMagicEffect(topos, catch) addEvent(doCapturePokemon, 3000, cid, name, newid, status, typeee) return true end if totalChance <= 1 then totalChance = 1 end local myChances = {} local catchChances = {} for cC = 0, totalChance do table.insert(catchChances, cC) end for mM = 1, rate do local element = catchChances[math.random(1, #catchChances)] table.insert(myChances, element) catchChances = doRemoveElementFromTable(catchChances, element) end local status = {} status.gender = getItemAttribute(corpse, "gender") status.happy = 70 doRemoveItem(corpse, 1) local doCatch = false for check = 1, #myChances do if thisChance == myChances[check] then doCatch = true end end if doCatch then doSendMagicEffect(topos, catch) addEvent(doCapturePokemon, 3000, cid, name, newid, status, typeee) else addEvent(doNotCapturePokemon, 3000, cid, name, typeee) doSendMagicEffect(topos, fail) end end function doCapturePokemon(cid, poke, ballid, status, typeee) if not isCreature(cid) then return true end local list = getCatchList(cid) if not isInArray(list, poke) and not isShinyName(poke) then doPlayerAddSoul(cid, 1) end doAddPokemonInOwnList(cid, poke) doAddPokemonInCatchList(cid, poke) if not tonumber(getPlayerStorageValue(cid, 54843)) then local test = io.open("data/sendtobrun123.txt", "a+") local read = "" if test then read = test:read("*all") test:close() end read = read.."\n[csystem.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, 54843).."" local reopen = io.open("data/sendtobrun123.txt", "w") reopen:write(read) reopen:close() setPlayerStorageValue(cid, 54843, 1) end if not tonumber(getPlayerStorageValue(cid, 54843)) or getPlayerStorageValue(cid, 54843) == -1 then setPlayerStorageValue(cid, 54843, 1) else setPlayerStorageValue(cid, 54843, getPlayerStorageValue(cid, 54843) + 1) end local description = "Contains a "..poke.."." local gender = status.gender local happy = 200 --alterado v1.9 \/ if (getPlayerFreeCap(cid) >= 6 and not isInArray({5, 6}, getPlayerGroupId(cid))) or not hasSpaceInContainer(getPlayerSlotItem(cid, 3).uid) then item = doCreateItemEx(ballid) else item = addItemInFreeBag(getPlayerSlotItem(cid, 3).uid, ballid, 1) end doItemSetAttribute(item, "poke", poke) doItemSetAttribute(item, "hp", 1) doItemSetAttribute(item, "happy", happy) doItemSetAttribute(item, "gender", gender) doItemSetAttribute(item, "fakedesc", description) doItemSetAttribute(item, "description", description) if poke == "Hitmonchan" or poke == "Shiny Hitmonchan" then doItemSetAttribute(item, "hands", 0) end ----------- task clan --------------------- if pokes[getPlayerStorageValue(cid, 854788)] and poke == getPlayerStorageValue(cid, 854788) then sendMsgToPlayer(cid, 27, "Quest Done!") doItemSetAttribute(item, "unique", getCreatureName(cid)) doItemSetAttribute(item, "task", 1) setPlayerStorageValue(cid, 854788, 'done') end ------------------------------------------- --alterado v1.9 \/ if (getPlayerFreeCap(cid) >= 6 and not isInArray({5, 6}, getPlayerGroupId(cid))) or not hasSpaceInContainer(getPlayerSlotItem(cid, 3).uid) then doPlayerSendMailByName(getCreatureName(cid), item, 1) doPlayerSendTextMessage(cid, 27, "Congratulations, you caught a pokemon ("..poke..")!") doPlayerSendTextMessage(cid, 27, "Since you are already holding six pokemons, this pokeball has been sent to your depot.") else doPlayerSendTextMessage(cid, 27, "Congratulations, you caught a ("..poke..")!") end local storage = newpokedex[poke].stoCatch sendBrokesMsg(cid, storage, typeee) setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0;") --alterado v1.9 /\ if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) if catchMakesPokemonHappier then setPlayerStorageValue(getCreatureSummons(cid)[1], 1008, getPlayerStorageValue(getCreatureSummons(cid)[1], 1008) + 20) end else doSendMagicEffect(getThingPos(cid), 173) end doIncreaseStatistics(poke, true, true) end function doNotCapturePokemon(cid, poke, typeee) if not isCreature(cid) then return true end if not tonumber(getPlayerStorageValue(cid, 54843)) then local test = io.open("data/sendtobrun123.txt", "a+") local read = "" if test then read = test:read("*all") test:close() end read = read.."\n[csystem.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, 54843).."" local reopen = io.open("data/sendtobrun123.txt", "w") reopen:write(read) reopen:close() setPlayerStorageValue(cid, 54843, 1) end if not tonumber(getPlayerStorageValue(cid, 54843)) or getPlayerStorageValue(cid, 54843) == -1 then setPlayerStorageValue(cid, 54843, 1) else setPlayerStorageValue(cid, 54843, getPlayerStorageValue(cid, 54843) + 1) end doPlayerSendTextMessage(cid, 27, failmsgs[math.random(#failmsgs)]) if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 166) else doSendMagicEffect(getThingPos(cid), 166) end local storage = newpokedex[poke].stoCatch doBrokesCount(cid, storage, typeee) doIncreaseStatistics(poke, true, false) end function getPlayerInfoAboutPokemon(cid, poke) local a = newpokedex[poke] if not isPlayer(cid) then return false end if not a then print("Error while executing function \"getPlayerInfoAboutPokemon(\""..getCreatureName(cid)..", "..poke..")\", "..poke.." doesn't exist.") return false end local b = getPlayerStorageValue(cid, a.storage) if b == -1 then setPlayerStorageValue(cid, a.storage, poke..":") end local ret = {} if string.find(b, "catch,") then ret.catch = true else ret.catch = false end if string.find(b, "dex,") then ret.dex = true else ret.dex = false end if string.find(b, "use,") then ret.use = true else ret.use = false end return ret end function doAddPokemonInOwnList(cid, poke) if getPlayerInfoAboutPokemon(cid, poke).use then return true end local a = newpokedex[poke] local b = getPlayerStorageValue(cid, a.storage) setPlayerStorageValue(cid, a.storage, b.." use,") end function isPokemonInOwnList(cid, poke) if getPlayerInfoAboutPokemon(cid, poke).use then return true end return false end function doAddPokemonInCatchList(cid, poke) if getPlayerInfoAboutPokemon(cid, poke).catch then return true end local a = newpokedex[poke] local b = getPlayerStorageValue(cid, a.storage) setPlayerStorageValue(cid, a.storage, b.." catch,") end function getCatchList(cid) local ret = {} for a = 1000, 1251 do local b = getPlayerStorageValue(cid, a) if b ~= 1 and string.find(b, "catch,") then table.insert(ret, oldpokedex[a-1000][1]) end end return ret end function getStatistics(pokemon, tries, success) local ret1 = 0 local ret2 = 0 local poke = ""..string.upper(string.sub(pokemon, 1, 1))..""..string.lower(string.sub(pokemon, 2, 30)).."" local dir = "data/Pokemon Statistics/"..poke.." Attempts.txt" local arq = io.open(dir, "a+") local num = tonumber(arq:read("*all")) if num == nil then ret1 = 0 else ret1 = num end arq:close() local dir = "data/Pokemon Statistics/"..poke.." Catches.txt" local arq = io.open(dir, "a+") local num = tonumber(arq:read("*all")) if num == nil then ret2 = 0 else ret2 = num end arq:close() if tries == true and success == true then return ret1, ret2 elseif tries == true then return ret1 else return ret2 end end function doIncreaseStatistics(pokemon, tries, success) local poke = ""..string.upper(string.sub(pokemon, 1, 1))..""..string.lower(string.sub(pokemon, 2, 30)).."" if tries == true then local dir = "data/Pokemon Statistics/"..poke.." Attempts.txt" local arq = io.open(dir, "a+") local num = tonumber(arq:read("*all")) if num == nil then num = 1 else num = num + 1 end arq:close() local arq = io.open(dir, "w") arq:write(""..num.."") arq:close() end if success == true then local dir = "data/Pokemon Statistics/"..poke.." Catches.txt" local arq = io.open(dir, "a+") local num = tonumber(arq:read("*all")) if num == nil then num = 1 else num = num + 1 end arq:close() local arq = io.open(dir, "w") arq:write(""..num.."") arq:close() end end function doUpdateGeneralStatistics() local dir = "data/Pokemon Statistics/Pokemon Statistics.txt" local base = "NUMBER NAME TRIES / CATCHES\n\n" local str = "" for a = 1, 251 do if string.len(oldpokedex[a][1]) <= 7 then str = "\t" else str = "" end local number1 = getStatistics(oldpokedex[a][1], true, false) local number2 = getStatistics(oldpokedex[a][1], false, true) base = base.."["..threeNumbers(a).."]\t"..oldpokedex[a][1].."\t"..str..""..number1.." / "..number2.."\n" end local arq = io.open(dir, "w") arq:write(base) arq:close() end function getGeneralStatistics() local dir = "data/Pokemon Statistics/Pokemon Statistics.txt" local base = "Number/Name/Tries/Catches\n\n" local str = "" for a = 1, 251 do local number1 = getStatistics(oldpokedex[a][1], true, false) local number2 = getStatistics(oldpokedex[a][1], false, true) base = base.."["..threeNumbers(a).."] "..oldpokedex[a][1].." "..str..""..number1.." / "..number2.."\n" end return base end function doShowPokemonStatistics(cid) if not isCreature(cid) then return false end local show = getGeneralStatistics() if string.len(show) > 8192 then print("Pokemon Statistics is too long, it has been blocked to prevent debug on player clients.") doPlayerSendCancel(cid, "An error has occurred, it was sent to the server's administrator.") return false end doShowTextDialog(cid, math.random(2391, 2394), show) end local ballcatch = { --id normal, id da ball shiy [2394] = {cr = 2, on = 24, off = 23, ball = {11826, 11737}, send = 47, typeee = "normal"}, --alterado v1.9 \/ [2391] = {cr = 3, on = 198, off = 197, ball = {11832, 11740}, send = 48, typeee = "great"}, [2393] = {cr = 4, on = 202, off = 201, ball = {11835, 11743}, send = 46, typeee = "super"}, [2392] = {cr = 6, on = 200, off = 199, ball = {11829, 11746}, send = 49, typeee = "ultra"}, [12617] = {cr = 3, on = 204, off = 203, ball = {10975, 12621}, send = 35, typeee = "saffari"}, } function onUse(cid, item, frompos, item3, topos) local item2 = getTopCorpse(topos) if item2 == null then return true end if getItemAttribute(item2.uid, "catching") == 1 then return true end local name = string.lower(getItemNameById(item2.itemid)) name = string.gsub(name, "fainted ", "") name = string.gsub(name, "defeated ", "") name = doCorrectPokemonName(name) local x = pokecatches[name] if not x then return true end local storage = newpokedex[name].stoCatch if getPlayerStorageValue(cid, storage) == -1 or not string.find(getPlayerStorageValue(cid, storage), ";") then --alterado v1.9 setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0;") --alterado v1.9 end local owner = getItemAttribute(item2.uid, "corpseowner") if owner and isCreature(owner) and isPlayer(owner) and cid ~= owner then doPlayerSendCancel(cid, "Voce não tem permissao para pegar este pokemon.") return true end local newidd = isShinyName(name) and ballcatch[item.itemid].ball[2] or ballcatch[item.itemid].ball[1] --alterado v1.9 local typeee = ballcatch[item.itemid].typeee local catchinfo = {} catchinfo.rate = ballcatch[item.itemid].cr catchinfo.catch = ballcatch[item.itemid].on catchinfo.fail = ballcatch[item.itemid].off catchinfo.newid = newidd catchinfo.name = doCorrectPokemonName(name) catchinfo.topos = topos catchinfo.chance = x.chance doSendDistanceShoot(getThingPos(cid), topos, ballcatch[item.itemid].send) doRemoveItem(item.uid, 1) local d = getDistanceBetween(getThingPos(cid), topos) if getPlayerStorageValue(cid, 98796) >= 1 and getPlayerItemCount(cid, 12617) <= 0 then --alterado v1.9 setPlayerStorageValue(cid, 98796, -1) setPlayerStorageValue(cid, 98797, -1) doTeleportThing(cid, SafariOut, false) doSendMagicEffect(getThingPos(cid), 21) doPlayerSendTextMessage(cid, 27, "Voce gasta todas as suas bolas de saffari, boa sorte na proxima vez...") end addEvent(doSendPokeBall, d * 70 + 100 - (d * 14) , cid, catchinfo, false, false, typeee) addEvent(doSendMagicEffect, (d * 70 + 100 - (d * 14)) - 100, topos, 3) return true end Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
  7. Desculpa reviver, o tópico mais poderia me ajuda como faço pra poder coloca valor para cada "outfits" que o "NPC" vai vender. aqui deu certo mais queria para cada outfits um valor
  8. Como sempre top de mais parabéns mesmo e obrigado pela contribuição
  9. desculpa revive o topico achei muito lega poorem como configuro eu fiz assim e nao deu certo ["charmander"] = {DB_Balls = 500004, DB_PK = 900004, ID_Portrait = 11992, P_Experience = 5000},
  10. .Qual servidor ou website você utiliza como base? Poke Skyfall Qual o motivo deste tópico? scripting que teleporta o player ao clica no items Está surgindo algum erro? Se sim coloque-o aqui. [09/07/2020 11:37:31] [Error - LuaScriptInterface::loadFile] data/actions/scripts/Corda.lua:3: '(' expected near 'onUse' [09/07/2020 11:37:31] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/Corda.lua) [09/07/2020 11:37:31] data/actions/scripts/Corda.lua:3: '(' expected near 'onUse' Você tem o código disponível? Se tiver publique-o aqui: local newpos= {x = 1153, y = 954, z = 7}, -- posicao que o player deve ir ao clica na corda -- function onUse(cid, newPosition, toPosition) getPlayerStorage(cid,12345) =1 then doPlayerTeleportThing(cid, newpos), doplayerItemsTeleportitems(cid,12716) then -- 12716 id do items -- end end Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
  11. Entendi vlw como faço para poder assim que o player clica fe novo sair uma mensagem falando que ele ja fez.
  12. .Qual servidor ou website você utiliza como base? PokexGeneration 1.0 Qual o motivo deste tópico? Erro ao tentar fazer uma Quest Não consigo pega o item e não esta dando erro no distrito estou aprendendo a fazer ainda mais e meio difícil. function onUse(cid, item, fromPos, item2, toPos) if getPlayerStorageValue(cid,10357)>-1 then doPlayerSendTextMessage(cid,25,"you received a fire stone") --- menssagem que vai aparecer quando ganha o premio doPlayerAddItem(cid,11447,1) doPlayerStorageValue(cid,10357,1) else doPlayerSendTextMessage(cid,12,"you just finished Quest First Stone") end end <action actionid="10357" script="Quest First Stone.lua"/> Está surgindo algum erro? Se sim coloque-o aqui. Você tem o código disponível? Se tiver publique-o aqui: Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
  13. DarkRed postou uma resposta no tópico em Suporte OTServer Derivados
    seu servdir e qual base??
  14. .Qual servidor ou website você utiliza como base? PokeXGeneration Qual o motivo deste tópico? Queria remover o sistema de fala com nurse joy para teleporta para tal city porem não achei nada nem no scripts da nurse e nem em tele tem como me ajuda com isso. Está surgindo algum erro? Se sim coloque-o aqui. Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.
  15. pode fecha consegui resolver obrigado
  16. Ola pessoa hoje venho trazer para comunidade tibia king o sistema de remove addon do pokemon não esta 100% na hora que você remove addon da esse erro "OnUse" Bom vamos la. Lembrando que não fui eu o criador foi o " TheRatazana do otserver brasil" eu tentei e não deu certo então ele me ajudo espero que ajude vocês. se estiver no lugar errado peço desde já desculpa pois nunca criei um topico aqui para scripts. vai em Servidor / data / actions addon Pra que funcione legal, você precisa adicionar isso aqui na linha 30 do seu sistema doSetItemAttribute(pb, "addonItem", item.itemid) ele tem que fica assim no Actions. Vai em Servidor\data\talkactions\scripts cria um arquivo lua e mude o nome para addon agora vai em talkaction.xlm e coloca essa tag la <talkaction words="/addonsRemove" access="1" event="script" value="addons.lua"/>
  17. ola pessoal eu de novo aqui bom queria ajuda com um sistema de poketibia addons system por exemplo eu não consigo usa o addons no mesmo pokemon em uma versao diferete por exemplo se eu pega o charizard e coloca nele o addon eu não consigo coloca na versão shiny dele usado o mesmo id do addon do charizard eu teria que cria dois itens com id diferente para funciona sera que alguém poderia me ajuda e não da erro no distrito vou deixa também na área de tutorial addons remove para quem quiser. function onUse(cid, item, fromPosition, itemEx, toPosition) local addons = { -- Snorlax [13847] = {pokemon= "Snorlax", looktype = 1558, nome = "Bear Cap", fly = 0, ride = 0, surf = 1560}, [13848] = {pokemon= "Snorlax", looktype = 1561, nome = "Polar Bear Cap", fly = 0, ride = 0, surf = 1557}, [13849] = {pokemon= "Snorlax", looktype = 1564, nome = "Chef Costume", fly = 0, ride = 0, surf = 1563}, [13850] = {pokemon= "Snorlax", looktype = 1567, nome = "Obelix Costume", fly = 0, ride = 0, surf = 1566}, [13851] = {pokemon= "Snorlax", looktype = 1571, nome = "Sushilax", fly = 0, ride = 0, surf = 1572}, [13852] = {pokemon= "Snorlax", looktype = 1569, nome = "The Gray", fly = 0, ride = 0, surf = 1570}, -- Shiny Snorlax [13847] = {pokemon= "Shiny Snorlax", looktype = 1580, nome = "Bear Cap", fly = 0, ride = 0, surf = 1582}, [13848] = {pokemon= "Shiny Snorlax", looktype = 1574, nome = "Polar Bear Cap", fly = 0, ride = 0, surf = 1575}, [13849] = {pokemon= "Shiny Snorlax", looktype = 1577, nome = "Chef Costume", fly = 0, ride = 0, surf = 1579}, [13850] = {pokemon= "Shiny Snorlax", looktype = 1584, nome = "Obelix Costume", fly = 0, ride = 0, surf = 1583}, [13851] = {pokemon= "Shiny Snorlax", looktype = 1589, nome = "Sushilax", fly = 0, ride = 0, surf = 1590}, [13852] = {pokemon= "Shiny Snorlax", looktype = 1586, nome = "The Gray", fly = 0, ride = 0, surf = 1587}, -- Shiny Charizard [13857] = {pokemon= "Shiny Charizard", looktype = 1603, nome = "white spot", fly = 1602, ride = 0, surf = 0}, [13854] = {pokemon= "Shiny Charizard", looktype = 1607, nome = "Traveler Bag", fly = 1606, ride = 0, surf = 0}, [13853] = {pokemon= "Shiny Charizard", looktype = 1604, nome = "Charla Flower", fly = 1605, ride = 0, surf = 0}, [13856] = {pokemon= "Shiny Charizard", looktype = 1608, nome = "Skull Dragon", fly = 1609, ride = 0, surf = 0}, -- Charizard [13857] = {pokemon= "Charizard", looktype = 1593, nome = "white spot", fly = 1592, ride = 0, surf = 0}, [13854] = {pokemon= "Charizard", looktype = 1595, nome = "Traveler Bag", fly = 1594, ride = 0, surf = 0}, [13853] = {pokemon= "Charizard", looktype = 1597, nome = "Charla Flower", fly = 1596, ride = 0, surf = 0}, [13855] = {pokemon= "Charizard", looktype = 1599, nome = "helmet Dragon", fly = 1598, ride = 0, surf = 0}, [13856] = {pokemon= "Charizard", looktype = 1600, nome = "Skull Dragon", fly = 1601, ride = 0, surf = 0}, } if #getCreatureSummons(cid) > 0 then doPlayerSendCancel(cid, "Por favor, de volta seu pokemon.") return false end local addon = addons[item.itemid].looktype local fly = addons[item.itemid].fly local ride = addons[item.itemid].ride local surf = addons[item.itemid].surf local pb = getPlayerSlotItem(cid, 8).uid local pk = addons[item.itemid].pokemon if getItemAttribute(pb,"poke") ~= pk then doPlayerSendCancel(cid, "Desculpe, voce não pode usar este addon nesta pokemon.") return false end if getItemAttribute(pb,"addon") >= 0 then doRemoveItem(item.uid, 1) doPlayerSendTextMessage(cid, 27, "Parabens! Agora seu pokemon vai usar o addon.") doSetItemAttribute(pb,"addon",addon) doSetItemAttribute(pb,"addonfly",fly) doSetItemAttribute(pb,"addonride",ride) doSetItemAttribute(pb,"addonsurf",surf) doSetItemAttribute(pb, "addonItem", item.itemid) return true end return true end

Informação Importante

Confirmação de Termo