commit | author | age
|
ee0765
|
1 |
-- Forcefield mod by ShadowNinja |
S |
2 |
-- Modified by kpoppel |
|
3 |
-- |
|
4 |
-- Forcefields are powerful barriers but they consume huge amounts of power. |
|
5 |
-- Forcefield Generator is a HV machine. |
|
6 |
|
|
7 |
-- How expensive is the generator? |
|
8 |
-- Leaves room for upgrades lowering the power drain? |
|
9 |
local forcefield_power_drain = 10 |
|
10 |
local forcefield_step_interval = 1 |
|
11 |
|
be2f30
|
12 |
local S = technic.getter |
S |
13 |
|
ee0765
|
14 |
minetest.register_craft({ |
S |
15 |
output = 'technic:forcefield_emitter_off', |
|
16 |
recipe = { |
e8a5a6
|
17 |
{'default:mese', 'technic:motor', 'default:mese' }, |
Z |
18 |
{'technic:deployer_off', 'technic:machine_casing', 'technic:deployer_off'}, |
68ea0a
|
19 |
{'default:mese', 'technic:hv_cable0', 'default:mese' }, |
ee0765
|
20 |
} |
S |
21 |
}) |
|
22 |
|
|
23 |
|
|
24 |
-- Idea: Let forcefields have different colors by upgrade slot. |
|
25 |
-- Idea: Let forcefields add up by detecting if one hits another. |
|
26 |
-- ___ __ |
|
27 |
-- / \/ \ |
|
28 |
-- | | |
|
29 |
-- \___/\___/ |
|
30 |
|
|
31 |
local function update_forcefield(pos, range, active) |
|
32 |
local vm = VoxelManip() |
|
33 |
local p1 = {x = pos.x-range, y = pos.y-range, z = pos.z-range} |
|
34 |
local p2 = {x = pos.x+range, y = pos.y+range, z = pos.z+range} |
|
35 |
local MinEdge, MaxEdge = vm:read_from_map(p1, p2) |
|
36 |
local area = VoxelArea:new({MinEdge = MinEdge, MaxEdge = MaxEdge}) |
|
37 |
local data = vm:get_data() |
|
38 |
|
|
39 |
local c_air = minetest.get_content_id("air") |
|
40 |
local c_field = minetest.get_content_id("technic:forcefield") |
|
41 |
|
|
42 |
for z=-range, range do |
|
43 |
for y=-range, range do |
|
44 |
local vi = area:index(pos.x+(-range), pos.y+y, pos.z+z) |
|
45 |
for x=-range, range do |
|
46 |
if x*x+y*y+z*z <= range * range + range and |
|
47 |
x*x+y*y+z*z >= (range-1) * (range-1) + (range-1) then |
|
48 |
if active and data[vi] == c_air then |
|
49 |
data[vi] = c_field |
|
50 |
elseif not active and data[vi] == c_field then |
|
51 |
data[vi] = c_air |
|
52 |
end |
|
53 |
end |
|
54 |
vi = vi + 1 |
|
55 |
end |
|
56 |
end |
|
57 |
end |
|
58 |
|
|
59 |
vm:set_data(data) |
|
60 |
vm:update_liquids() |
|
61 |
vm:write_to_map() |
|
62 |
vm:update_map() |
|
63 |
end |
|
64 |
|
2d6f34
|
65 |
local function set_forcefield_formspec(meta) |
cca72f
|
66 |
local formspec = "size[5,2.25]".. |
Z |
67 |
"field[2,0.5;2,1;range;"..S("Range")..";"..meta:get_int("range").."]" |
|
68 |
-- The names for these toggle buttons are explicit about which |
|
69 |
-- state they'll switch to, so that multiple presses (arising |
|
70 |
-- from the ambiguity between lag and a missed press) only make |
|
71 |
-- the single change that the user expects. |
6a4cb1
|
72 |
if meta:get_int("mesecon_mode") == 0 then |
cca72f
|
73 |
formspec = formspec.."button[0,1;5,1;mesecon_mode_1;"..S("Ignoring Mesecon Signal").."]" |
2d6f34
|
74 |
else |
cca72f
|
75 |
formspec = formspec.."button[0,1;5,1;mesecon_mode_0;"..S("Controlled by Mesecon Signal").."]" |
6a4cb1
|
76 |
end |
Z |
77 |
if meta:get_int("enabled") == 0 then |
cca72f
|
78 |
formspec = formspec.."button[0,1.75;5,1;enable;"..S("%s Disabled"):format(S("%s Forcefield Emitter"):format("HV")).."]" |
6a4cb1
|
79 |
else |
cca72f
|
80 |
formspec = formspec.."button[0,1.75;5,1;disable;"..S("%s Enabled"):format(S("%s Forcefield Emitter"):format("HV")).."]" |
2d6f34
|
81 |
end |
Z |
82 |
meta:set_string("formspec", formspec) |
ee0765
|
83 |
end |
S |
84 |
|
|
85 |
local forcefield_receive_fields = function(pos, formname, fields, sender) |
|
86 |
local meta = minetest.get_meta(pos) |
2d6f34
|
87 |
if fields.range then |
Z |
88 |
local range = tonumber(fields.range) or 0 |
|
89 |
-- Smallest field is 5. Anything less is asking for trouble. |
|
90 |
-- Largest is 20. It is a matter of pratical node handling. |
|
91 |
-- At the maximim range updating the forcefield takes about 0.2s |
|
92 |
range = math.max(range, 5) |
|
93 |
range = math.min(range, 20) |
|
94 |
if meta:get_int("range") ~= range then |
|
95 |
update_forcefield(pos, meta:get_int("range"), false) |
|
96 |
meta:set_int("range", range) |
ee0765
|
97 |
end |
S |
98 |
end |
2d6f34
|
99 |
if fields.enable then meta:set_int("enabled", 1) end |
Z |
100 |
if fields.disable then meta:set_int("enabled", 0) end |
6a4cb1
|
101 |
if fields.mesecon_mode_0 then meta:set_int("mesecon_mode", 0) end |
Z |
102 |
if fields.mesecon_mode_1 then meta:set_int("mesecon_mode", 1) end |
2d6f34
|
103 |
set_forcefield_formspec(meta) |
ee0765
|
104 |
end |
S |
105 |
|
|
106 |
local mesecons = { |
|
107 |
effector = { |
|
108 |
action_on = function(pos, node) |
6a4cb1
|
109 |
minetest.get_meta(pos):set_int("mesecon_effect", 1) |
ee0765
|
110 |
end, |
S |
111 |
action_off = function(pos, node) |
6a4cb1
|
112 |
minetest.get_meta(pos):set_int("mesecon_effect", 0) |
ee0765
|
113 |
end |
S |
114 |
} |
|
115 |
} |
|
116 |
|
563a4c
|
117 |
local run = function(pos, node, active_object_count, active_object_count_wider) |
N |
118 |
local meta = minetest.get_meta(pos) |
|
119 |
local eu_input = meta:get_int("HV_EU_input") |
|
120 |
local eu_demand = meta:get_int("HV_EU_demand") |
cca72f
|
121 |
local enabled = meta:get_int("enabled") ~= 0 and (meta:get_int("mesecon_mode") == 0 or meta:get_int("mesecon_effect") ~= 0) |
563a4c
|
122 |
local machine_name = S("%s Forcefield Emitter"):format("HV") |
N |
123 |
|
|
124 |
local power_requirement = math.floor( |
|
125 |
4 * math.pi * math.pow(meta:get_int("range"), 2) |
|
126 |
) * forcefield_power_drain |
|
127 |
|
6a4cb1
|
128 |
if not enabled then |
563a4c
|
129 |
if node.name == "technic:forcefield_emitter_on" then |
N |
130 |
meta:set_int("HV_EU_demand", 0) |
|
131 |
update_forcefield(pos, meta:get_int("range"), false) |
|
132 |
technic.swap_node(pos, "technic:forcefield_emitter_off") |
|
133 |
meta:set_string("infotext", S("%s Disabled"):format(machine_name)) |
|
134 |
return |
|
135 |
end |
|
136 |
elseif eu_input < power_requirement then |
|
137 |
meta:set_string("infotext", S("%s Unpowered"):format(machine_name)) |
|
138 |
if node.name == "technic:forcefield_emitter_on" then |
|
139 |
update_forcefield(pos, meta:get_int("range"), false) |
|
140 |
technic.swap_node(pos, "technic:forcefield_emitter_off") |
|
141 |
end |
|
142 |
elseif eu_input >= power_requirement then |
|
143 |
if node.name == "technic:forcefield_emitter_off" then |
|
144 |
technic.swap_node(pos, "technic:forcefield_emitter_on") |
|
145 |
meta:set_string("infotext", S("%s Active"):format(machine_name)) |
|
146 |
end |
|
147 |
update_forcefield(pos, meta:get_int("range"), true) |
|
148 |
end |
|
149 |
meta:set_int("HV_EU_demand", power_requirement) |
|
150 |
end |
|
151 |
|
ee0765
|
152 |
minetest.register_node("technic:forcefield_emitter_off", { |
7c4b70
|
153 |
description = S("%s Forcefield Emitter"):format("HV"), |
ee0765
|
154 |
tiles = {"technic_forcefield_emitter_off.png"}, |
563a4c
|
155 |
groups = {cracky = 1, technic_machine = 1}, |
ee0765
|
156 |
on_receive_fields = forcefield_receive_fields, |
S |
157 |
on_construct = function(pos) |
|
158 |
local meta = minetest.get_meta(pos) |
|
159 |
meta:set_int("HV_EU_input", 0) |
|
160 |
meta:set_int("HV_EU_demand", 0) |
|
161 |
meta:set_int("range", 10) |
|
162 |
meta:set_int("enabled", 0) |
6a4cb1
|
163 |
meta:set_int("mesecon_mode", 0) |
Z |
164 |
meta:set_int("mesecon_effect", 0) |
7c4b70
|
165 |
meta:set_string("infotext", S("%s Forcefield Emitter"):format("HV")) |
2d6f34
|
166 |
set_forcefield_formspec(meta) |
ee0765
|
167 |
end, |
563a4c
|
168 |
mesecons = mesecons, |
N |
169 |
technic_run = run, |
ee0765
|
170 |
}) |
S |
171 |
|
|
172 |
minetest.register_node("technic:forcefield_emitter_on", { |
7c4b70
|
173 |
description = S("%s Forcefield Emitter"):format("HV"), |
ee0765
|
174 |
tiles = {"technic_forcefield_emitter_on.png"}, |
563a4c
|
175 |
groups = {cracky = 1, technic_machine = 1, not_in_creative_inventory=1}, |
ee0765
|
176 |
drop = "technic:forcefield_emitter_off", |
S |
177 |
on_receive_fields = forcefield_receive_fields, |
|
178 |
on_destruct = function(pos) |
|
179 |
local meta = minetest.get_meta(pos) |
|
180 |
update_forcefield(pos, meta:get_int("range"), false) |
|
181 |
end, |
563a4c
|
182 |
mesecons = mesecons, |
N |
183 |
technic_run = run, |
|
184 |
technic_disabled_machine_name = "technic:forcefield_emitter", |
ee0765
|
185 |
}) |
S |
186 |
|
|
187 |
minetest.register_node("technic:forcefield", { |
7c4b70
|
188 |
description = S("%s Forcefield"):format("HV"), |
ee0765
|
189 |
sunlight_propagates = true, |
S |
190 |
drawtype = "glasslike", |
|
191 |
groups = {not_in_creative_inventory=1, unbreakable=1}, |
|
192 |
paramtype = "light", |
|
193 |
light_source = 15, |
|
194 |
drop = '', |
|
195 |
tiles = {{ |
|
196 |
name = "technic_forcefield_animated.png", |
|
197 |
animation = { |
|
198 |
type = "vertical_frames", |
|
199 |
aspect_w = 16, |
|
200 |
aspect_h = 16, |
|
201 |
length = 1.0, |
|
202 |
}, |
|
203 |
}}, |
|
204 |
}) |
|
205 |
|
|
206 |
|
|
207 |
if minetest.get_modpath("mesecons_mvps") then |
|
208 |
mesecon:register_mvps_stopper("technic:forcefield") |
|
209 |
end |
|
210 |
|
|
211 |
technic.register_machine("HV", "technic:forcefield_emitter_on", technic.receiver) |
|
212 |
technic.register_machine("HV", "technic:forcefield_emitter_off", technic.receiver) |
|
213 |
|