Factorio Forums

Code: Select all

require "defines"

local modName = "Radar Extension"
-- seconds between energy fill, adjust as needed
local secondsDelay = 10
-- space between small radars, adjust as needed
local distance_step = 5

-- create the glob.radars table when game is started, or mod is first added to a save
game.oninit(function()
  glob.radars = {}
end)

game.onevent(defines.event.onbuiltentity, function(event)
  local built = event.createentity
  if built.name == "your_radar" then
    -- 10 is arbitrary, adjust for effect
    local pos = built.position
    glob.radars[built.position] = {} -- empty table for small radars
    table.insert(glob.radars[built.position], built) -- main radar is always first
    
    for x = -20, 20, distance_step do
      for y = -20, 20, distance_step do
        -- if not on top of the main radar
        if (x > 0 and y > 0) then
          local small = game.createentity{name="your_small_radar", position={pos.x+x, pos.y+y}}
          table.insert(glob.radars[built.position], small)
        end
      end
    end
  end
end)

game.onevent(defines.event.ontick, function(event)
  if event.tick % (60 * secondsDelay)
    for pos, radarList in pairs(glob.radars) do
      -- if the main radar has been destroyed / mined
      if not radarList[1].valid then
        -- destroy all small radars
        for _, radar in ipairs(radarList) do
          if radar.valid then radar.destroy() end
        end
        -- remove from table
        glob.radars[pos] = nil
      else
        -- loop backwards since we might remove something from numeric table
        -- a remove while looping forward would skip an entry
        for index=#radarList, 1, -1
          if radar.valid then
            -- max out it's energy
            radar.energy = 10000000000000
          else -- should not happen, but.
            printToAll("Internal Error ("..modName.."): small radar did not exist")
            table.remove(radarList, index)
          end
        end
      end
    end
  end
end)

function printToAll(message)
  for _, player in ipairs(game.players) do
    player.print(message)
  end
end