Refactor mcl_doors; use multiple files

mods/ITEMS/mcl_doors/api_trapdoors.lua

@@ -0,0 +1,149 @@
+---- Trapdoor ----
+
+function mcl_doors:register_trapdoor(name, def)
+	local function update_door(pos, node) 
+		minetest.set_node(pos, node)
+	end
+
+	if def.groups == nil then
+		def.groups = {}
+	end
+	def.groups.door = 2
+
+	if not def.sound_open then
+		def.sound_open = "doors_door_open"
+	end
+	if not def.sound_close then
+		def.sound_close = "doors_door_close"
+	end
+
+	local function punch(pos)
+		local meta = minetest.get_meta(pos)
+		local state = meta:get_int("state")
+		local me = minetest.get_node(pos)
+		local tmp_node
+		local tmp_node2
+		local oben = {x=pos.x, y=pos.y+1, z=pos.z}
+		if state == 1 then
+			state = 0
+			minetest.sound_play(def.sound_close, {pos = pos, gain = 0.3, max_hear_distance = 16})
+			tmp_node = {name=name, param1=me.param1, param2=me.param2}
+		else
+			state = 1
+			minetest.sound_play(def.sound_open, {pos = pos, gain = 0.3, max_hear_distance = 16})
+			tmp_node = {name=name.."_open", param1=me.param1, param2=me.param2}
+		end
+		update_door(pos, tmp_node)
+		meta:set_int("state", state)
+	end
+
+	local on_rightclick
+	if not def.only_redstone_can_open then
+		on_rightclick = function(pos, node, clicker)
+			punch(pos)
+		end
+	end
+
+	-- Default help texts
+	local longdesc, usagehelp
+	longdesc = def._doc_items_longdesc
+	if not longdesc then
+		if def.only_redstone_can_open then
+			longdesc = "Trapdoors are floor covers which can be opened or closed. This trapdoor can only be opened or closed by redstone power."
+		else
+			longdesc = "Trapdoors are floor covers which can be opened or closed. This trapdoor can only be opened by hand and by redstone power."
+		end
+	end
+	usagehelp = def._doc_items_usagehelp
+	if not usagehelp and not def.only_redstone_can_open then
+		usagehelp = "To open or close this door, rightclick it or send a redstone signal to it."
+	end
+
+	minetest.register_node(name, {
+		description = def.description,
+		_doc_items_longdesc = longdesc,
+		_doc_items_usagehelp = usagehelp,
+		drawtype = "nodebox",
+		tiles = def.tiles,
+		inventory_image = def.inventory_image,
+		wield_image = def.wield_image,
+		is_ground_content = false,
+		paramtype = "light",
+		stack_max = 64,
+		paramtype2 = "facedir",
+		sunlight_propagates = true,
+		groups = def.groups,
+		_mcl_hardness = def._mcl_hardness,
+		sounds = def.sounds,
+		node_box = {
+			type = "fixed",
+			fixed = {
+			{-8/16, -8/16, -8/16, 8/16, -5/16, 8/16},},
+		},
+		on_construct = function(pos)
+			local meta = minetest.get_meta(pos)
+			meta:set_int("state", 0)
+		end,
+		mesecons = {effector = {
+			action_on = (function(pos, node)
+				punch(pos)
+			end),
+		}},
+		on_place = function(itemstack, placer, pointed_thing)
+			local p0 = pointed_thing.under
+			local p1 = pointed_thing.above
+			local param2 = 0
+
+			local placer_pos = placer:getpos()
+			if placer_pos then
+				param2 = minetest.dir_to_facedir(vector.subtract(p1, placer_pos))
+			end
+
+			local finepos = minetest.pointed_thing_to_face_pos(placer, pointed_thing)
+			local fpos = finepos.y % 1
+
+
+			local origname = itemstack:get_name()
+			if p0.y - 1 == p1.y or (fpos > 0 and fpos < 0.5)
+					or (fpos < -0.5 and fpos > -0.999999999) then
+				param2 = param2 + 20
+				if param2 == 21 then
+					param2 = 23
+				elseif param2 == 23 then
+					param2 = 21
+				end
+			end
+			return minetest.item_place(itemstack, placer, pointed_thing, param2)
+		end,
+		on_rightclick = on_rightclick,
+	})
+
+	minetest.register_node(name.."_open", {
+		drawtype = "nodebox",
+		tiles = def.tiles,
+		is_ground_content = false,
+		paramtype = "light",
+		paramtype2 = "facedir",
+		sunlight_propagates = true,
+		pointable = true,
+		groups = def.groups,
+		_mcl_hardness = def._mcl_hardness,
+		sounds = def.sounds,
+		drop = name,
+		node_box = {
+			type = "fixed",
+			fixed = {-0.5, -0.5, 5/16, 0.5, 0.5, 0.5}
+		},
+		on_rightclick = on_rightclick,
+		mesecons = {effector = {
+			action_on = (function(pos, node)
+				punch(pos)
+			end),
+		}},
+	})
+
+	if minetest.get_modpath("doc") then
+		doc.add_entry_alias("nodes", name, "nodes", name.."_open")
+	end
+
+end