more detectors

This commit is contained in:
Hendrik Langer 2021-11-29 19:32:41 +01:00
parent b8deed592f
commit 2f16838b19
6 changed files with 515 additions and 0 deletions

View File

@ -0,0 +1,179 @@
-- Awards detector
-- Detects awards of players in a certain radius
local S = minetest.get_translator(minetest.get_current_modname())
local function awards_detector_make_formspec(pos)
local meta = minetest.get_meta(pos)
if meta:get_string("radius") == "" then meta:set_string("radius", "6") end
meta:set_string("formspec", "size[9,2.5]" ..
"field[0.3, 0;9,2;scanname;".. S("Name(s) of awards to scan for")..":;${scanname}]"..
"field[0.3,1.5;2.5,2;radius;"..S("Radius").." (0-"..mesecon.setting("node_detector_distance_max", 10).."):;${radius}]"..
"field[3,1.5;4,2;digiline_channel;Digiline Channel (optional):;${digiline_channel}]"..
"button_exit[7,0.75;2,3;;Save]")
end
local function awards_detector_on_receive_fields(pos, formname, fields, sender)
if not fields.scanname or not fields.digiline_channel then return end
local name = sender:get_player_name()
if minetest.is_protected(pos, name) then
minetest.record_protection_violation(pos,name)
return
end
local meta = minetest.get_meta(pos)
meta:set_string("scanname", fields.scanname)
meta:set_string("radius", fields.radius or "6")
meta:set_string("digiline_channel", fields.digiline_channel)
awards_detector_make_formspec(pos)
end
-- returns true if player was found, false if not
local function awards_detector_scan(pos)
local meta = minetest.get_meta(pos)
local scanname = meta:get_string("scanname")
if scanname == "" then scanname = "awards_builder1" end
local radius = meta:get_int("radius")
local radius_max = mesecon.setting("node_detector_distance_max", 10)
if radius < 0 then radius = 0 end
if radius > radius_max then radius = radius_max end
local objs = minetest.get_objects_inside_radius(pos, radius)
-- abort if no scan results were found
if next(objs) == nil then return false end
local scan_for = {}
for _, str in pairs(string.split(scanname:gsub(" ", ""), ",")) do
scan_for[str] = 0
end
--[[
for _, obj in pairs(objs) do
if obj:is_player() then
local awards_list = awards.get_award_states(obj:get_player_name())
if not (#awards_list == 0) then
for _, award in pairs(awards_list) do
if award.unlocked and scan_for[award.name] ~= nil then
scan_for[award.name] = scan_for[award.name] + 1
end
end
end
end
end
for award, num_players in pairs(scan_for) do
if num_players == 0 then return false end
end
return true
--]]
for _, obj in pairs(objs) do
if obj:is_player() then
local accepted = true
for award, _ in pairs(scan_for) do
if awards.player(obj:get_player_name()).unlocked[award] == nil then
accepted = false
end
end
if accepted then return true end
end
end
return false
end
-- set player name when receiving a digiline signal on a specific channel
local awards_detector_digiline = {
effector = {
action = function(pos, node, channel, msg)
local meta = minetest.get_meta(pos)
if channel == meta:get_string("digiline_channel") then
meta:set_string("scanname", msg)
awards_detector_make_formspec(pos)
end
end,
}
}
minetest.register_node("moremesecons_detector:awards_detector_off", {
tiles = {"default_steel_block.png", "default_steel_block.png", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16)", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16)", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16)", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16)"},
paramtype = "light",
is_ground_content = false,
walkable = true,
groups = {cracky=3},
description="Awards detector",
mesecons = {receptor = {
state = mesecon.state.off,
rules = mesecon.rules.pplate
}},
on_construct = awards_detector_make_formspec,
on_receive_fields = awards_detector_on_receive_fields,
sounds = default.node_sound_stone_defaults(),
digiline = awards_detector_digiline,
on_blast = mesecon.on_blastnode,
})
minetest.register_node("moremesecons_detector:awards_detector_on", {
tiles = {"default_steel_block.png", "default_steel_block.png", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16^[invert:rg)", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16^[invert:rg)", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16^[invert:rg)", "default_steel_block.png^(awards_ui_icon.png^[resize:16x16^[invert:rg)"},
paramtype = "light",
is_ground_content = false,
walkable = true,
groups = {cracky=3,not_in_creative_inventory=1},
drop = 'moremesecons_detector:awards_detector_off',
mesecons = {receptor = {
state = mesecon.state.on,
rules = mesecon.rules.pplate
}},
on_construct = awards_detector_make_formspec,
on_receive_fields = awards_detector_on_receive_fields,
sounds = default.node_sound_stone_defaults(),
digiline = awards_detector_digiline,
on_blast = mesecon.on_blastnode,
})
minetest.register_craft({
output = 'moremesecons_detector:awards_detector_off',
recipe = {
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
{"default:steel_ingot", "mesecons_luacontroller:luacontroller0000", "group:mesecon_conductor_craftable"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
}
})
minetest.register_craft({
output = 'moremesecons_detector:awards_detector_off',
recipe = {
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
{"default:steel_ingot", "mesecons_microcontroller:microcontroller0000", "group:mesecon_conductor_craftable"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
}
})
minetest.register_abm({
nodenames = {"moremesecons_detector:awards_detector_off"},
interval = 1,
chance = 1,
action = function(pos, node)
if not awards_detector_scan(pos) then return end
node.name = "moremesecons_detector:awards_detector_on"
minetest.swap_node(pos, node)
mesecon.receptor_on(pos, mesecon.rules.pplate)
end,
})
minetest.register_abm({
nodenames = {"moremesecons_detector:awards_detector_on"},
interval = 1,
chance = 1,
action = function(pos, node)
if awards_detector_scan(pos) then return end
node.name = "moremesecons_detector:awards_detector_off"
minetest.swap_node(pos, node)
mesecon.receptor_off(pos, mesecon.rules.pplate)
end,
})

View File

@ -0,0 +1,14 @@
-- moremesecons_detector mod by h3ndrik
-- based on the code from mesecons_detector
local S = minetest.get_translator(minetest.get_current_modname())
dofile(minetest.get_modpath(minetest.get_current_modname()).."/inventory_scanner.lua")
if minetest.get_modpath("awards") then
dofile(minetest.get_modpath(minetest.get_current_modname()).."/awards_detector.lua")
end
if minetest.get_modpath("playerfactions") then
dofile(minetest.get_modpath(minetest.get_current_modname()).."/playerfactions_detector.lua")
end

View File

@ -0,0 +1,165 @@
-- Inventory scanner
-- Detects inventory items of players in a certain radius
local S = minetest.get_translator(minetest.get_current_modname())
local function inventory_scanner_make_formspec(pos)
local meta = minetest.get_meta(pos)
if meta:get_string("radius") == "" then meta:set_string("radius", "6") end
meta:set_string("formspec", "size[9,2.5]" ..
"field[0.3, 0;9,2;scanname;"..S("Name of item to scan for (empty for any)")..":;${scanname}]"..
"field[0.3,1.5;2.5,2;radius;Radius (0-"..mesecon.setting("node_detector_distance_max", 10).."):;${radius}]"..
"field[3,1.5;4,2;digiline_channel;Digiline Channel (optional):;${digiline_channel}]"..
"button_exit[7,0.75;2,3;;Save]")
end
local function inventory_scanner_on_receive_fields(pos, formname, fields, sender)
if not fields.scanname or not fields.digiline_channel then return end
local name = sender:get_player_name()
if minetest.is_protected(pos, name) then
minetest.record_protection_violation(pos,name)
return
end
local meta = minetest.get_meta(pos)
meta:set_string("scanname", fields.scanname)
meta:set_string("radius", fields.radius or "6")
meta:set_string("digiline_channel", fields.digiline_channel)
inventory_scanner_make_formspec(pos)
end
-- returns true if player was found, false if not
local function inventory_scanner_scan(pos)
local meta = minetest.get_meta(pos)
local scanname = meta:get_string("scanname")
local radius = meta:get_int("radius")
local radius_max = mesecon.setting("node_detector_distance_max", 10)
if radius < 0 then radius = 0 end
if radius > radius_max then radius = radius_max end
local objs = minetest.get_objects_inside_radius(pos, radius)
-- abort if no scan results were found
if next(objs) == nil then return false end
local scan_for = {}
for _, str in pairs(string.split(scanname:gsub(" ", ""), ",")) do
scan_for[str] = true
end
local has_items = false
for _, obj in pairs(objs) do
if obj:is_player() then
local inv = obj:get_inventory()
if not inv:is_empty("main") then
has_items = true
end
for itemname, _ in pairs(scan_for) do
if inv:contains_item("main", itemname) then
return true
end
end
end
end
-- scanname empty: search for any items
if scanname == "" and has_items then return true end
return false
end
-- set player name when receiving a digiline signal on a specific channel
local inventory_scanner_digiline = {
effector = {
action = function(pos, node, channel, msg)
local meta = minetest.get_meta(pos)
if channel == meta:get_string("digiline_channel") then
meta:set_string("scanname", msg)
inventory_scanner_make_formspec(pos)
end
end,
}
}
minetest.register_node("moremesecons_detector:inventory_scanner_off", {
tiles = {"default_steel_block.png", "default_steel_block.png", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:red:210)", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:red:210)", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:red:210)", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:red:210)"},
paramtype = "light",
is_ground_content = false,
walkable = true,
groups = {cracky=3},
description="Inventory Scanner",
mesecons = {receptor = {
state = mesecon.state.off,
rules = mesecon.rules.pplate
}},
on_construct = inventory_scanner_make_formspec,
on_receive_fields = inventory_scanner_on_receive_fields,
sounds = default.node_sound_stone_defaults(),
digiline = inventory_scanner_digiline,
on_blast = mesecon.on_blastnode,
})
minetest.register_node("moremesecons_detector:inventory_scanner_on", {
tiles = {"default_steel_block.png", "default_steel_block.png", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:green:210)", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:green:210)", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:green:210)", "default_steel_block.png^(creative_search_icon.png^[resize:16x16^[colorize:green:210)"},
paramtype = "light",
is_ground_content = false,
walkable = true,
groups = {cracky=3,not_in_creative_inventory=1},
drop = 'moremesecons_detector:inventory_scanner_off',
mesecons = {receptor = {
state = mesecon.state.on,
rules = mesecon.rules.pplate
}},
on_construct = inventory_scanner_make_formspec,
on_receive_fields = inventory_scanner_on_receive_fields,
sounds = default.node_sound_stone_defaults(),
digiline = inventory_scanner_digiline,
on_blast = mesecon.on_blastnode,
})
minetest.register_craft({
output = 'moremesecons_detector:inventory_scanner_off',
recipe = {
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
{"group:mesecon_conductor_craftable", "mesecons_luacontroller:luacontroller0000", "default:steel_ingot"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
}
})
minetest.register_craft({
output = 'moremesecons_detector:inventory_scanner_off',
recipe = {
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
{"group:mesecon_conductor_craftable", "mesecons_microcontroller:microcontroller0000", "default:steel_ingot"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
}
})
minetest.register_abm({
nodenames = {"moremesecons_detector:inventory_scanner_off"},
interval = 1,
chance = 1,
action = function(pos, node)
if not inventory_scanner_scan(pos) then return end
node.name = "moremesecons_detector:inventory_scanner_on"
minetest.swap_node(pos, node)
mesecon.receptor_on(pos, mesecon.rules.pplate)
end,
})
minetest.register_abm({
nodenames = {"moremesecons_detector:inventory_scanner_on"},
interval = 1,
chance = 1,
action = function(pos, node)
if inventory_scanner_scan(pos) then return end
node.name = "moremesecons_detector:inventory_scanner_off"
minetest.swap_node(pos, node)
mesecon.receptor_off(pos, mesecon.rules.pplate)
end,
})

View File

@ -0,0 +1,5 @@
# textdomain:moremesecons_detector
Name(s) of awards to scan for=Name(n) der benötigten Awards
Radius=Radius
Faction to scan for=Benötigte Faction
Name of item to scan for (empty for any)=Zu suchender Itemstring (Leer für alles)

View File

@ -0,0 +1,3 @@
name = moremesecons_detector
depends = mesecons, mesecons_materials, mesecons_detector
optional_depends = awards, playerfactions

View File

@ -0,0 +1,149 @@
-- Playerfactions detector
-- Detects if a players is member of a faction
local S = minetest.get_translator(minetest.get_current_modname())
local function playerfactions_detector_make_formspec(pos)
local meta = minetest.get_meta(pos)
if meta:get_string("radius") == "" then meta:set_string("radius", "6") end
meta:set_string("formspec", "size[9,2.5]" ..
"field[0.3, 0;9,2;scanname;".. S("Faction to scan for")..":;${scanname}]"..
"field[0.3,1.5;2.5,2;radius;"..S("Radius").." (0-"..mesecon.setting("node_detector_distance_max", 10).."):;${radius}]"..
"field[3,1.5;4,2;digiline_channel;Digiline Channel (optional):;${digiline_channel}]"..
"button_exit[7,0.75;2,3;;Save]")
end
local function playerfactions_detector_on_receive_fields(pos, formname, fields, sender)
if not fields.scanname or not fields.digiline_channel then return end
local name = sender:get_player_name()
if minetest.is_protected(pos, name) then
minetest.record_protection_violation(pos,name)
return
end
local meta = minetest.get_meta(pos)
meta:set_string("scanname", fields.scanname)
meta:set_string("radius", fields.radius or "6")
meta:set_string("digiline_channel", fields.digiline_channel)
playerfactions_detector_make_formspec(pos)
end
-- returns true if player was found, false if not
local function playerfactions_detector_scan(pos)
local meta = minetest.get_meta(pos)
local scanname = meta:get_string("scanname")
if scanname == "" then return false end
local radius = meta:get_int("radius")
local radius_max = mesecon.setting("node_detector_distance_max", 10)
if radius < 0 then radius = 0 end
if radius > radius_max then radius = radius_max end
local objs = minetest.get_objects_inside_radius(pos, radius)
-- abort if no scan results were found
if next(objs) == nil then return false end
for _, obj in pairs(objs) do
if obj:is_player() then
if factions.player_is_in_faction(scanname, obj:get_player_name()) then
return true
end
end
end
return false
end
-- set player name when receiving a digiline signal on a specific channel
local playerfactions_detector_digiline = {
effector = {
action = function(pos, node, channel, msg)
local meta = minetest.get_meta(pos)
if channel == meta:get_string("digiline_channel") then
meta:set_string("scanname", msg)
playerfactions_detector_make_formspec(pos)
end
end,
}
}
minetest.register_node("moremesecons_detector:playerfactions_detector_off", {
tiles = {"default_steel_block.png", "default_steel_block.png", "default_steel_block.png^(player.png^[resize:16x16^[invert:rg)", "default_steel_block.png^(player.png^[resize:16x16^[invert:rg)", "default_steel_block.png^(player.png^[resize:16x16^[invert:rg)", "default_steel_block.png^(player.png^[resize:16x16^[invert:rg)"},
paramtype = "light",
is_ground_content = false,
walkable = true,
groups = {cracky=3},
description="Playerfactions detector",
mesecons = {receptor = {
state = mesecon.state.off,
rules = mesecon.rules.pplate
}},
on_construct = playerfactions_detector_make_formspec,
on_receive_fields = playerfactions_detector_on_receive_fields,
sounds = default.node_sound_stone_defaults(),
digiline = playerfactions_detector_digiline,
on_blast = mesecon.on_blastnode,
})
minetest.register_node("moremesecons_detector:playerfactions_detector_on", {
tiles = {"default_steel_block.png", "default_steel_block.png", "default_steel_block.png^(player.png^[resize:16x16)", "default_steel_block.png^(player.png^[resize:16x16)", "default_steel_block.png^(player.png^[resize:16x16)", "default_steel_block.png^(player.png^[resize:16x16)"},
paramtype = "light",
is_ground_content = false,
walkable = true,
groups = {cracky=3,not_in_creative_inventory=1},
drop = 'moremesecons_detector:playerfactions_detector_off',
mesecons = {receptor = {
state = mesecon.state.on,
rules = mesecon.rules.pplate
}},
on_construct = playerfactions_detector_make_formspec,
on_receive_fields = playerfactions_detector_on_receive_fields,
sounds = default.node_sound_stone_defaults(),
digiline = playerfactions_detector_digiline,
on_blast = mesecon.on_blastnode,
})
minetest.register_craft({
output = 'moremesecons_detector:playerfactions_detector_off',
recipe = {
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
{"default:steel_ingot", "mesecons_luacontroller:luacontroller0000", "group:mesecon_conductor_craftable"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
}
})
minetest.register_craft({
output = 'moremesecons_detector:playerfactions_detector_off',
recipe = {
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
{"default:steel_ingot", "mesecons_microcontroller:microcontroller0000", "group:mesecon_conductor_craftable"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
}
})
minetest.register_abm({
nodenames = {"moremesecons_detector:playerfactions_detector_off"},
interval = 1,
chance = 1,
action = function(pos, node)
if not playerfactions_detector_scan(pos) then return end
node.name = "moremesecons_detector:playerfactions_detector_on"
minetest.swap_node(pos, node)
mesecon.receptor_on(pos, mesecon.rules.pplate)
end,
})
minetest.register_abm({
nodenames = {"moremesecons_detector:playerfactions_detector_on"},
interval = 1,
chance = 1,
action = function(pos, node)
if playerfactions_detector_scan(pos) then return end
node.name = "moremesecons_detector:playerfactions_detector_off"
minetest.swap_node(pos, node)
mesecon.receptor_off(pos, mesecon.rules.pplate)
end,
})