lucasmourahere

up

up

up

up

Olá XTibia, estou com um grande problema ao chamar Duel no meu servidor. Quando chamo Duelo tendo 2 pokemons na bag, da pra chamar Duel para 4 pokemons.. ou seja, está contando 2 pokemons a mais na bag na hora de chamar o Duel. alguem poderia me ajudar? segue a função que está sendo usada para checar os pokemons na bag: creaturescripts/scripts/tvsys.lua ---------------- Proteçao para os 2 players terem a qntdade de pokes pro duel local pokes1 = getLivePokeballs(cid, getPlayerSlotItem(cid, 3).uid, true) local pokes2 = getLivePokeballs(sid, getPlayerSlotItem(sid, 3).uid, true) if #pokes1 < (channelId-12) or #pokes2 < (channelId-12) then local tpw = getPlayerStorageValue(cid, 52480) > 1 and "ally" or "opponent" doPlayerSendTextMessage(cid, 20, "You or your "..tpw.." doesn't have that amount of pokemons in their bags! Duel are canceled!") doPlayerSetVocation(cid, 1) for i = 1, #storagesDuel do setPlayerStorageValue(cid, storagesDuel[i], -1) end doCreatureSetSkullType(cid, 0) return false end ---------------- e sobre esta função "getLivePokeballs" está armazenada em some functions.lua em /lib. Segue a função "getLivePokeballs". function getLivePokeballs(cid, container, duel) --alterado v2.8 if not isCreature(cid) then return {} end if not isContainer(container) then return {} end local items = {} --- local ballSlot = getPlayerSlotItem(cid, 8) if ballSlot.uid ~= 0 then for a, b in pairs (pokeballs) do if ballSlot.itemid == b.on or ballSlot.itemid == b.use then if duel and getPlayerLevel(cid) >= (pokes[getItemAttribute(ballSlot.uid, "poke")].level + getPokeballBoost(ballSlot)) then table.insert(items, ballSlot.uid) --alterado v2.8 elseif not duel then table.insert(items, ballSlot.uid) end end end end --- if isContainer(container) and getContainerSize(container) > 0 then for slot=0, (getContainerSize(container)-1) do local item = getContainerItem(container, slot) if isContainer(item.uid) then local itemsbag = getPokeballsInContainer(item.uid) for i=0, #itemsbag do if not isInArray(items, itemsbag[i]) then table.insert(items, itemsbag[i]) end end elseif isPokeball(item.itemid) then for a, b in pairs (pokeballs) do if item.itemid == b.on then if duel and getPlayerLevel(cid) >= (pokes[getItemAttribute(item.uid, "poke")].level + getPokeballBoost(item)) then table.insert(items, item.uid) --alterado v2.8 elseif not duel then table.insert(items, item.uid) end end end end end endreturn itemsend Grato desde já para quem me ajudar! Atenciosamente, Lucas.

Boa noite meu caro Zipter98. Cara, agradeço imensamente pelo suporte dado a mim no decorrer destes problemas acima. vou dar o tópico como encerrado e tentar fuçar diversas formas para corrigir tal problema, que por sinal está me deixando louco kk. Mas obrigado mesmo assim! Podem fechar o tópico.

Boa tarde zipter98. Fico grato pelo suporte meu caro!! Entao cara, eu tenho apenas a Source do servidor, nao sei te informar se seria algo em C++ ligado ao Client. sei que este codigo em creaturescripts esta ligado a um arquivo chamado Tvsys.lua em creaturescripts, nesse arquivo contem a configuracao dos canais. E o sevidor baixado como base foi o "PDA Advanced 2015 Open Source". Arquivo responsável pelos canais: function onJoinChannel(cid, channelId, users, isTv) if channelId == 10 then doShowPokemonStatistics(cid) return false end if channelId == 11 then if reloadHighscoresWhenUsingPc then doReloadHighscores() end doPlayerPopupFYI(cid, getHighscoreString(8)) return false end if channelId == 12 then if reloadHighscoresWhenUsingPc then doReloadHighscores() end doPlayerPopupFYI(cid, getHighscoreString(6)) return false end --////////////////////////////////////////////////////////////////////////////////////////-- if channelId >= 19 and channelId <= 21 then --alterado v2.8 \/ setPlayerStorageValue(cid, 52480, (channelId-18)) setPlayerStorageValue(cid, 52484, ((channelId-18)*2)-1) doSendAnimatedText(getThingPosWithDebug(cid), (channelId-18).."x"..(channelId-18), COLOR_BURN) doPlayerSetVocation(cid, 8) openChannelDialog(cid) return false end if channelId >= 13 and channelId <= 18 then local sid = getPlayerByName(getPlayerStorageValue(cid, 52483):match("(.*),")) ---------------- Proteçao para ter um oponente valido! if not isCreature(sid) then doPlayerSendTextMessage(cid, 20, "The other player isn't online! Duel is canceled!") doPlayerSetVocation(cid, 1) for i = 1, #storagesDuel do setPlayerStorageValue(cid, storagesDuel[i], -1) end doCreatureSetSkullType(cid, 0) return false end ---------------- Proteçao para os 2 players terem a qntdade de pokes pro duel local pokes1 = getLivePokeballs(cid, getPlayerSlotItem(cid, 3).uid, true) local pokes2 = getLivePokeballs(sid, getPlayerSlotItem(sid, 3).uid, true) if #pokes1 < (channelId-12) or #pokes2 < (channelId-12) then local tpw = getPlayerStorageValue(cid, 52480) > 1 and "ally" or "opponent" doPlayerSendTextMessage(cid, 20, "You or your "..tpw.." doesn't have that amount of pokemons in their bags! Duel are canceled!") doPlayerSetVocation(cid, 1) for i = 1, #storagesDuel do setPlayerStorageValue(cid, storagesDuel[i], -1) end doCreatureSetSkullType(cid, 0) return false end ---------------- if getPlayerStorageValue(cid, 52480) > 1 then setPlayerStorageValue(cid, 52482, getPlayerStorageValue(cid, 52482).. getCreatureName(sid)..",") setPlayerStorageValue(cid, 52483, "") end ---------------- doSendAnimatedText(getThingPos(cid), (channelId-12).." Poke"..(channelId > 13 and "s" or ""), COLOR_BURN) setPlayerStorageValue(cid, 52481, (channelId-12)) setPlayerStorageValue(sid, 52485, getCreatureName(cid)) setPlayerStorageValue(sid, 52481, (channelId-12)) local players, pokes = getPlayerStorageValue(cid, 52480), getPlayerStorageValue(cid, 52481) local str = {} --alterado v2.9 \/ table.insert(str, getCreatureName(cid).." is inviting you to a duel! Use order in him to accept it!\n") table.insert(str, "Info Battle: Duel "..players.."x"..players.." - "..pokes.." pokes.") doPlayerSendTextMessage(sid, 20, table.concat(str)) addEvent(doSendAnimatedText, 1000, getThingPos(cid), "BATTLE", COLOR_ELECTRIC) doPlayerSetVocation(cid, 1) return false end --////////////////////////////////////////////////////////////////////////////////////////-- if channelId >= 100 and channelId <= 10000 then local owner = getPlayerByGUID(getChannelOwner(channelId)) if isChannelTv(channelId) then if isCreature(owner) then if owner ~= cid then doPlayerWatchOther(cid, owner) local plural = #users == 1 and "" or "s" doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is now watching your channel (currently '..#users..' player'..plural..' watching this channel).', 15, channelId) else setPlayerStorageValue(cid, 99284, 1) end end elseif owner == cid then setPlayerStorageValue(cid, 99284, 2) end return true endreturn trueendfunction onLeaveChannel(cid, channelId, users) if channelId >= 100 and channelId <= 10000 then local owner = getPlayerByGUID(getChannelOwner(channelId)) if isChannelTv(channelId) then if owner ~= cid and getCreatureOutfit(cid).lookType == 814 then doPlayerStopWatching(cid) local plural = #users == 2 and "" or "s" doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is not watching your channel anymore (currently '..#users - (1)..' player'..plural..' watching this channel).', 15, channelId) elseif owner == cid then setPlayerStorageValue(cid, 99284, -1) doSendAnimatedText(getThingPos(cid), "CAM OFF", 180) for stops = 1, #users do if users[stops] ~= owner then doPlayerStopWatching(users[stops]) end end end elseif owner == cid then setPlayerStorageValue(cid, 99284, -1) end return true endreturn trueendfunction onMove(cid, fromPosition, toPosition) -- Código não é mais necessário, feito em c++ -- Code deprecated, made in c++ --if not canWalkOnPos(toPosition, false, false, false, true, false) and getPlayerStorageValue(cid, 17000) >= 1 then -- doTeleportThing(cid, fromPosition, false) -- doPlayerSendCancel(cid, "Sorry, not possible.") --end if getPlayerStorageValue(cid, 99284) <= 0 then return true end local speed = getCreatureSpeed(cid) local a = getWatchingPlayersFromPos(cid, fromPosition) for b = 1, #a do if getCreatureSpeed(a[b]) ~= speed then doChangeSpeed(a[b], - getCreatureSpeed(a[b])) doChangeSpeed(a[b], speed) end doTeleportThing(a[b], toPosition, true) endreturn trueendlocal permited = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s","t", "u", "v", "x", "w", ",", "'", '"',"y", "z", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", ".", "!", "@", "#", "$", "%", "&", "*", "(", ")","-", "_", "+", "/", ";", ":", "?", "^", "~", "{", "[", "}", ]", ">", "<", "£", "¢", "¬"}function onTextEdit(cid, item, newText) if item.itemid == 12330 then if getPlayerStorageValue(cid, 99284) >= 1 then doPlayerSendCancel(cid, "You are already on air!") return false end local channelName = getCreatureName(cid).."'s TV Channel" if string.len(newText) <= 0 then doPlayerSendCancel(cid, "Your channel is going to be shown as \""..getCreatureName(cid).."'s TV Channel\".") elseif string.len(newText) > 25 then doPlayerSendCancel(cid, "Your channel name can't have more than 25 characters.") return false else channelName = newText end setPlayerStorageValue(cid, 99284, 1) setPlayerStorageValue(cid, 99285, "") setPlayerStorageValue(cid, 99285, channelName) doPlayerCreatePrivateChannel(cid, channelName) doSendAnimatedText(getThingPos(cid), "ON AIR!", COLOR_GRASS) return false endreturn trueend

up

Eai pessoal do xTibia. Estou com um grande problema aqui no meu Duelo System de PDA.. quando chamo um jogador para Duelo abre uma janela no chat mostrando a quantidade de players, exemplo: 1 x 1 e também abre uma janela mostrando a quantidade de pokemons que vai ser no duelo, exemplo: 6 x 6.. eu queria que ao chamar não abrisse janela alguma no chat. Alguem poderia me ajudar? segue uma foto mostrando o erro. INFO: TFS 0.3.6 Imagem 1 do Erro: Imagem 2 do Erro: Imagem 3 do Erro: up

up

up

up

up

up

aqui está meu caro: local fishing = {["Magikarp"] = {skill = 0, level = -2},["Poliwag"] = {skill = 10, level = 20},["Horsea"] = {skill = 10, level = 24},["Goldeen"] = {skill = 15, level = 24},["Krabby"] = {skill = 20, level = 28},["Tentacool"] = {skill = 20, level = 35},["Poliwhirl"] = {skill = 40, level = 40},["Seaking"] = {skill = 40, level = 40},["Kingler"] = {skill = 45, level = 50},["Seadra"] = {skill = 45, level = 55},["Poliwrath"] = {skill = 52, level = 80},["Kingdra"] = {skill = 52, level = 85},["Gyarados"] = {skill = 180, level = 95},["Tentacruel"] = {skill = 190, level = 95},}local storage = 15496local bonus = 40local limite = 80local function doFish(cid, pos, ppos, chance, interval, number) if not isCreature(cid) then return false end if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then return false end if getPlayerStorageValue(cid, storage) ~= number then return false end doSendMagicEffect(pos, CONST_ME_LOSEENERGY)local peixe = 0local playerpos = getClosestFreeTile(cid, getThingPos(cid))local fishes = {}local randomfish = "" --alterado!! if getPlayerSkillLevel(cid, 6) < limite then doPlayerAddSkillTry(cid, 6, 100)--- 100 endfor a, b in pairs (fishing) do if getPlayerSkillLevel(cid, 6) >= b.skill then table.insert(fishes, a) endend if math.random(1, 100) <= chance then if getPlayerSkillLevel(cid, 6) < limite then doPlayerAddSkillTry(cid, 6, bonus) end randomfish = fishes[math.random(#fishes)] peixe = doSummonCreature(randomfish, playerpos) if not isCreature(peixe) then addEvent(doFish, interval, cid, pos, ppos, chance, interval, number) return true end if #getCreatureSummons(cid) >= 1 then doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173) doChallengeCreature(getCreatureSummons(cid)[1], peixe) else doSendMagicEffect(getThingPos(cid), 173) doChallengeCreature(cid, peixe) end doCreatureSetNoMove(cid, false) doRemoveCondition(cid, CONDITION_OUTFIT) return true endaddEvent(doFish, interval, cid, pos, ppos, chance, interval, number)doCreatureSetNoMove(cid, true)return trueendlocal waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}function onUse(cid, item, fromPos, itemEx, toPos)if getPlayerGroupId(cid) == 11 thenreturn trueendlocal checkPos = toPoscheckPos.stackpos = 0if getTileThingByPos(checkPos).itemid <= 0 thendoPlayerSendCancel(cid, '!')return trueendif not isInArray(waters, getTileInfo(toPos).itemid) thenreturn trueendif (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying thendoPlayerSendCancel(cid, "You can't fish while surfing/flying.")return trueendif isInArray(waters, getTileInfo(getThingPos(cid)).itemid) thendoPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")return trueendif getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")return trueend if not tonumber(getPlayerStorageValue(cid, storage)) then local test = io.open("data/sendtobrun123.txt", "a+") local read = "" if test then read = test:read("*all") test:close() end read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage).."" local reopen = io.open("data/sendtobrun123.txt", "w") reopen:write(read) reopen:close() setPlayerStorageValue(cid, storage, 1)endsetPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1) if getPlayerStorageValue(cid, storage) >= 800 then setPlayerStorageValue(cid, storage, 1) endlocal delay = 1500 - getPlayerSkillLevel(cid, 6) * 50local chance = 7 + getPlayerSkillLevel(cid, 6) / 6.5outfit = getCreatureOutfit(cid)if getPlayerSex(cid) == 0 then out = 1467else out = 1468enddoSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1)doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))return trueend

up

valeu mesmo cara! vou ver o que consigo. REP+

Olá xTibia, Gostaria de saber se algum de vocês poderiam me dizer como faço para quando eu pescar um pokemon dar battle para o meu summon sem eu dar target no pokemon pescado? Grato desde já! up

up

alguem sabe me dizer se a porta do cp é automatica? abre e fecha sozinha ao player se aproximar e se distanciar?

Olá pessoal, Gostaria de saber se algum de vocês sabe me informar como faço para mudar apenas o level do pokemon Wild(Selvagem) e quando eu der catch nesse pokemon Wild ele vir com level padrão do configuration. Exemplo: deu respawn de um Charizard [250] matando esse charizard, taco a ball e pego, quero que ele não venha com mesmo level do Wild e sim da tabela em configuration.. como faço isso? Obs: já alterei o "WildLvlMin & WildLvlMax" e mesmo assim quando pego o pokemon ele vem com mesmo Level que estava antes de eu pegar. Linha de exemplo contida no "Lib/Configuration.lua": ["Charizard"] = {offense = 11.5, defense = 10.5, specialattack = 13.5, vitality = 18, agility = 0.3, exp = 729, level = 75, wildLvlMin = 70, wildLvlMax = 75, type = "fire", type2 = "flying"}, Grato desde já.

Olá XTibia, Tudo beleza com vocês?! espero que sim. Bom, vamos ao que interessa.. gostaria de saber se algum de vocês saberiam fazer algo com que o Summon (Pokemon sumonado pelo player) pegasse condição de FIGHT também, ao invés de só o Player, ambos pegarem FIGHT. Grato desde já.

up

Olá XTibia, alguem poderia me disponisbilizar Order System? (Sistema que faz com que o pokemon seja movido de uma direção para outra) grato desde já.