Add new shellmap to D2K
This commit is contained in:
Mustafa Alperen Seki
192
mods/d2k/maps/shellmap/d2k-shellmap.lua
Normal file
192
mods/d2k/maps/shellmap/d2k-shellmap.lua
Normal file
@@ -0,0 +1,192 @@
|
||||
AttackGroupSize = {8}
|
||||
AttackDelay = { DateTime.Seconds(2), DateTime.Seconds(4) }
|
||||
|
||||
IdlingUnits =
|
||||
{
|
||||
Atreides = { },
|
||||
Harkonnen = { },
|
||||
Ordos = { },
|
||||
Emperor = { }
|
||||
}
|
||||
|
||||
HoldProduction =
|
||||
{
|
||||
Atreides = false,
|
||||
Harkonnen = false,
|
||||
Ordos = false,
|
||||
Emperor = false
|
||||
}
|
||||
|
||||
IsAttacking =
|
||||
{
|
||||
Atreides = false,
|
||||
Harkonnen = false,
|
||||
Ordos = false,
|
||||
Emperor = false
|
||||
}
|
||||
|
||||
AtreidesInfantryTypes = { "light_inf", "light_inf", "light_inf", "trooper", "trooper", "grenadier", "grenadier" }
|
||||
AtreidesVehicleTypes = { "trike", "trike", "quad" }
|
||||
AtreidesTankTypes = { "combat_tank_a", "combat_tank_a", "combat_tank_a", "siege_tank" }
|
||||
AtreidesStarportTypes = { "trike.starport", "quad.starport", "siege_tank.starport", "missile_tank.starport", "combat_tank_a.starport" }
|
||||
|
||||
HarkonnenInfantryTypes = { "light_inf", "light_inf", "light_inf", "trooper", "trooper", "sardaukar" }
|
||||
HarkonnenVehicleTypes = { "trike", "quad", "quad" }
|
||||
HarkonnenTankTypes = { "combat_tank_h", "combat_tank_h", "combat_tank_h", "siege_tank" }
|
||||
HarkonnenStarportTypes = { "trike.starport", "quad.starport", "siege_tank.starport", "missile_tank.starport", "combat_tank_h.starport" }
|
||||
|
||||
OrdosInfantryTypes = { "light_inf", "light_inf", "light_inf", "trooper", "trooper" }
|
||||
OrdosVehicleTypes = { "raider", "raider", "quad", "stealth_raider" }
|
||||
OrdosTankTypes = { "combat_tank_o", "combat_tank_o", "combat_tank_o", "siege_tank" }
|
||||
OrdosStarportTypes = { "trike.starport", "quad.starport", "siege_tank.starport", "missile_tank.starport", "combat_tank_o.starport" }
|
||||
|
||||
EmperorInfantryTypes = { "light_inf", "trooper", "sardaukar", "sardaukar", "sardaukar", "sardaukar" }
|
||||
EmperorVehicleTypes = { "trike", "quad", "quad" }
|
||||
EmperorTankTypes = { "combat_tank_h", "combat_tank_h", "combat_tank_h", "siege_tank" }
|
||||
EmperorStarportTypes = { "trike.starport", "quad.starport", "siege_tank.starport", "missile_tank.starport", "combat_tank_h.starport" }
|
||||
|
||||
Upgrades = { "upgrade.barracks", "upgrade.light", "upgrade.conyard", "upgrade.heavy", "upgrade.hightech" }
|
||||
|
||||
Harvester = { "harvester" }
|
||||
|
||||
AtrCarryHarvWaypoints = { atr_harvcarry_2.Location, atr_harvcarry_1.Location }
|
||||
HarCarryHarvWaypoints = { har_harvcarry_2.Location, har_harvcarry_1.Location }
|
||||
OrdCarryHarvWaypoints = { ord_harvcarry_2.Location, ord_harvcarry_1.Location }
|
||||
EmpCarryHarvWaypoints = { emp_harvcarry_2.Location, emp_harvcarry_1.Location }
|
||||
SmgCarryHarvWaypoints = { smg_harvcarry_2.Location, smg_harvcarry_1.Location }
|
||||
|
||||
IdleHunt = function(unit) if not unit.IsDead then Trigger.OnIdle(unit, unit.Hunt) end end
|
||||
|
||||
Produce = function(house, units)
|
||||
if HoldProduction[house.Name] then
|
||||
Trigger.AfterDelay(DateTime.Minutes(1), function() Produce(house, units) end)
|
||||
return
|
||||
end
|
||||
|
||||
local delay = Utils.RandomInteger(AttackDelay[1], AttackDelay[2])
|
||||
local toBuild = { Utils.Random(units) }
|
||||
house.Build(toBuild, function(unit)
|
||||
local unitCount = 1
|
||||
if IdlingUnits[house.Name] then
|
||||
unitCount = 1 + #IdlingUnits[house.Name]
|
||||
end
|
||||
IdlingUnits[house.Name][unitCount] = unit[1]
|
||||
Trigger.AfterDelay(delay, function() Produce(house, units) end)
|
||||
|
||||
if unitCount >= (AttackGroupSize[1] * 2) then
|
||||
SendAttack(house)
|
||||
end
|
||||
end)
|
||||
end
|
||||
|
||||
SetupAttackGroup = function(house)
|
||||
local units = { }
|
||||
|
||||
for i = 0, AttackGroupSize[1], 1 do
|
||||
if #IdlingUnits[house.Name] == 0 then
|
||||
return units
|
||||
end
|
||||
|
||||
local number = Utils.RandomInteger(1, #IdlingUnits[house.Name])
|
||||
|
||||
if IdlingUnits[house.Name][number] and not IdlingUnits[house.Name][number].IsDead then
|
||||
units[i] = IdlingUnits[house.Name][number]
|
||||
table.remove(IdlingUnits[house.Name], number)
|
||||
end
|
||||
end
|
||||
|
||||
return units
|
||||
end
|
||||
|
||||
SendAttack = function(house)
|
||||
if IsAttacking[house.Name] then
|
||||
return
|
||||
end
|
||||
IsAttacking[house.Name] = true
|
||||
HoldProduction[house.Name] = true
|
||||
|
||||
local units = SetupAttackGroup(house)
|
||||
Utils.Do(units, function(unit)
|
||||
IdleHunt(unit)
|
||||
end)
|
||||
|
||||
Trigger.OnAllRemovedFromWorld(units, function()
|
||||
IsAttacking[house.Name] = false
|
||||
HoldProduction[house.Name] = false
|
||||
end)
|
||||
end
|
||||
|
||||
SendNewHarv = function(house, waypoint, count)
|
||||
local harvs = house.GetActorsByType("harvester")
|
||||
if #harvs < count then
|
||||
local harvesters = Reinforcements.ReinforceWithTransport(house, "carryall.reinforce", Harvester, waypoint, { waypoint[1] })[2]
|
||||
Utils.Do(harvesters, function(harvester)
|
||||
Trigger.OnAddedToWorld(harvester, function()
|
||||
InitializeHarvester(harvester)
|
||||
SendNewHarv(house, waypoint, count)
|
||||
end)
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
InitializeHarvester = function(harvester)
|
||||
harvester.FindResources()
|
||||
end
|
||||
|
||||
ticks = 0
|
||||
speed = 5
|
||||
|
||||
Tick = function()
|
||||
ticks = ticks + 1
|
||||
|
||||
local t = (ticks + 45) % (360 * speed) * (math.pi / 180) / speed;
|
||||
Camera.Position = viewportOrigin + WVec.New(19200 * math.sin(t), 28800 * math.cos(t), 0)
|
||||
end
|
||||
|
||||
WorldLoaded = function()
|
||||
atreides = Player.GetPlayer("Atreides")
|
||||
harkonnen = Player.GetPlayer("Harkonnen")
|
||||
ordos = Player.GetPlayer("Ordos")
|
||||
emperor = Player.GetPlayer("Emperor")
|
||||
smugglers = Player.GetPlayer("Smugglers")
|
||||
|
||||
viewportOrigin = Camera.Position
|
||||
|
||||
Utils.Do(Utils.Take(4, Upgrades), function(upgrade)
|
||||
atr_cyard.Produce(upgrade)
|
||||
har_cyard.Produce(upgrade)
|
||||
ord_cyard.Produce(upgrade)
|
||||
emp_cyard.Produce(upgrade)
|
||||
end)
|
||||
atr_cyard.Produce(Upgrades[5])
|
||||
|
||||
Trigger.AfterDelay(DateTime.Seconds(45), function()
|
||||
SendNewHarv(atreides, AtrCarryHarvWaypoints, 3)
|
||||
SendNewHarv(harkonnen, HarCarryHarvWaypoints, 3)
|
||||
SendNewHarv(ordos, OrdCarryHarvWaypoints, 3)
|
||||
SendNewHarv(emperor, EmpCarryHarvWaypoints, 3)
|
||||
SendNewHarv(smugglers, SmgCarryHarvWaypoints, 1)
|
||||
end)
|
||||
|
||||
Trigger.AfterDelay(DateTime.Seconds(1), function()
|
||||
Produce(atreides, AtreidesInfantryTypes)
|
||||
Produce(atreides, AtreidesVehicleTypes)
|
||||
Produce(atreides, AtreidesTankTypes)
|
||||
Produce(atreides, AtreidesStarportTypes)
|
||||
|
||||
Produce(harkonnen, HarkonnenInfantryTypes)
|
||||
Produce(harkonnen, HarkonnenVehicleTypes)
|
||||
Produce(harkonnen, HarkonnenTankTypes)
|
||||
Produce(harkonnen, HarkonnenStarportTypes)
|
||||
|
||||
Produce(ordos, OrdosInfantryTypes)
|
||||
Produce(ordos, OrdosVehicleTypes)
|
||||
Produce(ordos, OrdosTankTypes)
|
||||
Produce(ordos, OrdosStarportTypes)
|
||||
|
||||
Produce(emperor, EmperorInfantryTypes)
|
||||
Produce(emperor, EmperorVehicleTypes)
|
||||
Produce(emperor, EmperorTankTypes)
|
||||
Produce(emperor, EmperorStarportTypes)
|
||||
end)
|
||||
end
|
||||
Binary file not shown.
Binary file not shown.
|
Before Width: | Height: | Size: 1.8 KiB After Width: | Height: | Size: 2.1 KiB |
File diff suppressed because it is too large
Load Diff
@@ -1,3 +1,7 @@
|
||||
Player:
|
||||
-ConquestVictoryConditions:
|
||||
-HarvesterInsurance:
|
||||
|
||||
World:
|
||||
-CrateSpawner:
|
||||
-SpawnMPUnits:
|
||||
@@ -6,10 +10,113 @@ World:
|
||||
ValuePerUnit: 0
|
||||
WormManager:
|
||||
Minimum: 1
|
||||
Maximum: 1
|
||||
Maximum: 3
|
||||
MusicPlaylist:
|
||||
BackgroundMusic: options
|
||||
LuaScript:
|
||||
Scripts: d2k-shellmap.lua
|
||||
|
||||
large_gun_turret:
|
||||
Power:
|
||||
Amount: 300
|
||||
^ExistsInWorld:
|
||||
-GivesExperience:
|
||||
|
||||
^Building:
|
||||
DamageMultiplier@UNKILLABLE:
|
||||
Modifier: 0, 0
|
||||
|
||||
wall:
|
||||
DamageMultiplier@UNKILLABLE:
|
||||
Modifier: 0, 0
|
||||
|
||||
upgrade.conyard:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
upgrade.barracks:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
upgrade.light:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
upgrade.heavy:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
upgrade.hightech:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
light_inf:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
trooper:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
grenadier:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
sardaukar:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
trike:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
raider:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
stealth_raider:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
quad:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
^combat_tank:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
siege_tank:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
missile_tank:
|
||||
Valued:
|
||||
Cost: 0
|
||||
|
||||
carryall.reinforce:
|
||||
Cargo:
|
||||
MaxWeight: 10
|
||||
|
||||
barracks:
|
||||
ProvidesPrerequisite@harkonnen:
|
||||
Prerequisite: barracks.harkonnen
|
||||
Factions: harkonnen, corrino
|
||||
|
||||
light_factory:
|
||||
ProvidesPrerequisite@harkonnen:
|
||||
Prerequisite: light.harkonnen
|
||||
Factions: harkonnen, corrino
|
||||
ProvidesPrerequisite@trikes:
|
||||
Prerequisite: light.regulartrikes
|
||||
Factions: atreides, harkonnen, corrino
|
||||
|
||||
heavy_factory:
|
||||
ProvidesPrerequisite@harkonnen:
|
||||
Prerequisite: heavy.harkonnen
|
||||
Factions: harkonnen, corrino
|
||||
ProvidesPrerequisite@missiletank:
|
||||
Prerequisite: heavy.missiletank
|
||||
Factions: atreides, harkonnen, corrino
|
||||
|
||||
starport:
|
||||
ProvidesPrerequisite@harkonnen:
|
||||
Prerequisite: starport.harkonnen
|
||||
Factions: harkonnen, corrino
|
||||
|
||||
Reference in New Issue
Block a user