Factorio Forums

Code: Select all

/c game.getplayer(1).selected.operable = false

Code: Select all

event.createentity.recipe = "wooden-chest"; event.createentity.operable = false

Code: Select all

require "defines"

if not glob.entityPositions then
	glob.entityPositions = {}
end

prototypes = {{"assembling-machine-1"}, {"assembling-machine-2"}, {"assembling-machine-3"}}
entities = {}

-- The frequency is (60 / tickFreqency) per second, so currently it is 10 ticks/sec
tickFreqency = 6
tickCounter = 0

game.onevent(defines.events.ontick, function(event)
	tick()
	
	tickCounter = tickCounter + 1
end)

game.onevent(defines.events.onbuiltentity, function(event)
	local entity = event.createdentity
	
	if not entity then
		return
	end
	
	addEntity(entity)
end)

function tick()
	if tickCounter % tickFreqency == 0 then
		
		--Load all entities on map load
		if tickCounter == 0 then
			local allEntities =  {}
			local aabb = {{-10000, -10000}, {10000, 10000}}
			
			for i=1,#prototypes do
				appendTable(allEntities, game.findentitiesfiltered(aabb, prototypes[i].name))
			end
		end
		
		--Check the assembling machines
		for i=1,#entities do
			local wrapper = entities[i]
			local entity = wrapper.entity
			
			-- This is the most important bit. This makes the machines unoperable
			if entity.recipe then
				entity.operable = false
				removeEntity(entity.position)
			end
		end
	end
end

function removeEntity(position)
	if not position then
		return false
	end
	
	--Remove the entity from the global list
	for i=1,#glob.entityPositions do
		local p = glob.entityPositions[i]
		
		if position.x == p.x and position.y == p.y then
			table.remove(glob.entityPositions, i)
			break
		end
	end
	
	--Remove the entity from the 'local'/unpersistent list
	for i=1,#entities do
		local p = entities[i].postition
		
		if position.x == p.x and position.y == p.y then
			table.remove(entities, i)
			break
		end
	end
end

-- Checks whether the entity is in the protoype table.
-- If it is, it adds the entity to a list.
function addEntity(entity)
	if not entity then
		return false
	end
	
	local isValid = false
	
	for i=1,#prototypes do
		if entity.name == prototypes[i].name then
			isValid = true
			break
		end
	end
	
	if not isValid then
		return false
	end
	
	--Create a wrapper for the entity
	local wrapper = {}
	wrapper.entity = entity
	table.insert(entities, entity)
	
	--This is important! Since control.lua isnt persistent between game loads.
	local position = {}
	position.x = entity.position.x
	position.y = entity.position.y
	table.insert(glob.entityPositions, position)
	
	return true
end

-- Adds all values from 'table2' to 'table1'.
-- If one table is nil the other is returned.
function appendTable(table1, table2)
	if table1 == nil then
		return table2
	elseif table2 == nil then
		return table1
	end
	
	local table1Size = #table1
	
	for i=1,#table2 do
		table1[table1Size + i + 1] = table2[i]
	end
	
	return table1
end