Convert digilines to a mod (not modpack). (#32)

Digilines is probably used by most people in its entirety.

I've retained the ability to disable inventory, rtc, lightsensor and
LCD by the minetest settings "diglines_enable_rtc" etc.. If set to
"false", these components will not be loaded. It is assumed by default
that these are enabled.

In the conversion the digilines_lcd:lcd node was renamed to
digilines:lcd (same for all the other nodes). To retain backwards
compatibility I've provided aliases for each of these nodes.

1 files changed, 63 insertions, 0 deletions

diff --git a/lightsensor.lua b/lightsensor.lua
new file mode 100644
index 0000000..86a29c9
--- /dev/null
+++ b/lightsensor.lua
@@ -0,0 +1,63 @@
+local GET_COMMAND = "GET"
+
+local lsensor_nodebox =
+{
+	type = "fixed",
+	fixed = {
+		{ -8/16, -8/16, -8/16, 8/16, -7/16, 8/16 }, -- bottom slab
+
+		{ -7/16, -7/16, -7/16, -4/16, -5/16,  7/16 }, -- bonds
+		{  4/16, -7/16, -7/16,  7/16, -5/16,  7/16 },
+		{ -7/16, -7/16, -7/16,  7/16, -5/16, -4/16 },
+		{ -7/16, -7/16,  4/16,  7/16, -5/16,  7/16 },
+
+		{ -1/16, -7/16, -1/16, 1/16, -5/16, 1/16 }, -- pin thing in the middle
+	}
+}
+
+local lsensor_selbox =
+{
+	type = "fixed",
+	fixed = {{ -8/16, -8/16, -8/16, 8/16, -3/16, 8/16 }}
+}
+
+local on_digiline_receive = function (pos, node, channel, msg)
+	local setchan = minetest.get_meta(pos):get_string("channel")
+	if channel == setchan and msg == GET_COMMAND then
+		local lightval = minetest.get_node_light(pos)
+		digiline:receptor_send(pos, digiline.rules.default, channel, lightval)
+	end
+end
+
+minetest.register_alias("digilines_lightsensor:lightsensor", "digilines:lightsensor")
+minetest.register_node("digilines:lightsensor", {
+	description = "Digiline Lightsensor",
+	drawtype = "nodebox",
+	tiles = {"digilines_lightsensor.png"},
+
+	paramtype = "light",
+	groups = {dig_immediate=2},
+	selection_box = lsensor_selbox,
+	node_box = lsensor_nodebox,
+	digiline = 
+	{
+		receptor = {},
+		effector = {
+			action = on_digiline_receive
+		},
+	},
+	on_construct = function(pos)
+		local meta = minetest.get_meta(pos)
+		meta:set_string("formspec", "field[channel;Channel;${channel}]")
+	end,
+	on_receive_fields = function(pos, formname, fields, sender)
+		local name = sender:get_player_name()
+		if minetest.is_protected(pos, name) and not minetest.check_player_privs(name, {protection_bypass=true}) then
+			minetest.record_protection_violation(pos, name)
+			return
+		end
+		if (fields.channel) then
+			minetest.get_meta(pos):set_string("channel", fields.channel)
+		end
+	end,
+})