Factorio Forums

Code: Select all

[entity-name]
corpse-chest = Lijk

Code: Select all

[entity-name]
corpse-chest = Труп

Code: Select all

require "defines"

-- Cycles through each item slot in each inventory (main, quick bar, armor, tool, guns, ammo) and moves any found items to the chest. Also checks player's cursor slot so any items in-hand will also be transferred.
function copyPlayerItems(player, dest)
	local currStackIndex = 1
	local currStackContent
	local cursorStackContent = nil
	local sInv -- source inventory
	local dInv = dest.get_inventory(1) -- destination inventory
	for inv = 1, 6 do
		sInv = player.get_inventory(inv)
		for index = 1, #sInv do
			if sInv[index].valid_for_read then
				currStackContent = sInv[index]
				if dInv[currStackIndex].can_set_stack(currStackContent) then
					dInv[currStackIndex].set_stack(currStackContent)
					currStackIndex = currStackIndex + 1
				end
			end
		end
	end
	cursorStackContent = player.cursor_stack
	if dInv[currStackIndex].can_set_stack(cursorStackContent) then
		dInv[currStackIndex].set_stack(cursorStackContent)
	end
end

-- To track all the corpse chests in the world.
local corpseArray = {}

-- Hook into the "died" event. If it's a player, do our thing.
script.on_event(defines.events.on_entity_died, function(event)
	if event.entity.name == "player" then
		local player = event.entity
		local targetPos = player.surface.find_non_colliding_position("corpse-chest", player.position, 10, 1)
		
		if targetPos == nil then
			entity.print("Corpse-Chest mod error: Nowhere to spawn corpse.")
			return
		end
		-- Create the corpse-chest
		local cChest = player.surface.create_entity({
			name = "corpse-chest", 
			position = targetPos, 
			force = game.forces.neutral
		})
		
		if cChest == nil then
			entity.print("Corpse-Chest mod error: Corpse spawn - Failed.")
			return
		end
		
		-- Move each of the player's inventories over to the corpse-chest
		copyPlayerItems(player, cChest)
		
		-- When will the chest decay?
		local expireTick = game.tick + 18000
		
		table.insert(corpseArray, { dies=expireTick, position=cChest.position, corpse=cChest })
		
	end
end)

-- Hook into the on_tick to check if chest should decay.
script.on_event(defines.events.on_tick, function(event)
	local corpseArray = remote.call("CorpseChest", "get_corpses")
	for index, object in pairs(corpseArray) do
		if game.tick > object["dies"] then
			game.get_surface(1).create_entity({name="stone", position=object["position"], force=game.forces.player}).destroy()
			table.remove(corpseArray, index)
		end
	end
end)

interface = {
	get_corpses = function() return corpseArray end
}

remote.add_interface("CorpseChest", interface)