-- Hedgewars - Basketball for 2+ Players

local caption = {

	["en"] = "Hedgewars-Basketball",

	["de"] = "Hedgewars-Basketball",

	["es"] = "Hedgewars-Baloncesto",

	["pl"] = "Hedgewars-Koszykówka",

	["pt_PT"] = "Hedgewars-Basketball",

	["sk"] = "Hedgewars-Basketbal",

	["sv"] = "Hedgewars-Basket"

	}

local subcaption = {

	["en"] = "Not So Friendly Match",

	["de"] = "Kein-so-Freundschaftsspiel",

	["es"] = "Partido no-tan-amistoso",

	["pl"] = "Mecz Nie-Taki-Towarzyski",

	["pt_PT"] = "Partida não muito amigável",

	["sk"] = "Nie tak celkom priateľský zápas",

	["sv"] = "En inte så vänlig match"

	}

local goal = {

	["en"] = "Bat your opponents through the|baskets and out of the map!",

	["de"] = "Schlage deine Widersacher durch|die Körbe und aus der Karte hinaus!",

	["es"] = "¡Batea a tus oponentes fuera del mapa a través de la canasta!",

	["pl"] = "Uderzaj swoich przekiwników|wyrzucając przez kosz, poza mapę!",

	["pt_PT"] = "Bate os teus adversarios|fora do mapa acertando com eles no cesto!",

	["sk"] = "Odpálkujte vašich súperov do koša|a von z mapy!",

	["sv"] = "Slå ner dina motståndare i|korgarna och ut ur kartan!"

	}

local scored = {

	["en"] = " scored a point!",

	["de"] = " erhält einen Punkt!",

	["es"] = " anotó un tanto!",

	["pl"] = " zdobyła punkt!",

	["pt_PT"] = " marca um cesto!",

	["sk"] = " skóruje!",

	["sv"] = " fick ett poäng"

	}

local failed = {

	["en"] = " scored a penalty!",

	["de"] = " erhält eine Strafe!",

	["es"] = " anotó una falta!",

	["pl"] = " zdobyła punkt karny!",

	["pt_PT"] = " perde um ponto!",

	["sk"] = " dostáva trestný bod!",

	["sv"] = " fick ett straff"

	}

	local sscore = {

	["en"] = "Score",

	["de"] = "Punktestand",

	["es"] = "Puntuación",

	["pl"] = "Punktacja",

	["pt_PT"] = "Pontuação",

	["sk"] = "Skóre",

	["sv"] = "Poängställning"

	}

local team = {

	["en"] = "Team",

	["es"] = "Equipo",

	["pl"] = "Drużyna",

	["pt_PT"] = "Equipa",

	["sk"] = "Tím",

	["sv"] = "Lag"

	}

local drowning = {

	["en"] = "is out and",

	["de"] = "ist draußen und",

	["es"] = "cayó y",

	["pl"] = "jest wyautowany i",

	["pt_PT"] = "está fora e",

	["sk"] = "je mimo hru a",

	["sv"] = "är ute och"

	}

local function loc(text)

	if text == nil then return "**missing**"

	elseif text[L] == nil then return text["en"]

	else return text[L]

	end

end

---------------------------------------------------------------

local score = {[0] = 0, [1] = 0, [2] = 0, [3] = 0, [4] = 0, [5] = 0}

local started = false

function onGameInit()

	GameFlags = gfSolidLand + gfBorder + gfInvulnerable + gfLowGravity

	TurnTime = 20000

	CaseFreq = 0

	LandAdds = 0

	Explosives = 0

	Delay = 500

	SuddenDeathTurns = 99999 -- "disable" sudden death

end

function onGameStart()

	ShowMission(loc(caption), loc(subcaption), loc(goal), -amBaseballBat, 0);

	started = true

end

function onGameTick()

end

function onAmmoStoreInit()

	SetAmmo(amBaseballBat, 9, 0, 0, 0)

	SetAmmo(amSkip, 9, 0, 0, 0)

end

function onGearAdd(gear)

end

function onGearDelete(gear)

	if not started then

		return

	end

	if (GetGearType(gear) == gtHedgehog) and CurrentHedgehog ~= nil then

		local clan = GetHogClan(CurrentHedgehog)

		local s = GetHogName(gear) .. " " .. loc(drowning) .. "|" .. loc(team) .. " " .. (clan + 1) .. " "

		if GetHogClan(CurrentHedgehog) ~= GetHogClan(gear) then

			score[clan] = score[clan] + 1

			s = s .. loc(scored)

		else

			score[clan] = score[clan] - 1

			s = s .. loc(failed)

		end

		s = s .. "| |" .. loc(sscore) .. ": " .. score[0]

		for i = 1, ClansCount - 1 do s = s .. " - " .. score[i] end

		ShowMission(loc(caption), loc(subcaption), s, -amBaseballBat, 0)

	end

end