Jump to content

Rangel

Members
  • Posts

    25
  • Joined

  • Last visited

Everything posted by Rangel

  1. Boa Noite. Estou modificando um script de concessionaria para deixa-lo mais rp. e quero mudar 2 funções nele 1° - Mudar a função de trancar veículo para quando o proprietário sair do servidor só ele conseguir abrir novamente pelo painel de veículos. addEvent("LockMyVehicle", true) addEventHandler("LockMyVehicle", root, function(id) local vehicle = getVehicleByID(id) if isElement(vehicle) then if not isVehicleLocked(vehicle) then setVehicleLocked(vehicle, true) setVehicleDoorsUndamageable(vehicle, true) setVehicleDoorState(vehicle, 0, 0) setVehicleDoorState(vehicle, 1, 0) setVehicleDoorState(vehicle, 2, 0) setVehicleDoorState(vehicle, 3, 0) outputChatBox("#ffffff|#0000FF SRP - CONCESSIONÁRIA #ffffff| O seu veículo #0000FF"..(customCarNames[getElementModel(vehicle)] or getVehicleNameFromModel(getElementModel(vehicle))).." #FFFFFFfoi #0000FFfechado.", source, 38, 122, 216, true) elseif isVehicleLocked(vehicle) then setVehicleLocked(vehicle, false) setVehicleDoorsUndamageable(vehicle, false) outputChatBox("#ffffff|#0000FF SRP - CONCESSIONÁRIA #ffffff| O seu veículo #0000FF"..(customCarNames[getElementModel(vehicle)] or getVehicleNameFromModel(getElementModel(vehicle))).." #FFFFFFfoi #0000FFaberto.", source, 38, 122, 216, true) end else outputChatBox("#ffffff|#0000FF SRP - CONCESSIONÁRIA #ffffff| O seu veiculo não foi conectado.", source, 38, 122, 216, true) end end) 2° - Alterar a função de quando o proprietário do veiculo sair do servidor o veículo não sumir (ser destruido) function SaveVehicleDataOnQuit() for i, veh in ipairs (getElementsByType("vehicle")) do if getElementData(veh, "Owner") == source then destroyVehicle(veh) end end end addEventHandler("onPlayerQuit", root,SaveVehicleDataOnQuit) Podem me ajudar? por onde começo?
  2. Provavelmente é algum erro no próprio script, caso não seja, entre em contato com a host e peça para reinstalar o servidor, assim o database do servidor irá resetar e o problema tecnicamente será sanado. ? DID I HELP YOU? ____________________________________________________________________
  3. como eu faço para liberar somente para console?
  4. Boa Noite, Queria saber se é possível criar uma programação de quando um jogador que não esteja na ACL de Console Pegar uma minigun (EX) na mão ele seja banido automaticamente do servidor. alguém pode me ajudar? OBG!
  5. Muito Obg, Tudo funcionando do jeito que eu queria e com debugscript 3 limpo !! Vcs sao DMS
  6. Ok, o sistema funcionou sim, eu que tinha colocado errado, muito obg a todos, só uma duvida como faço para um unico player conseguir pegar quantas vtr ele quiser e dps destruir uma a uma?
  7. Não Funcionou brother
  8. Só escrevendo aqui para o post n ser esquecido, boa tarde.
  9. Opa brother, tranquilo? Então. Como foi dito acima o sistema é por ACL, ou seja, somente os jogadores que estiverem com os logins adicionados a tal ACL (no caso a de "BOMBEIROS" terão como spawnar o veiculo) Fora as proteçoes quem tambem tem na base. Mas muito obrigado NeoGM, foi uma otima observação.
  10. Boa noite a todos, eu sou bem leigo em Lua, e toda vez que venho aqui fico feliz com a maneira que vocês fazem a gente entender pelo menos o minimo dos scripts que estamos tentando alterar, isso é sensacional. enfim. Hoje eu to com um problema em um sistema de spawn de vtr por acl. Queria que se possível me ajudassem a alterar o que quero nele. Spawn1 = createMarker(-65.258903503418, -343.11831665039, 5.4296875 -1,"cylinder", 1.9, 0, 0, 200, 40) Destroy = createMarker(-65.258903503418, -371.39807128906, 5.4296875 -2,"cylinder", 5.0, 128, 0, 0, 99) 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 veh = {} function spawnvtr ( thePlayer, comando, nick ) setElementHealth (veh, 200000) if veh[thePlayer] and isElement( veh[thePlayer] ) then destroyElement ( veh[thePlayer] ) veh[thePlayer] = nil end local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) if isObjectInACLGroup ("user."..accName, aclGetGroup ( "BOMBEIROS") ) then veh[thePlayer] = createVehicle(529, -61.04016494751, -303.79797363281, 5.3578243255615, 0, 0, 270 ) warpPedIntoVehicle ( thePlayer, veh[thePlayer] ) --exports._infobox:addNotification(thePlayer, "", "success") else outputChatBox("#FFFFFF| #E10000BOMBEIROS #FFFFFF| Somente #E10000BOMBEIROS #FFFFFFPodem Pegar Este Veiculo.",thePlayer,255,255,255, true) end end addEventHandler("onMarkerHit", Spawn1, spawnvtr) function destroyvtr ( thePlayer ) if veh[thePlayer] and isElement(veh[thePlayer]) then destroyElement (veh[thePlayer]) --exports._infobox:addNotification(thePlayer, "", "success") else end end addEventHandler("onMarkerHit", Destroy, destroyvtr) Ele é bem simples, você passa em cima de um marker ele cria um determinado veiculo, e em cima de outro marker e ele destrói. Mas tem 2 poréns eu queria que um único player conseguisse spawnar quantos veículos ele quisesse, e quando ele spawna outro veículo, o anterior some. E o outro problema é que quando o player spawna o veículo e sai do server, ele não consegue mais desespawnar. Alguém pode me ajudar a resolver? Grato a Atenção
  11. Consegue me mandar link de algum fórum para ter uma referencia?
  12. Olá, boa noite eu queria fazer um sistema "Ant-DM" Ex. O Jogador "X" Mata O Jogador "Y', E é Adicionado ao jogador "X" Um Nível De Procurado. Quanto ao Jogador "Y" Apareceria uma Mensagem No Chat Dizendo " O Jogador "X" Matou Você, E Está Sendo Procurado Pela Justiça." Sou Leigo. Porém Quero Aprender, Se Alguém Puder Me Ajudar Me Dando Um Determinado Trajeto Que Eu Devo Segui Ficarei Grato, Obg Pela Atenção!
  13. perfeito, funcionou tudo ok. mto obg tmj
  14. dei uma olhada no topico mas n entendi como eu aplico, pode me ajudar?
  15. Tentei isso, e funcionou. Muito obrigado local Nivel = getElementData ( localPlayer, "Level" ) or 0 local Dinheiro_Mao = getPlayerMoney ( localPlayer ) local Dinheiro_Banco = getElementData ( localPlayer, "Bank:Caixa" ) or 0 local Procurado = getPlayerWantedLevel ( localPlayer ) local Vida = math.floor(getElementHealth(localPlayer)) local time = getRealTime() local hours = time.hour local minutes = time.minute local seconds = time.second if (hours >= 0 and hours < 10) then hours = "0"..time.hour end if (minutes >= 0 and minutes < 10) then minutes = "0"..time.minute end if (seconds >= 0 and seconds < 10) then seconds = "0"..time.second end dxDrawRectangle(x*1220, y*4, x*140, y*25, tocolor(0, 0, 0, 100), false) ----FUNDO MONEY dxDrawRectangle(x*1076, y*4, x*140, y*25, tocolor(0, 0, 0, 100), false) ----FUNDO HORA dxDrawRectangle(x*1220, y*33, x*140, y*25, tocolor(0, 0, 0, 100), false) ---FUNDO BANCO dxDrawRectangle(x*932, y*4, x*140, y*25, tocolor(0, 0, 0, 100), false) -----FUNDO LEVEL dxDrawRectangle(x*1076, y*33, x*140, y*25, tocolor(0, 0, 0, 100), false) ---FUNDO PROCURADO dxDrawRectangle(x*1220, y*62, x*140, y*25, tocolor(0, 0, 0, 100), false) ---FUNDO VIDA dxDrawText("$"..Dinheiro_Mao.."", x*1220, y*4, x*1360, y*29, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ----TEXTO MONEY dxDrawText("$"..Dinheiro_Banco.."", x*1220, y*33, x*1360, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false)--TEXTO BANCO dxDrawText("Nivel: "..Nivel.."", x*932, y*4, x*1072, y*29, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ---TEXTO LEVEL dxDrawText("Procurado: "..Procurado.."", x*1076, y*33, x*1216, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ---TEXTO PROCURADO dxDrawText("Vida: "..math.floor(Vida/1), x*1220, y*62, x*1360, y*86, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ---TEXTO PROCURADO dxDrawText(""..hours..":"..minutes..":"..seconds.." Horas", x*1076, y*4, x*1216, y*29, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) --TEXTO HORAS dxDrawLine(x*1220, y*58, x*1358, y*58, tocolor(255, 255, 255, 255), x*1, false) --LINHA BANCO dxDrawLine(x*1220, y*29, x*1358, y*29, tocolor(255, 255, 255, 255), x*1, false) --LINHA MONEY dxDrawLine(x*1076, y*29, x*1214, y*29, tocolor(255, 255, 255, 255), x*1, false) --LINHA HORAS dxDrawLine(x*1076, y*58, x*1214, y*58, tocolor(255, 255, 255, 255), x*1, false) --LINHA PROCURADO dxDrawLine(x*932, y*29, x*1070, y*29, tocolor(255, 255, 255, 255), 1, false) --LINHA LEVEL Vamos supor que eu queira adicionar "." no valor do dinheiro e do banco a cada 3 casas como faço?
  16. local Nivel = getElementData ( localPlayer, "Level" ) or 0 local Dinheiro_Mao = getPlayerMoney ( localPlayer ) local Dinheiro_Banco = getElementData ( localPlayer, "Bank:Caixa" ) or 0 local Procurado = getPlayerWantedLevel ( localPlayer ) local Vida = getElementHealth ( localPlayer ) local time = getRealTime() local hours = time.hour local minutes = time.minute local seconds = time.second if (hours >= 0 and hours < 10) then hours = "0"..time.hour end if (minutes >= 0 and minutes < 10) then minutes = "0"..time.minute end if (seconds >= 0 and seconds < 10) then seconds = "0"..time.second end dxDrawRectangle(x*1220, y*4, x*140, y*25, tocolor(0, 0, 0, 100), false) ----FUNDO MONEY dxDrawRectangle(x*1076, y*4, x*140, y*25, tocolor(0, 0, 0, 100), false) ----FUNDO HORA dxDrawRectangle(x*1220, y*33, x*140, y*25, tocolor(0, 0, 0, 100), false) ---FUNDO BANCO dxDrawRectangle(x*932, y*4, x*140, y*25, tocolor(0, 0, 0, 100), false) -----FUNDO LEVEL dxDrawRectangle(x*1076, y*33, x*140, y*25, tocolor(0, 0, 0, 100), false) ---FUNDO PROCURADO dxDrawRectangle(x*1220, y*62, x*140, y*25, tocolor(0, 0, 0, 100), false) ---FUNDO VIDA dxDrawText("$"..Dinheiro_Mao.."", x*1220, y*4, x*1360, y*29, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ----TEXTO MONEY dxDrawText("$"..Dinheiro_Banco.."", x*1220, y*33, x*1360, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false)--TEXTO BANCO dxDrawText("Nivel: "..Nivel.."", x*932, y*4, x*1072, y*29, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ---TEXTO LEVEL dxDrawText("Procurado: "..Procurado.."", x*1076, y*33, x*1216, y*58, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ---TEXTO PROCURADO dxDrawText("Vida: "..Vida.."", x*1220, y*62, x*1360, y*86, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) ---TEXTO PROCURADO dxDrawText(""..hours..":"..minutes..":"..seconds.." Horas", x*1076, y*4, x*1216, y*29, tocolor(255, 255, 255, 255), x*1.00, "default", "center", "center", false, false, false, false, false) --TEXTO HORAS dxDrawLine(x*1220, y*58, x*1358, y*58, tocolor(255, 255, 255, 255), x*1, false) --LINHA BANCO dxDrawLine(x*1220, y*29, x*1358, y*29, tocolor(255, 255, 255, 255), x*1, false) --LINHA MONEY dxDrawLine(x*1076, y*29, x*1214, y*29, tocolor(255, 255, 255, 255), x*1, false) --LINHA HORAS dxDrawLine(x*1076, y*58, x*1214, y*58, tocolor(255, 255, 255, 255), x*1, false) --LINHA PROCURADO dxDrawLine(x*932, y*29, x*1070, y*29, tocolor(255, 255, 255, 255), 1, false) --LINHA LEVEL
  17. Boa tarde Eu to editando um sistema de hud cujo aparece a porcentagem de vida do jogador, porem, dependendo da porcentagem da vida do jogador aparece (73,1568431) queria saber se tem algum jeito de retirar os numeros que vem depois da virgula? Quem puder ajudar, já agradeço
  18. teria como fazer usando setWeaponProperty para aumentar o health somente de veiculos?
  19. recomenda fazer com o setElementHealth e getPedWeapon?
  20. Estava querendo criar um sistema de bombeiro, porem, não sei como programar para apagar o fogo dos carros com extintor de incêndio, alguém pode me ajudar? ;-;
  21. Seria isso? addCommandHandler ("setlevel", function (thePlayer, cmd, jogador, level) if ( isObjectInACLGroup ("user."..accName, aclGetGroup ( "Console" ) ) ) then return local theJogador = getPlayerFromName (jogador) if (not theJogador) or (not level) then return end setElementData (theJogador, "Level", tonumber(level)) outputChatBox ("Level setado no jogador com sucesso.", thePlayer) end)
  22. Não. Vou tentar dnv aq Funcionou!! Mto Obg Mas Tem como deixar esse comando só pra qm está na acl de adm?
  23. Queria saber se tem como colocar algum comando nesse script, que deixe o level "Setável" Como por exemplo ---------------------- /setlevel [JOGADOR] {QUANTIDADE] --[[ ################################################ # # # Script Criado Por # # FACEBOOK.COM/AIRNEWSCR # # # # # ################################################ --]] -------------------------------------------------------------------------------------------- exports [ "scoreboardTOP" ]:addScoreboardColumn ( "Level") -------------------------------------------------------------------------------------------- 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 if not getElementData(player,"afkdate",true) then if tonumber(mins) == 600 then setElementData(player,"LSys:Mins",1) 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 os Pagamentos dos Jogadores else 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 DarSalario (player) local account = getPlayerAccount (player) local accname = getAccountName (account) local Jogador = getPlayerName (player) EmpregoAtual = getElementData ( player, "Emprego" ) sDesempregado = 300 sEntregadorDeJornal = 500 sPizzaBoy = 600 sMotoristaDeUber = 700 sMecanico = 800 sPetroleiro = 900 sMotoristaDeOnibus = 1000 sPilotoDeAviao = 1100 sEntregadorDeMalote = 2000 sEmpresarioDeFabricas = 10000 sPetroleiro = 1200 sEntregadorDeMaconha = 2500 sPilotoDeHelicoptero = 1500 sEntregadorDeEtanol = 1500 sPilotoDeCorrida = 1000 sEntregadorDePescador = 2000 SeguroDeVida = getElementData ( player, "Hospital:SeguroDeVida" ) 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 == "Entregador De Pescador" then givePlayerMoney ( player, sEntregadorDePescador ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDePescador.."", player, 255, 255, 255, true ) elseif EmpregoAtual == "Piloto De Corrida" then givePlayerMoney ( player, sPilotoDeCorrida ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPilotoDeCorrida.."", player, 255, 255, 255, true ) elseif EmpregoAtual == "Entregador De Etanol" then givePlayerMoney ( player, sEntregadorDeEtanol ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeEtanol.."", player, 255, 255, 255, true ) elseif EmpregoAtual == "Piloto De Helicoptero" then givePlayerMoney ( player, sPilotoDeHelicoptero ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPilotoDeHelicoptero.."", 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 == "Entregador De Maconha" then givePlayerMoney ( player, sEntregadorDeMaconha ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeMaconha.."", 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 == "Empresario De Fabricas" then givePlayerMoney ( player, sEmpresarioDeFabricas ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEmpresarioDeFabricas.."", 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 == "Entregador de Malote" then givePlayerMoney ( player, sEntregadorDeMalote ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeMalote.."", 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 SeguroDeVida == true 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) -------------------------------------------------------------------------------------------- addEventHandler("onPlayerLogin", root, function( _, acc ) setTimer(loaddata,1000,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 ) --------------------------------------------------------------------------------------------
  24. Aproveitando que a discussão era Sistem de Level, Queria saber se tem como colocar algum comando nesse script, que deixe o level "Setável" Como por exemplo ---------------------- /setlevel [JOGADOR] {QUANTIDADE] --[[ ################################################ # # # Script Criado Por # # FACEBOOK.COM/AIRNEWSCR # # # # # ################################################ --]] -------------------------------------------------------------------------------------------- exports [ "scoreboardTOP" ]:addScoreboardColumn ( "Level") -------------------------------------------------------------------------------------------- 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 if not getElementData(player,"afkdate",true) then if tonumber(mins) == 600 then setElementData(player,"LSys:Mins",1) 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 os Pagamentos dos Jogadores else 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 DarSalario (player) local account = getPlayerAccount (player) local accname = getAccountName (account) local Jogador = getPlayerName (player) EmpregoAtual = getElementData ( player, "Emprego" ) sDesempregado = 300 sEntregadorDeJornal = 500 sPizzaBoy = 600 sMotoristaDeUber = 700 sMecanico = 800 sPetroleiro = 900 sMotoristaDeOnibus = 1000 sPilotoDeAviao = 1100 sEntregadorDeMalote = 2000 sEmpresarioDeFabricas = 10000 sPetroleiro = 1200 sEntregadorDeMaconha = 2500 sPilotoDeHelicoptero = 1500 sEntregadorDeEtanol = 1500 sPilotoDeCorrida = 1000 sEntregadorDePescador = 2000 SeguroDeVida = getElementData ( player, "Hospital:SeguroDeVida" ) 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 == "Entregador De Pescador" then givePlayerMoney ( player, sEntregadorDePescador ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDePescador.."", player, 255, 255, 255, true ) elseif EmpregoAtual == "Piloto De Corrida" then givePlayerMoney ( player, sPilotoDeCorrida ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPilotoDeCorrida.."", player, 255, 255, 255, true ) elseif EmpregoAtual == "Entregador De Etanol" then givePlayerMoney ( player, sEntregadorDeEtanol ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeEtanol.."", player, 255, 255, 255, true ) elseif EmpregoAtual == "Piloto De Helicoptero" then givePlayerMoney ( player, sPilotoDeHelicoptero ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sPilotoDeHelicoptero.."", 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 == "Entregador De Maconha" then givePlayerMoney ( player, sEntregadorDeMaconha ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeMaconha.."", 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 == "Empresario De Fabricas" then givePlayerMoney ( player, sEmpresarioDeFabricas ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEmpresarioDeFabricas.."", 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 == "Entregador de Malote" then givePlayerMoney ( player, sEntregadorDeMalote ) outputChatBox ( "#F96031» #BEE09AProfissão Atual #ffffff: #9ABDE0"..EmpregoAtual.."", player, 255, 255, 255, true ) outputChatBox ( "#F96031» #BEE09ASalário da Profissão #ffffff: #9ABDE0$"..sEntregadorDeMalote.."", 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 SeguroDeVida == true 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) -------------------------------------------------------------------------------------------- addEventHandler("onPlayerLogin", root, function( _, acc ) setTimer(loaddata,1000,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 ) --------------------------------------------------------------------------------------------
×
×
  • Create New...