local delay = -2

local function sayhi()
	local enddelay = -2
	for k,v in pairs(player.GetAll()) do
		if v != LocalPlayer() then
		delay = delay + 2
		timer.Simple(delay, function()
		LocalPlayer():ConCommand("say Hi, "..v:Name())
		end)
		end
	end
	for k,v in pairs(player.GetAll()) do
		if v != LocalPlayer() then
		enddelay = enddelay + 2
		end
	end
	timer.Simple(enddelay, function()
		delay = 0 end
	)
	timer.Simple(enddelay + 2, function()
		LocalPlayer():ConCommand("say I only love my hackarmy mates <3")
	end)
end

local function saydead()
	local enddelay = -2
	for k,v in pairs(player.GetAll()) do
		if v != LocalPlayer() then
		delay = delay + 2
		timer.Simple(delay, function()
			if v:Alive() then
				LocalPlayer():ConCommand("say "..v:Name().." - Alive - "..v:Health().."HP")
			else
				LocalPlayer():ConCommand("say "..v:Name().." - Dead")
			end
			end
		)
		end
	end
	for k,v in pairs(player.GetAll()) do
		if v != LocalPlayer() then
		enddelay = enddelay + 2
		end
	end
	timer.Simple(enddelay, function()
		delay = 0 end
	)
end

concommand.Add("sayhi", sayhi)

concommand.Add("saydead", saydead)