| 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) |
| Z | 66 | local formspec = "size[5,1.5]".. |
| 67 | "field[2,0.5;2,1;range;"..S("Range")..";"..meta:get_int("range").."]" | |
| 68 | if meta:get_int("enabled") == 0 then | |
| 69 | formspec = formspec.."button[0,1;5,1;enable;"..S("%s Disabled"):format(S("%s Forcefield Emitter"):format("HV")).."]" | |
| 70 | else | |
| 71 | formspec = formspec.."button[0,1;5,1;disable;"..S("%s Enabled"):format(S("%s Forcefield Emitter"):format("HV")).."]" | |
| 72 | end | |
| 73 | meta:set_string("formspec", formspec) | |
| ee0765 | 74 | end |
| S | 75 | |
| 76 | local forcefield_receive_fields = function(pos, formname, fields, sender) | |
| 77 | local meta = minetest.get_meta(pos) | |
| 2d6f34 | 78 | if fields.range then |
| Z | 79 | local range = tonumber(fields.range) or 0 |
| 80 | -- Smallest field is 5. Anything less is asking for trouble. | |
| 81 | -- Largest is 20. It is a matter of pratical node handling. | |
| 82 | -- At the maximim range updating the forcefield takes about 0.2s | |
| 83 | range = math.max(range, 5) | |
| 84 | range = math.min(range, 20) | |
| 85 | if meta:get_int("range") ~= range then | |
| 86 | update_forcefield(pos, meta:get_int("range"), false) | |
| 87 | meta:set_int("range", range) | |
| ee0765 | 88 | end |
| S | 89 | end |
| 2d6f34 | 90 | if fields.enable then meta:set_int("enabled", 1) end |
| Z | 91 | if fields.disable then meta:set_int("enabled", 0) end |
| 92 | set_forcefield_formspec(meta) | |
| ee0765 | 93 | end |
| S | 94 | |
| 95 | local mesecons = { | |
| 96 | effector = { | |
| 97 | action_on = function(pos, node) | |
| 98 | minetest.get_meta(pos):set_int("enabled", 0) | |
| 99 | end, | |
| 100 | action_off = function(pos, node) | |
| 101 | minetest.get_meta(pos):set_int("enabled", 1) | |
| 102 | end | |
| 103 | } | |
| 104 | } | |
| 105 | ||
| 563a4c | 106 | local run = function(pos, node, active_object_count, active_object_count_wider) |
| N | 107 | local meta = minetest.get_meta(pos) |
| 108 | local eu_input = meta:get_int("HV_EU_input") | |
| 109 | local eu_demand = meta:get_int("HV_EU_demand") | |
| 110 | local enabled = meta:get_int("enabled") | |
| 111 | local machine_name = S("%s Forcefield Emitter"):format("HV") | |
| 112 | ||
| 113 | local power_requirement = math.floor( | |
| 114 | 4 * math.pi * math.pow(meta:get_int("range"), 2) | |
| 115 | ) * forcefield_power_drain | |
| 116 | ||
| 117 | if meta:get_int("enabled") == 0 then | |
| 118 | if node.name == "technic:forcefield_emitter_on" then | |
| 119 | meta:set_int("HV_EU_demand", 0) | |
| 120 | update_forcefield(pos, meta:get_int("range"), false) | |
| 121 | technic.swap_node(pos, "technic:forcefield_emitter_off") | |
| 122 | meta:set_string("infotext", S("%s Disabled"):format(machine_name)) | |
| 123 | return | |
| 124 | end | |
| 125 | elseif eu_input < power_requirement then | |
| 126 | meta:set_string("infotext", S("%s Unpowered"):format(machine_name)) | |
| 127 | if node.name == "technic:forcefield_emitter_on" then | |
| 128 | update_forcefield(pos, meta:get_int("range"), false) | |
| 129 | technic.swap_node(pos, "technic:forcefield_emitter_off") | |
| 130 | end | |
| 131 | elseif eu_input >= power_requirement then | |
| 132 | if node.name == "technic:forcefield_emitter_off" then | |
| 133 | technic.swap_node(pos, "technic:forcefield_emitter_on") | |
| 134 | meta:set_string("infotext", S("%s Active"):format(machine_name)) | |
| 135 | end | |
| 136 | update_forcefield(pos, meta:get_int("range"), true) | |
| 137 | end | |
| 138 | meta:set_int("HV_EU_demand", power_requirement) | |
| 139 | end | |
| 140 | ||
| ee0765 | 141 | minetest.register_node("technic:forcefield_emitter_off", { |
| 7c4b70 | 142 | description = S("%s Forcefield Emitter"):format("HV"), |
| ee0765 | 143 | tiles = {"technic_forcefield_emitter_off.png"}, |
| 563a4c | 144 | groups = {cracky = 1, technic_machine = 1}, |
| ee0765 | 145 | on_receive_fields = forcefield_receive_fields, |
| S | 146 | on_construct = function(pos) |
| 147 | local meta = minetest.get_meta(pos) | |
| 148 | meta:set_int("HV_EU_input", 0) | |
| 149 | meta:set_int("HV_EU_demand", 0) | |
| 150 | meta:set_int("range", 10) | |
| 151 | meta:set_int("enabled", 0) | |
| 7c4b70 | 152 | meta:set_string("infotext", S("%s Forcefield Emitter"):format("HV")) |
| 2d6f34 | 153 | set_forcefield_formspec(meta) |
| ee0765 | 154 | end, |
| 563a4c | 155 | mesecons = mesecons, |
| N | 156 | technic_run = run, |
| ee0765 | 157 | }) |
| S | 158 | |
| 159 | minetest.register_node("technic:forcefield_emitter_on", { | |
| 7c4b70 | 160 | description = S("%s Forcefield Emitter"):format("HV"), |
| ee0765 | 161 | tiles = {"technic_forcefield_emitter_on.png"}, |
| 563a4c | 162 | groups = {cracky = 1, technic_machine = 1, not_in_creative_inventory=1}, |
| ee0765 | 163 | drop = "technic:forcefield_emitter_off", |
| S | 164 | on_receive_fields = forcefield_receive_fields, |
| 165 | on_construct = function(pos) | |
| 166 | local meta = minetest.get_meta(pos) | |
| 167 | local range = meta:get_int("range") | |
| 168 | meta:set_string("formspec", get_forcefield_formspec(range)) | |
| 169 | end, | |
| 170 | on_destruct = function(pos) | |
| 171 | local meta = minetest.get_meta(pos) | |
| 172 | update_forcefield(pos, meta:get_int("range"), false) | |
| 173 | end, | |
| 563a4c | 174 | mesecons = mesecons, |
| N | 175 | technic_run = run, |
| 176 | technic_disabled_machine_name = "technic:forcefield_emitter", | |
| ee0765 | 177 | }) |
| S | 178 | |
| 179 | minetest.register_node("technic:forcefield", { | |
| 7c4b70 | 180 | description = S("%s Forcefield"):format("HV"), |
| ee0765 | 181 | sunlight_propagates = true, |
| S | 182 | drawtype = "glasslike", |
| 183 | groups = {not_in_creative_inventory=1, unbreakable=1}, | |
| 184 | paramtype = "light", | |
| 185 | light_source = 15, | |
| 186 | drop = '', | |
| 187 | tiles = {{ | |
| 188 | name = "technic_forcefield_animated.png", | |
| 189 | animation = { | |
| 190 | type = "vertical_frames", | |
| 191 | aspect_w = 16, | |
| 192 | aspect_h = 16, | |
| 193 | length = 1.0, | |
| 194 | }, | |
| 195 | }}, | |
| 196 | }) | |
| 197 | ||
| 198 | ||
| 199 | if minetest.get_modpath("mesecons_mvps") then | |
| 200 | mesecon:register_mvps_stopper("technic:forcefield") | |
| 201 | end | |
| 202 | ||
| 203 | technic.register_machine("HV", "technic:forcefield_emitter_on", technic.receiver) | |
| 204 | technic.register_machine("HV", "technic:forcefield_emitter_off", technic.receiver) | |
| 205 | ||
