Ir para conteúdo

Líderes

Conteúdo Popular

Exibindo conteúdo com a maior reputação em 11/09/18 em todas áreas

  1. --[[ SCRIPTING> MarcelloMkez <scriptING ]] --[[ [supreme Reset System] Autor: rafhael Versión: 1.0 TFS: 0.3.6 Testeado en: 8.60 Fórum: [Características] ~ Versión 1.0 ~ - Resets no Look; - Premium Account ou nao; - Mudar Vocação; - Limite de Resets; - Opções para Abilitar e Desabilitar Condições; [Em Construção] - Stages Free e Premium; - 'Talvez' um novo sistema de mudar Vocação; sem data para postagem. ]] function onSay(cid, words, param) --[Configurações de Condição]__ config = { --[[verdadeiro / Falso]] needPa = false, -- Precisa de Premium Account? [true / false] needPz = true, -- Precisa estar em Protection Zone? [true / false] battle = true, -- Precisa estar sem Batlle para Resetar? [true / false] withe = false, -- Players PK Withe pode Resetar? [true / false] red = false, -- Players PK Red pode Resetar? [true / false] tp = true, -- Teleportar para o Templo após o reset? [true / false] look = true, -- Mostrar Resets no Look do Player? [true / false] addLimite = true, -- Abilitar Limite de Resets? [true / false] setClasse = false, -- Mudar Vocação do player quando resetar? [true / false] storage = 100023, -- Storage [valor] --[Configurações do Reset]__ resetStatus = { player = getPlayerGUID(cid), -- nao Mude. lvl = 796 , -- Level Necessário para Resetar. [valor] lvl_max = 1000, -- Level máximo para usar o comando lvlreset = 100, -- Level que retornará após o Reset. [valor] limite = 1, -- Máximo de resets que um player pode chegar. [valor] newClasse = 0, -- Id da Nova Vocação após o Reset. [valor] tempo= 5, -- Tempo para o Player deslogar para Resetar. Em segundos. [valor] storageNec = 58888, -- Storage necessário para utilizar o reset }, } --[Funções]__ function Reseting(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doPlayerSetVocation(cid, config.resetStatus.newClasse) doRemoveCreature(cid) db.query("UPDATE `players` SET `description` = ' [Reset "..resets.."]' WHERE `players`.`id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) return TRUE end function noAll(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doRemoveCreature(cid) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `description` = '' WHERE `players`.`id` = "..config.resetStatus.player) return TRUE end function noTeleporting(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doPlayerSetVocation(cid, config.resetStatus.newClasse) doRemoveCreature(cid) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `description` = ' [Reset "..resets.."]' WHERE `players`.`id` = "..config.resetStatus.player) return TRUE end function noLook(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doPlayerSetVocation(cid, config.resetStatus.newClasse) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doRemoveCreature(cid) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `description` = '' WHERE `players`.`id` = "..config.resetStatus.player) return TRUE end function noClasse(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doRemoveCreature(cid) db.query("UPDATE `players` SET `description` = ' [Reset "..resets.."]' WHERE `players`.`id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) return TRUE end function setClasse(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doRemoveCreature(cid) db.query("UPDATE `players` SET `description` = '' WHERE `players`.`id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) return TRUE end function look(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doRemoveCreature(cid) db.query("UPDATE `players` SET `description` = ' [Reset "..resets.."]' WHERE `players`.`id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) return TRUE end function teleporting(cid) resets = getResets(cid) setPlayerStorageValue(cid,config.storage,resets+1) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doRemoveCreature(cid) db.query("UPDATE `players` SET `description` = '' WHERE `players`.`id` = "..config.resetStatus.player) db.query("UPDATE `players` SET `level` = "..config.resetStatus.lvlreset..", `experience` = 0 WHERE `id` = "..config.resetStatus.player) return TRUE end function getResets(cid) resets = getPlayerStorageValue(cid,config.storage) if resets < 0 then resets = 0 end return resets end local resets = getResets(cid) local needLvl ="voce precisa de "..config.resetStatus.lvl-getPlayerLevel(cid).." level's para resetar." local lvlMax = string.format("voce ja passou do level maximo [%s] de reset!", config.resetStatus.lvl_max) local msg ="~~[Reset: "..getResets(cid).."]~~ 'Sucesso ao Resetar! voce sera deslogado em "..config.resetStatus.tempo.." Segundos." local msgStorage = "Voce nao esta autorizado a utilizar o !reset" local s_nec = getPlayerStorageValue(cid,config.resetStatus.storageNec) --[Condiçoes]__ if(config.needPz == true) and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then doPlayerSendTextMessage(cid,22,"voce Precisa estar em Protection Zone Para Resetar.") return TRUE elseif(config.addLimite == true) and (getResets(cid) == config.resetStatus.limite) then doPlayerSendTextMessage(cid, 22, "voce ja e Reset!.") return TRUE elseif(config.withe == false) and (getCreatureSkullType(cid) == 3) then doPlayerSendTextMessage(cid,22,"voce ta PK White, por isso nao pode resetar.") return TRUE elseif(config.red == false) and (getCreatureSkullType(cid) == 4) then doPlayerSendTextMessage(cid,22,"voce ta PK Red, por isso nao pode resetar.") return TRUE elseif(config.needPa == true) and not isPremium(cid) then doPlayerSendTextMessage(cid,22,"voce Precisa ser Premium Account para Resetar.") return TRUE elseif(config.battle == true) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then doPlayerSendTextMessage(cid,22,"voce Precisa estar sem Battle para Resetar.") return TRUE elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == true) and (config.look == true) and (config.setClasse == true) then addEvent(Reseting, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == false) and (config.look == false) and (config.setClasse == false) then addEvent(noAll, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == false) and (config.look == true) and (config.setClasse == true) then addEvent(noTeleporting, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == true) and (config.look == false) and (config.setClasse == true) then addEvent(noLook, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == true) and (config.look == true) and (config.setClasse == false) then addEvent(noClasse, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == false) and (config.look == false) and (config.setClasse == true) then addEvent(setClasse, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == false) and (config.look == true) and (config.setClasse == false) then addEvent(look, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) >= config.resetStatus.lvl and getPlayerLevel(cid) <= config.resetStatus.lvl_max and s_nec ~= -1) and (config.tp == true) and (config.look == false) and (config.setClasse == false) then addEvent(teleporting, config.resetStatus.tempo* 1000, cid) elseif (getPlayerLevel(cid) < config.resetStatus.lvl) then doPlayerSendCancel(cid, needLvl) doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) elseif (getPlayerLevel(cid) > config.resetStatus.lvl_max) then doPlayerSendCancel(cid, lvlMax) doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) elseif (s_nec == -1) then doPlayerSendCancel(cid, msgStorage) doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) return TRUE end if doPlayerPopupFYI(cid, msg) then end return TRUE end Olá, tem sim: O storage necessário é abaixo do 'tempo', onde está escrito 'storageNec', tá comentado lá na config.
  2. Master ball nao pegar pokemons megas

    Luzetti reagiu a MORDUK por uma resposta no tópico

    1 ponto
    Tenta assim, se der erro manda o erro tbm local megaBlocks = {"Mega Swampert", "Mega Blaziken"} if isInArray(megaBlocks, name) and if typeee == "master" then doSendMsg(cid, "Você não pode capturar pokemon mega com master ball.") return true end
  3. Pedido de NPC que vende runas com charges

    Serpente reagiu a DdJs por uma resposta no tópico

    1 ponto
    Acredito que você teria que deixar elas stackaveis lá pelas sources, já que nessa versão não havia isso.
  4. Fim dos otserv?

    Ackerzin reagiu a LeoTK por uma resposta no tópico

    1 ponto
    @Zzyzx eu vi isso também pelo que percebi foi com um servidor de porte grande global ou seja 1k+ de player ou seja servidores menores não precisa se preocupar até onde eu percebi kkk não sei se isso vai mudar futuramente ou não
  5. Duvida sobre o calculo do CombatFormula

    Wizip reagiu a LeoTK por uma resposta no tópico

    1 ponto
    Este tópico foi movido para a área correta. Esta é uma mensagem automática! Pedimos que leia as regras do fórum!
  6. Duvida sobre o calculo do CombatFormula

    Wizip reagiu a LeoTK por uma resposta no tópico

    1 ponto
    @Wizip da uma lida lá eu respondi aquele tópico tem a mesma dúvida que a sua
  7. Como adicionar um atributo de look nos players

    lordzetros reagiu a Gnius por uma resposta no tópico

    1 ponto
    Coloquei pra verficiar se o player tem x storage, se ele tiver storage ele ativa esse look, ai coloquei a função pra mostrar o look no some functions if getPlayerStorageValue(thing, 150420) > 0 then table.insert(str, "\nCasado com ["..getPlayerNameByGUID(k).."].") end
  8. E ai galera! Selecionei as imagens que eu achei muito iradas, teasers do novo update de inverno do Tibia. Esse update vem com uma pegada meio élfica e mística. Temos ai uma nova ilha de Ice bem grande, e melhorias nos sistemas supply stash, boost de criaturas, imbuyment e cyclopedia. Informações e Imagens pegas no Tibia Wiki: https://www.tibiawiki.com.br/wiki/Update_de_Inverno_2018 Post oficial do Tibia: https://www.tibia.com/forum/?action=thread&amp;threadid=4686175 Novos Mapas! Curtiram?
  9. (Resolvido)Skull System

    Vodkart reagiu a Celulose por uma resposta no tópico

    1 ponto
    @Andersen96 Setá conforme o nome .. SKULL_WHITE , SKULL_YELLOW , SKULL_RED , SKULL_BLACK .. você pode usar em mods seria até melhor PS: é do skyforever , você não falo qual versão era e tals Skullsystem.xml <?xml version="1.0" encoding="ISO-8859-1"?> <mod name="Skull System" version="1.0" author="Skyforever" contact="tibiaking.com" enabled="yes"> <config name="SkullC_func"><![CDATA[ function setSkullColor(cid) if not isPlayer(cid) then return end local t = { [{15,29}] = SKULL_WHITE, [{30,49}] = SKULL_YELLOW, [{50,89}] = SKULL_WHITE, [{90,149}] = SKULL_RED, [{150,math.huge}] = SKULL_BLACK } local frags = getPlayerFrags(getPlayerGUID(cid)) for var, ret in pairs(t) do if frags >= var[1] and frags <= var[2] then doCreatureSetSkullType(cid, ret) end end end function getPlayerFrags(guid) local result = db.getResult("SELECT COUNT(*) as count FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. guid) if(result:getID() ~= -1) then local count = result:getDataInt("count") result:free() return count end end ]]></config> <event type="login" name="SkullLogin" event="script"><![CDATA[ domodlib('SkullC_func') function onLogin(cid) registerCreatureEvent(cid, "ColorKill") setSkullColor(cid) return true end]]></event> <event type="kill" name="ColorKill" event="script"><![CDATA[ domodlib('SkullC_func') function onKill(cid, target) if isPlayer(cid) and isPlayer(target) then doCreatureSetSkullType(target, 0) addEvent(setSkullColor, 100, cid) end return true end]]></event> </mod> Vale lembrar você deve remover seu sistema antigo.
  10. 1 ponto
    Parabéns, seu tópico de conteúdo foi aprovado! Muito obrigado pela sua contribuição, nós do Tibia King agradecemos. Seu conteúdo com certeza ajudará à muitos outros, você recebeu +1 REP.
  11. Urgente Ajuda

    King Laker reagiu a Cat por uma resposta no tópico

    1 ponto
    Bro, esse erro é por que ficou cadastrado no mapa, no void (mapa escuro) tiles de houses, e o server nao consegue ler essa posição provavelmente. Recomendo deletar o arquivo de houses e refaze-las.
  12. (Resolvido)ERRO AO COMPILAR SOURCE DEV C++

    JuaumZzz reagiu a L3K0T por uma resposta no tópico

    1 ponto
    Bom amigo infelizmente isso é falta de configurações no dev-cpp como por exemplo instalações das boosts - bibliotecas, estarei deixando uma relíquia já pré configurada pra vc usar *Só abrir, importar a source e compilar. Download: https://www.mediafire.com/file/l887ck4uc7zu082/Dev-Cpp.zip Scan: https://www.virustotal.com/#/file/627f8580551adc000131d4f2a970c53fa492f1b68c642354f643e1180b9718b7/detection Ajudei? REP+
  13. (Resolvido)ERRO AO COMPILAR SOURCE DEV C++

    Jeanzeraa reagiu a The Ripper por uma resposta no tópico

    1 ponto
    Tente instalar no seu compilador a última versão do OpenSSL: openssl-0.9.8e-1cm.DevPak Caso não saiba instalar: abra Dev-Cpp > Tools > Packager Manager > Install > Seleciona o arquivo baixado e instala, fecha abre e testa!
  14. Transferencia de arquivos

    Ricardo Bregantini reagiu a LeoTK por uma resposta no tópico

    1 ponto
    @Ricardo Bregantini para complementar o que o daniel disse você vai ter que importar o creaturescript que faz o lance de matar o monstro e ganhar a outfit e adicionar no monstro esse script ... e fazer isso com todos os outros scripts
  15. Transferencia de arquivos

    Ricardo Bregantini reagiu a Cat por uma resposta no tópico

    1 ponto
    O problema de importar um mapa em outro é que dependendo como for configurado no processo, o mapa pode receber novas posições e alguns scripts podem requerer reparo. Mas na prática, copie o mapa mantendo actions/uniqueids/spawns e passe os arquivos para o data do seu servidor. Na hora de importar tem uma manha para escolher a posição que o mapa ficará, também há a opção ctrl + p que permite modificar o tamanho e coordenadas do mapa. Veja mais sobre o import nesse link: Spoiler
  16. (Resolvido)[Pedido] Alavanca por tempo

    joaocampos reagiu a joadson por uma resposta no tópico

    1 ponto
    Aqui... vá em action/script e crie um arquivo chamado summon.lua e coloque isso dentro local config = { pos = {x = 160, y = 58, z = 7}, -- Posiçao name = "Demon", -- nome do mosntro Time = 10, -- 10 segundos Storage = 10123 -- storage do tempo } function onUse(cid, item, frompos, item2, topos) if(exhaustion.check(cid, config.Storage) == TRUE) then doPlayerSendCancel(cid, "Você só poder puxar a alavancar em " .. config.Time .. " segundos.") return false end if item.uid == 2512 and item.itemid == 1945 or item.itemid == 1946 then doSummonCreature(config.name, config.pos) exhaustion.set(cid, config.Storage, config.Time) doPlayerSendCancel(cid, "Você Sumonou o " .. config.name .." com sucesso") end return TRUE end e depois abra o action.xml e adicione isso <action uniqueid="2512" script="Summon.lua" /> Depois disso é só abrir o RME e colocar UNIQUEID 2512 na alavanca de summon
Líderes está configurado para São Paulo/GMT-03:00

Informação Importante

Confirmação de Termo