Jump to content

Preciso de ajuda em 1 script pfv alguem me ajuda


Recommended Posts

Eu estava vendo uns post aqui de 1 script de ativar vip temporario porem o meu nao esta funcionando, eu fiz as alterações igual o cara mandou no post porem mesmo assim não funcionou alguem poderia me ajudar ? 

 

Comando_VIP = "ativar"
Grupo = "Console" -- Grupo no Painel P ( Manage ACL )

function Dar_VIP_AirNewSCR ( source, cmd, player, VIP, Dinheiro )
	    if player and VIP and tonumber(Dinheiro) and (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Console"))) 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 1kk pela Ativação do VIP", root, 255, 255, 255, true )
						if Dinheiro ~= false then
						    givePlayerMoney ( Jogador, 1000000 )
						    givePlayerMoney ( Jogador, 0 )
						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 1kk pela Ativação do VIP (+500k Bonus)", root, 255, 255, 255, true )
						if Dinheiro ~= false then
						    givePlayerMoney ( Jogador, 1000000 )
						    givePlayerMoney ( Jogador, 500000 )
						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 1kk pela Ativação do VIP (+1kk Bonus)", root, 255, 255, 255, true )
						if Dinheiro ~= false then
						    givePlayerMoney ( Jogador, 1000000 )
						    givePlayerMoney ( Jogador, 1000000 )
						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 )

 

Link to comment

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...