Initial commit: OpenRA game engine
Fork from OpenRA/OpenRA with one-click launch script (start-ra.cmd) Co-Authored-By: Claude Opus 4.5 <noreply@anthropic.com>
This commit is contained in:
let5sne.win10
209
mods/ra/maps/allies-07/allies07.lua
Normal file
209
mods/ra/maps/allies-07/allies07.lua
Normal file
@@ -0,0 +1,209 @@
|
||||
--[[
|
||||
Copyright (c) The OpenRA Developers and Contributors
|
||||
This file is part of OpenRA, which is free software. It is made
|
||||
available to you under the terms of the GNU General Public License
|
||||
as published by the Free Software Foundation, either version 3 of
|
||||
the License, or (at your option) any later version. For more
|
||||
information, see COPYING.
|
||||
]]
|
||||
DestroySubPensTriggerActivator = { Spen1, Spen2, Spen3, Spen4, Spen5 }
|
||||
ClearSubActivityTriggerActivator = { Sub1, Sub2, Sub3, Sub4, Sub5, Sub6, Sub7, Sub8, Sub9, Sub10, Sub11, Sub12, Sub13, Sub14, Sub15, Sub16, Sub17 }
|
||||
AlliedGunboats = { "pt", "pt", "pt" }
|
||||
BeachRifles = { BeachRifle1, BeachRifle2, BeachRifle3, BeachRifle4 }
|
||||
|
||||
LstReinforcements =
|
||||
{
|
||||
first =
|
||||
{
|
||||
actors = { "mcv", "jeep", "2tnk", "2tnk" },
|
||||
entryPath = { AlliedMCVEntry.Location, Unload1.Location },
|
||||
exitPath = { AlliedMCVEntry.Location }
|
||||
},
|
||||
second =
|
||||
{
|
||||
actors = { "jeep", "2tnk", "e1", "e1", "e1" },
|
||||
entryPath = { AlliedMCVEntry.Location, Unload1.Location },
|
||||
exitPath = { AlliedMCVEntry.Location }
|
||||
}
|
||||
}
|
||||
|
||||
if Difficulty == "easy" then
|
||||
ActivateAIDelay = DateTime.Minutes(1)
|
||||
else
|
||||
ActivateAIDelay = DateTime.Seconds(30)
|
||||
end
|
||||
|
||||
RaidingParty = { "3tnk", "3tnk", "v2rl", "e1", "e2"}
|
||||
BaseRaidDelay1 = { DateTime.Minutes(1), DateTime.Minutes(2) }
|
||||
BaseRaidDelay2 = { DateTime.Minutes(3), DateTime.Minutes(4) }
|
||||
RaidOnePath = { RaidOneEntry.Location, RaidOneLanding.Location }
|
||||
RaidTwoPath = { RaidTwoEntry.Location, RaidTwoLanding.Location }
|
||||
|
||||
StartTimer = false
|
||||
TimerColor = Player.GetPlayer("USSR").Color
|
||||
TimerTicks = DateTime.Minutes(10)
|
||||
Ticked = TimerTicks
|
||||
StartTimerDelay = DateTime.Minutes(5)
|
||||
|
||||
InitialAlliedReinforcements = function()
|
||||
Trigger.AfterDelay(DateTime.Seconds(1), function()
|
||||
Reinforcements.Reinforce(Greece, AlliedGunboats, { GunboatEntry.Location, waypoint42.Location }, 2)
|
||||
Media.PlaySpeechNotification(Greece, "ReinforcementsArrived")
|
||||
local reinforcement = LstReinforcements.first
|
||||
Reinforcements.ReinforceWithTransport(Greece, "lst.reinforcement", reinforcement.actors, reinforcement.entryPath, reinforcement.exitPath)
|
||||
end)
|
||||
end
|
||||
|
||||
BeachRunners = function()
|
||||
Trigger.AfterDelay(DateTime.Seconds(7), function()
|
||||
Utils.Do(BeachRifles, function(actor)
|
||||
actor.Move(BeachRifleDestination.Location)
|
||||
end)
|
||||
end)
|
||||
end
|
||||
|
||||
SecondAlliedLanding = function()
|
||||
Trigger.AfterDelay(DateTime.Minutes(1), function()
|
||||
Media.PlaySpeechNotification(Greece, "ReinforcementsArrived")
|
||||
local reinforcement = LstReinforcements.second
|
||||
Reinforcements.ReinforceWithTransport(Greece, "lst.reinforcement", reinforcement.actors, reinforcement.entryPath, reinforcement.exitPath)
|
||||
end)
|
||||
end
|
||||
|
||||
CaptureRadarDome = function()
|
||||
Trigger.OnKilled(RadarDome, function()
|
||||
Greece.MarkFailedObjective(CaptureRadarDomeObj)
|
||||
end)
|
||||
|
||||
Trigger.OnCapture(RadarDome, function()
|
||||
Greece.MarkCompletedObjective(CaptureRadarDomeObj)
|
||||
BaseRaids()
|
||||
end)
|
||||
end
|
||||
|
||||
BaseRaids = function()
|
||||
if Difficulty == "easy" then
|
||||
return
|
||||
else
|
||||
Trigger.AfterDelay(Utils.RandomInteger(BaseRaidDelay1[1], BaseRaidDelay1[2]), function()
|
||||
local raiders = Reinforcements.ReinforceWithTransport(USSR, "lst", RaidingParty, RaidOnePath, { RaidOneEntry.Location })[2]
|
||||
Utils.Do(raiders, function(a)
|
||||
Trigger.OnAddedToWorld(a, function()
|
||||
a.AttackMove(PlayerBase.Location)
|
||||
IdleHunt(a)
|
||||
end)
|
||||
end)
|
||||
end)
|
||||
|
||||
Trigger.AfterDelay(Utils.RandomInteger(BaseRaidDelay2[1], BaseRaidDelay2[2]), function()
|
||||
local raiders = Reinforcements.ReinforceWithTransport(USSR, "lst", RaidingParty, RaidTwoPath, { RaidTwoEntry.Location })[2]
|
||||
Utils.Do(raiders, function(a)
|
||||
Trigger.OnAddedToWorld(a, function()
|
||||
a.AttackMove(PlayerBase.Location)
|
||||
IdleHunt(a)
|
||||
end)
|
||||
end)
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
StartTimerFunction = function()
|
||||
if Difficulty == "hard" then
|
||||
StartTimer = true
|
||||
Media.PlaySpeechNotification(Greece, "TimerStarted")
|
||||
end
|
||||
end
|
||||
|
||||
EnemyApproaching = UserInterface.GetFluentMessage("enemy-approaching")
|
||||
FinishTimer = function()
|
||||
for i = 0, 5, 1 do
|
||||
local c = TimerColor
|
||||
if i % 2 == 0 then
|
||||
c = HSLColor.White
|
||||
end
|
||||
|
||||
Trigger.AfterDelay(DateTime.Seconds(i), function() UserInterface.SetMissionText(EnemyApproaching, c) end)
|
||||
end
|
||||
Trigger.AfterDelay(DateTime.Seconds(6), function() UserInterface.SetMissionText("") end)
|
||||
end
|
||||
|
||||
BattalionWays =
|
||||
{
|
||||
{ HardEntry1.Location, HardLanding1.Location },
|
||||
{ HardEntry2.Location, HardLanding2.Location },
|
||||
{ HardEntry3.Location, HardLanding3.Location },
|
||||
{ HardEntry4.Location, HardLanding4.Location },
|
||||
{ HardEntry5.Location, HardLanding5.Location },
|
||||
{ HardEntry6.Location, HardLanding6.Location }
|
||||
}
|
||||
|
||||
SendArmoredBattalion = function()
|
||||
Media.PlaySpeechNotification(Greece, "EnemyUnitsApproaching")
|
||||
Utils.Do(BattalionWays, function(way)
|
||||
local units = { "3tnk", "3tnk", "3tnk", "4tnk", "4tnk" }
|
||||
local armor = Reinforcements.ReinforceWithTransport(USSR, "lst", units , way, { way[2], way[1] })[2]
|
||||
Utils.Do(armor, function(a)
|
||||
Trigger.OnAddedToWorld(a, function()
|
||||
a.AttackMove(PlayerBase.Location)
|
||||
IdleHunt(a)
|
||||
end)
|
||||
end)
|
||||
end)
|
||||
end
|
||||
|
||||
DestroySubPensCompleted = function()
|
||||
Greece.MarkCompletedObjective(DestroySubPens)
|
||||
end
|
||||
|
||||
ClearSubActivityCompleted = function()
|
||||
Greece.MarkCompletedObjective(ClearSubActivity)
|
||||
end
|
||||
|
||||
Tick = function()
|
||||
USSR.Cash = 5000
|
||||
BadGuy.Cash = 500
|
||||
|
||||
if StartTimer then
|
||||
if Ticked > 0 then
|
||||
if (Ticked % DateTime.Seconds(1)) == 0 then
|
||||
Timer = UserInterface.GetFluentMessage("soviet-armored-battalion-arrives-in", { ["time"] = Utils.FormatTime(Ticked) })
|
||||
UserInterface.SetMissionText(Timer, TimerColor)
|
||||
end
|
||||
Ticked = Ticked - 1
|
||||
elseif Ticked == 0 then
|
||||
FinishTimer()
|
||||
SendArmoredBattalion()
|
||||
Ticked = Ticked - 1
|
||||
end
|
||||
end
|
||||
|
||||
if Greece.HasNoRequiredUnits() then
|
||||
USSR.MarkCompletedObjective(BeatAllies)
|
||||
end
|
||||
end
|
||||
|
||||
WorldLoaded = function()
|
||||
Greece = Player.GetPlayer("Greece")
|
||||
USSR = Player.GetPlayer("USSR")
|
||||
BadGuy = Player.GetPlayer("BadGuy")
|
||||
|
||||
Camera.Position = DefaultCameraPosition.CenterPosition
|
||||
|
||||
InitObjectives(Greece)
|
||||
CaptureRadarDomeObj = AddPrimaryObjective(Greece, "capture-radar-dome")
|
||||
DestroySubPens = AddPrimaryObjective(Greece, "destroy-all-soviet-sub-pens")
|
||||
ClearSubActivity = AddSecondaryObjective(Greece, "clear-area-all-subs")
|
||||
BeatAllies = AddPrimaryObjective(USSR, "")
|
||||
|
||||
PowerProxy = Actor.Create("powerproxy.paratroopers", false, { Owner = USSR })
|
||||
|
||||
InitialAlliedReinforcements()
|
||||
SecondAlliedLanding()
|
||||
BeachRunners()
|
||||
CaptureRadarDome()
|
||||
Trigger.AfterDelay(ActivateAIDelay, ActivateAI)
|
||||
Trigger.AfterDelay(StartTimerDelay, StartTimerFunction)
|
||||
|
||||
Trigger.OnAllKilledOrCaptured(DestroySubPensTriggerActivator, DestroySubPensCompleted)
|
||||
Trigger.OnAllRemovedFromWorld(ClearSubActivityTriggerActivator, ClearSubActivityCompleted)
|
||||
end
|
||||
Reference in New Issue
Block a user