Make switching station only react to nodes from below

est31

2015-02-02 9444eff7f7853b0e4385adbd117cd6bace8dcb8f

 technic/helpers.lua

@@ -1,7 +1,14 @@
minetest.swap_node = minetest.swap_node or function(pos, node)
   local oldmeta = minetest.get_meta(pos):to_table()
   minetest.set_node(pos, node)
   minetest.get_meta(pos):from_table(oldmeta)
--load config
local sepchar, baresepchar = nil, nil
do
   local sepcode = technic.config:get("thousand_separator")
   --default is SI style
   sepchar = sepcode and string.char(sepcode) or " "
   baresepchar = sepchar
   --handling if sepchar is magic...
   for magic in string.gmatch("().%+-*?[^$", ".") do
      if sepchar == magic then sepchar = "%"..sepchar end
   end
end

-- Only changes name, keeps other params
@@ -25,3 +32,64 @@
   stack:set_metadata(minetest.serialize(meta))
   return stack
end

local function resolve_name(function_name)
   local a = _G
   for key in string.gmatch(function_name, "([^%.]+)(%.?)") do
      if a[key] then
         a = a[key]
      else
         return nil
      end
   end
   return a
end

function technic.function_exists(function_name)
   return type(resolve_name(function_name)) == 'function'
end

-- if the node is loaded, returns it. If it isn't loaded, load it and return nil.
function technic.get_or_load_node(pos)
   local node_or_nil = minetest.get_node_or_nil(pos)
   if node_or_nil then return node_or_nil end
   local vm = VoxelManip()
   local MinEdge, MaxEdge = vm:read_from_map(pos, pos)
   return nil
end

function technic.format(str, ...)
   local arg={...}
   local param = nil
   local percent = false
   local res = ""
   local i = 1
   for c in str:gmatch"." do
      if percent then
         assert(c ~= "%") --syntax error
         if c == "e" then
            -- use enhanced number formatting
            -- only works for unsigned numbers
            local numstr = tostring(math.abs(arg[i]))
            local a, b, body, frac = numstr:find("^(%d+)([.]?.-)$")
            a = 1
            body = body..baresepchar
            while a ~= 0 do
               body, a = body:gsub("(%d)(%d%d%d)"..sepchar, "%1"..sepchar.."%2"..sepchar, 1)
            end
            body = body:gsub(sepchar.."$", "")
            res = res .. body .. frac
         else
            --use traditional string:format
            res = res .. (string.format(("%"..c), arg[i]))
         end
         i = i + 1
         percent = false
      elseif c == "%" then
         percent = true
      else
         res = res .. c
      end
   end
   return res
end