vitor vieira

Olá pessoal aqui da comunidade, ja estou batendo cabeça aqui sobre um sistema de caça de pk ou hunted sistem ja faz quase uma semana recorrendo a todos os forums e sem sucesso, ja vi que tem aqui um post sobre este sistema , ja tentei por em pratica ele mas sem sucesso. pois a versão que estou é a 13x e os codigos não funciona na minha versão, tentei por diversas vezes fazer as modificações trazendo para o client mais atual mas nada... Alguem por gentileza tem algo ja funcionando nesta versão e que possa compartilhar? Volto a repetir, ja vi varios aqui mas tudo nas versoes antigas, que não esta dando certo para minha versão mais recente. cheguei ate este ponto aqui, mas daqui ja não estou conseguindo progredir... é erro atras de erro... segue a criação da tabela de banco do banco de dados: CREATE TABLE `busque_cabeca` ( `id` INT AUTO_INCREMENT PRIMARY KEY, -- ID único para cada entrada `fp_id` INT NOT NULL, -- ID do jogador que ofereceu a recompensa `sp_id` INT NOT NULL, -- ID do jogador caçado `k_id` INT DEFAULT 0, -- ID do jogador que matou o alvo (0 se ainda vivo) `added` INT NOT NULL, -- Timestamp de quando a recompensa foi adicionada `prize` BIGINT NOT NULL, -- Valor total da recompensa `fp_ids` TEXT, -- Lista de IDs dos jogadores que contribuíram para a recompensa `killed` TINYINT DEFAULT 0, -- Status: 0 = vivo, 1 = morto `kill_time` INT DEFAULT 0 -- Timestamp de quando o jogador foi morto ); SEGUE O CODIGO .LUA -- Definição das constantes de mensagem (ajuste conforme necessário) local MESSAGE_STATUS_CONSOLE_BLUE = 17 local MESSAGE_STATUS_CONSOLE_ORANGE = 18 -- Função auxiliar para dividir strings function string:split(sep) local fields = {} local pattern = string.format("([^%s]+)", sep) self:gsub(pattern, function(c) fields[#fields + 1] = c end) return fields end -- Função para obter o GUID do jogador pelo nome function getPlayerGUIDByName(name) print("[DEBUG] getPlayerGUIDByName called for name: " .. name) local resultId = db.storeQuery("SELECT `id` FROM `players` WHERE `name` = " .. db.escapeString(name)) if not resultId then print("[DEBUG] Player not found in database.") return nil end local guid = result.getNumber(resultId, "id") result.free(resultId) print("[DEBUG] Found player GUID: " .. guid) return guid end -- Função para verificar o dinheiro total do jogador (em mãos + banco) function getPlayerTotalMoney(player) local moneyInHand = player:getMoney() local bankBalance = player:getBankBalance() print("[DEBUG] Money in hand: " .. moneyInHand .. ", Bank balance: " .. bankBalance) return moneyInHand + bankBalance end -- Função para remover dinheiro total do jogador (priorizando o banco) function removePlayerTotalMoney(player, amount) local moneyInHand = player:getMoney() local bankBalance = player:getBankBalance() if bankBalance >= amount then -- Retira todo o valor do banco player:setBankBalance(bankBalance - amount) print("[DEBUG] Removed " .. amount .. " coins from bank.") else -- Retira o que puder do banco e o restante da bag local remainingAmount = amount - bankBalance player:setBankBalance(0) if moneyInHand >= remainingAmount then player:removeMoney(remainingAmount) print("[DEBUG] Removed " .. bankBalance .. " coins from bank and " .. remainingAmount .. " coins from hand.") else print("[DEBUG] Insufficient funds after attempting to remove money.") return false end end return true end -- Comando !busque local busque = TalkAction("!busque") busque:separator(" ") function busque.onSay(player, words, param) print("[DEBUG] !busque called by player: " .. player:getName()) local t = param:split(" ") if #t < 2 then print("[DEBUG] Insufficient parameters provided.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Use: \"!busque [valor] [nick]\" Exemplo de prêmio: 1(k).") return true end local prize = tonumber(t[1]) local targetName = t[2] print("[DEBUG] Prize: " .. tostring(prize) .. ", Target Name: " .. targetName) if not prize or prize < 1 or prize >= 100000000000000000000 then print("[DEBUG] Invalid prize value.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Valor de prêmio inválido.") return true end local sp_id = getPlayerGUIDByName(targetName) if not sp_id then print("[DEBUG] Target player does not exist.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Este jogador não existe.") return true end if sp_id == player:getGuid() then print("[DEBUG] Player tried to add themselves to the list.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Você não pode colocar a si mesmo na lista de caçados.") return true end local totalMoney = getPlayerTotalMoney(player) print("[DEBUG] Total money available: " .. totalMoney .. ", Required amount: " .. prize) if totalMoney < prize then print("[DEBUG] Player does not have enough money.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Você não tem dinheiro suficiente.") return true end -- Verifica se o jogador já está na lista de caçados local result_plr = db.storeQuery("SELECT `id`, `prize`, `fp_ids` FROM `busque_cabeca` WHERE `sp_id` = " .. sp_id .. " AND `killed` = 0;") if result_plr then -- Jogador já está na lista, verifica se o jogador atual já fez uma oferta local id = result.getNumber(result_plr, "id") local currentPrize = result.getNumber(result_plr, "prize") local fp_ids = result.getString(result_plr, "fp_ids") or "" result.free(result_plr) print("[DEBUG] Current prize: " .. currentPrize) print("[DEBUG] Current fp_ids: " .. fp_ids) -- Verifica se o jogador atual já fez uma oferta local fp_id = player:getGuid() if fp_ids:find(tostring(fp_id)) then print("[DEBUG] Player already made an offer for this target.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Você já fez uma oferta para este jogador.") return true end -- Acumula o valor da recompensa e atualiza a lista de IDs local newPrize = currentPrize + prize local updatedFpIds = fp_ids .. (fp_ids == "" and "" or ",") .. fp_id print("[DEBUG] Updated prize: " .. newPrize) print("[DEBUG] Updated fp_ids: " .. updatedFpIds) local updateQuery = string.format( "UPDATE `busque_cabeca` SET `prize` = %d, `fp_ids` = '%s' WHERE `id` = %d;", newPrize, updatedFpIds, id ) db.asyncQuery(updateQuery) print("[DEBUG] Bounty updated for player ID: " .. sp_id .. ". New prize: " .. newPrize) -- Remove o dinheiro do jogador if not removePlayerTotalMoney(player, prize) then print("[DEBUG] Failed to remove money from player.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Erro ao processar o pagamento. Tente novamente.") return true end player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Recompensa acumulada! Novo valor total: " .. newPrize .. " moedas.") return true end -- Jogador não está na lista, cria uma nova entrada local query = string.format( "INSERT INTO `busque_cabeca` (`fp_id`, `sp_id`, `k_id`, `added`, `prize`, `fp_ids`, `killed`, `kill_time`) VALUES (%d, %d, 0, %d, %d, '%d', 0, 0);", player:getGuid(), sp_id, os.time(), prize, player:getGuid() ) db.asyncQuery(query) print("[DEBUG] Bounty added successfully for player ID: " .. sp_id) -- Remove o dinheiro do jogador if not removePlayerTotalMoney(player, prize) then print("[DEBUG] Failed to remove money from player.") player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Erro ao processar o pagamento. Tente novamente.") return true end player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] Mandato de caçada criado com sucesso!") end -- Registra o comando !busque busque:groupType("normal") -- Permite apenas jogadores do grupo "normal" a usar o comando busque:register() -- Função para processar a morte do jogador function processPlayerDeath(playerId, killed_by) print("[DEBUG] Processing death for player ID: " .. playerId .. ", Killed by: " .. killed_by) -- Consulta o banco de dados para verificar se o jogador está na lista de caçados local result_plr = db.storeQuery("SELECT `id`, `prize`, `killed` FROM `busque_cabeca` WHERE `sp_id` = " .. playerId .. " AND `killed` = 0;") if not result_plr then print("[DEBUG] Player is not on the bounty list.") return true end local id = result.getNumber(result_plr, "id") local prize = result.getNumber(result_plr, "prize") local killed = result.getNumber(result_plr, "killed") result.free(result_plr) print("[DEBUG] Player is on the bounty list. ID: " .. id .. ", Prize: " .. prize .. ", Killed: " .. killed) -- Obtém o ID do assassino pelo nome local killer_id = getPlayerGUIDByName(killed_by) if not killer_id then print("[DEBUG] Failed to retrieve killer ID.") return true end print("[DEBUG] Killer ID: " .. killer_id) -- Atualiza o banco de dados para marcar o jogador como morto local updateQuery = string.format( "UPDATE `busque_cabeca` SET `k_id` = %d, `killed` = 1, `kill_time` = %d WHERE `id` = %d;", killer_id, os.time(), id ) db.asyncQuery(updateQuery) print("[DEBUG] Player marked as killed in database. ID: " .. id) -- Obtém o objeto do assassino local killer = Player(killer_id) if not killer then print("[DEBUG] Killer player object not found.") return true end -- Deposita o prêmio diretamente no banco do assassino local currentBankBalance = killer:getBankBalance() killer:setBankBalance(currentBankBalance + prize) print("[DEBUG] Awarded " .. prize .. " coins to killer's bank account: " .. killer:getName()) killer:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "[BUSQUE A CABEÇA] Você recebeu " .. prize .. " moedas no seu banco por matar este jogador!") -- Mensagem para o assassino informando que o alvo foi marcado como inativo killer:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[BUSQUE A CABEÇA] O jogador " .. getPlayerNameById(playerId) .. " foi removido da lista de caçados.") return true end -- Função auxiliar para obter o nome do jogador pelo ID function getPlayerNameById(playerId) local resultId = db.storeQuery("SELECT `name` FROM `players` WHERE `id` = " .. playerId) if not resultId then return "Unknown" end local name = result.getString(resultId, "name") result.free(resultId) return name end -- Função principal para verificar mortes periodicamente function checkForDeaths() print("[DEBUG] Checking for recent deaths...") -- Determina o formato do campo `time` e ajusta a consulta SQL local query if isUnixTimestampFormat() then -- Caso 1: `time` é armazenado em segundos desde a época Unix query = "SELECT `player_id`, `killed_by`, `is_player` FROM `player_deaths` WHERE `time` > UNIX_TIMESTAMP() - 60;" elseif isDatetimeFormat() then -- Caso 2: `time` é armazenado no formato MySQL (`DATETIME` ou `TIMESTAMP`) query = "SELECT `player_id`, `killed_by`, `is_player` FROM `player_deaths` WHERE `time` > NOW() - INTERVAL 60 SECOND;" else -- Caso 3: Formato personalizado (ajuste conforme necessário) print("[DEBUG] Unknown `time` format in `player_deaths`. Cannot process deaths.") return true end print("[DEBUG] Executing query: " .. query) local result = db.storeQuery(query) if not result then print("[DEBUG] No recent deaths found or query failed.") return true end -- Verifica se o resultado é válido antes de iterar if type(result) ~= "userdata" then print("[DEBUG] Invalid result type returned by db.storeQuery: " .. type(result)) return true end -- Verifica se há linhas no resultado if not result.next(result) then print("[DEBUG] Query returned no rows.") result.free(result) return true end -- Itera sobre os resultados da consulta repeat local playerId = result.getNumber(result, "player_id") local killedBy = result.getString(result, "killed_by") local isPlayer = result.getNumber(result, "is_player") if playerId then print("[DEBUG] Found recent death for player ID: " .. playerId) if killedBy and isPlayer == 1 then print("[DEBUG] Player was killed by: " .. killedBy) processPlayerDeath(playerId, killedBy) else print("[DEBUG] Killer is not a player or data is invalid.") end else print("[DEBUG] Invalid player ID found in death records.") end until not result.next(result) -- Libera o resultado para evitar vazamentos de memória if result.free then result.free(result) print("[DEBUG] Result freed successfully.") else print("[DEBUG] Result object does not have a 'free' method.") end return true end -- Função para verificar o formato do campo `time` function isUnixTimestampFormat() local result = db.storeQuery("SELECT `time` FROM `player_deaths` LIMIT 1;") if not result then return false end local timeValue = result.getNumber(result, "time") result.free(result) -- Verifica se o valor é um número inteiro return type(timeValue) == "number" and math.floor(timeValue) == timeValue end function isDatetimeFormat() local result = db.storeQuery("SELECT `time` FROM `player_deaths` LIMIT 1;") if not result then return false end local timeValue = result.getString(result, "time") result.free(result) -- Verifica se o valor é uma string no formato `YYYY-MM-DD HH:MM:SS` return type(timeValue) == "string" and timeValue:match("%d%d%d%d%-%d%d%-%d%d %d%d:%d%d:%d%d") end -- Registra a verificação de mortes como um evento periódico local deathCheckEvent = GlobalEvent("death_check_event") function deathCheckEvent.onThink(interval) checkForDeaths() return true end deathCheckEvent:interval(60000) -- Executa a cada 60 segundos deathCheckEvent:register() Se alguem tiver alguma sulução para me ajudar pois realmente estou a desistir ja. Estes são os erros..... Interface: Scripts Interface Script ID: C:\otserv\data/scripts\talkactions\player\busque.lua:callback Error Description: C:\otserv\data/scripts\talkactions\player\busque.lua:311: attempt to index local 'result' (a number value) stack traceback: [C]: in function '__index' C:\otserv\data/scripts\talkactions\player\busque.lua:311: in function 'isUnixTimestampFormat' C:\otserv\data/scripts\talkactions\player\busque.lua:241: in function 'checkForDeaths' C:\otserv\data/scripts\talkactions\player\busque.lua:334: in function <C:\otserv\data/scripts\talkactions\player\busque.lua:333> --------------------------------------- [2025-03-02 20:05:11.708] [error] [GlobalEvents::think] - Failed to execute event: death_check_event Vamos lá só resumindo aqui... o que esta funcionando: - char usa o comando !busque (valor a ser pago) (nome do personagem) - Não permite o mesmo player colocar mais que uma vez a oferta.. mas deixa outros jogadores colocarem mais oferta, onde a recompensa por busca deste personagem vai ficando cada vez mais alta (se acumulando).... - o dinheiro esta saindo da conta do banco ou da bag, primeiro ele veja se tem no banco se tiver ja pega de la o valor, senão checa a BP. o que não esta funcionando e não estou conseguindo finalizar... - a pessoa que mata o personagem (char) não esta recebendo a recompensa e retirando o personagem morto da lista de hunted.... Agradeço muito quem puder ajudar ou a resolver este problema, ou me fornecer algo ja pronto funcional, para versão 13x. Att.