437 lines
14 KiB
Lua
437 lines
14 KiB
Lua
AlliedUnits =
|
|
{
|
|
{ delay = 0, types = { "1tnk", "1tnk", "2tnk", "2tnk" } },
|
|
{ delay = DateTime.Seconds(3), types = { "e1", "e1", "e1", "e3", "e3" } },
|
|
{ delay = DateTime.Seconds(7), types = { "e6" } }
|
|
}
|
|
ReinforceBaseUnits = { "1tnk", "1tnk", "2tnk", "arty", "arty" }
|
|
CivilianEvacuees = { "c1", "c2", "c5", "c7", "c8" }
|
|
USSROutpostFlameTurrets = { FlameTurret1, FlameTurret2 }
|
|
ExplosiveBarrels = { ExplosiveBarrel1, ExplosiveBarrel2 }
|
|
SuperTanks = { stnk1, stnk2, stnk3 }
|
|
SuperTankMoveWaypoints = { HospitalSuperTankPoint, AlliedBaseBottomRight, DemitriTriggerAreaCenter, DemitriLZ }
|
|
SuperTankMove = 1
|
|
SuperTankHuntWaypoints = { SuperTankHuntWaypoint1, SuperTankHuntWaypoint2, SuperTankHuntWaypoint3, SuperTankHuntWaypoint4 }
|
|
SuperTankHunt = 1
|
|
SuperTankHuntCounter = 1
|
|
ExtractionHeli = "tran"
|
|
ExtractionWaypoint = CPos.New(DemitriLZ.Location.X, 0)
|
|
ExtractionLZ = DemitriLZ.Location
|
|
BeachTrigger = { CPos.New(19, 44), CPos.New(20, 44), CPos.New(21, 44), CPos.New(22, 44), CPos.New(22, 45), CPos.New(23, 45), CPos.New(22, 44), CPos.New(24, 45), CPos.New(24, 46), CPos.New(24, 47), CPos.New(25, 47), CPos.New(25, 48) }
|
|
DemitriAreaTrigger = { CPos.New(32, 98), CPos.New(32, 99), CPos.New(33, 99), CPos.New(33, 100), CPos.New(33, 101), CPos.New(33, 102), CPos.New(32, 102), CPos.New(32, 103) }
|
|
HospitalAreaTrigger = { CPos.New(43, 41), CPos.New(44, 41), CPos.New(45, 41), CPos.New(46, 41), CPos.New(46, 42), CPos.New(46, 43), CPos.New(46, 44), CPos.New(46, 45), CPos.New(46, 46), CPos.New(45, 46), CPos.New(44, 46), CPos.New(43, 46) }
|
|
|
|
|
|
EvacuateCivilians = function()
|
|
local evacuees = Reinforcements.Reinforce(neutral, CivilianEvacuees, { HospitalCivilianSpawnPoint.Location }, 0)
|
|
|
|
Trigger.OnAnyKilled(evacuees, function()
|
|
player.MarkFailedObjective(RescueCivilians)
|
|
end)
|
|
Trigger.OnAllRemovedFromWorld(evacuees, function()
|
|
player.MarkCompletedObjective(RescueCivilians)
|
|
end)
|
|
|
|
Utils.Do(evacuees, function(civ)
|
|
Trigger.OnIdle(civ, function()
|
|
if civ.Location == AlliedBaseEntryPoint.Location then
|
|
civ.Destroy()
|
|
else
|
|
civ.Move(AlliedBaseEntryPoint.Location)
|
|
end
|
|
end)
|
|
end)
|
|
end
|
|
|
|
SpawnAndMoveAlliedBaseUnits = function()
|
|
Media.PlaySpeechNotification(player, "ReinforcementsArrived")
|
|
Reinforcements.Reinforce(player, ReinforceBaseUnits, { AlliedBaseEntryPoint.Location, AlliedBaseMovePoint.Location }, 18)
|
|
end
|
|
|
|
SetupAlliedBase = function()
|
|
local alliedOutpost = Map.ActorsInBox(AlliedBaseTopLeft.CenterPosition, AlliedBaseBottomRight.CenterPosition,
|
|
function(self) return self.Owner == outpost end)
|
|
|
|
Media.PlaySoundNotification(player, "BaseSetup")
|
|
Utils.Do(alliedOutpost, function(building)
|
|
building.Owner = player
|
|
end)
|
|
|
|
AlliedBaseHarv.Owner = player
|
|
AlliedBaseHarv.FindResources()
|
|
|
|
FindDemitri = player.AddPrimaryObjective("Find Dr. Demitri. He is likely hiding in the village\n to the far south.")
|
|
InfiltrateRadarDome = player.AddPrimaryObjective("Reprogram the super tanks by sending a spy into\n the Soviet radar dome.")
|
|
DefendOutpost = player.AddSecondaryObjective("Defend and repair our outpost.")
|
|
player.MarkCompletedObjective(FindOutpost)
|
|
|
|
Trigger.AfterDelay(DateTime.Seconds(1), function() -- don't fail the Objective instantly
|
|
Trigger.OnAllRemovedFromWorld(alliedOutpost, function() player.MarkFailedObjective(DefendOutpost) end)
|
|
end)
|
|
|
|
Trigger.AfterDelay(DateTime.Minutes(1) + DateTime.Seconds(40), function()
|
|
if not SuperTankDomeIsInfiltrated then
|
|
SuperTankAttack = true
|
|
Utils.Do(SuperTanks, function(tnk)
|
|
if not tnk.IsDead then
|
|
Trigger.ClearAll(tnk)
|
|
Trigger.AfterDelay(0, function()
|
|
Trigger.OnIdle(tnk, function()
|
|
if SuperTankAttack then
|
|
if tnk.Location == SuperTankMoveWaypoints[SuperTankMove].Location then
|
|
SuperTankMove = SuperTankMove + 1
|
|
if SuperTankMove == 5 then
|
|
SuperTankAttack = false
|
|
end
|
|
else
|
|
tnk.AttackMove(SuperTankMoveWaypoints[SuperTankMove].Location, 2)
|
|
end
|
|
end
|
|
end)
|
|
end)
|
|
end
|
|
end)
|
|
end
|
|
end)
|
|
end
|
|
|
|
SendAlliedUnits = function()
|
|
InitObjectives()
|
|
|
|
Camera.Position = StartEntryPoint.CenterPosition
|
|
|
|
Media.PlaySpeechNotification(player, "ReinforcementsArrived")
|
|
Utils.Do(AlliedUnits, function(table)
|
|
Trigger.AfterDelay(table.delay, function()
|
|
local units = Reinforcements.Reinforce(player, table.types, { StartEntryPoint.Location, StartMovePoint.Location }, 18)
|
|
|
|
Utils.Do(units, function(unit)
|
|
if unit.Type == "e6" then
|
|
Engineer = unit
|
|
Trigger.OnKilled(unit, LandingPossible)
|
|
end
|
|
end)
|
|
end)
|
|
end)
|
|
|
|
Trigger.AfterDelay(DateTime.Seconds(1), function() InitialUnitsArrived = true end)
|
|
end
|
|
|
|
LandingPossible = function()
|
|
if not beachReached and (USSRSpen.IsDead or Engineer.IsDead) and LstProduced < 1 then
|
|
player.MarkFailedObjective(CrossRiver)
|
|
end
|
|
end
|
|
|
|
SuperTankDomeInfiltrated = function()
|
|
SuperTankAttack = true
|
|
Utils.Do(SuperTanks, function(tnk)
|
|
tnk.Owner = friendlyMadTanks
|
|
if not tnk.IsDead then
|
|
Trigger.ClearAll(tnk)
|
|
tnk.Stop()
|
|
if tnk.Location.Y > 61 then
|
|
SuperTankHunt = 4
|
|
SuperTankHuntCounter = -1
|
|
end
|
|
Trigger.AfterDelay(0, function()
|
|
Trigger.OnIdle(tnk, function()
|
|
if SuperTankAttack then
|
|
if tnk.Location == SuperTankHuntWaypoints[SuperTankHunt].Location then
|
|
SuperTankHunt = SuperTankHunt + SuperTankHuntCounter
|
|
if SuperTankHunt == 0 or SuperTankHunt == 5 then
|
|
SuperTankAttack = false
|
|
end
|
|
else
|
|
tnk.AttackMove(SuperTankHuntWaypoints[SuperTankHunt].Location, 2)
|
|
end
|
|
else
|
|
tnk.Hunt()
|
|
end
|
|
end)
|
|
end)
|
|
end
|
|
end)
|
|
|
|
player.MarkCompletedObjective(InfiltrateRadarDome)
|
|
Trigger.AfterDelay(DateTime.Minutes(3), SuperTanksDestruction)
|
|
ticked = DateTime.Minutes(3)
|
|
|
|
Trigger.AfterDelay(DateTime.Seconds(2), function()
|
|
Media.PlaySpeechNotification(player, "ControlCenterDeactivated")
|
|
|
|
Trigger.AfterDelay(DateTime.Seconds(4), function()
|
|
Media.DisplayMessage("In 3 minutes the super tanks will self-destruct.")
|
|
Media.PlaySpeechNotification(player, "WarningThreeMinutesRemaining")
|
|
end)
|
|
end)
|
|
end
|
|
|
|
SuperTanksDestruction = function()
|
|
local badGuys = Map.ActorsInBox(Map.TopLeft, Map.BottomRight,
|
|
function(self) return self.Owner == badguy and self.HasProperty("Health") end)
|
|
|
|
Utils.Do(badGuys, function(unit)
|
|
unit.Kill()
|
|
end)
|
|
|
|
Utils.Do(SuperTanks, function(tnk)
|
|
if not tnk.IsDead then
|
|
local camera = Actor.Create("camera", true, { Owner = player, Location = tnk.Location })
|
|
Trigger.AfterDelay(DateTime.Seconds(3), camera.Destroy)
|
|
|
|
Trigger.ClearAll(tnk)
|
|
tnk.Kill()
|
|
end
|
|
end)
|
|
|
|
player.MarkCompletedObjective(DefendOutpost)
|
|
end
|
|
|
|
CreateDemitri = function()
|
|
local demitri = Actor.Create("demitri", true, { Owner = player, Location = DemitriChurchSpawnPoint.Location })
|
|
demitri.Move(DemitriTriggerAreaCenter.Location)
|
|
|
|
Media.PlaySpeechNotification(player, "TargetFreed")
|
|
EvacuateDemitri = player.AddPrimaryObjective("Evacuate Dr. Demitri with the helicopter waiting\n at our outpost.")
|
|
player.MarkCompletedObjective(FindDemitri)
|
|
|
|
local flarepos = CPos.New(DemitriLZ.Location.X, DemitriLZ.Location.Y - 1)
|
|
local demitriLZFlare = Actor.Create("flare", true, { Owner = player, Location = flarepos })
|
|
Trigger.AfterDelay(DateTime.Seconds(3), function() Media.PlaySpeechNotification(player, "SignalFlareNorth") end)
|
|
|
|
local demitriChinook = Reinforcements.ReinforceWithTransport(player, ExtractionHeli, nil, { ExtractionWaypoint, ExtractionLZ })[1]
|
|
|
|
Trigger.OnAnyKilled({ demitri, demitriChinook }, function()
|
|
player.MarkFailedObjective(EvacuateDemitri)
|
|
end)
|
|
|
|
Trigger.OnRemovedFromWorld(demitriChinook, function()
|
|
if not demitriChinook.IsDead then
|
|
Media.PlaySpeechNotification(player, "TargetRescued")
|
|
Trigger.AfterDelay(DateTime.Seconds(1), function() player.MarkCompletedObjective(EvacuateDemitri) end)
|
|
Trigger.AfterDelay(DateTime.Seconds(3), SpawnAndMoveAlliedBaseUnits)
|
|
end
|
|
end)
|
|
Trigger.OnRemovedFromWorld(demitri, function()
|
|
if not demitriChinook.IsDead and demitriChinook.HasPassengers then
|
|
demitriChinook.Move(ExtractionWaypoint)
|
|
Trigger.OnIdle(demitriChinook, demitriChinook.Destroy)
|
|
demitriLZFlare.Destroy()
|
|
end
|
|
end)
|
|
end
|
|
|
|
ticked = -1
|
|
Tick = function()
|
|
ussr.Resources = ussr.Resources - (0.01 * ussr.ResourceCapacity / 25)
|
|
|
|
if InitialUnitsArrived then -- don't fail the mission straight at the beginning
|
|
if not DemitriFound or not SuperTankDomeIsInfiltrated then
|
|
if player.HasNoRequiredUnits() then
|
|
player.MarkFailedObjective(EliminateSuperTanks)
|
|
end
|
|
end
|
|
end
|
|
|
|
if ticked > 0 then
|
|
UserInterface.SetMissionText("The super tanks self-destruct in " .. Utils.FormatTime(ticked), TimerColor)
|
|
ticked = ticked - 1
|
|
elseif ticked == 0 then
|
|
FinishTimer()
|
|
ticked = ticked - 1
|
|
end
|
|
end
|
|
|
|
FinishTimer = function()
|
|
for i = 0, 9, 1 do
|
|
local c = TimerColor
|
|
if i % 2 == 0 then
|
|
c = HSLColor.White
|
|
end
|
|
|
|
Trigger.AfterDelay(DateTime.Seconds(i), function() UserInterface.SetMissionText("The super tanks are destroyed!", c) end)
|
|
end
|
|
Trigger.AfterDelay(DateTime.Seconds(10), function() UserInterface.SetMissionText("") end)
|
|
end
|
|
|
|
SetupMission = function()
|
|
TestCamera = Actor.Create("camera" ,true , { Owner = player, Location = ProvingGroundsCameraPoint.Location })
|
|
Camera.Position = ProvingGroundsCameraPoint.CenterPosition
|
|
TimerColor = player.Color
|
|
|
|
Trigger.AfterDelay(DateTime.Seconds(12), function()
|
|
Media.PlaySpeechNotification(player, "StartGame")
|
|
Trigger.AfterDelay(DateTime.Seconds(2), SendAlliedUnits)
|
|
end)
|
|
end
|
|
|
|
InitPlayers = function()
|
|
player = Player.GetPlayer("Greece")
|
|
neutral = Player.GetPlayer("Neutral")
|
|
outpost = Player.GetPlayer("Outpost")
|
|
badguy = Player.GetPlayer("BadGuy")
|
|
ussr = Player.GetPlayer("USSR")
|
|
ukraine = Player.GetPlayer("Ukraine")
|
|
turkey = Player.GetPlayer("Turkey")
|
|
friendlyMadTanks = Player.GetPlayer("FriendlyMadTanks")
|
|
|
|
player.Cash = 0
|
|
ussr.Cash = 2000
|
|
Trigger.AfterDelay(0, function() badguy.Resources = badguy.ResourceCapacity * 0.75 end)
|
|
Trigger.OnCapture(USSROutpostSilo, function() -- getting money through capturing doesn't work
|
|
player.Cash = player.Cash + Utils.RandomInteger(1200, 1300)
|
|
end)
|
|
end
|
|
|
|
InitObjectives = function()
|
|
Trigger.OnObjectiveAdded(player, function(p, id)
|
|
Media.DisplayMessage(p.GetObjectiveDescription(id), "New " .. string.lower(p.GetObjectiveType(id)) .. " objective")
|
|
end)
|
|
|
|
EliminateSuperTanks = player.AddPrimaryObjective("Eliminate these super tanks.")
|
|
CrossRiver = player.AddPrimaryObjective("Secure transport to the mainland.")
|
|
FindOutpost = player.AddPrimaryObjective("Find our outpost and start repairs on it.")
|
|
RescueCivilians = player.AddSecondaryObjective("Evacuate all civilians from the hospital.")
|
|
BadGuyObj = badguy.AddPrimaryObjective("Deny the destruction of the super tanks.")
|
|
USSRObj = ussr.AddPrimaryObjective("Deny the destruction of the super tanks.")
|
|
UkraineObj = ukraine.AddPrimaryObjective("Survive.")
|
|
TurkeyObj = turkey.AddPrimaryObjective("Destroy.")
|
|
|
|
Trigger.OnObjectiveCompleted(player, function(p, id)
|
|
Media.DisplayMessage(p.GetObjectiveDescription(id), "Objective completed")
|
|
end)
|
|
Trigger.OnObjectiveFailed(player, function(p, id)
|
|
Media.DisplayMessage(p.GetObjectiveDescription(id), "Objective failed")
|
|
end)
|
|
|
|
Trigger.OnPlayerLost(player, function()
|
|
Media.PlaySpeechNotification(player, "MissionFailed")
|
|
|
|
ussr.MarkCompletedObjective(USSRObj)
|
|
badguy.MarkCompletedObjective(BadGuyObj)
|
|
ukraine.MarkCompletedObjective(UkraineObj)
|
|
turkey.MarkCompletedObjective(TurkeyObj)
|
|
end)
|
|
Trigger.OnPlayerWon(player, function()
|
|
Media.PlaySpeechNotification(player, "MissionAccomplished")
|
|
Media.DisplayMessage("Dr. Demitri has been extracted and the super tanks have been dealt with.")
|
|
|
|
ussr.MarkFailedObjective(USSRObj)
|
|
badguy.MarkFailedObjective(BadGuyObj)
|
|
ukraine.MarkFailedObjective(UkraineObj)
|
|
turkey.MarkFailedObjective(TurkeyObj)
|
|
end)
|
|
end
|
|
|
|
InitTriggers = function()
|
|
Trigger.OnAllKilled(SuperTanks, function()
|
|
Trigger.AfterDelay(DateTime.Seconds(3), function() player.MarkCompletedObjective(EliminateSuperTanks) end)
|
|
end)
|
|
|
|
Trigger.OnKilled(SuperTankDome, function()
|
|
if not SuperTankDomeIsInfiltrated then
|
|
player.MarkFailedObjective(InfiltrateRadarDome)
|
|
end
|
|
end)
|
|
Trigger.OnInfiltrated(SuperTankDome, function()
|
|
if not SuperTankDomeIsInfiltrated then
|
|
SuperTankDomeIsInfiltrated = true
|
|
SuperTankDomeInfiltrated()
|
|
end
|
|
end)
|
|
Trigger.OnCapture(SuperTankDome, function()
|
|
if not SuperTankDomeIsInfiltrated then
|
|
SuperTankDomeIsInfiltrated = true
|
|
SuperTankDomeInfiltrated()
|
|
end
|
|
end)
|
|
|
|
Trigger.OnKilled(UkraineBarrel, function()
|
|
if not UkraineBuilding.IsDead then UkraineBuilding.Kill() end
|
|
end)
|
|
|
|
Trigger.OnAnyKilled(USSROutpostFlameTurrets, function()
|
|
Utils.Do(ExplosiveBarrels, function(barrel)
|
|
if not barrel.IsDead then barrel.Kill() end
|
|
end)
|
|
end)
|
|
|
|
Trigger.OnKilled(DemitriChurch, function()
|
|
if not DemitriFound then
|
|
player.MarkFailedObjective(FindDemitri)
|
|
end
|
|
end)
|
|
|
|
Trigger.OnKilled(Hospital, function()
|
|
if not HospitalEvacuated then
|
|
HospitalEvacuated = true
|
|
player.MarkFailedObjective(RescueCivilians)
|
|
end
|
|
end)
|
|
|
|
beachReached = false
|
|
Trigger.OnEnteredFootprint(BeachTrigger, function(a, id)
|
|
if not beachReached and a.Owner == player then
|
|
beachReached = true
|
|
Trigger.RemoveFootprintTrigger(id)
|
|
player.MarkCompletedObjective(CrossRiver)
|
|
end
|
|
end)
|
|
|
|
Trigger.OnPlayerDiscovered(outpost, function(_, discoverer)
|
|
if not outpostReached and discoverer == player then
|
|
outpostReached = true
|
|
SetupAlliedBase()
|
|
end
|
|
end)
|
|
|
|
Trigger.OnEnteredFootprint(DemitriAreaTrigger, function(a, id)
|
|
if not DemitriFound and a.Owner == player then
|
|
DemitriFound = true
|
|
Trigger.RemoveFootprintTrigger(id)
|
|
CreateDemitri()
|
|
end
|
|
end)
|
|
|
|
Trigger.OnEnteredFootprint(HospitalAreaTrigger, function(a, id)
|
|
if not HospitalEvacuated and a.Owner == player then
|
|
HospitalEvacuated = true
|
|
Trigger.RemoveFootprintTrigger(id)
|
|
EvacuateCivilians()
|
|
end
|
|
end)
|
|
|
|
local tanksLeft = 0
|
|
Trigger.OnExitedProximityTrigger(ProvingGroundsCameraPoint.CenterPosition, WDist.New(10 * 1024), function(a, id)
|
|
if a.Type == "5tnk" then
|
|
tanksLeft = tanksLeft + 1
|
|
if tanksLeft == 3 then
|
|
if TestCamera.IsInWorld then TestCamera.Destroy() end
|
|
Trigger.RemoveProximityTrigger(id)
|
|
end
|
|
end
|
|
end)
|
|
|
|
LstProduced = 0
|
|
Trigger.OnKilled(USSRSpen, LandingPossible)
|
|
Trigger.OnProduction(USSRSpen, function(self, produced)
|
|
if produced.Type == "lst" then
|
|
LstProduced = LstProduced + 1
|
|
Trigger.OnKilled(produced, function()
|
|
LstProduced = LstProduced - 1
|
|
LandingPossible()
|
|
end)
|
|
end
|
|
end)
|
|
end
|
|
|
|
WorldLoaded = function()
|
|
|
|
InitPlayers()
|
|
InitTriggers()
|
|
|
|
SetupMission()
|
|
end
|
|
|