From d0efa15b983f7a0a96e1a7abcdad713715dfeeeb Mon Sep 17 00:00:00 2001
From: Zefram <zefram@fysh.org>
Date: Mon, 18 Aug 2014 16:14:15 +0200
Subject: [PATCH] In quarry, skip past undiggable nodes
---
technic/machines/HV/forcefield.lua | 173 ++++++++++++++++++++++++++++++++++-----------------------
1 files changed, 104 insertions(+), 69 deletions(-)
diff --git a/technic/machines/HV/forcefield.lua b/technic/machines/HV/forcefield.lua
index 32a93fc..fadc9cb 100644
--- a/technic/machines/HV/forcefield.lua
+++ b/technic/machines/HV/forcefield.lua
@@ -14,9 +14,9 @@
minetest.register_craft({
output = 'technic:forcefield_emitter_off',
recipe = {
- {'default:mese', 'technic:deployer_off', 'default:mese' },
- {'technic:deployer_off', 'technic:motor', 'technic:deployer_off'},
- {'default:mese', 'technic:deployer_off', 'default:mese' },
+ {'default:mese', 'technic:motor', 'default:mese' },
+ {'technic:deployer_off', 'technic:machine_casing', 'technic:deployer_off'},
+ {'default:mese', 'technic:hv_cable0', 'default:mese' },
}
})
@@ -28,7 +28,9 @@
-- | |
-- \___/\___/
-local function update_forcefield(pos, range, active)
+local function update_forcefield(pos, meta, active)
+ local shape = meta:get_int("shape")
+ local range = meta:get_int("range")
local vm = VoxelManip()
local p1 = {x = pos.x-range, y = pos.y-range, z = pos.z-range}
local p2 = {x = pos.x+range, y = pos.y+range, z = pos.z+range}
@@ -43,8 +45,18 @@
for y=-range, range do
local vi = area:index(pos.x+(-range), pos.y+y, pos.z+z)
for x=-range, range do
- if x*x+y*y+z*z <= range * range + range and
- x*x+y*y+z*z >= (range-1) * (range-1) + (range-1) then
+ local relevant
+ if shape == 0 then
+ relevant =
+ x*x+y*y+z*z <= range * range + range and
+ x*x+y*y+z*z >= (range-1) * (range-1) + (range-1)
+ else
+ relevant =
+ x == -range or x == range or
+ y == -range or y == range or
+ z == -range or z == range
+ end
+ if relevant then
if active and data[vi] == c_air then
data[vi] = c_field
elseif not active and data[vi] == c_field then
@@ -63,50 +75,110 @@
end
local function set_forcefield_formspec(meta)
- local formspec = "size[5,1.5]"..
- "field[2,0.5;2,1;range;"..S("Range")..";"..meta:get_int("range").."]"
- if meta:get_int("enabled") == 0 then
- formspec = formspec.."button[0,1;5,1;enable;"..S("%s Disabled"):format(S("%s Forcefield Emitter"):format("HV")).."]"
+ local formspec = "size[5,2.25]"..
+ "field[0.3,0.5;2,1;range;"..S("Range")..";"..meta:get_int("range").."]"
+ -- The names for these toggle buttons are explicit about which
+ -- state they'll switch to, so that multiple presses (arising
+ -- from the ambiguity between lag and a missed press) only make
+ -- the single change that the user expects.
+ if meta:get_int("shape") == 0 then
+ formspec = formspec.."button[3,0.2;2,1;shape1;"..S("Sphere").."]"
else
- formspec = formspec.."button[0,1;5,1;disable;"..S("%s Enabled"):format(S("%s Forcefield Emitter"):format("HV")).."]"
+ formspec = formspec.."button[3,0.2;2,1;shape0;"..S("Cube").."]"
+ end
+ if meta:get_int("mesecon_mode") == 0 then
+ formspec = formspec.."button[0,1;5,1;mesecon_mode_1;"..S("Ignoring Mesecon Signal").."]"
+ else
+ formspec = formspec.."button[0,1;5,1;mesecon_mode_0;"..S("Controlled by Mesecon Signal").."]"
+ end
+ if meta:get_int("enabled") == 0 then
+ formspec = formspec.."button[0,1.75;5,1;enable;"..S("%s Disabled"):format(S("%s Forcefield Emitter"):format("HV")).."]"
+ else
+ formspec = formspec.."button[0,1.75;5,1;disable;"..S("%s Enabled"):format(S("%s Forcefield Emitter"):format("HV")).."]"
end
meta:set_string("formspec", formspec)
end
local forcefield_receive_fields = function(pos, formname, fields, sender)
local meta = minetest.get_meta(pos)
+ local range = nil
if fields.range then
- local range = tonumber(fields.range) or 0
+ range = tonumber(fields.range) or 0
-- Smallest field is 5. Anything less is asking for trouble.
-- Largest is 20. It is a matter of pratical node handling.
-- At the maximim range updating the forcefield takes about 0.2s
range = math.max(range, 5)
range = math.min(range, 20)
- if meta:get_int("range") ~= range then
- update_forcefield(pos, meta:get_int("range"), false)
- meta:set_int("range", range)
- end
+ if range == meta:get_int("range") then range = nil end
end
+ if fields.shape0 or fields.shape1 or range then
+ update_forcefield(pos, meta, false)
+ end
+ if range then meta:set_int("range", range) end
+ if fields.shape0 then meta:set_int("shape", 0) end
+ if fields.shape1 then meta:set_int("shape", 1) end
if fields.enable then meta:set_int("enabled", 1) end
if fields.disable then meta:set_int("enabled", 0) end
+ if fields.mesecon_mode_0 then meta:set_int("mesecon_mode", 0) end
+ if fields.mesecon_mode_1 then meta:set_int("mesecon_mode", 1) end
set_forcefield_formspec(meta)
end
local mesecons = {
effector = {
action_on = function(pos, node)
- minetest.get_meta(pos):set_int("enabled", 0)
+ minetest.get_meta(pos):set_int("mesecon_effect", 1)
end,
action_off = function(pos, node)
- minetest.get_meta(pos):set_int("enabled", 1)
+ minetest.get_meta(pos):set_int("mesecon_effect", 0)
end
}
}
+local run = function(pos, node, active_object_count, active_object_count_wider)
+ local meta = minetest.get_meta(pos)
+ local eu_input = meta:get_int("HV_EU_input")
+ local enabled = meta:get_int("enabled") ~= 0 and (meta:get_int("mesecon_mode") == 0 or meta:get_int("mesecon_effect") ~= 0)
+ local machine_name = S("%s Forcefield Emitter"):format("HV")
+
+ local range = meta:get_int("range")
+ local power_requirement
+ if meta:get_int("shape") == 0 then
+ power_requirement = math.floor(4 * math.pi * range * range)
+ else
+ power_requirement = 24 * range * range
+ end
+ power_requirement = power_requirement * forcefield_power_drain
+
+ if not enabled then
+ if node.name == "technic:forcefield_emitter_on" then
+ update_forcefield(pos, meta, false)
+ technic.swap_node(pos, "technic:forcefield_emitter_off")
+ meta:set_string("infotext", S("%s Disabled"):format(machine_name))
+ end
+ meta:set_int("HV_EU_demand", 0)
+ return
+ end
+ meta:set_int("HV_EU_demand", power_requirement)
+ if eu_input < power_requirement then
+ meta:set_string("infotext", S("%s Unpowered"):format(machine_name))
+ if node.name == "technic:forcefield_emitter_on" then
+ update_forcefield(pos, meta, false)
+ technic.swap_node(pos, "technic:forcefield_emitter_off")
+ end
+ elseif eu_input >= power_requirement then
+ if node.name == "technic:forcefield_emitter_off" then
+ technic.swap_node(pos, "technic:forcefield_emitter_on")
+ meta:set_string("infotext", S("%s Active"):format(machine_name))
+ end
+ update_forcefield(pos, meta, true)
+ end
+end
+
minetest.register_node("technic:forcefield_emitter_off", {
description = S("%s Forcefield Emitter"):format("HV"),
tiles = {"technic_forcefield_emitter_off.png"},
- groups = {cracky = 1},
+ groups = {cracky = 1, technic_machine = 1},
on_receive_fields = forcefield_receive_fields,
on_construct = function(pos)
local meta = minetest.get_meta(pos)
@@ -114,28 +186,32 @@
meta:set_int("HV_EU_demand", 0)
meta:set_int("range", 10)
meta:set_int("enabled", 0)
+ meta:set_int("mesecon_mode", 0)
+ meta:set_int("mesecon_effect", 0)
meta:set_string("infotext", S("%s Forcefield Emitter"):format("HV"))
set_forcefield_formspec(meta)
end,
- mesecons = mesecons
+ mesecons = mesecons,
+ technic_run = run,
})
minetest.register_node("technic:forcefield_emitter_on", {
description = S("%s Forcefield Emitter"):format("HV"),
tiles = {"technic_forcefield_emitter_on.png"},
- groups = {cracky = 1, not_in_creative_inventory=1},
+ groups = {cracky = 1, technic_machine = 1, not_in_creative_inventory=1},
drop = "technic:forcefield_emitter_off",
on_receive_fields = forcefield_receive_fields,
- on_construct = function(pos)
- local meta = minetest.get_meta(pos)
- local range = meta:get_int("range")
- meta:set_string("formspec", get_forcefield_formspec(range))
- end,
on_destruct = function(pos)
local meta = minetest.get_meta(pos)
- update_forcefield(pos, meta:get_int("range"), false)
+ update_forcefield(pos, meta, false)
end,
- mesecons = mesecons
+ mesecons = mesecons,
+ technic_run = run,
+ technic_on_disable = function (pos, node)
+ local meta = minetest.get_meta(pos)
+ update_forcefield(pos, meta, false)
+ technic.swap_node(pos, "technic:forcefield_emitter_off")
+ end,
})
minetest.register_node("technic:forcefield", {
@@ -156,52 +232,11 @@
},
}},
})
-minetest.register_abm({
- nodenames = {"technic:forcefield_emitter_on", "technic:forcefield_emitter_off"},
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider)
- local meta = minetest.get_meta(pos)
- local eu_input = meta:get_int("HV_EU_input")
- local eu_demand = meta:get_int("HV_EU_demand")
- local enabled = meta:get_int("enabled")
- local machine_name = S("%s Forcefield Emitter"):format("HV")
- -- Power off automatically if no longer connected to a switching station
- technic.switching_station_timeout_count(pos, "HV")
- local power_requirement = math.floor(
- 4 * math.pi * math.pow(meta:get_int("range"), 2)
- ) * forcefield_power_drain
-
- if meta:get_int("enabled") == 0 then
- if node.name == "technic:forcefield_emitter_on" then
- meta:set_int("HV_EU_demand", 0)
- update_forcefield(pos, meta:get_int("range"), false)
- technic.swap_node(pos, "technic:forcefield_emitter_off")
- meta:set_string("infotext", S("%s Disabled"):format(machine_name))
- return
- end
- elseif eu_input < power_requirement then
- meta:set_string("infotext", S("%s Unpowered"):format(machine_name))
- if node.name == "technic:forcefield_emitter_on" then
- update_forcefield(pos, meta:get_int("range"), false)
- technic.swap_node(pos, "technic:forcefield_emitter_off")
- end
- elseif eu_input >= power_requirement then
- if node.name == "technic:forcefield_emitter_off" then
- technic.swap_node(pos, "technic:forcefield_emitter_on")
- meta:set_string("infotext", S("%s Active"):format(machine_name))
- end
- update_forcefield(pos, meta:get_int("range"), true)
- end
- meta:set_int("HV_EU_demand", power_requirement)
- end
-})
if minetest.get_modpath("mesecons_mvps") then
mesecon:register_mvps_stopper("technic:forcefield")
end
--- TODO: Register a stopper for frames
technic.register_machine("HV", "technic:forcefield_emitter_on", technic.receiver)
technic.register_machine("HV", "technic:forcefield_emitter_off", technic.receiver)
--
Gitblit v1.8.0