mirror of
https://github.com/minetest-mods/technic.git
synced 2024-12-22 13:52:31 +01:00
Removed down_converters as they are superseeded by the new supply converter.
This commit is contained in:
parent
053fa59739
commit
7201aeb6ba
@ -1,225 +0,0 @@
|
|||||||
-- The HV down converter will step down HV EUs to MV EUs
|
|
||||||
-- If we take the solar panel as calibration then the
|
|
||||||
-- 1 HVEU = 5 MVEU as we stack 5 MV arrays to get a HV array.
|
|
||||||
-- The downconverter does of course have a conversion loss.
|
|
||||||
-- This loses 30% of the power.
|
|
||||||
-- The converter does not store any energy by itself.
|
|
||||||
minetest.register_node("technic:down_converter_hv", {
|
|
||||||
description = "HV Down Converter",
|
|
||||||
tiles = {"technic_hv_down_converter_top.png", "technic_hv_down_converter_bottom.png", "technic_hv_down_converter_side.png",
|
|
||||||
"technic_hv_down_converter_side.png", "technic_hv_down_converter_side.png", "technic_hv_down_converter_side.png"},
|
|
||||||
groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
|
|
||||||
sounds = default.node_sound_wood_defaults(),
|
|
||||||
drawtype = "nodebox",
|
|
||||||
paramtype = "light",
|
|
||||||
is_ground_content = true,
|
|
||||||
node_box = {
|
|
||||||
type = "fixed",
|
|
||||||
fixed = {-0.5, -0.5, -0.5, 0.5, 0.5, 0.5},
|
|
||||||
},
|
|
||||||
selection_box = {
|
|
||||||
type = "fixed",
|
|
||||||
fixed = {-0.5, -0.5, -0.5, 0.5, 0.5, 0.5},
|
|
||||||
},
|
|
||||||
on_construct = function(pos)
|
|
||||||
local meta = minetest.env:get_meta(pos)
|
|
||||||
meta:set_float("technic_hv_power_machine", 1)
|
|
||||||
meta:set_float("technic_mv_power_machine", 1)
|
|
||||||
meta:set_float("internal_EU_buffer",0)
|
|
||||||
meta:set_float("internal_EU_buffer_size",0)
|
|
||||||
meta:set_string("infotext", "HV Down Converter")
|
|
||||||
meta:set_float("active", false)
|
|
||||||
end,
|
|
||||||
})
|
|
||||||
|
|
||||||
minetest.register_craft({
|
|
||||||
output = 'technic:down_converter_hv 1',
|
|
||||||
recipe = {
|
|
||||||
{'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot','technic:stainless_steel_ingot'},
|
|
||||||
{'technic:hv_transformer', 'technic:hv_cable', 'technic:mv_transformer'},
|
|
||||||
{'technic:hv_cable', 'technic:rubber', 'technic:mv_cable'},
|
|
||||||
}
|
|
||||||
})
|
|
||||||
|
|
||||||
minetest.register_abm(
|
|
||||||
{nodenames = {"technic:down_converter_hv"},
|
|
||||||
interval = 1,
|
|
||||||
chance = 1,
|
|
||||||
action = function(pos, node, active_object_count, active_object_count_wider)
|
|
||||||
-- HV->MV conversion factor
|
|
||||||
local hv_mv_factor = 5
|
|
||||||
-- The maximun charge a single converter can handle. Let's set this to
|
|
||||||
-- what 5 HV solar arrays can produce - 30% loss (2880*5*0.7)
|
|
||||||
local max_charge = 10080*hv_mv_factor
|
|
||||||
|
|
||||||
local meta = minetest.env:get_meta(pos)
|
|
||||||
local meta1 = nil
|
|
||||||
local pos1 = {}
|
|
||||||
local available_charge = 0 -- counted in MV units
|
|
||||||
local used_charge = 0 -- counted in MV units
|
|
||||||
|
|
||||||
-- Index all HV nodes connected to the network
|
|
||||||
-- HV cable comes in through the bottom
|
|
||||||
pos1.y = pos.y-1
|
|
||||||
pos1.x = pos.x
|
|
||||||
pos1.z = pos.z
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
if meta1:get_float("hv_cablelike")~=1 then return end
|
|
||||||
|
|
||||||
local HV_nodes = {} -- HV type
|
|
||||||
local HV_PR_nodes = {} -- HV type
|
|
||||||
local HV_BA_nodes = {} -- HV type
|
|
||||||
|
|
||||||
HV_nodes[1] = {}
|
|
||||||
HV_nodes[1].x = pos1.x
|
|
||||||
HV_nodes[1].y = pos1.y
|
|
||||||
HV_nodes[1].z = pos1.z
|
|
||||||
|
|
||||||
local table_index = 1
|
|
||||||
repeat
|
|
||||||
check_HV_node(HV_PR_nodes,nil,HV_BA_nodes,HV_nodes,table_index)
|
|
||||||
table_index = table_index + 1
|
|
||||||
if HV_nodes[table_index] == nil then break end
|
|
||||||
until false
|
|
||||||
|
|
||||||
--print("HV_nodes: PR="..table.getn(HV_PR_nodes).." BA="..table.getn(HV_BA_nodes))
|
|
||||||
|
|
||||||
-- Index all MV nodes connected to the network
|
|
||||||
-- MV cable comes out of the top
|
|
||||||
pos1.y = pos.y+1
|
|
||||||
pos1.x = pos.x
|
|
||||||
pos1.z = pos.z
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
if meta1:get_float("mv_cablelike")~=1 then return end
|
|
||||||
|
|
||||||
local MV_nodes = {} -- MV type
|
|
||||||
local MV_RE_nodes = {} -- MV type
|
|
||||||
local MV_BA_nodes = {} -- MV type
|
|
||||||
|
|
||||||
MV_nodes[1] = {}
|
|
||||||
MV_nodes[1].x = pos1.x
|
|
||||||
MV_nodes[1].y = pos1.y
|
|
||||||
MV_nodes[1].z = pos1.z
|
|
||||||
|
|
||||||
table_index = 1
|
|
||||||
repeat
|
|
||||||
check_MV_node(nil,MV_RE_nodes,MV_BA_nodes,MV_nodes,table_index)
|
|
||||||
table_index = table_index + 1
|
|
||||||
if MV_nodes[table_index] == nil then break end
|
|
||||||
until false
|
|
||||||
|
|
||||||
--print("MV_nodes: RE="..table.getn(MV_RE_nodes).." BA="..table.getn(MV_BA_nodes))
|
|
||||||
|
|
||||||
-- First get available power from all the attached HV suppliers
|
|
||||||
-- Get the supplier internal EU buffer and read the EUs from it
|
|
||||||
-- No update yet!
|
|
||||||
local pos1
|
|
||||||
-- FIXME: Until further leave the producers out of it and just let the batteries be the hub
|
|
||||||
-- for _,pos1 in ipairs(HV_PR_nodes) do
|
|
||||||
-- meta1 = minetest.env:get_meta(pos1)
|
|
||||||
-- local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
-- available_charge = available_charge + meta1:get_float("internal_EU_buffer") * hv_mv_factor
|
|
||||||
-- -- Limit conversion capacity
|
|
||||||
-- if available_charge > max_charge then
|
|
||||||
-- available_charge = max_charge
|
|
||||||
-- break
|
|
||||||
-- end
|
|
||||||
-- end
|
|
||||||
-- --print("Available_charge PR:"..available_charge)
|
|
||||||
|
|
||||||
for _,pos1 in ipairs(HV_BA_nodes) do
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
available_charge = available_charge + meta1:get_float("internal_EU_buffer") * hv_mv_factor
|
|
||||||
-- Limit conversion capacity
|
|
||||||
if available_charge > max_charge then
|
|
||||||
available_charge = max_charge
|
|
||||||
break
|
|
||||||
end
|
|
||||||
end
|
|
||||||
--print("Available_charge PR+BA:"..available_charge)
|
|
||||||
|
|
||||||
-- Calculate total number of receivers:
|
|
||||||
local MV_receivers = table.getn(MV_RE_nodes)+table.getn(MV_BA_nodes)
|
|
||||||
|
|
||||||
-- Next supply power to all connected MV machines
|
|
||||||
-- Get the power receiver internal EU buffer and give EUs to it
|
|
||||||
-- Note: for now leave out RE type machines until producers distribute power themselves even without a battery
|
|
||||||
-- for _,pos1 in ipairs(MV_RE_nodes) do
|
|
||||||
-- local meta1 = minetest.env:get_meta(pos1)
|
|
||||||
-- local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
-- local internal_EU_buffer_size = meta1:get_float("internal_EU_buffer_size")
|
|
||||||
-- local charge_to_give = math.min(4000, available_charge/MV_receivers) -- power rating limit on the MV wire
|
|
||||||
-- -- How much can this unit take?
|
|
||||||
-- if internal_EU_buffer+charge_to_give > internal_EU_buffer_size then
|
|
||||||
-- charge_to_give=internal_EU_buffer_size-internal_EU_buffer
|
|
||||||
-- end
|
|
||||||
-- -- If we are emptying the supply take the remainder
|
|
||||||
-- if available_charge<used_charge+charge_to_give then charge_to_give=available_charge-used_charge end
|
|
||||||
-- -- Update the unit supplied to
|
|
||||||
-- internal_EU_buffer = internal_EU_buffer + charge_to_give
|
|
||||||
-- meta1:set_float("internal_EU_buffer",internal_EU_buffer)
|
|
||||||
-- -- Do the accounting
|
|
||||||
-- used_charge = used_charge + charge_to_give
|
|
||||||
-- if available_charge == used_charge then break end -- bail out if supply depleted
|
|
||||||
-- end
|
|
||||||
--print("used_charge RE:"..used_charge)
|
|
||||||
|
|
||||||
for _,pos1 in ipairs(MV_BA_nodes) do
|
|
||||||
local meta1 = minetest.env:get_meta(pos1)
|
|
||||||
local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
local internal_EU_buffer_size = meta1:get_float("internal_EU_buffer_size")
|
|
||||||
--print("internal_EU_buffer:"..internal_EU_buffer)
|
|
||||||
--print("internal_EU_buffer_size:"..internal_EU_buffer_size)
|
|
||||||
local charge_to_give = math.min(math.floor(available_charge/MV_receivers), 4000) -- power rating limit on the MV wire
|
|
||||||
--print("charge_to_give:"..charge_to_give)
|
|
||||||
-- How much can this unit take?
|
|
||||||
if internal_EU_buffer+charge_to_give > internal_EU_buffer_size then
|
|
||||||
charge_to_give=internal_EU_buffer_size-internal_EU_buffer
|
|
||||||
end
|
|
||||||
--print("charge_to_give2:"..charge_to_give)
|
|
||||||
-- If we are emptying the supply take the remainder
|
|
||||||
if available_charge<used_charge+charge_to_give then charge_to_give=available_charge-used_charge end
|
|
||||||
-- Update the unit supplied to
|
|
||||||
--print("charge_to_give3:"..charge_to_give)
|
|
||||||
internal_EU_buffer = internal_EU_buffer + charge_to_give
|
|
||||||
--print("internal_EU_buffer:"..internal_EU_buffer)
|
|
||||||
meta1:set_float("internal_EU_buffer",internal_EU_buffer)
|
|
||||||
-- Do the accounting
|
|
||||||
used_charge = used_charge + charge_to_give
|
|
||||||
--print("used_charge:"..used_charge)
|
|
||||||
if available_charge == used_charge then break end -- bail out if supply depleted
|
|
||||||
end
|
|
||||||
--print("used_charge RE+BA:"..used_charge)
|
|
||||||
|
|
||||||
-- Last update the HV suppliers with the actual demand.
|
|
||||||
-- Get the supplier internal EU buffer and update the EUs from it
|
|
||||||
-- Note: So far PR nodes left out and only BA nodes are updated
|
|
||||||
local HV_BA_size = table.getn(HV_BA_nodes)
|
|
||||||
for _,pos1 in ipairs(HV_BA_nodes) do
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
local charge_to_take = math.floor(used_charge/HV_BA_size/hv_mv_factor) -- HV units
|
|
||||||
if internal_EU_buffer-charge_to_take <= 0 then
|
|
||||||
charge_to_take = internal_EU_buffer
|
|
||||||
end
|
|
||||||
if charge_to_take > 0 then
|
|
||||||
internal_EU_buffer = internal_EU_buffer-charge_to_take
|
|
||||||
meta1:set_float("internal_EU_buffer",internal_EU_buffer)
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
if used_charge>0 then
|
|
||||||
meta:set_string("infotext", "HV Down Converter is active (HV:"..available_charge.."/MV:"..used_charge..")");
|
|
||||||
meta:set_float("active",1) -- used for setting textures someday maybe
|
|
||||||
else
|
|
||||||
meta:set_string("infotext", "HV Down Converter is inactive (HV:"..available_charge.."/MV:"..used_charge..")");
|
|
||||||
meta:set_float("active",0) -- used for setting textures someday maybe
|
|
||||||
return
|
|
||||||
end
|
|
||||||
end,
|
|
||||||
})
|
|
||||||
|
|
||||||
-- This machine does not store energy it receives energy from the HV side and outputs it on the MV side
|
|
||||||
register_HV_machine ("technic:down_converter_hv","RE")
|
|
||||||
register_MV_machine ("technic:down_converter_hv","PR")
|
|
@ -1,226 +0,0 @@
|
|||||||
-- The MV down converter will step down MV EUs to LV EUs
|
|
||||||
-- If we take the solar panel as calibration then the
|
|
||||||
-- 1 MVEU = 5 LVEU as we stack 5 LV arrays to get an MV array.
|
|
||||||
-- The downconverter does of course have a conversion loss.
|
|
||||||
-- This loses 30% of the power.
|
|
||||||
-- The converter does not store any energy by itself.
|
|
||||||
minetest.register_node(
|
|
||||||
"technic:down_converter_mv", {
|
|
||||||
description = "MV Down Converter",
|
|
||||||
tiles = {"technic_mv_down_converter_top.png", "technic_mv_down_converter_bottom.png", "technic_mv_down_converter_side.png",
|
|
||||||
"technic_mv_down_converter_side.png", "technic_mv_down_converter_side.png", "technic_mv_down_converter_side.png"},
|
|
||||||
groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
|
|
||||||
sounds = default.node_sound_wood_defaults(),
|
|
||||||
drawtype = "nodebox",
|
|
||||||
paramtype = "light",
|
|
||||||
is_ground_content = true,
|
|
||||||
node_box = {
|
|
||||||
type = "fixed",
|
|
||||||
fixed = {-0.5, -0.5, -0.5, 0.5, 0.5, 0.5},
|
|
||||||
},
|
|
||||||
selection_box = {
|
|
||||||
type = "fixed",
|
|
||||||
fixed = {-0.5, -0.5, -0.5, 0.5, 0.5, 0.5},
|
|
||||||
},
|
|
||||||
on_construct = function(pos)
|
|
||||||
local meta = minetest.env:get_meta(pos)
|
|
||||||
meta:set_float("technic_mv_power_machine", 1)
|
|
||||||
meta:set_float("technic_power_machine", 1)
|
|
||||||
meta:set_float("internal_EU_buffer",0)
|
|
||||||
meta:set_float("internal_EU_buffer_size",0)
|
|
||||||
meta:set_string("infotext", "MV Down Converter")
|
|
||||||
meta:set_float("active", false)
|
|
||||||
end,
|
|
||||||
})
|
|
||||||
|
|
||||||
minetest.register_craft({
|
|
||||||
output = 'technic:down_converter_mv 1',
|
|
||||||
recipe = {
|
|
||||||
{'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot','technic:stainless_steel_ingot'},
|
|
||||||
{'technic:mv_transformer', 'technic:mv_cable', 'technic:lv_transformer'},
|
|
||||||
{'technic:mv_cable', 'technic:rubber', 'technic:lv_cable'},
|
|
||||||
}
|
|
||||||
})
|
|
||||||
|
|
||||||
minetest.register_abm(
|
|
||||||
{nodenames = {"technic:down_converter_mv"},
|
|
||||||
interval = 1,
|
|
||||||
chance = 1,
|
|
||||||
action = function(pos, node, active_object_count, active_object_count_wider)
|
|
||||||
-- MV->LV conversion factor
|
|
||||||
local mv_lv_factor = 5
|
|
||||||
-- The maximun charge a single converter can handle. Let's set this to
|
|
||||||
-- what 5 MV solar arrays can produce - 30% loss (720*5*0.7)
|
|
||||||
local max_charge = 2520*mv_lv_factor
|
|
||||||
|
|
||||||
local meta = minetest.env:get_meta(pos)
|
|
||||||
local meta1 = nil
|
|
||||||
local pos1 = {}
|
|
||||||
local available_charge = 0 -- counted in LV units
|
|
||||||
local used_charge = 0 -- counted in LV units
|
|
||||||
|
|
||||||
-- Index all MV nodes connected to the network
|
|
||||||
-- MV cable comes in through the bottom
|
|
||||||
pos1.y = pos.y-1
|
|
||||||
pos1.x = pos.x
|
|
||||||
pos1.z = pos.z
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
if meta1:get_float("mv_cablelike")~=1 then return end
|
|
||||||
|
|
||||||
local MV_nodes = {} -- MV type
|
|
||||||
local MV_PR_nodes = {} -- MV type
|
|
||||||
local MV_BA_nodes = {} -- MV type
|
|
||||||
|
|
||||||
MV_nodes[1] = {}
|
|
||||||
MV_nodes[1].x = pos1.x
|
|
||||||
MV_nodes[1].y = pos1.y
|
|
||||||
MV_nodes[1].z = pos1.z
|
|
||||||
|
|
||||||
local table_index = 1
|
|
||||||
repeat
|
|
||||||
check_MV_node(MV_PR_nodes,nil,MV_BA_nodes,MV_nodes,table_index)
|
|
||||||
table_index = table_index + 1
|
|
||||||
if MV_nodes[table_index] == nil then break end
|
|
||||||
until false
|
|
||||||
|
|
||||||
--print("MV_nodes: PR="..table.getn(MV_PR_nodes).." BA="..table.getn(MV_BA_nodes))
|
|
||||||
|
|
||||||
-- Index all LV nodes connected to the network
|
|
||||||
-- LV cable comes out of the top
|
|
||||||
pos1.y = pos.y+1
|
|
||||||
pos1.x = pos.x
|
|
||||||
pos1.z = pos.z
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
if meta1:get_float("cablelike")~=1 then return end
|
|
||||||
|
|
||||||
local LV_nodes = {} -- LV type
|
|
||||||
local LV_RE_nodes = {} -- LV type
|
|
||||||
local LV_BA_nodes = {} -- LV type
|
|
||||||
|
|
||||||
LV_nodes[1] = {}
|
|
||||||
LV_nodes[1].x = pos1.x
|
|
||||||
LV_nodes[1].y = pos1.y
|
|
||||||
LV_nodes[1].z = pos1.z
|
|
||||||
|
|
||||||
table_index = 1
|
|
||||||
repeat
|
|
||||||
check_LV_node(nil,LV_RE_nodes,LV_BA_nodes,LV_nodes,table_index)
|
|
||||||
table_index = table_index + 1
|
|
||||||
if LV_nodes[table_index] == nil then break end
|
|
||||||
until false
|
|
||||||
|
|
||||||
--print("LV_nodes: RE="..table.getn(LV_RE_nodes).." BA="..table.getn(LV_BA_nodes))
|
|
||||||
|
|
||||||
-- First get available power from all the attached MV suppliers
|
|
||||||
-- Get the supplier internal EU buffer and read the EUs from it
|
|
||||||
-- No update yet!
|
|
||||||
local pos1
|
|
||||||
-- FIXME: Until further leave the producers out of it and just let the batteries be the hub
|
|
||||||
-- for _,pos1 in ipairs(MV_PR_nodes) do
|
|
||||||
-- meta1 = minetest.env:get_meta(pos1)
|
|
||||||
-- local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
-- available_charge = available_charge + meta1:get_float("internal_EU_buffer") * mv_lv_factor
|
|
||||||
-- -- Limit conversion capacity
|
|
||||||
-- if available_charge > max_charge then
|
|
||||||
-- available_charge = max_charge
|
|
||||||
-- break
|
|
||||||
-- end
|
|
||||||
-- end
|
|
||||||
-- print("Available_charge PR:"..available_charge)
|
|
||||||
|
|
||||||
for _,pos1 in ipairs(MV_BA_nodes) do
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
available_charge = available_charge + meta1:get_float("internal_EU_buffer") * mv_lv_factor
|
|
||||||
-- Limit conversion capacity
|
|
||||||
if available_charge > max_charge then
|
|
||||||
available_charge = max_charge
|
|
||||||
break
|
|
||||||
end
|
|
||||||
end
|
|
||||||
--print("Available_charge PR+BA:"..available_charge)
|
|
||||||
|
|
||||||
-- Calculate total number of receivers:
|
|
||||||
local LV_receivers = table.getn(LV_RE_nodes)+table.getn(LV_BA_nodes)
|
|
||||||
|
|
||||||
-- Next supply power to all connected LV machines
|
|
||||||
-- Get the power receiver internal EU buffer and give EUs to it
|
|
||||||
-- Note: for now leave out RE type machines until producers distribute power themselves even without a battery
|
|
||||||
-- for _,pos1 in ipairs(LV_RE_nodes) do
|
|
||||||
-- local meta1 = minetest.env:get_meta(pos1)
|
|
||||||
-- local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
-- local internal_EU_buffer_size = meta1:get_float("internal_EU_buffer_size")
|
|
||||||
-- local charge_to_give = math.min(1000, available_charge/LV_receivers) -- power rating limit on the LV wire
|
|
||||||
-- -- How much can this unit take?
|
|
||||||
-- if internal_EU_buffer+charge_to_give > internal_EU_buffer_size then
|
|
||||||
-- charge_to_give=internal_EU_buffer_size-internal_EU_buffer
|
|
||||||
-- end
|
|
||||||
-- -- If we are emptying the supply take the remainder
|
|
||||||
-- if available_charge<used_charge+charge_to_give then charge_to_give=available_charge-used_charge end
|
|
||||||
-- -- Update the unit supplied to
|
|
||||||
-- internal_EU_buffer = internal_EU_buffer + charge_to_give
|
|
||||||
-- meta1:set_float("internal_EU_buffer",internal_EU_buffer)
|
|
||||||
-- -- Do the accounting
|
|
||||||
-- used_charge = used_charge + charge_to_give
|
|
||||||
-- if available_charge == used_charge then break end -- bail out if supply depleted
|
|
||||||
-- end
|
|
||||||
--print("used_charge RE:"..used_charge)
|
|
||||||
|
|
||||||
for _,pos1 in ipairs(LV_BA_nodes) do
|
|
||||||
local meta1 = minetest.env:get_meta(pos1)
|
|
||||||
local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
local internal_EU_buffer_size = meta1:get_float("internal_EU_buffer_size")
|
|
||||||
--print("internal_EU_buffer:"..internal_EU_buffer)
|
|
||||||
--print("internal_EU_buffer_size:"..internal_EU_buffer_size)
|
|
||||||
local charge_to_give = math.min(math.floor(available_charge/LV_receivers), 1000) -- power rating limit on the LV wire
|
|
||||||
--print("charge_to_give:"..charge_to_give)
|
|
||||||
-- How much can this unit take?
|
|
||||||
if internal_EU_buffer+charge_to_give > internal_EU_buffer_size then
|
|
||||||
charge_to_give=internal_EU_buffer_size-internal_EU_buffer
|
|
||||||
end
|
|
||||||
--print("charge_to_give2:"..charge_to_give)
|
|
||||||
-- If we are emptying the supply take the remainder
|
|
||||||
if available_charge<used_charge+charge_to_give then charge_to_give=available_charge-used_charge end
|
|
||||||
-- Update the unit supplied to
|
|
||||||
--print("charge_to_give3:"..charge_to_give)
|
|
||||||
internal_EU_buffer = internal_EU_buffer + charge_to_give
|
|
||||||
--print("internal_EU_buffer:"..internal_EU_buffer)
|
|
||||||
meta1:set_float("internal_EU_buffer",internal_EU_buffer)
|
|
||||||
-- Do the accounting
|
|
||||||
used_charge = used_charge + charge_to_give
|
|
||||||
--print("used_charge:"..used_charge)
|
|
||||||
if available_charge == used_charge then break end -- bail out if supply depleted
|
|
||||||
end
|
|
||||||
--print("used_charge RE+BA:"..used_charge)
|
|
||||||
|
|
||||||
-- Last update the MV suppliers with the actual demand.
|
|
||||||
-- Get the supplier internal EU buffer and update the EUs from it
|
|
||||||
-- Note: So far PR nodes left out and only BA nodes are updated
|
|
||||||
local MV_BA_size = table.getn(MV_BA_nodes)
|
|
||||||
for _,pos1 in ipairs(MV_BA_nodes) do
|
|
||||||
meta1 = minetest.env:get_meta(pos1)
|
|
||||||
local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
|
|
||||||
local charge_to_take = math.floor(used_charge/MV_BA_size/mv_lv_factor) -- MV units
|
|
||||||
if internal_EU_buffer-charge_to_take <= 0 then
|
|
||||||
charge_to_take = internal_EU_buffer
|
|
||||||
end
|
|
||||||
if charge_to_take > 0 then
|
|
||||||
internal_EU_buffer = internal_EU_buffer-charge_to_take
|
|
||||||
meta1:set_float("internal_EU_buffer",internal_EU_buffer)
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
if used_charge>0 then
|
|
||||||
meta:set_string("infotext", "MV Down Converter is active (MV:"..available_charge.."/LV:"..used_charge..")");
|
|
||||||
meta:set_float("active",1) -- used for setting textures someday maybe
|
|
||||||
else
|
|
||||||
meta:set_string("infotext", "MV Down Converter is inactive (MV:"..available_charge.."/LV:"..used_charge..")");
|
|
||||||
meta:set_float("active",0) -- used for setting textures someday maybe
|
|
||||||
return
|
|
||||||
end
|
|
||||||
end,
|
|
||||||
})
|
|
||||||
|
|
||||||
-- This machine does not store energy it receives energy from the MV side and outputs it on the LV side
|
|
||||||
register_MV_machine ("technic:down_converter_mv","RE")
|
|
||||||
register_LV_machine ("technic:down_converter_mv","PR")
|
|
Loading…
Reference in New Issue
Block a user