share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/cosmos.lua
branchspacecampaign
changeset 9584 a7bf5464dfb6
parent 9580 49db7a78c2bd
child 9585 d079e1cc2806
equal deleted inserted replaced
9582:bf314b2258b3 9584:a7bf5464dfb6
   193 		AddEvent(onIcePlanetLanding, {hero.gear}, icePlanetLanding, {hero.gear}, 0)
   193 		AddEvent(onIcePlanetLanding, {hero.gear}, icePlanetLanding, {hero.gear}, 0)
   194 	end
   194 	end
   195 	if GetCampaignVar("Planet") ~= "deathPlanet" then
   195 	if GetCampaignVar("Planet") ~= "deathPlanet" then
   196 		AddEvent(onDeathPlanetLanding, {hero.gear}, deathPlanetLanding, {hero.gear}, 0)
   196 		AddEvent(onDeathPlanetLanding, {hero.gear}, deathPlanetLanding, {hero.gear}, 0)
   197 	end
   197 	end
       
   198 	
       
   199 	SendHealthStatsOff()
   198 end
   200 end
   199 
   201 
   200 function onGameTick()
   202 function onGameTick()
   201 	-- maybe alert this to avoid timeForGuard1ToTurnLeft overflow
   203 	-- maybe alert this to avoid timeForGuard1ToTurnLeft overflow
   202 	if timeForGuard1ToTurnLeft == 0 and guard1.keepTurning then
   204 	if timeForGuard1ToTurnLeft == 0 and guard1.keepTurning then
   341 		SaveCampaignVar("HeroHealth",GetHealth(hero.gear))
   343 		SaveCampaignVar("HeroHealth",GetHealth(hero.gear))
   342 	end
   344 	end
   343 	SaveCampaignVar("UnlockedMissions", "2")
   345 	SaveCampaignVar("UnlockedMissions", "2")
   344 	SaveCampaignVar("Mission1", "2")
   346 	SaveCampaignVar("Mission1", "2")
   345 	SaveCampaignVar("Mission2", "1")
   347 	SaveCampaignVar("Mission2", "1")
   346 	EndGame()
   348 	sendStats(loc("the moon"))
   347 end
   349 end
   348 
   350 
   349 function fruitPlanetLanding(gear)
   351 function fruitPlanetLanding(gear)
   350 	if checkPointReached < 5 then
   352 	if checkPointReached < 5 then
   351 		AddAnim(dialog06)
   353 		AddAnim(dialog06)
   353 		AnimCaption(hero.gear,loc("Welcome to the Fruit Planet!"))
   355 		AnimCaption(hero.gear,loc("Welcome to the Fruit Planet!"))
   354 		SaveCampaignVar("Planet", "fruitPlanet")
   356 		SaveCampaignVar("Planet", "fruitPlanet")
   355 		SaveCampaignVar("UnlockedMissions", "2")
   357 		SaveCampaignVar("UnlockedMissions", "2")
   356 		SaveCampaignVar("Mission1", "3")
   358 		SaveCampaignVar("Mission1", "3")
   357 		SaveCampaignVar("Mission2", "1")
   359 		SaveCampaignVar("Mission2", "1")
   358 		EndGame()
   360 		sendStats(loc("the Fruit Planet"))
   359 	end
   361 	end
   360 end
   362 end
   361 
   363 
   362 function desertPlanetLanding(gear)
   364 function desertPlanetLanding(gear)
   363 	if checkPointReached < 5 then
   365 	if checkPointReached < 5 then
   367 		SaveCampaignVar("Planet", "desertPlanet")
   369 		SaveCampaignVar("Planet", "desertPlanet")
   368 		SaveCampaignVar("UnlockedMissions", "3")
   370 		SaveCampaignVar("UnlockedMissions", "3")
   369 		SaveCampaignVar("Mission1", "4")
   371 		SaveCampaignVar("Mission1", "4")
   370 		SaveCampaignVar("Mission2", "7")
   372 		SaveCampaignVar("Mission2", "7")
   371 		SaveCampaignVar("Mission3", "1")
   373 		SaveCampaignVar("Mission3", "1")
   372 		EndGame()
   374 		sendStats(loc("the Desert Planet"))
   373 	end
   375 	end
   374 end
   376 end
   375 
   377 
   376 function icePlanetLanding(gear)
   378 function icePlanetLanding(gear)
   377 	if checkPointReached < 5 then
   379 	if checkPointReached < 5 then
   381 		SaveCampaignVar("Planet", "icePlanet")
   383 		SaveCampaignVar("Planet", "icePlanet")
   382 		SaveCampaignVar("UnlockedMissions", "3")
   384 		SaveCampaignVar("UnlockedMissions", "3")
   383 		SaveCampaignVar("Mission1", "5")
   385 		SaveCampaignVar("Mission1", "5")
   384 		SaveCampaignVar("Mission2", "6")
   386 		SaveCampaignVar("Mission2", "6")
   385 		SaveCampaignVar("Mission3", "1")
   387 		SaveCampaignVar("Mission3", "1")
   386 		EndGame()
   388 		sendStats(loc("the Ice Planet"))
   387 	end
   389 	end
   388 end
   390 end
   389 
   391 
   390 function deathPlanetLanding(gear)
   392 function deathPlanetLanding(gear)
   391 	if checkPointReached < 5 then
   393 	if checkPointReached < 5 then
   396 		AnimCaption(hero.gear,loc("Welcome to the Death Planet!"))
   398 		AnimCaption(hero.gear,loc("Welcome to the Death Planet!"))
   397 		SaveCampaignVar("Planet", "deathPlanet")
   399 		SaveCampaignVar("Planet", "deathPlanet")
   398 		SaveCampaignVar("UnlockedMissions", "2")
   400 		SaveCampaignVar("UnlockedMissions", "2")
   399 		SaveCampaignVar("Mission1", "9")
   401 		SaveCampaignVar("Mission1", "9")
   400 		SaveCampaignVar("Mission2", "1")
   402 		SaveCampaignVar("Mission2", "1")
   401 		EndGame()
   403 		sendStats(loc("the Planet of Death"))
   402 	end
   404 	end
   403 end
   405 end
   404 
   406 
   405 function noFuelAtLand(gear)
   407 function noFuelAtLand(gear)
   406 	AddAnim(dialog06)
   408 	AddAnim(dialog06)
   484 function startCombat()
   486 function startCombat()
   485 	-- use this so guard2 will gain control
   487 	-- use this so guard2 will gain control
   486 	AnimSwitchHog(hero.gear)
   488 	AnimSwitchHog(hero.gear)
   487 	TurnTimeLeft = 0
   489 	TurnTimeLeft = 0
   488 end
   490 end
       
   491 
       
   492 function sendStats(planet)
       
   493 	SendStat('siGameResult', loc("Hog Solo arrived to "..planet)) --1
       
   494 	SendStat('siCustomAchievement', loc("Return to the mission menu by pressing the \"Go back\" button")) --11
       
   495 	SendStat('siCustomAchievement', loc("Choose another planet by replaying the mission")) --11
       
   496 	SendStat('siPlayerKills','1',teamC.name)
       
   497 	EndGame()
       
   498 end