From 9444eff7f7853b0e4385adbd117cd6bace8dcb8f Mon Sep 17 00:00:00 2001 From: est31 <MTest31@outlook.com> Date: Mon, 02 Feb 2015 05:29:44 +0100 Subject: [PATCH] Make switching station only react to nodes from below --- technic/helpers.lua | 103 +++++++++++++++++++++++++++++++++++++++++---------- 1 files changed, 82 insertions(+), 21 deletions(-) diff --git a/technic/helpers.lua b/technic/helpers.lua index 459b482..de315d0 100644 --- a/technic/helpers.lua +++ b/technic/helpers.lua @@ -1,25 +1,14 @@ -function get_item_meta (string) - if string.find(string, "return {") then - return minetest.deserialize(string) - else return nil +--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 - -function set_item_meta (table) - return minetest.serialize(table) -end - -function has_locked_chest_privilege(meta, player) - if player:get_player_name() ~= meta:get_string("owner") then - return false - end - return true -end - -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) end -- Only changes name, keeps other params @@ -32,3 +21,75 @@ return node.name end +-- Fully charge RE chargeable item. +-- Must be defined early to reference in item definitions. +function technic.refill_RE_charge(stack) + local max_charge = technic.power_tools[stack:get_name()] + if not max_charge then return stack end + technic.set_RE_wear(stack, max_charge, max_charge) + local meta = minetest.deserialize(stack:get_metadata()) or {} + meta.charge = max_charge + 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 \ No newline at end of file -- Gitblit v1.8.0