-- Desert Eagle Wars
-- Coded by Franc[e]sco

root = getRootElement ()
kills = {}

addEventHandler ("onResourceLoad", getRootElement(), "OnGameModeInit") -- Defining OnGameModeInit

function OnGamemodeInit ( resource ) -- Calling OnGameModeInit

	if ( resource == getThisResource() ) then

		outputChatBox ( "** Desert Eagle Wars - coded by Franc[e]sco", root, 255, 100, 100 ) -- GameModeText

		hshot = textCreateDisplay ()
		local txthshot = textCreateTextItem ( "BOOOM! Head Shot!!", 0.5, 0.204, "medium", 188, 20, 0, 255, 3.0 )
		textDisplayAddText ( hshot, txthshot )

		ashot = textCreateDisplay ()
		local txtashot = textCreateTextItem ( "OUCH! Ass Shot!!", 0.5, 0.204, "medium", 188, 20, 0, 255, 3.0 )
		textDisplayAddText ( hshot, txthshot )

		monsterkill = textCreateDisplay ()
		local txtmonsterkill = textCreateTextItem ( getClientName(killer)..": monsterkill!", 0.5, 0.204, "medium", 188, 20, 0, 255, 3.0 )
		textDisplayAddText ( monsterkill, txtmonsterkill )

		dominating = textCreateDisplay ()
		local txtdominating = textCreateTextItem ( getClientName(killer).." is dominating!", 0.5, 0.204, "medium", 188, 20, 0, 255, 3.0 )
		textDisplayAddText ( dominating, txtdominating )

		godlike = textCreateDisplay ()
		local txtgodlike = textCreateTextItem ( getClientName(killer).." is godlike!", 0.5, 0.204, "medium", 188, 20, 0, 255, 3.0 )
		textDisplayAddText ( godlike, txtgodlike )

		for index, player in getElementsByType ( "player" ) do -- for all the players
			bindKey ( source, "t", "down", "tdown" )
			bindKey ( source, "t", "up", "tup" )
		end

		floor1up = createMarker ( 3081.829102, -1597.984253, 9.168586, "corona", 2, 0, 255, 0, 50 )
		setElementData ( floor1up, "type", "teleport" )
		floor2up = createMarker ( 3081.205566, -1597.315308, 22.281012, "corona", 2, 0, 255, 0, 50 )
		setElementData ( floor2up, "type", "teleport" )

		floor2down = createMarker ( 3079.900391, -1560.759277, 21.883965, "corona", 2, 0, 255, 0, 50 )
		setElementData ( floor2down, "type", "teleport" )
		floor3down = createMarker ( 3080.171387, -1561.150146, 33.186592, "corona", 2, 0, 255, 0, 50 )
		setElementData ( floor3down, "type", "teleport" )


	end

end

-- ##################################################################################################################

addEventHandler ( "onPlayerSpawn", getRootElement(), "OnPlayerSpawn" ) -- Defining OnPlayerSpawn

function OnPlayerSpawn ( player ) -- Calling OnPlayerSpawn

	outputChatBox ( "Use t when you're in a checkpoint to teleport.", player, 255, 115, 0 )
	giveWeapon ( player, 24, 5000 )
	giveWeapon ( player, 4, 1 )

end

-- ##################################################################################################################

addEventHandler ( "onPlayerJoin", getRootElement(), "OnPlayerJoin" ) -- Defining OnPlayerJoin

function OnPlayerJoin ( player ) -- Calling OnpPlayerJoin

	kills[player] = 0
	istdown[player] = 0

	bindKey ( source, "t", "down", "tdown" )
	bindKey ( source, "t", "up", "tup" )

end

-- ##################################################################################################################

function tdown ( source, key, keyState )
	istdown[source] = 1
end

-- ##################################################################################################################

function tup ( source, key, keyState )
	istdown[source] = 0
end

-- ##################################################################################################################

addEventHandler ( "onPlayerWasted", getRootElement(), "OnPlayerDied" ) -- Defining OnPlayerDied

function OnPlayerDied ( totalammo, killer, killerweapon, bodypart ) -- Calling OnPlayerDied

	-- Obtaining nick and color of the killed player
	local playerid = getClientName ( source )
	local r,g,b = getPlayerNametagColor ( source )

	if bodypart == 9 then -- Checking if you made a headshot
		textDisplayAddObserver ( hshot, killer ) -- Boom! headshot :D
		setTimer ( "textDisplayRemoveObserver", 3000, 1, hshot, killer )
		outputMessage ( getClientName(killer).." headshot!", 255, 100, 100 )
	end

	if bodypart == 4 then -- Checking if you made an ass shot
		textDisplayAddObserver ( ashot, killer ) -- Boom! AssShot :D
		setTimer ( "textDisplayRemoveObserver", 3000, 1, ashot, killer )
		outputMessage ( getClientName(killer).." ass shot!", 255, 100, 100 )
	end

	if ( killer ) then

		kills[source] = 0

		-- Checking if the player suicided
		if (source == killer) then
			playerid = "himself"
		else
			kills[killer] = kills[killer] + 1
		end

		if (kills[killer] == 5) then
			textDisplayAddObserver ( monsterkill, root ) -- Monsterkill! :O
			setTimer ( "textDisplayRemoveObserver", 3000, 1, monsterkill, root )
		end

		if (kills[killer] == 10) then
			textDisplayAddObserver ( dominating, root ) -- Dominating! ^_^
			setTimer ( "textDisplayRemoveObserver", 3000, 1, dominating, root )
		end

		if (kills[killer] == 15) then
			textDisplayAddObserver ( godlike, root ) -- GodLike! O_O
			setTimer ( "textDisplayRemoveObserver", 3000, 1, godlike, root )
		end

		-- Formatting a message like -a has killed b using weaponname-
		local killtext = getClientName(killer).." has killed "..playerid

		-- Obtaining killer's weapon
		local wnKiller = getWeaponNameFromID ( killerweapon )

		-- Sending the message
		if ( wnKiller ) then
			outputMessage( killtext.." using a "..wnKiller..".",  r, g, b, 255 )
		else
			outputMessage( killtext, r, g, b, 255 )
		end
	else
		outputMessage( playerid.." died.", r, g, b, 255 )
	end

end

-- ##################################################################################################################

addEventHandler ( "onMarkerHit", floor1up, "gotoFloor2" )
addEventHandler ( "onMarkerHit", floor2up, "gotoFloor3" )
addEventHandler ( "onMarkerHit", floor3down, "gotoFloor2" )
addEventHandler ( "onMarkerHit", floor2down, "gotoFloor1" )

-- ##################################################################################################################

function gotoFloor1
	if ( istdown[source] == 1 ) then
		local x, y, z = getElementPosition ( floor1up )
		setElementPosition ( player, x, y, z )
	end
end

-- ##################################################################################################################

function gotoFloor2
	if ( istdown[source] == 1 ) then
		local x, y, z = getElementPosition ( floor2up )
		setElementPosition ( player, x, y, z )
	end
end

-- ##################################################################################################################

function gotoFloor3
	if ( istdown[source] == 1 ) then
		local x, y, z = getElementPosition ( floor3down )
		setElementPosition ( player, x, y, z )
	end
end