1
0
mirror of https://github.com/Refactorio/RedMew.git synced 2024-12-14 10:13:13 +02:00
RedMew/map_gen/misc/nightfall.lua

163 lines
5.6 KiB
Lua
Raw Normal View History

2018-10-22 16:51:40 +02:00
--[[
Softmod rewrite of https://mods.factorio.com/mod/Nightfall written by Yehn and used under the MIT license
2018-10-23 04:47:30 +02:00
Copyright 2018 Yehn
Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
----
2018-10-22 16:51:40 +02:00
Biters in polluted areas become more aggressive at night.
TODO: Look into triggering existing unit groups to attack in unison with the groups we generate.
]]--
local Event = require 'utils.event'
--basic interval for checks
2018-10-24 03:52:52 +02:00
local timeinterval = 2689 --2700 is ~45 seconds at 60 UPS
2018-10-22 16:51:40 +02:00
--how many chunks to process in a tick
local processchunk = 5
--states
local IDLE = 1
local BASE_SEARCH = 2
local ATTACKING = 3
local bases
local chunklist
local state
local lastattack
local c_index
2018-10-24 03:53:54 +02:00
local random = math.random
2018-10-24 03:55:44 +02:00
local insert = table.insert
2018-10-24 04:11:21 +02:00
local get_pollution = game.surfaces[1].get_pollution
2018-10-24 04:12:25 +02:00
local count_entities_filtered = game.surfaces[1].count_entities_filtered
2018-10-22 16:51:40 +02:00
local function biter_attack()
2018-10-23 20:46:23 +02:00
local maxindex = #bases
local surface = game.surfaces[1]
for i=c_index, c_index+processchunk, 1 do
if i > maxindex then
-- we're done here
state = IDLE
break
end
2018-10-24 03:53:54 +02:00
if random() < surface.darkness then
2018-10-23 20:46:23 +02:00
local base = bases[i]
local group=surface.create_unit_group{position=base}
for _, biter in ipairs(surface.find_enemy_units(base, 16)) do
group.add_member(biter)
end
if #group.members==0 then
group.destroy()
else
--autonomous groups will attack polluted areas independently
group.set_autonomous()
if _DEBUG then
game.surfaces[1].print("sending biters")
end
--group.set_command{ type=defines.command.attack_area, destination=game.players[1].position, radius=200, distraction=defines.distraction.by_anything }
end
end
end
c_index = c_index + processchunk
--Reset if we're moving to the next state.
if state == IDLE then
c_index = 1
lastattack = game.tick
end
2018-10-22 16:51:40 +02:00
end
local function shuffle_table( t )
assert( t, "shuffle_table() expected a table, got nil" )
local iterations = #t
local j
for i = iterations, 2, -1 do
2018-10-24 03:53:54 +02:00
j = random(i)
2018-10-22 16:51:40 +02:00
t[i], t[j] = t[j], t[i]
end
end
local function find_bases()
2018-10-23 20:46:23 +02:00
if c_index == 1 then
bases = {}
end
local maxindex = #chunklist
for i=c_index, c_index+processchunk, 1 do
if i > maxindex then
-- we're done with the search
state = ATTACKING
break
end
2018-10-24 04:11:21 +02:00
if get_pollution(chunklist[i]) > 0.1 then
2018-10-23 20:46:23 +02:00
local chunkcoord = chunklist[i]
2018-10-24 04:12:25 +02:00
if (count_entities_filtered{area={{chunkcoord.x-16, chunkcoord.y-16},{chunkcoord.x+16, chunkcoord.y+16}},
2018-10-23 20:46:23 +02:00
type = "unit-spawner"}) > 0 then
2018-10-24 03:55:44 +02:00
insert(bases,chunkcoord)
2018-10-23 20:46:23 +02:00
end
end
end
c_index = c_index + processchunk
--Reset if we're moving to the next state.
if state == ATTACKING then
c_index = 1
shuffle_table(bases)
if _DEBUG then
game.surfaces[1].print("bases added: " .. tostring(#bases))
end
end
2018-10-22 16:51:40 +02:00
end
local function on_chunk_generated(event)
2018-10-23 20:46:23 +02:00
-- Track when new chunks are generated and add them on.
-- NOTE: The game's debug menu can show potentially hundreds of ungenerated chunks
-- It's normal for this count to lag behind chunks in the debug menu.
if event.surface == game.surfaces[1] then
local chunk = {}
local coords = event.area.left_top
chunk.x = coords.x+16
chunk.y = coords.y+16
2018-10-24 03:55:44 +02:00
insert(chunklist, chunk)
2018-10-23 20:46:23 +02:00
end
2018-10-22 16:51:40 +02:00
end
local function on_tick(event)
2018-10-23 20:46:23 +02:00
if event.tick % timeinterval == 0 then
if game.surfaces[1].darkness > 0.5
and state == IDLE
and event.tick >= lastattack + timeinterval
2018-10-24 03:53:54 +02:00
and random() > 0.5
2018-10-23 20:46:23 +02:00
then
-- Search for bases, then attack
state = BASE_SEARCH
if _DEBUG then
game.surfaces[1].print("entering attack mode") --for debug
end
end
end
if state == BASE_SEARCH then
-- This is called every tick while in this state
-- But only a small amount of work is done per call.
-- State will change when it's finished.
find_bases()
elseif state == ATTACKING then
biter_attack()
end
2018-10-22 16:51:40 +02:00
end
local function on_init()
2018-10-23 20:46:23 +02:00
bases = {}
chunklist = {}
state = IDLE
--prevents attacks from happening too often
lastattack = 0
c_index=1
2018-10-22 16:51:40 +02:00
end
Event.add(defines.events.on_chunk_generated, on_chunk_generated)
Event.add(defines.events.on_tick, on_tick)
2018-10-23 04:47:30 +02:00
Event.on_init(on_init)