share/hedgewars/Data/Missions/Campaign/A_Classic_Fairytale/queen.lua
changeset 13740 2bb7141496a9
parent 13583 141cdfe0f3ca
child 13750 110d6c1e817f
equal deleted inserted replaced
13739:b3b55b03d499 13740:2bb7141496a9
   490   ShowMission(loc("Long Live The Queen"), loc("Closing in"), loc("Defeat the enemy!").."|"..loc("The leader seems scared, he will probably flee."), 1, 0)
   490   ShowMission(loc("Long Live The Queen"), loc("Closing in"), loc("Defeat the enemy!").."|"..loc("The leader seems scared, he will probably flee."), 1, 0)
   491   SetHealth(SpawnHealthCrate(2207, 44), 25)
   491   SetHealth(SpawnHealthCrate(2207, 44), 25)
   492   SetHealth(SpawnHealthCrate(519, 1519), 25)
   492   SetHealth(SpawnHealthCrate(519, 1519), 25)
   493   SetHealth(SpawnHealthCrate(826, 895), 25)
   493   SetHealth(SpawnHealthCrate(826, 895), 25)
   494   SpawnSupplyCrate(701, 1046, amGirder, 3)
   494   SpawnSupplyCrate(701, 1046, amGirder, 3)
   495   TurnTimeLeft = TurnTime
   495   SetTurnTimeLeft(TurnTime)
   496 end
   496 end
   497 
   497 
   498 function SkipAnim(anim)
   498 function SkipAnim(anim)
   499   if anim == startAnim then
   499   if anim == startAnim then
   500     SetGearPosition(enemy, unpack(enemyPos))
   500     SetGearPosition(enemy, unpack(enemyPos))
   511   SetHealth(SpawnHealthCrate(2143, 54), 25)
   511   SetHealth(SpawnHealthCrate(2143, 54), 25)
   512   SetHealth(SpawnHealthCrate(70, 1308), 25)
   512   SetHealth(SpawnHealthCrate(70, 1308), 25)
   513   SetGearMessage(CurrentHedgehog, 0)
   513   SetGearMessage(CurrentHedgehog, 0)
   514   HideHedge(enemy)
   514   HideHedge(enemy)
   515   ShowMission(loc("Long Live The Queen"), loc("Coward"), loc("The leader escaped. Defeat the rest of the aliens!"), 1, 0)
   515   ShowMission(loc("Long Live The Queen"), loc("Coward"), loc("The leader escaped. Defeat the rest of the aliens!"), 1, 0)
   516   TurnTimeLeft = TurnTime
   516   SetTurnTimeLeft(TurnTime)
   517 end
   517 end
   518 
   518 
   519 function AfterLeaderDeadAnim()
   519 function AfterLeaderDeadAnim()
   520   SetHealth(SpawnHealthCrate(130, 455), 25)
   520   SetHealth(SpawnHealthCrate(130, 455), 25)
   521   SetHealth(SpawnHealthCrate(2087, 50), 25)
   521   SetHealth(SpawnHealthCrate(2087, 50), 25)
   856   SetAmmo(amShotgun, 9, 0, 0, 0)
   856   SetAmmo(amShotgun, 9, 0, 0, 0)
   857 end
   857 end
   858 
   858 
   859 function onNewTurn()
   859 function onNewTurn()
   860   if AnimInProgress() then
   860   if AnimInProgress() then
   861     TurnTimeLeft = -1
   861     SetTurnTimeLeft(cMaxTurnTime)
   862     return
   862     return
   863   end
   863   end
   864   if GetHogTeamName(CurrentHedgehog) == loc("011101001") then
   864   if GetHogTeamName(CurrentHedgehog) == loc("011101001") then
   865     EndTurn(true)
   865     EndTurn(true)
   866   end
   866   end