games/minimal/mods/test

--couple.lua
--defines couple entities.

--advtrains:discouple
--set into existing trains to split them when punched.
--they are attached to the wagons.
--[[fields
wagon

wagons keep their couple entity minetest-internal id inside the field discouple_id. if it refers to nowhere, they will spawn a new one if player is near
]]
local print=function(t, ...) minetest.log("action", table.concat({t, ...}, " ")) minetest.chat_send_all(table.concat({t, ...}, " ")) end


minetest.register_entity("advtrains:discouple", {
	visual="sprite",
	textures = {"advtrains_discouple.png"},
	collisionbox = {-0.5,-0.5,-0.5, 0.5,0.5,0.5},
	visual_size = {x=1, y=1},
	initial_sprite_basepos = {x=0, y=0},
	
	is_discouple=true,
	on_activate=function(self, staticdata) 
		if staticdata=="DISCOUPLE" then
			--couple entities have no right to exist further...
			self.object:remove()
			return
		end
		self.object:set_armor_groups({immortal=1})
	end,
	get_staticdata=function() return "DISCOUPLE" end,
	on_punch=function(self, player)
		--only if player owns at least one wagon next to this
		local own=player:get_player_name()
		if self.wagon.owner and self.wagon.owner~=own then
			local train=advtrains.trains[self.wagon.train_id]
			local nextwgn_id=train.trainparts[self.wagon.pos_in_trainparts-1]
			for aoi, le in pairs(minetest.luaentities) do
				if le and le.is_wagon then
					if le.unique_id==nextwgn_id then
						if le.owner and le.owner~=own then
							minetest.chat_send_player(own, "You need to own at least one neighboring wagon to destroy this couple.")
							return
						end
					end
				end