//*****************************
//**Simple Thermal Admin**
//**By Shidobu**************
//**V1.0 Beta*****************
//*****************************
block load
{
	es_xset st_version "<>Version 1.1<> LoKkdoKk" "Тепловизер, админская версия"
	es_xmakepublic st_version
	es_xset st_keygroup 1 "Variable for keygroup check"
	es_xset st_command 1 "Variable for command check"
	es_xset st_thermal_type both "Variable for checking the thermal admin type"
	es_xset st_userid 1 "Variable for player's userid"
	es_xset st_target 1 "Variable for target player"
	es_xset st_steam 1 "Variable for player's steamid"
	es_xset st_death 1 "Variable for check if player is alive"
	es_xset st_crouch 1 "Variable for if target is crouching"
	es_xset st_check 1 "Variable for check if thermal admin is enabled on player"
	es_xset st_admins "1" "Thermal Admins"
	es_xset st_aimbot_radius "500" "Radius of the aimbot"
	es_xset st_wallhack_radius "100000" "Radius of the wallhack"
	es_xset st_x 0 "X Axis Location"
	es_xset st_y 0 "Y Axis Location"
	es_xset st_z 0 "Z Axis Location"
	es_xset st_operation 0 "Variable for how much you want it to add and subtract in admin menu"
	es_xset st_team 0 "Variable for user's team"
	es_xexists st_command command thermal
	if (server_var(st_command) = 0) then es_xregcmd thermal sthermal/thermal "Syntax- thermal <userid>"
	es_xexists st_keygroup keygroup sthermal_cfg
	if (server_var(st_keygroup) = 0) then es_xkeygroupload sthermal_cfg "|sthermal"
	es_xregsaycmd thermal sthermal/thermal_cmd "Activates thermal admin on yourself if you are in the admins cfg and alive."
	es_xregclientcmd thermal sthermal/thermal_cmd "Activates thermal admin on yourself if you are in the admins cfg and alive."
	es_xregsaycmd thermalmenu sthermal/menu_cmd "Brings up thermal config admin menu."
	es_xregclientcmd thermalmenu sthermal/menu_cmd "Brings up thermal config admin menu."
	popup create st_menu
	popup addline st_menu "[Тепловизерное админ меню]"
	popup addline st_menu " "
	popup addline st_menu " "
	popup addline st_menu "Текущий радиус тепловизера(валхака): "
	popup addline st_menu "Текущий радиус авто прицела: "
	popup addline st_menu " "
	popup addline st_menu " "
	popup addline st_menu "->1. Добавить радиус тепловизера(валхака): "
	popup addline st_menu "->2. Убавить радиус тепловизера(валхака): "
	popup addline st_menu "->3. Добавить радиус авто прицела: "
	popup addline st_menu "->4. Убавить радиус авто прицела: "
	popup addline st_menu " "
	popup addline st_menu " "
	popup addline st_menu "->0. Выход"
	popup menuselect st_menu sthermal/menu
	es echo [Тепловизерное админ меню] server_var(st_version) Загружено.
}

block unload
{
	es_xunregsaycmd thermal
	es_xunregclientcmd thermal
	es_xunregclientcmd thermalmenu
	es_xunregsaycmd thermalmenu
	es_xexists st_keygroup keygroup sthermal_cfg
	if (server_var(st_keygroup) = 1) then es_xkeygroupdelete sthermal_cfg
	popup delete st_menu
	es echo [Тепловизерное админ меню] server_var(st_version) Выгружено.
}

block menu_cmd
{
	es_xgetcmduserid st_userid
	es_getplayersteamid st_steam server_var(st_userid)
	es_exists st_admins keyvalue sthermal_cfg admins server_var(st_steam)
	if (server_var(st_admins) = 1) do
	{
		es_xdoblock sthermal/menu_create
		es popup send st_menu server_var(st_userid)
	}
	if (server_var(st_admins) = 0) do
	{
		es_tell server_var(st_userid) #multi #green[Тепловизерное админ меню] #lightgreenВы не  #greenможете использовать [Тепловизерное админ меню] #lightgreen.
	}
}

block menu
{
	if (server_var(_popup_choice) in "5,6,7,8,9,") do
	{
		es_xdoblock sthermal/menu_create
		es popup send st_menu server_var(_popup_userid)
	}
	if (server_var(_popup_choice) = 1) do
	{
		es_xkeygetvalue st_operation sthermal_cfg config aradius_add
		es keymath sthermal_cfg config wallhack_radius + server_var(st_operation)
		es_xkeygroupsave sthermal_cfg "|sthermal"
		es_xdoblock sthermal/menu_create
		es popup send st_menu server_var(_popup_userid)
		es est_playplayer server_var(_popup_userid) npc\turret_floor\click1.wav 1.0 server_var(_popup_userid)
	}
	if (server_var(_popup_choice) = 2) do
	{
		es_xkeygetvalue st_operation sthermal_cfg config aradius_add
		es keymath sthermal_cfg config wallhack_radius - server_var(st_operation)
		es_xkeygroupsave sthermal_cfg "|sthermal"
		es_xdoblock sthermal/menu_create
		es popup send st_menu server_var(_popup_userid)
		es est_playplayer server_var(_popup_userid) npc\turret_floor\retract.wav 1.0 server_var(_popup_userid)
	}
	if (server_var(_popup_choice) = 3) do
	{
		es_xkeygetvalue st_operation sthermal_cfg config aradius_add
		es keymath sthermal_cfg config aimbot_radius + server_var(st_operation)
		es_xkeygroupsave sthermal_cfg "|sthermal"
		es_xdoblock sthermal/menu_create
		es popup send st_menu server_var(_popup_userid)
		es est_playplayer server_var(_popup_userid) npc\turret_floor\click1.wav 1.0 server_var(_popup_userid)
	}
	if (server_var(_popup_choice) = 4) do
	{
		es_xkeygetvalue st_operation sthermal_cfg config aradius_add
		es keymath sthermal_cfg config aimbot_radius - server_var(st_operation)
		es_xkeygroupsave sthermal_cfg "|sthermal"
		es_xdoblock sthermal/menu_create
		es popup send st_menu server_var(_popup_userid)
		es est_playplayer server_var(_popup_userid) npc\turret_floor\retract.wav 1.0 server_var(_popup_userid)
	}
	if (server_var(_popup_choice) = 10) then est_playplayer server_var(_popup_userid) npc\turret_floor\retract.wav 1.0 server_var(_popup_userid)
}

block menu_create
{
	es_xkeygetvalue st_aimbot_radius sthermal_cfg config aimbot_radius
	es_xkeygetvalue st_wallhack_radius sthermal_cfg config wallhack_radius
	es_xkeygetvalue st_operation sthermal_cfg config aradius_add
	es popup modlinef st_menu 4 "Текущий радиус тепловизера(валхака) : %1" st_wallhack_radius
	es popup modlinef st_menu 5 "Текущий радиус авто прицела: %1" st_aimbot_radius
	es popup modlinef st_menu 8 "->1.Добавить радиус тепловизера(валхака): %1" st_operation
	es popup modlinef st_menu 9 "->2.Убавить радиус тепловизера(валхака) : %1" st_operation
	es popup modlinef st_menu 10 "->3.Добавить радиус авто прицела: %1" st_operation
	es popup modlinef st_menu 11 "->4.Убавить радиус авто прицела: %1" st_operation
}

block thermal_cmd
{
	es_xgetcmduserid st_userid
	es_getplayersteamid st_steam server_var(st_userid)
	es_exists st_admins keyvalue sthermal_cfg admins server_var(st_steam)
	if (server_var(st_admins) = 1) do
	{
		es playerget isdead st_death server_var(st_userid)
		if (server_var(st_death) = 0) do
		{
			es playervar get st_check server_var(st_userid) thermal_toggle
			if (server_var(st_check) = 1) do
			{
				es_cexec server_var(st_userid) r_screenoverlay 0
				es playervar set server_var(st_userid) thermal_toggle 0
				es_tell server_var(st_userid) #multi #green[Тепловизерное админ меню] #lightgreenВы не  #greenможете использовать [Тепловизерное админ меню] #lightgreenoff.
			}
			if (server_var(st_check) = 0) do
			{
				es_cexec server_var(st_userid)  r_screenoverlay effects/combine_binocoverlay.vmt
				es playervar set server_var(st_userid) thermal_toggle 1
				es thermal server_var(st_userid)
				es_tell server_var(st_userid) #multi #green[Тепловизерное админ меню] #lightgreenВы получили #greenТепловизер#lightgreen.
			}
		}
		if (server_var(st_death) = 1) do
		{
			es_tell server_var(st_userid) #multi #green[Тепловизерное админ меню] #lightgreenВы #greendead #lightgreenможете использовать #green[Тепловизерное админ меню] #lightgreen.
		}
	}
	if (server_var(st_admins) = 0) do
	{
		es_tell server_var(st_userid) #multi #green[Тепловизерное админ меню] #lightgreenВы не  #greenТепловизерный админ #lightgreen.
	}
}

block thermal
{
	es_xgetargv st_userid 1
	if (server_var(st_round) = 1) do
	{
		es playerget isdead st_death server_var(st_userid)
		if (server_var(st_death) = 0) do
		{
			es playervar get st_check server_var(st_userid) thermal_toggle
			if (server_var(st_check) = 1) do
			{
				es_getplayerteam st_team server_var(st_userid)
				if (server_var(st_team) = 2) do
				{
					es_xset st_targetteam "#c!d"
					es_xset st_effect "VGUI\gfx\VGUI\gign.vmt"
				}
				if (server_var(st_team) = 3) do
				{
					es_xset st_targetteam "#t!d"
					es_xset st_effect "VGUI\gfx\VGUI\arctic.vmt"
				}
				es_xkeygetvalue st_thermal_type sthermal_cfg config thermal_type
				if (server_var(st_thermal_type) in "both,aim,") do
				{
					es_xkeygetvalue st_aimbot_radius sthermal_cfg config aimbot_radius
					es est_near st_target server_var(st_targetteam) server_var(st_aimbot_radius) server_var(st_userid) "es est_setaim server_var(st_userid) server_var(st_target) -30"
				}
				if (server_var(st_thermal_type) in "both,wall,") do
				{
					es_xkeygetvalue st_wallhack_radius sthermal_cfg config wallhack_radius
					es est_near st_target server_var(st_targetteam) server_var(st_wallhack_radius) server_var(st_userid) "es_getplayerlocation st_x st_y st_z server_var(st_target);es_xmath st_z + 10;es_getplayerprop st_crouch server_var(st_target) CBasePlayer.localdata.m_Local.m_bDucked;if (server_var(st_crouch) = 0) then es_xmath st_z + 35;es est_effect 11 server_var(st_userid) 0 server_var(st_effect) server_var(st_x) server_var(st_y) server_var(st_z) .1 .3 150"
				}
				if (server_var(st_thermal_type) in "both,aim,wall") do
				{
					es_delayed .1 thermal server_var(st_userid)
				}
			}
		}
	}
}

event player_spawn
{
	es_cexec event_var(userid) r_screenoverlay 0
	es playervar set event_var(userid) thermal_toggle 0
}

event player_death
{
	es_cexec event_var(userid) r_screenoverlay 0
	es playervar set event_var(userid) thermal_toggle 0
}

event round_start
{
	es_xset st_round 1
}

event round_end
{
	es_xset st_round 0
}
