Jump to content

TavinhoMTA

Members
  • Posts

    30
  • Joined

  • Last visited

Posts posted by TavinhoMTA

  1. 18 hours ago, DNL291 said:

    Copiou errado. Falta a função print.

    Da este mesmo erro 

     

    On 03/12/2019 at 20:47, TavinhoMTA said:
    
    function PilotoDeHelicopteroAirNew ( player )
          accountname = getAccountName (getPlayerAccount(player))
          if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "admin" ) ) then
            TudoInvisivel ()
            setElementVisibleTo ( PilotoDeHelicoptero, source, true )
            setElementData ( source, "AirNew>Encaminhamento", "Piloto De Helicoptero" )
            MensagemAirNewSCR ( "Emprego: Para Iniciar os Serviços siga o Checkpoint Vermelho em seu Minimapa", "success" )
            triggerClientEvent ( source, "AirNew>FecharAgencia", root )
            setElementData ( source, "Emprego", false )
        end
    end
    addEvent( "Encaminhar>PilotoDeHelicoptero", true )
    addEventHandler( "Encaminhar>PilotoDeHelicoptero", getRootElement(), PilotoDeHelicopteroAirNew )
    

    6ca8ac05e2a08d48db73c36586321ce8.jpg

    Fui tentar por emprego para encaminhar por acl esta dando este erro

     

  2. function PilotoDeHelicopteroAirNew ( player )
    	(tostring (player))
          accountname = getAccountName (getPlayerAccount(player))
          if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "admin" ) ) then
            TudoInvisivel ()
            setElementVisibleTo ( PilotoDeHelicoptero, source, true )
            setElementData ( source, "AirNew>Encaminhamento", "Piloto De Helicoptero" )
            MensagemAirNewSCR ( "Emprego: Para Iniciar os Serviços siga o Checkpoint Vermelho em seu Minimapa", "success" )
            triggerClientEvent ( source, "AirNew>FecharAgencia", root )
            setElementData ( source, "Emprego", false )
        end
    end
    addEvent( "Encaminhar>PilotoDeHelicoptero", true )
    addEventHandler( "Encaminhar>PilotoDeHelicoptero", getRootElement(), PilotoDeHelicopteroAirNew )

    Assim 

  3. function PilotoDeHelicopteroAirNew ( player )
          accountname = getAccountName (getPlayerAccount(player))
          if isObjectInACLGroup ( "user." .. accountname, aclGetGroup ( "admin" ) ) then
            TudoInvisivel ()
            setElementVisibleTo ( PilotoDeHelicoptero, source, true )
            setElementData ( source, "AirNew>Encaminhamento", "Piloto De Helicoptero" )
            MensagemAirNewSCR ( "Emprego: Para Iniciar os Serviços siga o Checkpoint Vermelho em seu Minimapa", "success" )
            triggerClientEvent ( source, "AirNew>FecharAgencia", root )
            setElementData ( source, "Emprego", false )
        end
    end
    addEvent( "Encaminhar>PilotoDeHelicoptero", true )
    addEventHandler( "Encaminhar>PilotoDeHelicoptero", getRootElement(), PilotoDeHelicopteroAirNew )

    6ca8ac05e2a08d48db73c36586321ce8.jpg

    Fui tentar por emprego para encaminhar por acl esta dando este erro

  4. On 26/10/2019 at 16:34, DNL291 said:

    Outra Duvida

    Em questão do Cliente 

    function localizarMecanico(cn,id)
    local jobMecanico = getElementData(localPlayer,"Emprego") or false
    --if type(jobMecanico) == "boolean" then
    if jobMecanico == "Mecanico" then
    if type(id) == "string" then
    local player = getPlayerID(id)
    if testeMecanico then
    if player then
    if player ~= source then
    destroyElement(testeMecanico)
    end
    if getElementData ( player, "Chamado:Mecanico" ) == true then
    testeMecanico = createBlipAttachedTo(player,61,2,255,255,255,255,0,999999)
    exports.Scripts_Dxmessages:createNotification("O Jogador "..getPlayerName(player).." Foi Localizado!, Para Deslocalizar Digite /Deslocalizar", "success")
    else
    exports.Scripts_Dxmessages:createNotification("O Jogador "..getPlayerName(player).." Não Solicitou por um Mecânico!", "error")
    end
    else
    exports.Scripts_Dxmessages:createNotification("O Jogador Não Foi Encontrado!", "error")
    end
    else
    exports.Scripts_Dxmessages:createNotification("Digite /Localizar ID", "warning")
    end		
    end
    end
    end
    addCommandHandler("localizar",localizarMecanico)

    Esta dando no Else /localizar ID sabe qual é o erro ??

     

     

  5. 20 hours ago, DNL291 said:
    
    function fix(source,cmd,id)	if getElementData(source, "Emprego" ) == "Mecanico" then		id = tonumber(id)		if not id then			return exports.Scripts_Dxmessages:outputDx(source, "Sintaxe: /".. cmd .." ID", "error")		end		local cliente = getPlayerID(id)		if isElement(cliente) then			if cliente == source then exports.Scripts_Dxmessages:outputDx(source, "Você não Pode Oferecer Reparos Para Você Mesmo!", "error") return end			if isPedInVehicle(cliente) then				local seat = getPedOccupiedVehicleSeat(cliente)				if seat == 0 then					local mecanico = getElementData(cliente,"cliente:mecanico")					if isElement(mecanico) then					    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Ja Esta Sendo Atendido Por um Mecanico!", "error")					else						local cx,cy,cz = getElementPosition(cliente)						local x,y,z = getElementPosition(source)						local dist = getDistanceBetweenPoints3D(x,y,z,cx,cy,cz)						if dist <= 7 then							local cmoney = getPlayerMoney(cliente)							if cmoney >= ValorPorReparar then								setElementData(cliente,"cliente:mecanico",source)																exports.Scripts_Dxmessages:outputDx(source, "Você Ofereceu Serviços de Reparo para o Jogador "..getPlayerName(cliente), "warning")																exports.Scripts_Dxmessages:outputDx(cliente, "O Mecanico "..getPlayerName(source).." Quer Reparar seu Veiculo Por $"..ValorPorReparar..", Digite /Aceitar ou /Recusar.", "warning")								canceltimer[cliente] = setTimer(cancelfix,10000,1,cliente)							else							    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Não tem Dinheiro Suficiente!", "error")							end						end					end				else				    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Não é o Motorista do Veiculo!", "error")				end			else			    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Não Esta em um Veiculo!", "error")			end		else		    exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")		end	endendaddCommandHandler(cmd1,fix)

    Tenta isso

    Deu certo acho que peguei a logica agora Muito Obrigado DNL

  6. 28 minutes ago, DNL291 said:

    Sim. E quanto ao script que você pretende mudar pelo ID?

    local HQMecanicoBlip = createBlip ( 206.11905, -260.74591, 1.36875 )
    setElementVisibleTo ( HQMecanicoBlip, root, false )
    
    --------------------------------------------------------------------
    
    function VerificarBlipEmprego(player)
      if player then
      acc = getPlayerAccount ( player )
      if isGuestAccount ( acc ) then return end
      setElementVisibleTo ( HQMecanicoBlip, player, false )
      end
    end
    
    setTimer(
    function()
    	for i, pl in pairs(getElementsByType("player")) do
    		if pl ~= (false or nil) then
    		    if getElementData ( pl, "Emprego" ) == "Mecanico" then return end
    			   VerificarBlipEmprego(pl)
    		end
    	end
    end,
    3000,0)
    
    --------------------------------------------------------------------
    
    function ComandoHQ ( source )
        if getElementData ( source, "Emprego" ) == "Mecanico" then
    	if isElementVisibleTo ( HQMecanicoBlip, source ) then
    	setElementVisibleTo ( HQMecanicoBlip, source, false )
    	exports.Scripts_Dxmessages:outputDx(source, "Seu Local de Trabalho foi Desmarcado do Mapa!", "info")
    	else
    	setElementVisibleTo ( HQMecanicoBlip, source, true )
    	exports.Scripts_Dxmessages:outputDx(source, "Seu Local de Trabalho foi Marcado no Mapa!", "info")
    end
    end	
    end    
    addCommandHandler ( cmd6, ComandoHQ )
    
    -------------------------------------------------------------
    
    function AceitarEmprego02 (source)
    exports.Scripts_OnMarkerMsgs_:delete(source)
    unbindKey ( source, LetraParaMarkers, "down", AceitarEmprego02 )
    if getElementData ( source, "AirNew>Encaminhamento" ) == "Mecanico" then
    setElementData ( source, "AirNew>Encaminhamento", false )
    setElementData ( source, "Emprego", "Mecanico" )
    exports.Scripts_Dxmessages:outputDx(source, "Você Agora Trabalha de Mecanico, Para Mais Informações Digite ( /Profissao )", "success")
    else
    exports.Scripts_Dxmessages:outputDx(source, "Você Precisa Estar Encaminhado da Agencia de Empregos para Trabalhar neste Local!", "error")
    end
    end
    
    function RecusarEmprego02 (source)
    exports.Scripts_OnMarkerMsgs_:delete(source)
    unbindKey ( source, LetraParaMarkers, "down", RecusarEmprego02 )
    if isElementVisibleTo ( HQMecanicoBlip, source ) then
    setElementVisibleTo ( HQMecanicoBlip, source, false )
    end
    removeElementData ( source, "Emprego", "Mecanico" )
    exports.Scripts_Dxmessages:outputDx(source, "Você se Demitiu do Emprego de Mecanico com Sucesso!", "warning")
    end
    
    ------------------------------------------------------
    
    function emarker(marker,md) 
    	if (md) then
    	  if isPedInVehicle ( source ) then return end
    		if marker == MarkerMecanico then
    		    if getElementData ( source, "Emprego" ) == "Mecanico" then
    			exports.Scripts_OnMarkerMsgs_:create(source,"Aperte 'K' Para se Demitir do Emprego de Mecanico")
    			bindKey ( source, LetraParaMarkers, "down", RecusarEmprego02 )
    		else
    			exports.Scripts_OnMarkerMsgs_:create(source,"Aperte 'K' Para Aceitar o Emprego de Mecanico")
    			bindKey ( source, LetraParaMarkers, "down", AceitarEmprego02 )
    		end
    	 end
      end	
    end
    addEventHandler("onPlayerMarkerHit",getRootElement(),emarker)
    
    function lmarker(marker,md)
    	if (md) then
    		if marker == MarkerMecanico then
    			exports.Scripts_OnMarkerMsgs_:delete(source)			
    			unbindKey ( source, LetraParaMarkers, "down", AceitarEmprego02 )
    			unbindKey ( source, LetraParaMarkers, "down", RecusarEmprego02 )
    		end
    	end
    end
    addEventHandler("onPlayerMarkerLeave",getRootElement(),lmarker)
    
    ----------------------------------------------------------
    
    canceltimer={}
    function fix(source,cmd,pname)
    	if getElementData(source, "Emprego" ) == "Mecanico" then
    		local cliente = getPlayerFromPartialName(pname)
    		if isElement(cliente) then
    			if cliente == source then exports.Scripts_Dxmessages:outputDx(source, "Você não Pode Oferecer Reparos Para Você Mesmo!", "error") return end
    			if isPedInVehicle(cliente) then
    				local seat = getPedOccupiedVehicleSeat(cliente)
    				if seat == 0 then
    					local mecanico = getElementData(cliente,"cliente:mecanico")
    					if isElement(mecanico) then
    					    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Ja Esta Sendo Atendido Por um Mecanico!", "error")
    					else
    						local cx,cy,cz = getElementPosition(cliente)
    						local x,y,z = getElementPosition(source)
    						local dist = getDistanceBetweenPoints3D(x,y,z,cx,cy,cz)
    						if dist <= 7 then
    							local cmoney = getPlayerMoney(cliente)
    							if cmoney >= ValorPorReparar then
    								setElementData(cliente,"cliente:mecanico",source)
    								
    								exports.Scripts_Dxmessages:outputDx(source, "Você Ofereceu Serviços de Reparo para o Jogador "..getPlayerName(cliente), "warning")
    								
    								exports.Scripts_Dxmessages:outputDx(cliente, "O Mecanico "..getPlayerName(source).." Quer Reparar seu Veiculo Por $"..ValorPorReparar..", Digite /Aceitar ou /Recusar.", "warning")
    								canceltimer[cliente] = setTimer(cancelfix,10000,1,cliente)
    							else
    							    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Não tem Dinheiro Suficiente!", "error")
    							end
    						end
    					end
    				else
    				    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Não é o Motorista do Veiculo!", "error")
    				end
    			else
    			    exports.Scripts_Dxmessages:outputDx(source, "O Jogador "..getPlayerName(cliente).." Não Esta em um Veiculo!", "error")
    			end
    		else
    		    exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
    		end
    	end
    end
    addCommandHandler(cmd1,fix)
    
    --------------------------------------------------------------------
    
    function recusar(source)
    	local mecanico = getElementData(source,"cliente:mecanico")
    	if isElement(mecanico) then
    	    exports.Scripts_Dxmessages:outputDx(mecanico, "O Jogador "..getPlayerName(source).." Recusou o Reparo!", "error") -- Mecanico
    		exports.Scripts_Dxmessages:outputDx(source, "Você Recusou o Reparo", "success")
    	end
    	setElementData(source,"cliente:mecanico",nil)	
    	if isTimer(canceltimer[source]) then
    		killTimer(canceltimer[source])
    	end
    end
    addCommandHandler(cmd2,recusar)
    
    --------------------------------------------------------------------
    
    function aceitar(source)
    	local mecanico = getElementData(source,"cliente:mecanico")
    	if isElement(mecanico) then
    	    
    		if not isPedInVehicle(source) then
    		exports.Scripts_Dxmessages:outputDx(mecanico, "O Jogador Aceitou o Reparo, Porem não Esta em um Veiculo!", "warning")
    		exports.Scripts_Dxmessages:outputDx(source, "Você Não Pode Aceitar um Reparo Fora de um Veiculo!", "warning") return end
    		
    		--Procurado = getPlayerWantedLevel ( source )
    		--if Procurado > 0 then
    		--exports.Scripts_Dxmessages:outputDx(source, "Você Esta Procurado e Não Podera Aceitar o Reparo!", "warning")
    		--exports.Scripts_Dxmessages:outputDx(mecanico, "O Jogador Aceitou o Reparo, Porem Estava Procurado, Reparo Cancelado!", "warning")
    		--return end
    
    		exports.Scripts_Dxmessages:outputDx(mecanico, "O Jogador "..getPlayerName(source).." Aceitou o Reparo", "success")
    		local cx,cy,cz = getElementPosition(mecanico)
    		local x,y,z = getElementPosition(source)
    		local dist = getDistanceBetweenPoints3D(x,y,z,cx,cy,cz)
    		if dist <= 7 then	
    			if isPedInVehicle(source) then
    				local seat = getPedOccupiedVehicleSeat(source)
    				if seat == 0 then			
    					local vh = getPedOccupiedVehicle(source)
    					if isElement(vh) then
    						setElementHealth(vh,1000)
    						fixVehicle(vh)
    						setVehicleEngineState(vh,true)
    						if  isVehicleDamageProof(vh) then
    							setVehicleDamageProof(vh,false)
    						end
    					end
    					takePlayerMoney(source,ValorPorReparar)
    					givePlayerMoney(mecanico,ValorPorReparar)
    					exports.Scripts_Dxmessages:outputDx(mecanico, "Você Recebeu $"..ValorPorReparar.." Por Reparar um Veiculo!", "success")
    					exports.Scripts_Dxmessages:outputDx(source, "Você Pagou $"..ValorPorReparar.." Ao Mecanico Por Reparar seu Veiculo!", "success")
    					
    					setElementData ( mecanico, "AirNewSCR_LiberarXP", "Sim" )
    					
    				end
    			end	
    		else
    		    exports.Scripts_Dxmessages:outputDx(source, "O Mecanico Esta Muito Longe!", "error")
    			exports.Scripts_Dxmessages:outputDx(mecanico, "Você Esta Muito Longe do Cliente!", "error")
    		end
    	end
    	setElementData(source,"cliente:mecanico",nil)	
    	if isTimer(canceltimer[source]) then
    		killTimer(canceltimer[source])
    	end
    end
    addCommandHandler(cmd3,aceitar)
    
    --------------------------------------------------------------------
    
    function cancelfix(source)
    	local mecanico = getElementData(source,"cliente:mecanico")
    	if isElement(mecanico) then
    		exports.Scripts_Dxmessages:outputDx(mecanico, "O Jogador "..getPlayerName(source).." Demorou Para Aceitar o Reparo!", "error")
    	end
    	exports.Scripts_Dxmessages:outputDx(source, "Você Demorou Demais Para Aceitar o Reparo!", "error")
    	setElementData(source,"cliente:mecanico",nil)	
    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
    
    --------------------------------------------------------------------
    
    addEventHandler("onVehicleDamage", getRootElement(),function(loss)
    	if getElementType ( source ) == "vehicle" then
    		if not isVehicleDamageProof(source) then
    			local HP = getElementHealth(source)-loss		
    			if HP <= 350 then 
    				HP = 350 
    				setElementHealth(source,350)
    				setVehicleEngineState(source,false)
    				setVehicleDamageProof(source,true)
    				if isVehicleBlown(source) then
    					fixVehicle(source)	
    					setElementHealth(source,350)
    					setVehicleDamageProof(source,true)
    				end 
    			end
    		end	
    	end	
    end)
    
    --------------------------------------------------------------------
    
    function DesligarAndLigar ( playerSource )
       if math.floor ( getElementHealth( source ) + 0.5 ) > 350 then 
        setVehicleDamageProof( source, false ) -- Não Quebrado
        else 
        setVehicleEngineState( source, false ) -- Quebrado
    	triggerClientEvent ( "Mecanico>Quebrado", playerSource )
        end 
    end 
    addEventHandler ( "onVehicleEnter", root, DesligarAndLigar )
    
    --------------------------------------------------------------------
    
    function MecanicoVem(source)
    for i, player in ipairs(getElementsByType("player")) do
    local uj = getElementData(player, "Emprego" ) or false
    --if type(uj) == "boolean" then
    if uj == "Mecanico" then
    exports.Scripts_Dxmessages:outputDx(player, "O Jogador "..getPlayerName(source).." Chamou Por um Mecanico! Digite /Localizar "..getPlayerName(source), "warning")
    end
    --end
    end		
    end
    addCommandHandler(cmd4,MecanicoVem)
    
    --------------------------------------------------------------------
    
    function ComandoMecanico ( ThePlayer )
    exports.Scripts_Dxmessages:outputDx(ThePlayer, "Os Mecanicos Foram Avisados, Aguarde no Local!", "warning")
    setElementData ( ThePlayer, "Chamado:Mecanico", true )
    setTimer ( function() removeElementData ( ThePlayer, "Chamado:Mecanico" ) end, 60000, 1 )
    end
    addCommandHandler(cmd4, ComandoMecanico )
    
    --------------------------------------------------------------------
    
    function ComandosProf ( ThePlayer )
    if getElementData ( ThePlayer, "Emprego" ) == "Mecanico" then
    playSoundFrontEnd ( ThePlayer, 43 )
    outputChatBox ( "#F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #F96031Profissão #F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09AComandos da Profissão de Mecânico", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F96031» #55D444/HQ #ffffff- #9ABDE0Para Marcar / Desmarcar o seu Local de Trabalho", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F96031» #55D444/Reparar Nick #ffffff- #9ABDE0Para Reparar um Veiculo de outro Jogador", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F96031» #55D444/Localizar Nick #ffffff- #9ABDE0Para Localizar um Jogador", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F96031» #55D444/Deslocalizar #ffffff- #9ABDE0Para Deslocalizar um Jogador", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F96031» #FFD700Entre no Veiculo da Profissão, Aguarde um Chamado por um Mecanico!", ThePlayer, 255, 255, 255, true )
    outputChatBox ( "#F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #F96031Profissão #F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~", ThePlayer, 255, 255, 255, true )
    end
    end
    addCommandHandler(cmd5, ComandosProf )
    
    --------------------------------------------------------------------
    
    function CriarVeiculosComData ()
    VeiculosComData = {
    createVehicle(525, 196.30507, -252.62512, 1.3, 0, 0, 180 ),
    createVehicle(525, 201.30507, -252.62512, 1.3, 0, 0, 180 ),
    createVehicle(525, 206.30507, -252.62512, 1.3, 0, 0, 180 ),
    createVehicle(525, 211.30507, -252.62512, 1.3, 0, 0, 180 ),
    createVehicle(525, 216.30507, -252.62512, 1.3, 0, 0, 180 ),
    
    createVehicle(525, 196.30507, -268.03806, 1.3, 0, 0, 0 ),
    createVehicle(525, 201.30507, -268.03806, 1.3, 0, 0, 0 ),
    createVehicle(525, 206.30507, -268.03806, 1.3, 0, 0, 0 ),
    createVehicle(525, 211.30507, -268.03806, 1.3, 0, 0, 0 ),
    createVehicle(525, 216.30507, -268.03806, 1.3, 0, 0, 0 ),
    }
    
    for i, veh in ipairs(VeiculosComData) do
    setElementData ( veh, "Emprego", "Mecanico" )
    setVehicleDamageProof(veh,true)
    setVehicleColor( veh, 255, 255, 255 )
    setVehiclePlateText ( veh, "RPGAMING" )
    addEventHandler("onVehicleStartEnter", veh, VerificarEmprego )
    --addEventHandler("onVehicleExit", veh, SairDoVeiculosComData )
    local tx, ty, tz = getElementPosition(veh)
    local rx, ry, rz = getElementRotation(veh)
    setVehicleRespawnPosition(veh, tx, ty, tz, rx, ry, rz)
    end
    end
    addEventHandler("onResourceStart", resourceRoot, CriarVeiculosComData )
    
    function VerificarEmprego (thePlayer, seat)
    local Jogador = getElementData(thePlayer, "Emprego" )
    if seat == 0 then
        if Jogador == "Mecanico" then
    	else
        cancelEvent()
        exports.Scripts_Dxmessages:outputDx(thePlayer, "Esse Veiculo é Exclusivo dos Mecânicos!", "error")
        end
      end
    end
    
    --[[function SairDoVeiculosComData ()
    local veh = source
    setTimer(function()
      if getVehicleOccupant(veh) == false then
    respawnVehicle(veh)
    end
    end, 30000, 1)
    end
    addEventHandler ( "onPlayerQuit", getRootElement(), SairDoVeiculosComData ) --]]
    
    --------------------------------------------------------------------
    
    local rElement = getRootElement() 
      
    Tempo_Respawn = 5
      
    function respawnVehicles(player, seconds)
    	outputChatBox ( "AVISO: Respawnando Veiculos não usados Emprego de Mecanico", root, 255, 255, 255, true )
        outputChatBox ( "AVISO: Respawnando Veiculos dos Mecanicos em 10 Segundos!", root, 255, 255, 255, true )
        for i, veh in ipairs(VeiculosComData) do
            if isEmpty( veh ) then
    	            setTimer ( function()
    		            respawnVehicle ( veh ) 
    	            end, 10000, 1 )
                end 
            end 
        end
    setTimer(respawnVehicles, Tempo_Respawn * 60000,0)
    
    function isEmpty( vehicle ) 
        local passengers = getVehicleMaxPassengers( vehicle ) 
        if type( passengers ) == 'number' then 
            for seat = 0, passengers do 
                if getVehicleOccupant( vehicle, seat ) then 
                    return false 
                end 
            end 
        end 
        return true 
    end

    Codigo Completo do Server, no caso tenho que Adiciona Função do ID e tira o getPlayerFromPartialName (name)  

    Na Linha 143 

    local cliente = getPlayerID(id)

    e 265 Coloquei 

    function getPlayerID(id)
    	v = false
    	for i, player in ipairs (getElementsByType("player")) do
    		if getElementData(player, "ID") == id then
    			v = player
    			break
    		end
    	end
    	return v
    end

     

  7. function Start_Id ( _, acc )
    	if eventName == "onPlayerLogin" then
    		setElementData ( source, "ID", getAccountID(acc) or "N/A" )
    	elseif eventName == "onPlayerLogout" then
    		removeElementData( source, "ID" )
    	elseif eventName == "onResourceStart" then
    		for _, player in pairs(getElementsByType("player")) do
    			local acc = getPlayerAccount(player)
    			if not isGuestAccount(acc) then
    				setElementData( source, "ID", getAccountID(acc) or "N/A" )
    			end
    		end
    	end
    end
    addEventHandler("onResourceStart", resourceRoot, Start_Id)
    addEventHandler("onPlayerLogout", root, Start_Id)
    addEventHandler("onPlayerLogin", root, Start_Id)
    
    function getPlayerID(id)
    	v = false
    	for i, player in ipairs (getElementsByType("player")) do
    		if getElementData(player, "ID") == id then
    			v = player
    			break
    		end
    	end
    	return v
    end
    --============================================================================================================================--
                                       --=============================--
                                       ----------- ID PLAYER ------------
                                       --=============================--
    function getnick(player, command, id, ...)
        if(id) then
            local playerID = tonumber(id)
    		if(playerID) then
    			local Player2 = getPlayerID(playerID)
    			if(Player2) then	
    				outputChatBox ( "#106FE7 #ffffffINFO #106FE7➺ #ffffff Nome do Jogador #106FE7" .. getPlayerName(Player2) .."", player, 255,255,255,true)
    			else
    				outputChatBox ( "#106FE7 #ffffffERRO #106FE7➺ #ffffff O Jogador(a) de ID: #106FE7( " .. id .. " ) #ffffffNão Foi Encontrado!", player, 255,255,255,true)
    			end 
    		else
    			outputChatBox ( "#106FE7 #ffffffERRO #106FE7➺ #ffffff ID: #106FE7( " .. id .. " ) #ffffffInválido!", player, 255,255,255,true)
    		end
    	else
    		outputChatBox ( "#106FE7 #ffffffERRO #106FE7➺ #ffffffUse /id #106FE7[#ffffffID#106FE7]", player, 255,255,255,true)
    	end
    end
    addCommandHandler("id", getnick)

    Este é o Script de ID que eu uso Então 

    function getPlayerID(id)
    	v = false
    	for i, player in ipairs (getElementsByType("player")) do
    		if getElementData(player, "ID") == id then
    			v = player
    			break
    		end
    	end
    	return v
    end

    A função é esta ne ?

     

     

  8. --[[
    
    
    
     ################################################
     #                                              #
     #              Script Criado Por               #
     #           FACEBOOK.COM/AIRNEWSCR             #
     #                                              #
     #                                              #
     ################################################   
    
    
    
    --]]
    
    -------------------------------------------------
    
    InteriorDP = 6
    DimensaoDP = 0
    
    Cmd01 = "a" -- Algema
    Cmd02 = "d" -- Desalgema
    Cmd03 = "c" -- Retira Armas
    
    Grupo = "Policial"
    
    Distancia_Comandos = 7
    
    Deixar_Preso = createMarker ( 1535.73486, -1672.03137, 13.38281 -1, "cylinder", 10, 255, 255, 255, 0 )
    
    Local_Preso = createMarker ( 264.08435, 77.60955, 1001.03906 -1, "cylinder", 2.5, 255, 255, 255, 0 )
    setElementInterior ( Local_Preso, InteriorDP )
    setElementDimension ( Local_Preso, DimensaoDP )
    
    function emarker ( marker, md )
    	if md then
    	    if marker == Deixar_Preso then
    		    if getElementData ( source, "ocupacao" ) == "Policial" then
    		        setElementData ( source, "AirNewSCR_PrisaoArea", "Sim" )
    				exports.Scripts_OnMarkerMsgs_:create ( source, "Aviso: Aperte F9 para Abrir / Fechar o Painel de Prender do DP" )
    			end
    		end
        end
    end
    addEventHandler ( "onPlayerMarkerHit", getRootElement ( ), emarker )
    
    function lmarker ( marker, md )
    	if md then
    	    if marker == Deixar_Preso then
    		    setElementData ( source, "AirNewSCR_PrisaoArea", "Não" )
    			exports.Scripts_OnMarkerMsgs_:delete(source)
    		end
        end
    end
    addEventHandler ( "onPlayerMarkerLeave", getRootElement ( ), lmarker )
    
    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	
    
    function Algemar_Jogador ( thePlayer, _, nick )
    	if nick then
    		if getPlayerFromPartialName ( nick ) then
                local accName = getAccountName ( getPlayerAccount ( thePlayer ) )
                if isObjectInACLGroup ("user."..accName, aclGetGroup ( Grupo ) ) then
    				local player_a_ser_algemado = getPlayerFromPartialName ( nick )
                    local nick_do_jogador = getPlayerName ( player_a_ser_algemado )
    				local nick_do_policial = getPlayerName ( thePlayer )
                    local jX, jY, jZ = getElementPosition (player_a_ser_algemado) 
    				local pX, pY, pZ = getElementPosition (thePlayer)
    				local dist = getDistanceBetweenPoints3D ( pX, pY, pZ, jX, jY, jZ)
    				if thePlayer == player_a_ser_algemado then
    				    return exports.Scripts_Textos:createNewDxMessage ( "Erro: Você não pode algemar você mesmo!", thePlayer, 255, 255, 255 )
    				end
    				local Verificar = getElementData ( player_a_ser_algemado, "algemado" ) or false
    				if Verificar == true then
    				    exports.Scripts_Textos:createNewDxMessage ( "Erro: Esse Jogador ja Esta Algemado!", thePlayer, 255, 255, 255 )
    				else				
    				    if dist <= Distancia_Comandos then
    				        setElementData(player_a_ser_algemado,"algemado", true )
    				        setElementFrozen( player_a_ser_algemado, true )
    				        toggleControl(player_a_ser_algemado, "fire", false)
    				        setPedAnimation( player_a_ser_algemado, "GRAVEYARD", "mrnM_loop", -1, true, false, false, false)
    				        exports.Scripts_Textos:createNewDxMessage ( "Aviso: Você foi Algemado pelo Policial "..nick_do_policial, player_a_ser_algemado, 255, 255, 255 )
    				        exports.Scripts_Textos:createNewDxMessage ( "Aviso: Você algemou o Jogador "..nick_do_jogador.." com Sucesso!", thePlayer, 255, 255, 255 )
    				    else
    				        exports.Scripts_Textos:createNewDxMessage ( "Erro: Você esta Muito longe do Jogador! chegue mais Perto para poder Algema-lo!", thePlayer, 255, 255, 255 )
    				    end
    				end
    			end
    		end
    	end
    end
    addCommandHandler( Cmd01, Algemar_Jogador)
    
    function Desalgemar_Jogador ( thePlayer, _, nick )
    	if nick then
    		if getPlayerFromPartialName ( nick ) then
                local accName = getAccountName ( getPlayerAccount ( thePlayer ) )
                if isObjectInACLGroup ("user."..accName, aclGetGroup ( Grupo) ) then
    				local player_a_ser_desalgemado = getPlayerFromPartialName ( nick )
                    local nick_do_jogador = getPlayerName ( player_a_ser_desalgemado )
    				local nick_do_policial = getPlayerName ( thePlayer )
    				if thePlayer == player_a_ser_desalgemado then
    				    return exports.Scripts_Textos:createNewDxMessage ( "Erro: Você não pode desalgemar você mesmo!", thePlayer, 255, 255, 255 )
    				end
    				local Verificar = getElementData ( player_a_ser_desalgemado, "algemado" ) or false
    				if Verificar == false then
    				    exports.Scripts_Textos:createNewDxMessage ( "Erro: Esse Jogador não esta Algemado!", thePlayer, 255, 255, 255 )
    				else
    				    setElementData ( player_a_ser_desalgemado, "algemado", false )
    				    setPedAnimation ( player_a_ser_desalgemado )
    				    setElementFrozen ( player_a_ser_desalgemado, false )
    				    toggleControl ( player_a_ser_desalgemado, "fire", true )
    				    exports.Scripts_Textos:createNewDxMessage ( "Aviso: Você foi Desalgemado pelo Policial "..nick_do_policial, player_a_ser_desalgemado, 255, 255, 255 )
    				    exports.Scripts_Textos:createNewDxMessage ( "Aviso: Você desalgemou o Jogador "..nick_do_jogador.." com Sucesso!", thePlayer, 255, 255, 255 )
    				end
    			end
    		end
    	end
    end
    addCommandHandler( Cmd02, Desalgemar_Jogador)
    
    function Retirar_Armas ( source, cmd, pname )
    	if getElementData(source, "ocupacao" ) == "Policial" then
    		local cliente = getPlayerFromPartialName(pname)
    		if isElement(cliente) then
    			if cliente == source then exports.Scripts_Dxmessages:outputDx(source, "Erro: Você não pode Retirar suas Proprias Armas!", "error") return end
    			local cx,cy,cz = getElementPosition(cliente)
    			local x,y,z = getElementPosition(source)
    			local dist = getDistanceBetweenPoints3D(x,y,z,cx,cy,cz)
    			if dist <= 7 then
    			    takeAllWeapons ( cliente )
    				exports.Scripts_Dxmessages:outputDx(source, "Aviso: Você removeu todas as Armas do Jogador #ffffff"..getPlayerName(cliente).." #ffffffcom Sucesso!", "success")
    				exports.Scripts_Dxmessages:outputDx(cliente, "Aviso: O Policial #ffffff"..getPlayerName(source).."#ffffff Confiscou todas as suas Armas!", "warning")
    			end
    		else
    		    exports.Scripts_Dxmessages:outputDx(source, "Erro: O Jogador Não Foi Encontrado!", "error")
    		end
    	end
    end
    addCommandHandler ( Cmd03, Retirar_Armas )
    
    function Verificar_Emprego_Atual ( )
    	for i, player in ipairs(getElementsByType("player")) do
    		local acc = getPlayerAccount(player)
    		if acc and not isGuestAccount(acc) then
    			local job = getElementData(player,'ocupacao')
    			local accName = getAccountName (acc)
    			if isObjectInACLGroup ("user."..accName, aclGetGroup ( Grupo ) ) then
    			    setElementData ( player, "ocupacao", "Policial" )
    			    setElementData ( player, "AirNewSCR_Entrada_PortaoDP", "Sim" )
    				setElementData ( player, "AirNew_Perm_Prender", "Sim" )
    			else
    			    setElementData ( player, "ocupacao", "Criminoso" )
    			    setElementData ( player, "AirNewSCR_Entrada_PortaoDP", "Não" )
    				setElementData ( player, "AirNew_Perm_Prender", "Não" )
    			end
    		end
    	end
    end
    setTimer ( Verificar_Emprego_Atual, 1500, 0 )
    
    local Prisao_Blip = createBlip ( 1535.89856, -1672.66479, 13.38281 )
    setElementVisibleTo ( Prisao_Blip, root, false )
    
    function Nivel_de_Procurado ( source, int )
    	if int == 0 then
    		setPlayerWantedLevel ( source, int )
    	else
    		local wl = getPlayerWantedLevel ( source )
    		if wl + int <= 6 then
    			setPlayerWantedLevel ( source, wl+int )
    		else
    			setPlayerWantedLevel ( source, 6 )
    		end
    	end
    end
    addEvent("AirNewSCR_Nivel_de_Procurado", true)
    addEventHandler("AirNewSCR_Nivel_de_Procurado", getRootElement ( ), Nivel_de_Procurado )
    
    function Mensagens_Exports ( source, msg )
    	exports.Scripts_Textos:createNewDxMessage ( msg, source, 255, 255, 255 )
    end
    addEvent ( "AirNewSCR_Mensagens_Exports", true)
    addEventHandler ( "AirNewSCR_Mensagens_Exports", getRootElement ( ), Mensagens_Exports )
    
    function Enviar_Prisao_Servidor ( Jogador, Numero, Formato, Motivo )
        outputChatBox ( "#58ACFAPolicia: O Policial #ffffff"..getPlayerName(source).." #58ACFAPrendeu o Jogador #ffffff"..Jogador.."!", root, 255, 255, 255, true )
        outputChatBox ( "#58ACFAPolicia: Pelo tempo de "..Numero.." "..Formato..", Motivo: "..Motivo.."!", root, 255, 255, 255, true )
        Jogador_Func = getPlayerFromName ( Jogador )
        Estrelas_Preso = getPlayerWantedLevel ( Jogador_Func )
        givePlayerMoney ( source, Estrelas_Preso*1000 )
        if Formato == "Segundo(s)" then
            Multiplicador = 1
        elseif Formato == "Minuto(s)" then
            Multiplicador = 60
        elseif Formato == "Hora(s)" then
            Multiplicador = 3600
        elseif Formato == "Dia(s)" then
            Multiplicador = 86400
        end
        TempoPrisao = Numero*Multiplicador
        setElementData ( Jogador_Func, "AirNew_Tempo_Prisao", TempoPrisao )
        setElementData ( Jogador_Func, "AirNew_Preso", "Sim" )
    	setPlayerWantedLevel ( Jogador_Func, 0 )
    	takeAllWeapons ( Jogador_Func )
    	
    	setElementData ( Jogador_Func, "Policia:Captura", false )
    	setElementData ( Jogador_Func, "Player:Msg", "" )
    	showCursor ( Jogador_Func, false)
    	setControlState ( Jogador_Func, "sprint", false)
    	setControlState ( Jogador_Func, "walk", false)
    	setControlState ( Jogador_Func, "forwards", false)
    	toggleAllControls ( Jogador_Func, true )
    	
    	triggerClientEvent ( source, "CancelTimeParaPrender:Time", source )
    	
    	if getElementData ( Jogador_Func, "algemado" ) == true then
    		setElementData ( Jogador_Func, "algemado", false )
    		setPedAnimation ( Jogador_Func )
    		setElementFrozen ( Jogador_Func, false )
    		toggleControl ( Jogador_Func, "fire", true )
    	end
    end
    addEvent( "AirNew_Enviar_Prisao", true )
    addEventHandler( "AirNew_Enviar_Prisao", getRootElement(), Enviar_Prisao_Servidor )
    
    function Capturar_Jogador ( source, wantedlevel, vitima )
    	local x, y, z = getElementPosition ( vitima )
    	if x < -518 and y < 0 then -- SF
    		time = 4
    	end
    	if x >= -518 and y < 510 then -- LS
    		time = 2
    	end
    	if x >= -518 and y >= 510 then -- LV
    		time = 4
    	end	
    	setElementData ( source, "PoliceToPrision:Time", tonumber(time*60) )	
    	setTimer ( triggerClientEvent, 10000, 1, source, "ShowTimeParaPrender:Time", source )
    	
    	exports.Scripts_Textos:createNewDxMessage ( "Você foi Capturado pelo Policial "..getPlayerName(source), vitima, 255, 255, 255 )
    	exports.Scripts_Textos:createNewDxMessage ( "Você tem "..time.." Minutos para Levar o Jogador para a Prisão!", source, 255, 255, 255 )
    	
    	toggleAllControls ( vitima, false )
    	setElementVisibleTo ( Prisao_Blip, source, true )
    end
    addEvent("AirNewSCR_Capturar_Jogador", true)
    addEventHandler("AirNewSCR_Capturar_Jogador", getRootElement(), Capturar_Jogador )
    
    function Teleportar_Capturado_Veiculo ( state, player , vehicle , seat )
    	if state == true then
    		if seat and isElement ( vehicle ) then
    		    warpPedIntoVehicle ( player, vehicle, seat )
    		end
    	else 
    		removePedFromVehicle ( player )
    	end
    end
    addEvent ( "AirNewSCR_TeleportarVeiculo", true )
    addEventHandler ( "AirNewSCR_TeleportarVeiculo", getRootElement ( ), Teleportar_Capturado_Veiculo )
    
    function Remover_Jogador_Veiculo ( player )
        removePedFromVehicle ( player )
    end
    addEvent ( "AirNewSCR_Remover_Jogador_Veiculo", true )
    addEventHandler ( "AirNewSCR_Remover_Jogador_Veiculo", getRootElement ( ), Remover_Jogador_Veiculo )
    
    function Teleportar_Capturado_Player ( source, type, value, x, y ,z)
    	local Policial = getElementData ( source, "Policia:Captura" )
    	if isElement ( Policial ) and not isPedInVehicle ( source ) then
    		if type == "INT" then
    			setElementInterior ( source, value )
    		elseif type == "DIM" then
    			setElementDimension ( source, value )
    		end
    		setElementPosition ( source, x, y ,z )
    	end
    end
    addEvent ( "AirNewSCR_TeleportarPlayer", true )
    addEventHandler ( "AirNewSCR_TeleportarPlayer", getRootElement ( ), Teleportar_Capturado_Player )
    
    function Liberar_Capturado ( source )	
    	for p, player in ipairs ( getElementsByType ( "player" ) ) do	
    		job = getElementData ( player,"ocupacao" ) or "Nenhum"
    		capturado = getElementData ( player, "Policia:Captura" )
    		if job == "Criminoso" and isElement ( capturado ) then
    			if capturado == source then
    				Soltar_Fail_Captura ( source, player )
    			end
    		end
    	end
    end
    addEvent ( "AirNewSCR_FalharCapturaLiberar", true )
    addEventHandler ( "AirNewSCR_FalharCapturaLiberar", getRootElement ( ), Liberar_Capturado )
    
    function Soltar_Fail_Captura ( policial, vitima )
    	exports.Scripts_Textos:createNewDxMessage ( "O policial falhou e voce está solto novamnte, fuja",vitima, 255, 255, 255 )
    	exports.Scripts_Textos:createNewDxMessage ( "Voce falhou e o criminoso está solto novamente",policial, 255, 255, 255 )
    	setElementVisibleTo ( Prisao_Blip, policial, false )
    	setElementData ( vitima, "Policia:Captura", false )
    	setElementData ( vitima, "Player:Msg", "" )
    	showCursor ( vitima, false )
    	setControlState ( vitima, "sprint", false )
    	setControlState ( vitima, "walk", false )
    	setControlState ( vitima, "forwards", false )
    	toggleAllControls ( vitima, true )
    end
    
    --- // Salvamento - Carregamento // ---
    
    addEventHandler("onPlayerLogin", root,
    function( _, acc )
     CarregarLoginPlay ( acc )
     end
    )
    
    function CarregarLoginPlay ( conta )
    	if not isGuestAccount ( conta ) then
    		if conta then	
    			local source = getAccountPlayer ( conta )
    			local AirNew_Tempo_Prisao = getAccountData ( conta, "AirNew_Tempo_Prisao" ) or 0
    			setElementData ( source, "AirNew_Tempo_Prisao", AirNew_Tempo_Prisao )
    			local AirNew_Preso = getAccountData ( conta, "AirNew_Preso" ) or "Não"
    			setElementData ( source, "AirNew_Preso", AirNew_Preso )
    		end
    	end	
    end
    
    function ReiniciarScript ( res )
    	if res == getThisResource ( ) then
    		for i, player in ipairs ( getElementsByType ( "player" ) ) do
    			local acc = getPlayerAccount ( player )
    			if not isGuestAccount ( acc ) then
    				CarregarLoginPlay ( acc )
    			end
    		end
    	end
    end
    addEventHandler ( "onResourceStart", getRootElement ( ), ReiniciarScript )
    
    --
    
    function SalvarLoginPlay ( conta )
    	if conta then
    		local source = getAccountPlayer ( conta )
    		local AirNew_Tempo_Prisao = getElementData ( source, "AirNew_Tempo_Prisao" ) or 0
    		setAccountData ( conta, "AirNew_Tempo_Prisao", AirNew_Tempo_Prisao )
    		local AirNew_Preso = getElementData ( source, "AirNew_Preso" ) or "Não"
    		setAccountData ( conta, "AirNew_Preso", AirNew_Preso )
    	end	
    end
    
    function DesligarScript ( res )
        if res == getThisResource ( ) then
    		for i, player in ipairs ( getElementsByType ( "player" ) ) do
    			local acc = getPlayerAccount ( player )
    			if not isGuestAccount ( acc ) then
    				SalvarLoginPlay ( acc )
    			end
    		end
    	end
    end 
    addEventHandler ( "onResourceStop", getRootElement ( ), DesligarScript )
    
    function JogadorQuit ( quitType )
    	local acc = getPlayerAccount ( source )
    	if not isGuestAccount ( acc ) then
    		if acc then
    			SalvarLoginPlay ( acc )
    		end
    	end
    end
    addEventHandler ( "onPlayerQuit", getRootElement ( ), JogadorQuit )

    Onde troco para deixar o comando por ID do jogador ? 

    Já tentei mexer no local mais deu sucesso não ensinar pelo menos a forma

  9. --[[
    
    
    
     ################################################
     #                                              #
     #              Script Criado Por               #
     #           FACEBOOK.COM/AIRNEWSCR             #
     #                                              #
     #                                              #
     ################################################
    
    
    
    --]]
    
    --------------------------------------------------------------------------------------------
    --[[
    exports [ "BVB_NewScoreboard" ]:addScoreboardColumn ( "Level" )
    exports [ "BVB_NewScoreboard" ]:addScoreboardColumn ( "Tempo Online" )
    --]]
    --------------------------------------------------------------------------------------------
    
    function convertS(s)
    	if type(tonumber(s)) == "number" then
    		milisegundo = s
    		local horas_seg=3600
    		local hora = math.floor(milisegundo/horas_seg)
    		local minuto = math.floor((milisegundo-(horas_seg*hora))/60)
    		local segundo = math.floor((milisegundo-(horas_seg*hora)-(minuto*60)))	
    		local tudo = string.format("%02d:%02d:%02d",hora,minuto,segundo)	
    		local dia = math.floor(s/86400)
    
    		return hora,minuto,segundo,tudo,dia
    	else
    		return 0,0,0,0,0		
    	end
    end
    
    --------------------------------------------------------------------------------------------
    
    function saveData(conta)
    	if conta then
    			local source = getAccountPlayer(conta)
    			local level = getElementData(source,"Level") or 0
    			local exp = getElementData(source,"LSys:EXP") or 0
    			local onlinetime = getElementData(source,"LSys:Online") or 0
    			local mins = getElementData(source,"LSys:Mins") or 0
    			setAccountData (conta, "Level",level)
    			setAccountData (conta, "LSys:EXP",exp)
    			setAccountData (conta, "LSys:Online",onlinetime)
    			setAccountData (conta, "LSys:Mins",mins)
    	end	
    end
    
    --------------------------------------------------------------------------------------------
    
    function loaddata(conta)
    	if not (isGuestAccount (conta)) then
    		if (conta) then	
    			local source = getAccountPlayer(conta)	
    			local level = getAccountData(conta,"Level")
    			if type(level) == "boolean" or level == nil then
    				level = 0
    			end
    			setElementData (source, "Level", tonumber(level))
    			setElementData (source, "LSys:EXP",tonumber(getAccountData(conta,"LSys:EXP")) or 0)
    			setElementData (source, "LSys:Online",tonumber(getAccountData(conta,"LSys:Online")) or 0)
    			setElementData (source, "LSys:Mins",tonumber(getAccountData(conta,"LSys:Mins")) or 0)
    
    		end
    	end	
    end
    
    --------------------------------------------------------------------------------------------
    
    function timecount()
    	for i, player in ipairs(getElementsByType("player")) do
    		local acc = getPlayerAccount(player)
    		if acc then
    			if not isGuestAccount(acc) then
    				local level = getElementData(player,"Level") or 0 if tonumber(level) == nil then level = 0 end
    				local exp = getElementData(player,"LSys:EXP") or 0 if tonumber(exp) == nil then exp = 0 end
    				local onlinetime = getElementData(player,"LSys:Online") or 0 if tonumber(onlinetime) == nil then onlinetime = 0 end
    				local mins = getElementData(player,"LSys:Mins") or 0 if tonumber(mins) == nil then mins = 0 end
    				
    				----
    				
    				local h, m, s, t, d = convertS ( tonumber ( onlinetime ) )
    				if #tostring(s) == 1 then
    					s = "0"..tostring(s)
    				end
    				if #tostring(h) == 1 then
    					h = "0"..tostring(h)
    				end	
    				if #tostring(m) == 1 then
    					m = "0"..tostring(m)
    				end
    				setElementData ( player, "Tempo Online", ""..h..":"..m..":"..s.."" )
    				
    				----
    				
    				if not getElementData(player,"afkdate",true) then
    				
    				-- Relogio UP
    				
    				local horas_seg = 3600
    				local hora = math.floor(mins/horas_seg)
    				local minuto = math.floor((mins-(horas_seg*hora))/60)
    				local segundo = math.floor((mins-(horas_seg*hora)-(minuto*60)))
    				
    				if minuto == 9 then msAir = "00" elseif minuto == 8 then msAir = "01" elseif minuto == 7 then msAir = "02" elseif minuto == 6 then msAir = "03" elseif minuto == 5 then msAir = "04" elseif minuto == 4 then msAir = "05" elseif minuto == 3 then msAir = "06" elseif minuto == 2 then msAir = "07" elseif minuto == 1 then msAir = "08" elseif minuto == 0 then msAir = "09" --[[elseif minuto == 0 then msAir = 10--]] end
    				if segundo == 60 then segAir = "00" elseif segundo == 59 then segAir = "01" elseif segundo == 58 then segAir = "02" elseif segundo == 57 then segAir = "03" elseif segundo == 56 then segAir = "04" elseif segundo == 55 then segAir = "05" elseif segundo == 54 then segAir = "06" elseif segundo == 53 then segAir = "07" elseif segundo == 52 then segAir = "08" elseif segundo == 51 then segAir = "09" elseif segundo == 50 then segAir = "10" elseif segundo == 49 then segAir = 11 elseif segundo == 48 then segAir = 12 elseif segundo == 47 then segAir = 13 elseif segundo == 46 then segAir = 14 elseif segundo == 45 then segAir = 15 elseif segundo == 44 then segAir = 16 elseif segundo == 43 then segAir = 17 elseif segundo == 42 then segAir = 18 elseif segundo == 41 then segAir = 19 elseif segundo == 40 then segAir = 20 elseif segundo == 39 then segAir = 21 elseif segundo == 38 then segAir = 22 elseif segundo == 37 then segAir = 23 elseif segundo == 36 then segAir = 24 elseif segundo == 35 then segAir = 25 elseif segundo == 34 then segAir = 26 elseif segundo == 33 then segAir = 27 elseif segundo == 32 then segAir = 28 elseif segundo == 31 then segAir = 29 elseif segundo == 30 then segAir = 30 elseif segundo == 29 then segAir = 31 elseif segundo == 28 then segAir = 32 elseif segundo == 27 then segAir = 33 elseif segundo == 26 then segAir = 34 elseif segundo == 25 then segAir = 35 elseif segundo == 24 then segAir = 36 elseif segundo == 23 then segAir = 37 elseif segundo == 22 then segAir = 38 elseif segundo == 21 then segAir = 39 elseif segundo == 20 then segAir = 40 elseif segundo == 19 then segAir = 41 elseif segundo == 18 then segAir = 42 elseif segundo == 17 then segAir = 43 elseif segundo == 16 then segAir = 44 elseif segundo == 15 then segAir = 45 elseif segundo == 14 then segAir = 46 elseif segundo == 13 then segAir = 47 elseif segundo == 12 then segAir = 48 elseif segundo == 11 then segAir = 49 elseif segundo == 10 then segAir = 50 elseif segundo == 9 then segAir = 51 elseif segundo == 8 then segAir = 52 elseif segundo == 7 then segAir = 53 elseif segundo == 6 then segAir = 54 elseif segundo == 5 then segAir = 55 elseif segundo == 4 then segAir = 56 elseif segundo == 3 then segAir = 57 elseif segundo == 2 then segAir = 58 elseif segundo == 1 then segAir = 59 elseif segundo == 0 then segAir = "00" end
    				setElementData ( player, "AirNew:RelogioUP", ""..msAir..":"..segAir.."" )
    				
    				-- Relogio UP
    				
    				if tonumber(mins) == 600 then
    					setElementData(player,"LSys:Mins",1)
    					
    					VIP1 = getElementData ( player, "VIP_01" ) or "Não"
    					VIP2 = getElementData ( player, "VIP_02" ) or "Não"
    					VIP3 = getElementData ( player, "VIP_03" ) or "Não"
    					VIP4 = getElementData ( player, "VIP_04" ) or "Não"
    		
    					if VIP1 == "Sim" or VIP2 == "Sim" or VIP3 == "Sim" or VIP4 == "Sim" then
    						if tonumber(exp) == 4 then
    							setElementData(player,"LSys:EXP",0)
    							setElementData(player,"Level",tonumber(level)+1)
    							outputChatBox ( "#ffffff* #82FA58UP #ffffff- Você Ganhou +1 de Experiência. (".. tonumber(exp)+1 .."/5)", player, 255, 255, 255, true )
    							outputChatBox ( "#ffffff* #82FA58UP #ffffff- Você Juntou 5 de Experiência e Ganhou +1 Level ("..tonumber(level)+1 ..")", player, 255, 255, 255, true )
    							playSoundFrontEnd ( player, 45 )
    							DarSalario (player, "VIP" ) -- Efetua o Pagamento do Jogador
    						else
    							outputChatBox ( "#ffffff* #82FA58UP #ffffff- Você Ganhou +1 de Experiência. (".. tonumber(exp)+1 .."/5)", player, 255, 255, 255, true )
    							setElementData(player,"LSys:EXP",tonumber(exp)+1)
    							playSoundFrontEnd ( player, 44 )
    						end
    					end
    					
    					if tonumber(exp) == 5 then
    						setElementData(player,"LSys:EXP",0)
    						setElementData(player,"Level",tonumber(level)+1)
    						outputChatBox ( "#ffffff* #82FA58UP #ffffff- Você Ganhou +1 de Experiência. (".. tonumber(exp)+1 .."/6)", player, 255, 255, 255, true )
    						outputChatBox ( "#ffffff* #82FA58UP #ffffff- Você Juntou 6 de Experiência e Ganhou +1 Level ("..tonumber(level)+1 ..")", player, 255, 255, 255, true )
    						playSoundFrontEnd ( player, 45 )
    						DarSalario (player) -- Efetua o Pagamento do Jogador
    					else
    						if VIP1 == "Sim" or VIP2 == "Sim" or VIP3 == "Sim" or VIP4 == "Sim" then return end
    					    outputChatBox ( "#ffffff* #82FA58UP #ffffff- Você Ganhou +1 de Experiência. (".. tonumber(exp)+1 .."/6)", player, 255, 255, 255, true )
    						setElementData(player,"LSys:EXP",tonumber(exp)+1)
    						playSoundFrontEnd ( player, 44 )
    					end
    					
    				elseif tonumber(mins) < 600 then
    					setElementData(player,"LSys:Mins",tonumber(mins)+1)
    				end
    				setElementData(player,"LSys:Online",tonumber(onlinetime)+1)
    				
    			end
    		end
    	end
    end
    end
    setTimer(timecount,1000,0)	
    
    function DADOS_AIRNEWSCR2 ( source, cmd, pname, Quantidade )
        if pname then
    	    if Quantidade then
    	        local cliente = Resultado_Final ( pname )
    	        if isElement(cliente) then
    		        if isGuestAccount ( getPlayerAccount ( source ) ) then return end
    	            if isObjectInACLGroup ("user."..getAccountName ( getPlayerAccount ( source ) ), aclGetGroup ( "Console" ) ) then
    			        setElementData ( cliente, "Level", tonumber(Quantidade) )
    					exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).." Setou seu Level para "..Quantidade, "success" )
    					exports.Scripts_Dxmessages:outputDx(source, "O Level do(a) Jogador(a) "..getPlayerName(cliente).." Foi setado para "..Quantidade, "success" )
    		        end
    		    else
    		        exports.Scripts_Dxmessages:outputDx(source, "O(A) Jogador(a) Não Foi Encontrado(a)", "error")
    		    end
    		end
    	end
    end
    addCommandHandler ( "level", DADOS_AIRNEWSCR2 )
    
    function Resultado_Final ( ID )
    	local Jogadores = getElementsByType ( "player" )
    	for theKey, Jogador in ipairs ( Jogadores ) do
    		if getElementData ( Jogador, "ID" ) == ID then
    		    local Jogador_Funcao = getPlayerName ( Jogador )
    			local Jogador_Funcao = getPlayerFromName ( Jogador_Funcao )
    		    --local Cliente = getPlayerFromPartialName ( Jogador_Funcao )
    			--return Cliente
    			return Jogador_Funcao
    		end
    	end
    end
    
    function DADOS_AIRNEWSCR22 ( source, cmd, pname, Quantidade )
        if pname then
    	    if Quantidade then
    		    if Quantidade == "TDD" then
    			    Quantidade = "Transportador de Drogas"
    			end
    	        local cliente = getPlayerFromPartialName(pname)
    	        if isElement(cliente) then
    		        if isGuestAccount ( getPlayerAccount ( source ) ) then return end
    	            if isObjectInACLGroup ("user."..getAccountName ( getPlayerAccount ( source ) ), aclGetGroup ( "Console" ) ) then
    			        setElementData ( cliente, "Emprego", Quantidade )
    					exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).." #ffffffSetou seu Emprego para "..Quantidade, "success" )
    					exports.Scripts_Dxmessages:outputDx(source, "O Emprego do(a) Jogador(a) "..getPlayerName(cliente).." #ffffffFoi setado para "..Quantidade, "success" )
    		        end
    		    else
    		        exports.Scripts_Dxmessages:outputDx(source, "O(A) Jogador(a) Não Foi Encontrado(a)", "error")
    		    end
    		end
    	end
    end
    addCommandHandler ( "emprego", DADOS_AIRNEWSCR22 )
    
    --function sarrarVIP(source)
    	--unbindKey ( source, LetraParaMarkers, "down", sarrarVIP )
    	--exports.BVB_MsgsMarker:delete(source) 
    	--if sexStripperStateVIP == true then exports.BVB_Textos:createNewDxMessage("Acalma o Malaquias, A Garota esta em Uso!",source, 255, 255, 255) return end
    	--sexStripperStateVIP=true
    
    	--setTimer(function() 
    	--sexStripperStateVIP=false
    	--setElementPosition(piriguetekkkVIP, 135.60016, 1385.31482, 1089.05249 )
    
    	--end,10000,1,source)
    --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
    
    function DarSalario (player, VIP)
    
    local account = getPlayerAccount (player)
    local accname = getAccountName (account)
    local Jogador = getPlayerName (player)
    
    EmpregoAtual = getElementData ( player, "Emprego" )
    
    sVIP = 3000
    
    sDesempregado = 300
    sEntregadorDeJornal = 400
    sMotoTaxi = 500
    sProstituta = 600
    sPizzaBoy = 700
    sMotoristaDeUber = 800
    sMecanico = 900
    sPetroleiro = 950
    sMotoristaDeOnibus = 1000
    sPilotoDeAviao = 1600
    sLeiteiro = 1300
    sFabricanteDeArmas = 1000
    sEntregadorDeMoveis = 1500
    
    sPolicial = 4870
    sDetran = 4600
    
    SeguroDeVida = getElementData ( player, "Seguro_de_Vida" ) or "Não"
    MensalidadeSeguroDeVida = 150
    
    outputChatBox ( "#F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #F96031Salário #F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~~", player, 255, 255, 255, true )
    
    outputChatBox ( "#F96031» #BEE09ALogin da Conta #ffffff: #9ABDE0"..accname.." / #BEE09ANick #ffffff: #9ABDE0"..Jogador.."", player, 255, 255, 255, true )
    
    if EmpregoAtual == "Entregador de Jornal" then
    givePlayerMoney ( player, sEntregadorDeJornal )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeJornal.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "PizzaBoy" then
    givePlayerMoney ( player, sPizzaBoy )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPizzaBoy.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Motorista de Uber" then
    givePlayerMoney ( player, sMotoristaDeUber )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sMotoristaDeUber.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Mecanico" then
    givePlayerMoney ( player, sMecanico )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sMecanico.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Petroleiro" then
    givePlayerMoney ( player, sPetroleiro )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPetroleiro.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Motorista de Onibus" then
    givePlayerMoney ( player, sMotoristaDeOnibus )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sMotoristaDeOnibus.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Piloto de Aviao" then
    givePlayerMoney ( player, sPilotoDeAviao )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPilotoDeAviao.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Policial" then
    givePlayerMoney ( player, sPolicial )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPolicial.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Leiteiro" then
    givePlayerMoney ( player, sLeiteiro )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sLeiteiro.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Prostituta" then
    givePlayerMoney ( player, sProstituta )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sProstituta.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "MotoTaxi" then
    givePlayerMoney ( player, sMotoTaxi )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sMotoTaxi.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Fabricante de Armas" then
    givePlayerMoney ( player, sFabricanteDeArmas )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sFabricanteDeArmas.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Detran" then
    givePlayerMoney ( player, sDetran )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sDetran.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == "Entregador de Moveis" then
    givePlayerMoney ( player, sEntregadorDeMoveis )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeMoveis.."", player, 255, 255, 255, true )
    
    elseif EmpregoAtual == false then
    givePlayerMoney ( player, sDesempregado )
    outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0Desempregado", player, 255, 255, 255, true )
    outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sDesempregado.."", player, 255, 255, 255, true )
    
    end
    
    if VIP then
    	if VIP == "VIP" then
    		outputChatBox ( "#F96031» #F781F3Salário VIP #ffffff: #9ABDE0$"..sVIP.."", player, 255, 255, 255, true )
    		givePlayerMoney ( player, sVIP )
    	end
    end
    
    if SeguroDeVida == "Sim" then
    takePlayerMoney ( player, MensalidadeSeguroDeVida )
    outputChatBox ( "#F96031» #BEE09AMensalidade do Seguro de Vida #ffffff: #FA5858-$"..MensalidadeSeguroDeVida.."", player, 255, 255, 255, true )
    end
    
    outputChatBox ( "#F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #F96031Salário #F9A631~~~~~~~~~~~~~~~~~~~~~~~~~~~~~", player, 255, 255, 255, true )
    end
    
    --[[
    
    --------------------------------------------------------------------------------------------
    
    function meulevel(source)
    	triggerClientEvent(source,"SHOW.WINDOW.LEVELSYS",source,true)
    end
    addCommandHandler("meulevel",meulevel)
    
    --------------------------------------------------------------------------------------------
    
    function restart()
    	for index, player in ipairs(getElementsByType("player")) do
    		bindKey(player, "F2", "down", meulevel)
    	end
    end
    addEventHandler("onResourceStart", getResourceRootElement(getThisResource()), restart)
    
    --------------------------------------------------------------------------------------------
    
    function entrar()
    	bindKey(source, "F2", "down", meulevel)
    end
    addEventHandler("onPlayerJoin", getRootElement(), entrar)
    
    --------------------------------------------------------------------------------------------
    
    function fechar(player)
    	for index, player in ipairs(getElementsByType("player")) do
    		unbindKey(player, "F2", "down", meulevel)
    	end
    end
    addEventHandler("onResourceStop", getResourceRootElement(getThisResource()), fechar)
    
    --]]
    
    ------------------------------------------------------------------------------------------------------
    
    addEventHandler("onPlayerLogin", root,
      function( _, acc )
    	setTimer(loaddata,50,1,acc)
      end
    )
    
    --------------------------------------------------------------------------------------------
    
    function startScript ( res )
    	if res == getThisResource() then
    		for i, player in ipairs(getElementsByType("player")) do
    			local acc = getPlayerAccount(player)
    			if not isGuestAccount(acc) then
    				loaddata(acc)			
    			end
    		end
    	end
    end
    addEventHandler ( "onResourceStart", getRootElement(), startScript )
    
    --------------------------------------------------------------------------------------------
    
    function stopScript( res )
        if res == getThisResource() then
    		for i, player in ipairs(getElementsByType("player")) do
    			local acc = getPlayerAccount(player)
    			if not isGuestAccount(acc) then
    				saveData(acc)	
    			end
    		end
    	end
    end 
    addEventHandler ( "onResourceStop", getRootElement(), stopScript )
    
    --------------------------------------------------------------------------------------------
    
    function deslogar(acc)
    	cancelEvent ()
    end
    addEventHandler("onPlayerLogout",getRootElement(),deslogar)
    
    --------------------------------------------------------------------------------------------
    
    function sair ( quitType )
    	local acc = getPlayerAccount(source)
    	if not (isGuestAccount (acc)) then
    		if acc then
    			saveData(acc)
    		end
    	end
    end
    addEventHandler ( "onPlayerQuit", getRootElement(), sair )
    
    --------------------------------------------------------------------------------------------
    
    function VerificarCargoAirNew ( player )
    	if player then
    		acc = getPlayerAccount ( player )
    		if not isGuestAccount ( acc ) then
    			EmpregoAtual = getElementData ( player, "Emprego" ) or false
    			if EmpregoAtual == "Mecanico" then
    				setElementData ( player, "Profissão", "Mecanico" )
    			elseif EmpregoAtual == "Petroleiro" then
    				setElementData ( player, "Profissão", "Petroleiro" )
    			elseif EmpregoAtual == "Motorista de Uber" then
    				setElementData ( player, "Profissão", "Motorista de Uber" )
    			elseif EmpregoAtual == "Motorista de Onibus" then
    				setElementData ( player, "Profissão", "Motorista de Ônibus" )
    			elseif EmpregoAtual == "Entregador de Jornal" then
    				setElementData ( player, "Profissão", "Entregador de Jornal" )
    			elseif EmpregoAtual == "Piloto de Aviao" then
    				setElementData ( player, "Profissão", "Piloto de Avião" )
    			elseif EmpregoAtual == "PizzaBoy" then
    				setElementData ( player, "Profissão", "PizzaBoy" )
    			elseif EmpregoAtual == "Policial" then
    				setElementData ( player, "Profissão", "Policial" )
    			elseif EmpregoAtual == "Transportador de Drogas" then
    				setElementData ( player, "Profissão", "Transportador de Drogas" )
    			elseif EmpregoAtual == "Leiteiro" then
    				setElementData ( player, "Profissão", "Leiteiro" )
    			elseif EmpregoAtual == "Prostituta" then
    				setElementData ( player, "Profissão", "Prostituta" )
    			elseif EmpregoAtual == "Detran" then
    			    setElementData ( player, "Profissão", "Detran" )
    			elseif EmpregoAtual == "MotoTaxi" then
    			    setElementData ( player, "Profissão", "MotoTaxi" )
    			elseif EmpregoAtual == "Fabricante de Armas" then
    				setElementData ( player, "Profissão", "Fabricante de Armas" )
    			elseif EmpregoAtual == "Entregador de Moveis" then
    				setElementData ( player, "Profissão", "Entregador de Moveis" )
    			elseif EmpregoAtual == false or EmpregoAtual == "Desempregado" then
    				setElementData ( player, "Profissão", "Desempregado" )
    			end		
    		end
    	end
    end
    --[[
    addEventHandler( "onResourceStart",resourceRoot, 
      function( )
    	exports [ "BVB_NewScoreboard" ]:addScoreboardColumn ( "Profissão" )
      end 
    ) 
    --]]
    setTimer (
    function ( )
    	for i, pl in pairs ( getElementsByType ( "player" ) ) do
    		if pl ~= ( false or nil ) then
    			VerificarCargoAirNew ( pl )
    		end
    	end
    end, 10000, 0 )
    
    --------------------------------------------------------------------------------
    
    function SalvarEmpregoAtual(conta)
    	if conta then
    	local source = getAccountPlayer(conta)
    	local emp = getElementData ( source, "Emprego" ) or false
    	setAccountData ( conta, "Emprego", emp )
    	end	
    end
    
    function CarregarEmpregoAtual(conta)
    	if not (isGuestAccount (conta)) then
    		if (conta) then	
    			local source = getAccountPlayer(conta)	
    			local emp = getAccountData ( conta, "Emprego" ) or false
    			setElementData ( source, "Emprego", emp )
    		end
    	end	
    end
    
    addEventHandler("onPlayerLogin", root,
      function( _, acc )
    	setTimer(CarregarEmpregoAtual,50,1,acc)
      end
    )
    
    function startScript ( res )
    	if res == getThisResource() then
    		for i, player in ipairs(getElementsByType("player")) do
    			local acc = getPlayerAccount(player)
    			if not isGuestAccount(acc) then
    				CarregarEmpregoAtual(acc)
    			end
    		end
    	end
    end
    addEventHandler ( "onResourceStart", getRootElement(), startScript )
    
    function stopScript( res )
        if res == getThisResource() then
    		for i, player in ipairs(getElementsByType("player")) do
    			local acc = getPlayerAccount(player)
    			if not isGuestAccount(acc) then
    				SalvarEmpregoAtual(acc)
    			end
    		end
    	end
    end 
    addEventHandler ( "onResourceStop", getRootElement(), stopScript )
    
    function sair ( quitType )
    	local acc = getPlayerAccount(source)
    	if not (isGuestAccount (acc)) then
    		if acc then
    			SalvarEmpregoAtual(acc)
    		end
    	end
    end
    addEventHandler ( "onPlayerQuit", getRootElement(), sair )

    Este Script não que seta level nei a pau já procurei o erro no debugscript e não tem alguem ajuda 

  10. 6 hours ago, Lord Henry said:
    function advogadoAirNew ( LV )
        local Level = getElementData ( source, "Level" ) or 0
        if isObjectInACLGroup ( "user.", aclGetGroup ( "Console" ) ) then
            TudoInvisivel ()
            setElementVisibleTo ( Advogado, source, true )
            setElementData ( source, "AirNew>Encaminhamento", "Advogado" )
            MensagemAirNewSCR ( "Emprego: Para Iniciar os Serviços siga o Checkpoint Vermelho em seu Minimapa", "success" )
    		triggerClientEvent ( source, "AirNew>FecharAgencia", root )
            setElementData ( source, "Emprego", false )
    	else
    	    MensagemAirNewSCR ( "Emprego: Você não possui Nivel suficiente para essa Profissão!", "error" )
        end
    end
    addEvent( "Encaminhar>Advogado", true )
    addEventHandler( "Encaminhar>Advogado", getRootElement(), advogadoAirNew )

     Olha na print o erro: https://prnt.sc/pihlfi

  11. function advogadoAirNew ( LV )
        local Level = getElementData ( source, "Level" ) or 0
        if Level >= LV then
            TudoInvisivel ()
            setElementVisibleTo ( Advogado, source, true )
            setElementData ( source, "AirNew>Encaminhamento", "Advogado" )
            MensagemAirNewSCR ( "Emprego: Para Iniciar os Serviços siga o Checkpoint Vermelho em seu Minimapa", "success" )
    		triggerClientEvent ( source, "AirNew>FecharAgencia", root )
            setElementData ( source, "Emprego", false )
    	else
    	    MensagemAirNewSCR ( "Emprego: Você não possui Nivel suficiente para essa Profissão!", "error" )
        end
    end
    addEvent( "Encaminhar>Advogado", true )
    addEventHandler( "Encaminhar>Advogado", getRootElement(), advogadoAirNew )

    Alguem ajuda por para encaminhar por Acl,ja tentei não consegui

  12. local screenW,screenH = guiGetScreenSize()
    local resW,resH = 1366,768
    local x,y =  (screenW/resW), (screenH/resH)
    
    local components = { "weapon", "ammo", "health", "clock", "money", "breath", "armour", "wanted" }
    
    function HUDc()
    	local vida1 = math.floor(getElementHealth(getLocalPlayer()))
    	local vida2 = getPedMaxHealth(getLocalPlayer())
    	local colete = math.floor(getPedArmor(getLocalPlayer()))
    	local bankMoney = convertNumber(getElementData(localPlayer, "O mais usado -> Bank:Caixa"))  
    	local money = convertNumber(getPlayerMoney()) 
    	local procurado = getPlayerWantedLevel(getLocalPlayer())
    	local ammoClip = getPedAmmoInClip(getLocalPlayer(), getPedWeaponSlot(getLocalPlayer()))
    	local ammo = getPedTotalAmmo(getLocalPlayer()) - getPedAmmoInClip(getLocalPlayer())
    	local armaId = getPedWeapon(getLocalPlayer())
    	local weapon = getPedWeapon(getLocalPlayer())
    	local wanted = getPlayerWantedLevel(getLocalPlayer())
    	local Nivel = getElementData ( localPlayer, "Level" ) or 0
    	local EXP = getElementData ( localPlayer, "LSys:EXP" ) or 0
    	local desemp = getElementData (localPlayer, "Profissão" ) or false
    	
            -- ########### BLUR ###########
    
    	    exports["Blur"]:dxDrawBluredRectangle(x*1098, y*16, x*249, y*50, tocolor(255, 255, 255, 255)) --FUNDO MONEY		
    		exports["Blur"]:dxDrawBluredRectangle(x*1098, y*125, x*249, y*24, tocolor(255, 255, 255, 255)) --FUNDO PROCURADO
    		exports["Blur"]:dxDrawBluredRectangle(x*1098, y*70, x*249, y*24, tocolor(255, 255, 255, 255)) --FUNDO VIDA
    		exports["Blur"]:dxDrawBluredRectangle(x*1098, y*98, x*249, y*24, tocolor(255, 255, 255, 255)) --FUNDO COLETE
    		exports["Blur"]:dxDrawBluredRectangle(x*1098, y*152, x*249, y*24, tocolor(255, 255, 255, 255)) --FUNDO LEVEL
    		exports["Blur"]:dxDrawBluredRectangle(x*1098, y*179, x*249, y*24, tocolor(255, 255, 255, 255)) --FUNDO EXP
    		exports["Blur"]:dxDrawBluredRectangle(x*1098, y*205, x*249, y*24, tocolor(255, 255, 255, 255)) --FUNDO EMPREGO
    
    	    -- ########### IMGS ###########
    		
    		dxDrawImage(x*550, y*0, x*900, y*300, "files/img/background.png", 0, 0, 0, tocolor(254, 254, 254, 255), false)	
    		dxDrawImage(x*1075, y*222, x*200, y*105, "files/img/"..tostring(weapon)..".png", 0, 0, 0, tocolor(255, 255, 255, 255), false)
    		
    		-- ########### HUD DXS ###########
    		
    
    		dxDrawRectangle(x*1098, y*125, x*249, y*24, tocolor(0, 0, 0, 137), false) -- NIVEL PROCURADO FUNDO
    		dxDrawRectangle(x*1101, y*130, x*241/6*wanted, y*15, tocolor(255, 255, 0, 130), false) --NIVEL DE PROCURADO BARRA		
    		
    		dxDrawRectangle(x*1098, y*70, x*249, y*24, tocolor(0, 0, 0, 137), false) --VIDA FUNDO
    		dxDrawRectangle(x*1101, y*75, x*241/vida2*vida1, y*15, tocolor(124, 252, 0, 130), false) --VIDA BARRA
    		
            dxDrawRectangle(x*1098, y*98, x*249, y*24, tocolor(0, 0, 0, 137), false) --COLETE FUNDO
    		dxDrawRectangle(x*1101, y*104, x*241/100*colete, y*15, tocolor(16, 102, 231, 130), false) --COLETE BARRA 	
    
    		dxDrawRectangle(x*1098, y*152, x*249, y*24, tocolor(0, 0, 0, 137), false) --LEVEL FUNDO
    		dxDrawRectangle(x*1101, y*157, x*241/30*Nivel, y*15, tocolor(255, 140, 0, 130), false) --LEVEL BARRA 	
    
    		dxDrawRectangle(x*1098, y*179, x*249, y*24, tocolor(0, 0, 0, 137), false) --EXP FUNDO
    		dxDrawRectangle(x*1101, y*184, x*241/20*EXP, y*15, tocolor(255, 0, 0, 130), false) --EXP BARRA 	
    
    		dxDrawRectangle(x*1098, y*205, x*249, y*24, tocolor(0, 0, 0, 137), false) --EMPREGO FUNDO
    
    		-- ########### TEXTOS ###########
    
    		if wanted > 0 then
    		dxDrawText("Nível: "..wanted, x*1200, y*131, x*1179, y*159, tocolor(254, 254, 254, 182), x*1.00, "default", "left", "top", false, false, false, false, false)
    	else
    		dxDrawText("Sem Nível", x*1200, y*131, x*1179, y*159, tocolor(254, 254, 254, 182), x*1.00, "default", "left", "top", false, false, false, false, false)
    	end
    		
            dxDrawText(money, x*1140, y*33, x*1038, y*48, tocolor(254, 254, 254, 182), 1.20, "default", "left", "top", false, false, false, false, false)
            dxDrawText(bankMoney, x*1270, y*33, x*1038, y*48, tocolor(254, 254, 254, 182), 1.20, "default", "left", "top", false, false, false, false, false)
            dxDrawText(ammoClip.." | "..ammo, x*1205, y*280, x*1031, y*73, tocolor(254, 254, 254, 182), x*1.20, "default", "left", "top", false, false, false, false, false)
            dxDrawText(vida1.."%", x*1200, y*76, x*1179, y*159, tocolor(255, 255, 255, 255), x*1.00, "default", "left", "top", false, false, false, false, false)
    		dxDrawText(colete.."%", x*1200, y*105, x*1179, y*159, tocolor(255, 255, 255, 255), x*1.00, "default", "left", "top", false, false, false, false, false)
    		dxDrawText("Level: "..Nivel, x*1380, y*275, x*1072, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false)
    		dxDrawText("EXP: "..EXP.." / 20", x*1380, y*328, x*1072, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false)
    		dxDrawText(desemp, x*1380, y*380, x*1072, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false)
    end
    addEventHandler("onClientRender", root, HUDc)
    
    function toggleRadar()
    	if isVisible then
    		addEventHandler("onClientRender", root, HUDc)
    	else
    		removeEventHandler("onClientRender", root, HUDc)
    	end
    	isVisible = not isVisible
    end
    bindKey ("F11", "down", toggleRadar)
    
    function renderDxHud()
    	addEventHandler("onClientRender", getRootElement(), HUDc)
    	setPlayerHudComponentVisible("armour", false)
    	setPlayerHudComponentVisible("wanted", false)
    	setPlayerHudComponentVisible("weapon", false)
    	setPlayerHudComponentVisible("money", false)
    	setPlayerHudComponentVisible("health", false)
    	setPlayerHudComponentVisible("clock", false)
    	setPlayerHudComponentVisible("breath", false)
    	setPlayerHudComponentVisible("ammo", false)
    end
    addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()), renderDxHud)
    
    function onStop()
    	setPlayerHudComponentVisible("armour", true)
    	setPlayerHudComponentVisible("wanted", true)
    	setPlayerHudComponentVisible("weapon", true)
    	setPlayerHudComponentVisible("money", true)
    	setPlayerHudComponentVisible("health", true)
    	setPlayerHudComponentVisible("clock", true)
    	setPlayerHudComponentVisible("breath", true)
    	setPlayerHudComponentVisible("ammo", true)
    end
    addEventHandler("onClientResourceStop", getResourceRootElement(getThisResource()), onStop)
    
    function getPedMaxHealth(ped)
    	assert(isElement(ped) and (getElementType(ped) == "ped" or getElementType(ped) == "player"), "Bad argument @ 'getPedMaxHealth' [Expected ped/player at argument 1, got " .. tostring(ped) .. "]")
    	local stat = getPedStat(ped, 24)
    	local maxhealth = 100 + (stat - 569) / 4.31
    	return math.max(1, maxhealth)
    end
    		
    function convertNumber ( number )   
        local formatted = number   
        while true do       
            formatted, k = string.gsub(formatted, "^(-?%d+)(%d%d%d)", '%1,%2')     
            if ( k==0 ) then       
                break   
            end   
        end   
        return formatted 
    end

    https://i.imgur.com/3DNGVmP.png

  13. ------- @tavinhosantos09 STAFF BRASIL VIDA BOA --------
    acls = {
    	"Console",
    	"Admin",
    	"Moderator",
        "SuperModerator",
        "Ajudante",
        "NovoVereador",
        "NovoDeputadoEstadual",
        "NovoDeputadoFederal",
        "NovoSenador",	
        "NovoGovernador",		
    }
    
    local iv = true 
    function tavinhobvb( player ) 
    	local Deadusergroup = getAccountName( getPlayerAccount ( player ) ) 
    	for _, acl in ipairs (acls) do
    		if isObjectInACLGroup("user."..Deadusergroup, aclGetGroup(acl)) then
            if iv then 
          iv = false 
         setPlayerNametagShowing(player,false) 
        setElementAlpha(player,0) 
          else 
          iv = true 
         setPlayerNametagShowing(player,false) 
        setElementAlpha(player,255) 
                end 
            end 
        end 
    end	
    addCommandHandler ( "in", tavinhobvb ) 
    
    ------- @tavinhosantos09 STAFF BRASIL VIDA BOA --------

    Alguem ajudar por para nome fica invisivel tbm

  14. 44 minutes ago, Lord Henry said:

    Prosseguindo com as demais questões que vc ainda não respondeu:

    1. Tá usando a versão atual do MTA?
    2. Quando foi que esse problema começou?
    3. Pode ser alguma configuração mexida
    4. GTA:SA modificado ou algum problema no seu MTA.

    Man muito obrigado eu Instalei versão 1.5.5 ai fui no mapa editor tava funcionado ai fiz o update que eles pediu e voltou ao normal 

  15. function teleprotect ( thePlayer)
    
                local Deadusergroup = getAccountName(getPlayerAccount(thePlayer))
                 if isObjectInACLGroup("user."..Deadusergroup, aclGetGroup("Console")) then 
    	     setElementPosition (thePlayer, 1541.3057861328,-1366.1774902344,329.796875) 
    	---------	outputChatBox (' #000000[ #ff0000 /Comando #000000 ]#ffffff ' .. getPlayerName(thePlayer) .. ' #00FF00Foi para Base #000000[ Nome #000000]', getRootElement(), 255,255,255,true) 
    	else
    	  ----------  outputChatBox (getPlayerName(thePlayer) .. ' #ff0000Somente Quem tem permição da #000000[ Nome #000000 ] #ff0000Pode Ir para Base', source, 255,255,255,true)
       end
    end
    addCommandHandler ("prisao", teleprotect) 

    Alguem ajudar quero por mais de uma acl

  16. chat_range=100 
      
    addEventHandler("onPlayerJoin",getRootElement(), 
    function () 
    bindKey(source,"t","down","chatbox","LocalChat") 
    end) 
      
    addEventHandler("onResourceStart",getResourceRootElement(getThisResource()), 
    function () 
    for index, player in pairs(getElementsByType("player")) do 
    bindKey(player,"t","down","chatbox","LocalChat") 
      end 
    end) 
      
    function isPlayerInRangeOfPoint(player,x,y,z,range) 
       local px,py,pz=getElementPosition(player) 
       return ((x-px)^2+(y-py)^2+(z-pz)^2)^0.5<=range 
    end 
      
    function onChat(player,_,...) 
      local px,py,pz=getElementPosition(player) 
      local msg = table.concat({...}, " ") 
      local nick=getPlayerName(player) 
    local r,g,b = getTeamColor(getPlayerTeam(player)) 
      for _,v in ipairs(getElementsByType("player")) do 
        if isPlayerInRangeOfPoint(v,px,py,pz,chat_range) then 
          outputChatBox("#00ff00[Local Chat] #ffffff"..nick..": #00ff00"..msg,v,r,g,b,true) 
        end 
      end 
    end 
    addCommandHandler("LocalChat",onChat) 

    Alguem ajudar quero este chat local no t mais o comando / não funciona aparecer no chat  Olha ai: https://prnt.sc/n51lzs

×
×
  • Create New...