share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/final.lua
changeset 9781 5eb7c3778045
parent 9758 3b8058b251b8
child 9802 00216d609140
equal deleted inserted replaced
9780:1e0999987189 9781:5eb7c3778045
    10 HedgewarsScriptLoad("/Missions/Campaign/A_Space_Adventure/global_functions.lua")
    10 HedgewarsScriptLoad("/Missions/Campaign/A_Space_Adventure/global_functions.lua")
    11 
    11 
    12 ----------------- VARIABLES --------------------
    12 ----------------- VARIABLES --------------------
    13 -- globals
    13 -- globals
    14 local missionName = loc("The big bang")
    14 local missionName = loc("The big bang")
    15 local challengeObjectives = loc("Find a way to detonate all the explosives and stay alive!")
    15 local challengeObjectives = loc("Find a way to detonate all the explosives and stay alive!").."|"..
       
    16 							loc("Red areas are indestructible").."|"..
       
    17 							loc("Green areas aren't portal enabled")
    16 local explosives = {}
    18 local explosives = {}
    17 local currentHealth = 1
    19 local currentHealth = 1
    18 local currentDamage = 0
    20 local currentDamage = 0
    19 -- hogs
    21 -- hogs
    20 local hero = {
    22 local hero = {
    36 	TurnTime = -1
    38 	TurnTime = -1
    37 	CaseFreq = 0
    39 	CaseFreq = 0
    38 	MinesNum = 0
    40 	MinesNum = 0
    39 	MinesTime = 1
    41 	MinesTime = 1
    40 	Explosives = 0
    42 	Explosives = 0
    41 	HealthCaseAmount = 50
    43 	HealthCaseAmount = 35
    42 	Map = "final_map"
    44 	Map = "final_map"
    43 	Theme = "EarthRise"
    45 	Theme = "EarthRise"
    44 
    46 
    45 	-- Hog Solo
    47 	-- Hog Solo
    46 	AddTeam(teamA.name, teamA.color, "Bone", "Island", "HillBilly", "cm_birdy")
    48 	AddTeam(teamA.name, teamA.color, "Bone", "Island", "HillBilly", "cm_birdy")
    69 	while x < 815 do
    71 	while x < 815 do
    70 		AddGear(x, 480, gtMine, 0, 0, 0, 0)
    72 		AddGear(x, 480, gtMine, 0, 0, 0, 0)
    71 		x = x + math.random(5,20)
    73 		x = x + math.random(5,20)
    72 	end
    74 	end
    73 	-- health crate
    75 	-- health crate
    74 	SpawnHealthCrate(900, 5)
    76 	SpawnHealthCrate(910, 5)
    75 	-- ammo crates
    77 	-- ammo crates
    76 	SpawnAmmoCrate(930, 1000,amRCPlane)
    78 	SpawnAmmoCrate(930, 1000,amRCPlane)
    77 	SpawnAmmoCrate(1220, 672,amPickHammer)
    79 	SpawnAmmoCrate(1220, 672,amPickHammer)
    78 	SpawnAmmoCrate(1220, 672,amGirder)
    80 	SpawnAmmoCrate(1220, 672,amGirder)
    79 
    81 
   139 -------------- ACTIONS ------------------
   141 -------------- ACTIONS ------------------
   140 
   142 
   141 function heroDeath(gear)
   143 function heroDeath(gear)
   142 	SendStat(siGameResult, loc("Hog Solo lost, try again!"))
   144 	SendStat(siGameResult, loc("Hog Solo lost, try again!"))
   143 	SendStat(siCustomAchievement, loc("You have to destroy all the explosives without dying!"))
   145 	SendStat(siCustomAchievement, loc("You have to destroy all the explosives without dying!"))
       
   146 	SendStat(siCustomAchievement, loc("Red areas are indestructible"))
       
   147 	SendStat(siCustomAchievement, loc("Green areas aren't portal enabled"))
   144 	SendStat(siPlayerKills,'0',teamA.name)
   148 	SendStat(siPlayerKills,'0',teamA.name)
   145 	EndGame()
   149 	EndGame()
   146 end
   150 end
   147 
   151 
   148 function heroWin(gear)
   152 function heroWin(gear)