share/hedgewars/Data/Missions/Training/User_Mission_-_Bamboo_Thicket.lua
author Stepan777 <stepik-777@mail.ru>
Fri, 06 Jul 2012 13:22:33 +0400
changeset 7350 1dbf3f4340e0
parent 5823 f906f6645e02
child 7877 b3fb94986255
permissions -rw-r--r--
When compiling with sdl2 use it instead of glut for creating hidden window (as suggested by koda). This is not tested but it should work.


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

local player = nil 
local enemy = nil
local firedShell = false
local turnNumber = 0

local hhs = {}
local numhhs = 0

function onGameInit()

	Seed = 0 
	TurnTime = 20000 
	CaseFreq = 0 
	MinesNum = 0 
	Explosives = 0 
	Map = "Bamboo" 
	Theme = "Bamboo"
	SuddenDeathTurns = 99999

	AddTeam(loc("Pathetic Resistance"), 14483456, "Simple", "Island", "Default")
	player = AddHog("Ikeda", 0, 10, "StrawHat")
			
	AddTeam(loc("Cybernetic Empire"), 	1175851, "Simple", "Island", "Default")
	enemy = AddHog(loc("Unit 835"), 1, 10, "cyborg1")

	SetGearPosition(player,1166,1680)
	SetGearPosition(enemy,2848,1443)

end


function onGameStart()

	ShowMission(loc("Bamboo Thicket"), loc("User Challenge"), loc("Eliminate the enemy before the time runs out"), -amBazooka, 0)

	--WEAPON CRATE LIST. WCRATES: 1
	SpawnAmmoCrate(1915,1876,amBazooka)
	--UTILITY CRATE LIST. UCRATES: 2
	SpawnUtilityCrate(1986,1141,amBlowTorch)
	SpawnUtilityCrate(1427,1527,amParachute)

	AddAmmo(enemy, amGrenade, 100)
		
end

function onNewTurn()
	SetWind(100)
	turnNumber = turnNumber + 1
end

function onAmmoStoreInit()
	SetAmmo(amSkip, 9, 0, 0, 0)
	SetAmmo(amGirder, 4, 0, 0, 0)
	SetAmmo(amBlowTorch, 0, 0, 0, 1)
	SetAmmo(amParachute, 0, 0, 0, 2)
	SetAmmo(amBazooka, 0, 0, 0, 2)
end


function onGearAdd(gear)

	if GetGearType(gear) == gtHedgehog then
		hhs[numhhs] = gear
		numhhs = numhhs + 1
	elseif GetGearType(gear) == gtShell then
		firedShell = true
	end

end

function onGearDelete(gear)

	if (gear == enemy) then
		
		ShowMission(loc("Bamboo Thicket"), loc("MISSION SUCCESSFUL"), loc("Congratulations!"), 0, 0)
		
		if (turnNumber < 6) and (firedShell == false) then
			AddCaption(loc("Achievement Unlocked") .. ": " .. loc("Energetic Engineer"),0xffba00ff,capgrpMessage2)
		end

	elseif gear == player then
		ShowMission(loc("Bamboo Thicket"), loc("MISSION FAILED"), loc("Oh no! Just try again!"), -amSkip, 0)
	end

end