/*
    Uncomment this, if you have warning 217 (loose indentation)
    Uncomment means to delete these 2 symbols "//"
*/
//#define LOOSE_INDENTATION

#include <amxmodx>
#include <amxmisc>


#define PLUGIN 		"Chat Colors"
#define VERSION 	"2.0"
#define AUTHOR 		"Arion"

#if defined LOOSE_INDENTATION
#pragma tabsize 0 
#endif

#define OWN_ACCESS       ADMIN_IMMUNITY
#define ADM_ACCESS	 ADMIN_CHAT
#define VIP_ACCESS       ADMIN_LEVEL_H
#define ADMIN_LISTEN	 ADMIN_BAN

new sayText
new teamInfo
new maxPlayers

new message[192]

new g_MessageColor
new g_NameColor
new g_AdminListen

new strName[191]
new strText[191]
new alive[11]

public plugin_init()
{
	register_plugin (PLUGIN, VERSION, AUTHOR)
	
	g_MessageColor = register_cvar ("amx_color", "2") // Message colors: [1] Default Yellow, [2] Green, [3] White, [4] Blue, [5] Red

	g_NameColor = register_cvar ("amx_namecolor", "6") // Name colors: [1] Default Yellow, [2] Green, [3] White, [4] Blue, [5] Red, [6] Team-color
	
	g_AdminListen = register_cvar ("amx_listen", "1") // Set whether admins see or not all messages (Alive, dead and team-only)
	
	
	sayText = get_user_msgid ("SayText")
	teamInfo = get_user_msgid ("TeamInfo")
	maxPlayers = get_maxplayers()
	
	
	register_message (sayText, "avoid_duplicated")
	
	register_clcmd ("amx_color", "set_color", ADM_ACCESS, "<color>")
	register_clcmd ("amx_namecolor", "set_name_color", ADM_ACCESS, "<color>")
	register_clcmd ("amx_listen", "set_listen", ADM_ACCESS, "<1 | 0>")
	
	register_clcmd ("say", "hook_say")
	register_clcmd ("say_team", "hook_say")
}


public avoid_duplicated (msgId, msgDest, receiver)
{
	return PLUGIN_HANDLED
}


public hook_say(id)
{
	read_args (message, 191)
	remove_quotes (message)
	
	if(equal (message, "")) 										       
		return PLUGIN_CONTINUE

		
	new name[32]
	get_user_name (id, name, 31)
	
	new bool:admin = false
        new bool:vip = false
        new bool:own = false
	
	if (get_user_flags(id) & ADM_ACCESS)
                admin = true

	if (get_user_flags(id) & VIP_ACCESS)
		vip = true

	if (get_user_flags(id) & OWN_ACCESS)
		own = true

	
	new isAlive
	
	if (is_user_alive (id))
	{
		isAlive = 1
		alive = "^x01"
	}
	else
	{
		isAlive = 0
		alive = "^x01*DEAD* "
	}
	
	static color[10]
	
	if (admin || vip)
	{
		
                if((admin && vip && own) || get_user_flags(id) & ADMIN_LEVEL_C )
		{	
			get_user_team (id, color, 9)
			format (strName, 191, "%s^x04[Boss]^x03 %s", alive, name)
		}
                else if(admin && vip)
		{	
			get_user_team (id, color, 9)
			format (strName, 191, "%s^x04[Man]^x03 %s", alive, name)
		}
		else if(admin)
		{			
			get_user_team (id, color, 9)
			format (strName, 191, "%s^x04[Admin]^x03 %s", alive, name)
		}
		else if(vip)
		{
			get_user_team (id, color, 9)
			format (strName, 191, "%s^x04[VIP]^x03 %s", alive, name)
		}


		if(admin && vip && own)
		{			
			copy (color, 9, "SPECTATOR")
			format (strText, 191, "^x03%s", message)
		}				
		else if(admin && vip)
		{			
			format (strText, 191, "^x04%s", message)
		}			
		else if(admin)	
		{	
			format (strText, 191, "^x04%s", message)
		}
		else if(vip)
		{
			format (strText, 191, "^x04%s", message)
		}
					
	}
	
	else 	
	{
		get_user_team (id, color, 9)
			
		format (strName, 191, "%s^x04[Gamer]^x03 %s", alive, name)
			
		format (strText, 191, "%s", message)
	}

	format (message, 191, "%s^x01 :  %s", strName, strText)
			
	sendMessage (color, isAlive)	// Sends the colored message
	
	return PLUGIN_CONTINUE
}


public set_color (id, level, cid)
{
	if (!cmd_access(id, level, cid, 2))
		return PLUGIN_HANDLED
		
	new arg[1], newColor
	read_argv (1, arg, 1)
	
	newColor = str_to_num (arg)
	
	if (newColor >= 1 && newColor <= 5)
		{
			set_cvar_num ("amx_color", newColor)
			set_pcvar_num (g_MessageColor, newColor)
	
			if (get_pcvar_num (g_NameColor) != 1 &&
			       ((newColor == 3 &&  get_pcvar_num (g_NameColor) != 3)
			     || (newColor == 4 &&  get_pcvar_num (g_NameColor) != 4)
			     || (newColor == 5 &&  get_pcvar_num (g_NameColor) != 5)))
				{
					set_cvar_num ("amx_namecolor", 2)
					set_pcvar_num (g_NameColor, 2)
				}
		}
		
	return PLUGIN_HANDLED
}


public set_name_color (id, level, cid)
{
	if (!cmd_access(id, level, cid, 2))
		return PLUGIN_HANDLED
		
	new arg[1], newColor
	read_argv (1, arg, 1)
	
	newColor = str_to_num (arg)
	
	if (newColor >= 1 && newColor <= 6)
		{
			set_cvar_num ("amx_namecolor", newColor)
			set_pcvar_num (g_NameColor, newColor)
			
			if ((get_pcvar_num (g_MessageColor) != 1
			    && ((newColor == 3 &&  get_pcvar_num (g_MessageColor) != 3)
			     || (newColor == 4 &&  get_pcvar_num (g_MessageColor) != 4)
			     || (newColor == 5 &&  get_pcvar_num (g_MessageColor) != 5)))
			     || get_pcvar_num (g_NameColor) == 6)
				{
					set_cvar_num ("amx_color", 2)
					set_pcvar_num (g_MessageColor, 2)
				}
		}
	
	return PLUGIN_HANDLED
}


public set_listen (id, level, cid)
{
	if (!cmd_access(id, level, cid, 2))
		return PLUGIN_HANDLED
		
	new arg[1], newListen
	read_argv(1, arg, 1)
	
	newListen = str_to_num (arg)
	
	set_cvar_num ("amx_listen", newListen)
	set_pcvar_num (g_AdminListen, newListen)
	
	return PLUGIN_HANDLED
}


public sendMessage (color[], alive)
{
	new teamName[10]
	
	for (new player = 1; player < maxPlayers; player++)
		{
			if (!is_user_connected(player))
				continue

			if (alive && is_user_alive(player) || !alive && !is_user_alive(player) || get_pcvar_num(g_AdminListen) && get_user_flags(player) & ADMIN_LISTEN)
				{
					get_user_team (player, teamName, 9)	// Stores user's team name to change back after sending the message
					
					changeTeamInfo (player, color)		// Changes user's team according to color choosen
					
					writeMessage (player, message)		// Writes the message on player's chat
					
					changeTeamInfo (player, teamName)	// Changes user's team back to original
				}
		}
}

public changeTeamInfo (player, team[])
{
	message_begin (MSG_ONE, teamInfo, _, player)	// Tells to to modify teamInfo (Which is responsable for which time player is)
	write_byte (player)				// Write byte needed
	write_string (team)				// Changes player's team
	message_end()					// Also Needed
}


public writeMessage (player, message[])
{
	message_begin (MSG_ONE, sayText, {0, 0, 0}, player)	// Tells to modify sayText (Which is responsable for writing colored messages)
	write_byte (player)					// Write byte needed
	write_string (message)					// Effectively write the message, finally, afterall
	message_end ()						// Needed as always
}

public writeMessageTeam (player, msg[])
{
	message_begin (MSG_ONE, sayText, {0, 0, 0}, player)	// Tells to modify sayText (Which is responsable for writing colored messages)
	write_byte (player)					// Write byte needed
	write_string (message)					// Effectively write the message, finally, afterall
	message_end ()						// Needed as always
}