| 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 | ||
