Jonas^

Isso.

Usa a do malignos, é melhor, de qualquer forma pelo que vi os 2 iram servir do mesmo jeito, até porque você quer limitar o cara de floodar a função de denunciar, então os 2 servem.

Hm entendi, é que eu vi os dois ultimos post's, uma era do Lord e outro dele mostrando a parte server, dai pensei que era no server que ele queria rsrs.

local timers = {} function verifyACL (edit1, edit2) -- Parâmetros passados no trigger. local players = getElementsByType ("player") for _, thePlayer in ipairs (players) do local account = getAccountName (getPlayerAccount(thePlayer)) if isObjectInACLGroup ("user."..account, aclGetGroup ("ComandosPolicia")) then -- Para cada jogador que está na ACL Group "ComandosPolicia", faça: local pTimer = timers[thePlayer] if not (pTimer) then outputChatBox ("Denúncia de furto em: "..edit1..". ID: "..edit2, thePlayer) timers[thePlayer] = setTimer (function () timers[thePlayer] = nil end, 600000, 1) elseif pTimer and isTimer(pTimer) then outputChatBox ("Aguarde 10 minutos antes de fazer outra denúncia.", thePlayer, 255, 50, 50) end end end end addEvent ("DeltaSCR:ACL", true) addEventHandler ("DeltaSCR:ACL", getRootElement(), verifyACL) addEventHandler( "onPlayerQuit", root, function() if timers[source] then if isTimer(timers[source]) then killTimer(timers[source]) end timers[source] = nil end end )

Como ele mesmo disse, coloque dentro da função, tente assim: local timers = {} function verifyACL (edit1, edit2) -- Parâmetros passados no trigger. local players = getElementsByType ("player") for _, thePlayer in ipairs (players) do local account = getAccountName (getPlayerAccount(thePlayer)) if isObjectInACLGroup ("user."..account, aclGetGroup ("ComandosPolicia")) then -- Para cada jogador que está na ACL Group "ComandosPolicia", faça: timers[thePlayer] = setTimer(function() outputChatBox ("Denúncia de furto em: "..edit1..". ID: "..edit2, thePlayer) end, 600000, 1) end end end addEvent ("DeltaSCR:ACL", true) addEventHandler ("DeltaSCR:ACL", getRootElement(), verifyACL) OBS: Não testei

addCommandHandler( "comand", function (who, cmd, playah) local acc = getPlayerAccount (who) if isObjectInACLGroup ( "user." ..getAccountName(acc), aclGetGroup ("Admin")) then local targetPlayer = getPlayerFromNamePart(playah) local targetSerial = getPlayerSerial(targetPlayer) local searchForANicks = executeSQLQuery("SELECT `nicks` from `aliases` WHERE `serial`=?", targetSerial) if #searchForANicks == 1 then outputChatBox("#FFD330History of nicks for "..getPlayerName(targetPlayer)..":#FAFAFA "..searchForANicks[1].nicks, who, 0, 0, 0, true) end else outputChatBox("You do not have permission.", who, 255, 50, 50) end end)

Aqui está o código atualizado. addCommandHandler( "darcnh", function (player, cmd, nickName) local acc = getPlayerAccount (player) if isObjectInACLGroup ( "user." ..getAccountName(acc), aclGetGroup ("Admin")) then if not nickName then return outputChatBox( "(ERR0) #FFFFFFSintaxe: /"..cmd.." (Nick)", player, 255, 30, 30, true) end local targetPlayer = getPlayerFromPartialName(nickName) if not (targetPlayer) then return outputChatBox ("Jogador não encontrado!", player, 255, 30, 30) end local targetAcc = getPlayerAccount(targetPlayer) if isGuestAccount(targetAcc) then return outputChatBox ("Jogador não logado.", player, 255, 30, 30) end if setElementData (targetPlayer, "Habilitacoes:Carros", true) then outputChatBox ("Você deu a habilitação ao jogador '"..getPlayerName(targetPlayer):gsub("#%x%x%x%x%x%x", "").."'", player, 0, 255, 0) outputChatBox ("O(a) Admin '"..getPlayerName(player):gsub("#%x%x%x%x%x%x", "").."' lhe deu uma habilitação.", targetPlayer, 0, 255, 0) else outputChatBox ("Este jogador já tem uma habilitação.", player, 255, 30, 30) end end end) addCommandHandler( "tirarcnh", function (player, cmd, nickName) local acc = getPlayerAccount (player) if isObjectInACLGroup ( "user." ..getAccountName(acc), aclGetGroup ("Admin")) then if not nickName then return outputChatBox( "(ERR0) #FFFFFFSintaxe: /"..cmd.." (Nick)", player, 255, 30, 30, true) end local targetPlayer = getPlayerFromPartialName(nickName) if not (targetPlayer) then return outputChatBox ("Jogador não encontrado!", player, 255, 30, 30) end local targetAcc = getPlayerAccount(targetPlayer) if isGuestAccount(targetAcc) then return outputChatBox ("Jogador não logado.", player, 255, 30, 30) end if getElementData (targetPlayer, "Habilitacoes:Carros" ) == true then if setElementData (targetPlayer, "Habilitacoes:Carros", false) then outputChatBox ("Você retirou a habilitação do jogador '"..getPlayerName(targetPlayer):gsub("#%x%x%x%x%x%x", "").."'", player, 0, 255, 0) outputChatBox ("O(a) Admin '"..getPlayerName(player):gsub("#%x%x%x%x%x%x", "").."' retirou sua habilitação.", targetPlayer, 0, 255, 0) end else outputChatBox ("Este jogador não tem uma habilitação.", player, 255, 30, 30) end end end) OBS: Testado. @Madruga

Essas datas não são setadas quando o cara inicia o teste? A imagem do debug não esta pegando. Quando o cara sai do server é salvo na conta com setAccountData né? pode me mostrar o evento onPlayerQuit no lado servidor por favor?

Testa este comando: addCommandHandler( "darcnh", function (player, cmd, value) local acc = getPlayerAccount(player) if isObjectInACLGroup ( "user." ..getAccountName(acc), aclGetGroup ( "Admin" ) ) then if not value then return outputChatBox ("Uso correto: /"..cmd.." < Nick >", player, 255, 30, 30) end local targetPlayer = getPlayerFromPartialName( tostring(value) ) if not (targetPlayer) then return outputChatBox ("Jogador não encontrado!", player, 255, 30, 30) end local targetAcc = getPlayerAccount(targetPlayer) if isGuestAccount(targetAcc) then return outputChatBox ("Jogador não logado.", player, 255, 30, 30) end if not getElementData (player, "Habilitacoes:Carros" ) == true then outputChatBox ( "@executou", player) if setElementData (player, "Habilitacoes:Carros", true) then outputChatBox ("Você deu a habilitação ao jogador '"..getPlayerName(targetPlayer):gsub("#%x%x%x%x%x%x", "").."'", player, 0, 255, 0) outputChatBox ("O(a) Admin '"..getPlayerName(player):gsub("#%x%x%x%x%x%x", "").."' lhe deu uma habilitação.", targetPlayer, 0, 255, 0) else outputChatBox ("Este jogador já tem uma habilitação.", player, 255, 30, 30) end end else outputChatBox ( "Você não tem permissão !", player, 230, 20, 20 ) end end) Verifica se vai realmente dar a carteira assim conseguimos corrigir o /retirarcnh. Use /debugscript 3

Mostre o código da carteira pra gente ver.

Se você deseja realmente copiar o script do cara, coloque o vídeo em HD e comece de novo.

Eu tava testando seu script e aqui nem deu esse erro, corrigi um problema na tabela dos locais também, você esta usando ( ao invés de { E a função DefineItens esta incompleta.

Não acho certo você fazer isso, por isso mesmo não faço questão de ajudar, pois o rapaz fez no intuito de ajudar a galera, se ele quisesse liberar ele teria deixado na descrição. Espero que não ache que isso é ignorancia da minha parte, longe disso.

Ficou 4 horas no tutorial do cara pra copiar o script todo? eu não irei ajudar pois o cara não deixou o link na descrição para baixar, o script esta todo feito lá, você copiou errado.

Acho que tem alguns erros na parte do seu DX. Meu código esta certo, se quiser pode fazer o teste, deixei seu código como comentado, coloque meu código e teste. local screenX, screenY = guiGetScreenSize() local sX, sY = screenX/1280, screenY/720 local renderStats = false function drawRender () -- local lvl = getElementData(localPlayer, "Level") or 1 -- local exp = getElementData(localPlayer, "Exp") or 0 -- local needexp = lvl * 1 -- dxDrawRectangle(x*12, y*495, x*298, y*27, tocolor(0, 0, 0, 207), false) -- Nivel -- dxDrawRectangle(567*sW, 700*sH, -540*sW, 30*sH, tocolor(0, 51, 153)) -- dxDrawRectangle(567*sW, 700*sH, -540*sW, 30*sH, tocolor(0, 51, 153)) -- dxDrawText(string.format("%d", 100/(needexp/exp)).."%", 670*sW, 1350*sH, 400*sW, 80*sH, tocolor(0, 0, 0), 1.20, "default-bold", "center", "center") dxDrawText("Level: ", sX*64, sY*478, sX*64+(265-64), sY*478 + (503-478), tocolor(255, 255, 255, 255), 1.00, "default-bold", "center", "center", false, false, false, false, false) dxDrawText("EXP: ", sX*64, sY*503, sX*64+(265-64), sY*503+(528-503), tocolor(255, 255, 255, 255), 1.00, "default-bold", "center", "center") end addEvent ("renderStats", true) addEventHandler("renderStats", root, function (showStats) if (showStats == renderStats) then return end renderStats = showStats if showStats then addEventHandler("onClientRender", root, drawRender) else removeEventHandler("onClientRender", root, drawRender) end end) Server: addEventHandler( "onPlayerLogin", root, function () triggerClientEvent (source, "renderStats", source, true) end ) addEventHandler("onPlayerLogout", root, function () triggerClientEvent (source, "renderStats", source, false) end ) addEvent( "onRequestShowRender", true) addEventHandler( "onRequestShowRender", root, function() if not isGuestAccount(getPlayerAccount (source)) then triggerClientEvent (source, "renderStats", source, true) end end )

O código esta certo, não estou entendendo..

Faça assim: addCommandHandler( "darcnh", function (player, cmd, value) local acc = getPlayerAccount(player) if isObjectInACLGroup ( "user." ..getAccountName(acc), aclGetGroup ( "Admin" ) ) then if not value then return outputChatBox ("Uso correto: /"..cmd.." < Nick >", player, 255, 30, 30) end local targetPlayer = getPlayerFromPartialName( tostring(value) ) if not (targetPlayer) then return outputChatBox ("Jogador não encontrado!", player, 255, 30, 30) end local targetAcc = getPlayerAccount(targetPlayer) if isGuestAccount(targetAcc) then return outputChatBox ("Jogador não logado.", player, 255, 30, 30) end if not getElementData (player, "Habilitacoes:Carros") then if setElementData (player, "Habilitacoes:Carros", true) then outputChatBox ("Você deu a habilitação ao jogador '"..getPlayerName(targetPlayer):gsub("#%x%x%x%x%x%x", "").."'", player, 0, 255, 0) outputChatBox ("O(a) Admin '"..getPlayerName(player):gsub("#%x%x%x%x%x%x", "").."' lhe deu uma habilitação.", targetPlayer, 0, 255, 0) else outputChatBox ("Este jogador já tem uma habilitação.", player, 255, 30, 30) end end else outputChatBox ( "Você não tem permissão !", player, 230, 20, 20 ) end end) addCommandHandler( "tirarcnh", function (player, cmd, value) local acc = getPlayerAccount(player) if isObjectInACLGroup ( "user." ..getAccountName(acc), aclGetGroup ( "Admin" ) ) then if not value then return outputChatBox ("Uso correto: /"..cmd.." < Nick >", player, 255, 30, 30) end local targetPlayer = getPlayerFromPartialName( tostring(value) ) if not (targetPlayer) then return outputChatBox ("Jogador não encontrado!", player, 255, 30, 30) end local targetAcc = getPlayerAccount(targetPlayer) if isGuestAccount(targetAcc) then return outputChatBox ("Jogador não logado.", player, 255, 30, 30) end if setElementData (player, "Habilitacoes:Carros", false) then outputChatBox ("Você retirou a habilitação do jogador '"..getPlayerName(targetPlayer):gsub("#%x%x%x%x%x%x", "").."'", player, 0, 255, 0) outputChatBox ("O(a) Admin '"..getPlayerName(player):gsub("#%x%x%x%x%x%x", "").."' retirou sua habilitação.", targetPlayer, 0, 255, 0) else outputChatBox ("Este jogador não tem uma habilitação.", player, 255, 30, 30) end else outputChatBox ( "Você não tem permissão !", player, 230, 20, 20 ) end end) function getPlayerFromPartialName (name) local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil if name then for _, player in ipairs(getElementsByType("player")) do local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower() if name_:find(name, 1, true) then return player end end end end Da próxima vez você mostre o código que tentou fazer para corrigirmos. OBS: Não testado.

Não tentou? você tem que usar getElementData pra fazer a verificação se o cara já tem ou não a data.

Mostre o código se tiver dificuldades, se não quiser compartilhar com o público me envie no privado, mas os passos são os que o @#DeltaSCR citou acima.

Corrigi o código copie do pastebin. Link: https://pastebin.com/ukR4e3Wi

É praticamente impossível descompilar um resource desse tamanho..

De nada mano.

Se ainda estiver problemas, poste o erro e a linha do erro.

Vou upar o código no pastebin, o fórum fica colocando uns caracteres extras nem sei porque. Aqui esta: https://pastebin.com/GTzMVrFR Se continuar o erro me avise, poste a linha do erro também aqui.

Acho um pouco exagero da sua parte, se este script esta liberado em algum lugar e esta descompilado não vejo problema algum em edita-lo, ao menos que seja vazado.