--by exechack.cc 

local function a(b, c, d, e)
	local f = vgui.Create("DNotify")
	f:SetPos(15, 15)
	f:SetSize(310, 100)
	local g = vgui.Create("DPanel", f)
	g:Dock(FILL)
	g:SetBackgroundColor(Color(0, 0, 0))
	local h = vgui.Create("DPanel", g)
	h:SetPos(11, 80)
	h:SetSize(70, 6)
	h:SetBackgroundColor(d)
	local i = vgui.Create("AvatarImage", g)
	i:SetPos(11, 11)
	i:SetSize(70, 70)
	i:SetPlayer(Player(b), 128)
	local j = vgui.Create("DLabel", g)
	j:SetPos(100, 40)
	j:SetSize(200, 72)
	j:SetText(tostring(c))
	j:SetTextColor(Color(200, 200, 200))
	j:SetFont("GModNotify")
	j:SetWrap(true)
	local k = vgui.Create("DLabel", g)
	k:SetPos(100, 0)
	k:SetSize(185, 72)
	k:SetText(e)
	k:SetTextColor(Color(255, 255, 255))
	k:SetFont("GModNotify")
	k:SetWrap(true)
	f:AddItem(g)
end;

local l = {}

for m, n in ipairs(player.GetAll()) do
	if n:GetFriendStatus() == "friend" then
		table.insert(l, n:UserID(), n)
	end
end;

a(LocalPlayer():UserID(), "Friends on this server: "..#l, Color(255, 255, 255), LocalPlayer():Name())
	
gameevent.Listen("player_activate")
hook.Add("player_activate", "eblan_connected", function()
	timer.Simple(1, function()
		for m, n in ipairs(player.GetAll()) do
			local b = n:UserID()
			if not l[b] and n:GetFriendStatus() == "friend" then
				table.insert(l, b, n)
				a(b, "Friend connected", Color(0, 255, 0), n:Name())
			end
		end
	end)
end)

gameevent.Listen("player_disconnect")
hook.Add("player_disconnect", "eblan_disconnected", function(o)
	if Player(o.userid):GetFriendStatus() == 'friend' then
		table.insert(l, o.userid, nil)
		a(o.userid, "Friend disconnected", Color(255, 0, 0), o.name)
	end
end)