mirror of
https://github.com/GreenXenith/mesecons_wireless.git
synced 2024-08-20 13:04:12 +02:00
443 lines
13 KiB
Lua
443 lines
13 KiB
Lua
|
--[[
|
||
|
|
||
|
The MIT License (MIT)
|
||
|
|
||
|
Copyright (C) 2019 GreenXenith/GreenDimond
|
||
|
|
||
|
Permission is hereby granted, free of charge, to any person obtaining a copy
|
||
|
of this software and associated documentation files (the "Software"), to
|
||
|
deal in the Software without restriction, including without limitation the
|
||
|
rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
||
|
sell copies of the Software, and to permit persons to whom the Software is
|
||
|
furnished to do so, subject to the following conditions:
|
||
|
|
||
|
The above copyright notice and this permission notice shall be included in
|
||
|
all copies or substantial portions of the Software.
|
||
|
|
||
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||
|
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||
|
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||
|
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
|
||
|
IN THE SOFTWARE.
|
||
|
|
||
|
]]--
|
||
|
|
||
|
local storage = minetest.get_mod_storage()
|
||
|
local range_max = 20
|
||
|
local connection_max = 100
|
||
|
local rules = {
|
||
|
{x = 1, y = 0, z = 0},
|
||
|
{x =-1, y = 0, z = 0},
|
||
|
{x = 0, y = 1, z = 0},
|
||
|
{x = 0, y =-1, z = 0},
|
||
|
{x = 0, y = 0, z = 1},
|
||
|
{x = 0, y = 0, z =-1},
|
||
|
}
|
||
|
|
||
|
local function hash(pos)
|
||
|
return minetest.hash_node_position(pos)
|
||
|
end
|
||
|
|
||
|
local function dehash(hash)
|
||
|
return minetest.get_position_from_hash(hash)
|
||
|
end
|
||
|
|
||
|
-- Run function on each position in channel
|
||
|
local function do_for_each(owner, channel, origin, func)
|
||
|
-- Put data in table
|
||
|
local data = minetest.deserialize(storage:get_string(owner..":"..channel))
|
||
|
if not data then
|
||
|
return
|
||
|
end
|
||
|
-- Get range
|
||
|
local range = minetest.get_meta(origin):get_int("range")
|
||
|
for pos in pairs(data) do
|
||
|
pos = dehash(pos)
|
||
|
if pos ~= origin then
|
||
|
local dist = vector.distance(origin, pos)
|
||
|
if dist <= range then
|
||
|
func(pos, dist)
|
||
|
end
|
||
|
end
|
||
|
end
|
||
|
end
|
||
|
|
||
|
-- Modify storage as table
|
||
|
local function storage_table(owner, channel, func)
|
||
|
local t = minetest.deserialize(storage:get_string(owner..":"..channel)) or {}
|
||
|
local set = func(t)
|
||
|
if type(set) == "table" then
|
||
|
set = minetest.serialize(set)
|
||
|
end
|
||
|
storage:set_string(owner..":"..channel, set)
|
||
|
end
|
||
|
|
||
|
-- Limit digiline actions to 20 per second
|
||
|
local function overheat(pos)
|
||
|
local actions = minetest.get_meta(pos):get_int("actions")
|
||
|
if actions >= 20 then
|
||
|
local node = minetest.get_node(pos)
|
||
|
-- Burnout
|
||
|
if node.param2 ~= 192 then
|
||
|
minetest.swap_node(pos, {name = node.name, param2 = 192})
|
||
|
end
|
||
|
return true, actions
|
||
|
end
|
||
|
return false, actions
|
||
|
end
|
||
|
|
||
|
-- Signal Transmitter
|
||
|
mesecon.register_node("mesecons_wireless:transmitter", {
|
||
|
description = "Wireless Mesecon Transmitter",
|
||
|
overlay_tiles = {
|
||
|
"",
|
||
|
"",
|
||
|
{name = "mesecons_wireless_transmitter_signal.png"},
|
||
|
},
|
||
|
paramtype2 = "color",
|
||
|
palette = "mesecons_wireless_signal_palette.png",
|
||
|
digiline = {
|
||
|
effector = {
|
||
|
action = function(pos, node, dchannel, msg)
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local owner = meta:get_string("owner")
|
||
|
local channel = meta:get_string("channel")
|
||
|
local overheated, actions = overheat(pos)
|
||
|
if overheated then
|
||
|
return
|
||
|
end
|
||
|
-- Signal indicator
|
||
|
if node.param2 ~= 128 then
|
||
|
minetest.swap_node(pos, {name = node.name, param2 = 128})
|
||
|
end
|
||
|
meta:set_int("actions", actions + 1)
|
||
|
do_for_each(owner, channel, pos, function(each)
|
||
|
digiline:receptor_send(each, digiline.rules.default, dchannel, msg)
|
||
|
local enode = minetest.get_node(each)
|
||
|
minetest.swap_node(each, {name = enode.name, param2 = 128})
|
||
|
end)
|
||
|
end
|
||
|
}
|
||
|
},
|
||
|
on_timer = function(pos)
|
||
|
minetest.get_meta(pos):set_int("actions", 0)
|
||
|
local node = minetest.get_node(pos)
|
||
|
if node.param2 ~= minetest.registered_nodes[node.name].place_param2 then
|
||
|
minetest.swap_node(pos, {name = node.name, param2 = minetest.registered_nodes[node.name].place_param2})
|
||
|
end
|
||
|
minetest.get_node_timer(pos):set(1, 0)
|
||
|
end,
|
||
|
sounds = default.node_sound_metal_defaults(),
|
||
|
on_construct = function(pos)
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
meta:set_int("range", 15)
|
||
|
meta:set_string("formspec", "field[channel;Channel;${channel}]field[range;Range (1-"..range_max..");${range}")
|
||
|
minetest.get_node_timer(pos):set(1, 0)
|
||
|
end,
|
||
|
on_destruct = function(pos)
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local owner = meta:get_string("owner")
|
||
|
local channel = meta:get_string("channel")
|
||
|
if channel and channel ~= "" then
|
||
|
do_for_each(owner, channel, pos, function(each)
|
||
|
minetest.swap_node(each, {name = "mesecons_wireless:receiver_off", param2 = 0})
|
||
|
mesecon.receptor_off(each, rules)
|
||
|
end)
|
||
|
end
|
||
|
end,
|
||
|
after_place_node = function(pos, placer)
|
||
|
minetest.get_meta(pos):set_string("owner", placer:get_player_name())
|
||
|
end,
|
||
|
on_receive_fields = function(pos, _, fields, player)
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local setter = player:get_player_name()
|
||
|
local owner = meta:get_string("owner")
|
||
|
local channel = meta:get_string("channel")
|
||
|
|
||
|
if setter == owner then
|
||
|
if fields.channel then
|
||
|
meta:set_string("channel", fields.channel)
|
||
|
end
|
||
|
local newrange
|
||
|
if fields.range then
|
||
|
newrange = tonumber(fields.range)
|
||
|
end
|
||
|
if newrange and newrange >= 1 and newrange <= range_max then
|
||
|
local current = meta:get_int("range")
|
||
|
if minetest.get_node(pos).name ~= "mesecons_wireless:transmitter_on" then
|
||
|
return
|
||
|
end
|
||
|
if current and current ~= 0 then
|
||
|
if current > newrange then
|
||
|
do_for_each(owner, channel, pos, function(each, dist)
|
||
|
if dist > newrange then
|
||
|
minetest.swap_node(each, {name = "mesecons_wireless:receiver_off", param2 = 0})
|
||
|
mesecon.receptor_off(each, rules)
|
||
|
end
|
||
|
end)
|
||
|
end
|
||
|
end
|
||
|
meta:set_int("range", newrange)
|
||
|
do_for_each(owner, channel, pos, function(each)
|
||
|
local name = minetest.get_node(each).name
|
||
|
if name == "mesecons_wireless:receiver_on" then
|
||
|
return
|
||
|
end
|
||
|
minetest.swap_node(each, {name = "mesecons_wireless:receiver_on", param2 = 64})
|
||
|
mesecon.receptor_on(each, rules)
|
||
|
end)
|
||
|
end
|
||
|
end
|
||
|
end,
|
||
|
},
|
||
|
{
|
||
|
tiles = {
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_transmitter_off.png", color = "white"}
|
||
|
},
|
||
|
color = 0,
|
||
|
place_param2 = 0,
|
||
|
groups = {cracky=1},
|
||
|
mesecons = {
|
||
|
effector = {
|
||
|
action_on = function(pos)
|
||
|
local overheated, actions = overheat(pos)
|
||
|
if overheated then
|
||
|
return
|
||
|
end
|
||
|
minetest.swap_node(pos, {name = "mesecons_wireless:transmitter_on", param2 = 64})
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local owner = meta:get_string("owner")
|
||
|
local channel = meta:get_string("channel")
|
||
|
meta:set_int("actions", actions + 5)
|
||
|
do_for_each(owner, channel, pos, function(each)
|
||
|
minetest.swap_node(each, {name = "mesecons_wireless:receiver_on", param2 = 64})
|
||
|
mesecon.receptor_on(each, rules)
|
||
|
end)
|
||
|
end
|
||
|
},
|
||
|
},
|
||
|
},
|
||
|
{
|
||
|
tiles = {
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_transmitter_on.png", color = "white"}
|
||
|
},
|
||
|
color = 64,
|
||
|
place_param2 = 64,
|
||
|
paramtype = "light",
|
||
|
light_source = 2,
|
||
|
groups = {cracky=1, not_in_creative_inventory=1},
|
||
|
mesecons = {
|
||
|
effector = {
|
||
|
action_off = function(pos)
|
||
|
minetest.swap_node(pos, {name = "mesecons_wireless:transmitter_off", param2 = 0})
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local owner = meta:get_string("owner")
|
||
|
local channel = meta:get_string("channel")
|
||
|
do_for_each(owner, channel, pos, function(each)
|
||
|
minetest.swap_node(each, {name = "mesecons_wireless:receiver_off", param2 = 0})
|
||
|
mesecon.receptor_off(each, rules)
|
||
|
end)
|
||
|
end
|
||
|
},
|
||
|
},
|
||
|
}
|
||
|
)
|
||
|
|
||
|
mesecon.register_node("mesecons_wireless:receiver", {
|
||
|
description = "Wireless Mesecon Receiver",
|
||
|
overlay_tiles = {
|
||
|
"",
|
||
|
"",
|
||
|
{name = "mesecons_wireless_receiver_signal.png"},
|
||
|
},
|
||
|
paramtype2 = "color",
|
||
|
palette = "mesecons_wireless_signal_palette.png",
|
||
|
digiline = {
|
||
|
receptor = {},
|
||
|
},
|
||
|
sounds = default.node_sound_metal_defaults(),
|
||
|
on_timer = function(pos)
|
||
|
local node = minetest.get_node(pos)
|
||
|
if node.param2 ~= minetest.registered_nodes[node.name].place_param2 then
|
||
|
minetest.swap_node(pos, {name = node.name, param2 = minetest.registered_nodes[node.name].place_param2})
|
||
|
end
|
||
|
minetest.get_node_timer(pos):set(1, 0)
|
||
|
end,
|
||
|
on_construct = function(pos)
|
||
|
minetest.get_meta(pos):set_string("formspec", "field[channel;Channel;${channel}]")
|
||
|
minetest.get_node_timer(pos):set(1, 0)
|
||
|
end,
|
||
|
on_destruct = function(pos)
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local owner = meta:get_string("owner")
|
||
|
local channel = meta:get_string("channel")
|
||
|
if channel and channel ~= "" then
|
||
|
storage_table(owner, channel, function(data)
|
||
|
data[hash(pos)] = nil
|
||
|
if not next(data) then
|
||
|
return ""
|
||
|
end
|
||
|
return data
|
||
|
end)
|
||
|
end
|
||
|
end,
|
||
|
after_place_node = function(pos, placer)
|
||
|
minetest.get_meta(pos):set_string("owner", placer:get_player_name())
|
||
|
end,
|
||
|
on_receive_fields = function(pos, _, fields, player)
|
||
|
local meta = minetest.get_meta(pos)
|
||
|
local setter = player:get_player_name()
|
||
|
local owner = meta:get_string("owner")
|
||
|
|
||
|
if setter == owner then
|
||
|
if not fields.channel then
|
||
|
return
|
||
|
end
|
||
|
local t = minetest.deserialize(storage:get_string(owner..":"..fields.channel))
|
||
|
if t then
|
||
|
local connections = 0
|
||
|
for c in pairs(t) do
|
||
|
connections = connections + 1
|
||
|
end
|
||
|
if connections >= connection_max then
|
||
|
return
|
||
|
end
|
||
|
end
|
||
|
local current = meta:get_string("channel")
|
||
|
if current and current ~= "" and current ~= fields.channel then
|
||
|
storage_table(owner, current, function(data)
|
||
|
data[hash(pos)] = nil
|
||
|
if not next(data) then
|
||
|
return ""
|
||
|
end
|
||
|
return data
|
||
|
end)
|
||
|
end
|
||
|
meta:set_string("channel", fields.channel)
|
||
|
if fields.channel == "" then
|
||
|
return
|
||
|
end
|
||
|
storage_table(owner, fields.channel, function(data)
|
||
|
data[hash(pos)] = 0
|
||
|
return data
|
||
|
end)
|
||
|
end
|
||
|
end,
|
||
|
},
|
||
|
{
|
||
|
tiles = {
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_receiver_off.png", color = "white"},
|
||
|
},
|
||
|
color = 0,
|
||
|
place_param2 = 0,
|
||
|
groups = {cracky=1},
|
||
|
mesecons = {
|
||
|
receptor = {
|
||
|
state = mesecon.state.off,
|
||
|
rules = rules
|
||
|
}
|
||
|
},
|
||
|
},
|
||
|
{
|
||
|
tiles = {
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_metal.png", color = "white"},
|
||
|
{name = "mesecons_wireless_receiver_on.png", color = "white"},
|
||
|
},
|
||
|
color = 64,
|
||
|
place_param2 = 64,
|
||
|
paramtype = "light",
|
||
|
light_source = 2,
|
||
|
groups = {cracky=1, not_in_creative_inventory=1},
|
||
|
mesecons = {
|
||
|
receptor = {
|
||
|
state = mesecon.state.on,
|
||
|
rules = rules
|
||
|
}
|
||
|
},
|
||
|
}
|
||
|
)
|
||
|
|
||
|
minetest.register_lbm({
|
||
|
label = "Refresh Wireless Transmitters",
|
||
|
name = "mesecons_wireless:clear_actions",
|
||
|
nodenames = {
|
||
|
"mesecons_wireless:transmitter_on",
|
||
|
"mesecons_wireless:transmitter_off",
|
||
|
"mesecons_wireless:receiver_on",
|
||
|
"mesecons_wireless:receiver_off",
|
||
|
},
|
||
|
run_at_every_load = true,
|
||
|
action = function(pos)
|
||
|
minetest.get_node_timer(pos):set(1, 0)
|
||
|
end,
|
||
|
})
|
||
|
|
||
|
minetest.register_craftitem("mesecons_wireless:antenna", {
|
||
|
description = "Antenna",
|
||
|
inventory_image = "mesecons_wireless_antenna.png",
|
||
|
})
|
||
|
|
||
|
minetest.register_craftitem("mesecons_wireless:dish", {
|
||
|
description = "Radio Dish",
|
||
|
inventory_image = "mesecons_wireless_dish.png",
|
||
|
})
|
||
|
|
||
|
minetest.register_craft({
|
||
|
output = "mesecons_wireless:antenna",
|
||
|
recipe = {
|
||
|
{"default:steel_ingot"},
|
||
|
{"default:steel_ingot"},
|
||
|
{"mesecons_materials:fiber"}
|
||
|
}
|
||
|
})
|
||
|
|
||
|
minetest.register_craft({
|
||
|
output = "mesecons_wireless:dish",
|
||
|
recipe = {
|
||
|
{"", "", "default:steel_ingot"},
|
||
|
{"", "default:steel_ingot", "default:steel_ingot"},
|
||
|
{"default:steel_ingot", "default:steel_ingot", "mesecons_materials:fiber"}
|
||
|
}
|
||
|
})
|
||
|
|
||
|
minetest.register_craft({
|
||
|
output = "mesecons_wireless:dish",
|
||
|
recipe = {
|
||
|
{"default:steel_ingot", "", ""},
|
||
|
{"default:steel_ingot", "default:steel_ingot", ""},
|
||
|
{"mesecons_materials:fiber", "default:steel_ingot", "default:steel_ingot"}
|
||
|
}
|
||
|
})
|
||
|
|
||
|
local wire = "mesecons:wire_00000000_off"
|
||
|
if minetest.get_modpath("digilines") then
|
||
|
wire = "digilines:wire_std_00000000"
|
||
|
end
|
||
|
|
||
|
minetest.register_craft({
|
||
|
output = "mesecons_wireless:transmitter_off",
|
||
|
recipe = {
|
||
|
{"", "mesecons_wireless:antenna", ""},
|
||
|
{"default:steel_ingot", "default:diamond", "default:steel_ingot"},
|
||
|
{"mesecons:wire_00000000_off", "mesecons_luacontroller:luacontroller0000", wire}
|
||
|
}
|
||
|
})
|
||
|
|
||
|
minetest.register_craft({
|
||
|
output = "mesecons_wireless:receiver_off",
|
||
|
recipe = {
|
||
|
{"", "mesecons_wireless:dish", ""},
|
||
|
{"default:steel_ingot", "default:diamond", "default:steel_ingot"},
|
||
|
{"mesecons:wire_00000000_off", "mesecons_luacontroller:luacontroller0000", wire}
|
||
|
}
|
||
|
})
|