+
−--------------------------------
+
−-- 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
+
−