Ir para conteúdo
  • Cadastre-se

L3K0T

Moderador
  • Total de itens

    2068
  • Registro em

  • Última visita

  • Dias Ganhos

    77

Tudo que L3K0T postou

  1. Pode ser o banco de dados caindo e voltando aí da erro ninguém entra
  2. function onSay(cid, words, param, channel) local t = {} for i = 1, getPlayerInstantSpellCount(cid) do local spell = getPlayerInstantSpellInfo(cid, i - 1) if(spell.mlevel ~= 1) then if(spell.manapercent > 0) then spell.mana = spell.manapercent .. "%" end table.insert(t, spell) end end table.sort(t, function(a, b) return a.mlevel < b.mlevel end) local text, prevLevel = "", -1 for i, spell in ipairs(t) do local line = "" if(prevLevel ~= spell.mlevel) then if(i ~=
  3. <?php if (!defined('INITIALIZED')) exit; // Função para verificar se é hora de resetar os highscores function deveResetarHighscores() { // Coloque aqui a lógica para determinar se é hora de resetar os highscores // Por exemplo, verificar se passou uma certa quantidade de tempo desde o último reset // Retorne true se for hora de resetar, caso contrário, retorne false $lastResetTimestamp = /* Coloque aqui o timestamp do último reset */; $interval = 5 * 60; // 5 minutos em segundos $currentTimestamp = time(); // Verifica se passou o intervalo de tempo definido des
  4. Lib function table.unserialize(str) if(type(str) ~= 'string' or str:len() == 0) then return {} end return loadstring("return " .. str)() end
  5. local POLL_STORAGE = 80000 local OPTIONS_STORAGE = 80001 local PLAYER_STORAGE = 80000 function table.serialize(tbl) local str = "{" local sep = "" for k, v in pairs(tbl) do str = str .. sep if type(k) == "number" then str = str .. "[" .. k .. "]" else str = str .. k end str = str .. "=" if type(v) == "table" then str = str .. table.serialize(v) elseif type(v) == "number" or type(v) == "boolean" then str = str .. tostring(v) else str = str .. string.format("%q
  6. local POLL_STORAGE = 80000 local OPTIONS_STORAGE = 80001 local PLAYER_STORAGE = 80000 local function getTotalVotes() local options = table.unserialize(getStorage(OPTIONS_STORAGE)) local amount = 0 for _, option in ipairs(options) do amount = amount + option[2] end return amount end local function getMostVotedOption() local options = table.unserialize(getStorage(OPTIONS_STORAGE)) local value, ret = 0, {} -- Inicialize ret as an empty table for _, option in ipairs(options) do if option[2] > value then value = option[2] ret = {optio
  7. Coloca imagens por gentileza?? Scan e remova links de mensagens pessoais
  8. Top no final pra deixar melhorzinha explicado function onOpenRuleViolation(cid, message) -- Configuração do Telegram local config = { token = "", -- Token do seu BOT no Telegram chatId = "" -- ID do chat do Telegram que receberá a notificação. } -- Construção da mensagem com o nome do jogador e o relatório local playerName = getCreatureName(cid) local formattedMessage = "Player: " .. playerName .. "\n\nReport:\n" .. message -- Substitui quebras de linha por '%0A' para o formato adequado na URL formattedMessage = string.gsub(formattedMessage, "\n", "%%0A") -- Const
  9. local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} local item1 = 123 -- item local qntd1 = 1 -- quantia local stor = 1023332 local function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end local function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end local function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end local function onThink() npcHandler:onThink() end local function creatureSayCallback(cid, type, msg) i
  10. function onUse(player, item, fromPosition, target, toPosition, isHotkey) local pid = getPlayerGUID(player) local resetSystem = { back_to_level = 500, Reset = { [1] = {needed_level = 15000, damage_percent = 2}, [2] = {needed_level = 16000, damage_percent = 4}, [3] = {needed_level = 16500, damage_percent = 6}, [4] = {needed_level = 16700, damage_percent = 8}, [5] = {needed_level = 20000, damage_percent = 10}, [6] = {needed_level = 20000, damage_percent = 12}, [7] = {needed_level = 20000, d
  11. local config = { monsters = {"The Mega Boss Rox"}, rewards = { {itemID = 2160, chanceToGainInPercent = 3, quantity = 100}, {itemID = 2148, chanceToGainInPercent = 3, quantity = 100}, }, effect = 27, backpackID = 2853, -- ID da mochila, ajuste conforme necessário } -- Função para selecionar um item com base na porcentagem function selectRandomItem() local totalChance = 0 for _, reward in pairs(config.rewards) do totalChance = totalChance + reward.chanceToGainInPercent end local randomValue = math.random(1, totalChance) local cu
  12. -- Lista de eventos com seus respectivos horários local EventsListalist = { {time = "08:00", name = "Bomberman Event"}, {time = "09:00", name = "Desert War"}, {time = "10:00", name = "Snowball War"}, {time = "11:00", name = "Capture The Flag"}, {time = "12:00", name = "Battlefield Event"}, {time = "13:00", name = "Zombie Event"}, {time = "14:00", name = "Desert War"}, {time = "15:00", name = "Snowball War"}, {time = "16:00", name = "Battlefield Event"}, {time = "17:00", name = "Capture The Flag"}, {time = "18:00", name = "Zombie Event"}, {time =
  13. Salve comprei outro celular voltar a ajudar vocês moto Edge 20 bem melhor kkk

  14. Sim! não é recomendado, pois pode afetar o desempenho e a estabilidade do servidor.
  15. Estou meio ausente pois meu celular tá quebrado e meu PC tá na fase final de montagem, logo volto...

  16. local damageTable = { {4, -3}, -- Quantidade / dano {9, -2}, {20, -1} } local function createExplosion() local explosion = createConditionObject(CONDITION_FIRE) setConditionParam(explosion, CONDITION_PARAM_DELAYED, 1) for i = 1, #damageTable do local t = damageTable[i] addDamageCondition(explosion, t[1], 1000, t[2]) -- tempo end return explosion end local function explodeCreature(creature) if isCreature(creature) then local explosion = createExplosion() local area = createCombatArea({{1, 1, 1}}) doAreaCombatHealth(
  17. Internet.... Não vale a pena perder tempo com pessoas assim, rsrs. Eu nem responderia. Prefiro dizer: 'Seja feliz, a vida continua'. Manter a confiança e a amizade é precioso, e acredito que você agiu da maneira ???. Ainda por cima, o mesmo ameaçando? Que atitude feia... Perturbação do sossego e fazendo injúria, realmente tenso. A única coisa que ninguém pode tirar de você é o conhecimento, haha. Boa noite e espero que tudo fique bem pra vocês *se puder remover os palavrão do seu texto... deixa algo mais saudável
  18. local explosion = createConditionObject(CONDITION_FIRE) setConditionParam(explosion, CONDITION_PARAM_DELAYED, 1) local damageTable = { {4, -3}, -- Quantidade / dano {9, -2}, {20, -1} } for i = 1, #damageTable do local t = damageTable[i] addDamageCondition(explosion, t[1], 1000, t[2]) -- tempo end local arr = { {1, 1, 1}, {1, 3, 1}, {1, 1, 1} } local area = createCombatArea(arr) function onDeath(cid, corpse, killer) if isCreature(cid) then if isSummon(cid) or isMonster(cid) then doAreaCombatHealth(cid, 1, getThingPos(cid), area, -1, -
  19. então, não adianta usar chat gpt, se não souber o que ele escreveu... precisa analisar os codigo e traduzir na sua mente, agora se não entende o que ele escreveu é = tiro no escuro. e seu código não está em lua tbm oque mandou e sim em python mande o arquivo .lua do exp...
  20. local explosion = createConditionObject(CONDITION_FIRE) setConditionParam(explosion, CONDITION_PARAM_DELAYED, 1) local damageTable = { {4, -3}, -- Quantidade / dano {9, -2}, {20, -1} } for i = 1, #damageTable do local t = damageTable[i] addDamageCondition(explosion, t[1], 1000, t[2]) -- tempo end local arr = { {1, 1, 1}, {1, 3, 1}, {1, 1, 1} } local area = createCombatArea(arr) function onDeath(cid, corpse, killer) if isMonster(cid) then doAreaCombatHealth(cid, 1, getThingPos(cid), area, -1, -30, 5) doAreaCombatCondition(cid, getThingPos
×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo