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

-- HIGHLANDER / HOGS OF WAR

-- version 0.3c

-- by mikade

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

-----------

--0.1

-----------

-- concept test

-----------

--0.2

-----------

-- remove tardis till Henek fixes his tracker

-- change wep crates to health crates

-- reset arb turntimevalue

-- include randomOrder

-- Until fixed .17 methods come out, remove switches and resurrector

-- on request, removed kamikaze and piano weapons

-- provisional fixing of bugs that can't actually be fixed yet

-----------

--0.3

-----------

-- meh, update incorrect display

-- may change this in the future to have switches

-- but for now people are used to it without, so~

-- mudball is now counted as a utility

-----------

--0.3b

-----------

-- cleaned up code and got rid of unneccessary vars

-- mudball is a weapon again

-- landgun is now a utility

-- extra time, vampirism utility removed

-- hammer wep removed

-- all hogs have kamikaze

-----------

--0.3c

-----------

-- restructured some code

-- added napalm (whoops) to list of possible weapons you can get

-- hogs no longer recieve airstrike-related weps on border maps

loadfile(GetDataPath() .. "Scripts/Locale.lua")()

loadfile(GetDataPath() .. "Scripts/Tracker.lua")()

local airWeapons = 	{amAirAttack, amMineStrike, amNapalm, amDrillStrike --[[,amPiano]]}

local atkArray = 	{

					amBazooka, amBee, amMortar, amDrill, --[[amSnowball,]]

					amGrenade, amClusterBomb, amMolotov, amWatermelon, amHellishBomb, amGasBomb,

					amShotgun, amDEagle, amFlamethrower, amSniperRifle, amSineGun,

					amFirePunch, amWhip, amBaseballBat, --[[amKamikaze,]] amSeduction, --[[amHammer,]]

					amMine, amDynamite, amCake, amBallgun, amRCPlane, amSMine,

					amRCPlane, amSMine,

					amBirdy

					}

local utilArray = 	{

					amBlowTorch, amPickHammer, amGirder, amPortalGun,

					amRope, amParachute, amTeleport, amJetpack,

					amInvulnerable, amLaserSight, --[[amVampiric,]]

					amLowGravity, amExtraDamage, --[[amExtraTime,]]

					amLandGun

					--[[,amTardis, amResurrector, amSwitch]]

					}

local wepArray = 	{}

local currName

local lastName

local started = false

local switchStage = 0

function StartingSetUp(gear)

	for i = 1, #wepArray do

		setGearValue(gear,wepArray[i],0)

	end

	setGearValue(gear,amKamikaze,1)

	i = 1 + GetRandom(#atkArray)

	setGearValue(gear,atkArray[i],1)

	i = 1 + GetRandom(#utilArray)

	setGearValue(gear,utilArray[i],1)

	SetHealth(gear, 100)

end

--[[function SaveWeapons(gear)

	-

	for i = 1, (#wepArray) do

		setGearValue(gear, wepArray[i], GetAmmoCount(gear, wepArray[i]) )

		 --AddAmmo(gear, wepArray[i], getGearValue(gear,wepArray[i]) )

	end

end]]

function ConvertValues(gear)

	for i = 1, #wepArray do

		AddAmmo(gear, wepArray[i], getGearValue(gear,wepArray[i]) )

	end

end

function TransferWeps(gear)

	if CurrentHedgehog ~= nil then

		for i = 1, #wepArray do

			val = getGearValue(gear,wepArray[i])

			if val ~= 0 then

				setGearValue(CurrentHedgehog, wepArray[i], val)

				AddAmmo(CurrentHedgehog, wepArray[i], val)

			end

		end

	end

end

function onGameInit()

	GameFlags = gfInfAttack + gfRandomOrder

	HealthCaseProb = 100

end

function onGameStart()

	ShowMission	(

				loc("HIGHLANDER"),

				loc("Not all hogs are born equal."),

				"- " .. loc("Eliminate enemy hogs and take their weapons.") .. "|" ..

				"- " .. loc("Per-Hog Ammo") .. "|" ..

				"- " .. loc("Weapons reset.") .. "|" ..

				"- " .. loc("Unlimited Attacks") .. "|" ..

				"", 4, 4000

				)

	if MapHasBorder() == false then

        for i, w in pairs(airWeapons) do

            table.insert(atkArray, w)

        end

    end

	for i, w in pairs(atkArray) do

        table.insert(wepArray, w)

	end

	for i, w in pairs(utilArray) do

        table.insert(wepArray, w)

	end

	runOnGears(StartingSetUp)

	runOnGears(ConvertValues)

end

function onNewTurn()

--

end

function onGameTick20()

	if (CurrentHedgehog ~= nil) then

		currName = GetHogName(CurrentHedgehog)

		if (currName ~= lastName) then

			AddCaption(loc("Switched to ") .. currName .. "!")

			ConvertValues(CurrentHedgehog)

		end

		lastName = currName

	end

end

--[[function onHogHide(gear)

	-- waiting for Henek

end

function onHogRestore(gear)

	-- waiting for Henek

end]]

function onGearAdd(gear)

	--if GetGearType(gear) == gtSwitcher then

	--	SaveWeapons(CurrentHedgehog)

	--end

	if (GetGearType(gear) == gtHedgehog) then

		trackGear(gear)

	end

end

function onGearDelete(gear)

	if (GetGearType(gear) == gtHedgehog) then --or (GetGearType(gear) == gtResurrector) then

		TransferWeps(gear)

		trackDeletion(gear)

	end

end

function onAmmoStoreInit()

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

	SetAmmo(amKamikaze, 9, 0, 0, 0)

	--SetAmmo(amSwitch, 9, 0, 0, 0) -------1

end