----------------------------
addhook('say','kingchat')
addhook('die','die_hook')
addhook('kill','kingkill')
-----------------------------



function kingchat(id,txt)
if player(id,"score")==15 then
msg("\169255128000[King] "..player(id,"name").."\169255255255: "..txt)
return 1
end
if player(id,"score")==0 and player(id,'deaths')==0 or player(id,"score") and player(id,'deaths') then
msg("\169255025000"..player(id,"name").."\169255255000: "..txt)
return 1
elseif player(id,"team")==2 then
msg("\169000128255"..player(id,"name").."\169255255000: "..txt)
return 1     
     end
end

function kingkill(id)
if player(id,"score")==15 then
msg("\169000255000"..player(id,"name").." \169255255255is Now King For Killing 15 Players !")
end
end

function die_hook(id)
if player(id,"score")==15 and player(id,'deaths')==5 then
msg("\169255000000"..player(id,"name").." \169255255255is No Longer King !")
end
end

if king == nil then king = {} end

king.kstreak = {} -- kill streak
king.dcount = {} -- king death count
king.currentking = {} -- current king

addhook("join","king.join")
function king.join(id)
	king.kstreak[id] = 0
	king.dcount[id] = 0
end

addhook("leave","king.leave")
function king.leave(id)
	-- if king or king candidate leaves the game
	if #king.currentking > 0 then
		for a, b in ipairs(king.currentking) do
			if b == id then
				table.remove(king.currentking,a)
				break
			end
		end
		updatehud()
	end
	king.kstreak[id] = nil
	king.dcount[id] = nil
end

addhook("kill","king.kill")
function king.kill(killer)
	king.kstreak[killer] = king.kstreak[killer] + 1
	if king.kstreak[killer] == 15 then -- 15 kill streak
		local isking = false
		if #king.currentking > 0 then
			for a, b in ipairs(king.currentking) do
				if b == killer then
					isking = true
					break
				end
			end
		end
		if not isking then
			table.insert(king.currentking,killer)
			if #king.currentking == 1 then
				msg2(killer,"\169000255000You are now king!")
			elseif #king.currentking > 1 then
				msg2(killer,"\169000255000You are now eligible to be a king! Kill the king and survive to be the next king!")
			end
			updatehud()
		end
	end
end

addhook("die","king.die")
function king.die(victim)
	-- Reset killstreak
	king.kstreak[victim] = 0
	if #king.currentking > 0 then
		if king.currentking[1] == victim then
			king.dcount[victim] = king.dcount[victim] + 1
			if king.dcount[victim] == 5 then
				table.remove(king.currentking,1)
				king.dcount[victim] = 0
				updatehud()
			end
		else
			for a, b in ipairs(king.currentking) do
				if b == id then
					table.remove(king.currentking,a)
					break
				end
			end
		end
	end
end

function updatehud()
	if #king.currentking > 0 then
		local k = king.currentking[1]
		parse("hudtxt 40 \"\169000255000King "..player(k,"name").."\" 52 104 1")
	else
		parse("hudtxt 40 \"\169000255000King not found"\" 52 104 1")
	end
end