+++ /dev/null
-crafts_table ={}
-crafts_table_count=0
-UI_recipes_hook=true
-
--- override minetest.register_craft
-local minetest_register_craft = minetest.register_craft
-minetest.register_craft = function (options)
- register_craft(options)
- if options.type=="alloy" or options.type=="grinding" then return end
- minetest_register_craft(options)
-end
-
--- register_craft
-register_craft = function(options)
- if options.output == nil then
- return
- end
- local itemstack = ItemStack(options.output)
- if itemstack:is_empty() then
- return
- end
- if crafts_table[itemstack:get_name()]==nil then
- crafts_table[itemstack:get_name()] = {}
- end
- table.insert(crafts_table[itemstack:get_name()],options)
- crafts_table_count=crafts_table_count+1
-end
-
-
alloy_recipes[registered_recipes_count].dst_name=string3
alloy_recipes[registered_recipes_count].dst_count=count3
registered_recipes_count=registered_recipes_count+1
-if UI_recipes_hook then
- minetest.register_craft({
+if unified_inventory then
+ unified_inventory.register_craft({
type = "alloy",
output = string3.." "..count3,
- recipe = {
- {string1.." "..count1},
- {string2.." "..count2},
- }
+ items = {string1.." "..count1,string2.." "..count2},
+ width = 2,
})
end
end
register_alloy_recipe ("technic:copper_dust",2, "technic:zinc_dust",1, "technic:brass_dust",3)
register_alloy_recipe ("moreores:copper_ingot",2, "technic:zinc_ingot",1, "technic:brass_ingot",3)
register_alloy_recipe ("default:sand",2, "technic:coal_dust",2, "technic:silicon_wafer",1)
-register_alloy_recipe ("technic:silicon_wafer",1, "technic:mithril_dust",1, "technic:doped_silicon_wafer",1)
+register_alloy_recipe ("technic:silicon_wafer",1, "technic:gold_dust",1, "technic:doped_silicon_wafer",1)
-LV_machines = {}
-registered_LV_machines_count=0
-
-function register_LV_machine (string1,string2)
-registered_LV_machines_count=registered_LV_machines_count+1
-LV_machines[registered_LV_machines_count]={}
-LV_machines[registered_LV_machines_count].machine_name=string1
-LV_machines[registered_LV_machines_count].machine_type=string2
+-- register LV machines here
+local LV_machines = {}
+function register_LV_machine(string1,string2)
+ LV_machines[string1] = string2
end
power_tools ={}
registered_power_tools_count=0
function register_power_tool (string1,max_charge)
-registered_power_tools_count=registered_power_tools_count+1
-power_tools[registered_power_tools_count]={}
-power_tools[registered_power_tools_count].tool_name=string1
-power_tools[registered_power_tools_count].max_charge=max_charge
+ registered_power_tools_count=registered_power_tools_count+1
+ power_tools[registered_power_tools_count]={}
+ power_tools[registered_power_tools_count].tool_name=string1
+ power_tools[registered_power_tools_count].max_charge=max_charge
end
-
register_power_tool ("technic:battery",10000)
register_power_tool ("technic:red_energy_crystal",100000)
register_power_tool ("technic:green_energy_crystal",250000)
register_power_tool ("technic:blue_energy_crystal",500000)
minetest.register_craft({
- output = 'technic:battery 1',
- recipe = {
- {'default:wood', 'moreores:copper_ingot', 'default:wood'},
- {'default:wood', 'moreores:tin_ingot', 'default:wood'},
- {'default:wood', 'moreores:copper_ingot', 'default:wood'},
- }
-})
+ output = 'technic:battery 1',
+ recipe = {
+ {'default:wood', 'moreores:copper_ingot', 'default:wood'},
+ {'default:wood', 'moreores:tin_ingot', 'default:wood'},
+ {'default:wood', 'moreores:copper_ingot', 'default:wood'},
+ }
+ })
minetest.register_craft({
- output = 'technic:battery_box 1',
- recipe = {
- {'technic:battery', 'default:wood', 'technic:battery'},
- {'technic:battery', 'moreores:copper_ingot', 'technic:battery'},
- {'default:steel_ingot', 'default:steel_ingot', 'default:steel_ingot'},
- }
-})
+ output = 'technic:battery_box 1',
+ recipe = {
+ {'technic:battery', 'default:wood', 'technic:battery'},
+ {'technic:battery', 'moreores:copper_ingot', 'technic:battery'},
+ {'default:steel_ingot', 'default:steel_ingot', 'default:steel_ingot'},
+ }
+ })
minetest.register_tool("technic:battery",
-{description = "RE Battery",
-inventory_image = "technic_battery.png",
-tool_capabilities = {load=0,max_drop_level=0, groupcaps={fleshy={times={}, uses=10000, maxlevel=0}}}})
+ {description = "RE Battery",
+ inventory_image = "technic_battery.png",
+ tool_capabilities = {load=0,max_drop_level=0, groupcaps={fleshy={times={}, uses=10000, maxlevel=0}}}})
minetest.register_craftitem("technic:battery_box", {
- description = "Battery box",
- stack_max = 99,
-})
+ description = "Battery box",
+ stack_max = 99,
+ })
battery_box_formspec =
- "invsize[8,9;]"..
- "image[1,1;1,2;technic_power_meter_bg.png]"..
- "list[current_name;src;3,1;1,1;]"..
- "image[4,1;1,1;technic_battery_reload.png]"..
- "list[current_name;dst;5,1;1,1;]"..
- "label[0,0;Battery box]"..
- "label[3,0;Charge]"..
- "label[5,0;Discharge]"..
- "label[1,3;Power level]"..
- "list[current_player;main;0,5;8,4;]"
-
-minetest.register_node("technic:battery_box", {
- description = "Battery box",
- tiles = {"technic_battery_box_top.png", "technic_battery_box_bottom.png", "technic_battery_box_side0.png",
- "technic_battery_box_side0.png", "technic_battery_box_side0.png", "technic_battery_box_side0.png"},
- groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
- sounds = default.node_sound_wood_defaults(),
- technic_power_machine=1,
- last_side_shown=0,
- drop="technic:battery_box",
- on_construct = function(pos)
- local meta = minetest.env:get_meta(pos)
- meta:set_string("infotext", "Battery box")
- meta:set_float("technic_power_machine", 1)
- meta:set_string("formspec", battery_box_formspec)
- local inv = meta:get_inventory()
- inv:set_size("src", 1)
- inv:set_size("dst", 1)
- battery_charge = 0
- max_charge = 60000
- last_side_shown=0
- end,
- can_dig = function(pos,player)
- local meta = minetest.env:get_meta(pos);
- local inv = meta:get_inventory()
- if not inv:is_empty("dst") then
- return false
- elseif not inv:is_empty("src") then
- return false
- end
- return true
- end,
-})
+ "invsize[8,9;]"..
+ "image[1,1;1,2;technic_power_meter_bg.png]"..
+ "list[current_name;src;3,1;1,1;]"..
+ "image[4,1;1,1;technic_battery_reload.png]"..
+ "list[current_name;dst;5,1;1,1;]"..
+ "label[0,0;Battery box]"..
+ "label[3,0;Charge]"..
+ "label[5,0;Discharge]"..
+ "label[1,3;Power level]"..
+ "list[current_player;main;0,5;8,4;]"
+
+minetest.register_node(
+ "technic:battery_box", {
+ description = "LV Battery Box",
+ tiles = {"technic_battery_box_top.png", "technic_battery_box_bottom.png", "technic_battery_box_side0.png",
+ "technic_battery_box_side0.png", "technic_battery_box_side0.png", "technic_battery_box_side0.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ drop="technic:battery_box",
+ on_construct = function(pos)
+ if pos == nil then return end
+ local meta = minetest.env:get_meta(pos)
+ local inv = meta:get_inventory()
+ meta:set_string("infotext", "Battery box")
+ meta:set_float("technic_power_machine", 1)
+ meta:set_string("formspec", battery_box_formspec)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 60000)
+ inv:set_size("src", 1)
+ inv:set_size("dst", 1)
+ end,
+ can_dig = function(pos,player)
+ if pos == nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("dst") then
+ return false
+ elseif not inv:is_empty("src") then
+ return false
+ end
+ return true
+ end,
+ })
for i=1,8,1 do
-minetest.register_node("technic:battery_box"..i, {
- description = "Battery box",
- tiles = {"technic_battery_box_top.png", "technic_battery_box_bottom.png", "technic_battery_box_side0.png^technic_power_meter"..i..".png",
- "technic_battery_box_side0.png^technic_power_meter"..i..".png", "technic_battery_box_side0.png^technic_power_meter"..i..".png", "technic_battery_box_side0.png^technic_power_meter"..i..".png"},
- groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
- sounds = default.node_sound_wood_defaults(),
- technic_power_machine=1,
- last_side_shown=0,
- drop="technic:battery_box",
- on_construct = function(pos)
- local meta = minetest.env:get_meta(pos)
- meta:set_string("infotext", "Battery box")
- meta:set_float("technic_power_machine", 1)
- meta:set_string("formspec", battery_box_formspec)
- local inv = meta:get_inventory()
- inv:set_size("src", 1)
- inv:set_size("dst", 1)
- battery_charge = 0
- max_charge = 60000
- last_side_shown=0
- end,
- can_dig = function(pos,player)
- local meta = minetest.env:get_meta(pos);
- local inv = meta:get_inventory()
- if not inv:is_empty("dst") then
- return false
- elseif not inv:is_empty("src") then
- return false
- end
- return true
- end,
-})
+ minetest.register_node(
+ "technic:battery_box"..i, {
+ description = "LV Battery Box",
+ tiles = {"technic_battery_box_top.png", "technic_battery_box_bottom.png", "technic_battery_box_side0.png^technic_power_meter"..i..".png",
+ "technic_battery_box_side0.png^technic_power_meter"..i..".png", "technic_battery_box_side0.png^technic_power_meter"..i..".png", "technic_battery_box_side0.png^technic_power_meter"..i..".png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+ sounds = default.node_sound_wood_defaults(),
+ drop="technic:battery_box",
+ on_construct = function(pos)
+ if pos == nil then return end
+ local meta = minetest.env:get_meta(pos)
+ local inv = meta:get_inventory()
+ meta:set_string("infotext", "Battery box")
+ meta:set_float("technic_power_machine", 1)
+ meta:set_string("formspec", battery_box_formspec)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 60000)
+ inv:set_size("src", 1)
+ inv:set_size("dst", 1)
+ end,
+ can_dig = function(pos,player)
+ if pos == nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("dst") then
+ return false
+ elseif not inv:is_empty("src") then
+ return false
+ end
+ return true
+ end,
+ })
end
-LV_nodes_visited = {}
-
function get_RE_item_load (load1,max_load)
-if load1==0 then load1=65535 end
-local temp = 65536-load1
-temp= temp/65535*max_load
-return math.floor(temp + 0.5)
+ if load1==0 then load1=65535 end
+ local temp = 65536-load1
+ temp= temp/65535*max_load
+ return math.floor(temp + 0.5)
end
function set_RE_item_load (load1,max_load)
-if load1 == 0 then return 65535 end
-local temp=load1/max_load*65535
-temp=65536-temp
-return math.floor(temp)
+ if load1 == 0 then return 65535 end
+ local temp=load1/max_load*65535
+ temp=65536-temp
+ return math.floor(temp)
end
function set_RE_wear (item_stack,load1,max_load)
-local temp=65536-math.floor(load1/max_load*65535)
-item_stack["wear"]=tostring(temp)
-return item_stack
+ local temp=65536-math.floor(load1/max_load*65535)
+ item_stack["wear"]=tostring(temp)
+ return item_stack
end
-minetest.register_abm({
- nodenames = {"technic:battery_box","technic:battery_box1","technic:battery_box2","technic:battery_box3","technic:battery_box4",
- "technic:battery_box5","technic:battery_box6","technic:battery_box7","technic:battery_box8"},
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider)
- local meta = minetest.env:get_meta(pos)
- charge= meta:get_int("battery_charge")
- max_charge= 60000
- local i=math.ceil((charge/max_charge)*8)
- if i>8 then i=8 end
- j=meta:get_float("last_side_shown")
- if i~=j then
- if i>0 then hacky_swap_node(pos,"technic:battery_box"..i)
- elseif i==0 then hacky_swap_node(pos,"technic:battery_box") end
- meta:set_float("last_side_shown",i)
- end
-
---loading registered power tools
- local inv = meta:get_inventory()
- if inv:is_empty("src")==false then
- local srcstack = inv:get_stack("src", 1)
- local src_item=srcstack:to_table()
- local src_meta=get_item_meta(src_item["metadata"])
-
- local item_max_charge=nil
- for i=1,registered_power_tools_count,1 do
- if power_tools[i].tool_name==src_item["name"] then
- src_meta=get_item_meta(src_item["metadata"])
- if src_meta==nil then
- src_meta={}
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- else
- if src_meta["technic_power_tool"]==nil then
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- end
- end
- item_max_charge=power_tools[i].max_charge
- end
+minetest.register_abm(
+ {nodenames = {"technic:battery_box","technic:battery_box1","technic:battery_box2","technic:battery_box3","technic:battery_box4",
+ "technic:battery_box5","technic:battery_box6","technic:battery_box7","technic:battery_box8"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ local meta = minetest.env:get_meta(pos)
+ local max_charge = 60000 -- Set maximum charge for the device here
+ local charge = meta:get_int("internal_EU_buffer")
+
+ -- Select node textures
+ local i=math.ceil((charge/max_charge)*8)
+ if i > 8 then i = 8 end
+ local j = meta:get_float("last_side_shown")
+ if i~=j then
+ if i>0 then hacky_swap_node(pos,"technic:battery_box"..i)
+ elseif i==0 then hacky_swap_node(pos,"technic:battery_box") end
+ meta:set_float("last_side_shown",i)
end
- if item_max_charge then
- load1=src_meta["charge"]
- load_step=1000
- if load1<item_max_charge and charge>0 then
- if charge-load_step<0 then load_step=charge end
- if load1+load_step>item_max_charge then load_step=item_max_charge-load1 end
- load1=load1+load_step
- charge=charge-load_step
- set_RE_wear(src_item,load1,item_max_charge)
- src_meta["charge"]=load1
- src_item["metadata"]=set_item_meta(src_meta)
- inv:set_stack("src", 1, src_item)
- end
- meta:set_int("battery_charge",charge)
- end
- end
-
--- dischargin registered power tools
- if inv:is_empty("dst") == false then
- srcstack = inv:get_stack("dst", 1)
- src_item=srcstack:to_table()
- local src_meta=get_item_meta(src_item["metadata"])
- local item_max_charge=nil
- for i=1,registered_power_tools_count,1 do
- if power_tools[i].tool_name==src_item["name"] then
- src_meta=get_item_meta(src_item["metadata"])
- if src_meta==nil then
- src_meta={}
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- else
- if src_meta["technic_power_tool"]==nil then
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- end
- end
- item_max_charge=power_tools[i].max_charge
- end
- end
-
- if item_max_charge then
- local load1=src_meta["charge"]
- load_step=1000
- if load1>0 and charge<max_charge then
- if charge+load_step>max_charge then load_step=max_charge-charge end
- if load1-load_step<0 then load_step=load1 end
- load1=load1-load_step
- charge=charge+load_step
- set_RE_wear(src_item,load1,item_max_charge)
- src_meta["charge"]=load1
- src_item["metadata"]=set_item_meta(src_meta)
- inv:set_stack("dst", 1, src_item)
- end
- end
+ --charge registered power tools
+ local inv = meta:get_inventory()
+ if inv:is_empty("src")==false then
+ local srcstack = inv:get_stack("src", 1)
+ local src_item=srcstack:to_table()
+ local src_meta=get_item_meta(src_item["metadata"])
+
+ local item_max_charge=nil
+ for i=1,registered_power_tools_count,1 do
+ if power_tools[i].tool_name==src_item["name"] then
+ src_meta=get_item_meta(src_item["metadata"])
+ if src_meta==nil then
+ src_meta={}
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ else
+ if src_meta["technic_power_tool"]==nil then
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ end
+ end
+ -- Do the charging
+ local item_max_charge = power_tools[i].max_charge
+ local load1 = src_meta["charge"]
+ local load_step = 1000 -- how much to charge per tick
+ if load1<item_max_charge and charge>0 then
+ if charge-load_step<0 then load_step=charge end
+ if load1+load_step>item_max_charge then load_step=item_max_charge-load1 end
+ load1=load1+load_step
+ charge=charge-load_step
+ set_RE_wear(src_item,load1,item_max_charge)
+ src_meta["charge"]=load1
+ src_item["metadata"]=set_item_meta(src_meta)
+ inv:set_stack("src", 1, src_item)
+ end
+ meta:set_int("internal_EU_buffer",charge)
+ break
+ end
+ end
end
- meta:set_int("battery_charge",charge)
+ -- discharging registered power tools
+ if inv:is_empty("dst") == false then
+ srcstack = inv:get_stack("dst", 1)
+ src_item=srcstack:to_table()
+ local src_meta=get_item_meta(src_item["metadata"])
+ local item_max_charge=nil
+ for i=1,registered_power_tools_count,1 do
+ if power_tools[i].tool_name==src_item["name"] then
+ src_meta=get_item_meta(src_item["metadata"])
+ if src_meta==nil then
+ src_meta={}
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ else
+ if src_meta["technic_power_tool"]==nil then
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ end
+ end
+ local item_max_charge = power_tools[i].max_charge
+ local load1 = src_meta["charge"]
+ local load_step = 4000 -- how much to discharge per tick
+ if load1>0 and charge<max_charge then
+ if charge+load_step>max_charge then load_step=max_charge-charge end
+ if load1-load_step<0 then load_step=load1 end
+ load1=load1-load_step
+ charge=charge+load_step
+ set_RE_wear(src_item,load1,item_max_charge)
+ src_meta["charge"]=load1
+ src_item["metadata"]=set_item_meta(src_meta)
+ inv:set_stack("dst", 1, src_item)
+ end
+ meta:set_int("internal_EU_buffer",charge)
+ break
+ end
+ end
+ end
- local load = math.floor(charge/60000 * 100)
- meta:set_string("formspec",
+ local load = math.floor(charge/60000 * 100)
+ meta:set_string("formspec",
battery_box_formspec..
- "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
- (load)..":technic_power_meter_fg.png]")
-
- local pos1={}
-
- 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 = {}
- local PR_nodes = {}
- local RE_nodes = {}
-
- LV_nodes[1]={}
- LV_nodes[1].x=pos1.x
- LV_nodes[1].y=pos1.y
- LV_nodes[1].z=pos1.z
- LV_nodes[1].visited=false
-
-
-table_index=1
- repeat
- check_LV_node (PR_nodes,RE_nodes,LV_nodes,table_index)
- table_index=table_index+1
- if LV_nodes[table_index]==nil then break end
- until false
-
-
-local pos1={}
-i=1
- repeat
- if PR_nodes[i]==nil then break end -- gettin power from all connected producers
- pos1.x=PR_nodes[i].x
- pos1.y=PR_nodes[i].y
- pos1.z=PR_nodes[i].z
- local meta1 = minetest.env:get_meta(pos1)
- local internal_EU_buffer=meta1:get_float("internal_EU_buffer")
- if charge<max_charge then
- charge_to_take=200
- if internal_EU_buffer-charge_to_take<=0 then
- charge_to_take=internal_EU_buffer
- end
- if charge_to_take>0 then
- charge=charge+charge_to_take
- internal_EU_buffer=internal_EU_buffer-charge_to_take
- meta1:set_float("internal_EU_buffer",internal_EU_buffer)
- end
- end
- i=i+1
- until false
-
-if charge>max_charge then charge=max_charge end
-
-i=1
- repeat
- if RE_nodes[i]==nil then break end
- pos1.x=RE_nodes[i].x -- loading all conected machines buffers
- pos1.y=RE_nodes[i].y
- pos1.z=RE_nodes[i].z
- 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=200
- if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
- charge_to_give=internal_EU_buffer_size-internal_EU_buffer
- end
- if charge-charge_to_give<0 then charge_to_give=charge end
-
- internal_EU_buffer=internal_EU_buffer+charge_to_give
- meta1:set_float("internal_EU_buffer",internal_EU_buffer)
- charge=charge-charge_to_give;
-
- i=i+1
- until false
- charge=math.floor(charge)
- charge_string=tostring(charge)
- meta:set_string("infotext", "Battery box: "..charge_string.."/"..max_charge);
- meta:set_int("battery_charge",charge)
+ "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+ (load)..":technic_power_meter_fg.png]"
+ )
+
+ -- Next index the surrounding network the get the producers and receivers on the power grid
+ local pos1={}
+ 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 = {}
+ local PR_nodes = {}
+ local RE_nodes = {}
+ local BA_nodes = {}
+
+ LV_nodes[1]={}
+ LV_nodes[1].x=pos1.x
+ LV_nodes[1].y=pos1.y
+ LV_nodes[1].z=pos1.z
+ LV_nodes[1].visited=false
+
+ local table_index=1
+ repeat
+ check_LV_node(PR_nodes,RE_nodes,BA_nodes,LV_nodes,table_index)
+ table_index=table_index+1
+ if LV_nodes[table_index]==nil then break end
+ until false
+
+
+ -- Get power from all connected producers
+ local pr_pos
+ for _,pr_pos in ipairs(PR_nodes) do
+ local meta1 = minetest.env:get_meta(pr_pos)
+ local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
+ local charge_to_take = 200
+ if charge<max_charge then
+ if internal_EU_buffer-charge_to_take<=0 then
+ charge_to_take=internal_EU_buffer
+ end
+ if charge_to_take>0 then
+ charge=charge+charge_to_take
+ internal_EU_buffer=internal_EU_buffer-charge_to_take
+ meta1:set_float("internal_EU_buffer",internal_EU_buffer)
+ end
+ end
+ end
+ if charge>max_charge then charge=max_charge end
+
+ -- Provide power to all connected receivers
+ local re_pos
+ for _,re_pos in ipairs(RE_nodes) do
+ local meta1 = minetest.env:get_meta(re_pos)
+ 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(200, charge/table.getn(RE_nodes))
+ if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ end
+ if charge-charge_to_give<0 then charge_to_give=charge end
+
+ internal_EU_buffer=internal_EU_buffer+charge_to_give
+ meta1:set_float("internal_EU_buffer",internal_EU_buffer)
+ charge=charge-charge_to_give;
+ end
+ charge=math.floor(charge)
+ meta:set_string("infotext", "LV Battery box: "..charge.."/"..max_charge);
+ meta:set_int("internal_EU_buffer",charge)
+ end
+ })
+
+-- Register as a battery type
+-- Battery type machines function as power reservoirs and can both receive and give back power
+register_LV_machine("technic:battery_box","BA")
+for i=1,8,1 do
+ register_LV_machine("technic:battery_box"..i,"BA")
end
-})
function add_new_cable_node (LV_nodes,pos1)
- local i=1
- repeat
- if LV_nodes[i]==nil then break end
- if pos1.x==LV_nodes[i].x and pos1.y==LV_nodes[i].y and pos1.z==LV_nodes[i].z then return false end
- i=i+1
- until false
- LV_nodes[i]={}
- LV_nodes[i].x=pos1.x
- LV_nodes[i].y=pos1.y
- LV_nodes[i].z=pos1.z
- LV_nodes[i].visited=false
- return true
+ if LV_nodes == nil then return true end
+ local i=1
+ repeat
+ if LV_nodes[i]==nil then break end
+ if pos1.x==LV_nodes[i].x and pos1.y==LV_nodes[i].y and pos1.z==LV_nodes[i].z then return false end
+ i=i+1
+ until false
+ LV_nodes[i]={}
+ LV_nodes[i].x=pos1.x
+ LV_nodes[i].y=pos1.y
+ LV_nodes[i].z=pos1.z
+ return true
end
-function check_LV_node (PR_nodes,RE_nodes,LV_nodes,i)
- local pos1={}
- pos1.x=LV_nodes[i].x
- pos1.y=LV_nodes[i].y
- pos1.z=LV_nodes[i].z
- LV_nodes[i].visited=true
- new_node_added=false
-
- pos1.x=pos1.x+1
- check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
- pos1.x=pos1.x-2
- check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
- pos1.x=pos1.x+1
-
- pos1.y=pos1.y+1
- check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
- pos1.y=pos1.y-2
- check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
- pos1.y=pos1.y+1
-
- pos1.z=pos1.z+1
- check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
- pos1.z=pos1.z-2
- check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
- pos1.z=pos1.z+1
-return new_node_added
+function check_LV_node(PR_nodes,RE_nodes,BA_nodes,LV_nodes,i)
+ local pos1={}
+ pos1.x=LV_nodes[i].x
+ pos1.y=LV_nodes[i].y
+ pos1.z=LV_nodes[i].z
+
+ pos1.x=pos1.x+1
+ check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ pos1.x=pos1.x-2
+ check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ pos1.x=pos1.x+1
+
+ pos1.y=pos1.y+1
+ check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ pos1.y=pos1.y-2
+ check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ pos1.y=pos1.y+1
+
+ pos1.z=pos1.z+1
+ check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ pos1.z=pos1.z-2
+ check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ pos1.z=pos1.z+1
+ return new_node_added
end
-function check_LV_node_subp (PR_nodes,RE_nodes,LV_nodes,pos1)
-meta = minetest.env:get_meta(pos1)
-if meta:get_float("cablelike")==1 then new_node_added=add_new_cable_node(LV_nodes,pos1) end
-for i in ipairs(LV_machines) do
- if minetest.env:get_node(pos1).name == LV_machines[i].machine_name then
- if LV_machines[i].machine_type == "PR" then
- new_node_added=add_new_cable_node(PR_nodes,pos1)
- end
- if LV_machines[i].machine_type == "RE" then
- new_node_added=add_new_cable_node(RE_nodes,pos1)
- end
- end
-end
+function check_LV_node_subp (PR_nodes,RE_nodes,BA_nodes,LV_nodes,pos1)
+ local meta = minetest.env:get_meta(pos1)
+ local name = minetest.env:get_node(pos1).name
+ if meta:get_float("cablelike")==1 then
+ add_new_cable_node(LV_nodes,pos1)
+ elseif LV_machines[name] then
+ --print(name.." is a "..LV_machines[name])
+ if LV_machines[name] == "PR" then
+ add_new_cable_node(PR_nodes,pos1)
+ elseif LV_machines[name] == "RE" then
+ add_new_cable_node(RE_nodes,pos1)
+ elseif LV_machines[name] == "BA" then
+ add_new_cable_node(BA_nodes,pos1)
+ end
+ end
end
--- /dev/null
+-- register MV machines here
+technic.HV_machines = {}
+local HV_machines = technic.HV_machines
+function register_HV_machine(string1,string2)
+ technic.HV_machines[string1] = string2
+end
+
+minetest.register_craft({
+ output = 'technic:hv_battery_box 1',
+ recipe = {
+ {'technic:mv_battery_box', 'technic:mv_battery_box', 'mv_technic:battery_box'},
+ {'technic:mv_battery_box', 'technic:hv_transformer', 'mv_technic:battery_box'},
+ {'', 'technic:hv_cable', ''},
+ }
+ })
+
+hv_battery_box_formspec =
+ "invsize[8,9;]"..
+ "image[1,1;1,2;technic_power_meter_bg.png]"..
+ "list[current_name;src;3,1;1,1;]"..
+ "image[4,1;1,1;technic_battery_reload.png]"..
+ "list[current_name;dst;5,1;1,1;]"..
+ "label[0,0;HV Battery Box]"..
+ "label[3,0;Charge]"..
+ "label[5,0;Discharge]"..
+ "label[1,3;Power level]"..
+ "list[current_player;main;0,5;8,4;]"
+
+minetest.register_node(
+ "technic:hv_battery_box", {
+ description = "HV Battery Box",
+ tiles = {"technic_hv_battery_box_top.png", "technic_hv_battery_box_bottom.png", "technic_hv_battery_box_side0.png",
+ "technic_hv_battery_box_side0.png", "technic_hv_battery_box_side0.png", "technic_hv_battery_box_side0.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ drop="technic:hv_battery_box",
+ on_construct = function(pos)
+ if pos==nil then return end
+ local meta = minetest.env:get_meta(pos)
+ local inv = meta:get_inventory()
+ meta:set_string("infotext", "HV Battery Box")
+ meta:set_float("technic_hv_power_machine", 1)
+ meta:set_string("formspec", battery_box_formspec)
+ inv:set_size("src", 1)
+ inv:set_size("dst", 1)
+ end,
+ can_dig = function(pos,player)
+ if pos==nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("dst") then
+ return false
+ elseif not inv:is_empty("src") then
+ return false
+ end
+ return true
+ end,
+ })
+
+for i=1,8,1 do
+ minetest.register_node(
+ "technic:hv_battery_box"..i, {
+ description = "HV Battery Box",
+ tiles = {"technic_hv_battery_box_top.png", "technic_hv_battery_box_bottom.png", "technic_hv_battery_box_side0.png^technic_power_meter"..i..".png",
+ "technic_hv_battery_box_side0.png^technic_power_meter"..i..".png", "technic_hv_battery_box_side0.png^technic_power_meter"..i..".png", "technic_hv_battery_box_side0.png^technic_power_meter"..i..".png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+ sounds = default.node_sound_wood_defaults(),
+ paramtype="light",
+ light_source=9,
+ drop="technic:hv_battery_box",
+ on_construct = function(pos)
+ local meta = minetest.env:get_meta(pos)
+ local inv = meta:get_inventory()
+ meta:set_string("infotext", "HV Battery box")
+ meta:set_float("technic_hv_power_machine", 1)
+ meta:set_string("formspec", battery_box_formspec)
+ inv:set_size("src", 1)
+ inv:set_size("dst", 1)
+ end,
+ can_dig = function(pos,player)
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("dst") then
+ return false
+ elseif not inv:is_empty("src") then
+ return false
+ end
+ return true
+ end,
+ })
+end
+
+minetest.register_abm(
+ {nodenames = {"technic:hv_battery_box","technic:hv_battery_box1","technic:hv_battery_box2","technic:hv_battery_box3","technic:hv_battery_box4",
+ "technic:hv_battery_box5","technic:hv_battery_box6","technic:hv_battery_box7","technic:hv_battery_box8"
+ },
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ local meta = minetest.env:get_meta(pos)
+ local max_charge = 1500000
+ local charge = meta:get_int("internal_EU_buffer")
+
+ -- Select node textures
+ local i = math.ceil((charge/max_charge)*8)
+ if i > 8 then i = 8 end
+ local j = meta:get_float("last_side_shown")
+ if i~=j then
+ if i>0 then hacky_swap_node(pos,"technic:hv_battery_box"..i)
+ elseif i==0 then hacky_swap_node(pos,"technic:hv_battery_box") end
+ meta:set_float("last_side_shown",i)
+ end
+
+ --charge registered power tools
+ local inv = meta:get_inventory()
+ if inv:is_empty("src")==false then
+ local srcstack = inv:get_stack("src", 1)
+ local src_item=srcstack:to_table()
+ local src_meta=get_item_meta(src_item["metadata"])
+
+ for i=1,registered_power_tools_count,1 do
+ if power_tools[i].tool_name==src_item["name"] then
+ src_meta=get_item_meta(src_item["metadata"])
+ if src_meta==nil then
+ src_meta={}
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ else
+ if src_meta["technic_power_tool"]==nil then
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ end
+ end
+ -- Do the charging
+ local item_max_charge = power_tools[i].max_charge
+ local load1 = src_meta["charge"]
+ local load_step = 16000 -- how much to charge per tick
+ if load1<item_max_charge and charge>0 then
+ if charge-load_step<0 then load_step=charge end
+ if load1+load_step>item_max_charge then load_step=item_max_charge-load1 end
+ load1=load1+load_step
+ charge=charge-load_step
+ set_RE_wear(src_item,load1,item_max_charge)
+ src_meta["charge"]=load1
+ src_item["metadata"]=set_item_meta(src_meta)
+ inv:set_stack("src", 1, src_item)
+ end
+ meta:set_int("internal_EU_buffer",charge)
+ break
+ end
+ end
+ end
+
+ -- discharging registered power tools
+ if inv:is_empty("dst") == false then
+ srcstack = inv:get_stack("dst", 1)
+ src_item=srcstack:to_table()
+ local src_meta=get_item_meta(src_item["metadata"])
+ local item_max_charge=nil
+ for i=1,registered_power_tools_count,1 do
+ if power_tools[i].tool_name==src_item["name"] then
+ src_meta=get_item_meta(src_item["metadata"])
+ if src_meta==nil then
+ src_meta={}
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ else
+ if src_meta["technic_power_tool"]==nil then
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ end
+ end
+ local item_max_charge = power_tools[i].max_charge
+ local load1 = src_meta["charge"]
+ local load_step = 16000 -- how much to discharge per tick
+ if load1>0 and charge<max_charge then
+ if charge+load_step>max_charge then load_step=max_charge-charge end
+ if load1-load_step<0 then load_step=load1 end
+ load1=load1-load_step
+ charge=charge+load_step
+ set_RE_wear(src_item,load1,item_max_charge)
+ src_meta["charge"]=load1
+ src_item["metadata"]=set_item_meta(src_meta)
+ inv:set_stack("dst", 1, src_item)
+ end
+ meta:set_int("internal_EU_buffer",charge)
+ break
+ end
+ end
+ end
+
+
+ local load = math.floor((charge/1500000) * 100)
+ meta:set_string("formspec",
+ hv_battery_box_formspec..
+ "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+ (load)..":technic_power_meter_fg.png]"
+ )
+
+ -- Next index the surrounding network the get the producers and receivers on the
+ local pos1={}
+ 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 = {}
+ local PR_nodes = {}
+ local RE_nodes = {}
+ local BA_nodes = {}
+
+ HV_nodes[1]={}
+ HV_nodes[1].x=pos1.x
+ HV_nodes[1].y=pos1.y
+ HV_nodes[1].z=pos1.z
+ HV_nodes[1].visited=false
+
+ local table_index=1
+ repeat
+ check_HV_node (PR_nodes,RE_nodes,BA_nodes,HV_nodes,table_index)
+ table_index=table_index+1
+ if HV_nodes[table_index]==nil then break end
+ until false
+
+ -- Get power from all connected producers
+ local pr_pos
+ for _,pr_pos in ipairs(PR_nodes) do
+ local meta1 = minetest.env:get_meta(pr_pos)
+ local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
+ local charge_to_take = 4000
+ if charge<max_charge then
+ if internal_EU_buffer-charge_to_take<=0 then
+ charge_to_take=internal_EU_buffer
+ end
+ if charge_to_take>0 then
+ charge=charge+charge_to_take
+ internal_EU_buffer=internal_EU_buffer-charge_to_take
+ meta1:set_float("internal_EU_buffer",internal_EU_buffer)
+ end
+ end
+ end
+
+ if charge>max_charge then charge=max_charge end
+
+ -- Provide power to all connected receivers
+ local re_pos
+ for _,re_pos in ipairs(RE_nodes) do
+ local meta1 = minetest.env:get_meta(re_pos)
+ 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, charge/table.getn(RE_nodes))
+ if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ end
+ if charge-charge_to_give<0 then charge_to_give=charge end
+
+ internal_EU_buffer=internal_EU_buffer+charge_to_give
+ meta1:set_float("internal_EU_buffer",internal_EU_buffer)
+ charge=charge-charge_to_give;
+ end
+ charge=math.floor(charge)
+ meta:set_string("infotext", "MV Battery box: "..charge.."/"..max_charge);
+ meta:set_int("internal_EU_buffer",charge)
+ end
+ })
+
+-- Register as a battery type
+-- Battery type machines function as power reservoirs and can both receive and give back power
+register_HV_machine("technic:hv_battery_box","BA")
+for i=1,8,1 do
+ register_HV_machine("technic:hv_battery_box"..i,"BA")
+end
+
+function add_new_HVcable_node (HV_nodes,pos1)
+ if HV_nodes == nil then return true end
+ local i=1
+ repeat
+ if HV_nodes[i]==nil then break end
+ if pos1.x==HV_nodes[i].x and pos1.y==HV_nodes[i].y and pos1.z==HV_nodes[i].z then return false end
+ i=i+1
+ until false
+ HV_nodes[i]={}
+ HV_nodes[i].x=pos1.x
+ HV_nodes[i].y=pos1.y
+ HV_nodes[i].z=pos1.z
+ return true
+end
+
+function check_HV_node(PR_nodes,RE_nodes,BA_nodes,HV_nodes,i)
+ local pos1={}
+ pos1.x=HV_nodes[i].x
+ pos1.y=HV_nodes[i].y
+ pos1.z=HV_nodes[i].z
+
+ pos1.x=pos1.x+1
+ check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ pos1.x=pos1.x-2
+ check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ pos1.x=pos1.x+1
+
+ pos1.y=pos1.y+1
+ check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ pos1.y=pos1.y-2
+ check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ pos1.y=pos1.y+1
+
+ pos1.z=pos1.z+1
+ check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ pos1.z=pos1.z-2
+ check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ pos1.z=pos1.z+1
+end
+
+function check_HV_node_subp (PR_nodes,RE_nodes,BA_nodes,HV_nodes,pos1)
+ local meta = minetest.env:get_meta(pos1)
+ local name = minetest.env:get_node(pos1).name
+ if meta:get_float("hv_cablelike")==1 then
+ add_new_HVcable_node(HV_nodes,pos1)
+ elseif HV_machines[name] then
+ --print(name.." is a "..HV_machines[name])
+ if HV_machines[name] == "PR" then
+ add_new_HVcable_node(PR_nodes,pos1)
+ elseif HV_machines[name] == "RE" then
+ add_new_HVcable_node(RE_nodes,pos1)
+ elseif HV_machines[name] == "BA" then
+ add_new_HVcable_node(BA_nodes,pos1)
+ end
+ end
+end
-MV_machines = {}
-
-registered_MV_machines_count=0
-
-function register_MV_machine (string1,string2)
-registered_MV_machines_count=registered_MV_machines_count+1
-MV_machines[registered_MV_machines_count]={}
-MV_machines[registered_MV_machines_count].machine_name=string1
-MV_machines[registered_MV_machines_count].machine_type=string2
+-- register MV machines here
+technic.MV_machines = {}
+--local MV_machines = {}
+local MV_machines = technic.MV_machines
+function register_MV_machine(string1,string2)
+ technic.MV_machines[string1] = string2
end
-minetest.register_craft({
- output = 'technic:mv_battery_box 1',
- recipe = {
- {'technic:battery_box', 'technic:battery_box', 'technic:battery_box'},
- {'technic:battery_box', 'technic:mv_transformer', 'technic:battery_box'},
- {'', 'technic:mv_cable', ''},
- }
-})
+minetest.register_craft(
+ {
+ output = 'technic:mv_battery_box 1',
+ recipe = {
+ {'technic:battery_box', 'technic:battery_box', 'technic:battery_box'},
+ {'technic:battery_box', 'technic:mv_transformer', 'technic:battery_box'},
+ {'', 'technic:mv_cable', ''},
+ }
+ })
mv_battery_box_formspec =
- "invsize[8,9;]"..
- "image[1,1;1,2;technic_power_meter_bg.png]"..
- "list[current_name;src;3,1;1,1;]"..
- "image[4,1;1,1;technic_battery_reload.png]"..
- "list[current_name;dst;5,1;1,1;]"..
- "label[0,0;MV_Battery box]"..
- "label[3,0;Charge]"..
- "label[5,0;Discharge]"..
- "label[1,3;Power level]"..
- "list[current_player;main;0,5;8,4;]"
-
-minetest.register_node("technic:mv_battery_box", {
- description = "MV Battery Box",
- tiles = {"technic_mv_battery_box_top.png", "technic_mv_battery_box_bottom.png", "technic_mv_battery_box_side0.png",
- "technic_mv_battery_box_side0.png", "technic_mv_battery_box_side0.png", "technic_mv_battery_box_side0.png"},
- groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
- sounds = default.node_sound_wood_defaults(),
- technic_mv_power_machine=1,
- last_side_shown=0,
- drop="technic:mv_battery_box",
- on_construct = function(pos)
- local meta = minetest.env:get_meta(pos)
- meta:set_string("infotext", "MV Battery box")
- meta:set_float("technic_mv_power_machine", 1)
- meta:set_string("formspec", battery_box_formspec)
- local inv = meta:get_inventory()
- inv:set_size("src", 1)
- inv:set_size("dst", 1)
- battery_charge = 0
- max_charge = 300000
- last_side_shown=0
- end,
- can_dig = function(pos,player)
- local meta = minetest.env:get_meta(pos);
- local inv = meta:get_inventory()
- if not inv:is_empty("dst") then
- return false
- elseif not inv:is_empty("src") then
- return false
+ "invsize[8,9;]"..
+ "image[1,1;1,2;technic_power_meter_bg.png]"..
+ "list[current_name;src;3,1;1,1;]"..
+ "image[4,1;1,1;technic_battery_reload.png]"..
+ "list[current_name;dst;5,1;1,1;]"..
+ "label[0,0;MV_Battery box]"..
+ "label[3,0;Charge]"..
+ "label[5,0;Discharge]"..
+ "label[1,3;Power level]"..
+ "list[current_player;main;0,5;8,4;]"
+
+minetest.register_node(
+ "technic:mv_battery_box", {
+ description = "MV Battery Box",
+ tiles = {"technic_mv_battery_box_top.png", "technic_mv_battery_box_bottom.png", "technic_mv_battery_box_side0.png",
+ "technic_mv_battery_box_side0.png", "technic_mv_battery_box_side0.png", "technic_mv_battery_box_side0.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ drop = "technic:mv_battery_box",
+ on_construct = function(pos)
+ if pos==nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ meta:set_string("infotext", "MV Battery box")
+ meta:set_float("technic_mv_power_machine", 1)
+ meta:set_string("formspec", battery_box_formspec)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 300000)
+ inv:set_size("src", 1)
+ inv:set_size("dst", 1)
+ end,
+ can_dig = function(pos,player)
+ if pos==nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("dst") then
+ return false
+ elseif not inv:is_empty("src") then
+ return false
+ end
+ return true
end
- return true
- end,
-})
+ })
for i=1,8,1 do
-minetest.register_node("technic:mv_battery_box"..i, {
- description = "MV Battery Box",
- tiles = {"technic_mv_battery_box_top.png", "technic_mv_battery_box_bottom.png", "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png",
- "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png", "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png", "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png"},
- groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
- sounds = default.node_sound_wood_defaults(),
- technic_power_machine=1,
- last_side_shown=0,
- drop="technic:mv_battery_box",
- on_construct = function(pos)
- local meta = minetest.env:get_meta(pos)
- meta:set_string("infotext", "MV Battery box")
- meta:set_float("technic_mv_power_machine", 1)
- meta:set_string("formspec", battery_box_formspec)
- local inv = meta:get_inventory()
- inv:set_size("src", 1)
- inv:set_size("dst", 1)
- battery_charge = 0
- max_charge = 300000
- last_side_shown=0
- end,
- can_dig = function(pos,player)
- local meta = minetest.env:get_meta(pos);
- local inv = meta:get_inventory()
- if not inv:is_empty("dst") then
- return false
- elseif not inv:is_empty("src") then
- return false
- end
- return true
- end,
-})
+ minetest.register_node(
+ "technic:mv_battery_box"..i, {
+ description = "MV Battery Box",
+ tiles = {"technic_mv_battery_box_top.png", "technic_mv_battery_box_bottom.png", "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png",
+ "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png", "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png", "technic_mv_battery_box_side0.png^technic_power_meter"..i..".png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+ sounds = default.node_sound_wood_defaults(),
+ drop = "technic:mv_battery_box",
+ on_construct = function(pos)
+ if pos==nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ meta:set_string("infotext", "MV Battery box")
+ meta:set_float("technic_mv_power_machine", 1)
+ meta:set_string("formspec", battery_box_formspec)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 300000)
+ inv:set_size("src", 1)
+ inv:set_size("dst", 1)
+ end,
+ can_dig = function(pos,player)
+ if pos==nil then return end
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("dst") then
+ return false
+ elseif not inv:is_empty("src") then
+ return false
+ end
+ return true
+ end
+ })
end
-
-MV_nodes_visited = {}
-
-
-minetest.register_abm({
- nodenames = {"technic:mv_battery_box","technic:mv_battery_box1","technic:mv_battery_box2","technic:mv_battery_box3","technic:mv_battery_box4",
- "technic:mv_battery_box5","technic:mv_battery_box6","technic:mv_battery_box7","technic:mv_battery_box8"
- },
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider)
- local meta = minetest.env:get_meta(pos)
- charge= meta:get_int("battery_charge")
- max_charge= 300000
- local i=math.ceil((charge/max_charge)*8)
- if i>8 then i=8 end
- j=meta:get_float("last_side_shown")
- if i~=j then
- if i>0 then hacky_swap_node(pos,"technic:mv_battery_box"..i)
- elseif i==0 then hacky_swap_node(pos,"technic:mv_battery_box") end
- meta:set_float("last_side_shown",i)
- end
-
---loading registered power tools
- local inv = meta:get_inventory()
- if inv:is_empty("src")==false then
- local srcstack = inv:get_stack("src", 1)
- local src_item=srcstack:to_table()
- local src_meta=get_item_meta(src_item["metadata"])
-
- local item_max_charge=nil
- for i=1,registered_power_tools_count,1 do
- if power_tools[i].tool_name==src_item["name"] then
- src_meta=get_item_meta(src_item["metadata"])
- if src_meta==nil then
- src_meta={}
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- else
- if src_meta["technic_power_tool"]==nil then
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- end
- end
- item_max_charge=power_tools[i].max_charge
- end
- end
-
- if item_max_charge then
- load1=src_meta["charge"]
- load_step=4000
- if load1<item_max_charge and charge>0 then
- if charge-load_step<0 then load_step=charge end
- if load1+load_step>item_max_charge then load_step=item_max_charge-load1 end
- load1=load1+load_step
- charge=charge-load_step
- set_RE_wear(src_item,load1,item_max_charge)
- src_meta["charge"]=load1
- src_item["metadata"]=set_item_meta(src_meta)
- inv:set_stack("src", 1, src_item)
- end
- meta:set_int("battery_charge",charge)
- end
- end
-
--- dischargin registered power tools
- if inv:is_empty("dst") == false then
- srcstack = inv:get_stack("dst", 1)
- src_item=srcstack:to_table()
- local src_meta=get_item_meta(src_item["metadata"])
- local item_max_charge=nil
- for i=1,registered_power_tools_count,1 do
- if power_tools[i].tool_name==src_item["name"] then
- src_meta=get_item_meta(src_item["metadata"])
- if src_meta==nil then
- src_meta={}
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- else
- if src_meta["technic_power_tool"]==nil then
- src_meta["technic_power_tool"]=true
- src_meta["charge"]=0
- end
- end
- item_max_charge=power_tools[i].max_charge
- end
+minetest.register_abm(
+ {nodenames = {"technic:mv_battery_box","technic:mv_battery_box1","technic:mv_battery_box2","technic:mv_battery_box3","technic:mv_battery_box4",
+ "technic:mv_battery_box5","technic:mv_battery_box6","technic:mv_battery_box7","technic:mv_battery_box8"
+ },
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ local meta = minetest.env:get_meta(pos)
+ local max_charge = 300000 -- Set maximum charge for the device here
+ local charge = meta:get_int("internal_EU_buffer")
+
+ -- Select node textures
+ local i = math.ceil((charge/max_charge)*8)
+ if i > 8 then i = 8 end
+ local j = meta:get_float("last_side_shown")
+ if i~=j then
+ if i>0 then hacky_swap_node(pos,"technic:mv_battery_box"..i)
+ elseif i==0 then hacky_swap_node(pos,"technic:mv_battery_box") end
+ meta:set_float("last_side_shown",i)
end
- if item_max_charge then
- local load1=src_meta["charge"]
- load_step=4000
- if load1>0 and charge<max_charge then
- if charge+load_step>max_charge then load_step=max_charge-charge end
- if load1-load_step<0 then load_step=load1 end
- load1=load1-load_step
- charge=charge+load_step
- set_RE_wear(src_item,load1,item_max_charge)
- src_meta["charge"]=load1
- src_item["metadata"]=set_item_meta(src_meta)
- inv:set_stack("dst", 1, src_item)
- end
+ --charge registered power tools
+ local inv = meta:get_inventory()
+ if inv:is_empty("src")==false then
+ local srcstack = inv:get_stack("src", 1)
+ local src_item=srcstack:to_table()
+ local src_meta=get_item_meta(src_item["metadata"])
+
+ -- Power tools should really be made into a hash table to avoid linear search. But the list is short so okay...
+ for i=1,registered_power_tools_count,1 do
+ if power_tools[i].tool_name==src_item["name"] then
+ -- What is this code doing? Setting tool properties if not set already????
+ src_meta=get_item_meta(src_item["metadata"])
+ if src_meta==nil then
+ src_meta={}
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ else
+ if src_meta["technic_power_tool"]==nil then
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ end
+ end
+ -- Do the charging
+ local item_max_charge = power_tools[i].max_charge
+ local load1 = src_meta["charge"]
+ local load_step = 4000 -- how much to charge per tick
+ if load1<item_max_charge and charge>0 then
+ if charge-load_step<0 then load_step=charge end
+ if load1+load_step>item_max_charge then load_step=item_max_charge-load1 end
+ load1=load1+load_step
+ charge=charge-load_step
+ set_RE_wear(src_item,load1,item_max_charge)
+ src_meta["charge"] = load1
+ src_item["metadata"] = set_item_meta(src_meta)
+ inv:set_stack("src", 1, src_item)
+ end
+ meta:set_int("internal_EU_buffer",charge)
+ break
+ end
+ end
end
+
+ -- discharging registered power tools
+ if inv:is_empty("dst") == false then
+ srcstack = inv:get_stack("dst", 1)
+ src_item=srcstack:to_table()
+ local src_meta=get_item_meta(src_item["metadata"])
+ local item_max_charge=nil
+ for i=1,registered_power_tools_count,1 do
+ if power_tools[i].tool_name==src_item["name"] then
+ src_meta=get_item_meta(src_item["metadata"])
+ if src_meta==nil then
+ src_meta={}
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ else
+ if src_meta["technic_power_tool"]==nil then
+ src_meta["technic_power_tool"]=true
+ src_meta["charge"]=0
+ end
+ end
+ local item_max_charge = power_tools[i].max_charge
+ local load1 = src_meta["charge"]
+ local load_step = 4000 -- how much to discharge per tick
+ if load1>0 and charge<max_charge then
+ if charge+load_step>max_charge then load_step=max_charge-charge end
+ if load1-load_step<0 then load_step=load1 end
+ load1=load1-load_step
+ charge=charge+load_step
+ set_RE_wear(src_item,load1,item_max_charge)
+ src_meta["charge"]=load1
+ src_item["metadata"]=set_item_meta(src_meta)
+ inv:set_stack("dst", 1, src_item)
+ end
+ meta:set_int("internal_EU_buffer",charge)
+ break
+ end
+ end
end
-
- meta:set_int("battery_charge",charge)
- local load = math.floor((charge/300000) * 100)
- meta:set_string("formspec",
+ local load = math.floor((charge/300000) * 100)
+ meta:set_string("formspec",
mv_battery_box_formspec..
- "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
- (load)..":technic_power_meter_fg.png]"
- )
-
- local pos1={}
-
- pos1.y=pos.y-1
- pos1.x=pos.x
- pos1.z=pos.z
+ "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+ (load)..":technic_power_meter_fg.png]"
+ )
+ -- Next index the surrounding network the get the producers and receivers on the power grid
+ local pos1 = {}
+ 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
+ meta1 = minetest.env:get_meta(pos1)
+ if meta1:get_float("mv_cablelike")~=1 then return end
local MV_nodes = {}
local PR_nodes = {}
local RE_nodes = {}
+ local BA_nodes = {}
+
+ 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(PR_nodes,RE_nodes,BA_nodes,MV_nodes,table_index)
+ table_index=table_index+1
+ if MV_nodes[table_index]==nil then break end
+ until false
+
+ -- Get power from all connected producers
+ local pr_pos
+ for _,pr_pos in ipairs(PR_nodes) do
+ local meta1 = minetest.env:get_meta(pr_pos)
+ local internal_EU_buffer = meta1:get_float("internal_EU_buffer")
+ local charge_to_take = 1000
+ if charge<max_charge then
+ if internal_EU_buffer-charge_to_take<=0 then
+ charge_to_take=internal_EU_buffer
+ end
+ if charge_to_take>0 then
+ charge=charge+charge_to_take
+ internal_EU_buffer=internal_EU_buffer-charge_to_take
+ meta1:set_float("internal_EU_buffer",internal_EU_buffer)
+ end
+ end
+ end
- MV_nodes[1]={}
- MV_nodes[1].x=pos1.x
- MV_nodes[1].y=pos1.y
- MV_nodes[1].z=pos1.z
- MV_nodes[1].visited=false
-
-table_index=1
- repeat
- check_MV_node (PR_nodes,RE_nodes,MV_nodes,table_index)
- table_index=table_index+1
- if MV_nodes[table_index]==nil then break end
- until false
-
-
-local pos1={}
-i=1
- repeat
- if PR_nodes[i]==nil then break end -- gettin power from all connected producers
- pos1.x=PR_nodes[i].x
- pos1.y=PR_nodes[i].y
- pos1.z=PR_nodes[i].z
- local meta1 = minetest.env:get_meta(pos1)
- local internal_EU_buffer=meta1:get_float("internal_EU_buffer")
- if charge<max_charge then
- charge_to_take=1000
- if internal_EU_buffer-charge_to_take<=0 then
- charge_to_take=internal_EU_buffer
- end
- if charge_to_take>0 then
- charge=charge+charge_to_take
- internal_EU_buffer=internal_EU_buffer-charge_to_take
- meta1:set_float("internal_EU_buffer",internal_EU_buffer)
- end
- end
- i=i+1
- until false
-
-if charge>max_charge then charge=max_charge end
-
-i=1
- repeat
- if RE_nodes[i]==nil then break end
- pos1.x=RE_nodes[i].x -- loading all conected machines buffers
- pos1.y=RE_nodes[i].y
- pos1.z=RE_nodes[i].z
- 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=1000
- if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
- charge_to_give=internal_EU_buffer_size-internal_EU_buffer
- end
- if charge-charge_to_give<0 then charge_to_give=charge end
-
- internal_EU_buffer=internal_EU_buffer+charge_to_give
- meta1:set_float("internal_EU_buffer",internal_EU_buffer)
- charge=charge-charge_to_give;
-
- i=i+1
- until false
- charge=math.floor(charge)
- charge_string=tostring(charge)
- meta:set_string("infotext", "Battery box: "..charge_string.."/"..max_charge);
- meta:set_int("battery_charge",charge)
-
+ if charge>max_charge then charge=max_charge end
+
+ -- Provide power to all connected receivers
+ local re_pos
+ for _,re_pos in ipairs(RE_nodes) do
+ local meta1 = minetest.env:get_meta(re_pos)
+ 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, charge/table.getn(RE_nodes))
+ if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ end
+ if charge-charge_to_give<0 then charge_to_give=charge end
+
+ internal_EU_buffer=internal_EU_buffer+charge_to_give
+ meta1:set_float("internal_EU_buffer",internal_EU_buffer)
+ charge=charge-charge_to_give;
+ end
+ charge=math.floor(charge)
+ meta:set_string("infotext", "MV Battery box: "..charge.."/"..max_charge);
+ meta:set_int("internal_EU_buffer",charge)
+ end
+ })
+
+-- Register as a battery type
+-- Battery type machines function as power reservoirs and can both receive and give back power
+register_MV_machine("technic:mv_battery_box","BA")
+for i=1,8,1 do
+ register_MV_machine("technic:mv_battery_box"..i,"BA")
end
-})
function add_new_MVcable_node (MV_nodes,pos1)
-local i=1
- repeat
- if MV_nodes[i]==nil then break end
- if pos1.x==MV_nodes[i].x and pos1.y==MV_nodes[i].y and pos1.z==MV_nodes[i].z then return false end
- i=i+1
- until false
-MV_nodes[i]={}
-MV_nodes[i].x=pos1.x
-MV_nodes[i].y=pos1.y
-MV_nodes[i].z=pos1.z
-MV_nodes[i].visited=false
-return true
+ if MV_nodes == nil then return true end
+ local i=1
+ repeat
+ if MV_nodes[i]==nil then break end
+ if pos1.x==MV_nodes[i].x and pos1.y==MV_nodes[i].y and pos1.z==MV_nodes[i].z then return false end
+ i=i+1
+ until false
+ MV_nodes[i]={}
+ MV_nodes[i].x=pos1.x
+ MV_nodes[i].y=pos1.y
+ MV_nodes[i].z=pos1.z
+ return true
end
-function check_MV_node (PR_nodes,RE_nodes,MV_nodes,i)
- local pos1={}
- pos1.x=MV_nodes[i].x
- pos1.y=MV_nodes[i].y
- pos1.z=MV_nodes[i].z
- MV_nodes[i].visited=true
- new_node_added=false
-
- pos1.x=pos1.x+1
- check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
- pos1.x=pos1.x-2
- check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
- pos1.x=pos1.x+1
-
- pos1.y=pos1.y+1
- check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
- pos1.y=pos1.y-2
- check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
- pos1.y=pos1.y+1
-
- pos1.z=pos1.z+1
- check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
- pos1.z=pos1.z-2
- check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
- pos1.z=pos1.z+1
-return new_node_added
+function check_MV_node(PR_nodes,RE_nodes,BA_nodes,MV_nodes,i)
+ local pos1={}
+ pos1.x=MV_nodes[i].x
+ pos1.y=MV_nodes[i].y
+ pos1.z=MV_nodes[i].z
+
+ pos1.x=pos1.x+1
+ check_MV_node_subp(PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ pos1.x=pos1.x-2
+ check_MV_node_subp(PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ pos1.x=pos1.x+1
+
+ pos1.y=pos1.y+1
+ check_MV_node_subp(PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ pos1.y=pos1.y-2
+ check_MV_node_subp(PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ pos1.y=pos1.y+1
+
+ pos1.z=pos1.z+1
+ check_MV_node_subp(PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ pos1.z=pos1.z-2
+ check_MV_node_subp(PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ pos1.z=pos1.z+1
end
-function check_MV_node_subp (PR_nodes,RE_nodes,MV_nodes,pos1)
-meta = minetest.env:get_meta(pos1)
-if meta:get_float("mv_cablelike")==1 then new_node_added=add_new_MVcable_node(MV_nodes,pos1) end
-for i in ipairs(MV_machines) do
- if minetest.env:get_node(pos1).name == MV_machines[i].machine_name then
- if MV_machines[i].machine_type == "PR" then
- new_node_added=add_new_MVcable_node(PR_nodes,pos1)
- end
- if MV_machines[i].machine_type == "RE" then
- new_node_added=add_new_MVcable_node(RE_nodes,pos1)
- end
- end
-end
+function check_MV_node_subp (PR_nodes,RE_nodes,BA_nodes,MV_nodes,pos1)
+ local meta = minetest.env:get_meta(pos1)
+ local name = minetest.env:get_node(pos1).name
+ if meta:get_float("mv_cablelike")==1 then
+ add_new_MVcable_node(MV_nodes,pos1)
+ elseif MV_machines[name] then
+ --print(name.." is a "..MV_machines[name])
+ if MV_machines[name] == "PR" then
+ add_new_MVcable_node(PR_nodes,pos1)
+ elseif MV_machines[name] == "RE" then
+ add_new_MVcable_node(RE_nodes,pos1)
+ elseif MV_machines[name] == "BA" then
+ add_new_MVcable_node(BA_nodes,pos1)
+ end
+ end
end
-
-chainsaw_max_charge=30000
+-- Configuration
+local chainsaw_max_charge = 30000 -- 30000 - Maximum charge of the saw
+local chainsaw_charge_per_node = 12 -- 12 - Gives 2500 nodes on a single charge (about 50 complete normal trees)
+local chainsaw_leaves = true -- true - Cut down entire trees, leaves and all
+
register_power_tool ("technic:chainsaw",chainsaw_max_charge)
minetest.register_tool("technic:chainsaw", {
- description = "Chainsaw",
- inventory_image = "technic_chainsaw.png",
- stack_max = 1,
- on_use = function(itemstack, user, pointed_thing)
- if pointed_thing.type=="node" then
- item=itemstack:to_table()
- local meta=get_item_meta(item["metadata"])
- if meta==nil then return end --tool not charghed
- if meta["charge"]==nil then return end
- charge=meta["charge"]
- charge_to_take=600;
- if charge-charge_to_take>0 then
- charge_to_take=chainsaw_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,charge_to_take)
- charge=charge-charge_to_take;
- set_RE_wear(item,charge,chainsaw_max_charge)
- meta["charge"]=charge
- item["metadata"]=set_item_meta(meta)
- itemstack:replace(item)
- return itemstack
- end
- end
- end,
+ description = "Chainsaw",
+ inventory_image = "technic_chainsaw.png",
+ stack_max = 1,
+ on_use = function(itemstack, user, pointed_thing)
+ if pointed_thing.type=="node" then
+ item=itemstack:to_table()
+ local meta=get_item_meta(item["metadata"])
+ if meta==nil then return end --tool not charged
+ if meta["charge"]==nil then return end
+ -- Send current charge to digging function so that the chainsaw will stop after digging a number of nodes.
+ local charge=meta["charge"]
+ if charge < chainsaw_charge_per_node then return end -- only cut if charged
+
+ charge=chainsaw_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,charge)
+ set_RE_wear(item,charge,chainsaw_max_charge)
+ meta["charge"]=charge
+ item["metadata"]=set_item_meta(meta)
+ itemstack:replace(item)
+ return itemstack
+ end
+ end,
})
minetest.register_craft({
- output = 'technic:chainsaw',
- recipe = {
- {'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot', 'technic:battery'},
- {'technic:stainless_steel_ingot', 'technic:motor', 'technic:battery'},
- {'','','moreores:copper_ingot'},
- }
+ output = 'technic:chainsaw',
+ recipe = {
+ {'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot', 'technic:battery'},
+ {'technic:stainless_steel_ingot', 'technic:motor', 'technic:battery'},
+ {'','','moreores:copper_ingot'},
+ }
})
+-- The default stuff
+local timber_nodenames={["default:jungletree"] = true,
+ ["default:papyrus"] = true,
+ ["default:cactus"] = true,
+ ["default:tree"] = true,
+ ["default:apple"] = true
+}
+
+if chainsaw_leaves == true then
+ timber_nodenames["default:leaves"] = true
+end
+
+-- Support moretrees if it is there
+if( minetest.get_modpath("moretrees") ~= nil ) then
+ timber_nodenames["moretrees:apple_tree_trunk"] = true
+ timber_nodenames["moretrees:apple_tree_trunk_sideways"] = true
+ timber_nodenames["moretrees:beech_trunk"] = true
+ timber_nodenames["moretrees:beech_trunk_sideways"] = true
+ timber_nodenames["moretrees:birch_trunk"] = true
+ timber_nodenames["moretrees:birch_trunk_sideways"] = true
+ timber_nodenames["moretrees:fir_trunk"] = true
+ timber_nodenames["moretrees:fir_trunk_sideways"] = true
+ timber_nodenames["moretrees:oak_trunk"] = true
+ timber_nodenames["moretrees:oak_trunk_sideways"] = true
+ timber_nodenames["moretrees:palm_trunk"] = true
+ timber_nodenames["moretrees:palm_trunk_sideways"] = true
+ timber_nodenames["moretrees:pine_trunk"] = true
+ timber_nodenames["moretrees:pine_trunk_sideways"] = true
+ timber_nodenames["moretrees:rubber_tree_trunk"] = true
+ timber_nodenames["moretrees:rubber_tree_trunk_sideways"] = true
+ timber_nodenames["moretrees:rubber_tree_trunk_empty"] = true
+ timber_nodenames["moretrees:rubber_tree_trunk_sideways_empty"] = true
+ timber_nodenames["moretrees:sequoia_trunk"] = true
+ timber_nodenames["moretrees:sequoia_trunk_sideways"] = true
+ timber_nodenames["moretrees:spruce_trunk"] = true
+ timber_nodenames["moretrees:spruce_trunk_sideways"] = true
+ timber_nodenames["moretrees:willow_trunk"] = true
+ timber_nodenames["moretrees:willow_trunk_sideways"] = true
+ timber_nodenames["moretrees:jungletree_trunk"] = true
+ timber_nodenames["moretrees:jungletree_trunk_sideways"] = true
+
+ if chainsaw_leaves == true then
+ timber_nodenames["moretrees:apple_tree_leaves"] = true
+ timber_nodenames["moretrees:oak_leaves"] = true
+ timber_nodenames["moretrees:sequoia_leaves"] = true
+ timber_nodenames["moretrees:birch_leaves"] = true
+ timber_nodenames["moretrees:birch_leaves"] = true
+ timber_nodenames["moretrees:palm_leaves"] = true
+ timber_nodenames["moretrees:spruce_leaves"] = true
+ timber_nodenames["moretrees:spruce_leaves"] = true
+ timber_nodenames["moretrees:pine_leaves"] = true
+ timber_nodenames["moretrees:willow_leaves"] = true
+ timber_nodenames["moretrees:rubber_tree_leaves"] = true
+ timber_nodenames["moretrees:jungletree_leaves_green"] = true
+ timber_nodenames["moretrees:jungletree_leaves_yellow"] = true
+ timber_nodenames["moretrees:jungletree_leaves_red"] = true
+ end
+end
+
+-- Support growing_trees if it is there
+if( minetest.get_modpath("growing_trees") ~= nil ) then
+ timber_nodenames["growing_trees:trunk"] = true
+ timber_nodenames["growing_trees:medium_trunk"] = true
+ timber_nodenames["growing_trees:big_trunk"] = true
+ timber_nodenames["growing_trees:trunk_top"] = true
+ timber_nodenames["growing_trees:trunk_sprout"] = true
+ timber_nodenames["growing_trees:branch_sprout"] = true
+ timber_nodenames["growing_trees:branch"] = true
+ timber_nodenames["growing_trees:branch_xmzm"] = true
+ timber_nodenames["growing_trees:branch_xpzm"] = true
+ timber_nodenames["growing_trees:branch_xmzp"] = true
+ timber_nodenames["growing_trees:branch_xpzp"] = true
+ timber_nodenames["growing_trees:branch_zz"] = true
+ timber_nodenames["growing_trees:branch_xx"] = true
+
+ if chainsaw_leaves == true then
+ timber_nodenames["growing_trees:leaves"] = true
+ end
+end
+
+-- Support growing_cactus if it is there
+if( minetest.get_modpath("growing_cactus") ~= nil ) then
+ timber_nodenames["growing_cactus:sprout"] = true
+ timber_nodenames["growing_cactus:branch_sprout_vertical"] = true
+ timber_nodenames["growing_cactus:branch_sprout_vertical_fixed"] = true
+ timber_nodenames["growing_cactus:branch_sprout_xp"] = true
+ timber_nodenames["growing_cactus:branch_sprout_xm"] = true
+ timber_nodenames["growing_cactus:branch_sprout_zp"] = true
+ timber_nodenames["growing_cactus:branch_sprout_zm"] = true
+ timber_nodenames["growing_cactus:trunk"] = true
+ timber_nodenames["growing_cactus:branch_trunk"] = true
+ timber_nodenames["growing_cactus:branch"] = true
+ timber_nodenames["growing_cactus:branch_xp"] = true
+ timber_nodenames["growing_cactus:branch_xm"] = true
+ timber_nodenames["growing_cactus:branch_zp"] = true
+ timber_nodenames["growing_cactus:branch_zm"] = true
+ timber_nodenames["growing_cactus:branch_zz"] = true
+ timber_nodenames["growing_cactus:branch_xx"] = true
+end
+
+-- Support farming_plus if it is there
+if( minetest.get_modpath("farming_plus") ~= nil ) then
+ if chainsaw_leaves == true then
+ timber_nodenames["farming_plus:cocoa_leaves"] = true
+ end
+end
+
+-- Table for saving what was sawed down
+local produced
+
+-- Saw down trees entry point
+chainsaw_dig_it = function(pos, player,current_charge)
+ local remaining_charge=current_charge
+
+ -- Save the currently installed dropping mechanism so we can restore it.
+ local original_handle_node_drops = minetest.handle_node_drops
+
+ -- A bit of trickery here: use a different node drop callback
+ -- and restore the original afterwards.
+ minetest.handle_node_drops = chainsaw_handle_node_drops
+
+ -- clear result and start sawing things down
+ produced = {}
+ remaining_charge = recursive_dig(pos, remaining_charge, player)
+ minetest.sound_play("chainsaw", {pos = pos, gain = 1.0, max_hear_distance = 10,})
+
+ -- Restore the original noder drop handler
+ minetest.handle_node_drops = original_handle_node_drops
+
+ -- Now drop items for the player
+ local number, produced_item, p
+ for produced_item,number in pairs(produced) do
+ --print("ADDING ITEM: " .. produced_item .. " " .. number)
+ -- Drop stacks of 99 or less
+ p = {
+ x = pos.x + math.random()*4,
+ y = pos.y,
+ z = pos.z + math.random()*4
+ }
+ while number > 99 do
+ minetest.env:add_item(p, produced_item .. " 99")
+ p = {
+ x = pos.x + math.random()*4,
+ y = pos.y,
+ z = pos.z + math.random()*4
+ }
+ number = number - 99
+ end
+ minetest.env:add_item(p, produced_item .. " " .. number)
+ end
+ return remaining_charge
+end
+
+-- Override the default handling routine to be able to count up the
+-- items sawed down so that we can drop them i an nice single stack
+chainsaw_handle_node_drops = function(pos, drops, digger)
+ -- Add dropped items to list of collected nodes
+ local _, dropped_item
+ for _, dropped_item in ipairs(drops) do
+ if produced[dropped_item] == nil then
+ produced[dropped_item] = 1
+ else
+ produced[dropped_item] = produced[dropped_item] + 1
+ end
+ end
+end
+-- This function does all the hard work. Recursively we dig the node at hand
+-- if it is in the table and then search the surroundings for more stuff to dig.
+recursive_dig = function(pos, remaining_charge, player)
+ local node=minetest.env:get_node(pos)
+ local i=1
+ -- Lookup node name in timber table:
+ if timber_nodenames[node.name] ~= nil then
+ -- Return if we are out of power
+ if remaining_charge < chainsaw_charge_per_node then
+ return 0
+ end
+ local np
+ -- wood found - cut it.
+ minetest.env:dig_node(pos)
+ remaining_charge=remaining_charge-chainsaw_charge_per_node
+ -- check surroundings and run recursively if any charge left
+ np={x=pos.x+1, y=pos.y, z=pos.z}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
+ np={x=pos.x+1, y=pos.y, z=pos.z+1}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
+ np={x=pos.x+1, y=pos.y, z=pos.z-1}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
-timber_nodenames={"default:jungletree", "default:papyrus", "default:cactus", "default:tree"}
+ np={x=pos.x-1, y=pos.y, z=pos.z}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
+ np={x=pos.x-1, y=pos.y, z=pos.z+1}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
+ np={x=pos.x-1, y=pos.y, z=pos.z-1}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
-function chainsaw_dig_it (pos, player,charge_to_take)
- charge_to_take=0
- local node=minetest.env:get_node(pos)
- local i=1
- while timber_nodenames[i]~=nil do
- if node.name==timber_nodenames[i] then
- charge_to_take=600
- np={x=pos.x, y=pos.y, z=pos.z}
- while minetest.env:get_node(np).name==timber_nodenames[i] do
- minetest.env:remove_node(np)
- minetest.env:add_item(np, timber_nodenames[i])
- np={x=np.x, y=np.y+1, z=np.z}
- end
- minetest.sound_play("chainsaw", {pos = pos, gain = 1.0, max_hear_distance = 10,})
- return charge_to_take
- end
- i=i+1
- end
+ np={x=pos.x, y=pos.y+1, z=pos.z}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
-return charge_to_take
+ np={x=pos.x, y=pos.y, z=pos.z+1}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
+ np={x=pos.x, y=pos.y, z=pos.z-1}
+ if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
+ remaining_charge = recursive_dig(np, remaining_charge)
+ end
+ return remaining_charge
+ end
+ -- Nothing sawed down
+ return remaining_charge
end
--- /dev/null
+-- Technic CNC v1.0 by kpo
+-- Based on the NonCubic Blocks MOD v1.4 by yves_de_beck
+
+-- Idea:
+-- Somehw have a tabbed/paged panel if the number of shapes should expand
+-- beyond what is available in the panel today.
+-- I could imagine some form of API allowing modders to come with their own node
+-- box definitions and easily stuff it in the this machine for production.
+local shape = {}
+local onesize_products = {
+ slope = 2,
+ slope_edge = 1,
+ slope_inner_edge = 1,
+ pyramid = 2,
+ spike = 1,
+ cylinder = 2,
+ sphere = 1,
+ stick = 8,
+ slope_upsdown = 2,
+ slope_edge_upsdown = 1,
+ slope_inner_edge_upsdown = 1,
+ cylinder_horizontal = 2,
+ slope_lying = 2,
+ onecurvededge = 1,
+ twocurvededge = 1,
+}
+local twosize_products = {
+ element_straight = 4,
+ element_end = 2,
+ element_cross = 1,
+ element_t = 1,
+ element_edge = 2,
+}
+
+--cnc_recipes ={}
+--registered_cnc_recipes_count=1
+--
+--function register_cnc_recipe (string1,string2)
+-- cnc_recipes[registered_cnc_recipes_count]={}
+-- cnc_recipes[registered_cnc_recipes_count].src_name=string1
+-- cnc_recipes[registered_cnc_recipes_count].dst_name=string2
+-- registered_cnc_recipes_count=registered_cnc_recipes_count+1
+-- if unified_inventory then
+-- unified_inventory.register_craft({
+-- type = "cnc milling",
+-- output = string2,
+-- items = {string1},
+-- width = 0,
+-- })
+-- end
+--end
+
+local cnc_formspec =
+ "invsize[9,11;]"..
+ "label[1,0;Choose Milling Program:]"..
+ "image_button[1,0.5;1,1;technic_cnc_slope.png;slope; ]"..
+ "image_button[2,0.5;1,1;technic_cnc_slope_edge.png;slope_edge; ]"..
+ "image_button[3,0.5;1,1;technic_cnc_slope_inner_edge.png;slope_inner_edge; ]"..
+ "image_button[4,0.5;1,1;technic_cnc_pyramid.png;pyramid; ]"..
+ "image_button[5,0.5;1,1;technic_cnc_spike.png;spike; ]"..
+ "image_button[6,0.5;1,1;technic_cnc_cylinder.png;cylinder; ]"..
+ "image_button[7,0.5;1,1;technic_cnc_sphere.png;sphere; ]"..
+ "image_button[8,0.5;1,1;technic_cnc_stick.png;stick; ]"..
+
+ "image_button[1,1.5;1,1;technic_cnc_slope_upsdwn.png;slope_upsdown; ]"..
+ "image_button[2,1.5;1,1;technic_cnc_slope_edge_upsdwn.png;slope_edge_upsdown; ]"..
+ "image_button[3,1.5;1,1;technic_cnc_slope_inner_edge_upsdwn.png;slope_inner_edge_upsdown; ]"..
+ "image_button[4,1.5;1,1;technic_cnc_cylinder_horizontal.png;cylinder_horizontal; ]"..
+
+ "image_button[1,2.5;1,1;technic_cnc_slope_lying.png;slope_lying; ]"..
+ "image_button[2,2.5;1,1;technic_cnc_onecurvededge.png;onecurvededge; ]"..
+ "image_button[3,2.5;1,1;technic_cnc_twocurvededge.png;twocurvededge; ]"..
+
+ "label[1,3.5;Slim Elements half / normal height:]"..
+
+ "image_button[1,4;1,0.5;technic_cnc_full.png;full; ]"..
+ "image_button[1,4.5;1,0.5;technic_cnc_half.png;half; ]"..
+ "image_button[2,4;1,1;technic_cnc_element_straight.png;element_straight; ]"..
+ "image_button[3,4;1,1;technic_cnc_element_end.png;element_end; ]"..
+ "image_button[4,4;1,1;technic_cnc_element_cross.png;element_cross; ]"..
+ "image_button[5,4;1,1;technic_cnc_element_t.png;element_t; ]"..
+ "image_button[6,4;1,1;technic_cnc_element_edge.png;element_edge; ]"..
+
+ "label[0, 5.5;In:]"..
+ "list[current_name;src;0.5,5.5;1,1;]"..
+ "label[4, 5.5;Out:]"..
+ "list[current_name;dst;5,5.5;4,1;]"..
+
+ "list[current_player;main;0,7;8,4;]"
+
+
+local cnc_power_formspec=
+ "label[0,3;Power]"..
+ "image[0,1;1,2;technic_power_meter_bg.png]"
+
+local size = 1;
+
+-- The form handler is declared here because we need it in both the inactive and active modes
+-- in order to be able to change programs wile it is running.
+local form_handler = function(pos, formname, fields, sender)
+ -- REGISTER MILLING PROGRAMS AND OUTPUTS:
+ ------------------------------------------
+ -- Program for half/full size
+ if fields["full"] then
+ size = 1
+ return
+ end
+
+ if fields["half"] then
+ size = 2
+ return
+ end
+
+ -- Resolve the node name and the number of items to make
+ local meta = minetest.env:get_meta(pos)
+ local inv = meta:get_inventory()
+ local inputstack = inv:get_stack("src", 1)
+ local inputname = inputstack:get_name()
+ local multiplier = 0
+ for k, _ in pairs(fields) do
+ -- Set a multipier for the half/full size capable blocks
+ if twosize_products[k] ~= nil then
+ multiplier = size*twosize_products[k]
+ else
+ multiplier = onesize_products[k]
+ end
+
+ if onesize_products[k] ~= nil or twosize_products[k] ~= nil then
+ meta:set_float( "cnc_multiplier", multiplier)
+ meta:set_string("cnc_user", sender:get_player_name())
+ end
+
+ if onesize_products[k] ~= nil or (twosize_products[k] ~= nil and size==2) then
+ meta:set_string("cnc_product", inputname .. "_technic_cnc_" .. k)
+ print(inputname .. "_technic_cnc_" .. k)
+ break
+ end
+
+ if twosize_products[k] ~= nil and size==1 then
+ meta:set_string("cnc_product", inputname .. "_technic_cnc_" .. k .. "_double")
+ print(inputname .. "_technic_cnc_" .. k .. "_double")
+ break
+ end
+ end
+ return
+ end -- callback function
+
+-- The actual block inactive state
+minetest.register_node("technic:cnc", {
+ description = "CNC Milling Machine",
+ tiles = {"technic_cnc_top.png", "technic_cnc_bottom.png", "technic_cnc_side.png",
+ "technic_cnc_side.png", "technic_cnc_side.png", "technic_cnc_front.png"},
+ drawtype = "nodebox",
+ paramtype = "light",
+ paramtype2 = "facedir",
+ 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},
+ },
+ groups = {cracky=2},
+ legacy_facedir_simple = true,
+ technic_power_machine=1,
+ internal_EU_buffer=0;
+ internal_EU_buffer_size=5000;
+ cnc_time = 0;
+ src_time = 0; -- fixme
+
+ on_construct = function(pos)
+ local meta = minetest.env:get_meta(pos)
+ meta:set_string("infotext", "CNC Machine Inactive")
+ meta:set_float("technic_power_machine", 1)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 5000)
+ meta:set_string("formspec", cnc_formspec..cnc_power_formspec)
+ meta:set_float("cnc_time", 0)
+
+ local inv = meta:get_inventory()
+ inv:set_size("src", 1)
+ inv:set_size("dst", 4)
+ end,
+
+ can_dig = function(pos,player)
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("src") or not inv:is_empty("dst") then
+ minetest.chat_send_player(player:get_player_name(), "CNC machine cannot be removed because it is not empty");
+ return false
+ end
+ return true
+ end,
+
+ on_receive_fields = form_handler,
+ })
+
+-- Active state block
+minetest.register_node("technic:cnc_active", {
+ description = "CNC Machine",
+ tiles = {"technic_cnc_top_active.png", "technic_cnc_bottom.png", "technic_cnc_side.png",
+ "technic_cnc_side.png", "technic_cnc_side.png", "technic_cnc_front_active.png"},
+ paramtype2 = "facedir",
+ groups = {cracky=2,not_in_creative_inventory=1},
+ legacy_facedir_simple = true,
+ can_dig = function(pos,player)
+ local meta = minetest.env:get_meta(pos);
+ local inv = meta:get_inventory()
+ if not inv:is_empty("src") or not inv:is_empty("dst") then
+ minetest.chat_send_player(player:get_player_name(), "CNC machine cannot be removed because it is not empty");
+ return false
+ end
+ return true
+ end,
+ on_receive_fields = form_handler,
+})
+
+-- Action code performing the transformation
+minetest.register_abm(
+ {
+ nodenames = {"technic:cnc","technic:cnc_active"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ local meta = minetest.env:get_meta(pos)
+ local charge= meta:get_float("internal_EU_buffer")
+ local max_charge= meta:get_float("internal_EU_buffer_size")
+ local cnc_cost=350
+
+ local load = math.floor((charge/max_charge)*100)
+ meta:set_string("formspec", cnc_formspec..
+ "image[0,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+ (load)..":technic_power_meter_fg.png]"
+ )
+
+ local inv = meta:get_inventory()
+ local srclist = inv:get_list("src")
+ if inv:is_empty("src") then
+ meta:set_float("cnc_on",0)
+ meta:set_string("cnc_product", "") -- Reset the program
+ end
+
+ if (meta:get_float("cnc_on") == 1) then
+ if charge>=cnc_cost then
+ charge=charge-cnc_cost;
+ meta:set_float("internal_EU_buffer",charge)
+ meta:set_float("src_time", meta:get_float("src_time") + 1)
+ if meta:get_float("src_time") >= meta:get_float("cnc_time") then
+ local product = meta:get_string("cnc_product")
+ if inv:room_for_item("dst",product) then
+ -- CNC does the transformation
+ ------------------------------
+ if minetest.registered_nodes[product] ~= nil then
+ inv:add_item("dst",product .. " " .. meta:get_float("cnc_multiplier"))
+ srcstack = inv:get_stack("src", 1)
+ srcstack:take_item()
+ inv:set_stack("src",1,srcstack)
+ if inv:is_empty("src") then
+ meta:set_float("cnc_on",0)
+ meta:set_string("cnc_product", "") -- Reset the program
+-- print("cnc product reset")
+ end
+ else
+ minetest.chat_send_player(meta:get_string("cnc_user"), "CNC machine does not know how to handle this material. Please remove it.");
+ end
+ else
+ minetest.chat_send_player(meta:get_string("cnc_user"), "CNC inventory full!")
+ end
+ meta:set_float("src_time", 0)
+ end
+ end
+ end
+
+ if (meta:get_float("cnc_on")==0) then
+ if not inv:is_empty("src") then
+ local product = meta:get_string("cnc_product")
+ if minetest.registered_nodes[product] ~= nil then
+ meta:set_float("cnc_on",1)
+ hacky_swap_node(pos,"technic:cnc_active")
+ meta:set_string("infotext", "CNC Machine Active")
+ cnc_time=3
+ meta:set_float("cnc_time",cnc_time)
+ meta:set_float("src_time", 0)
+ return
+ end
+ else
+ hacky_swap_node(pos,"technic:cnc")
+ meta:set_string("infotext", "CNC Machine Inactive")
+ end
+ end
+ end
+ })
+
+register_LV_machine ("technic:cnc","RE")
+register_LV_machine ("technic:cnc_active","RE")
+-------------------------
+
+-- CNC Machine Recipe
+-------------------------
+minetest.register_craft({
+ output = 'technic:cnc',
+ recipe = {
+ {'default:glass', 'technic:diamond_drill_head', 'default:glass'},
+ {'technic:control_logic_unit', 'technic:motor', 'default:steel_ingot'},
+ {'default:steel_ingot', 'default:copper_ingot', 'default:steel_ingot'},
+ },
+ })
+-------------------------
\ No newline at end of file
--- /dev/null
+-- API for the technic CNC machine
+-- Again code is adapted from the NonCubic Blocks MOD v1.4 by yves_de_beck
+technic_cnc_api = {}
+
+-- HERE YOU CAN CHANGE THE DETAIL-LEVEL:
+----------------------------------------
+technic_cnc_api.detail_level = 16 -- 16; 1-32
+
+-- REGISTER NONCUBIC FORMS, CREATE MODELS AND RECIPES:
+------------------------------------------------------
+local cnc_sphere =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ local sehne
+ for i = 1, detail-1 do
+ sehne = math.sqrt(0.25 - (((i/detail)-0.5)^2))
+ nodebox[i]={-sehne, (i/detail)-0.5, -sehne, sehne, (i/detail)+(1/detail)-0.5, sehne}
+ end
+ return nodebox
+ end
+
+local cnc_cylinder_horizontal =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ local sehne
+ for i = 1, detail-1 do
+ sehne = math.sqrt(0.25 - (((i/detail)-0.5)^2))
+ nodebox[i]={-0.5, (i/detail)-0.5, -sehne, 0.5, (i/detail)+(1/detail)-0.5, sehne}
+ end
+ return nodebox
+ end
+
+local cnc_cylinder =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ local sehne
+ for i = 1, detail-1 do
+ sehne = math.sqrt(0.25 - (((i/detail)-0.5)^2))
+ nodebox[i]={(i/detail)-0.5, -0.5, -sehne, (i/detail)+(1/detail)-0.5, 0.5, sehne}
+ end
+ return nodebox
+ end
+
+local cnc_twocurvededge =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level*2
+ local sehne
+ for i = (detail/2)-1, detail-1 do
+ sehne = math.sqrt(0.25 - (((i/detail)-0.5)^2))
+ nodebox[i]={-sehne, -0.5, -sehne, 0.5, (i/detail)+(1/detail)-0.5, 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_onecurvededge =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level*2
+ local sehne
+ for i = (detail/2)-1, detail-1 do
+ sehne = math.sqrt(0.25 - (((i/detail)-0.5)^2))
+ nodebox[i]={-0.5, -0.5, -sehne, 0.5, (i/detail)+(1/detail)-0.5, 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_spike =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={(i/detail/2)-0.5, (i/detail/2)-0.5, (i/detail/2)-0.5, 0.5-(i/detail/2), (i/detail)-0.5+(1/detail), 0.5-(i/detail/2)}
+end
+ return nodebox
+ end
+
+local cnc_pyramid =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level/2
+ for i = 0, detail-1 do
+ nodebox[i+1]={(i/detail/2)-0.5, (i/detail/2)-0.5, (i/detail/2)-0.5, 0.5-(i/detail/2), (i/detail/2)-0.5+(1/detail), 0.5-(i/detail/2)}
+ end
+ return nodebox
+ end
+
+local cnc_slope_inner_edge_upsdown =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={0.5-(i/detail)-(1/detail), (i/detail)-0.5, -0.5, 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ nodebox[i+detail+1]={-0.5, (i/detail)-0.5, 0.5-(i/detail)-(1/detail), 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_slope_edge_upsdown =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={(-1*(i/detail))+0.5-(1/detail), (i/detail)-0.5, (-1*(i/detail))+0.5-(1/detail), 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_slope_inner_edge =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={(i/detail)-0.5, -0.5, -0.5, 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ nodebox[i+detail+1]={-0.5, -0.5, (i/detail)-0.5, 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_slope_edge =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={(i/detail)-0.5, -0.5, (i/detail)-0.5, 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_slope_upsdown =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={-0.5, (i/detail)-0.5, (-1*(i/detail))+0.5-(1/detail), 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_slope_lying =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={(i/detail)-0.5, -0.5, (i/detail)-0.5, (i/detail)-0.5+(1/detail), 0.5 , 0.5}
+ end
+ return nodebox
+ end
+
+local cnc_slope =
+ function()
+ local nodebox = {}
+ local detail = technic_cnc_api.detail_level
+ for i = 0, detail-1 do
+ nodebox[i+1]={-0.5, (i/detail)-0.5, (i/detail)-0.5, 0.5, (i/detail)-0.5+(1/detail), 0.5}
+ end
+ return nodebox
+ end
+
+-- Define slope boxes for the various nodes
+-------------------------------------------
+technic_cnc_api.cnc_programs = {
+ {suffix = "technic_cnc_stick",
+ nodebox = {-0.15, -0.5, -0.15, 0.15, 0.5, 0.15},
+ desc = "Stick"},
+
+ {suffix = "technic_cnc_element_end_double",
+ nodebox = {-0.3, -0.5, -0.3, 0.3, 0.5, 0.5},
+ desc = "Element End Double"},
+
+ {suffix = "technic_cnc_element_cross_double",
+ nodebox = {
+ {0.3, -0.5, -0.3, 0.5, 0.5, 0.3},
+ {-0.3, -0.5, -0.5, 0.3, 0.5, 0.5},
+ {-0.5, -0.5, -0.3, -0.3, 0.5, 0.3}},
+ desc = "Element Cross Double"},
+
+ {suffix = "technic_cnc_element_t_double",
+ nodebox = {
+ {-0.3, -0.5, -0.5, 0.3, 0.5, 0.3},
+ {-0.5, -0.5, -0.3, -0.3, 0.5, 0.3},
+ {0.3, -0.5, -0.3, 0.5, 0.5, 0.3}},
+ desc = "Element T Double"},
+
+ {suffix = "technic_cnc_element_edge_double",
+ nodebox = {
+ {-0.3, -0.5, -0.5, 0.3, 0.5, 0.3},
+ {-0.5, -0.5, -0.3, -0.3, 0.5, 0.3}},
+ desc = "Element Edge Double"},
+
+ {suffix = "technic_cnc_element_straight_double",
+ nodebox = {-0.3, -0.5, -0.5, 0.3, 0.5, 0.5},
+ desc = "Element Straight Double"},
+
+ {suffix = "technic_cnc_element_end",
+ nodebox = {-0.3, -0.5, -0.3, 0.3, 0, 0.5},
+ desc = "Element End"},
+
+ {suffix = "technic_cnc_element_cross",
+ nodebox = {
+ {0.3, -0.5, -0.3, 0.5, 0, 0.3},
+ {-0.3, -0.5, -0.5, 0.3, 0, 0.5},
+ {-0.5, -0.5, -0.3, -0.3, 0, 0.3}},
+ desc = "Element Cross"},
+
+ {suffix = "technic_cnc_element_t",
+ nodebox = {
+ {-0.3, -0.5, -0.5, 0.3, 0, 0.3},
+ {-0.5, -0.5, -0.3, -0.3, 0, 0.3},
+ {0.3, -0.5, -0.3, 0.5, 0, 0.3}},
+ desc = "Element T"},
+
+ {suffix = "technic_cnc_element_edge",
+ nodebox = {
+ {-0.3, -0.5, -0.5, 0.3, 0, 0.3},
+ {-0.5, -0.5, -0.3, -0.3, 0, 0.3}},
+ desc = "Element Edge"},
+
+ {suffix = "technic_cnc_element_straight",
+ nodebox = {-0.3, -0.5, -0.5, 0.3, 0, 0.5},
+ desc = "Element Straight"},
+
+ {suffix = "technic_cnc_sphere",
+ nodebox = cnc_sphere(),
+ desc = "Sphere"},
+
+ {suffix = "technic_cnc_cylinder_horizontal",
+ nodebox = cnc_cylinder_horizontal(),
+ desc = "Cylinder Horizontal"},
+
+ {suffix = "technic_cnc_cylinder",
+ nodebox = cnc_cylinder(),
+ desc = ""},
+
+ {suffix = "technic_cnc_twocurvededge",
+ nodebox = cnc_twocurvededge(),
+ desc = "One Curved Edge Block"},
+
+ {suffix = "technic_cnc_onecurvededge",
+ nodebox = cnc_onecurvededge(),
+ desc = "Two Curved Edge Block"},
+
+ {suffix = "technic_cnc_spike",
+ nodebox = cnc_spike(),
+ desc = "Spike"},
+
+ {suffix = "technic_cnc_pyramid",
+ nodebox = cnc_pyramid(),
+ desc = "Pyramid"},
+
+ {suffix = "technic_cnc_slope_inner_edge_upsdown",
+ nodebox = cnc_slope_inner_edge_upsdown(),
+ desc = "Slope Upside Down Inner Edge"},
+
+ {suffix = "technic_cnc_slope_edge_upsdown",
+ nodebox = cnc_slope_edge_upsdown(),
+ desc = "Slope Upside Down Edge"},
+
+ {suffix = "technic_cnc_slope_inner_edge",
+ nodebox = cnc_slope_inner_edge(),
+ desc = "Slope Inner Edge"},
+
+ {suffix = "technic_cnc_slope_edge",
+ nodebox = cnc_slope_edge(),
+ desc = "Slope Edge"},
+
+ {suffix = "technic_cnc_slope_upsdown",
+ nodebox = cnc_slope_upsdown(),
+ desc = "Slope Upside Down"},
+
+ {suffix = "technic_cnc_slope_lying",
+ nodebox = cnc_slope_lying(),
+ desc = "Slope Lying"},
+
+ {suffix = "technic_cnc_slope",
+ nodebox = cnc_slope(),
+ desc = "Slope"},
+-- {suffix = "",
+-- nodebox =},
+}
+
+-- Allow disabling certain programs for some node. Default is allowing all types for all nodes
+technic_cnc_api.cnc_programs_disable = {
+ -- ["default:brick"] = {"technic_cnc_stick"}, -- Example: Disallow the stick for brick
+ -- ...
+ ["default:dirt"] = {"technic_cnc_sphere", "technic_cnc_slope_upsdown", "technic_cnc_edge",
+ "technic_cnc_inner_edge", "technic_cnc_slope_edge_upsdown", "technic_cnc_slope_inner_edge_upsdown",
+ "technic_cnc_stick", "technic_cnc_cylinder_horizontal"}
+}
+
+-- Generic function for registering all the different node types
+function technic_cnc_api.register_cnc_program(recipeitem, suffix, nodebox, groups, images, description)
+ minetest.register_node(":" .. recipeitem .. "_" .. suffix, {
+ description = description,
+ drawtype = "nodebox",
+ tiles = images,
+ paramtype = "light",
+ paramtype2 = "facedir",
+ walkable = true,
+ selection_box = {
+ type = "fixed",
+ fixed = nodebox
+ },
+ node_box = {
+ type = "fixed",
+ fixed = nodebox
+ },
+ groups = groups,
+ })
+end
+
+-- function to iterate over all the programs the CNC machine knows
+function technic_cnc_api.register_all(recipeitem, groups, images, description)
+ for _, data in ipairs(technic_cnc_api.cnc_programs) do
+ -- Disable node creation for disabled node types for some material
+ local do_register = true
+ if technic_cnc_api.cnc_programs_disable[recipeitem] ~= nil then
+ for __, disable in ipairs(technic_cnc_api.cnc_programs_disable[recipeitem]) do
+ if disable == data.suffix then
+ do_register = false
+ end
+ end
+ end
+ -- Create the node if it passes the test
+ if do_register then
+ technic_cnc_api.register_cnc_program(recipeitem, data.suffix, data.nodebox, groups, images, description.." "..data.desc)
+ end
+ end
+end
+
+
+-- REGISTER NEW TECHNIC_CNC_API's PART 2: technic_cnc_api.register_element_end(subname, recipeitem, groups, images, desc_element_xyz)
+-----------------------------------------------------------------------------------------------------------------------
+function technic_cnc_api.register_slope_edge_etc(recipeitem, groups, images, desc_slope, desc_slope_lying, desc_slope_upsdown, desc_slope_edge, desc_slope_inner_edge, desc_slope_upsdwn_edge, desc_slope_upsdwn_inner_edge, desc_pyramid, desc_spike, desc_onecurvededge, desc_twocurvededge, desc_cylinder, desc_cylinder_horizontal, desc_sphere, desc_element_straight, desc_element_edge, desc_element_t, desc_element_cross, desc_element_end)
+
+ technic_cnc_api.register_slope(recipeitem, groups, images, desc_slope)
+ technic_cnc_api.register_slope_lying(recipeitem, groups, images, desc_slope_lying)
+ technic_cnc_api.register_slope_upsdown(recipeitem, groups, images, desc_slope_upsdown)
+ technic_cnc_api.register_slope_edge(recipeitem, groups, images, desc_slope_edge)
+ technic_cnc_api.register_slope_inner_edge(recipeitem, groups, images, desc_slope_inner_edge)
+ technic_cnc_api.register_slope_edge_upsdown(recipeitem, groups, images, desc_slope_upsdwn_edge)
+ technic_cnc_api.register_slope_inner_edge_upsdown(recipeitem, groups, images, desc_slope_upsdwn_inner_edge)
+ technic_cnc_api.register_pyramid(recipeitem, groups, images, desc_pyramid)
+ technic_cnc_api.register_spike(recipeitem, groups, images, desc_spike)
+ technic_cnc_api.register_onecurvededge(recipeitem, groups, images, desc_onecurvededge)
+ technic_cnc_api.register_twocurvededge(recipeitem, groups, images, desc_twocurvededge)
+ technic_cnc_api.register_cylinder(recipeitem, groups, images, desc_cylinder)
+ technic_cnc_api.register_cylinder_horizontal(recipeitem, groups, images, desc_cylinder_horizontal)
+ technic_cnc_api.register_sphere(recipeitem, groups, images, desc_sphere)
+ technic_cnc_api.register_element_straight(recipeitem, groups, images, desc_element_straight)
+ technic_cnc_api.register_element_edge(recipeitem, groups, images, desc_element_edge)
+ technic_cnc_api.register_element_t(recipeitem, groups, images, desc_element_t)
+ technic_cnc_api.register_element_cross(recipeitem, groups, images, desc_element_cross)
+ technic_cnc_api.register_element_end(recipeitem, groups, images, desc_element_end)
+end
+
+-- REGISTER STICKS: noncubic.register_xyz(recipeitem, groups, images, desc_element_xyz)
+------------------------------------------------------------------------------------------------------------
+function technic_cnc_api.register_stick_etc(recipeitem, groups, images, desc_stick)
+ technic_cnc_api.register_stick(recipeitem, groups, images, desc_stick)
+end
+
+function technic_cnc_api.register_elements(recipeitem, groups, images, desc_element_straight_double, desc_element_edge_double, desc_element_t_double, desc_element_cross_double, desc_element_end_double)
+ technic_cnc_api.register_element_straight_double(recipeitem, groups, images, desc_element_straight_double)
+ technic_cnc_api.register_element_edge_double(recipeitem, groups, images, desc_element_edge_double)
+ technic_cnc_api.register_element_t_double(recipeitem, groups, images, desc_element_t_double)
+ technic_cnc_api.register_element_cross_double(recipeitem, groups, images, desc_element_cross_double)
+ technic_cnc_api.register_element_end_double(recipeitem, groups, images, desc_element_end_double)
+end
--- /dev/null
+-- REGISTER MATERIALS AND PROPERTIES FOR NONCUBIC ELEMENTS:
+-----------------------------------------------------------
+-- DIRT
+-------
+technic_cnc_api.register_all("default:dirt",
+ {snappy=2,choppy=2,oddly_breakable_by_hand=3,not_in_creative_inventory=1},
+ {"default_grass.png", "default_dirt.png", "default_grass.png"},
+ "Dirt")
+technic_cnc_api.cnc_programs_disable["default:dirt"] = {"technic_cnc_sphere", "technic_cnc_slope_upsdown",
+ "technic_cnc_edge", "technic_cnc_inner_edge",
+ "technic_cnc_slope_edge_upsdown", "technic_cnc_slope_inner_edge_upsdown",
+ "technic_cnc_stick", "technic_cnc_cylinder_horizontal"}
+
+-- TREE
+-------
+technic_cnc_api.register_all("default:tree",
+ {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+ {"default_tree.png"},
+ "Wooden")
+
+-- WOOD
+-------
+technic_cnc_api.register_all("default:wood",
+ {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+ {"default_wood.png"},
+ "Wooden")
+-- STONE
+--------
+technic_cnc_api.register_all("default:stone",
+ {cracky=3,not_in_creative_inventory=1},
+ {"default_stone.png"},
+ "Stone")
+-- COBBLE
+---------
+technic_cnc_api.register_all("default:cobble",
+ {cracky=3,not_in_creative_inventory=1},
+ {"default_cobble.png"},
+ "Cobble")
+-- BRICK
+--------
+technic_cnc_api.register_all("default:brick",
+ {cracky=3,not_in_creative_inventory=1},
+ {"default_brick.png"},
+ "Brick")
+
+-- SANDSTONE
+------------
+technic_cnc_api.register_all("default:sandstone",
+ {crumbly=2,cracky=2,not_in_creative_inventory=1},
+ {"default_sandstone.png"},
+ "Sandstone")
+
+-- LEAVES
+---------
+technic_cnc_api.register_all("default:leaves",
+ {snappy=2,choppy=2,oddly_breakable_by_hand=3,not_in_creative_inventory=1},
+ {"default_leaves.png"},
+ "Leaves")
+-- TREE
+-------
+technic_cnc_api.register_all("default:tree",
+ {snappy=1,choppy=2,oddly_breakable_by_hand=2,flammable=3,wood=1,not_in_creative_inventory=1},
+ {"default_tree.png"},
+ "Tree")
+-- STEEL
+--------
+technic_cnc_api.register_all("default:steel",
+ {snappy=1,bendy=2,cracky=1,melty=2,level=2,not_in_creative_inventory=1},
+ {"default_steel_block.png"},
+ "Steel")
-enable_technic_inventory=true
-enable_mining_drill=true
-enable_mining_laser=true
-enable_flashlight=true
-enable_rubber_tree_generation=true
-enable_marble_generation=true
-enable_granite_generation=true
+technic.config = {}
+
+technic.config.loaded = {}
+
+technic.config.default = {
+ enable_mining_drill = "true",
+ enable_mining_laser = "true",
+ enable_flashlight = "true",
+ enable_item_drop = "true",
+ enable_item_pickup = "true",
+ enable_rubber_tree_generation = "true",
+ enable_marble_generation = "true",
+ enable_granite_generation = "true"
+}
+
+function technic.config:load(filename)
+ file, error = io.open(filename, "r")
+ if error then return end
+ local line = file:read("*l")
+ while line do
+ local found, _, setting, value = line:find("^([^#%s=]+)%s?=%s?([^%s#]+)")
+ if found then
+ self.loaded[setting] = value
+ end
+ line = file:read("*l")
+ end
+ file:close()
+end
+
+technic.config:load(minetest.get_worldpath().."/technic.conf")
+
+function technic.config:get(setting)
+ if self.loaded[setting] then
+ return self.loaded[setting]
+ else
+ return self.default[setting]
+ end
+end
+
+function technic.config:getBool(setting)
+ return string.lower(self:get(setting)) == "true"
+end
moreores
pipeworks
mesecons
-technic_worldgen
-
+moretrees
--- /dev/null
+-- 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")
--- /dev/null
+-- 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")
output = 'technic:geothermal',
recipe = {
{'default:stone', 'default:stone', 'default:stone'},
- {'moreores:copper_ingot', 'technic:diamond', 'moreores:copper_ingot'},
- {'default:stone', 'moreores:copper_ingot', 'default:stone'},
+ {'default:copper_ingot', 'default:diamond', 'default:copper_ingot'},
+ {'default:stone', 'default:copper_ingot', 'default:stone'},
}
})
grinder_recipes[registered_grinder_recipes_count].src_name=string1
grinder_recipes[registered_grinder_recipes_count].dst_name=string2
registered_grinder_recipes_count=registered_grinder_recipes_count+1
-if UI_recipes_hook then
- minetest.register_craft({
+if unified_inventory then
+ unified_inventory.register_craft({
type = "grinding",
output = string2,
- recipe = string1,
+ items = {string1},
+ width = 0,
})
end
end
register_grinder_recipe("default:cobble","default:gravel")
register_grinder_recipe("default:gravel","default:dirt")
register_grinder_recipe("default:desert_stone","default:desert_sand")
-register_grinder_recipe("default:iron_lump","technic:iron_dust 2")
-register_grinder_recipe("default:coal_lump","technic:coal_dust 2")
-register_grinder_recipe("moreores:copper_lump","technic:copper_dust 2")
+register_grinder_recipe("default:iron_lump","technic:iron_dust 2")
+register_grinder_recipe("default:steel_ingot","technic:iron_dust 1")
+register_grinder_recipe("default:coal_lump","technic:coal_dust 2")
register_grinder_recipe("default:copper_lump","technic:copper_dust 2")
-register_grinder_recipe("moreores:tin_lump","technic:tin_dust 2")
+register_grinder_recipe("default:copper_ingot","technic:copper_dust 1")
+register_grinder_recipe("default:gold_lump","technic:gold_dust 2")
+register_grinder_recipe("default:gold_ingot","technic:gold_dust 1")
+--register_grinder_recipe("default:bronze_ingot","technic:bronze_dust 1") -- Dust does not exist yet
+--register_grinder_recipe("home_decor:brass_ingot","technic:brass_dust 1") -- needs check for the mod
+register_grinder_recipe("moreores:tin_lump","technic:tin_dust 2")
+register_grinder_recipe("moreores:tin_ingot","technic:tin_dust 1")
register_grinder_recipe("moreores:silver_lump","technic:silver_dust 2")
-register_grinder_recipe("moreores:gold_lump","technic:gold_dust 2")
-register_grinder_recipe("default:gold_lump","technic:gold_dust 2")
-register_grinder_recipe("moreores:mithril_lump","technic:mithril_dust 2")
-register_grinder_recipe("technic:chromium_lump","technic:chromium_dust 2")
-register_grinder_recipe("technic:zinc_lump","technic:zinc_dust 2")
-register_grinder_recipe("technic:coal_dust","dye:black 2")
-register_grinder_recipe("default:cactus","dye:green 2")
-register_grinder_recipe("default:dry_shrub","dye:brown 2")
-register_grinder_recipe("flowers:flower_geranium","dye:blue 2")
-register_grinder_recipe("flowers:flower_dandelion_white","dye:white 2")
-register_grinder_recipe("flowers:flower_dandelion_yellow","dye:yellow 2")
-register_grinder_recipe("flowers:flower_tulip","dye:orange 2")
-register_grinder_recipe("flowers:flower_rose","dye:red 2")
-register_grinder_recipe("flowers:flower_viola","dye:violet 2")
+register_grinder_recipe("moreores:silver_ingot","technic:silver_dust 1")
+register_grinder_recipe("moreores:mithril_lump","technic:mithril_dust 2")
+register_grinder_recipe("moreores:mithril_ingot","technic:mithril_dust 1")
+register_grinder_recipe("technic:chromium_lump","technic:chromium_dust 2")
+register_grinder_recipe("technic:chromium_ingot","technic:chromium_dust 1")
+register_grinder_recipe("technic:stainless_steel_ingot","stainless_steel_dust 1")
+register_grinder_recipe("technic:brass_ingot","technic:brass_dust 1")
+register_grinder_recipe("technic:zinc_lump","technic:zinc_dust 2")
+register_grinder_recipe("technic:zinc_ingot","technic:zinc_dust 1")
+register_grinder_recipe("technic:coal_dust","dye:black 2")
+register_grinder_recipe("default:cactus","dye:green 2")
+register_grinder_recipe("default:dry_shrub","dye:brown 2")
+register_grinder_recipe("flowers:flower_geranium","dye:blue 2")
+register_grinder_recipe("flowers:flower_dandelion_white","dye:white 2")
+register_grinder_recipe("flowers:flower_dandelion_yellow","dye:yellow 2")
+register_grinder_recipe("flowers:flower_tulip","dye:orange 2")
+register_grinder_recipe("flowers:flower_rose","dye:red 2")
+register_grinder_recipe("flowers:flower_viola","dye:violet 2")
minetest.register_craftitem( "technic:coal_dust", {
description = "Coal Dust",
type = "cooking",
output = "default:steel_ingot",
recipe = "technic:iron_dust",
-})
+})
minetest.register_craftitem( "technic:copper_dust", {
description = "Copper Dust",
type = "cooking",
output = "moreores:copper_ingot",
recipe = "technic:copper_dust",
-})
+})
minetest.register_craftitem( "technic:tin_dust", {
description = "Tin Dust",
type = "cooking",
output = "moreores:tin_ingot",
recipe = "technic:tin_dust",
-})
+})
minetest.register_craftitem( "technic:silver_dust", {
description = "Silver Dust",
type = "cooking",
output = "moreores:silver_ingot",
recipe = "technic:silver_dust",
-})
+})
minetest.register_craftitem( "technic:gold_dust", {
description = "Gold Dust",
type = "cooking",
output = "moreores:gold_ingot",
recipe = "technic:gold_dust",
-})
+})
minetest.register_craftitem( "technic:mithril_dust", {
description = "Mithril Dust",
type = "cooking",
output = "moreores:mithril_ingot",
recipe = "technic:mithril_dust",
-})
+})
minetest.register_craftitem( "technic:chromium_dust", {
description = "Chromium Dust",
type = "cooking",
output = "technic:chromium_ingot",
recipe = "technic:chromium_dust",
-})
+})
minetest.register_craftitem( "technic:bronze_dust", {
description = "Bronze Dust",
type = "cooking",
output = "moreores:bronze_ingot",
recipe = "technic:bronze_dust",
-})
+})
minetest.register_craftitem( "technic:brass_dust", {
description = "Brass Dust",
type = "cooking",
output = "technic:brass_ingot",
recipe = "technic:brass_dust",
-})
+})
minetest.register_craftitem( "technic:stainless_steel_dust", {
description = "Stainless Steel Dust",
type = "cooking",
output = "technic:stainless_steel_ingot",
recipe = "technic:stainless_steel_dust",
-})
+})
minetest.register_craftitem( "technic:zinc_dust", {
description = "Zinc Dust",
type = "cooking",
output = "technic:zinc_ingot",
recipe = "technic:zinc_dust",
-})
+})
minetest.register_alias("grinder", "technic:grinder")
minetest.register_craft({
minetest.register_craftitem("technic:grinder", {
description = "Grinder",
stack_max = 99,
-})
+})
grinder_formspec =
"invsize[8,9;]"..
local inv = meta:get_inventory()
local srclist = inv:get_list("src")
- if inv:is_empty("src") then meta:set_float("grinder_on",0) end
+ if inv:is_empty("src") then meta:set_float("grinder_on",0) end
if (meta:get_float("grinder_on") == 1) then
if charge>=grind_cost then
meta:set_float("src_time", meta:get_float("src_time") + 1)
if meta:get_float("src_time") >= meta:get_float("grind_time") then
-- check if there's room for output in "dst" list
- grinded = get_grinded_item (inv:get_stack("src", 1))
+ grinded = get_grinded_item (inv:get_stack("src", 1))
if inv:room_for_item("dst",grinded) then
-- Put result in "dst" list
inv:add_item("dst", grinded)
srcstack = inv:get_stack("src", 1)
srcstack:take_item()
inv:set_stack("src", 1, srcstack)
- if inv:is_empty("src") then meta:set_float("grinder_on",0) end
+ if inv:is_empty("src") then meta:set_float("grinder_on",0) end
else
print("Grinder inventory full!")
end
end
end
if (meta:get_float("grinder_on")==0) then
- local grinded=nil
+ local grinded=nil
if not inv:is_empty("src") then
grinded = get_grinded_item (inv:get_stack("src", 1))
- if grinded then
+ if grinded then
meta:set_float("grinder_on",1)
hacky_swap_node(pos,"technic:grinder_active")
meta:set_string("infotext", "Grinder Active")
meta:set_float("src_time", 0)
return
end
- else
+ else
hacky_swap_node(pos,"technic:grinder")
meta:set_string("infotext", "Grinder Inactive")
end
end
end
-})
+})
function get_grinded_item (items)
new_item =nil
-- namespace: technic
-- (c) 2012-2013 by RealBadAngel <mk@realbadangel.pl>
+technic = {}
+
modpath=minetest.get_modpath("technic")
--Read technic config file
dofile(modpath.."/alloy_furnaces_commons.lua")
dofile(modpath.."/alloy_furnace.lua")
dofile(modpath.."/solar_panel.lua")
+dofile(modpath.."/solar_array_lv.lua")
dofile(modpath.."/geothermal.lua")
dofile(modpath.."/water_mill.lua")
dofile(modpath.."/electric_furnace.lua")
dofile(modpath.."/music_player.lua")
dofile(modpath.."/generator.lua")
dofile(modpath.."/grinder.lua")
+dofile(modpath.."/cnc.lua")
+dofile(modpath.."/cnc_api.lua")
+dofile(modpath.."/cnc_nodes.lua")
--MV machines
dofile(modpath.."/wires_mv.lua")
dofile(modpath.."/battery_box_mv.lua")
-dofile(modpath.."/solar_panel_mv.lua")
+dofile(modpath.."/solar_array_mv.lua")
+dofile(modpath.."/down_converter_mv.lua")
dofile(modpath.."/electric_furnace_mv.lua")
dofile(modpath.."/alloy_furnace_mv.lua")
dofile(modpath.."/forcefield.lua")
+--HV machines
+dofile(modpath.."/wires_hv.lua")
+dofile(modpath.."/battery_box_hv.lua")
+dofile(modpath.."/solar_array_hv.lua")
+dofile(modpath.."/down_converter_hv.lua")
+
--Tools
-if enable_mining_drill==true then dofile(modpath.."/mining_drill.lua") end
-if enable_mining_laser==true then dofile(modpath.."/mining_laser_mk1.lua") end
-if enable_flashlight==true then dofile(modpath.."/flashlight.lua") end
+if technic.config:getBool("enable_mining_drill") then dofile(modpath.."/mining_drill.lua") end
+if technic.config:getBool("enable_mining_laser") then dofile(modpath.."/mining_laser_mk1.lua") end
+if technic.config:getBool("enable_flashlight") then dofile(modpath.."/flashlight.lua") end
dofile(modpath.."/cans.lua")
dofile(modpath.."/chainsaw.lua")
dofile(modpath.."/tree_tap.lua")
}
})
+minetest.register_craftitem( "technic:lv_transformer", {
+ description = "Low Voltage Transformer",
+ inventory_image = "technic_lv_transformer.png",
+ on_place_on_ground = minetest.craftitem_place_item,
+})
+
+minetest.register_craft({
+ output = 'technic:lv_transformer',
+ recipe = {
+ {'default:iron_lump', 'default:iron_lump', 'default:iron_lump'},
+ {'technic:copper_coil', 'default:iron_lump', 'technic:copper_coil'},
+ {'default:iron_lump', 'default:iron_lump', 'default:iron_lump'},
+ }
+})
+
minetest.register_craftitem( "technic:mv_transformer", {
description = "Medium Voltage Transformer",
inventory_image = "technic_mv_transformer.png",
}
})
+minetest.register_craftitem( "technic:hv_transformer", {
+ description = "High Voltage Transformer",
+ inventory_image = "technic_hv_transformer.png",
+ on_place_on_ground = minetest.craftitem_place_item,
+})
+
+minetest.register_craft({
+ output = 'technic:hv_transformer',
+ recipe = {
+ {'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot'},
+ {'technic:copper_coil', 'technic:stainless_steel_ingot', 'technic:copper_coil'},
+ {'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot'},
+ }
+})
+
minetest.register_craftitem( "technic:control_logic_unit", {
description = "Control Logic Unit",
inventory_image = "technic_control_logic_unit.png",
stack_max = 1,
on_use = function(itemstack, user, pointed_thing)
if pointed_thing.type=="node" then
- item=itemstack:to_table()
+ local item=itemstack:to_table()
local meta=get_item_meta(item["metadata"])
if meta==nil then return end --tool not charghed
if meta["charge"]==nil then return end
- charge=meta["charge"]
+ local charge=meta["charge"]
if charge-mining_drill_power_usage>0 then
charge_to_take=drill_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,1,1)
charge =charge-mining_drill_power_usage;
local keys=user:get_player_control()
local player_name=user:get_player_name()
local item=itemstack:to_table()
- meta=get_item_meta(item["metadata"])
+ local meta=get_item_meta(item["metadata"])
if meta==nil or keys["sneak"]==true then return mining_drill_mk2_setmode(user,itemstack) end
if meta["mode"]==nil then return mining_drill_mk2_setmode(user,itemstack) end
if pointed_thing.type~="node" then return end
local keys=user:get_player_control()
local player_name=user:get_player_name()
local item=itemstack:to_table()
- meta=get_item_meta(item["metadata"])
+ local meta=get_item_meta(item["metadata"])
if meta==nil or keys["sneak"]==true then return mining_drill_mk3_setmode(user,itemstack) end
if meta["mode"]==nil then return mining_drill_mk3_setmode(user,itemstack) end
if pointed_thing.type~="node" then return end
if meta["charge"]==nil then return end
- charge=meta["charge"]
+ local charge=meta["charge"]
if charge-mining_drill_power_usage>0 then
- print(dump(meta))
local charge_to_take=drill_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,3,meta["mode"])
charge=charge-charge_to_take;
if charge<0 then charge=0 end
end
})
-minetest.register_on_generated(function(minp, maxp, blockseed)
- if math.random(1, 100) > 5 then
- return
- end
- local tmp = {x=(maxp.x-minp.x)/2+minp.x, y=(maxp.y-minp.y)/2+minp.y, z=(maxp.z-minp.z)/2+minp.z}
- local pos = minetest.env:find_node_near(tmp, maxp.x-minp.x, {"default:dirt_with_grass"})
- if pos ~= nil then
- rubber_tree={
+if technic.config:getBool("enable_rubber_tree_generation") then
+ minetest.register_on_generated(function(minp, maxp, blockseed)
+ if math.random(1, 100) > 5 then
+ return
+ end
+ local rubber_tree={
axiom="FFFFA",
rules_a="[&FFBFA]////[&BFFFA]////[&FBFFA]",
rules_b="[&FFA]////[&FFA]////[&FFA]",
thin_trunks=false;
fruit_tree=false,
fruit=""
- }
- minetest.env:spawn_tree({x=pos.x, y=pos.y+1, z=pos.z},rubber_tree)
- end
-end)
+ }
+ local tmp = {x=(maxp.x-minp.x)/2+minp.x, y=(maxp.y-minp.y)/2+minp.y, z=(maxp.z-minp.z)/2+minp.z}
+ local pos = minetest.env:find_node_near(tmp, maxp.x-minp.x, {"default:dirt_with_grass"})
+ if pos ~= nil then
+ minetest.env:spawn_tree({x=pos.x, y=pos.y+1, z=pos.z}, rubber_tree)
+ end
+ end)
+end
-- ========= FUEL =========
--- /dev/null
+-- The high voltage solar array is an assembly of medium voltage arrays.
+-- The assembly can deliver high voltage levels and is a 20% less efficient
+-- compared to 5 individual medium voltage arrays due to losses in the transformer.
+-- However high voltage is supplied.
+-- Solar arrays are not able to store large amounts of energy.
+minetest.register_node("technic:solar_array_hv", {
+ tiles = {"technic_hv_solar_array_top.png", "technic_hv_solar_array_bottom.png", "technic_hv_solar_array_side.png",
+ "technic_hv_solar_array_side.png", "technic_hv_solar_array_side.png", "technic_hv_solar_array_side.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ description="HV Solar Array",
+ active = false,
+ technic_hv_power_machine=1,
+ internal_EU_buffer=0;
+ internal_EU_buffer_size=3000;
+ drawtype = "nodebox",
+ paramtype = "light",
+ is_ground_content = true,
+ node_box = {
+ type = "fixed",
+ fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
+ },
+ selection_box = {
+ type = "fixed",
+ fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
+ },
+ on_construct = function(pos)
+ local meta = minetest.env:get_meta(pos)
+ meta:set_float("technic_hv_power_machine", 1)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 3000)
+
+ meta:set_string("infotext", "HV Solar Array")
+ meta:set_float("active", false)
+ end,
+})
+
+minetest.register_craft({
+ output = 'technic:solar_array_hv 1',
+ recipe = {
+ {'technic:solar_array_mv', 'technic:solar_array_mv','technic:solar_array_mv'},
+ {'technic:solar_array_mv', 'technic:hv_transformer','technic:solar_array_mv'},
+ {'default:steel_ingot', 'technic:hv_cable', 'default:steel_ingot'},
+
+ }
+})
+
+minetest.register_abm(
+ {nodenames = {"technic:solar_array_hv"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ -- The action here is to make the solar array produce power
+ -- Power is dependent on the light level and the height above ground
+ -- 130m and above is optimal as it would be above cloud level.
+ -- Height gives 1/4 of the effect, light 3/4. Max. effect is 2880EU for the array.
+ -- There are many ways to cheat by using other light sources like lamps.
+ -- As there is no way to determine if light is sunlight that is just a shame.
+ -- To take care of some of it solar panels do not work outside daylight hours or if
+ -- built below -10m
+ local pos1={}
+ pos1.y=pos.y+1
+ pos1.x=pos.x
+ pos1.z=pos.z
+
+ local light = minetest.env:get_node_light(pos1, nil)
+ local time_of_day = minetest.env:get_timeofday()
+ local meta = minetest.env:get_meta(pos)
+ if light == nil then light = 0 end
+ -- turn on array only during day time and if sufficient light
+ -- I know this is counter intuitive when cheating by using other light sources.
+ if light >= 12 and time_of_day>=0.24 and time_of_day<=0.76 and pos.y > -10 then
+ local internal_EU_buffer = meta:get_float("internal_EU_buffer")
+ local internal_EU_buffer_size = meta:get_float("internal_EU_buffer_size")
+ local charge_to_give = math.floor(light*(light*9.6+pos1.y/130*48))
+ if charge_to_give<0 then charge_to_give=0 end
+ if charge_to_give>2880 then charge_to_give=2880 end
+ if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ end
+ meta:set_string("infotext", "Solar Array is active ("..charge_to_give.."EU)")
+ meta:set_float("active",1)
+ internal_EU_buffer=internal_EU_buffer+charge_to_give
+ meta:set_float("internal_EU_buffer",internal_EU_buffer)
+
+ else
+ meta:set_string("infotext", "Solar Array is inactive");
+ meta:set_float("active",0)
+ end
+ end,
+})
+
+register_HV_machine ("technic:solar_array_hv","PR")
--- /dev/null
+-- The solar array is an assembly of panels into a powerful array
+-- The assembly can deliver more energy than the individual panel because
+-- of the transformer unit which converts the panel output variations into
+-- a stable supply.
+-- Solar arrays are not able to store large amounts of energy.
+-- The LV arrays are used to make medium voltage arrays.
+minetest.register_node("technic:solar_array_lv", {
+ tiles = {"technic_lv_solar_array_top.png", "technic_lv_solar_array_bottom.png", "technic_lv_solar_array_side.png",
+ "technic_lv_solar_array_side.png", "technic_lv_solar_array_side.png", "technic_lv_solar_array_side.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ description="LV Solar Array",
+ active = false,
+ technic_power_machine=1,
+ internal_EU_buffer=0;
+ internal_EU_buffer_size=1000;
+ drawtype = "nodebox",
+ paramtype = "light",
+ is_ground_content = true,
+ node_box = {
+ type = "fixed",
+ fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
+ },
+ selection_box = {
+ type = "fixed",
+ fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
+ },
+ on_construct = function(pos)
+ local meta = minetest.env:get_meta(pos)
+ meta:set_float("technic_power_machine", 1)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 1000)
+
+ meta:set_string("infotext", "LV Solar Array")
+ meta:set_float("active", false)
+ end,
+})
+
+minetest.register_craft({
+ output = 'technic:solar_array_lv 1',
+ recipe = {
+ {'technic:solar_panel', 'technic:solar_panel', 'technic:solar_panel'},
+ {'technic:solar_panel', 'technic:lv_transformer', 'technic:solar_panel'},
+ {'default:steel_ingot', 'technic:lv_cable', 'default:steel_ingot'},
+
+ }
+})
+
+minetest.register_abm(
+ {nodenames = {"technic:solar_array_lv"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ -- The action here is to make the solar array produce power
+ -- Power is dependent on the light level and the height above ground
+ -- 130m and above is optimal as it would be above cloud level.
+ -- Height gives 1/4 of the effect, light 3/4. Max. effect is 160EU for the array.
+ -- There are many ways to cheat by using other light sources like lamps.
+ -- As there is no way to determine if light is sunlight that is just a shame.
+ -- To take care of some of it solar arrays do not work outside daylight hours or if
+ -- built below -10m
+ local pos1={}
+ pos1.y=pos.y+1
+ pos1.x=pos.x
+ pos1.z=pos.z
+
+ local light = minetest.env:get_node_light(pos1, nil)
+ local time_of_day = minetest.env:get_timeofday()
+ local meta = minetest.env:get_meta(pos)
+ if light == nil then light = 0 end
+ -- turn on array only during day time and if sufficient light
+ -- I know this is counter intuitive when cheating by using other light sources.
+ if light >= 12 and time_of_day>=0.24 and time_of_day<=0.76 and pos.y > -10 then
+ local internal_EU_buffer = meta:get_float("internal_EU_buffer")
+ local internal_EU_buffer_size = meta:get_float("internal_EU_buffer_size")
+ local charge_to_give = math.floor(light*(light*0.5333+pos1.y/130*2.6667))
+ if charge_to_give<0 then charge_to_give=0 end
+ if charge_to_give>160 then charge_to_give=160 end
+ if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ end
+ meta:set_string("infotext", "Solar Array is active ("..charge_to_give.."EU)")
+ meta:set_float("active",1)
+ internal_EU_buffer=internal_EU_buffer+charge_to_give
+ meta:set_float("internal_EU_buffer",internal_EU_buffer)
+
+ else
+ meta:set_string("infotext", "Solar Array is inactive");
+ meta:set_float("active",0)
+ end
+ end,
+})
+
+register_LV_machine ("technic:solar_array_lv","PR")
--- /dev/null
+-- The medium voltage solar array is an assembly of low voltage arrays.
+-- The assembly can deliver medium voltage levels and is a 10% less efficient
+-- compared to 5 individual low voltage arrays due to losses in the transformer.
+-- However medium voltage is supplied.
+-- Solar arrays are not able to store large amounts of energy.
+-- The MV arrays are used to make high voltage arrays.
+minetest.register_node("technic:solar_array_mv", {
+ tiles = {"technic_mv_solar_array_top.png", "technic_mv_solar_array_bottom.png", "technic_mv_solar_array_side.png",
+ "technic_mv_solar_array_side.png", "technic_mv_solar_array_side.png", "technic_mv_solar_array_side.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ description="MV Solar Array",
+ active = false,
+ technic_mv_power_machine=1,
+ internal_EU_buffer=0;
+ internal_EU_buffer_size=1000;
+ drawtype = "nodebox",
+ paramtype = "light",
+ is_ground_content = true,
+ node_box = {
+ type = "fixed",
+ fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
+ },
+ selection_box = {
+ type = "fixed",
+ fixed = {-0.5, -0.5, -0.5, 0.5, 0, 0.5},
+ },
+ on_construct = function(pos)
+ local meta = minetest.env:get_meta(pos)
+ meta:set_float("technic_mv_power_machine", 1)
+ meta:set_float("internal_EU_buffer", 0)
+ meta:set_float("internal_EU_buffer_size", 1000)
+
+ meta:set_string("infotext", "MV Solar Array")
+ meta:set_float("active", false)
+ end,
+})
+
+minetest.register_craft({
+ output = 'technic:solar_array_mv 1',
+ recipe = {
+ {'technic:solar_array_lv', 'technic:solar_array_lv','technic:solar_array_lv'},
+ {'technic:solar_array_lv', 'technic:mv_transformer','technic:solar_array_lv'},
+ {'default:steel_ingot', 'technic:mv_cable', 'default:steel_ingot'},
+
+ }
+})
+
+minetest.register_abm(
+ {nodenames = {"technic:solar_array_mv"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ -- The action here is to make the solar array produce power
+ -- Power is dependent on the light level and the height above ground
+ -- 130m and above is optimal as it would be above cloud level.
+ -- Height gives 1/4 of the effect, light 3/4. Max. effect is 720EU for the array.
+ -- There are many ways to cheat by using other light sources like lamps.
+ -- As there is no way to determine if light is sunlight that is just a shame.
+ -- To take care of some of it solar panels do not work outside daylight hours or if
+ -- built below -10m
+ local pos1={}
+ pos1.y=pos.y+1
+ pos1.x=pos.x
+ pos1.z=pos.z
+
+ local light = minetest.env:get_node_light(pos1, nil)
+ local time_of_day = minetest.env:get_timeofday()
+ local meta = minetest.env:get_meta(pos)
+ if light == nil then light = 0 end
+ -- turn on array only during day time and if sufficient light
+ -- I know this is counter intuitive when cheating by using other light sources.
+ if light >= 12 and time_of_day>=0.24 and time_of_day<=0.76 and pos.y > -10 then
+ local internal_EU_buffer = meta:get_float("internal_EU_buffer")
+ local internal_EU_buffer_size = meta:get_float("internal_EU_buffer_size")
+ local charge_to_give = math.floor(light*(light*2.4+pos1.y/130*12))
+ if charge_to_give<0 then charge_to_give=0 end
+ if charge_to_give>720 then charge_to_give=720 end
+ if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ end
+ meta:set_string("infotext", "Solar Array is active ("..charge_to_give.."EU)")
+ meta:set_float("active",1)
+ internal_EU_buffer=internal_EU_buffer+charge_to_give
+ meta:set_float("internal_EU_buffer",internal_EU_buffer)
+ -- Idea: How about letting solar panels provide power without battery boxes?
+ -- This could provide an even distribution to all receivers.
+ else
+ meta:set_string("infotext", "Solar Array is inactive");
+ meta:set_float("active",0)
+ end
+ end,
+})
+
+register_MV_machine ("technic:solar_array_mv","PR")
+-- Solar panels are the building blocks of LV solar arrays
+-- They can however also be used separately but with reduced efficiency due to the missing transformer.
+-- Individual panels are 20% less efficient than when the panels are combined into full arrays.
minetest.register_node("technic:solar_panel", {
tiles = {"technic_solar_panel_top.png", "technic_solar_panel_bottom.png", "technic_solar_panel_side.png",
"technic_solar_panel_side.png", "technic_solar_panel_side.png", "technic_solar_panel_side.png"},
active = false,
technic_power_machine=1,
internal_EU_buffer=0;
- internal_EU_buffer_size=1000;
+ internal_EU_buffer_size=160;
drawtype = "nodebox",
paramtype = "light",
is_ground_content = true,
local meta = minetest.env:get_meta(pos)
meta:set_float("technic_power_machine", 1)
meta:set_float("internal_EU_buffer", 0)
- meta:set_float("internal_EU_buffer_size", 1000)
+ meta:set_float("internal_EU_buffer_size", 160)
meta:set_string("infotext", "Solar Panel")
meta:set_float("active", false)
output = 'technic:solar_panel 1',
recipe = {
{'technic:doped_silicon_wafer', 'technic:doped_silicon_wafer','technic:doped_silicon_wafer'},
- {'technic:doped_silicon_wafer', 'moreores:copper_ingot','technic:doped_silicon_wafer'},
+ {'technic:doped_silicon_wafer', 'technic:lv_cable', 'technic:doped_silicon_wafer'},
{'technic:doped_silicon_wafer', 'technic:doped_silicon_wafer','technic:doped_silicon_wafer'},
}
minetest.register_abm(
{nodenames = {"technic:solar_panel"},
- interval = 1,
- chance = 1,
+ interval = 1,
+ chance = 1,
action = function(pos, node, active_object_count, active_object_count_wider)
-
+ -- The action here is to make the solar panel prodice power
+ -- Power is dependent on the light level and the height above ground
+ -- 130m and above is optimal as it would be above cloud level.
+ -- Height gives 1/4 of the effect, light 3/4. Max. effect is 26EU.
+ -- There are many ways to cheat by using other light sources like lamps.
+ -- As there is no way to determine if light is sunlight that is just a shame.
+ -- To take care of some of it solar panels do not work outside daylight hours or if
+ -- built below -10m
local pos1={}
pos1.y=pos.y+1
pos1.x=pos.x
pos1.z=pos.z
local light = minetest.env:get_node_light(pos1, nil)
+ local time_of_day = minetest.env:get_timeofday()
local meta = minetest.env:get_meta(pos)
if light == nil then light = 0 end
- if light >= 12 then
- meta:set_string("infotext", "Solar Panel is active ")
- meta:set_float("active",1)
+ -- turn on panel only during day time and if sufficient light
+ -- I know this is counter intuitive when cheating by using other light sources underground.
+ if light >= 12 and time_of_day>=0.24 and time_of_day<=0.76 and pos.y > -10 then
local internal_EU_buffer=meta:get_float("internal_EU_buffer")
local internal_EU_buffer_size=meta:get_float("internal_EU_buffer_size")
- local charge_to_give=40+(pos1.y/250*40) -- make solar energy depending on height
+ local charge_to_give=math.floor(light*(light*0.0867+pos1.y/130*0.4333))
if charge_to_give<0 then charge_to_give=0 end
- if charge_to_give>160 then charge_to_give=160 end
+ if charge_to_give>26 then charge_to_give=26 end
if internal_EU_buffer+charge_to_give>internal_EU_buffer_size then
- charge_to_give=internal_EU_buffer_size-internal_EU_buffer
+ charge_to_give=internal_EU_buffer_size-internal_EU_buffer
end
+ meta:set_string("infotext", "Solar Panel is active ("..charge_to_give.."EU)")
+ meta:set_float("active",1)
internal_EU_buffer=internal_EU_buffer+charge_to_give
meta:set_float("internal_EU_buffer",internal_EU_buffer)
minetest.register_craft({
output = "technic:sonic_screwdriver",
recipe = {
- {"technic:diamond"},
+ {"default:diamond"},
{"technic:battery"},
{"technic:stainless_steel_ingot"}
}
local pos=minetest.get_pointed_thing_position(pointed_thing,above)
local node=minetest.env:get_node(pos)
local node_name=node.name
- if node_name == "farming_plus:rubber_tree_full" or node_name == "farming:rubber_tree_full" or node_name == "technic:rubber_tree_full" then
+ if node_name == "moretrees:rubber_tree_trunk" then
+ node.name = "moretrees:rubber_tree_trunk_empty"
user:get_inventory():add_item("main",ItemStack("technic:raw_latex"))
minetest.env:set_node(pos,node)
local item=itemstack:to_table()
description = "Rubber Fiber",
inventory_image = "technic_rubber.png",
})
+
+minetest.register_abm({
+ nodenames = {"moretrees:rubber_tree_trunk_empty"},
+ interval = 60,
+ chance = 15,
+ action = function(pos, node)
+ node.name = "moretrees:rubber_tree_trunk"
+ minetest.env:set_node(pos, node)
+ end
+})
--- /dev/null
+--HV cable node boxes
+
+
+minetest.register_craft({
+ output = 'technic:hv_cable 3',
+ recipe ={
+ {'technic:rubber','technic:rubber','technic:rubber'},
+ {'technic:mv_cable','technic:mv_cable','technic:mv_cable'},
+ {'technic:rubber','technic:rubber','technic:rubber'},
+ }
+})
+
+
+minetest.register_craftitem("technic:hv_cable", {
+ description = "Gigh Voltage Copper Cable",
+ stack_max = 99,
+})
+
+minetest.register_node("technic:hv_cable", {
+ description = "High Voltage Copper Cable",
+ tiles = {"technic_hv_cable.png"},
+ inventory_image = "technic_hv_cable_wield.png",
+ wield_image = "technic_hv_cable_wield.png",
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+ sounds = default.node_sound_wood_defaults(),
+ drop = "technic:hv_cable",
+ hv_cablelike=1,
+ rules_x1=0,
+ rules_x2=0,
+ rules_y1=0,
+ rules_y2=0,
+ rules_z1=0,
+ rules_z2=0,
+ paramtype = "light",
+ drawtype = "nodebox",
+ selection_box = {
+ type = "fixed",
+ fixed = {
+ { -0.1 , -0.1 , -0.1 , 0.1 , 0.1 , 0.1 },
+ }},
+ node_box = {
+ type = "fixed",
+ fixed = {
+ { -0.125 , -0.125 , -0.125 , 0.125 , 0.125 , 0.125 },
+ }},
+ on_construct = function(pos)
+ meta=minetest.env:get_meta(pos)
+ meta:set_float("hv_cablelike",1)
+ meta:set_float("x1",0)
+ meta:set_float("x2",0)
+ meta:set_float("y1",0)
+ meta:set_float("y2",0)
+ meta:set_float("z1",0)
+ meta:set_float("z2",0)
+ HV_check_connections (pos)
+ end,
+
+ after_dig_node = function (pos, oldnode, oldmetadata, digger)
+ HV_check_connections_on_destroy (pos)
+ end,
+
+})
+
+
+str_y1= { -0.125 , -0.125 , -0.125 , 0.125 , 0.5, 0.125 } --0 y+
+str_x1= { -0.125 , -0.125 , -0.125 , 0.5, 0.125 , 0.125 } --0 x+
+str_z1= { -0.125 , -0.125 , 0.125 , 0.125 , 0.125 , 0.5 } --0 z+
+str_z2= { -0.125 , -0.125, -0.5 , 0.125 , 0.125 , 0.125 } --0 z-
+str_y2= { -0.125 , -0.5, -0.125 , 0.125 , 0.125 , 0.125 } --0 y-
+str_x2= { -0.5 , -0.125, -0.125 , 0.125 , 0.125 , 0.125 } --0 x-
+
+
+
+local x1,x2,y1,y2,z1,z2
+local count=0
+
+for x1 = 0, 1, 1 do --x-
+for x2 = 0, 1, 1 do --x+
+for y1 = 0, 1, 1 do --y-
+for y2 = 0, 1, 1 do --y-
+for z1 = 0, 1, 1 do --z-
+for z2 = 0, 1, 1 do --z+
+
+temp_x1={} temp_x2={} temp_y1={} temp_y2={} temp_z1={} temp_z2={}
+
+if x1==1 then temp_x1=str_x1 end
+if x2==1 then temp_x2=str_x2 end
+if y1==1 then temp_y1=str_y1 end
+if y2==1 then temp_y2=str_y2 end
+if z1==1 then temp_z1=str_z1 end
+if z2==1 then temp_z2=str_z2 end
+
+
+minetest.register_node("technic:hv_cable"..count, {
+ description = "Gigh Voltage Copper Cable",
+ tiles = {"technic_hv_cable.png"},
+ groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+ sounds = default.node_sound_wood_defaults(),
+ drop = "technic:hv_cable",
+ rules_x1=0,
+ rules_x2=0,
+ rules_y1=0,
+ rules_y2=0,
+ rules_z1=0,
+ rules_z2=0,
+ cablelike=1,
+ paramtype = "light",
+ drawtype = "nodebox",
+ selection_box = {
+ type = "fixed",
+ fixed = {
+ temp_x1,temp_x2,temp_y1,temp_y2,temp_z1,temp_z2,
+ }},
+
+ node_box = {
+ type = "fixed",
+ fixed = {
+ temp_x1,temp_x2,temp_y1,temp_y2,temp_z1,temp_z2,
+ }},
+
+ after_dig_node = function (pos, oldnode, oldmetadata, digger)
+ HV_check_connections_on_destroy (pos)
+ end,
+
+})
+
+count=count+1 end end end end end end
+
+HV_check_connections = function(pos)
+ local pos1={}
+ pos1.x=pos.x
+ pos1.y=pos.y
+ pos1.z=pos.z
+
+ pos1.x=pos1.x+1
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ x2=1
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos1,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("x2",x2)
+ meta=minetest.env:get_meta(pos)
+ x1=1
+ x2=minetest.env:get_meta(pos):get_float("x2")
+ y1=minetest.env:get_meta(pos):get_float("y1")
+ y2=minetest.env:get_meta(pos):get_float("y2")
+ z1=minetest.env:get_meta(pos):get_float("z1")
+ z2=minetest.env:get_meta(pos):get_float("z2")
+ meta:set_float("x1",x1)
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ end
+
+ pos1.x=pos1.x-2
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ x1=1
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos1,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("x1",x1)
+ meta=minetest.env:get_meta(pos)
+ x2=1
+ x1=minetest.env:get_meta(pos):get_float("x1")
+ y1=minetest.env:get_meta(pos):get_float("y1")
+ y2=minetest.env:get_meta(pos):get_float("y2")
+ z1=minetest.env:get_meta(pos):get_float("z1")
+ z2=minetest.env:get_meta(pos):get_float("z2")
+ meta:set_float("x2",x2)
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ end
+
+ pos1.x=pos1.x+1
+
+ pos1.y=pos1.y+1
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ y2=1
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos1,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("y2",y2)
+ meta=minetest.env:get_meta(pos)
+ y1=1
+ x1=minetest.env:get_meta(pos):get_float("x1")
+ x2=minetest.env:get_meta(pos):get_float("x2")
+ y2=minetest.env:get_meta(pos):get_float("y2")
+ z1=minetest.env:get_meta(pos):get_float("z1")
+ z2=minetest.env:get_meta(pos):get_float("z2")
+ meta:set_float("y1",y1)
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ end
+
+ if minetest.env:get_meta(pos1):get_float("technic_hv_power_machine")==1 then
+ y1=1
+ x1=minetest.env:get_meta(pos):get_float("x1")
+ x2=minetest.env:get_meta(pos):get_float("x2")
+ y2=minetest.env:get_meta(pos):get_float("y2")
+ z1=minetest.env:get_meta(pos):get_float("z1")
+ z2=minetest.env:get_meta(pos):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos)
+ meta:set_float("y1",y1)
+ end
+
+
+ pos1.y=pos1.y-2
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ y1=1
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos1,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("y1",y1)
+ meta=minetest.env:get_meta(pos)
+ y2=1
+ x1=minetest.env:get_meta(pos):get_float("x1")
+ x2=minetest.env:get_meta(pos):get_float("x2")
+ y1=minetest.env:get_meta(pos):get_float("y1")
+ z1=minetest.env:get_meta(pos):get_float("z1")
+ z2=minetest.env:get_meta(pos):get_float("z2")
+ meta:set_float("y2",y2)
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ end
+ pos1.y=pos1.y+1
+
+ pos1.z=pos1.z+1
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ z2=1
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos1,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("z2",z2)
+ meta=minetest.env:get_meta(pos)
+ z1=1
+ x1=minetest.env:get_meta(pos):get_float("x1")
+ x2=minetest.env:get_meta(pos):get_float("x2")
+ y1=minetest.env:get_meta(pos):get_float("y1")
+ y2=minetest.env:get_meta(pos):get_float("y2")
+ z2=minetest.env:get_meta(pos):get_float("z2")
+ meta:set_float("z1",z1)
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ end
+ pos1.z=pos1.z-2
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ z1=1
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos1,"technic:hv_cable"..rule)
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("z1",z1)
+ meta=minetest.env:get_meta(pos)
+ z2=1
+ x1=minetest.env:get_meta(pos):get_float("x1")
+ x2=minetest.env:get_meta(pos):get_float("x2")
+ y1=minetest.env:get_meta(pos):get_float("y1")
+ y2=minetest.env:get_meta(pos):get_float("y2")
+ z1=minetest.env:get_meta(pos):get_float("z1")
+ meta:set_float("z2",z2)
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ hacky_swap_node(pos,"technic:hv_cable"..rule)
+ end
+ pos1.z=pos1.z+1
+end
+
+
+HV_check_connections_on_destroy = function(pos)
+ local pos1={}
+ pos1.x=pos.x
+ pos1.y=pos.y
+ pos1.z=pos.z
+
+ pos1.x=pos1.x+1
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ x2=0
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ if rule==0 then hacky_swap_node(pos1,"technic:hv_cable") end
+ if rule>0 then hacky_swap_node(pos1,"technic:hv_cable"..rule) end
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("x2",x2)
+ end
+
+ pos1.x=pos1.x-2
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ x1=0
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ if rule==0 then hacky_swap_node(pos1,"technic:hv_cable") end
+ if rule>0 then hacky_swap_node(pos1,"technic:hv_cable"..rule) end
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("x1",x1)
+ end
+ pos1.x=pos1.x+1
+
+ pos1.y=pos1.y+1
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ y2=0
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ if rule==0 then hacky_swap_node(pos1,"technic:hv_cable") end
+ if rule>0 then hacky_swap_node(pos1,"technic:hv_cable"..rule) end
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("y2",y2)
+ end
+
+ pos1.y=pos1.y-2
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ y1=0
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ if rule==0 then hacky_swap_node(pos1,"technic:hv_cable") end
+ if rule>0 then hacky_swap_node(pos1,"technic:hv_cable"..rule) end
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("y1",y1)
+ end
+ pos1.y=pos1.y+1
+
+ pos1.z=pos1.z+1
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ z2=0
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z1=minetest.env:get_meta(pos1):get_float("z1")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ if rule==0 then hacky_swap_node(pos1,"technic:hv_cable") end
+ if rule>0 then hacky_swap_node(pos1,"technic:hv_cable"..rule) end
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("z2",z2)
+ end
+
+ pos1.z=pos1.z-2
+ if minetest.env:get_meta(pos1):get_float("hv_cablelike")==1 then
+ z1=0
+ x1=minetest.env:get_meta(pos1):get_float("x1")
+ x2=minetest.env:get_meta(pos1):get_float("x2")
+ y1=minetest.env:get_meta(pos1):get_float("y1")
+ y2=minetest.env:get_meta(pos1):get_float("y2")
+ z2=minetest.env:get_meta(pos1):get_float("z2")
+ rule=make_rule_number(x1,x2,y1,y2,z1,z2)
+ if rule==0 then hacky_swap_node(pos1,"technic:hv_cable") end
+ if rule>0 then hacky_swap_node(pos1,"technic:hv_cable"..rule) end
+ meta=minetest.env:get_meta(pos1)
+ meta:set_float("z1",z1)
+ end
+ pos1.y=pos1.y+1
+
+end
+
unified_inventory.activefilter = {}
unified_inventory.alternate = {}
unified_inventory.current_item = {}
+unified_inventory.crafts_table ={}
+unified_inventory.crafts_table_count=0
-- default inventory page
unified_inventory.default = "craft"
if (not def.groups.not_in_creative_inventory or def.groups.not_in_creative_inventory == 0)
and def.description and def.description ~= "" then
table.insert(unified_inventory.items_list, name)
+ local recipes=minetest.get_all_craft_recipes(name)
+ if unified_inventory.crafts_table[name]==nil then
+ unified_inventory.crafts_table[name] = {}
+ end
+ if recipes then
+ for i=1,#recipes,1 do
+ table.insert(unified_inventory.crafts_table[name],recipes[i])
+ end
+ end
end
end
+ --print(dump(unified_inventory.crafts_table))
table.sort(unified_inventory.items_list)
unified_inventory.items_list_size = #unified_inventory.items_list
print ("Unified Inventory. inventory size: "..unified_inventory.items_list_size)
minetest.register_on_joinplayer(function(player)
local player_name = player:get_player_name()
unified_inventory.players[player_name]={}
- unified_inventory.players[player_name]["sound_volume"]=minetest.setting_get("sound_volume")*10
unified_inventory.current_index[player_name] = 1
unified_inventory.filtered_items_list[player_name] = {}
unified_inventory.filtered_items_list[player_name] = unified_inventory.items_list
unified_inventory.alternate[player_name] = 1
unified_inventory.current_item[player_name] =nil
unified_inventory.set_inventory_formspec(player,unified_inventory.get_formspec(player, unified_inventory.default))
-
---crafting guide inventories
+
+--crafting guide inventories
local inv = minetest.create_detached_inventory(player:get_player_name().."craftrecipe",{
allow_put = function(inv, listname, index, stack, player)
return 0
return 0
end,
})
- inv:set_size("output", 1)
- inv:set_size("build", 3*3)
+inv:set_size("output", 1)
+inv:set_size("build", 3*3)
-- refill slot
unified_inventory.refill = minetest.create_detached_inventory(player_name.."refill", {
end,
})
unified_inventory.refill:set_size("main", 1)
-end)
-- trash slot
unified_inventory.trash = minetest.create_detached_inventory("trash", {
end,
})
unified_inventory.trash:set_size("main", 1)
+end)
-- set_inventory_formspec
unified_inventory.set_inventory_formspec = function(player,formspec)
if player then
- if minetest.setting_getbool("creative_mode") then
- -- if creative mode is on then wait a bit
- minetest.after(0.01,function()
- player:set_inventory_formspec(formspec)
- end)
- else
player:set_inventory_formspec(formspec)
- end
end
end
-- get_formspec
unified_inventory.get_formspec = function(player,page)
- if player==nil then return "" end
+ if player==nil then return "" end
local player_name = player:get_player_name()
unified_inventory.current_page[player_name]=page
formspec = formspec.."label[2,0;"..item_name.."]"
local alternates = 0
local alternate = unified_inventory.alternate[player_name]
- local crafts = crafts_table[item_name]
+ local crafts = unified_inventory.crafts_table[item_name]
- if crafts ~= nil then
+ if crafts ~= nil and #crafts>0 then
alternates = #crafts
local craft = crafts[alternate]
local method = "Crafting"
if item_name then
local alternates = 0
local alternate=unified_inventory.alternate[player_name]
- local crafts = crafts_table[item_name]
+ local crafts = unified_inventory.crafts_table[item_name]
if crafts ~= nil then
alternates = #crafts
end
-- update_recipe
unified_inventory.update_recipe = function(player, stack_name, alternate)
- --print("Lookup:"..stack_name)
local inv = minetest.get_inventory({type="detached", name=player:get_player_name().."craftrecipe"})
for i=0,inv:get_size("build"),1 do
inv:set_stack("build", i, nil)
end
- inv:set_stack("cook", 1, nil)
- inv:set_stack("fuel", 1, nil)
-
- inv:set_stack("output", 1, stack_name)
- local def
+ inv:set_stack("output", 1, nil)
alternate = tonumber(alternate) or 1
- local crafts = crafts_table[stack_name]
- if crafts == nil then
- --minetest.chat_send_player(player:get_player_name(), "no recipe available for "..stack_name)
- return
- end
+ local crafts = unified_inventory.crafts_table[stack_name]
+ print(dump(crafts))
+ local next=next
+ if next(crafts) == nil then return end -- no craft recipes
if alternate < 1 or alternate > #crafts then
alternate = 1
end
local craft = crafts[alternate]
- --print (dump(craft))
- --minetest.chat_send_player(player:get_player_name(), "recipe for "..stack_name..": "..dump(craft))
-
- local itemstack = ItemStack(craft.output)
- inv:set_stack("output", 1, itemstack)
-
+ inv:set_stack("output", 1, craft.output)
+ local items=craft.items
-- cook, fuel, grinding recipes
if craft.type == "cooking" or craft.type == "fuel" or craft.type == "grinding" then
- def=unified_inventory.find_item_def(craft.recipe)
+ def=unified_inventory.find_item_def(craft["items"][1])
if def then
inv:set_stack("build", 1, def)
end
return
end
-
- -- build (shaped or shapeless)
- if craft.recipe[1] then
- def=unified_inventory.find_item_def(craft.recipe[1])
- if def then
- inv:set_stack("build", 1, def)
- else
- def=unified_inventory.find_item_def(craft.recipe[1][1])
- if def then
- inv:set_stack("build", 1, def)
- end
- def=unified_inventory.find_item_def(craft.recipe[1][2])
- if def then
- inv:set_stack("build", 2, def)
- end
- def=unified_inventory.find_item_def(craft.recipe[1][3])
- if def then
- inv:set_stack("build", 3, def)
- end
- end
- end
- if craft.recipe[2] then
- def=unified_inventory.find_item_def(craft.recipe[2])
- if def then
- inv:set_stack("build", 2, def)
- else
- def=unified_inventory.find_item_def(craft.recipe[2][1])
- if def then
- inv:set_stack("build", 4, def)
- end
- def=unified_inventory.find_item_def(craft.recipe[2][2])
- if def then
- inv:set_stack("build", 5, def)
- end
- def=unified_inventory.find_item_def(craft.recipe[2][3])
- if def then
- inv:set_stack("build", 6, def)
- end
- end
- end
-
- if craft.recipe[3] then
- def=unified_inventory.find_item_def(craft.recipe[3])
- if def then
- inv:set_stack("build", 3, def)
- else
- def=unified_inventory.find_item_def(craft.recipe[3][1])
- if def then
- inv:set_stack("build", 7, def)
- end
- def=unified_inventory.find_item_def(craft.recipe[3][2])
- if def then
- inv:set_stack("build", 8, def)
- end
- def=unified_inventory.find_item_def(craft.recipe[3][3])
- if def then
- inv:set_stack("build", 9, def)
- end
+ if craft.width==0 then
+ local build_table={1,2,3}
+ for i=1,3,1 do
+ if craft.items[i] then
+ def=unified_inventory.find_item_def(craft.items[i])
+ if def then inv:set_stack("build", build_table[i], def) end
end
end
- if craft.recipe[4] then
- def=unified_inventory.find_item_def(craft.recipe[4])
- if def then
- inv:set_stack("build", 4, def)
- end
end
- if craft.recipe[5] then
- def=unified_inventory.find_item_def(craft.recipe[5])
- if def then
- inv:set_stack("build", 5, def)
+ if craft.width==1 then
+ local build_table={1,4,7}
+ for i=1,3,1 do
+ if craft.items[i] then
+ def=unified_inventory.find_item_def(craft.items[i])
+ if def then inv:set_stack("build", build_table[i], def) end
end
end
- if craft.recipe[6] then
- def=unified_inventory.find_item_def(craft.recipe[6])
- if def then
- inv:set_stack("build", 6, def)
- end
end
- if craft.recipe[7] then
- def=unified_inventory.find_item_def(craft.recipe[7])
- if def then
- inv:set_stack("build", 7, def)
+ if craft.width==2 then
+ local build_table={1,2,4,5,7,8}
+ for i=1,6,1 do
+ if craft.items[i] then
+ def=unified_inventory.find_item_def(craft.items[i])
+ if def then inv:set_stack("build", build_table[i], def) end
end
end
- if craft.recipe[8] then
- def=unified_inventory.find_item_def(craft.recipe[8])
- if def then
- inv:set_stack("build", 8, def)
- end
end
- if craft.recipe[9] then
- def=unified_inventory.find_item_def(craft.recipe[9])
- if def then
- inv:set_stack("build", 9, def)
+ if craft.width==3 then
+ for i=1,9,1 do
+ if craft.items[i] then
+ def=unified_inventory.find_item_def(craft.items[i])
+ if def then inv:set_stack("build", i, def) end
+ end
end
end
end
if string.find(def1, "group:") then
def1=string.gsub(def1, "group:", "")
def1=string.gsub(def1, '\"', "")
- for name,def in pairs(minetest.registered_items) do
- if def.groups[def1] == 1 and def.groups.not_in_creative_inventory ~= 1 then
- return def
- end
- end
+ local items=unified_inventory.items_in_group(def1)
+ return items[1]
else
- return def1
+ return def1
end
end
return nil
end
+
+unified_inventory.items_in_group = function(group)
+ local items = {}
+ for name, item in pairs(minetest.registered_items) do
+ for _, g in ipairs(group:split(',')) do
+ if item.groups[g] then
+ table.insert(items,name)
+ end
+ end
+ end
+ return items
+end
+
+-- register_craft
+unified_inventory.register_craft = function(options)
+ if options.output == nil then
+ return
+ end
+ local itemstack = ItemStack(options.output)
+ if itemstack:is_empty() then
+ return
+ end
+ if unified_inventory.crafts_table[itemstack:get_name()]==nil then
+ unified_inventory.crafts_table[itemstack:get_name()] = {}
+ end
+ table.insert(unified_inventory.crafts_table[itemstack:get_name()],options)
+ --crafts_table_count=crafts_table_count+1
+end
-aaa_recipeshook
-creative
+
projects / zefram / minetest / technic.git / commitdiff
