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