several fixes, brass added
authorMaciej Kasatkin <mk@realbadangel.pl>
Tue, 9 Oct 2012 09:02:29 +0000 (11:02 +0200)
committerMaciej Kasatkin <mk@realbadangel.pl>
Tue, 9 Oct 2012 09:02:29 +0000 (11:02 +0200)
20 files changed:
alloy_furnace.lua
coal_furnace.lua [new file with mode: 0644]
depends.txt
electric.lua [new file with mode: 0644]
gold_chest.lua
grinder.lua
init.lua
injector.lua
injector1.lua [new file with mode: 0644]
iron_chest.lua
items.lua
mithril_subspace_chest.lua [new file with mode: 0644]
music_player.lua
ores.lua
project_table.lua [new file with mode: 0644]
textures/technic_brass_dust.png [new file with mode: 0644]
textures/technic_brass_ingot.png [new file with mode: 0644]
tree_tap.lua
water.lua [new file with mode: 0644]
wires.lua

index 053d9807887b89d75f9b6d08034f21fe6e5e23d7..ff805ab7b5dc9142efcb85dd8cc082a5d435b0fc 100644 (file)
@@ -24,6 +24,9 @@ end
 register_alloy_recipe ("technic:copper_dust",3, "technic:tin_dust",1, "technic:bronze_dust",4)
 register_alloy_recipe ("moreores:copper_ingot",3, "moreores:tin_ingot",1, "moreores:bronze_ingot",4)
 register_alloy_recipe ("technic:iron_dust",3, "technic:chromium_dust",1, "technic:stainless_steel_dust",4)
+register_alloy_recipe ("technic:steel_ingot",3, "technic:chromium_ingot",1, "technic:stainless_steel_ingot",4)
+register_alloy_recipe ("technic:copper_dust",2, "technic:zinc_dust",1, "technic:brass_dust",3)
+register_alloy_recipe ("technic: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",2, "technic:doped_silicon_wafer",1)
 
diff --git a/coal_furnace.lua b/coal_furnace.lua
new file mode 100644 (file)
index 0000000..9727795
--- /dev/null
@@ -0,0 +1,171 @@
+minetest.register_alias("coal_furnace", "technic:coal_furnace")
+
+minetest.register_craft({
+       output = 'technic:coal_furnace',
+       recipe = {
+               {'default:stone', 'default:stone', 'default:stone'},
+               {'default:stone', '', 'default:stone'},
+               {'default:stone', 'default:stone', 'default:stone'},
+       }
+})
+
+
+coal_furnace_formspec =
+       "invsize[8,9;]"..
+       "image[1,1;1,2;technic_power_meter_bg.png]"..
+       "list[current_name;src;3,1;1,1;]"..
+       "list[current_name;dst;5,1;2,2;]"..
+       "list[current_player;main;0,5;8,4;]"..
+       "label[0,0;Coal Furnace]")
+       
+minetest.register_node("technic:coal_furnace", {
+       description = "Coal furnace",
+       tiles = {"technic_electric_furnace_top.png", "technic_electric_furnace_bottom.png", "technic_electric_furnace_side.png",
+               "technic_electric_furnace_side.png", "technic_electric_furnace_side.png", "technic_electric_furnace_front.png"},
+       paramtype2 = "facedir",
+       groups = {cracky=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_stone_defaults(),
+       technic_power_machine=1,
+       internal_EU_buffer=0;
+       interal_EU_buffer_size=2000;
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("formspec", coal_furnace_formspec)
+               meta:set_string("infotext", "Coal furnace")
+               local inv = meta:get_inventory()
+               inv:set_size("src", 1)
+               inv:set_size("dst", 4)
+               local EU_used  = 0
+               local furnace_is_cookin = 0
+               local cooked = nil
+               meta:set_float("internal_EU_buffer",0)
+               meta:set_float("internal_EU_buffer_size",2000)
+
+       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:coal_furnace_active", {
+       description = "Coal Furnace",
+       tiles = {"technic_electric_furnace_top.png", "technic_electric_furnace_bottom.png", "technic_electric_furnace_side.png",
+               "technic_electric_furnace_side.png", "technic_electric_furnace_side.png", "technic_electric_furnace_front_active.png"},
+       paramtype2 = "facedir",
+       light_source = 8,
+       drop = "technic:coal_furnace",
+       groups = {cracky=2, not_in_creative_inventory=1},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_stone_defaults(),
+       internal_EU_buffer=0;
+       interal_EU_buffer_size=2000;
+       technic_power_machine=1,
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("formspec", electric_furnace_formspec)
+               meta:set_string("infotext", "Coal furnace");
+               local inv = meta:get_inventory()
+               inv:set_size("src", 1)
+               inv:set_size("dst", 4)
+               local EU_used  = 0
+               local furnace_is_cookin = 0
+               local cooked = nil
+       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_abm({
+       nodenames = {"technic:coal_furnace","technic:coal_furnace_active"},
+       interval = 1,
+       chance = 1,
+       
+       action = function(pos, node, active_object_count, active_object_count_wider)
+
+               local meta = minetest.env:get_meta(pos)
+               internal_EU_buffer=meta:get_float("internal_EU_buffer")
+               internal_EU_buffer_size=meta:get_float("internal_EU_buffer")
+               local load = math.floor(internal_EU_buffer/2000 * 100)
+               meta:set_string("formspec",
+                               "invsize[8,9;]"..
+                               "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+                                               (load)..":technic_power_meter_fg.png]"..
+                               "list[current_name;src;3,1;1,1;]"..
+                               "list[current_name;dst;5,1;2,2;]"..
+                               "list[current_player;main;0,5;8,4;]"..
+                               "label[0,0;Electric Furnace]")
+
+               local inv = meta:get_inventory()
+               
+               local furnace_is_cookin = meta:get_float("furnace_is_cookin")
+               
+               
+               local srclist = inv:get_list("src")
+               local cooked=nil 
+
+               if srclist then
+                cooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+               end
+               
+               
+               if (furnace_is_cookin == 1) then
+                       if internal_EU_buffer>=150 then
+                       internal_EU_buffer=internal_EU_buffer-150;
+                       meta:set_float("internal_EU_buffer",internal_EU_buffer)
+                       meta:set_float("src_time", meta:get_float("src_time") + 3)
+                       if cooked and cooked.item and meta:get_float("src_time") >= cooked.time then
+                               -- check if there's room for output in "dst" list
+                               if inv:room_for_item("dst",cooked.item) then
+                                       -- Put result in "dst" list
+                                       inv:add_item("dst", cooked.item)
+                                       -- take stuff from "src" list
+                                       srcstack = inv:get_stack("src", 1)
+                                       srcstack:take_item()
+                                       inv:set_stack("src", 1, srcstack)
+                               else
+                                       print("Furnace inventory full!")
+                               end
+                               meta:set_string("src_time", 0)
+                       end
+                       end             
+               end
+               
+               
+
+               
+               if srclist then
+                       cooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+                       if cooked.time>0 then 
+                       hacky_swap_node(pos,"technic:coal_furnace_active")
+                       meta:set_string("infotext","Furnace active")
+                       meta:set_string("furnace_is_cookin",1)
+                       meta:set_string("src_time", 0)
+                       return
+                       end
+
+               end
+       
+                               hacky_swap_node(pos,"technic:coal_furnace")
+                               meta:set_string("infotext","Furnace inactive")
+                               meta:set_string("furnace_is_cookin",0)
+                               meta:set_string("src_time", 0)
+               
+       
+end,           
+})
\ No newline at end of file
index d9c22f57cac655cb19e4fcd1e999b75235db5fb1..3beb88bf769c231ffa9472a413e199c802c4d2fc 100644 (file)
@@ -4,3 +4,4 @@ flowers
 dye
 pipeworks
 mesecons
+farming
diff --git a/electric.lua b/electric.lua
new file mode 100644 (file)
index 0000000..0faee79
--- /dev/null
@@ -0,0 +1,539 @@
+power_tools ={}
+
+registered_power_tools_count=1
+
+function register_power_tool (string1,max_charge)
+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
+end
+
+register_power_tool ("technic:mining_drill",60000)
+register_power_tool ("technic:laser_mk1",40000)
+register_power_tool ("technic:battery",10000)
+
+minetest.register_alias("battery", "technic:battery")
+minetest.register_alias("battery_box", "technic:battery_box")
+minetest.register_alias("electric_furnace", "technic:electric_furnace")
+
+
+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'},
+       }
+}) 
+
+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'},
+       }
+}) 
+
+minetest.register_craft({
+       output = 'technic:electric_furnace',
+       recipe = {
+               {'default:brick', 'default:brick', 'default:brick'},
+               {'default:brick', '', 'default:brick'},
+               {'default:steel_ingot', 'moreores:copper_ingot', 'default:steel_ingot'},
+       }
+})
+
+
+minetest.register_tool("technic:battery",
+{description = "RE Battery",
+inventory_image = "technic_battery.png",
+energy_charge = 0,
+tool_capabilities = {max_drop_level=0, groupcaps={fleshy={times={}, uses=10000, maxlevel=0}}}}) 
+
+minetest.register_craftitem("technic:battery_box", {
+       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_side.png",
+               "technic_battery_box_side.png", "technic_battery_box_side.png", "technic_battery_box_side.png"},
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       sounds = default.node_sound_wood_defaults(),
+       technic_power_machine=1,
+       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
+               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,
+})
+
+electric_furnace_formspec =
+       "invsize[8,9;]"..
+       "image[1,1;1,2;technic_power_meter_bg.png]"..
+       "list[current_name;src;3,1;1,1;]"..
+       "list[current_name;dst;5,1;2,2;]"..
+       "list[current_player;main;0,5;8,4;]"..
+       "label[0,0;Electric Furnace]"..
+       "label[1,3;Power level]"
+       
+minetest.register_node("technic:electric_furnace", {
+       description = "Electric furnace",
+       tiles = {"technic_electric_furnace_top.png", "technic_electric_furnace_bottom.png", "technic_electric_furnace_side.png",
+               "technic_electric_furnace_side.png", "technic_electric_furnace_side.png", "technic_electric_furnace_front.png"},
+       paramtype2 = "facedir",
+       groups = {cracky=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_stone_defaults(),
+       technic_power_machine=1,
+       internal_EU_buffer=0;
+       interal_EU_buffer_size=2000;
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_float("technic_power_machine", 1)
+               meta:set_string("formspec", electric_furnace_formspec)
+               meta:set_string("infotext", "Electric furnace")
+               local inv = meta:get_inventory()
+               inv:set_size("src", 1)
+               inv:set_size("dst", 4)
+               local EU_used  = 0
+               local furnace_is_cookin = 0
+               local cooked = nil
+               meta:set_float("internal_EU_buffer",0)
+               meta:set_float("internal_EU_buffer_size",2000)
+
+       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:electric_furnace_active", {
+       description = "Electric Furnace",
+       tiles = {"technic_electric_furnace_top.png", "technic_electric_furnace_bottom.png", "technic_electric_furnace_side.png",
+               "technic_electric_furnace_side.png", "technic_electric_furnace_side.png", "technic_electric_furnace_front_active.png"},
+       paramtype2 = "facedir",
+       light_source = 8,
+       drop = "technic:electric_furnace",
+       groups = {cracky=2, not_in_creative_inventory=1},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_stone_defaults(),
+       internal_EU_buffer=0;
+       interal_EU_buffer_size=2000;
+       technic_power_machine=1,
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_float("technic_power_machine", 1)
+               meta:set_string("formspec", electric_furnace_formspec)
+               meta:set_string("infotext", "Electric furnace");
+               local inv = meta:get_inventory()
+               inv:set_size("src", 1)
+               inv:set_size("dst", 4)
+               local EU_used  = 0
+               local furnace_is_cookin = 0
+               local cooked = nil
+       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_abm({
+       nodenames = {"technic:electric_furnace","technic:electric_furnace_active"},
+       interval = 1,
+       chance = 1,
+       
+       action = function(pos, node, active_object_count, active_object_count_wider)
+
+               local meta = minetest.env:get_meta(pos)
+               internal_EU_buffer=meta:get_float("internal_EU_buffer")
+               internal_EU_buffer_size=meta:get_float("internal_EU_buffer")
+               local load = math.floor(internal_EU_buffer/2000 * 100)
+               meta:set_string("formspec",
+                               "invsize[8,9;]"..
+                               "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+                                               (load)..":technic_power_meter_fg.png]"..
+                               "list[current_name;src;3,1;1,1;]"..
+                               "list[current_name;dst;5,1;2,2;]"..
+                               "list[current_player;main;0,5;8,4;]"..
+                               "label[0,0;Electric Furnace]"..
+                               "label[1,3;Power level]")
+
+               local inv = meta:get_inventory()
+               
+               local furnace_is_cookin = meta:get_float("furnace_is_cookin")
+               
+               
+               local srclist = inv:get_list("src")
+               local cooked=nil 
+
+               if srclist then
+                cooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+               end
+               
+               
+               if (furnace_is_cookin == 1) then
+                       if internal_EU_buffer>=150 then
+                       internal_EU_buffer=internal_EU_buffer-150;
+                       meta:set_float("internal_EU_buffer",internal_EU_buffer)
+                       meta:set_float("src_time", meta:get_float("src_time") + 3)
+                       if cooked and cooked.item and meta:get_float("src_time") >= cooked.time then
+                               -- check if there's room for output in "dst" list
+                               if inv:room_for_item("dst",cooked.item) then
+                                       -- Put result in "dst" list
+                                       inv:add_item("dst", cooked.item)
+                                       -- take stuff from "src" list
+                                       srcstack = inv:get_stack("src", 1)
+                                       srcstack:take_item()
+                                       inv:set_stack("src", 1, srcstack)
+                               else
+                                       print("Furnace inventory full!")
+                               end
+                               meta:set_string("src_time", 0)
+                       end
+                       end             
+               end
+               
+               
+
+               
+               if srclist then
+                       cooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+                       if cooked.time>0 then 
+                       hacky_swap_node(pos,"technic:electric_furnace_active")
+                       meta:set_string("infotext","Furnace active")
+                       meta:set_string("furnace_is_cookin",1)
+               --      meta:set_string("formspec", electric_furnace_formspec)
+                       meta:set_string("src_time", 0)
+                       return
+                       end
+
+               end
+       
+                               hacky_swap_node(pos,"technic:electric_furnace")
+                               meta:set_string("infotext","Furnace inactive")
+                               meta:set_string("furnace_is_cookin",0)
+               --              meta:set_string("formspec", electric_furnace_formspec)
+                               meta:set_string("src_time", 0)
+               
+       
+end,           
+})
+
+
+
+
+function take_EU_from_net(pos, EU_to_take)
+       local meta = minetest.env:get_meta(pos)
+       local pos1=pos
+       pos1.z=pos1.z +1
+       local meta1 = minetest.env:get_meta(pos1)
+       charge=meta1:get_float("battery_charge")
+       charge=charge - EU_to_take
+       meta1:set_float("battery_charge",charge)
+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)
+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)
+end
+
+minetest.register_abm({
+       nodenames = {"technic:battery_box"},
+       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_float("battery_charge")
+       max_charge= 60000
+
+       local inv = meta:get_inventory()
+       if inv:is_empty("src")==false  then 
+               srcstack = inv:get_stack("src", 1)
+               src_item=srcstack:to_table()
+       local item_max_charge = nil
+       local counter=registered_power_tools_count-1
+       for i=1, counter,1 do
+               if power_tools[i].tool_name==src_item["name"] then
+               item_max_charge=power_tools[i].max_charge       
+               end
+               end
+       if item_max_charge then
+               local load1=tonumber((src_item["wear"])) 
+               load1=get_RE_item_load(load1,item_max_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
+       
+               load1=set_RE_item_load(load1,item_max_charge)
+               src_item["wear"]=tostring(load1)
+               inv:set_stack("src", 1, src_item)
+               end
+               meta:set_float("battery_charge",charge)
+       end     
+       end
+       
+               if inv:is_empty("dst") == false then 
+               srcstack = inv:get_stack("dst", 1)
+               src_item=srcstack:to_table()
+               if src_item["name"]== "technic:battery" then
+               local load1=tonumber((src_item["wear"])) 
+               load1=get_RE_item_load(load1,10000)
+               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
+       
+               load1=set_RE_item_load(load1,10000)
+               src_item["wear"]=tostring(load1)
+               inv:set_stack("dst", 1, src_item)
+               end             
+               end
+               end
+               
+
+       meta:set_float("battery_charge",charge)
+       meta:set_string("infotext", "Battery box: "..charge.."/"..max_charge);
+
+       local load = math.floor(charge/60000 * 100)
+       meta:set_string("formspec",
+                               "invsize[8,9;]"..
+                               "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+                                               (load)..":technic_power_meter_fg.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;]")
+               
+       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
+       
+       meta:set_float("battery_charge",charge)
+       meta:set_string("infotext", "Battery box: "..charge.."/"..max_charge);
+
+
+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
+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
+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
+if minetest.env:get_node(pos1).name == "technic:solar_panel" then      new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:generator" then        new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:generator_active" then         new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:geothermal" then       new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:geothermal_active" then        new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:water_mill" then       new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:water_mill_active" then        new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:electric_furnace" then         new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:electric_furnace_active" then  new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:alloy_furnace" then    new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:alloy_furnace_active" then     new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:tool_workshop" then    new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:music_player" then     new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:grinder" then  new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+end
+               
+
+function get_connected_charge (charge,pos1)
+       local charge1=0
+       local meta={}
+       if minetest.env:get_node(pos1).name == "technic:battery_box" then
+       print ("found batbox")
+       meta = minetest.env:get_meta(pos1)
+       return meta:get_float("cable_OUT") 
+       end
+
+       if minetest.env:get_node(pos1).name == "technic:lv_cable" then
+       meta = minetest.env:get_meta(pos1)
+       charge1=meta:get_float("cable_OUT")
+               if charge1>charge then
+               charge=charge1
+               end
+       end
+return charge
+end
\ No newline at end of file
index 401015fdbd5f414f8cc92984b508c876df713b84..29f16667809b3f8c57770c163cae0e3d51591b05 100644 (file)
@@ -56,7 +56,7 @@ minetest.register_node("technic:gold_chest", {
        tiles = {"technic_gold_chest_top.png", "technic_gold_chest_top.png", "technic_gold_chest_side.png",
                "technic_gold_chest_side.png", "technic_gold_chest_side.png", "technic_gold_chest_front.png"},
        paramtype2 = "facedir",
-       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,tubedevice=1,tubedevice_receiver=1},
        legacy_facedir_simple = true,
        sounds = default.node_sound_wood_defaults(),
        on_construct = function(pos)
@@ -117,7 +117,7 @@ minetest.register_node("technic:gold_chest".. state, {
        tiles = {"technic_gold_chest_top.png", "technic_gold_chest_top.png", "technic_gold_chest_side.png",
                "technic_gold_chest_side.png", "technic_gold_chest_side.png", "technic_gold_chest_front"..state..".png"},
        paramtype2 = "facedir",
-       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, not_in_creative_inventory=1},
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, not_in_creative_inventory=1,tubedevice=1,tubedevice_receiver=1},
        legacy_facedir_simple = true,
        sounds = default.node_sound_wood_defaults(),
        drop = "technic:gold_chest",
@@ -187,8 +187,8 @@ minetest.register_node("technic:gold_locked_chest", {
        tiles = {"technic_gold_chest_top.png", "technic_gold_chest_top.png", "technic_gold_chest_side.png",
                "technic_gold_chest_side.png", "technic_gold_chest_side.png", "technic_gold_chest_locked.png"},
        paramtype2 = "facedir",
-       drop = "technic:gold_chest",
-       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       drop = "technic:gold_locked_chest",
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,tubedevice=1,tubedevice_receiver=1},
        legacy_facedir_simple = true,
        sounds = default.node_sound_wood_defaults(),
        after_place_node = function(pos, placer)
@@ -286,8 +286,8 @@ minetest.register_node("technic:gold_locked_chest".. state, {
        tiles = {"technic_gold_chest_top.png", "technic_gold_chest_top.png", "technic_gold_chest_side.png",
                "technic_gold_chest_side.png", "technic_gold_chest_side.png", "technic_gold_chest_locked"..state..".png"},
        paramtype2 = "facedir",
-       drop = "technic:gold_chest",
-       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, not_in_creative_inventory=1},
+       drop = "technic:gold_locked_chest",
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, not_in_creative_inventory=1,tubedevice=1,tubedevice_receiver=1},
        legacy_facedir_simple = true,
        sounds = default.node_sound_wood_defaults(),
        after_place_node = function(pos, placer)
index 8d58e9b57ce9fbafbada7ecb77bfa15b92128bc8..a27deceb05e6be37d5ca20e078fd9570d2555359 100644 (file)
@@ -119,6 +119,17 @@ minetest.register_craft({
     recipe = "technic:bronze_dust",
 }) 
 
+minetest.register_craftitem( "technic:brass_dust", {
+       description = "Brass Dust",
+       inventory_image = "technic_brass_dust.png",
+       on_place_on_ground = minetest.craftitem_place_item,
+       })
+minetest.register_craft({
+    type = "cooking",
+    output = "technic:brass_ingot",
+    recipe = "technic:brass_dust",
+}) 
+
 minetest.register_craftitem( "technic:stainless_steel_dust", {
        description = "Stainless Steel Dust",
        inventory_image = "technic_stainless_steel_dust.png",
index ff364880416824624a10a4f106aad3f860dc12b3..22d192a4d20442a4b99d7dccaf1c70aeb362b644 100644 (file)
--- a/init.lua
+++ b/init.lua
@@ -44,7 +44,7 @@ dofile(minetest.get_modpath("technic").."/screwdriver.lua")
 dofile(minetest.get_modpath("technic").."/sonic_screwdriver.lua")
 dofile(minetest.get_modpath("technic").."/node_breaker.lua")
 dofile(minetest.get_modpath("technic").."/deployer.lua")
-dofile(minetest.get_modpath("technic").."/rubber.lua")
+--dofile(minetest.get_modpath("technic").."/rubber.lua")
 dofile(minetest.get_modpath("technic").."/tree_tap.lua")
 
 
index 3dacd5f4276050e2736a67ed050b6c3ca5bc0f46..0a6a19c7097aabb4e29ac20ac2829482131d6aaf 100644 (file)
@@ -321,5 +321,5 @@ function check_TUBE_node_subp (TUBE_nodes,CHEST_nodes,pos1,parent)
 meta = minetest.env:get_meta(pos1)
 if meta:get_float("tubelike")==1 then add_new_TUBE_node(TUBE_nodes,pos1,parent) return end
 nctr = minetest.env:get_node(pos1)
-if minetest.get_item_group(nctr.name, "tubedevice") == 1 then add_new_TUBE_node(CHEST_nodes,pos1,parent) return end
+if minetest.get_item_group(nctr.name, "tubedevice_receiver") == 1 then add_new_TUBE_node(CHEST_nodes,pos1,parent) return end
 end
\ No newline at end of file
diff --git a/injector1.lua b/injector1.lua
new file mode 100644 (file)
index 0000000..537e478
--- /dev/null
@@ -0,0 +1,248 @@
+minetest.register_craftitem("technic:injector", {
+       description = "Injector",
+       stack_max = 99,
+})
+
+minetest.register_node("technic:injector", {
+       description = "Injector",
+       tiles = {"technic_iron_chest_top.png", "technic_iron_chest_top.png", "technic_iron_chest_side.png",
+               "technic_iron_chest_side.png", "technic_iron_chest_side.png", "technic_iron_chest_front.png"},
+       paramtype2 = "facedir",
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_wood_defaults(),
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("formspec",
+                               "invsize[9,9;]"..
+                               "list[current_name;main;0,2;8,2;]"..
+                               "list[current_player;main;0,5;8,4;]")
+               meta:set_string("infotext", "Injector")
+               local inv = meta:get_inventory()
+               inv:set_size("main", 8*4)
+       end,
+       can_dig = function(pos,player)
+               local meta = minetest.env:get_meta(pos);
+               local inv = meta:get_inventory()
+               return inv:is_empty("main")
+       end,
+       on_punch = function (pos, node, puncher)
+       local meta = minetest.env:get_meta(pos);
+       local inv = meta:get_inventory()
+       for _,stack in ipairs(inv:get_list("main")) do
+               if stack:get_name() ~="" then 
+                       inv:remove_item("main",stack)
+                       item1=tube_item({x=pos.x+.5,y=pos.y,z=pos.z},stack)
+                       return
+                       end
+       end
+end,
+})
+
+
+function tube_item(pos, item)
+       -- Take item in any format
+       local stack = ItemStack(item)
+       local obj = minetest.env:add_entity(pos, "technic:tubed_item")
+       obj:get_luaentity():set_item(stack:to_string())
+       obj:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z}
+       obj:setacceleration({x=0, y=0, z=0})
+       pos.x=pos.x+1
+       local meta = minetest.env:get_meta(pos)
+       if meta:get_int("tubelike")==1 then obj:setvelocity({x=1, y=0, z=0}) return obj end
+       pos.x=pos.x-2
+       meta = minetest.env:get_meta(pos)
+       if meta:get_int("tubelike")==1 then obj:setvelocity({x=-1, y=0, z=0}) return obj end
+       pos.x=pos.x+1
+       pos.z=pos.z+1
+       meta = minetest.env:get_meta(pos)
+       if meta:get_int("tubelike")==1 then obj:setvelocity({x=0, y=0, z=1}) return obj end
+       pos.z=pos.z-2
+       meta = minetest.env:get_meta(pos)
+       if meta:get_int("tubelike")==1 then obj:setvelocity({x=0, y=0, z=-1}) return obj end
+       pos.z=pos.z+1
+       pos.y=pos.y+1
+       meta = minetest.env:get_meta(pos)
+       if meta:get_int("tubelike")==1 then obj:setvelocity({x=0, y=1, z=0}) return obj end
+       pos.y=pos.y-2
+       meta = minetest.env:get_meta(pos)
+       if meta:get_int("tubelike")==1 then obj:setvelocity({x=0, y=-2, z=0}) return obj end
+       pos.y=pos.y+1
+       return obj
+end
+
+minetest.register_entity("technic:tubed_item", {
+       initial_properties = {
+               hp_max = 1,
+               physical = false,
+               collisionbox = {0,0,0,0,0,0},
+               visual = "sprite",
+               visual_size = {x=0.5, y=0.5},
+               textures = {""},
+               spritediv = {x=1, y=1},
+               initial_sprite_basepos = {x=0, y=0},
+               is_visible = false,
+               start_pos={}
+       },
+       
+       itemstring = '',
+       physical_state = false,
+
+       set_item = function(self, itemstring)
+               self.itemstring = itemstring
+               local stack = ItemStack(itemstring)
+               local itemtable = stack:to_table()
+               local itemname = nil
+               if itemtable then
+                       itemname = stack:to_table().name
+               end
+               local item_texture = nil
+               local item_type = ""
+               if minetest.registered_items[itemname] then
+                       item_texture = minetest.registered_items[itemname].inventory_image
+                       item_type = minetest.registered_items[itemname].type
+               end
+               prop = {
+                       is_visible = true,
+                       visual = "sprite",
+                       textures = {"unknown_item.png"}
+               }
+               if item_texture and item_texture ~= "" then
+                       prop.visual = "sprite"
+                       prop.textures = {item_texture}
+                       prop.visual_size = {x=0.3, y=0.3}
+               else
+                       prop.visual = "wielditem"
+                       prop.textures = {itemname}
+                       prop.visual_size = {x=0.15, y=0.15}
+               end
+               self.object:set_properties(prop)
+       end,
+
+       get_staticdata = function(self)
+                       
+                       return  minetest.serialize({
+                               itemstring=self.itemstring,
+                               velocity=self.object:getvelocity(),
+                               start_pos=self.start_pos
+                               })
+       end,
+
+       on_activate = function(self, staticdata)
+               if  staticdata=="" or staticdata==nil then return end
+               local item = minetest.deserialize(staticdata)
+               local stack = ItemStack(item.itemstring)
+               local itemtable = stack:to_table()
+               local itemname = nil
+               if itemtable then
+                       itemname = stack:to_table().name
+               end
+               
+               if itemname then 
+               self.start_pos=item.start_pos
+               self.object:setvelocity(item.velocity)
+               self.object:setacceleration({x=0, y=0, z=0})
+               self.object:setpos(item.start_pos)
+               end
+               self:set_item(item.itemstring)
+       end,
+
+       on_step = function(self, dtime)
+       if self.start_pos then
+       local pos = self.object:getpos()
+       local node = minetest.env:get_node(pos)
+       local meta = minetest.env:get_meta(pos)
+       tubelike=meta:get_int("tubelike")
+       local velocity=self.object:getvelocity()
+       
+       if not velocity then return end
+
+       if math.abs(velocity.x)==1 then
+               local next_node=math.abs(pos.x-self.start_pos.x)
+               if next_node >= 1 then 
+                       self.start_pos.x=self.start_pos.x+velocity.x
+                       if check_pos_vector (self.start_pos, velocity)==0 then 
+                       check_next_step (self.start_pos, velocity) 
+                       self.object:setpos(self.start_pos)
+                       self.object:setvelocity(velocity)
+                       return
+                       end
+                       end
+               end
+
+       if math.abs(velocity.y)==1 then
+               local next_node=math.abs(pos.y-self.start_pos.y)
+               if next_node >= 1 then 
+                       self.start_pos.y=self.start_pos.y+velocity.y
+                       if check_pos_vector (self.start_pos, velocity)==0 then
+                       check_next_step (self.start_pos, velocity) 
+                       self.object:setpos(self.start_pos)
+                       self.object:setvelocity(velocity)
+                       return
+                       end
+                       end
+               end
+       
+       if math.abs(velocity.z)==1 then
+               local next_node=math.abs(pos.z-self.start_pos.z)
+               if next_node >= 1 then 
+                       self.start_pos.z=self.start_pos.z+velocity.z
+                       if check_pos_vector (self.start_pos, velocity)==0 then
+                       check_next_step (self.start_pos, velocity) 
+                       self.object:setpos(self.start_pos)
+                       self.object:setvelocity(velocity)
+                       return
+                       end
+                       end
+               end
+       end
+end
+})
+
+
+function check_next_step (pos,velocity)
+local meta
+local tubelike
+
+if velocity.x==0 then
+meta = minetest.env:get_meta({x=pos.x-1,y=pos.y,z=pos.z})
+tubelike=meta:get_int("tubelike")
+if tubelike==1 then velocity.x=-1 velocity.y=0 velocity.z=0 return end
+meta = minetest.env:get_meta({x=pos.x+1,y=pos.y,z=pos.z})
+tubelike=meta:get_int("tubelike")
+if tubelike==1 then velocity.x=1 velocity.y=0 velocity.z=0 return end
+end
+
+if velocity.z==0 then
+meta = minetest.env:get_meta({x=pos.x,y=pos.y,z=pos.z+1})
+tubelike=meta:get_int("tubelike")
+if tubelike==1 then velocity.x=0 velocity.y=0 velocity.z=1 return end
+meta = minetest.env:get_meta({x=pos.x,y=pos.y,z=pos.z-1})
+tubelike=meta:get_int("tubelike")
+if tubelike==1 then velocity.x=0 velocity.y=0 velocity.z=-1 return end
+end
+
+if velocity.y==0 then
+meta = minetest.env:get_meta({x=pos.x,y=pos.y+1,z=pos.z})
+tubelike=meta:get_int("tubelike")
+if tubelike==1 then velocity.x=0 velocity.y=1 velocity.z=0 return end
+meta = minetest.env:get_meta({x=pos.x,y=pos.y-1,z=pos.z})
+tubelike=meta:get_int("tubelike")
+if tubelike==1 then velocity.x=0 velocity.y=-1 velocity.z=0 return end
+end
+
+--velocity.x=0
+--velocity.y=0
+--velocity.z=0
+end
+
+function check_pos_vector (pos,velocity)
+added={}
+added.x=pos.x+velocity.x
+added.y=pos.y+velocity.y
+added.z=pos.z+velocity.z
+local meta=minetest.env:get_meta(added) 
+--print(dump(added).." : "..tubelike)
+if meta:get_int("tubelike")==1 then return 1 end
+return 0
+end
index 1a89ed371c5029ee64afc56c081822fc7e6abaf7..b6685b2e9df6f397010d8d7c5701feb518badb94 100644 (file)
@@ -6,6 +6,16 @@ minetest.register_craft({
                {'default:steel_ingot','default:steel_ingot','default:steel_ingot'},
        }
 })
+
+minetest.register_craft({
+       output = 'technic:iron_locked_chest 1',
+       recipe = {
+               {'default:steel_ingot','default:steel_ingot','default:steel_ingot'},
+               {'default:steel_ingot','default:locked_chest','default:steel_ingot'},
+               {'default:steel_ingot','default:steel_ingot','default:steel_ingot'},
+       }
+})
+
 minetest.register_craft({
        output = 'technic:iron_locked_chest 1',
        recipe = {
@@ -24,6 +34,8 @@ minetest.register_craftitem("technic:iron_locked_chest", {
        stack_max = 99,
 })
 
+minetest.register_alias("blabla", "technic:iron_chest")
+
 minetest.register_node("technic:iron_chest", {
        description = "Iron Chest",
        tiles = {"technic_iron_chest_top.png", "technic_iron_chest_top.png", "technic_iron_chest_side.png",
@@ -32,7 +44,6 @@ minetest.register_node("technic:iron_chest", {
        groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
        legacy_facedir_simple = true,
        sounds = default.node_sound_wood_defaults(),
-       
        on_construct = function(pos)
                local meta = minetest.env:get_meta(pos)
                meta:set_string("formspec",
@@ -43,6 +54,15 @@ minetest.register_node("technic:iron_chest", {
                local inv = meta:get_inventory()
                inv:set_size("main", 9*4)
        end,
+
+       after_place_node = function(pos, placer)
+               ntop1 = minetest.env:get_node({x=pos.x, y=pos.y, z=pos.z})
+               ntop = minetest.env:get_node({x=pos.x, y=pos.y+1, z=pos.z})
+                if ntop.name ~= "air" then
+                        minetest.node_dig(pos, ntop1, placer)
+               end
+       end,
+
        can_dig = function(pos,player)
                local meta = minetest.env:get_meta(pos);
                local inv = meta:get_inventory()
@@ -150,3 +170,7 @@ on_construct = function(pos)
                                " takes stuff from locked chest at "..minetest.pos_to_string(pos))
        end,
 })
+
+function add_item (player)
+player:get_inventory():add_item("main", "blabla 1")
+end
\ No newline at end of file
index f61fd6a6961fdbc53c6f7fb45fe47539a72d1d99..0773d1fd807d8fd7fde79f7c10311f2ea1023308 100644 (file)
--- a/items.lua
+++ b/items.lua
@@ -55,9 +55,9 @@ minetest.register_node( "technic:diamond_block", {
 minetest.register_craft({
        output = 'technic:red_energy_crystal',
        recipe = {
-               {'moreores:gold_ingot', 'technic:battery', 'dye:red'},
+               {'moreores:gold_ingot', 'technic:battery', 'group:dye,basecolor_red'},
                {'technic:battery', 'technic:diamond_block', 'technic:battery'},
-               {'dye:red', 'technic:battery', 'moreores:gold_ingot'},
+               {'group:dye,basecolor_red', 'technic:battery', 'moreores:gold_ingot'},
        }
 })
 
@@ -70,9 +70,9 @@ minetest.register_craftitem( "technic:red_energy_crystal", {
 minetest.register_craft({
        output = 'technic:green_energy_crystal',
        recipe = {
-               {'moreores:gold_ingot', 'technic:battery', 'dye:green'},
+               {'moreores:gold_ingot', 'technic:battery', 'group:dye,basecolor_green'},
                {'technic:battery', 'technic:red_energy_crystal', 'technic:battery'},
-               {'dye:green', 'technic:battery', 'moreores:gold_ingot'},
+               {'group:dye,basecolor_green', 'technic:battery', 'moreores:gold_ingot'},
        }
 })
 
@@ -85,9 +85,9 @@ minetest.register_craftitem( "technic:green_energy_crystal", {
 minetest.register_craft({
        output = 'technic:blue_energy_crystal',
        recipe = {
-               {'moreores:gold_ingot', 'technic:battery', 'dye:blue'},
+               {'moreores:gold_ingot', 'technic:battery', 'group:dye,basecolor_blue'},
                {'technic:battery', 'technic:green_energy_crystal', 'technic:battery'},
-               {'dye:blue', 'technic:battery', 'moreores:gold_ingot'},
+               {'group:dye,basecolor_green', 'technic:battery', 'moreores:gold_ingot'},
        }
 })
 
diff --git a/mithril_subspace_chest.lua b/mithril_subspace_chest.lua
new file mode 100644 (file)
index 0000000..89683f8
--- /dev/null
@@ -0,0 +1,145 @@
+minetest.register_craft({
+       output = 'technic:mithril_chest 1',
+       recipe = {
+               {'moreores:mithril_ingot','moreores:mithril_ingot','moreores:mithril_ingot'},
+               {'moreores:mithril_ingot','technic:gold_chest','moreores:mithril_ingot'},
+               {'moreores:mithril_ingot','moreores:mithril_ingot','moreores:mithril_ingot'},
+       }
+})
+
+minetest.register_craft({
+       output = 'technic:mithril_locked_chest 1',
+       recipe = {
+               {'moreores:mithril_ingot','moreores:mithril_ingot','moreores:mithril_ingot'},
+               {'moreores:mithril_ingot','technic:gold_locked_chest','moreores:mithril_ingot'},
+               {'moreores:mithril_ingot','moreores:mithril_ingot','moreores:mithril_ingot'},
+       }
+})
+
+minetest.register_craft({
+       output = 'technic:mithril_locked_chest 1',
+       recipe = {
+               {'default:steel_ingot'},
+               {'technic:mithril_chest'},
+       }
+})
+
+minetest.register_node("technic:mithril_chest", {
+       description = "Mithril Chest",
+       tiles = {"technic_mithril_chest_top.png", "technic_mithril_chest_top.png", "technic_mithril_chest_side.png",
+               "technic_mithril_chest_side.png", "technic_mithril_chest_side.png", "technic_mithril_chest_front.png"},
+       paramtype2 = "facedir",
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_wood_defaults(),
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("formspec",
+                               "invsize[13,9;]"..
+                               "list[current_name;main;0,0;13,4;]"..
+                               "list[current_player;main;0,5;8,4;]")
+               meta:set_string("infotext", "Mithril Chest")
+               local inv = meta:get_inventory()
+               inv:set_size("main", 13*4)
+       end,
+       can_dig = function(pos,player)
+               local meta = minetest.env:get_meta(pos);
+               local inv = meta:get_inventory()
+               return inv:is_empty("main")
+       end,
+
+    on_metadata_inventory_move = function(pos, from_list, from_index,
+                       to_list, to_index, count, player)
+               minetest.log("action", player:get_player_name()..
+                               " moves stuff in chest at "..minetest.pos_to_string(pos))
+               return minetest.node_metadata_inventory_move_allow_all(
+                               pos, from_list, from_index, to_list, to_index, count, player)
+       end,
+    on_metadata_inventory_offer = function(pos, listname, index, stack, player)
+               minetest.log("action", player:get_player_name()..
+                               " moves stuff to chest at "..minetest.pos_to_string(pos))
+               return minetest.node_metadata_inventory_offer_allow_all(
+                               pos, listname, index, stack, player)
+       end,
+    on_metadata_inventory_take = function(pos, listname, index, stack, player)
+               minetest.log("action", player:get_player_name()..
+                               " takes stuff from chest at "..minetest.pos_to_string(pos))
+       end,
+})
+
+minetest.register_node("technic:mithril_locked_chest", {
+       description = "Mithril Locked Chest",
+       tiles = {"technic_mithril_chest_top.png", "technic_mithril_chest_top.png", "technic_mithril_chest_side.png",
+               "technic_mithril_chest_side.png", "technic_mithril_chest_side.png", "technic_mithril_chest_locked.png"},
+       paramtype2 = "facedir",
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_wood_defaults(),
+       after_place_node = function(pos, placer)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("owner", placer:get_player_name() or "")
+               meta:set_string("infotext", "Mithril Locked Chest (owned by "..
+                               meta:get_string("owner")..")")
+       end,
+on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("formspec",
+                               "invsize[13,9;]"..
+                               "list[current_name;main;0,0;13,4;]"..
+                               "list[current_player;main;0,5;8,4;]")
+               meta:set_string("infotext", "Mithril Locked Chest")
+               meta:set_string("owner", "")
+               local inv = meta:get_inventory()
+               inv:set_size("main", 13*4)
+       end,
+       can_dig = function(pos,player)
+               local meta = minetest.env:get_meta(pos);
+               local inv = meta:get_inventory()
+               return inv:is_empty("main")
+       end,
+       allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+               local meta = minetest.env:get_meta(pos)
+               if not has_locked_chest_privilege(meta, player) then
+                       minetest.log("action", player:get_player_name()..
+                                       " tried to access a locked chest belonging to "..
+                                       meta:get_string("owner").." at "..
+                                       minetest.pos_to_string(pos))
+                       return 0
+               end
+               return count
+       end,
+    allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+               local meta = minetest.env:get_meta(pos)
+               if not has_locked_chest_privilege(meta, player) then
+                       minetest.log("action", player:get_player_name()..
+                                       " tried to access a locked chest belonging to "..
+                                       meta:get_string("owner").." at "..
+                                       minetest.pos_to_string(pos))
+                       return 0
+               end
+               return stack:get_count()
+       end,
+    allow_metadata_inventory_take = function(pos, listname, index, stack, player)
+               local meta = minetest.env:get_meta(pos)
+               if not has_locked_chest_privilege(meta, player) then
+                       minetest.log("action", player:get_player_name()..
+                                       " tried to access a locked chest belonging to "..
+                                       meta:get_string("owner").." at "..
+                                       minetest.pos_to_string(pos))
+                       return 0
+               end
+               return stack:get_count()
+       end,
+       on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+               minetest.log("action", player:get_player_name()..
+                               " moves stuff in locked chest at "..minetest.pos_to_string(pos))
+       end,
+    on_metadata_inventory_put = function(pos, listname, index, stack, player)
+               minetest.log("action", player:get_player_name()..
+                               " moves stuff to locked chest at "..minetest.pos_to_string(pos))
+       end,
+    on_metadata_inventory_take = function(pos, listname, index, stack, player)
+               minetest.log("action", player:get_player_name()..
+                               " takes stuff from locked chest at "..minetest.pos_to_string(pos))
+       end,
+})
index 5b5c65005a7d27868ee6e16d8cdc79b17b4ff675..0a6474a2a2b53c94f6a6a2e7d5f11a6d3e6d0bd8 100644 (file)
@@ -89,7 +89,7 @@ minetest.register_abm({
        
        if charge>play_cost then 
                if meta:get_float("music_playing")==1 then charge=charge-play_cost end
-               meta:set_float("internal_EU_buffer",charge)
+                       meta:set_float("internal_EU_buffer",charge)
                meta:set_float("music_player_on",1)
        else 
                meta:set_float("music_playing",0)
index 29dfb4640f9fed057d1c59177adceaca453a7660..a3841f60b885222cdc170be1585ebbc3f288b193 100644 (file)
--- a/ores.lua
+++ b/ores.lua
@@ -55,10 +55,6 @@ minetest.register_craft({
                                recipe = "technic:chromium_lump"
                        })
 
-minetest.register_craftitem( "technic:stainless_steel_ingot", {
-       description = "Stainless Steel Ingot",
-       inventory_image = "technic_stainless_steel_ingot.png",
-})
 
 minetest.register_node( "technic:mineral_zinc", {
        description = "Zinc Ore",
@@ -79,6 +75,16 @@ minetest.register_craftitem( "technic:zinc_ingot", {
        inventory_image = "technic_zinc_ingot.png",
 })
 
+minetest.register_craftitem( "technic:stainless_steel_ingot", {
+       description = "Stainless Steel Ingot",
+       inventory_image = "technic_stainless_steel_ingot.png",
+})
+
+minetest.register_craftitem( "technic:brass_ingot", {
+       description = "Brass Ingot",
+       inventory_image = "technic_brass_ingot.png",
+})
+
 minetest.register_craft({
                                type = 'cooking',
                                output = "technic:zinc_ingot",
diff --git a/project_table.lua b/project_table.lua
new file mode 100644 (file)
index 0000000..355295c
--- /dev/null
@@ -0,0 +1,39 @@
+minetest.register_craft({
+       output = 'technic:project_table 1',
+       recipe = {
+               {'default:wood','default:wood','default:wood'},
+               {'default:wood','default:chest','default:wood'},
+               {'default:stone','default:stone','default:stone'},
+       }
+})
+
+
+minetest.register_craftitem("technic:project_table", {
+       description = "Project Table",
+       stack_max = 99,
+})
+
+minetest.register_node("technic:project_table", {
+       description = "Project Table",
+       tiles = {"technic_iron_chest_top.png", "technic_iron_chest_top.png", "technic_iron_chest_side.png",
+               "technic_iron_chest_side.png", "technic_iron_chest_side.png", "technic_iron_chest_front.png"},
+       paramtype2 = "facedir",
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_wood_defaults(),
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("formspec",
+                               "invsize[9,9;]"..
+                               "list[current_name;main;0,2;8,2;]"..
+                               "list[current_player;main;0,5;8,4;]")
+               meta:set_string("infotext", "Iron Chest")
+               local inv = meta:get_inventory()
+               inv:set_size("main", 8*4)
+       end,
+       can_dig = function(pos,player)
+               local meta = minetest.env:get_meta(pos);
+               local inv = meta:get_inventory()
+               return inv:is_empty("main")
+       end,
+})
\ No newline at end of file
diff --git a/textures/technic_brass_dust.png b/textures/technic_brass_dust.png
new file mode 100644 (file)
index 0000000..f86167a
Binary files /dev/null and b/textures/technic_brass_dust.png differ
diff --git a/textures/technic_brass_ingot.png b/textures/technic_brass_ingot.png
new file mode 100644 (file)
index 0000000..2d8b153
Binary files /dev/null and b/textures/technic_brass_ingot.png differ
index 1973f2a44d385f669a14ad78dd8c831ebb6f6a0f..92c56b0511b95d597273546e845ed93454b9c1ef 100644 (file)
@@ -7,7 +7,7 @@
                             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 == "technic:rubber_tree_full" then
+                            if node_name == "farming:rubber_tree_full" then
                                     user:get_inventory():add_item("main",ItemStack("technic:caouthouc"))
                                     minetest.env:set_node(pos,node)
                                     local item=itemstack:to_table()
diff --git a/water.lua b/water.lua
new file mode 100644 (file)
index 0000000..6ddaa46
--- /dev/null
+++ b/water.lua
@@ -0,0 +1,588 @@
+minetest.register_alias("battery", "technic:battery")
+minetest.register_alias("battery_box", "technic:battery_box")
+minetest.register_alias("electric_furnace", "technic:electric_furnace")
+
+
+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'},
+       }
+}) 
+
+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'},
+       }
+}) 
+
+minetest.register_craft({
+       output = 'technic:electric_furnace',
+       recipe = {
+               {'default:brick', 'default:brick', 'default:brick'},
+               {'default:brick', '', 'default:brick'},
+               {'default:steel_ingot', 'moreores:copper_ingot', 'default:steel_ingot'},
+       }
+})
+
+
+--minetest.register_craftitem("technic:battery", {
+--     description = "Recharcheable battery",
+--     inventory_image = "technic_battery.png",
+--     stack_max = 1,
+--}) 
+
+minetest.register_tool("technic:battery",
+{description = "RE Battery",
+inventory_image = "technic_battery.png",
+energy_charge = 0,
+tool_capabilities = {max_drop_level=0, groupcaps={fleshy={times={}, uses=10000, maxlevel=0}}}}) 
+
+minetest.register_craftitem("technic:battery_box", {
+       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_side.png",
+               "technic_battery_box_side.png", "technic_battery_box_side.png", "technic_battery_box_side.png"},
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       sounds = default.node_sound_wood_defaults(),
+       technic_power_machine=1,
+       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
+               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,
+})
+
+electric_furnace_formspec =
+       "invsize[8,9;]"..
+       "image[1,1;1,2;technic_power_meter_bg.png]"..
+       "list[current_name;src;3,1;1,1;]"..
+       "list[current_name;dst;5,1;2,2;]"..
+       "list[current_player;main;0,5;8,4;]"..
+       "label[0,0;Electric Furnace]"..
+       "label[1,3;Power level]"
+       
+minetest.register_node("technic:electric_furnace", {
+       description = "Electric furnace",
+       tiles = {"technic_electric_furnace_top.png", "technic_electric_furnace_bottom.png", "technic_electric_furnace_side.png",
+               "technic_electric_furnace_side.png", "technic_electric_furnace_side.png", "technic_electric_furnace_front.png"},
+       paramtype2 = "facedir",
+       groups = {cracky=2},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_stone_defaults(),
+       technic_power_machine=1,
+       internal_EU_buffer=0;
+       interal_EU_buffer_size=2000;
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_float("technic_power_machine", 1)
+               meta:set_string("formspec", electric_furnace_formspec)
+               meta:set_string("infotext", "Electric furnace")
+               local inv = meta:get_inventory()
+               inv:set_size("src", 1)
+               inv:set_size("dst", 4)
+               local EU_used  = 0
+               local furnace_is_cookin = 0
+               local cooked = nil
+               meta:set_float("internal_EU_buffer",0)
+               meta:set_float("internal_EU_buffer_size",2000)
+
+       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:electric_furnace_active", {
+       description = "Electric Furnace",
+       tiles = {"technic_electric_furnace_top.png", "technic_electric_furnace_bottom.png", "technic_electric_furnace_side.png",
+               "technic_electric_furnace_side.png", "technic_electric_furnace_side.png", "technic_electric_furnace_front_active.png"},
+       paramtype2 = "facedir",
+       light_source = 8,
+       drop = "technic:electric_furnace",
+       groups = {cracky=2, not_in_creative_inventory=1},
+       legacy_facedir_simple = true,
+       sounds = default.node_sound_stone_defaults(),
+       internal_EU_buffer=0;
+       interal_EU_buffer_size=2000;
+       technic_power_machine=1,
+       on_construct = function(pos)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_float("technic_power_machine", 1)
+               meta:set_string("formspec", electric_furnace_formspec)
+               meta:set_string("infotext", "Electric furnace");
+               local inv = meta:get_inventory()
+               inv:set_size("src", 1)
+               inv:set_size("dst", 4)
+               local EU_used  = 0
+               local furnace_is_cookin = 0
+               local cooked = nil
+       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_abm({
+       nodenames = {"technic:electric_furnace","technic:electric_furnace_active"},
+       interval = 1,
+       chance = 1,
+       
+       action = function(pos, node, active_object_count, active_object_count_wider)
+
+               local meta = minetest.env:get_meta(pos)
+               internal_EU_buffer=meta:get_float("internal_EU_buffer")
+               internal_EU_buffer_size=meta:get_float("internal_EU_buffer")
+               local load = math.floor(internal_EU_buffer/2000 * 100)
+               meta:set_string("formspec",
+                               "invsize[8,9;]"..
+                               "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+                                               (load)..":technic_power_meter_fg.png]"..
+                               "list[current_name;src;3,1;1,1;]"..
+                               "list[current_name;dst;5,1;2,2;]"..
+                               "list[current_player;main;0,5;8,4;]"..
+                               "label[0,0;Electric Furnace]"..
+                               "label[1,3;Power level]")
+
+               local inv = meta:get_inventory()
+               
+               local furnace_is_cookin = meta:get_float("furnace_is_cookin")
+               
+               
+               local srclist = inv:get_list("src")
+               local cooked=nil 
+
+               if srclist then
+                cooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+               end
+               
+               
+               if (furnace_is_cookin == 1) then
+                       if internal_EU_buffer>=150 then
+                       internal_EU_buffer=internal_EU_buffer-150;
+                       meta:set_float("internal_EU_buffer",internal_EU_buffer)
+                       meta:set_float("src_time", meta:get_float("src_time") + 3)
+                       if cooked and cooked.item and meta:get_float("src_time") >= cooked.time then
+                               -- check if there's room for output in "dst" list
+                               if inv:room_for_item("dst",cooked.item) then
+                                       -- Put result in "dst" list
+                                       inv:add_item("dst", cooked.item)
+                                       -- take stuff from "src" list
+                                       srcstack = inv:get_stack("src", 1)
+                                       srcstack:take_item()
+                                       inv:set_stack("src", 1, srcstack)
+                               else
+                                       print("Furnace inventory full!")
+                               end
+                               meta:set_string("src_time", 0)
+                       end
+                       end             
+               end
+               
+               
+
+               
+               if srclist then
+                       cooked = minetest.get_craft_result({method = "cooking", width = 1, items = srclist})
+                       if cooked.time>0 then 
+                       hacky_swap_node(pos,"technic:electric_furnace_active")
+                       meta:set_string("infotext","Furnace active")
+                       meta:set_string("furnace_is_cookin",1)
+               --      meta:set_string("formspec", electric_furnace_formspec)
+                       meta:set_string("src_time", 0)
+                       return
+                       end
+
+               end
+       
+                               hacky_swap_node(pos,"technic:electric_furnace")
+                               meta:set_string("infotext","Furnace inactive")
+                               meta:set_string("furnace_is_cookin",0)
+               --              meta:set_string("formspec", electric_furnace_formspec)
+                               meta:set_string("src_time", 0)
+               
+       
+end,           
+})
+
+
+
+
+function take_EU_from_net(pos, EU_to_take)
+       local meta = minetest.env:get_meta(pos)
+       local pos1=pos
+       pos1.z=pos1.z +1
+       local meta1 = minetest.env:get_meta(pos1)
+       charge=meta1:get_float("battery_charge")
+       charge=charge - EU_to_take
+       meta1:set_float("battery_charge",charge)
+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)
+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)
+end
+
+minetest.register_abm({
+       nodenames = {"technic:battery_box"},
+       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_float("battery_charge")
+       max_charge= 60000
+               
+               local inv = meta:get_inventory()
+               if inv:is_empty("src")==false  then 
+               srcstack = inv:get_stack("src", 1)
+               src_item=srcstack:to_table()
+               if src_item["name"]== "technic:battery" then
+               local load1=tonumber((src_item["wear"])) 
+               load1=get_RE_item_load(load1,10000)
+               load_step=1000
+               if load1<10000 and charge>0 then 
+                if charge-load_step<0 then load_step=charge end
+                if load1+load_step>10000 then load_step=10000-load1 end
+               load1=load1+load_step
+               charge=charge-load_step
+       
+               load1=set_RE_item_load(load1,10000)
+               src_item["wear"]=tostring(load1)
+               inv:set_stack("src", 1, src_item)
+               end             
+               end
+               end
+               meta:set_float("battery_charge",charge)
+               
+       
+               if inv:is_empty("src")==false  then 
+               srcstack = inv:get_stack("src", 1)
+               src_item=srcstack:to_table()
+               if src_item["name"]== "technic:laser_mk1" then
+               local load1=tonumber((src_item["wear"])) 
+               load1=get_RE_item_load(load1,40000)
+               load_step=1000
+               if load1<40000 and charge>0 then 
+                if charge-load_step<0 then load_step=charge end
+                if load1+load_step>40000 then load_step=40000-load1 end
+               load1=load1+load_step
+               charge=charge-load_step
+               load1=set_RE_item_load(load1,40000)
+               src_item["wear"]=tostring(load1)
+               inv:set_stack("src", 1, src_item)
+               end             
+               end
+               end
+               meta:set_float("battery_charge",charge)
+
+
+               if inv:is_empty("dst") == false then 
+               srcstack = inv:get_stack("dst", 1)
+               src_item=srcstack:to_table()
+               if src_item["name"]== "technic:battery" then
+               local load1=tonumber((src_item["wear"])) 
+               load1=get_RE_item_load(load1,10000)
+               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
+       
+               load1=set_RE_item_load(load1,10000)
+               src_item["wear"]=tostring(load1)
+               inv:set_stack("dst", 1, src_item)
+               end             
+               end
+               end
+               
+
+       meta:set_float("battery_charge",charge)
+       meta:set_string("infotext", "Battery box: "..charge.."/"..max_charge);
+
+       local load = math.floor(charge/60000 * 100)
+       meta:set_string("formspec",
+                               "invsize[8,9;]"..
+                               "image[1,1;1,2;technic_power_meter_bg.png^[lowpart:"..
+                                               (load)..":technic_power_meter_fg.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;]")
+               
+       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
+               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 active=meta1:get_float("active")
+       if active==1 then charge=charge+80 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
+       
+       meta:set_float("battery_charge",charge)
+       meta:set_string("infotext", "Battery box: "..charge.."/"..max_charge);
+
+
+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
+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
+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
+if minetest.env:get_node(pos1).name == "technic:solar_panel" then      new_node_added=add_new_cable_node(PR_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:electric_furnace" then         new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:electric_furnace_active" then  new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:tool_workshop" then    new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:music_player" then     new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+if minetest.env:get_node(pos1).name == "technic:grinder" then  new_node_added=add_new_cable_node(RE_nodes,pos1) end            
+end
+               
+
+function get_connected_charge (charge,pos1)
+       local charge1=0
+       local meta={}
+       if minetest.env:get_node(pos1).name == "technic:battery_box" then
+       print ("found batbox")
+       meta = minetest.env:get_meta(pos1)
+       return meta:get_float("cable_OUT") 
+       end
+
+       if minetest.env:get_node(pos1).name == "technic:lv_cable" then
+       meta = minetest.env:get_meta(pos1)
+       charge1=meta:get_float("cable_OUT")
+               if charge1>charge then
+               charge=charge1
+               end
+       end
+return charge
+end
+
+minetest.register_node("technic:solar_panel", {
+       tiles = {"technic_solar_panel_top.png", "technic_solar_panel_side.png", "technic_solar_panel_side.png",
+               "technic_solar_panel_side.png", "technic_solar_panel_side.png", "technic_solar_panel_side.png"},
+       groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+       sounds = default.node_sound_wood_defaults(),
+       description="Solar Panel",
+       active = false,
+       technic_power_machine=1,
+       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_string("infotext", "Solar Panel")
+               meta:set_float("active", false)
+       end,
+})
+
+minetest.register_craft({
+       output = 'technic:solar_panel 1',
+       recipe = {
+               {'default:sand', 'default:sand','default:sand'},
+               {'default:sand', 'moreores:copper_ingot','default:sand'},
+               {'default:sand', 'default:sand','default:sand'},
+
+       }
+})
+
+minetest.register_abm(
+       {nodenames = {"technic:solar_panel"},
+       interval = 1,
+       chance = 1,
+       action = function(pos, node, active_object_count, active_object_count_wider)
+               
+               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 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)
+               else
+                       meta:set_string("infotext", "Solar Panel is inactive");
+                       meta:set_float("active",0)
+               end
+       end,
+}) 
\ No newline at end of file
index 039dda6c16e473adde95f865174ee7cf412bf229..e09fc2afa9f4470bfd169d062d5feabb79acc649 100644 (file)
--- a/wires.lua
+++ b/wires.lua
@@ -19,6 +19,7 @@ minetest.register_node("technic:lv_cable", {
        description = "Low Voltage Copper Cable",
        tiles = {"technic_lv_cable.png"},
        inventory_image = "technic_lv_cable_wield.png",
+       wield_image = "technic_lv_cable_wield.png",
        groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
        sounds = default.node_sound_wood_defaults(),
        drop = "technic:lv_cable",