techage/logic/trafficlight.lua
2025-01-12 19:20:25 +01:00

527 lines
16 KiB
Lua

--[[
TechAge
=======
Copyright (C) 2019-2025 Joachim Stolberg
AGPL v3
See LICENSE.txt for more information
Traffic Lights
]]--
local S = techage.S
local M = minetest.get_meta
local P2S = minetest.pos_to_string
local TITLE = S("TA4 Traffic Light")
local
ConvertTo = {
off = {
["techage:ta4_trafficlight1_red"] = "techage:ta4_trafficlight1",
["techage:ta4_trafficlight1_amber"] = "techage:ta4_trafficlight1",
["techage:ta4_trafficlight1_green"] = "techage:ta4_trafficlight1",
["techage:ta4_trafficlight1B_red"] = "techage:ta4_trafficlight1B",
["techage:ta4_trafficlight1B_amber"] = "techage:ta4_trafficlight1B",
["techage:ta4_trafficlight1B_green"] = "techage:ta4_trafficlight1B",
["techage:ta4_trafficlight2_red"] = "techage:ta4_trafficlight2",
["techage:ta4_trafficlight2_amber"] = "techage:ta4_trafficlight2",
["techage:ta4_trafficlight2_green"] = "techage:ta4_trafficlight2",
["techage:ta4_trafficlight2B_red"] = "techage:ta4_trafficlight2B",
["techage:ta4_trafficlight2B_amber"] = "techage:ta4_trafficlight2B",
["techage:ta4_trafficlight2B_green"] = "techage:ta4_trafficlight2B",
},
green = {
["techage:ta4_trafficlight1_red"] = "techage:ta4_trafficlight1_green",
["techage:ta4_trafficlight1_amber"] = "techage:ta4_trafficlight1_green",
["techage:ta4_trafficlight1"] = "techage:ta4_trafficlight1_green",
["techage:ta4_trafficlight1B_red"] = "techage:ta4_trafficlight1B_green",
["techage:ta4_trafficlight1B_amber"] = "techage:ta4_trafficlight1B_green",
["techage:ta4_trafficlight1B"] = "techage:ta4_trafficlight1B_green",
["techage:ta4_trafficlight2_red"] = "techage:ta4_trafficlight2_green",
["techage:ta4_trafficlight2_amber"] = "techage:ta4_trafficlight2_green",
["techage:ta4_trafficlight2"] = "techage:ta4_trafficlight2_green",
["techage:ta4_trafficlight2B_red"] = "techage:ta4_trafficlight2B_green",
["techage:ta4_trafficlight2B_amber"] = "techage:ta4_trafficlight2B_green",
["techage:ta4_trafficlight2B"] = "techage:ta4_trafficlight2B_green",
},
amber = {
["techage:ta4_trafficlight1_red"] = "techage:ta4_trafficlight1_amber",
["techage:ta4_trafficlight1_green"] = "techage:ta4_trafficlight1_amber",
["techage:ta4_trafficlight1"] = "techage:ta4_trafficlight1_amber",
["techage:ta4_trafficlight1B_red"] = "techage:ta4_trafficlight1B_amber",
["techage:ta4_trafficlight1B_green"] = "techage:ta4_trafficlight1B_amber",
["techage:ta4_trafficlight1B"] = "techage:ta4_trafficlight1B_amber",
["techage:ta4_trafficlight2_red"] = "techage:ta4_trafficlight2_amber",
["techage:ta4_trafficlight2_green"] = "techage:ta4_trafficlight2_amber",
["techage:ta4_trafficlight2"] = "techage:ta4_trafficlight2_amber",
["techage:ta4_trafficlight2B_red"] = "techage:ta4_trafficlight2B_amber",
["techage:ta4_trafficlight2B_green"] = "techage:ta4_trafficlight2B_amber",
["techage:ta4_trafficlight2B"] = "techage:ta4_trafficlight2B_amber",
},
red = {
["techage:ta4_trafficlight1_amber"] = "techage:ta4_trafficlight1_red",
["techage:ta4_trafficlight1_green"] = "techage:ta4_trafficlight1_red",
["techage:ta4_trafficlight1"] = "techage:ta4_trafficlight1_red",
["techage:ta4_trafficlight1B_amber"] = "techage:ta4_trafficlight1B_red",
["techage:ta4_trafficlight1B_green"] = "techage:ta4_trafficlight1B_red",
["techage:ta4_trafficlight1B"] = "techage:ta4_trafficlight1B_red",
["techage:ta4_trafficlight2_amber"] = "techage:ta4_trafficlight2_red",
["techage:ta4_trafficlight2_green"] = "techage:ta4_trafficlight2_red",
["techage:ta4_trafficlight2"] = "techage:ta4_trafficlight2_red",
["techage:ta4_trafficlight2B_amber"] = "techage:ta4_trafficlight2B_red",
["techage:ta4_trafficlight2B_green"] = "techage:ta4_trafficlight2B_red",
["techage:ta4_trafficlight2B"] = "techage:ta4_trafficlight2B_red",
},
}
local function is_pole(pos)
local node = minetest.get_node(pos)
local dir = tubelib2.side_to_dir("B", node.param2)
local pos2 = tubelib2.get_pos(pos, dir)
local name = minetest.get_node(pos2).name
return name == "techage:trafficlight_connector" or name == "techage:trafficlight_pole"
end
local function switch_on(pos, color)
local node = techage.get_node_lvm(pos)
if ConvertTo[color][node.name] then
node.name = ConvertTo[color][node.name]
M(pos):set_string("state", color)
minetest.swap_node(pos, node)
end
end
local function switch_off(pos)
local node = techage.get_node_lvm(pos)
if ConvertTo["off"][node.name] then
node.name = ConvertTo["off"][node.name]
M(pos):set_string("state", "off")
minetest.swap_node(pos, node)
end
end
local function on_rightclick(pos, node, clicker)
if not minetest.is_protected(pos, clicker:get_player_name()) then
local state = M(pos):get_string("state")
if state == "off" then
switch_on(pos, "green")
else
switch_off(pos)
end
end
end
local function after_dig_node(pos, oldnode, oldmetadata)
techage.remove_node(pos, oldnode, oldmetadata)
end
minetest.register_node("techage:ta4_trafficlight1", {
description = TITLE,
tiles = {"techage_trafficlight1.png"},
drawtype = "mesh",
mesh = "techage_traffic_light.obj",
after_place_node = function(pos, placer)
local number
if is_pole(pos) then
local node = minetest.get_node(pos)
node.name = "techage:ta4_trafficlight1B"
minetest.swap_node(pos, node)
number = techage.add_node(pos, "techage:ta4_trafficlight1B")
else
number = techage.add_node(pos, "techage:ta4_trafficlight1")
end
local meta = M(pos)
meta:set_string("state", "off")
meta:set_string("infotext", TITLE .. " " .. number)
end,
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 0,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {cracky=2, crumbly=2},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
})
for _,color in ipairs({"green", "amber", "red"}) do
tiles = {"techage_trafficlight1_" .. color .. '.png'}
minetest.register_node("techage:ta4_trafficlight1_" .. color, {
description = TITLE,
tiles = tiles,
drawtype = "mesh",
mesh = "techage_traffic_light.obj",
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 10,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {crumbly=0, not_in_creative_inventory=1},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
drop = "techage:ta4_trafficlight1",
})
end
minetest.register_node("techage:ta4_trafficlight1B", {
description = TITLE,
tiles = {"techage_trafficlight1.png"},
drawtype = "mesh",
mesh = "techage_traffic_lightB.obj",
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 0,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {cracky=2, crumbly=2, not_in_creative_inventory=1},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
drop = "techage:ta4_trafficlight1",
})
for _,color in ipairs({"green", "amber", "red"}) do
tiles = {"techage_trafficlight1_" .. color .. '.png'}
minetest.register_node("techage:ta4_trafficlight1B_" .. color, {
description = TITLE,
tiles = tiles,
drawtype = "mesh",
mesh = "techage_traffic_lightB.obj",
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 10,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {crumbly=0, not_in_creative_inventory=1},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
drop = "techage:ta4_trafficlight1",
})
end
minetest.register_node("techage:ta4_trafficlight2", {
description = TITLE,
tiles = {"techage_trafficlight2.png"},
drawtype = "mesh",
mesh = "techage_traffic_light.obj",
after_place_node = function(pos, placer)
local number
if is_pole(pos) then
local node = minetest.get_node(pos)
node.name = "techage:ta4_trafficlight2B"
minetest.swap_node(pos, node)
number = techage.add_node(pos, "techage:ta4_trafficlight2B")
else
number = techage.add_node(pos, "techage:ta4_trafficlight2")
end
local meta = M(pos)
meta:set_string("state", "off")
meta:set_string("infotext", TITLE .. " " .. number)
end,
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 0,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {cracky=2, crumbly=2},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
})
for _,color in ipairs({"green", "amber", "red"}) do
tiles = {"techage_trafficlight2_" .. color .. '.png'}
minetest.register_node("techage:ta4_trafficlight2_" .. color, {
description = TITLE,
tiles = tiles,
drawtype = "mesh",
mesh = "techage_traffic_light.obj",
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 10,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {crumbly=0, not_in_creative_inventory=1},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
drop = "techage:ta4_trafficlight2",
})
end
minetest.register_node("techage:ta4_trafficlight2B", {
description = TITLE,
tiles = {"techage_trafficlight2.png"},
drawtype = "mesh",
mesh = "techage_traffic_lightB.obj",
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 0,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {cracky=2, crumbly=2, not_in_creative_inventory=1},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
drop = "techage:ta4_trafficlight1",
})
for _,color in ipairs({"green", "amber", "red"}) do
tiles = {"techage_trafficlight2_" .. color .. '.png'}
minetest.register_node("techage:ta4_trafficlight2B_" .. color, {
description = TITLE,
tiles = tiles,
drawtype = "mesh",
mesh = "techage_traffic_lightB.obj",
on_rightclick = on_rightclick,
after_dig_node = after_dig_node,
paramtype = "light",
use_texture_alpha = techage.CLIP,
light_source = 10,
sunlight_propagates = true,
paramtype2 = "facedir",
groups = {crumbly=0, not_in_creative_inventory=1},
is_ground_content = false,
sounds = default.node_sound_glass_defaults(),
drop = "techage:ta4_trafficlight2",
})
end
minetest.register_craft({
output = "techage:ta4_trafficlight1",
recipe = {
{"", "dye:black", ""},
{"", "techage:ta4_signaltower", ""},
{"", "default:steel_ingot", ""},
},
})
minetest.register_craft({
output = "techage:ta4_trafficlight2",
recipe = {
{"", "dye:orange", ""},
{"", "techage:ta4_signaltower", ""},
{"", "default:steel_ingot", ""},
},
})
techage.register_node({
"techage:ta4_trafficlight1",
"techage:ta4_trafficlight1_green",
"techage:ta4_trafficlight1_amber",
"techage:ta4_trafficlight1_red",
"techage:ta4_trafficlight2",
"techage:ta4_trafficlight2_green",
"techage:ta4_trafficlight2_amber",
"techage:ta4_trafficlight2_red",
"techage:ta4_trafficlight1B",
"techage:ta4_trafficlight1B_green",
"techage:ta4_trafficlight1B_amber",
"techage:ta4_trafficlight1B_red",
"techage:ta4_trafficlight2B",
"techage:ta4_trafficlight2B_green",
"techage:ta4_trafficlight2B_amber",
"techage:ta4_trafficlight2B_red"}, {
on_recv_message = function(pos, src, topic, payload)
if topic == "green" then
switch_on(pos, "green")
elseif topic == "amber" then
switch_on(pos, "amber")
elseif topic == "red" then
switch_on(pos, "red")
elseif topic == "off" then
switch_off(pos)
elseif topic == "state" then
local meta = minetest.get_meta(pos)
return meta:get_string("state")
end
end,
on_beduino_receive_cmnd = function(pos, src, topic, payload)
if topic == 2 then
local color = ({"green", "amber", "red"})[payload[1]]
if color then
switch_on(pos, color)
else
switch_off(pos)
end
return 0
else
return 2 -- unknown or invalid topic
end
end,
on_beduino_request_data = function(pos, src, topic, payload)
if topic == 130 then
local meta = minetest.get_meta(pos)
local color = ({off = 0, green = 1, amber = 2, red = 3})[meta:get_string("state")] or 1
return 0, {color}
else
return 2, "" -- unknown or invalid topic
end
end,
})
minetest.register_node("techage:trafficlight_pole", {
description = S("TA4 Traffic Light Pole"),
tiles = {
"techage_trafficlight_pole.png",
},
paramtype2 = "facedir", -- important!
drawtype = "nodebox",
node_box = {
type = "connected",
fixed = {{ -4/32, -16/32, -4/32, 4/32, 16/32, 4/32}},
connect_left = {{-16/32, 0/32, -3/32, 3/32, 6/32, 3/32}},
connect_right = {{ -3/32, 0/32, -3/32, 16/32, 6/32, 3/32}},
connect_back = {{ -3/32, 0/32, -3/32, 3/32, 6/32, 16/32}},
connect_front = {{ -3/32, 0/32, -16/32, 3/32, 6/32, 3/32}},
},
connects_to = {
"techage:trafficlight_arm",
"techage:trafficlight_connector",
"techage:ta4_trafficlight1",
"techage:ta4_trafficlight1B",
"techage:ta4_trafficlight1_red",
"techage:ta4_trafficlight1_amber",
"techage:ta4_trafficlight1_green",
"techage:ta4_trafficlight1B_red",
"techage:ta4_trafficlight1B_amber",
"techage:ta4_trafficlight1B_green",
"techage:ta4_trafficlight2",
"techage:ta4_trafficlight2B",
"techage:ta4_trafficlight2_red",
"techage:ta4_trafficlight2_amber",
"techage:ta4_trafficlight2_green",
"techage:ta4_trafficlight2B_red",
"techage:ta4_trafficlight2B_amber",
"techage:ta4_trafficlight2B_green",
},
paramtype = "light",
sunlight_propagates = true,
is_ground_content = false,
groups = {cracky=2, crumbly=2, choppy=2},
sounds = default.node_sound_defaults(),
})
minetest.register_node("techage:trafficlight_connector", {
description = S("TA4 Traffic Light Connector"),
tiles = {
"techage_trafficlight_pole.png",
},
paramtype2 = "facedir", -- important!
drawtype = "nodebox",
node_box = {
type = "connected",
fixed = {{ -4/32, -4/32, -4/32, 4/32, 10/32, 4/32}},
connect_left = {{-16/32, 0/32, -3/32, 3/32, 6/32, 3/32}},
connect_right = {{ -3/32, 0/32, -3/32, 16/32, 6/32, 3/32}},
connect_back = {{ -3/32, 0/32, -3/32, 3/32, 6/32, 16/32}},
connect_front = {{ -3/32, 0/32, -16/32, 3/32, 6/32, 3/32}},
},
connects_to = {
"techage:trafficlight_arm",
"techage:trafficlight_connector",
"techage:trafficlight_pole",
"techage:ta4_trafficlight1",
"techage:ta4_trafficlight1B",
"techage:ta4_trafficlight1_red",
"techage:ta4_trafficlight1_amber",
"techage:ta4_trafficlight1_green",
"techage:ta4_trafficlight1B_red",
"techage:ta4_trafficlight1B_amber",
"techage:ta4_trafficlight1B_green",
"techage:ta4_trafficlight2",
"techage:ta4_trafficlight2B",
"techage:ta4_trafficlight2_red",
"techage:ta4_trafficlight2_amber",
"techage:ta4_trafficlight2_green",
"techage:ta4_trafficlight2B_red",
"techage:ta4_trafficlight2B_amber",
"techage:ta4_trafficlight2B_green",
},
paramtype = "light",
sunlight_propagates = true,
is_ground_content = false,
groups = {cracky=2, crumbly=2, choppy=2},
sounds = default.node_sound_defaults(),
})
minetest.register_node("techage:trafficlight_arm", {
description = S("TA4 Traffic Light Arm"),
tiles = {
"techage_trafficlight_pole.png",
},
paramtype2 = "facedir", -- important!
drawtype = "nodebox",
node_box = {
type = "fixed",
fixed = {{ -3/32, 0/32, -16/32, 3/32, 6/32, 16/32}},
},
paramtype = "light",
sunlight_propagates = true,
is_ground_content = false,
groups = {cracky=2, crumbly=2, choppy=2},
sounds = default.node_sound_defaults(),
})
minetest.register_craft({
output = "techage:trafficlight_pole",
recipe = {
{"", "basic_materials:steel_bar", ""},
{"", "basic_materials:steel_bar", "dye:dark_grey"},
{"", "basic_materials:steel_bar", ""},
},
})
minetest.register_craft({
output = "techage:trafficlight_arm",
recipe = {
{"", "dye:dark_grey", ""},
{"basic_materials:steel_bar", "basic_materials:steel_bar", "basic_materials:steel_bar"},
{"", "", ""},
},
})
minetest.register_craft({
output = "techage:trafficlight_connector",
recipe = {
{"dye:dark_grey", "basic_materials:steel_bar", ""},
{"basic_materials:steel_bar", "", ""},
{"", "", ""},
},
})