-
Posts
30 -
Joined
-
Last visited
Details
-
Gang
Lua ( Aprendiz )
-
Location
Brasil
-
Interests
Conhecimento
Recent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
TavinhoMTA's Achievements
Rat (9/54)
0
Reputation
-
Da este mesmo erro
-
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
-
Da esse erro syntax error near 'accountname' Linha 222
-
Não deu certo ?
-
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 ) Fui tentar por emprego para encaminhar por acl esta dando este erro
-
Preciso de ajudar em Criar este Script
TavinhoMTA replied to TavinhoMTA's topic in Programação em Lua
Vlw Lord ajudou muito -
Preciso de ajuda em criar um Script de warp to player por comandos não sei como começar quais função usar ( Ex: /tp tavinho )
-
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 ??
-
Deu certo acho que peguei a logica agora Muito Obrigado DNL
-
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
-
TavinhoMTA changed their profile photo
-
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 ?
-
Como posso ta mudando algo para ID do Player de vez eu colocar o Nome
-
--[[ ################################################ # # # 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
-
--[[ ################################################ # # # 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
-
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