Pesquisar na Comunidade

Galera, to com um problema no meu server que o 7º poke a ser capturado com 6 pokes na bag não vai pro depot, captura mas não fica no depot erro na distro: [17/11/2018 15:58:02] [Error - Action Interface] [17/11/2018 15:58:02] In a timer event called from: [17/11/2018 15:58:02] datapack/actions/scripts/catch.lua:onUse [17/11/2018 15:58:02] Description: [17/11/2018 15:58:02] (luaDoItemSetAttribute) Item not found catch system.lua : local topquest = 1 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 = 2 * 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) local quero_esses = {4,3} if rate >= totalChance then local status = {} status.gender = quero_esses[math.random(1, #quero_esses)] 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 quero_esses = {4,3} local status = {} status.gender = quero_esses[math.random(1, #quero_esses)] 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 quero_esses = {4,3} if poke == "Porygon" or poke == "Metagross" or poke == "Porygon2" or poke == "Metang" or poke == "Beldum" or poke == "Shiny Metagross" or poke == "Solrock" then gender = 1 else gender = quero_esses[math.random(1, #quero_esses)] end local happy = 250 --alterado v1.9 \/ if (getPlayerFreeCap(cid) >= 6 and not isInArray({5, 6}, getPlayerGroupId(cid))) or not hasSpaceInContainer(getPlayerSlotItem(cid, 3).uid) then if ballid == 11826 then item = doCreateItemEx(11828) else item = doCreateItemEx(ballid-1) end 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, "exp", 0) doItemSetAttribute(item, "level", 1) 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, "Parabens, voce capturou um ("..poke..")!") doPlayerSendTextMessage(cid, 27, "Como voce ja ests segurando seis pokemons, este pokeball foi enviado para o seu deposito.") else addTopQuest(cid, topquest) doPlayerSendTextMessage(cid, 27, "Parabens, voce capturou um ("..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 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 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) 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 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 Me ajudem pfv

Diga em poucas palavras a base utilizada (Nome do servidor ou nome do website). TFS 0.3.6 Olá estava tentando fazer um script(globalevent) com que o jogador que tiver o maior storage ganhar um premio(apenas o que tiver o maior), porém não consigo encontrar as funções, só consegui criar um script se o jogador tiver storage maior que x ele ganha o premio

Boa tarde tibianos, estou precisando de uma SUPER AJUDA, no meu servidor de war, nao importa o seu level que voce estará sempre ganhando mais e mais xp, por exemplo, um level 150 mata um lv 130 e sobe para 155 exemplos então gostaria que tipo, voce lv 150 se matar level 145 até 155 (diferença de 10 para baixo e 5 para cima) ganhará 2 leveis se voce for level 150 e matar um level 144 para baixo, voce ganhará nada (diferença de 11 para baixo) e se voce level 130 matar um player com level +6 (diferença de 6 por exemplo 136) mais alto que você, ganhará 3 leveis estou precisando muuuuuito desse script, quem puder me ajudar ficarei bastante feliz, muito obrigado tfs 0.4 8.6

Alguem ae se solicita a ajudar!, Eu n conssigo centralizar o poder! ja mexi no x+1, y+1 e no Z, alguem ae ajuda pfv! local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_HITCOLOR, COLOR_RED) setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 321) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -500.0, 0, -550.0, 0) local function onCastSpell1(parameters) doCombat(parameters.cid, parameters.combat1, parameters.var) end function onCastSpell(cid, var) local waittime = 1 -- Tempo de exhaustion local storage = 1203 if exhaustion.check(cid, storage) then return false end exhaustion.set(cid, storage, waittime) local position1 = {x=getThingPosition(getCreatureTarget(cid)).x+1, y=getThingPosition(getCreatureTarget(cid)).y+1, z=getThingPosition(getCreatureTarget(cid)).z} local parameters = { cid = cid, var = var, combat1 = combat1 } addEvent(onCastSpell1, 0, parameters) return true end

Olá pessoal, não estou conseguindo fazer uma spell que forneça resistencia a danos físicos e elemental por alguns segundos. Alguém poderia ajudar, uso tfs 1.2.

Diga em poucas palavras a base utilizada (Nome do servidor ou nome do website). TFS 0.4 Base: GLOBAL 8.6 Boa noite!! Alguém teria como me ajudar por favor com um script de um item que usasse e a partir dali, concedesse mais 50% de xp por 24 horas por favor ? Depois o item tem que sumir e ao ser consumido novamente, reativar o bônus. Muito obrigado.

Base: TFS 0.4.0 Qual erro está surgindo/O que você procura? Resolvi fazer um script para quando o player pisasse em um determinado SQM, surgisse um NPC em certo ponto do mapa. A minha ideia era que o npc surgisse apenas uma vez, então resolvi utilizar uma globalstorage para que assim que o primeiro player acionasse o evento, todos os demais não conseguissem. O script funcionou perfeitamente, e de fato apenas o primeiro player consegue trazer o NPC para o local desejado. O problema é que a global storage não fica salva no valor que eu determinei (no caso, "1") e quando o servidor é fechado/reinicia, os outros jogadores conseguem acionar o evento - o que eu não quero que aconteça. Gostaria de saber se as globalstorage permanecessem salvas, ou o que fazer para que elas fiquem salvas. Notei que no config.lua há a seguinte opção: "saveGlobalStorage = true", mas ela já está configurada como "true", então não creio que seja isso. Acho que não é a opção ideal, mas para solucionar o caso, também seria possível atualizar a storage de todos os players do servidor (ao invés de utilizar a global storage). Se alguém puder me ajudar com o script, eu agradeço. Imagino que ficaria algo como: "for (id do primeiro ao último player do banco de dados) atualizar o value de uma key da tabela player_storage", mas eu não faço ideia de como isso fica em código. Você tem o código disponível? Se tiver publique-o aqui: local pos = {x=875,y=398,z=7} -- Local do NPC function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor) if getGlobalStorageValue(9000) <= 0 then if isPlayer(cid) and getPlayerAccess(cid) < 3 and getPlayerStorageValue(cid, 9000) <= 0 then doCreateNpc("GoblinAssustadoOesteCidade", pos) end setGlobalStorageValue(9000, 1) end return true end

Diga em poucas palavras a base utilizada (Nome do servidor ou nome do website). TFS 0.4 TIBIA GLOBAL 8.6 Base: GLOBAL 8.6 Qual erro está surgindo/O que você procura? Boa tarde!! PRezados, Eu estou quebrando a cabeça, mas nada dá certo. Tenho um sistema de vip no ot, ele funciona com os comandos do God, addvipdays, mas gostaria de colocar um vip item que desse dias de vip, eu encontrei alguns scripts, porém, ele adiciona os dias de vip, mas não autoriza a passagem pela porta do barco. Já olhei a action id que está na porta do barco é a 15000. No script original, a storage vinha : 13540, tbm não deu certo. OBs, eu coloquei no actions xml certinho. Vou colocar o vip system para vocês verem também em anexo. O Vipaccountlua que está dentro da pasta data lib e o Viptile.lua que está dentro da pasta movements. Ele soma os dias vip mas não passa na porta, a minha base de dados tem as colunas em account, viptime, vipdays e vip_time. Se alguém puder me ajudar por favor. Obrigado. Você tem o código disponível? Se tiver publique-o aqui: function onUse(cid, item, fromPosition, itemEx, toPosition) local config={ removeOnUse = "yes" -- remover quando usar ("yes" or "no") } local days = 30 -- dias que serão adicionados local daysvalue = days * 24 * 60 * 60 local storageplayer = getPlayerStorageValue(cid, 15000) local timenow = os.time() if getPlayerStorageValue(cid, 15000 ) - os.time() <= 0 then time = timenow + daysvalue else time = storageplayer + daysvalue end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.") setPlayerStorageValue(cid, 15000, time) local quantity = math.floor((getPlayerStorageValue(cid, 15000) - timenow)/(24 * 60 * 60)) doSendMagicEffect(getPlayerPosition(cid), math.random(28,30)) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de VIP restantes.") if (config.removeOnUse == "yes") then doRemoveItem(item.uid, 1) end return TRUE end Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui. vipAccount.lua viptile (2).lua

Tem como ao invés de remover os itens, eles serem movidos para Backpack ou Depósito? Código:

Olá Galera, o script logo abaixo tem como objetivo criar um monstro, eu gostaria de colocar mais uma condição nesse script que é o seguinte : Uma condição que verifica que o monstro já está criado e que ele deve ser morto para ser criado novamente ! Alguém manja ? Tentei mas não consegui local time = 600 -- tempo em segundos para usar local monster = "Demon" -- "Monstro" entre aspas local pos = {x=805, y=568, z=7} -- Posição que irá nascer. function onUse(cid, item, frompos, itemex, topos) if item.itemid % 2 == 1 then doTransformItem(item.uid, item.itemid + 1) else doTransformItem(item.uid, item.itemid + -1) end if getStorage(2111) - os.time() < 1 then doSetStorage(2111, os.time() + time) addEvent(function() doCreateMonster(monster, pos) end, 10000) doCreatureSay(cid, "Demon Invocado ! Prepare-se !", TALKTYPE_MONSTER) else doPlayerSendCancel(cid, "Voce precisa esperar ".. getStorage(2111) - os.time() .." Segundos restantes") doSendMagicEffect(getThingPos(cid), CONST_ME_POFF) end return true end

Boa tarde tibianos, estou pegando o meu baiak e transformando em um otserv de WAR, porem tem player com o mesmo IP mata o mesmo player, ele ganha level, gostaria que o player nao ganhasse nada vi esse tópico mas nao entendi nada kkk então gostaria que alguem me ajudasse meu creaturescript meu login

Olá TK, gostaria de pedir a ajuda para esse sistema que tem no meu servidor ( Chunin e Jounin ) como eu passei meu servidor para 0.4 , esse script tem funcionado pela metade e não da erros na distro.. o correto era ao entrar na arena spawnava o mostro ( ate ai tudo bem ) porem quando o primeiro morre os demais não nascem em seguida e ao matar todos ter teleportado. segue os abaixo o scripts Scripts: ( Chunin ) creaturescript(boss.lua) Boss1.lua ( para cada mostro diferente e criado um arquivo lua ex:boss2 ... ( Jounin ) creaturescript(boss.lua) Boss1.lua Movements / Chunin Movements / Jounin

Diga em poucas palavras a base utilizada (Nome do servidor ou nome do website). OTXServer 3.1 Based on TFS 1.3 (By Malucoo) Base: TFS 1.3 Qual erro está surgindo/O que você procura? can not load script: Tutorial_NPCS/Ariana.lua 'end' expected <to close 'if' at line 44> near '<eof>' Você tem o código disponível? Se tiver publique-o aqui: 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 local voices = { { text = 'Evil little beasts... I hope someone helps me fight them.' }, { text = 'Nasty creepy crawlies!' }, { text = 'Hey! You over there, could you help me with a little quest? Just say \'hi\' to talk to me!' }, { text = 'Don\'t be shy, can\'t hurt to greet me with \'hi\'!' } } npcHandler:addModule(VoiceModule:new(voices)) function creatureSayCallback(cid, type, msg) if not npcHandler:isFocused(cid) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if msgcontains(msg, "new") then selfSay("Yes... Smells like new, like the all of the new adventurers than come of north looks like. Hey, Tell me a thing, you are interested in make me a favor? Tell me {yes} or {no}", cid) talkState[TalkUser] = 1 else if msgcontains(msg, "yes") and talkState[talkUser] == 1 then selfSay("Oh, Great! So.. I have an infestation of cockroaches under my house, right there, down the stairs...", cid) selfSay("*Cooff Coff..* I need you to eliminate the cockroaches and bring me your legs... I need those little things to make a good soup recipe I learned recently...", cid) selfSay("You do not seem to be ready to deal with those disgusting things. So take it here, I'll give you a coat and a club. When ready, go down the indicated stairs and kill them.", cid) selfSay("When you get the three legs, come back here and say {complete} to me.", cid) SetPlayerStorageValue(cid, 1001, 1) doPlayerAddItem(cid, 2651, 1) doPlayerAddItem(cid, 2382, 1) Position(880, 1051, 7):sendMagicEffect(CONST_ME_TUTORIALARROW) elseif msgcontains(msg, "no") and talkState[talkUser] == 1 then selfSay("Ok then.. Maybe later! ", cid) npcHandler:releaseFocus(cid) npcHandler:resetNpc(cid) talkState[talkUser] = 0 if msg == "complete" and GetPlayerStorageValue(cid, 1001) == 1 then if getPlayerItemCount(cid,8710) >= 3 then doPlayerRemoveItem(cid,8710, 3) selfSay("Yeah! thank you for helping me! My soup will be tasty! ", cid) selfSay("For that, I'll grant you 100 experience points! Oh - what was that? I think you advanced a level! Congratulations!", cid) selfSay("If you want to continue your adventure continue following this path. With luck you should find Brul, he is a hunter who has lived here for a long time! See if he needs anything. Maybe he does not have something to offer you!", cid) player:addExperience(100, true) player:getPosition():sendMagicEffect(CONST_ME_GIFT_WRAPS) SetPlayerStorageValue(cid, 1001, 2) else if msg == "complete" and GetPlayerStorageValue(cid, 1001) == 1 then if GetPlayerItemCount(cid, 8710) < 3 then selfSay("You have no cheap leg. Are you sure you killed them and opened their bodies?", cid) selfSay("Click with the right button of your mouse above the dead body and click with left button on the \'Open\' option, when the loot appears, drag the items into your bag.", cid) SelfSay("Keep trying!", cid) npcHandler:releaseFocus(cid) npcHandler:resetNpc(cid) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Base:DXP V3. Olá a todos, esse é meu primeiro post então desculpe os erros : P Bom esses dias me surgiu uma ideia de implementar um system de shiny charm no meu servidor o qual quando o player ativa tal item ele recebe um bonus chance de spawnar shiny. Porém o max que consegui fazer foi um script que ao clicar envia uma mensagem que o item esta ativado : / , então gostaria de pedir ajuda de vocês como posso processeguir com o system? Agradeço dês de já o/ Você tem o código disponível? Se tiver publique-o aqui: function onUse(cid, item, fromPosition, item2, toPosition) local item_id = 17105 -- ID Shiny Charm if getPlayerItemCount(cid,item_id) == 1 then doSendMagicEffect(getPlayerPosition(cid), 10) doPlayerSendTextMessage(cid, 22, "Shiny Charm Ativado!") end Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.

bom galera queria um script que o player só poderia entra em uma x area se estiver a storage 43352. Queria que quando o player sair dessa x area remova essa storage 43352. Exemplo: o player compra um item ou arrumar nos boss, quando ele dê use no item ativará a storage 43352. assim dando a permisão de entra na x area. caso o player esteja nessa x area e invente de sair, queria que remove-se a storage 43352. Assim o player terá que arruma o item novamente para entra na x area. tfs 0.4 versao 8.60

Bom dia, estou com uma duvida em um script, ja tentei colocar quantidade do item, mas nao estou conseguindo fazer funcionar. Alguém pode me ajudar? 😄 Ex. TFS 0.4; function onUse(cid, item, fromPos, item2, count, toPos) local _ = { [1] = {aid = 1234, item = 2160,25}, -- Aqui gostaria de colocar a quantidade 25 e colocar mais de um item em um unico bau. [2] = {aid = 1235, item = 2195}, [3] = {aid = 1231, item = 3121}, } for i = 1, #_ do _.storage = 202049 + i end for i, valor in ipairs(_) do if item.actionid == valor.aid then if getPlayerFreeCap(cid) >= getItemWeightById(valor.item, 1) then if getPlayerStorageValue(cid, valor.storage) == -1 then if doPlayerAddItem(cid, valor.item, 1, false) then doPlayerSendTextMessage(cid, 22, 'You have found a '..getItemNameById(valor.item)..'.') setPlayerStorageValue(cid, valor.storage, 1) else doPlayerSendTextMessage(cid, 22, 'You have found a '..getItemNameById(valor.item)..', but you need a free slot.') end else doPlayerSendTextMessage(cid, 22, 'It is empty.') end else doPlayerSendTextMessage(cid, 22, 'You have found a '..getItemNameById(valor.item)..'. It weighs '..getItemWeightById(valor.item, 1)..'.00 and it is too heavy.') end break end end return true end Gostaria de colocar mais de um item no bau e quantidade, mas manter esse esquema de script pois iria facilitar muito organizar as quests do meu servidor. Obrigado! Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.

Galera, é o seguinte: Tenho um evento snowball que abre de hora em hora. Se possível, queria apenas um talkaction que abrisse o evento quando executada. Se precisarem de algum script para base digam qual.

Preciso de algum programador em .lua que aceite pagamento no paypal/picpay!

Galera, Olha eu aqui novamente... primeiramente, me desculpe se não for a área correta. estou em busca de algo um pouco simples hehehe, porém muitos se recusam a disponibilizar =[ estou criando um servidor de pokemon, mas os meus pokes estão um pouco desbalanceados e seus ataques não estão completos... alguém poderia por favor? Disponibilizar os pokemons da primeira geração, com magias e loots o mais correto possível? para que a partir dos mesmos, eu consiga progredir? Obrigado -Loots -Ataques -Magias Obrigadooo

Olá, Bom Dia, Gostaria De Saber Ce Alguem Pode Me Ajudar Com Essse Systema ?? Esta funcionando Perfeitamente Só Que Quando 1 Player Morrer Na Arena, Os bixo Nao Reseta Para O Proximo Jogador Entrar, Por exemplo >> Eu Chego Na Wave 14 e morro nela, os bixo permanecem la, ai quando algum Player For Entrar Nessa Survival, Ele pega esses bixo da minha wave. O Certo Era Que Quando 1 Player entrar la Os Mobs Que Estao La Some é A wave Começa do 1 dnv. Agradeço De Coração Ce Alguem Poder ai Me Ajudar, E Se for Algum Escript Pra Fazere Os Bixo Sumir De La Quando Algum Player Morrer Na Survival, Podem me Passa? Dou Rapp + E Melhor Resposta. Obg <?xml version="1.0" encoding="UTF-8"?> <!-- ULTIMATE SURVIVAL - Codigo feito por Omega / Pedido por vinnevinne Informacoes: http://www.xtibia.com/forum/topic/221415-ultimate-survival/ --> <mod name="Ultimate Survival" version="1.0" author="Omega" enabled="yes"> <config name="ultimatelib"><![CDATA[ USurvival = { posi = {x=1785, y=269, z=9}, -- parte esquerda superior da arena posf = {x=1798, y=290, z=9}, -- parte direita inferior da arena posc = {x=1791, y=280, z=9}, -- onde o player entra na arena waves = { [1] = {monsters = {'wolf', 'wolf'}, count = 10, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [2] = {monsters = {'wolf', 'fighter', 'paikuhan'}, count = 13, reward = {exp = 0, item = 2160, amount = 1, money = 5000000}}, [3] = {monsters = {'bandit scout', 'ice elemental', 'fire elemental'}, count = 15, reward = {exp = 0, item = 2160, amount = 1, money = 10000000}}, [4] = {monsters = {'namekjin', 'ice elemental', 'gohan ssj2', 'paikuihan'}, count = 20, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [5] = {monsters = {'namekjin', 'space soldier', 'android evolution v1', 'giat bandit'}, count = 25, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [6] = {monsters = {'giat bandit', 'namekjin', 'boo', 'frontal cyborg'}, count = 25, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [7] = {monsters = {'android evolution v2', 'namekjin mindcontroller', 'android evolution v1', 'dragon'}, count = 26, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [8] = {monsters = {'black dragon', 'dragon', 'licantropo', 'undead dragon'}, count = 28, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [9] = {monsters = {'paikuhan', 'bandit', 'super paikuhan', 'giant bandit', 'goku ssj3'}, count = 20, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [10] = {monsters = {'trunks ssj2', 'goku ssj3', 'boo', 'gohan ssj2', 'golden oozaru'}, count = 21, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [11] = {monsters = {'ryan shenlong', 'goku ssj4', 'undead dragon', 'raditz ssj4', 'black dragon', 'mini black', 'li shenron'}, count = 22, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [12] = {monsters = {'li shenron', 'goku ssj4', 'li shenron max', 'king vegeta', 'san shenron'}, count = 25, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [13] = {monsters = {'hell scorpion v1', 'suu shenron', 'hell janemba teach', 'li shenron max', 'vegetto', 'san shenron', 'suu shenron'}, count = 24, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [14] = {monsters = {'hell scorpion v1', 'ryan shenlong', 'turles ssj5', 'boo', 'namekjin v1', 'licantropo', 'black dragon'}, count = 27, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [15] = {monsters = {'san shenron', 'ryan shenlong'}, count = 26, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [16] = {monsters = {'vegetto', 'dog', 'namekjin v1', 'oturles ssj5', 'hell scorpion v1', 'li shenron', 'king vegeta'}, count = 27, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [17] = {monsters = {'goku ssj5', 'Anbu'}, count = 28, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [18] = {monsters = {'vegeta ssj5', 'Anbu'}, count = 28, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [19] = {monsters = {'hell janemba teach', 'Anbu'}, count = 28, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [21] = {monsters = {'hell scorpion ssj5', 'Anbu'}, count = 28, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [22] = {monsters = {'turles ssj5', 'black dragon'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [23] = {monsters = {'raditz ssj5', 'mini black'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [24] = {monsters = {'tsuful ssj5', 'black dragon'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [25] = {monsters = {'furie gogeta', 'black dragon'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [26] = {monsters = {'freeza rage', 'mini black'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [27] = {monsters = {'strong boo', 'furie cell'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [28] = {monsters = {'hell janemba teach', 'Anbu'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [29] = {monsters = {'freeza rage', 'hell scorpion v1'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [30] = {monsters = {'vegeta ssj5', 'freeza rage'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [31] = {monsters = {'black dragon', 'mini black'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [33] = {monsters = {'furie gogeta', 'black dragon'}, count = 29, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [34] = {monsters = {'freeza rage', 'li shenron max'}, count = 30, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, [35] = {monsters = {'furie cell', 'furie gogeta'}, count = 30, reward = {exp = 0, item = 2160, amount = 1, money = 1000000}}, }, exhaust = 1 * 24 * 60 * 60, -- Tempo em segundos ate poder entrar novamente na arena (1 * 24 * 60 * 60 = 1 dia) final_reward = {item = 2160, amount = 100, exp = 10000000, money = 0}, storage_ex = 607069, storage_wave = 607089, } 　 function isWalkable(pos)-- by Nord / editado por Omega if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false elseif isCreature(getTopCreature(pos).uid) then return false elseif getTileInfo(pos).protection then return false elseif hasProperty(getThingFromPos(pos).uid, 3) or hasProperty(getThingFromPos(pos).uid, 7) then return false end return true end 　 function doSpawnMonsters(monsters, pos, radius, limit) if not pos.x or not pos.y or not pos.z or not type(monsters) == 'table' then return false end local radius = tonumber(radius) if radius > 5 then radius = 5 elseif radius < 2 then radius = 2 end if not limit or limit < 1 then limit = 1 elseif limit > radius ^ 2 then limit = math.floor((radius*1.5) ^ 2) end local k = 0 local tries = 0 repeat for x = pos.x - radius, pos.x + radius do for y = pos.y - radius, pos.y + radius do if isWalkable({x=x, y=y, z=pos.z}) then local monster = monsters[math.random(1, #monsters)] local chance = math.random(1, 100) if k == limit then break elseif chance <= 8 and doCreateMonster(monster, {x=x, y=y, z=pos.z}) then k = k + 1 end end end end tries = tries + 1 until k >= limit or tries >= 500 return k >= limit and true or false end 　 function getPlayersInArea(pos1,pos2) local players = {} if pos1.x and pos1.y and pos2.x and pos2.y and pos1.z == pos2.z then for a = pos1.x, pos2.x do for b = pos1.y,pos2.y do local pos = {x=a,y=b,z=pos1.z} if isPlayer(getTopCreature(pos).uid) then table.insert(players,getTopCreature(pos).uid) end end end return players else return false end end 　 function getMonstersInArea(pos1,pos2) local players = {} if pos1.x and pos1.y and pos2.x and pos2.y and pos1.z == pos2.z then for a = pos1.x, pos2.x do for b = pos1.y,pos2.y do local pos = {x=a,y=b,z=pos1.z} if isMonster(getTopCreature(pos).uid) then table.insert(players,getTopCreature(pos).uid) end end end return players else return false end end 　 function doCleanArena() local monsters = getMonstersInArea(USurvival.posi, USurvival.posf) for _, cid in pairs(monsters) do doRemoveCreature(cid) end end 　 function doStartWave(waveID, cid) if not isCreature(cid) then return false end if USurvival.waves[waveID] then wave = USurvival.waves[waveID] doSpawnMonsters(wave.monsters, USurvival.posc, 5, wave.count) doPlayerSendTextMessage(cid, 21, 'Wave '..waveID..' inicie abatalha! FIGHT!') end end ]]></config> 　 <action actionid="4599" event="script" override="yes"><![CDATA[ domodlib('ultimatelib') function onUse(cid, item) if getPlayerStorageValue(cid, USurvival.storage_ex) <= os.time() then if #getPlayersInArea(USurvival.posi, USurvival.posf) == 0 then doCleanArena() doTeleportThing(cid, USurvival.posc) doPlayerSendTextMessage(cid, 21, 'O jogo de sobrevicencia vai iniciar em 10 segundos') addEvent(doStartWave, 10000, 1, cid) setPlayerStorageValue(cid, USurvival.storage_wave, 1) setPlayerStorageValue(cid, USurvival.storage_ex, os.time() + USurvival.exhaust) if item.itemid % 2 == 1 then doTransformItem(item.uid, item.itemid+1) else doTransformItem(item.uid, item.itemid-1) end else doPlayerSendCancel(cid, 'Someone is already in the arena.') doSendMagicEffect(getThingPos(cid), 2) end else local left = getPlayerStorageValue(cid, USurvival.storage_ex) - os.time() left = {hour = math.floor(left/3600), minutes = math.ceil((left % 3600)/60)} doPlayerSendCancel(cid, 'You have to wait '.. left.hour ..'h and '..left.minutes..'min.') doSendMagicEffect(getThingPos(cid), 2) end return true end ]]></action> 　 <event type="login" name="US Login" event="script"><![CDATA[ domodlib('ultimatelib') function onLogin(cid) registerCreatureEvent(cid,'UltimateSurvival1') registerCreatureEvent(cid,'UltimateSurvival2') if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(getThingPos(cid), 10) end return true end ]]></event> 　 <event type="kill" name="UltimateSurvival1" event="script"><![CDATA[ domodlib('ultimatelib') function onKill(cid, target) if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then if #getMonstersInArea(USurvival.posi, USurvival.posf) == 1 then local wave = getPlayerStorageValue(cid, USurvival.storage_wave) if USurvival.waves[wave+1] then setPlayerStorageValue(cid, USurvival.storage_wave, wave + 1) addEvent(doStartWave, 5000, wave + 1, cid) doPlayerSendTextMessage(cid, 22, 'Voce passou de wave! proxima em 5 segundos') else doPlayerSendTextMessage(cid, 22, 'CONGRATULATIONS! YOU HAVE BEATEN THE ULTIMATE SURVIVAL!') local reward = USurvival.final_reward if reward.item then doPlayerAddItem(cid, reward.item, (reward.amount or 1), false) end if reward.exp then doPlayerAddExp(cid, reward.exp) end if reward.money then doPlayerAddMoney(cid, reward.money) end local medal = doPlayerAddItem(cid, 5785, 1, false) if medal then doItemSetAttribute(medal, 'description', 'This was given to '..getCreatureName(cid)..' by completing the Ultimate Survival.') doItemSetAttribute(medal,'name', 'Ultimate Survival Medal') end doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) end end end return true end 　 ]]></event> 　 <event type="preparedeath" name="UltimateSurvival2" event="script"><![CDATA[ domodlib('ultimatelib') function onPrepareDeath(cid, killers) if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then doCreatureAddHealth(cid, getCreatureMaxHealth(cid), 65535, 256, true) doRemoveConditions(cid, false) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doPlayerSendTextMessage(cid, 21, 'Too bad, you couldn\'t defeat the Ultimate Survival... Better luck next time.') local reward = USurvival.waves[getPlayerStorageValue(cid, USurvival.storage_wave)].reward if reward.item then doPlayerAddItem(cid, reward.item, reward.amount or 1) end if reward.exp then doPlayerAddExp(cid, reward.exp) end if reward.money then doPlayerAddMoney(cid, reward.money) end return false end return true end ]]></event> 　 </mod> 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.

ALGUEM ME AJUDA QUERO QUE NACSAR UM BOSS EM x=101 y=70 z=7, nome do boss = Mazorra Boss, que nacsar em 2 em 2 horas!! que mande a messagem = mazorra boss esta a 1 minuto de nascer.. obg pela atenção!

local config = { {item = 13539, qntd = 100, chance =60}, -- Segue a ordem: ID_do_item, quantidade_do_item, chance_do_item {item = 2150, qntd = 3, chance = 10}, {item = 2466, qntd = 1, chance = 5}, {item = 2470, qntd = 1, chance = 5}, {item = 2471, qntd = 1, chance = 5}, {item = 2646, qntd = 1, chance = 5}, {item = 9971, qntd = 50, chance = 10}, -- para adicionar um novo, copie esta linha e adicione abaixo desta. } local msg_sucesso = "Parabens! Voce ganhou um item premiado." -- Caso o player ganhe local msg_falha = "Nao foi desta vez, quem sabe na proxima, certo?" -- caso ele perca function onUse(cid, item, fromPos, itemEx, toPos) local c = config[math.random(1, #config)] if (c.chance >= math.random(1,100)) then doSendMagicEffect(fromPos, 49) doPlayerSendCancel(cid, msg_sucesso) doPlayerAddItem(cid, c.item, c.qntd) doRemoveItem(item.uid, 1) else doSendMagicEffect(fromPos, 3) doPlayerSendCancel(cid, msg_falha) doRemoveItem(item.uid, 1) end return true end COMO DIMINUO A CHANCE DE FALHAR QUERIA QUE FALHASSE MENOS, TA FALNHANDO DEMAIS

boa noite, alguem poderia fazer um packet que ele da items aleatorio e tem chance de vim de 1 a 5 items aleatorio 8.6 OTX @lordzetros

Alguém consegue fazer com que uma função de um script funcione em outro? Tipo, eu tenho um script de um item que assim que você da use nele, ele adiciona x dias de premium account, e também tenho um sistema que funciona na base de points, esse sistema é de quem for VIP ganha 20% a mais de exp, e como eu estou usando esse item que adiciona os dias na conta do player o sistema que da os 20% não funciona. Então quem puder modificar o script meu obrigado desde já, rep+ pra quem ajudar. Script que adiciona x dias de premium account Script que da 20% a mais de exp para quem é VIP <Fazer com que a função do item a cima /\ se aplique a esse \/> OBS: Eu recebi ajuda nesse tipo de script pelo discord do Tibia King, mais não tive muito sucesso, aos que me ajudaram @Emillysz @VitorSubhi @tataboy67 o código que me mandaram para mudar, ele não volta a mensagem de quando você estar VIP, ele não fala que por causa de você ser um jogador VIP você ganha 20% de exp.

Alguem ajuda ae, queria uma script de uma box, que tenha chance em % ex: ganha 100 gold = 60%, ganha um amor = 20%, ganha uma moeda vip = 20%... com o total de 100% alguem poderia me ajudar!! desde já agradeço!!