share/hedgewars/Data/Missions/Training/User_Mission_-_The_Great_Escape.lua
author nemo
Mon, 29 Oct 2012 18:20:08 -0400
branch0.9.18
changeset 7890 7f3881b14a3f
parent 7877 b3fb94986255
child 8043 da083f8d95e6
permissions -rw-r--r--
consistent line endings
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7890
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     1
loadfile(GetDataPath() .. "Scripts/Locale.lua")()
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     2
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     3
local player = nil
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     4
local enemy = nil
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     5
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     6
function onGameInit()
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     7
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     8
	Map = "Castle"
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
     9
	Theme = "Nature"
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    10
	Seed = 0
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    11
	GameFlags = gfInfAttack
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    12
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    13
	TurnTime = 45 * 1000
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    14
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    15
	CaseFreq = 0
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    16
	MinesNum = 0
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    17
	Explosives = 0
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    18
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    19
	AddTeam(loc("Hero Team"), 14483456, "Simple", "Island", "Default", "Hedgewars")
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    20
	player = AddHog(loc("Good Dude"), 0, 80, "NoHat") --NoHat
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    21
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    22
	AddTeam(loc("Bad Team"), 	1175851, "Simple", "Island", "Default", "Hedgewars")
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    23
	enemy = AddHog("Bad Guy", 1, 40, "NoHat")
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    24
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    25
end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    26
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    27
function onGameStart()
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    28
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    29
ShowMission(loc("The Great Escape"), loc("Get out of there!"), loc("Elimate your captor."), -amGrenade, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    30
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    31
------ GIRDER LIST ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    32
PlaceGirder(1042,564,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    33
PlaceGirder(1028,474,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    34
PlaceGirder(1074,474,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    35
PlaceGirder(1050,385,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    36
PlaceGirder(1175,731,7)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    37
PlaceGirder(1452,905,2)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    38
PlaceGirder(1522,855,4)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    39
PlaceGirder(1496,900,3)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    40
PlaceGirder(1682,855,4)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    41
PlaceGirder(1773,887,2)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    42
PlaceGirder(1647,901,1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    43
PlaceGirder(1871,883,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    44
PlaceGirder(1871,723,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    45
PlaceGirder(1774,768,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    46
PlaceGirder(1773,767,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    47
PlaceGirder(1821,904,1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    48
PlaceGirder(1822,802,3)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    49
PlaceGirder(1820,723,1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    50
PlaceGirder(1782,678,4)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    51
PlaceGirder(1822,661,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    52
PlaceGirder(1822,644,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    53
PlaceGirder(1742,644,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    54
PlaceGirder(1742,661,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    55
PlaceGirder(1694,676,2)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    56
PlaceGirder(1903,635,0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    57
------ HEALTH CRATE LIST ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    58
SpawnHealthCrate(1476,169)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    59
SpawnHealthCrate(1551,177)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    60
SpawnHealthCrate(1586,200)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    61
SpawnHealthCrate(1439,189)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    62
SpawnHealthCrate(1401,211)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    63
SpawnHealthCrate(1633,210)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    64
------ MINE LIST ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    65
tempG = AddGear(1010,680,gtMine, 0, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    66
SetTimer(tempG, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    67
tempG = AddGear(1031,720,gtMine, 0, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    68
SetTimer(tempG, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    69
tempG = AddGear(1039,748,gtMine, 0, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    70
SetTimer(tempG, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    71
tempG = AddGear(1051,777,gtMine, 0, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    72
SetTimer(tempG, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    73
tempG = AddGear(1065,796,gtMine, 0, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    74
SetTimer(tempG, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    75
tempG = AddGear(1094,800,gtMine, 0, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    76
SetTimer(tempG, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    77
------ REPOSITION LIST ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    78
SetGearPosition(player,1050,534)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    79
SetGearPosition(enemy,1512,158)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    80
SetHealth(player, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    81
SetHealth(enemy, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    82
------ AMMO CRATE LIST ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    83
SpawnAmmoCrate(1632,943,5)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    84
SpawnAmmoCrate(1723,888,12)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    85
SpawnAmmoCrate(1915,599,1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    86
------ UTILITY CRATE LIST ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    87
SpawnUtilityCrate(1519,945,15)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    88
SpawnUtilityCrate(1227,640,6)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    89
SpawnUtilityCrate(1416,913,18)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    90
------ END LOADING DATA ------
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    91
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    92
end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    93
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    94
function onGameTick()
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    95
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    96
	if TurnTimeLeft == TurnTime-1 then
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    97
		SetWind(100)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    98
	end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
    99
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   100
end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   101
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   102
function onGearDelete(gear)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   103
	if (GetGearType(gear) == gtCase) and (CurrentHedgehog == player) then
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   104
		if GetHealth(gear) > 0 then
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   105
			AddGear(GetX(gear), GetY(gear), gtGrenade, 0, 0, 0, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   106
		end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   107
	elseif gear == player then
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   108
		ShowMission(loc("The Great Escape"), loc("MISSION FAILED"), loc("Oh no! Just try again!"), -amSkip, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   109
	elseif gear == enemy then
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   110
		ShowMission(loc("The Great Escape"), loc("MISSION SUCCESSFUL"), loc("Congratulations!"), 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   111
	end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   112
end
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   113
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   114
function onAmmoStoreInit()
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   115
	SetAmmo(amGrenade, 1, 0, 0, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   116
	SetAmmo(amParachute, 1, 0, 0, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   117
	SetAmmo(amFirePunch, 0, 0, 0, 3)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   118
	SetAmmo(amPickHammer, 0, 0, 0, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   119
	SetAmmo(amBlowTorch, 0, 0, 0, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   120
	SetAmmo(amShotgun, 0, 0, 0, 1)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   121
	SetAmmo(amSkip, 9, 0, 0, 0)
7f3881b14a3f consistent line endings
nemo
parents: 7877
diff changeset
   122
end