techage/power/powerswitchbox_legacy.lua

--[[

	TechAge
	=======

	Copyright (C) 2019-2021 Joachim Stolberg

	AGPL v3
	See LICENSE.txt for more information
	
	TA3 Old Power Switch Box
]]--

-- for lazy programmers
local S2P = minetest.string_to_pos
local P2S = function(pos) if pos then return minetest.pos_to_string(pos) end end
local M = minetest.get_meta
local N = function(pos) return minetest.get_node(pos).name end
local S = techage.S

local Cable = techage.ElectricCable
local power = networks.power

local node_box = {
	type = "fixed",
	fixed = {
		{ -1/4, -1/4, -2/4,  1/4, 1/4, 2/4},
	},
}

-- legacy node
minetest.register_node("techage:powerswitch_box", {
	description = S("TA Power Switch Box"),
	tiles = {
		-- up, down, right, left, back, front
		'techage_electric_switch.png^[transformR90',
		'techage_electric_switch.png^[transformR90',
		'techage_electric_switch.png',
		'techage_electric_switch.png',
		'techage_electric_junction.png',
		'techage_electric_junction.png',
	},

	drawtype = "nodebox",
	node_box = node_box,
	
	after_place_node = function(pos, placer, itemstack, pointed_thing)
		if not Cable:after_place_tube(pos, placer, pointed_thing) then
			minetest.remove_node(pos)
			return true
		end
		local node = minetest.get_node(pos)
		minetest.swap_node(pos, {name = "techage:powerswitch_box_on", param2 = node.param2})
		return false
	end,
	
	after_dig_node = function(pos, oldnode, oldmetadata, digger)
		Cable:after_dig_tube(pos, oldnode, oldmetadata)
	end,
	
	paramtype = "light",
	use_texture_alpha = techage.CLIP,
	sunlight_propagates = true,
	on_rotate = screwdriver.disallow, -- important!
	paramtype2 = "facedir",
	drop = "techage:powerswitch_box_on",
	groups = {choppy=2, cracky=2, crumbly=2, techage_trowel = 1, not_in_creative_inventory = 1},
	is_ground_content = false,
	sounds = default.node_sound_wood_defaults(),
})

minetest.register_lbm({
	label = "[techage] legacy Power Switch Box",
	name = "techage:powerswitch_box",
	nodenames = {"techage:powerswitch_box"},
	run_at_every_load = true,
	action = function(pos, node)
		if M(pos):get_int("tl2_param2") == 0 then
			minetest.swap_node(pos, {name = "techage:powerswitch_box_off", param2 = node.param2})
			M(pos):set_int("networks_param2", 0)
		else
			minetest.swap_node(pos, {name = "techage:powerswitch_box_on", param2 = node.param2})
			M(pos):set_int("networks_param2",  M(pos):get_int("tl2_param2"))
		end
	end
})