coringa_apk Posted November 17, 2020 Share Posted November 17, 2020 --[[ ################################################ # # # Script Criado Por # # FACEBOOK.COM/AIRNEWSCR # # # # # ################################################ --]] -------------------------------------------------------------------------------------------- setElementData ( localPlayer, "Mostrando_Mensagem_AirNewSCR", "Não" ) local screenW,screenH = guiGetScreenSize() local resW, resH = 1366,768 local x, y = (screenW/resW), (screenH/resH) local dxfont0_fonte = dxCreateFont("Arquivos/fonte.ttf", x*22) local screenW, screenH = guiGetScreenSize() function Mensagem_Ativacao () if getElementData ( localPlayer, "Mostrando_Mensagem_AirNewSCR" ) == "Sim" then dxDrawText("O(A) Jogador(a) "..getElementData ( localPlayer, "Ultimo_Ativador" ).."\nAtivou um Plano VIP "..getElementData ( localPlayer, "VIP_do_Ultimo_Ativador" ).." com Sucesso!", x*0 + 1, y*0 + 1, x*1366 + 1, y*768 + 1, tocolor(0, 0, 0, 255), x*1.00, dxfont0_fonte, "center", "center", false, false, false, true, false) dxDrawText("O(A) Jogador(a) "..getElementData ( localPlayer, "Ultimo_Ativador" ).."\nAtivou um Plano VIP "..getElementData ( localPlayer, "VIP_do_Ultimo_Ativador" ).." com Sucesso!", (screenW - x*1366) / 2, (screenH - y*768) / 2, ((screenW - x*1366) / 2) + 1366, ( (screenH - y*768) / 2) + 768, tocolor(255, 255, 255, 255), x*1.00, dxfont0_fonte, "center", "center", false, false, false, true, false) end end addEventHandler ( "onClientRender", getRootElement ( ), Mensagem_Ativacao ) function Ativador_Musica ( Musica_Selecionada ) setElementData ( localPlayer, "Mostrando_Mensagem_AirNewSCR", "Sim" ) setTimer ( function() setElementData ( localPlayer, "Mostrando_Mensagem_AirNewSCR", "Não" ) end, 14000, 1 ) if Musica_Selecionada == 1 then Musica = playSound ( "Arquivos/Rae_Sremmurd_Black_Beatles_ft_Gucci_Mane.mp3" ) elseif Musica_Selecionada == 2 then Musica = playSound ( "Arquivos/Post_Malone_Congratulations_ft_Quavo.mp3" ) elseif Musica_Selecionada == 3 then Musica = playSound ( "Arquivos/XXXTENTACION_Look_At_Me.mp3" ) end end addEvent( "AirNewSCR_Ativar_VIP", true ) addEventHandler( "AirNewSCR_Ativar_VIP", root, Ativador_Musica ) SEGUNDA PARTE --[[ ################################################ # # # Script Criado Por # # FACEBOOK.COM/AIRNEWSCR # # # # # ################################################ --]] -------------------------------------------------------------------------------------------- Comando_VIP = "ativar" Grupo = "Console" -- Grupo no Painel P ( Manage ACL ) 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 Dar_VIP_AirNewSCR ( source, cmd, player, VIP, Dinheiro ) if getElementData ( source, "Console_AirNewSCR" ) == "Sim" then if player and VIP then local Jogador = getPlayerFromPartialName ( player ) if Jogador then if not isGuestAccount ( getPlayerAccount ( Jogador ) ) then local Conta = getAccountName ( getPlayerAccount ( Jogador ) ) if VIP == "Alpha" then if isObjectInACLGroup ("user."..Conta, aclGetGroup ( "Alpha" ) ) then return outputChatBox ( "* Erro: Esse Jogador já é VIP Alpha", source, 255, 255, 255, true ) end elseif VIP == "Epsylon" then if isObjectInACLGroup ("user."..Conta, aclGetGroup ( "Epsylon" ) ) then return outputChatBox ( "* Erro: Esse Jogador já é VIP Epsylon", source, 255, 255, 255, true ) end elseif VIP == "Sigma" then if isObjectInACLGroup ("user."..Conta, aclGetGroup ( "Sigma" ) ) then return outputChatBox ( "* Erro: Esse Jogador já é VIP Sigma", source, 255, 255, 255, true ) end elseif VIP == "Omega" then if isObjectInACLGroup ("user."..Conta, aclGetGroup ( "Omega" ) ) then return outputChatBox ( "* Erro: Esse Jogador já é VIP Omega", source, 255, 255, 255, true ) end end if VIP == "Alpha" or VIP == "Epsylon" or VIP == "Sigma" or VIP == "Omega" then --return outputChatBox ( "* Erro: Esse VIP não existe!", source, 255, 255, 255, true ) --end aclGroupAddObject ( aclGetGroup( VIP ), "user."..Conta ) Musica_Selecionada = math.random ( 1, 3 ) triggerClientEvent ( root, "AirNewSCR_Ativar_VIP", root, Musica_Selecionada, VIP ) if Musica_Selecionada == 1 then --outputChatBox ( "Arquivos/Rae_Sremmurd_Black_Beatles_ft_Gucci_Mane.mp3", source ) Musica_Tocando = "Rae Sremmurd - Black Beatles ft. Gucci Mane" Bonus = 0 elseif Musica_Selecionada == 2 then --outputChatBox ( "Arquivos/Post_Malone_Congratulations_ft_Quavo.mp3", source ) Musica_Tocando = "Post Malone - Congratulations ft. Quavo" Bonus = 50 elseif Musica_Selecionada == 3 then --outputChatBox ( "XXXTENTACION_Look_At_Me.mp3", source ) Musica_Tocando = "XXXTENTACION - Look At Me!" Bonus = 100 end setElementData ( root, "Ultimo_Ativador", getPlayerName(Jogador) ) setElementData ( root, "VIP_do_Ultimo_Ativador", VIP ) outputChatBox ( " ", root ) outputChatBox ( " ", root ) outputChatBox ( "=======================================================", root, 255, 255, 255, true ) outputChatBox ( "* O(A) Jogador(a) "..getPlayerName(Jogador).." #ffffffAtivou um Plano VIP "..VIP, root, 255, 255, 255, true ) if Bonus == 0 then outputChatBox ( "* Seu Bonus de Ativação foi de "..Bonus.."%, Não foi dessa vez!", root, 255, 255, 255, true ) outputChatBox ( "* O(A) Jogador(a) Recebeu 10k pela Ativação do VIP", root, 255, 255, 255, true ) if Dinheiro ~= false then givePlayerMoney ( Jogador, 10000 ) -- dinheiro ganho givePlayerMoney ( Jogador, 10000 ) end elseif Bonus == 50 then outputChatBox ( "* Seu Bonus de Ativação foi de "..Bonus.."%, +50% de 1kk (1kk500k)", root, 255, 255, 255, true ) outputChatBox ( "* O(A) Jogador(a) Recebeu 10k pela Ativação do VIP (+500k Bonus)", root, 255, 255, 255, true ) if Dinheiro ~= false then givePlayerMoney ( Jogador, 10000 ) givePlayerMoney ( Jogador, 10000 ) end elseif Bonus == 100 then outputChatBox ( "* Seu Bonus de Ativação foi de "..Bonus.."%, +100% de 1kk (2kk)", root, 255, 255, 255, true ) outputChatBox ( "* O(A) Jogador(a) Recebeu 10k pela Ativação do VIP (+1kk Bonus)", root, 255, 255, 255, true ) if Dinheiro ~= false then givePlayerMoney ( Jogador, 10000 ) givePlayerMoney ( Jogador, 10000 ) end end outputChatBox ( "* Musica Tocando: "..Musica_Tocando, root, 255, 255, 255, true ) outputChatBox ( "=======================================================", root, 255, 255, 255, true ) outputChatBox ( " ", root ) outputChatBox ( " ", root ) outputDebugString ( "[ Ativação ] - O(A) Admin "..getPlayerName(source).." Ativou um VIP para o(a) Jogador(a) "..getPlayerName(Jogador).."!" ) outputDebugString ( "[ Ativação ] - Bonus do VIP Gerado: "..Bonus.."%" ) setTimer ( function() restartResource ( getThisResource ( ) ) -- Reinicia o Mod Automaticamente! outputDebugString ( "[ AirNewSCR ] - Resource 'Scripts_AtivarVIP' Reiniciado Automaticamente! " ) end, 15000, 1 ) end end else outputChatBox ( "* Erro: Jogador não encontrado!", source, 255, 255, 255, true ) end end end end addCommandHandler ( Comando_VIP, Dar_VIP_AirNewSCR ) function Verificar_Emprego_Atual ( ) for i, player in ipairs(getElementsByType("player")) do local acc = getPlayerAccount(player) if acc and not isGuestAccount(acc) then local accName = getAccountName (acc) if isObjectInACLGroup ("user."..accName, aclGetGroup ( Grupo ) ) then setElementData ( player, "Console_AirNewSCR", "Sim" ) else setElementData ( player, "Console_AirNewSCR", "Não" ) end end end end setTimer ( Verificar_Emprego_Atual, 1500, 0 ) -- By AirNewSCR Link to comment
Moderators IIYAMA Posted November 17, 2020 Moderators Share Posted November 17, 2020 Moved to here: https://forum.multitheftauto.com/forum/127-programação-em-lua/ Link to comment
Boechat Posted November 23, 2020 Share Posted November 23, 2020 Cara, usa a ferramenta de inserção de código do fórum pra colocar um código, desse jeito aí fica complicado pra ler... Mas se você quer colocar um tempo, use o timeStamp. Aqui tem um tópico de como usar o timeStamp. Link to comment
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now