share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/cosmos.lua
branchspacecampaign
changeset 9572 278cff2a965f
parent 9484 a63307092bc6
child 9574 da3d39667881
equal deleted inserted replaced
9570:d4b4ddcd85bb 9572:278cff2a965f
   184 		AddEvent(onFruitPlanetLanding, {hero.gear}, fruitPlanetLanding, {hero.gear}, 0)
   184 		AddEvent(onFruitPlanetLanding, {hero.gear}, fruitPlanetLanding, {hero.gear}, 0)
   185 	end
   185 	end
   186 	if GetCampaignVar("Planet") ~= "icePlanet" then
   186 	if GetCampaignVar("Planet") ~= "icePlanet" then
   187 		AddEvent(onIcePlanetLanding, {hero.gear}, icePlanetLanding, {hero.gear}, 0)
   187 		AddEvent(onIcePlanetLanding, {hero.gear}, icePlanetLanding, {hero.gear}, 0)
   188 	end
   188 	end
       
   189 	if GetCampaignVar("Planet") ~= "deathPlanet" then
       
   190 		AddEvent(onDeathPlanetLanding, {hero.gear}, deathPlanetLanding, {hero.gear}, 0)
       
   191 	end
   189 end
   192 end
   190 
   193 
   191 function onGameTick()
   194 function onGameTick()
   192 	-- maybe alert this to avoid timeForGuard1ToTurnLeft overflow
   195 	-- maybe alert this to avoid timeForGuard1ToTurnLeft overflow
   193 	if timeForGuard1ToTurnLeft == 0 and guard1.keepTurning then
   196 	if timeForGuard1ToTurnLeft == 0 and guard1.keepTurning then
   272 	return false
   275 	return false
   273 end
   276 end
   274 
   277 
   275 function onIcePlanetLanding(gear)
   278 function onIcePlanetLanding(gear)
   276 	if GetHealth(hero.gear) and GetX(gear) > 1330 and GetX(gear) < 1650  and GetY(gear) < 500 and StoppedGear(gear) then
   279 	if GetHealth(hero.gear) and GetX(gear) > 1330 and GetX(gear) < 1650  and GetY(gear) < 500 and StoppedGear(gear) then
       
   280 		return true
       
   281 	end
       
   282 	return false
       
   283 end
       
   284 
       
   285 function onDeathPlanetLanding(gear)
       
   286 	if GetHealth(hero.gear) and GetX(gear) > 310 and GetX(gear) < 675  and GetY(gear) < 400 and StoppedGear(gear) then
   277 		return true
   287 		return true
   278 	end
   288 	end
   279 	return false
   289 	return false
   280 end
   290 end
   281 
   291 
   365 		SaveCampaignVar("Planet", "icePlanet")
   375 		SaveCampaignVar("Planet", "icePlanet")
   366 		SaveCampaignVar("UnlockedMissions", "3")
   376 		SaveCampaignVar("UnlockedMissions", "3")
   367 		SaveCampaignVar("Mission1", "5")
   377 		SaveCampaignVar("Mission1", "5")
   368 		SaveCampaignVar("Mission2", "6")
   378 		SaveCampaignVar("Mission2", "6")
   369 		SaveCampaignVar("Mission3", "1")
   379 		SaveCampaignVar("Mission3", "1")
       
   380 		EndGame()
       
   381 	end
       
   382 end
       
   383 
       
   384 function deathPlanetLanding(gear)
       
   385 	if checkPointReached < 5 then
       
   386 		AddAnim(dialog06)
       
   387 	else
       
   388 		AnimCaption(hero.gear,loc("Welcome to the Death Planet!"))
       
   389 		SaveCampaignVar("Planet", "deathPlanet")
       
   390 		SaveCampaignVar("UnlockedMissions", "2")
       
   391 		SaveCampaignVar("Mission1", "9")
       
   392 		SaveCampaignVar("Mission2", "1")
   370 		EndGame()
   393 		EndGame()
   371 	end
   394 	end
   372 end
   395 end
   373 
   396 
   374 function noFuelAtLand(gear)
   397 function noFuelAtLand(gear)