Jump to content

Como fazer script de Chat com TAGs


Recommended Posts

Olá Bom dia 

Eu gostaria de saber como fazer um script de Chats como local Fora do RP Twitter DarkWeb

E esses chats com tags e que sejam usados com o apertar de tecla diferente 

Ex: t: LocalChat / y:ForadoRP / u:Twitter / i:DarkWeb

 

Obs:DarkWeb com o nome oculto

Se alguém poder me ajudar agradeço

Link to comment
--[[



 ################################################
 #                                              #
 #                                              #
 #                       
 #                                              #
 #                                              #
 ################################################



--]]

--------------------------------------------------------------------------------------------

DistanciaDoChatLocal = 200 -- Metros
--MensagemFalandoRapidoDemaisLocal = '#ffffff[ #CE98EBAnti Flood #ffffff] - #ffffffVocê Esta Digitando Muito Rapido, Aguarde 2 Segundos'

ComandoDoChatGlobal = "rp" -- Ex /g Mensagem
ComandoDoChatGlobal2 = "frp"

ValorDoChatGlobal = 0 -- Dinheiro
--MensagemFalandoRapidoDemaisGlobal =  '#ffffff[ #FF0000Anti Flood #ffffff] - #ffffffVocê Esta Digitando Muito Rapido, Aguarde 5 Segundos'
MensagemVoceEstaMutadoGlobal2 = '#ffffff[ #FF0000Aviso #ffffff] - #FF0000Você Esta Mutado, e Não Podera Utilizar os Chat do Servidor'
MensagemVoceEstaMutadoGlobal = '#ffffff[ #FF0000Aviso #ffffff] - #FF0000Você Esta Mutado, e Não Podera Utilizar os Chat do Servidor'

--------------------------------------------------------------------------------------------

-- Config do Chat Local

addEventHandler("onPlayerChat", root, function(tresc, msgtype)
if (msgtype == 0) then
    cancelEvent()
	local x,y,z = getElementPosition(source)
	for key, gracze in ipairs(getElementsByType("player")) do
	local x2,y2,z2 = getElementPosition(gracze)

--	if getElementData (source, "ChatLocal:Delay", true) then
--	outputChatBox ( MensagemFalandoRapidoDemaisLocal, source, 255, 255, 255, true ) return end

	if ( getDistanceBetweenPoints3D ( x, y, z, x2, y2, z2 ) < DistanciaDoChatLocal ) then
	local int = getElementInterior   ( source )
	local dim = getElementDimension  ( source )
	local int2 = getElementInterior  ( gracze )
	local dim2 = getElementDimension ( gracze )
	if ( int == int2 and dim == dim2 ) then

	conta = getAccountName ( getPlayerAccount ( source ) )

	if isObjectInACLGroup ("user."..conta, aclGetGroup ( "Console" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #00ff8cPresidente #00FF00●  #00ff8c"..getPlayerName(source).. "#00FA9A » :#ffffff "..tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Admin" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00●  #ff6600Vice Presidente #00FF00●  #ff6600"..getPlayerName(source).."#A914F9 » :#ffffff "..tresc, gracze, 255, 255, 255, true)

		elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Humanos" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00●  #00ffedAdm Corp/Gang #00FF00●  #00ffed"..getPlayerName(source).."#A914F9 » :#ffffff "..tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "SuperModerator" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00●  #00ffedDeputado Estadual #00FF00●  #00ffed"..getPlayerName(source).."#A914F9 » :#ffffff "..tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Moderator" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00●  #00ffed Vereador #00FF00●  #00ffed"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "BOPE" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #000000 BOPE  #00FF00●  #000000"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CHOQUE" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #635f5f C O E  #00FF00●  #635f5f"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "COE" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #228B22  #00FF00●  #228B22"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ROTA" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #838B83 ROTA  #00FF00●  #838B83"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "BAEP" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #838B83 BAEP  #00FF00●  #838B83"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "PF" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #E47833 Policia Federal  #00FF00●  #E47833"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "PETO" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #000000 PETO  #00FF00●  #000000"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ROCAM" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #Ff0000 ROCAM  #00FF00●  #Ff0000"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CBV" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #Ff0000 Comando Bala Voa #00FF00●  #Ff0000"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CV" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #Ff0000 Comando Vermelho #00FF00●  #Ff0000"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "TCP" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #FFFF00Terceiro Comando Puro #00FF00●  #FFFF00"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ANS" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #000000 Anonymous #00FF00●  #000000"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "OG" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #8A2BE2 Os Guri #00FF00●  #8A2BE2"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Designer" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #0000FF● Designer ●  #FFFFFF"..getPlayerName(source).."#ffffff » :#ffffff "..tresc, gracze, 255, 255, 255, true)

----------------------------------------------------------------------------------------

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Omega" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #00FF00 VIP OMEGA #00FF00●  #00FF00"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Sigma" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #00FF00 VIP SIGMA #00FF00●  #00FF00"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Epsylon" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #00FF00 VIP EPSYLON #00FF00●  #00FF00"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Alpha" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #00FF00 VIP ALPHA #00FF00●  #00FF00"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

----------------------------------------------------------------------------------------

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "VIP" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #00FF00 VIP #00FF00●  #00FF00"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "UBER" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #838B83 UBER  #00FF00●  #838B83"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Mecanico" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #228B22 Mecanico #00FF00●  #228B22".. getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "SAMU" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #Ff0000 SAMU #00FF00●  #Ff0000"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "GIRL" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #FF00F6 Garotas De Programa #00FF00●  #FF00F6"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Ajudante" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #FFEE00 Ajudante #00FF00●  #FFEE00"..getPlayerName(source).."#ffffff » :#ffffff ".. tresc, gracze, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Everyone" ) ) then
	outputChatBox("#ffffff[ #FFEE00Local #ffffff]  ["..getElementData(source, "ID").."]  #00FF00● #05FF00 Cidadão #00FF00●  #05FF00"..getPlayerName(source).."#ffffff » :#FFFFFF "..tresc, gracze, 255, 255, 255, true)

	end
	end
	end
	end
	end
  --  setElementData (source, "ChatLocal:Delay",true)
	--setTimer (setElementData, 2000, 1, source, "ChatLocal:Delay", false)
end)

--------------------------------------------------------------------------------------------

-- Config do Chat Global

function adminchat ( thePlayer, _, ... )
    local message = table.concat ( { ... }, " " )
    if ( isPlayerOnGroup ( thePlayer ) ) then
    for _, player in ipairs ( getElementsByType ( "player" ) ) do
    if ( isPlayerOnGroup ( player ) ) then

	if ( isPlayerMuted(thePlayer) ) then
	outputChatBox ( MensagemVoceEstaMutadoGlobal, thePlayer, 255, 255, 255, true ) return end

--	if getElementData (thePlayer, "ChatGlobal:Delay1", true) then
--	outputChatBox ( MensagemFalandoRapidoDemaisGlobal, thePlayer, 255, 255, 255, true ) return end

	--local money = getPlayerMoney(thePlayer)
	--if (money < ValorDoChatGlobal ) then
	--outputChatBox ( MensagemDinheiroInsuficienteGlobal, thePlayer, 255, 255, 255, true ) return end

	conta = getAccountName(getPlayerAccount(thePlayer))					

	if isObjectInACLGroup ("user."..conta, aclGetGroup ( "Console" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ff8cPresidente #00FF00●  #00ff8c"..getPlayerName(thePlayer).. "#00FA9A » :#ffffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Admin" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #ff6600Vice Presidente #00FF00●  #ff6600"..getPlayerName(thePlayer).."#A914F9 » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Humanos" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ffedAdm Corp/Gang #00FF00●  #00ffed"..getPlayerName(thePlayer).."#A914F9 » :#FFffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "SuperModerator" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ffedDeputado Estadual  #00FF00●  #00ffed"..getPlayerName(thePlayer).."#A914F9 » :#FFffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Moderator" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ffedVereador #00FF00●  #00ffed"..getPlayerName(thePlayer).."#A914F9 » :#ffffff "..message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "BOPE" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #000000 BOPE #00FF00●  #000000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CHOQUE" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #635f5f CHOQUE #00FF00●  #635f5f"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "COE" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #228B22 C O E #00FF00●  #228B22"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ROTA" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #838B83 ROTA #00FF00●  #838B83"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "BAEP" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #838B83 BAEP #00FF00●  #838B83"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "PF" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #E47833 Policia Federal #00FF00●  #E47833"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "PETO" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #000000 PETO #00FF00●  #000000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ROCAM" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 ROCAM #00FF00●  #Ff0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CBV" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 Comando Bala Voa #00FF00●  #FF0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CV" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 Comando Vermelho #00FF00●  #Ff0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "TCP" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #FFFF00Terceiro Comando Puro #00FF00●  #FfFF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ANS" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #000000 Anonymous #00FF00●  #000000"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "OG" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #8A2BE2 Os Guri #00FF00●  #8A2BE2"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "UBER" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #838B83 UBER #00FF00●  #838B83"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Designer" ) ) then
    outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #0000FF● Designer ●  #FFFFFF"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
----------------------------------------------------------------------------------------

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Omega" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP OMEGA #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Sigma" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP SIGMA #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Epsylon" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP EPSYLON #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Alpha" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP ALPHA #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

----------------------------------------------------------------------------------------

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "VIP" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Mecanico" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #228B22 Mecanico #00FF00●  #228B22"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "SAMU" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 SAMU #00FF00●  #Ff0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "GIRL" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #FF00F6 Garotas De Programa #00FF00●  #FF00F6"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Ajudante" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #FFEE00 Ajudante #00FF00●  #FFEE00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Everyone" ) ) then
	outputChatBox("#ffffff[ #4AAFFBDentro do RP #ffffff]  [#97FB4A/rp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #05FF00 Cidadão #00FF00●  #05FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)

	end
    end
    end
    end
	if not getElementData( thePlayer, "ChatGlobal:Avisado", true ) then
	--outputChatBox ( AvisoDoValorDaMensagemGlobal, thePlayer, 255, 255, 255, true )
	end
	setElementData ( thePlayer, "ChatGlobal:Avisado", true )
	--takePlayerMoney ( thePlayer, ValorDoChatGlobal )
--	setElementData ( thePlayer, "ChatGlobal:Delay1",true )
   -- setTimer ( setElementData, 0, 1, thePlayer, "ChatGlobal:Delay1", false )
end
addCommandHandler ( ComandoDoChatGlobal, adminchat )

function adminchat2 ( thePlayer, _, ... )
    local message = table.concat ( { ... }, " " )
    if ( isPlayerOnGroup ( thePlayer ) ) then
    for _, player in ipairs ( getElementsByType ( "player" ) ) do
    if ( isPlayerOnGroup ( player ) ) then

	if ( isPlayerMuted(thePlayer) ) then
	outputChatBox ( MensagemVoceEstaMutadoGlobal2, thePlayer, 255, 255, 255, true ) return end

--	if getElementData (thePlayer, "ChatGlobal:Delay1", true) then
--	outputChatBox ( MensagemFalandoRapidoDemaisGlobal, thePlayer, 255, 255, 255, true ) return end

	--local money = getPlayerMoney(thePlayer)
	--if (money < ValorDoChatGlobal ) then
	--outputChatBox ( MensagemDinheiroInsuficienteGlobal, thePlayer, 255, 255, 255, true ) return end

	conta = getAccountName(getPlayerAccount(thePlayer))					

	if isObjectInACLGroup ("user."..conta, aclGetGroup ( "Console" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ff8cPresidente #00FF00●  #00ff8c"..getPlayerName(thePlayer).. "#00FA9A » :#ffffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Admin" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #ff6600Vice Presidente #00FF00●  #ff6600"..getPlayerName(thePlayer).."#A914F9 » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Humanos" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ffedAdm Corp/Gang #00FF00●  #00ffed"..getPlayerName(thePlayer).."#A914F9 » :#FFffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "SuperModerator" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ffedDeputado Estadual  #00FF00●  #00ffed"..getPlayerName(thePlayer).."#A914F9 » :#FFffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Moderator" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00ffedVereador #00FF00●  #00ffed"..getPlayerName(thePlayer).."#A914F9 » :#ffffff "..message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "BOPE" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #000000 BOPE #00FF00●  #000000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CHOQUE" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #635f5f CHOQUE #00FF00●  #635f5f"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "COE" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #228B22 C O E #00FF00●  #228B22"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ROTA" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #838B83 ROTA #00FF00●  #838B83"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "BAEP" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #838B83 BAEP #00FF00●  #838B83"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)	
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "PF" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #E47833 Policia Federal #00FF00●  #E47833"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "ROCAM" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 ROCAM #00FF00●  #Ff0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "PETO" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #000000 PETO #00FF00●  #000000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CBV" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 Comando Bala Voa #00FF00●  #FF0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "CV" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 Comando Vermelho #00FF00●  #Ff0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "TCP" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #FFFF00Terceiro Comando Puro #00FF00●  #FfFF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "TCP" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #000000 Anonymous #00FF00●  #000000"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "OG" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #8A2BE2 Os Guri #00FF00●  #8A2BE2"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "UBER" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #838B83 UBER #00FF00●  #838B83"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Designer" ) ) then
    outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #0000FF● Designer ●  #FFFFFF"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

----------------------------------------------------------------------------------------

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Omega" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP OMEGA #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Sigma" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP SIGMA #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Epsylon" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP EPSYLON #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

    elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Alpha" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP ALPHA #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

----------------------------------------------------------------------------------------

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "VIP" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #00FF00 VIP #00FF00●  #00FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Mecanico" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #228B22 Mecanico #00FF00●  #228B22"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "SAMU" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #Ff0000 SAMU #00FF00●  #Ff0000"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "GIRL" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #FF00F6 Garotas De Programa #00FF00●  #FF00F6"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)
	
	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Ajudante" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #FFEE00 Ajudante #00FF00●  #FFEE00"..getPlayerName(thePlayer).."#ffffff » :#ffffff ".. message, player, 255, 255, 255, true)

	elseif isObjectInACLGroup ("user."..conta, aclGetGroup ( "Everyone" ) ) then
	outputChatBox("#ffffff[ #B6D654Fora do RP #ffffff]  [#FBCB49/frp#ffffff]  ["..getElementData(thePlayer, "ID").."]  #00FF00● #05FF00 Cidadão #00FF00●  #05FF00"..getPlayerName(thePlayer).."#ffffff » :#ffffff "..message, player, 255, 255, 255, true)

	end
    end
    end
    end
	if not getElementData( thePlayer, "ChatGlobal:Avisado", true ) then
	--outputChatBox ( AvisoDoValorDaMensagemGlobal, thePlayer, 255, 255, 255, true )
	end
	setElementData ( thePlayer, "ChatGlobal:Avisado", true )
	--takePlayerMoney ( thePlayer, ValorDoChatGlobal )
--	setElementData ( thePlayer, "ChatGlobal:Delay1",true )
   -- setTimer ( setElementData, 0, 1, thePlayer, "ChatGlobal:Delay1", false )
end
addCommandHandler ( ComandoDoChatGlobal2, adminchat2 )

--------------------------------------------------------------------------------------------

function isPlayerOnGroup ( thePlayer )
    local account = getPlayerAccount ( thePlayer )
    local inGroup = false
    for _, group in ipairs ( { "Everyone" } ) do  
    if isObjectInACLGroup ( "user.".. getAccountName ( account ), aclGetGroup ( group ) )   then
    inGroup = true
    break
    end
    end
    return inGroup
end

--------------------------------------------------------------------------------------------

Tipo esse só que inves de escrever /frp e os comandos só apertar uma tecla 

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...