share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/moon01.lua
branchspacecampaign
changeset 9334 4bf3edc24444
parent 9330 b6483dc78feb
child 9336 5f2224dce442
equal deleted inserted replaced
9332:1c98576c3360 9334:4bf3edc24444
   209 		GameFlags = bor(GameFlags,gfDisableWind)
   209 		GameFlags = bor(GameFlags,gfDisableWind)
   210 		weaponsAcquired = true
   210 		weaponsAcquired = true
   211 		TurnTimeLeft = 0
   211 		TurnTimeLeft = 0
   212 		AddAnim(dialog02)
   212 		AddAnim(dialog02)
   213 	end
   213 	end
       
   214 	
       
   215 	SendHealthStatsOff()
   214 end
   216 end
   215 
   217 
   216 function onAmmoStoreInit()
   218 function onAmmoStoreInit()
   217 	SetAmmo(amBazooka, 0, 0, 0, 3)
   219 	SetAmmo(amBazooka, 0, 0, 0, 3)
   218 	SetAmmo(amParachute, 0, 0, 0, 1)
   220 	SetAmmo(amParachute, 0, 0, 0, 1)
   325 	GameFlags = bor(GameFlags,gfDisableWind)
   327 	GameFlags = bor(GameFlags,gfDisableWind)
   326 	AddAnim(dialog02)
   328 	AddAnim(dialog02)
   327 end
   329 end
   328 
   330 
   329 function heroDeath(gear)
   331 function heroDeath(gear)
   330 	-- do stats stuff here
   332 	SendStat('siGameResult', loc("Hog Solo lost, try again!")) --1
       
   333 	SendStat('siCustomAchievement', loc("You have to get the weapons and rescue the PAoTH researchers")) --11
       
   334 	SendStat('siPlayerKills','1',teamC.name)
       
   335 	SendStat('siPlayerKills','0',teamD.name)
   331 	EndGame()
   336 	EndGame()
   332 end
   337 end
   333 
   338 
   334 function battleZone(gear)
   339 function battleZone(gear)
   335 	TurnTimeLeft = 0
   340 	TurnTimeLeft = 0
   346 		AnimSay(professor.gear,loc("Don't hit me you fools!"), SAY_SHOUT, 2000)
   351 		AnimSay(professor.gear,loc("Don't hit me you fools!"), SAY_SHOUT, 2000)
   347 	end
   352 	end
   348 end
   353 end
   349 
   354 
   350 function professorDeath(gear)
   355 function professorDeath(gear)
   351 	-- do stats stuff here
       
   352 	if GetHealth(minion1.gear) then
   356 	if GetHealth(minion1.gear) then
   353 		AnimSay(minion1.gear, loc("The boss has fallen! Retreat!"), SAY_SHOUT, 6000)
   357 		AnimSay(minion1.gear, loc("The boss has fallen! Retreat!"), SAY_SHOUT, 6000)
   354 	elseif GetHealth(minion2.gear) then
   358 	elseif GetHealth(minion2.gear) then
   355 		AnimSay(minion2.gear, loc("The boss has fallen! Retreat!"), SAY_SHOUT, 6000)
   359 		AnimSay(minion2.gear, loc("The boss has fallen! Retreat!"), SAY_SHOUT, 6000)
   356 	elseif GetHealth(minion3.gear) then
   360 	elseif GetHealth(minion3.gear) then
   357 		AnimSay(minion3.gear, loc("The boss has fallen! Retreat!"), SAY_SHOUT, 6000)
   361 		AnimSay(minion3.gear, loc("The boss has fallen! Retreat!"), SAY_SHOUT, 6000)
   358 	end
   362 	end
   359 	ParseCommand("teamgone " .. teamB.name)
   363 	ParseCommand("teamgone " .. teamB.name)
   360 	AnimCaption(hero.gear, loc("Congrats! You made them run away!"), 6000)
   364 	AnimCaption(hero.gear, loc("Congrats! You made them run away!"), 6000)
   361 	AnimWait(hero.gear,5000)
   365 	AnimWait(hero.gear,5000)	
       
   366 	
       
   367 	SendStat('siGameResult', loc("Hog Solo win, conrgatulations!")) --1
       
   368 	SendStat('siCustomAchievement', loc("Eliminated the professor Hogevil")) --11
       
   369 	SendStat('siCustomAchievement', loc("Drove the minions away")) --11
       
   370 	SendStat('siPlayerKills','1',teamD.name)
       
   371 	SendStat('siPlayerKills','0',teamC.name)
       
   372 	
   362 	EndGame()
   373 	EndGame()
   363 end
   374 end
   364 
   375 
   365 function minionsDeath(gear)
   376 function minionsDeath(gear)
   366 	-- do staffs here
   377 	-- do staffs here
   367 	AnimSay(professor.gear, loc("I may lost that battle, but I haven't lost the war yet!"), SAY_SHOUT, 6000)
   378 	AnimSay(professor.gear, loc("I may lost that battle, but I haven't lost the war yet!"), SAY_SHOUT, 6000)
   368 	ParseCommand("teamgone " .. teamC.name)
   379 	ParseCommand("teamgone " .. teamC.name)
   369 	AnimCaption(hero.gear, loc("Congrats! You won!"), 6000)
   380 	AnimCaption(hero.gear, loc("Congrats! You won!"), 6000)
   370 	AnimWait(hero.gear,5000)	
   381 	AnimWait(hero.gear,5000)	
       
   382 	
       
   383 	SendStat('siGameResult', loc("Hog Solo win, conrgatulations!")) --1
       
   384 	SendStat('siCustomAchievement', loc("Eliminated the evil minions")) --11
       
   385 	SendStat('siCustomAchievement', loc("Drove the professor away")) --11
       
   386 	SendStat('siPlayerKills','1',teamD.name)
       
   387 	SendStat('siPlayerKills','0',teamC.name)
       
   388 	
   371 	EndGame()
   389 	EndGame()
   372 end
   390 end
   373 
   391 
   374 -------------- ANIMATIONS ------------------
   392 -------------- ANIMATIONS ------------------
   375 
   393