Added case study of radiated power through inductive coils.
authorkpoppel <poulsen.kim@gmail.com>
Tue, 18 Jun 2013 22:24:37 +0000 (00:24 +0200)
committerkpoppel <poulsen.kim@gmail.com>
Tue, 18 Jun 2013 22:24:37 +0000 (00:24 +0200)
19 files changed:
technic/init.lua
technic/lighting.lua [new file with mode: 0644]
technic/power_radiator.lua [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_cube_white_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_cube_white_sides_ceiling.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_cube_white_tb.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_cube_yellow_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_cube_yellow_sides_ceiling.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_cube_yellow_tb.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thick_white_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thick_white_wall_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thick_yellow_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thick_yellow_wall_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thin_white_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thin_white_wall_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thin_yellow_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_thin_yellow_wall_sides.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_white_tb.png [new file with mode: 0644]
technic/textures/technic_homedecor_glowlight_yellow_tb.png [new file with mode: 0644]

index 2248295defcc727320b82506da028098eb58aace..6dd7eac598228b238e0aa244fe6223b03a6a5026 100644 (file)
@@ -40,6 +40,10 @@ dofile(modpath.."/down_converter_mv.lua")
 dofile(modpath.."/electric_furnace_mv.lua")
 dofile(modpath.."/alloy_furnace_mv.lua")
 dofile(modpath.."/forcefield.lua")
+-- These two are a concept study: Supplying appliances with inductive coupled power:
+-- lighting and associated textures is taken directly from VanessaE's homedecor and made electric.
+dofile(modpath.."/power_radiator.lua")
+dofile(modpath.."/lighting.lua")
 
 --HV machines
 dofile(modpath.."/wires_hv.lua")
diff --git a/technic/lighting.lua b/technic/lighting.lua
new file mode 100644 (file)
index 0000000..5aab4c3
--- /dev/null
@@ -0,0 +1,594 @@
+-- NOTE: The code is takes directly from VanessaE's homedecor mod.
+-- I just made it the lights into indictive appliances for this mod.
+
+-- This file supplies electric powered glowlights
+
+-- Boilerplate to support localized strings if intllib mod is installed.
+local S
+if (minetest.get_modpath("intllib")) then
+    dofile(minetest.get_modpath("intllib").."/intllib.lua")
+    S = intllib.Getter(minetest.get_current_modname())
+else
+    S = function ( s ) return s end
+end
+
+function technic_homedecor_node_is_owned(pos, placer)
+        local ownername = false
+        if type(IsPlayerNodeOwner) == "function" then                                   -- node_ownership mod
+                if HasOwner(pos, placer) then                                           -- returns true if the node is owned
+                        if not IsPlayerNodeOwner(pos, placer:get_player_name()) then
+                                if type(getLastOwner) == "function" then                -- ...is an old version
+                                        ownername = getLastOwner(pos)
+                                elseif type(GetNodeOwnerName) == "function" then        -- ...is a recent version
+                                        ownername = GetNodeOwnerName(pos)
+                                else
+                                        ownername = S("someone")
+                                end
+                        end
+                end
+
+        elseif type(isprotect)=="function" then                                         -- glomie's protection mod
+                if not isprotect(5, pos, placer) then
+                        ownername = S("someone")
+                end
+        elseif type(protector)=="table" and type(protector.can_dig)=="function" then                                    -- Zeg9's protection mod
+                if not protector.can_dig(5, pos, placer) then
+                        ownername = S("someone")
+                end
+        end
+
+        if ownername ~= false then
+                minetest.chat_send_player( placer:get_player_name(), S("Sorry, %s owns that spot."):format(ownername) )
+                return true
+        else
+                return false
+        end
+end
+
+local dirs1 = { 20, 23, 22, 21 }
+local dirs2 = { 9, 18, 7, 12 }
+
+function technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+       if not technic_homedecor_node_is_owned(pointed_thing.under, placer) 
+          and not technic_homedecor_node_is_owned(pointed_thing.above, placer) then
+               local node = minetest.env:get_node(pointed_thing.under)
+               if not minetest.registered_nodes[node.name] or not minetest.registered_nodes[node.name].on_rightclick then
+
+                       local above = pointed_thing.above
+                       local under = pointed_thing.under
+                       local pitch = placer:get_look_pitch()
+                       local pname = minetest.env:get_node(under).name
+                       local node = minetest.env:get_node(above)
+                       local fdir = minetest.dir_to_facedir(placer:get_look_dir())
+                       local wield_name = itemstack:get_name()
+
+                       if not minetest.registered_nodes[pname]
+                           or not minetest.registered_nodes[pname].on_rightclick then
+
+                               local iswall = (above.x ~= under.x) or (above.z ~= under.z)
+                               local isceiling = (above.x == under.x) and (above.z == under.z) and (pitch > 0)
+                               local pos1 = above
+
+                               if minetest.registered_nodes[pname]["buildable_to"] then
+                                       pos1 = under
+                                       iswall = false
+                               end
+
+                               if not minetest.registered_nodes[minetest.env:get_node(pos1).name]["buildable_to"] then return end
+
+                               if iswall then 
+                                       minetest.env:add_node(pos1, {name = wield_name, param2 = dirs2[fdir+1] }) -- place wall variant
+                               elseif isceiling then
+                                       minetest.env:add_node(pos1, {name = wield_name, param2 = 20 }) -- place upside down variant
+                               else
+                                       minetest.env:add_node(pos1, {name = wield_name, param2 = 0 }) -- place right side up
+                               end
+
+                               if not homedecor_expect_infinite_stacks then
+                                       itemstack:take_item()
+                                       return itemstack
+                               end
+                       end
+               else
+                       minetest.registered_nodes[node.name].on_rightclick(pointed_thing.under, node, placer, itemstack)
+               end
+       end
+end
+
+-- Yellow -- Half node
+minetest.register_node('technic:homedecor_glowlight_half_yellow', {
+       description = S("Yellow Glowlight (thick)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3 },
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         print("Hello")
+                         technic_inductive_on_construct(pos, 100, "Yellow Glowlight (thick)")
+                         print("Hello2")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     print("Punch")
+                     technic_inductive_on_punch_off(pos, 100, "technic:homedecor_glowlight_half_yellow_active")
+                     print("Punch2")
+                  end
+})
+
+minetest.register_node('technic:homedecor_glowlight_half_yellow_active', {
+       description = S("Yellow Glowlight (thick)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png',
+               'technic_homedecor_glowlight_thick_yellow_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       light_source = LIGHT_MAX,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3, not_in_creative_inventory=1},
+       drop="technic:homedecor_glowlight_half_yellow",
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "Yellow Glowlight (thick)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_on(pos, 0, "technic:homedecor_glowlight_half_yellow")
+                  end
+})
+
+-- Yellow -- Quarter node
+minetest.register_node('technic:homedecor_glowlight_quarter_yellow', {
+       description = S("Yellow Glowlight (thin)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3 },
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "Yellow Glowlight (thin)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_off(pos, 100, "technic:homedecor_glowlight_quarter_yellow_active")
+                  end
+})
+
+minetest.register_node('technic:homedecor_glowlight_quarter_yellow_active', {
+       description = S("Yellow Glowlight (thin)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_yellow_tb.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png',
+               'technic_homedecor_glowlight_thin_yellow_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       light_source = LIGHT_MAX-1,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3, not_in_creative_inventory=1},
+       drop="technic:homedecor_glowlight_quarter_yellow",
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "Yellow Glowlight (thin)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_on(pos, 0, "technic:homedecor_glowlight_quarter_yellow")
+                  end
+})
+
+
+-- White -- half node
+minetest.register_node('technic:homedecor_glowlight_half_white', {
+       description = S("White Glowlight (thick)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_thick_white_sides.png',
+               'technic_homedecor_glowlight_thick_white_sides.png',
+               'technic_homedecor_glowlight_thick_white_sides.png',
+               'technic_homedecor_glowlight_thick_white_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3 },
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "White Glowlight (thick)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_off(pos, 100, "technic:homedecor_glowlight_half_white_active")
+                  end
+})
+
+minetest.register_node('technic:homedecor_glowlight_half_white_active', {
+       description = S("White Glowlight (thick)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_thick_white_sides.png',
+               'technic_homedecor_glowlight_thick_white_sides.png',
+               'technic_homedecor_glowlight_thick_white_sides.png',
+               'technic_homedecor_glowlight_thick_white_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       light_source = LIGHT_MAX,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3, not_in_creative_inventory=1},
+       drop="technic:homedecor_glowlight_half_white",
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "White Glowlight (thick)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_on(pos, 0, "technic:homedecor_glowlight_half_white")
+                  end
+})
+
+-- White -- Quarter node
+minetest.register_node('technic:homedecor_glowlight_quarter_white', {
+       description = S("White Glowlight (thin)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_thin_white_sides.png',
+               'technic_homedecor_glowlight_thin_white_sides.png',
+               'technic_homedecor_glowlight_thin_white_sides.png',
+               'technic_homedecor_glowlight_thin_white_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3 },
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "White Glowlight (thin)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_off(pos, 100, "technic:homedecor_glowlight_quarter_white_active")
+                  end
+})
+
+minetest.register_node('technic:homedecor_glowlight_quarter_white_active', {
+       description = S("White Glowlight (thin)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_white_tb.png',
+               'technic_homedecor_glowlight_thin_white_sides.png',
+               'technic_homedecor_glowlight_thin_white_sides.png',
+               'technic_homedecor_glowlight_thin_white_sides.png',
+               'technic_homedecor_glowlight_thin_white_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.5, -0.5, -0.5, 0.5, -0.25, 0.5 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       light_source = LIGHT_MAX-1,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3, not_in_creative_inventory=1},
+       drop="technic:homedecor_glowlight_quarter_white",
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 100, "White Glowlight (thin)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_on(pos, 0, "technic:homedecor_glowlight_quarter_white")
+                  end
+})
+
+-- Glowlight "cubes" - yellow
+minetest.register_node('technic:homedecor_glowlight_small_cube_yellow', {
+       description = S("Yellow Glowlight (small cube)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_cube_yellow_tb.png',
+               'technic_homedecor_glowlight_cube_yellow_tb.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3 },
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 50, "Yellow Glowlight (small cube)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_off(pos, 50, "technic:homedecor_glowlight_small_cube_yellow_active")
+                  end
+})
+
+minetest.register_node('technic:homedecor_glowlight_small_cube_yellow_active', {
+       description = S("Yellow Glowlight (small cube)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_cube_yellow_tb.png',
+               'technic_homedecor_glowlight_cube_yellow_tb.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png',
+               'technic_homedecor_glowlight_cube_yellow_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       light_source = LIGHT_MAX-1,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3, not_in_creative_inventory=1},
+       drop="technic:homedecor_glowlight_cube_yellow",
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 50, "Yellow Glowlight (small cube)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_on(pos, 0, "technic:homedecor_glowlight_small_cube_yellow")
+                  end
+})
+
+-- Glowlight "cubes" - white
+minetest.register_node('technic:homedecor_glowlight_small_cube_white', {
+       description = S("White Glowlight (small cube)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_cube_white_tb.png',
+               'technic_homedecor_glowlight_cube_white_tb.png',
+               'technic_homedecor_glowlight_cube_white_sides.png',
+               'technic_homedecor_glowlight_cube_white_sides.png',
+               'technic_homedecor_glowlight_cube_white_sides.png',
+               'technic_homedecor_glowlight_cube_white_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3 },
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 50, "White Glowlight (small cube)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_off(pos, 50, "technic:homedecor_glowlight_small_cube_white_active")
+                  end
+})
+
+minetest.register_node('technic:homedecor_glowlight_small_cube_white_active', {
+       description = S("White Glowlight (small cube)"),
+       drawtype = "nodebox",
+       tiles = {
+               'technic_homedecor_glowlight_cube_white_tb.png',
+               'technic_homedecor_glowlight_cube_white_tb.png',
+               'technic_homedecor_glowlight_cube_white_sides.png',
+               'technic_homedecor_glowlight_cube_white_sides.png',
+               'technic_homedecor_glowlight_cube_white_sides.png',
+               'technic_homedecor_glowlight_cube_white_sides.png'
+       },
+        selection_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+        node_box = {
+                type = "fixed",
+                fixed = { -0.25, -0.5, -0.25, 0.25, 0, 0.25 }
+        },
+
+       sunlight_propagates = false,
+       paramtype = "light",
+       paramtype2 = "facedir",
+       walkable = true,
+       light_source = LIGHT_MAX-1,
+       sounds = default.node_sound_wood_defaults(),
+
+       groups = { snappy = 3, not_in_creative_inventory=1},
+       drop="technic:homedecor_glowlight_cube_white",
+       on_place = function(itemstack, placer, pointed_thing)
+               technic_homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+               return itemstack
+            end,
+       on_construct = function(pos)
+                         technic_inductive_on_construct(pos, 50, "White Glowlight (small cube)")
+                      end,
+       on_punch = function(pos, node, puncher)
+                     technic_inductive_on_punch_on(pos, 0, "technic:homedecor_glowlight_small_cube_white")
+                  end
+})
+
+register_inductive_machine("technic:homedecor_glowlight_half_yellow")
+register_inductive_machine("technic:homedecor_glowlight_half_white")
+register_inductive_machine("technic:homedecor_glowlight_quarter_yellow")
+register_inductive_machine("technic:homedecor_glowlight_quarter_white")
+register_inductive_machine("technic:homedecor_glowlight_small_cube_yellow")
+register_inductive_machine("technic:homedecor_glowlight_small_cube_white")
diff --git a/technic/power_radiator.lua b/technic/power_radiator.lua
new file mode 100644 (file)
index 0000000..3383d18
--- /dev/null
@@ -0,0 +1,308 @@
+-- The power radiator fuctions like an inductive charger
+-- only better in the game setting.
+-- The purpose is to allow small appliances to receive power
+-- without the overhead of the wiring needed for larger machines.
+--
+-- The power radiator will consume power corresponding to the
+-- sum(power rating of the attached appliances)/0.6
+-- Using inductive power transfer is very inefficient so this is
+-- set to the factor 0.6.
+
+-- API for inductive powered nodes:
+-- Use the functions below to set the corresponding callbacks
+-- Also two nodes are needed: The inactive and the active one. The active must be called <name>_active .
+
+-- Register a new appliance using this function
+technic_inductive_nodes = {}
+registered_inductive_count=0
+
+register_inductive_machine = function(name)
+                               registered_inductive_count=registered_inductive_count+1
+                               technic_inductive_nodes[registered_inductive_count]=name
+                               registered_inductive_count=registered_inductive_count+1
+                               technic_inductive_nodes[registered_inductive_count]=name.."_active"
+                            end
+
+
+-- Appliances:
+--  has_supply: pos of supply node if the appliance has a power radiator near with sufficient power for the demand else ""
+--  EU_demand: The power demand of the device.
+--  EU_charge: Actual use. set to EU_demand if active==1
+--  active: set to 1 if the device is on
+technic_inductive_on_construct = function(pos, eu_demand, infotext)
+                                   local meta = minetest.env:get_meta(pos)
+                                   meta:set_string("infotext", infotext)
+                                   meta:set_int("technic_inductive_power_machine", 1)
+                                   meta:set_int("EU_demand",eu_demand)     -- The power demand of this appliance
+                                   meta:set_int("EU_charge",0)       -- The actual power draw of this appliance
+                                   meta:set_string("has_supply","") -- Register whether we are powered or not. For use with several radiators.
+                                   meta:set_int("active", 0)    -- If the appliance can be turned on and off by using it use this.
+                                end
+
+technic_inductive_on_punch_off = function(pos, eu_charge, swapnode)
+                   local meta = minetest.env:get_meta(pos)
+                   if meta:get_string("has_supply") ~= "" then
+                      hacky_swap_node(pos, swapnode)
+                      meta:set_int("active", 1)
+                      meta:set_int("EU_charge",eu_charge)
+                      --print("-----------")
+                      --print("Turn on:")
+                      --print("EUcha:"..meta:get_int("EU_charge"))
+                      --print("has_supply:"..meta:get_string("has_supply"))
+                      --print("<----------->")
+                   end
+                end
+
+technic_inductive_on_punch_on = function(pos, eu_charge, swapnode)
+                   local meta = minetest.env:get_meta(pos)
+                   hacky_swap_node(pos, swapnode)
+                   meta:set_int("active", 0)
+                   meta:set_int("EU_charge",eu_charge)
+                   --print("-----------")
+                   --print("Turn off:")
+                   --print("EUcha:"..meta:get_int("EU_charge"))
+                   --print("has_supply:"..meta:get_string("has_supply"))
+                   --print("<---------->")
+                end
+
+--minetest.register_node(
+--   "technic:test_induc", {
+--      description = "Test radiator node",
+--      drawtype = "nodebox",
+--      tiles = {
+--      'homedecor_glowlight_yellow_tb.png',
+--      'homedecor_glowlight_yellow_tb.png',
+--      'homedecor_glowlight_thick_yellow_sides.png',
+--      'homedecor_glowlight_thick_yellow_sides.png',
+--      'homedecor_glowlight_thick_yellow_sides.png',
+--      'homedecor_glowlight_thick_yellow_sides.png'
+--      },
+--
+----      tiles  = {"technic_hv_down_converter_top.png", "technic_hv_down_converter_top.png", "technic_hv_down_converter_top.png",
+----           "technic_hv_down_converter_top.png", "technic_hv_down_converter_top.png", "technic_hv_down_converter_top.png"},
+--      selection_box = {
+--      type = "fixed",
+--      fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+--      },
+--      node_box = {
+--      type = "fixed",
+--      fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+--      },
+--      sunlight_propagates = false,
+--      paramtype = "light",
+--      paramtype2 = "facedir",
+--      walkable = true,
+--      groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
+--      on_place = function(itemstack, placer, pointed_thing)
+--                 homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+--                 return itemstack
+--              end,
+--      on_construct = function(pos)
+--                     local meta = minetest.env:get_meta(pos)
+--                     meta:set_string("infotext", "Power Radiator Appliance")
+--                     meta:set_int("technic_inductive_power_machine", 1)
+--                     meta:set_int("EU_demand",200)     -- The power demand of this appliance
+--                     meta:set_int("EU_charge",0)       -- The actual power draw of this appliance
+--                     meta:set_string("has_supply","") -- Register whether we are powered or not. For use with several radiators.
+--                     meta:set_int("active", 0)    -- If the appliance can be turned on and off by using it use this.
+--                  end,
+--      on_punch = function(pos,node,puncher)
+--                 local meta = minetest.env:get_meta(pos)
+--                 if meta:get_string("has_supply") ~= "" then
+--                    hacky_swap_node(pos, "technic:test_induc_active")
+--                    meta:set_int("active", 1)
+--                    meta:set_int("EU_charge",200)
+--                    print("-----------")
+--                    print("Turn on:")
+--                    print("EUcha:"..meta:get_int("EU_charge"))
+--                    print("<----------->")
+--                 end
+--              end,
+--   })
+--
+--minetest.register_node(
+--   "technic:test_induc_active", {
+--      description = "Test radiator node",
+--      drawtype = "nodebox",
+--      tiles = {
+--      'homedecor_glowlight_yellow_tb.png',
+--      'homedecor_glowlight_yellow_tb.png',
+--      'homedecor_glowlight_thick_yellow_sides.png',
+--      'homedecor_glowlight_thick_yellow_sides.png',
+--      'homedecor_glowlight_thick_yellow_sides.png',
+--      'homedecor_glowlight_thick_yellow_sides.png'
+--      },
+--
+----      tiles  = {"technic_hv_down_converter_side.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", "technic_hv_down_converter_side.png"},
+--      selection_box = {
+--      type = "fixed",
+--      fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+--      },
+--      node_box = {
+--      type = "fixed",
+--      fixed = { -0.5, -0.5, -0.5, 0.5, 0, 0.5 }
+--      },
+--      sunlight_propagates = false,
+--      paramtype = "light",
+--      paramtype2 = "facedir",
+--      walkable = true,
+--      light_source=14,
+--      groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2,not_in_creative_inventory=1},
+--      drop="technic:test_induc",
+--      on_place = function(itemstack, placer, pointed_thing)
+--                 homedecor_rotate_and_place(itemstack, placer, pointed_thing)
+--                 return itemstack
+--              end,
+--      on_construct = function(pos)
+--                     local meta = minetest.env:get_meta(pos)
+--                     meta:set_string("infotext", "Power Radiator Appliance Active")
+--                     meta:set_int("technic_inductive_power_machine", 1)
+--                     meta:set_int("EU_demand",200)     -- The power demand of this appliance
+--                     meta:set_int("EU_charge",0)       -- The actual power draw of this appliance
+--                     meta:set_string("has_supply","") -- Register whether we are powered or not. For use with several radiators.
+--                  end,
+--      on_punch = function(pos,node,puncher)
+--                 local meta = minetest.env:get_meta(pos)
+--                 hacky_swap_node(pos, "technic:test_induc")
+--                 meta:set_int("active", 0)
+--                 meta:set_int("EU_charge",0)
+--                 print("-----------")
+--                 print("Turn off:")
+--                 print("EUcha:"..meta:get_int("EU_charge"))
+--                 print("<---------->")
+--              end,
+--   })
+
+local shutdown_inductive_appliances = function(pos)
+                                        -- The supply radius
+                                        local rad = 4
+                                        -- If the radiator is removed. turn off all appliances in region
+                                        -- If another radiator is near it will turn on the appliances again
+                                        local positions = minetest.env:find_nodes_in_area({x=pos.x-rad,y=pos.y-rad,z=pos.z-rad},{x=pos.x+rad,y=pos.y+rad,z=pos.z+rad}, technic_inductive_nodes)
+                                        for _,pos1 in ipairs(positions) do
+                                           local meta1 = minetest.env:get_meta(pos1)
+                                           -- If the appliance is belonging to this node
+                                           if meta1:get_string("has_supply") == pos.x..pos.y..pos.z then
+                                              local nodename = minetest.env:get_node(pos1).name
+                                              -- Swap the node and make sure it is off and unpowered
+                                              if string.sub(nodename, -7) == "_active" then
+                                                 hacky_swap_node(pos1, string.sub(nodename, 1, -8))
+                                                 meta1:set_int("active", 0)
+                                                 meta1:set_int("EU_charge", 0)
+                                              end
+                                              meta1:set_string("has_supply", "")
+                                          end
+                                       end
+                                    end
+
+
+minetest.register_node(
+   "technic:power_radiator", {
+      description = "Power Radiator",
+      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_int("technic_mv_power_machine", 1)  -- MV machine
+                       meta:set_int("internal_EU_buffer",0)         -- internal buffer value
+                       meta:set_int("internal_EU_buffer_size",1000) -- Size of buffer
+                       meta:set_int("connected_EU_demand",0)        -- Potential demand of connected appliances
+                       meta:set_string("infotext", "Power Radiator")
+--                     meta:set_int("active", 0)
+                    end,
+      on_dig = function(pos, node, digger)
+                 shutdown_inductive_appliances(pos)
+                 return minetest.node_dig(pos, node, digger)
+              end,
+   })
+
+minetest.register_craft(
+   {
+      output = 'technic:power_radiator 1',
+      recipe = {
+        {'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot'},
+        {'technic:copper_coil',           'technic:mv_transformer',        'technic:copper_coil'},
+        {'technic:rubber',                'technic:mv_cable',              'technic:rubber'},
+      }
+   })
+
+minetest.register_abm(
+   {nodenames = {"technic:power_radiator"},
+    interval   = 1,
+    chance     = 1,
+    action = function(pos, node, active_object_count, active_object_count_wider)
+               local meta             = minetest.env:get_meta(pos)
+               local my_supply        = meta:get_int("internal_EU_buffer")
+               -- The maximum EU sourcing a single radiator can provide.
+               local max_charge = 1000 -- == the max EU demand of the radiator
+               local connected_EU_demand = meta:get_int("connected_EU_demand")
+               --print("--------------------")
+               --print("My Supply:"..my_supply)
+               --print("Connected Demand:"..connected_EU_demand)
+               if my_supply > 0 then
+                  -- Efficiency factor
+                  local eff_factor = 0.6
+                  -- The supply radius
+                  local rad = 4
+                  
+                  local meta1            = nil
+                  local pos1             = {}
+                  local used_charge      = 0
+                  
+                  -- Index all nodes within supply range
+                  local positions = minetest.env:find_nodes_in_area({x=pos.x-rad,y=pos.y-rad,z=pos.z-rad},{x=pos.x+rad,y=pos.y+rad,z=pos.z+rad}, technic_inductive_nodes)
+                  for _,pos1 in ipairs(positions) do
+                     local meta1 = minetest.env:get_meta(pos1)
+                     -- If not supplied see if this node can handle it.
+                     if meta1:get_string("has_supply") == "" then
+                        -- if demand surpasses the capacity of this node, don't bother adding it.
+                        local eu_demand = meta1:get_int("EU_demand")/eff_factor
+                        if connected_EU_demand+eu_demand <= max_charge and connected_EU_demand+eu_demand <= my_supply then
+                           -- We can power the appliance. Register, and spend power if it is on.
+                           connected_EU_demand = connected_EU_demand+eu_demand
+
+                           meta1:set_string("has_supply", pos.x..pos.y..pos.z)
+                           used_charge = math.floor(used_charge+meta1:get_int("EU_charge")/eff_factor)
+                        end
+                     elseif meta1:get_string("has_supply") == pos.x..pos.y..pos.z then
+                        -- The appliance has power from this node. Spend power if it is on.
+                        used_charge = math.floor(used_charge+meta1:get_int("EU_charge")/eff_factor)
+                     end
+                  end
+                  --If demand surpasses actual supply turn off everything - we are out of power
+                  if used_charge>my_supply then
+                     meta:set_string("infotext", "Power Radiator is overloaded ("..math.floor(used_charge/my_supply*100).."% of available power)");
+--                   meta:set_int("active",1) -- used for setting textures someday maybe
+                     shutdown_inductive_appliances(pos)
+                     connected_EU_demand = 0
+                  else
+                     meta:set_string("infotext", "Power Radiator is powered ("..math.floor(used_charge/my_supply*100).."% of available power)");
+                     meta:set_int("internal_EU_buffer",my_supply-used_charge)
+--                   meta:set_int("active",1) -- used for setting textures someday maybe
+                  end
+               else
+                  meta:set_string("infotext", "Power Radiator is unpowered");
+--                meta:set_int("active",0) -- used for setting textures someday maybe
+               end
+               
+               -- Save state
+               meta:set_int("connected_EU_demand",connected_EU_demand)
+               return
+            end,
+ })
+
+register_MV_machine ("technic:power_radiator","RE")
diff --git a/technic/textures/technic_homedecor_glowlight_cube_white_sides.png b/technic/textures/technic_homedecor_glowlight_cube_white_sides.png
new file mode 100644 (file)
index 0000000..9121999
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_cube_white_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_cube_white_sides_ceiling.png b/technic/textures/technic_homedecor_glowlight_cube_white_sides_ceiling.png
new file mode 100644 (file)
index 0000000..c8006eb
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_cube_white_sides_ceiling.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_cube_white_tb.png b/technic/textures/technic_homedecor_glowlight_cube_white_tb.png
new file mode 100644 (file)
index 0000000..b2e355a
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_cube_white_tb.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_cube_yellow_sides.png b/technic/textures/technic_homedecor_glowlight_cube_yellow_sides.png
new file mode 100644 (file)
index 0000000..b79be07
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_cube_yellow_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_cube_yellow_sides_ceiling.png b/technic/textures/technic_homedecor_glowlight_cube_yellow_sides_ceiling.png
new file mode 100644 (file)
index 0000000..a9d397a
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_cube_yellow_sides_ceiling.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_cube_yellow_tb.png b/technic/textures/technic_homedecor_glowlight_cube_yellow_tb.png
new file mode 100644 (file)
index 0000000..daf03ab
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_cube_yellow_tb.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thick_white_sides.png b/technic/textures/technic_homedecor_glowlight_thick_white_sides.png
new file mode 100644 (file)
index 0000000..44c2b36
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thick_white_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thick_white_wall_sides.png b/technic/textures/technic_homedecor_glowlight_thick_white_wall_sides.png
new file mode 100644 (file)
index 0000000..937999e
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thick_white_wall_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thick_yellow_sides.png b/technic/textures/technic_homedecor_glowlight_thick_yellow_sides.png
new file mode 100644 (file)
index 0000000..769b054
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thick_yellow_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thick_yellow_wall_sides.png b/technic/textures/technic_homedecor_glowlight_thick_yellow_wall_sides.png
new file mode 100644 (file)
index 0000000..57820f1
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thick_yellow_wall_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thin_white_sides.png b/technic/textures/technic_homedecor_glowlight_thin_white_sides.png
new file mode 100644 (file)
index 0000000..0a337a5
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thin_white_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thin_white_wall_sides.png b/technic/textures/technic_homedecor_glowlight_thin_white_wall_sides.png
new file mode 100644 (file)
index 0000000..0fd3b1e
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thin_white_wall_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thin_yellow_sides.png b/technic/textures/technic_homedecor_glowlight_thin_yellow_sides.png
new file mode 100644 (file)
index 0000000..55bb6c0
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thin_yellow_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_thin_yellow_wall_sides.png b/technic/textures/technic_homedecor_glowlight_thin_yellow_wall_sides.png
new file mode 100644 (file)
index 0000000..4b28a27
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_thin_yellow_wall_sides.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_white_tb.png b/technic/textures/technic_homedecor_glowlight_white_tb.png
new file mode 100644 (file)
index 0000000..fdc8a4d
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_white_tb.png differ
diff --git a/technic/textures/technic_homedecor_glowlight_yellow_tb.png b/technic/textures/technic_homedecor_glowlight_yellow_tb.png
new file mode 100644 (file)
index 0000000..ffd9c58
Binary files /dev/null and b/technic/textures/technic_homedecor_glowlight_yellow_tb.png differ