--[[
	HACK NAME:
	PlebView By Supersillykid556

	HOWTOINSTALL:
	No Fancy memes to show this Hack off
	Hack is simple to work, just run lua file with no external modules!
		(not including bypassers)

	FEATURES:

	shows who is currently aiming at you, Lists Current "aimers" kept in the Top right corner of the screen.
	Pops up in chat to alert you.
	Amazing Voice Acting done by Professionals to alert you when a pleb is pointing their grubby muzzles at you...
]]

//thank OJ for the optimizations :^))))))
local chat = chat or {}
local hook = hook or {}
local ents = ents or {}
local surface = surface or {}
local table = table or {}
local draw = draw or {}
local LocalPlayer = LocalPlayer
local Color = Color
local Entity = Entity
local SortedPairs = SortedPairs
local IsValid = IsValid
local next = next
local ScrW = ScrW

local Pleb = {}
Pleb.Ply = LocalPlayer()
Pleb.AimingAtPly = {}

Pleb.Message = function( ... )
	chat.AddText( Color( 150, 0, 0 ), "[PlebView] ", ... )
end

hook.Add( "HUDPaint", "", function()
	local everything = ents.GetAll()

	for k = 1, #everything do
		local v = everything[ k ]

		surface.SetFont( "default" )

		if ( v:IsPlayer() and v:Alive() and v:GetEyeTrace().Entity == Pleb.Ply and ( not table.HasValue( Pleb.AimingAtPly, v ) ) ) then
			table.insert( Pleb.AimingAtPly, v )
			Pleb.Message( v:Nick().." Is Currently Aiming at you!" )
			surface.PlaySound( "vo/npc/barney/ba_no02.wav" )
		end

	for k, v in SortedPairs( Pleb.AimingAtPly, true ) do
		if ( not IsValid( v ) ) then continue end
			if ( v:GetEyeTrace().Entity ~= Pleb.Ply ) then
				table.remove( Pleb.AimingAtPly, k )
			else
				table.remove( Pleb.AimingAtPly, k )
			end
		end
	end

	surface.SetFont( "default" )
	surface.SetTextColor( Color( 255, 255, 255, 255 ) )
	local AimingWidest = 0
	local AimingTotalHeight = 0
	local AimingHeight = 20
	if ( not Pleb ) then return end

	for k,v in next, Pleb.AimingAtPly do
		local W, H = surface.GetTextSize( v:Nick() )
		if ( W > AimingWidest ) then
			AimingWidest = W
		end
			AimingTotalHeight = AimingTotalHeight + H
	end

	draw.RoundedBox( 8, ScrW() - AimingWidest - 30, 10, AimingWidest + 20, AimingTotalHeight + 20, Color( 0, 0, 0, 150 ) )

	for k,v in next, Pleb.AimingAtPly do
		local text = v:Nick()
		local W, H = surface.GetTextSize( text )
		surface.SetTextPos( ScrW() - 20 - AimingWidest, AimingHeight )
		surface.DrawText( text )
		AimingHeight = AimingHeight + H
	end
end )