musttest_game/mods/circular_saw/init.lua

--[[
More Blocks: circular saw

Copyright (c) 2011-2015 Calinou and contributors.
Licensed under the zlib license. See LICENSE.md for more information.
--]]

-- Localize for performance.
local math_floor = math.floor
local math_min = math.min
local math_max = math.max

-- Must be enough space to hold all possible variants of a material.
local INVENTORY_SIZE = 138

local S = function(str) return str end

if not minetest.global_exists("circular_saw") then circular_saw = {} end
circular_saw.modpath = minetest.get_modpath("circular_saw")
circular_saw.known_nodes = circular_saw.known_nodes or {}

function circular_saw.register_node(recipeitem, subname)
  circular_saw.known_nodes[recipeitem] = circular_saw.known_nodes[recipeitem] or {}
  local d = circular_saw.known_nodes[recipeitem]
  d[#d + 1] = subname
end

-- 3rd parameter: how many microblocks does this shape cost:
-- It may cause slight loss, but no gain.
-- 1st and 2nd parameters are nodename prefix/postfixes.
-- All entries of this form assume the modname is "stairs".
circular_saw.names = {
  {"micro", "_1", 1},
  {"micro", "_1s", 1},
  {"micro", "_1c", 1},
  {"micro", "_c", 1},
  {"panel", "_1", 1},
  {"micro", "_2", 1},
  {"panel", "_2", 1},
  {"micro", "_4", 1},
  {"panel", "_4", 1},
  {"micro", "", 1},
  {"panel", "", 2},

  {"micro", "_12", 2},
  {"panel", "_12", 2},
  {"micro", "_14", 3},
  {"panel", "_14", 2},
  {"micro", "_15", 4},
  {"panel", "_15", 2},
  {"micro", "_16", 4},
  {"micro", "_16s", 2},
  {"panel", "_16", 4},

  {"stair", "_outer", 5},
  {"stair", "_outer2", 4},
  {"stair", "", 6},
  {"stair", "_inner", 7},
  {"$newslopes", "_01", 3},
  {"$newslopes", "_02", 1},
  {"slab", "_1", 1},
  {"slab", "_2", 1},
  {"slab", "_quarter", 2},
  {"slab", "", 4},
  {"slab", "_three_quarter", 6},

  {"slab", "_14", 7},
  {"slab", "_15", 8},
  {"stair", "_half", 3},
  {"stair", "_right_half", 3},
  {"stair", "_alt_1", 1},
  {"stair", "_alt_2", 1},
  {"stair", "_alt_4", 2},
  {"stair", "_alt_5", 1},
  {"stair", "_alt_6", 2},
  {"stair", "_alt", 4},

  {"slope", "", 4},
  {"slope", "_half", 2},
  {"slope", "_half_raised", 6},
  {"slope", "_inner", 7},
  {"slope", "_inner_half", 3},
  {"slope", "_inner_half_raised", 7},
  {"slope", "_inner_cut", 7},
  {"slope", "_inner_cut2", 8},

  {"slope", "_inner_cut3", 8},
  {"slope", "_inner_cut4", 4},
  {"slope", "_inner_cut5", 4},
  {"slope", "_inner_cut6", 7},
  {"slope", "_inner_cut7", 8},
  {"slope", "_inner_cut_half", 4},
  {"slope", "_inner_cut_half_raised", 8},
  {"slope", "_outer", 3},
  {"slope", "_outer_half", 2},
  {"slope", "_outer_half_raised", 6},
  {"slope", "_outer_cut", 2},
  {"slope", "_outer_cut_half", 1},

  {"slope", "_outer_cut_half_raised", 3},
  {"slope", "_cut", 4},
	{"slope", "_xslope_quarter", 2},
	{"slope", "_xslope_quarter2", 2},
	{"slope", "_xslope_three_quarter", 6},
	{"slope", "_xslope_three_quarter_half", 4},
	{"slope", "_xslope_cut", 4},
	{"slope", "_xslope_slope", 1},
	{"slab", "_two_sides", 1},

	{"slab", "_three_sides", 2},
	{"slab", "_three_sides_u", 2},
	{"slab", "_four_sides", 3},
	{"slab", "_hole", 3},
	{"slab", "_two_opposite", 1},
	{"slab", "_pit", 3},
	{"slab", "_pit_half", 2},
  {"stair", "_half_1", 1},
  {"stair", "_right_half_1", 1},

  {"slope", "_xslope_peak", 4},
  {"slope", "_xslope_peak_half", 2},
  {"slope", "_lh", 2},
  {"slope", "_half_lh", 1},
  {"slope", "_half_raised_lh", 3},
	{"slope", "_xslope_slope_lh", 1},
  {"slope", "_xslope_peak_lh", 2},
  {"slope", "_xslope_peak_half_lh", 1},

  {"slope", "_rh", 2},
  {"slope", "_half_rh", 1},
  {"slope", "_half_raised_rh", 3},
	{"slope", "_xslope_slope_rh", 1},
	{"slab", "_hole_half", 2},
  {"slope", "_astair_1", 6},
  {"slope", "_astair_2", 5},
  {"slope", "_astair_3", 6},
  {"slope", "_astair_4", 6},
  {"slope", "_astair_5", 8},

  {"panel", "_pillar", 8},
  {"panel", "_pcend", 8},

  -- Note: the leading $ means the name is a modname, NOT a prefix!
  -- This lets us import nodes from mods OTHER than the "stairs" mod.
  {"$walls", "", 8},
  {"$walls", "_noconnect", 8},
  {"$walls", "_noconnect_wide", 8},
  {"$walls", "_half", 4},

  {"$pillars", "_bottom", 8},
  {"$pillars", "_bottom_half", 4},
  {"$pillars", "_top", 8},
  {"$pillars", "_top_half", 4},
  {"$pillars", "_bottom_full", 6},
  {"$pillars", "_top_full", 6},
  {"$pillars", "_bottom_back", 7},
  {"$pillars", "_top_back", 7},

  {"$murderhole", "", 6},
  {"$machicolation", "", 6},

  {"$arrowslit", "", 4},
  {"$arrowslit", "_cross", 4},
  {"$arrowslit", "_hole", 4},
  {"$arrowslit", "_embrasure", 4},
}

function circular_saw:get_cost(inv, stackname)
  for i, item in pairs(inv:get_list("output")) do
    if item:get_name() == stackname then
      return circular_saw.names[i][3]
    end
  end
end

function circular_saw:get_valid_microblock(materials)
  for k, v in ipairs(materials) do
    local item = "stairs:micro_" .. v
    if minetest.registered_nodes[item] then
      return item
    end
  end
end

function circular_saw:get_output_inv(parent_material, materials, amount, max)
  if (not max or max < 1 or max > 64) then max = 64 end

  local vcount = 0
  local list = {}

  -- If there is nothing inside, display empty inventory:
  if amount < 1 then
    return list, vcount
  end

  -- Table of nodenames we've seen already, to avoid adding duplicates to
  -- the circular saw's output inventory list.
  local seen = {}

  for _, material in ipairs(materials) do
    for i = 1, #circular_saw.names do
      local t = circular_saw.names[i]
      local cost = t[3]
      local balance = math_min(math_floor(amount/cost), max)
      local nodename

      -- If the prefix begins with a $, then it's actually a modname.
      -- This is needed because some shapes (like walls and castle stuff) don't
      -- have proper prefixes, and their names would otherwise collide with
      -- stairs stuff if we don't take precautions.
      if t[1]:sub(1, 1) == "$" then
        nodename = t[1]:sub(2) .. ":" .. material .. t[2]
      else
        nodename = "stairs:" .. t[1] .. "_" .. material .. t[2]
      end

      local ndef = minetest.registered_nodes[nodename]
      if ndef and ndef._stairs_parent_material == parent_material and not seen[nodename] then
        list[#list + 1] = nodename .. " " .. balance
        seen[nodename] = true

        if balance > 0 then
          vcount = vcount + 1
        end
      end
    end
  end

  return list, vcount
end


-- Reset empty circular_saw after last full block has been taken out
-- (or the circular_saw has been placed the first time)
-- Note: max_offered is not reset:
function circular_saw:reset(pos)
  local meta = minetest.get_meta(pos)
  local inv  = meta:get_inventory()

  inv:set_stack("input", 1, "")
  inv:set_stack("micro", 1, "")
  inv:set_list("output", {})
  meta:set_int("anz", 0)

  circular_saw.update_formspec(pos)
  circular_saw.update_infotext(pos)
end



function circular_saw.update_infotext(pos)
  local meta = minetest.get_meta(pos)
  local inv = meta:get_inventory()
  local stack = inv:get_stack("input", 1)
  local pname = meta:get_string("owner")

  if stack:get_count() > 0 then
    local desc = stack:get_name()
    local idef = stack:get_definition()
    if idef and idef.description then
      desc = utility.get_short_desc(idef.description)
    end

    meta:set_string("infotext",
      "Circular Saw is Working on \"" .. desc .. "\".\nOwned by <" .. rename.gpn(pname) .. ">!")
  else
    meta:set_string("infotext",
      "Circular Saw is Empty.\nOwned by <" .. rename.gpn(pname) .. ">!")
  end
end



-- Player has taken something out of the box or placed something inside
-- that amounts to 'amount' microblocks (full block count * 8):
function circular_saw:update_inventory(pos, amount)
  local meta          = minetest.get_meta(pos)
  local inv           = meta:get_inventory()

  amount = meta:get_int("anz") + amount

  -- The material is recycled automatically
  inv:set_stack("recycle", 1, ItemStack())

  if amount < 1 then -- If the last block is taken out.
    --minetest.log('action', 'amount is zero!')
    meta:set_int("variant_count", 0)
    self:reset(pos)
    return
  end

  local stack = inv:get_stack("input", 1)
  -- At least one "normal" block is necessary to see what kind of stairs are requested.
  if stack:is_empty() then
    --minetest.log('action', 'stack is empty!')
    -- Any microblocks not taken out yet are now lost.
    -- (covers material loss in the machine)
    meta:set_int("variant_count", 0)
    self:reset(pos)
    return
  end

  local node_name = stack:get_name() or ""
  local input_count = math_floor(amount / 8)
  local input_item = node_name .. " " .. input_count

  -- Display as many full blocks as possible.
  inv:set_stack("input", 1, input_item)

  local noutlist = {}
  local total_available = 0
  local materials = circular_saw.known_nodes[node_name]
  if materials then
    local leftover_item = self:get_valid_microblock(materials)

    if leftover_item then
      -- 0-7 microblocks may remain left-over:
      inv:set_stack("micro", 1, (leftover_item .. " " .. (amount % 8)))
    else
      -- Erase stack because this microblock doesn't exist.
      -- This generally shouldn't happen; this is for safety.
      inv:set_stack("micro", 1, ItemStack(""))
    end

    -- Display:
    noutlist, total_available = self:get_output_inv(node_name, materials, amount, meta:get_int("max_offered"))
  end

  ------------------------------------------------------------------------------
  -- So the devs broke the engine again.
  --inv:set_list("output", noutlist)

  local output_size = inv:get_size("output")
  for k = 1, output_size do
    if noutlist[k] then
      inv:set_stack("output", k, noutlist[k])
    else
      inv:set_stack("output", k, ItemStack())
    end
  end
  ------------------------------------------------------------------------------

  -- Store how many microblocks are available:
  meta:set_int("anz", amount)
  meta:set_int("variant_count", total_available)

  circular_saw.update_formspec(pos)
  circular_saw.update_infotext(pos)
end


-- The amount of items offered per shape can be configured:
function circular_saw.on_receive_fields(pos, formname, fields, sender)
  -- Ignore scroll events.
  if fields.output_grid then
    local data = minetest.explode_scrollbar_event(fields.output_grid)
    if data and data.type == "CHG" then
      local meta = minetest.get_meta(pos)
      meta:set_string("scrollbar_val", tostring(data.value))
      --circular_saw.update_formspec(pos)
      --minetest.chat_send_all('test scroll event')
      return
    end
  end

  local meta = minetest.get_meta(pos)
  local max = tonumber(fields.max_offered)
  if max and max > 0 then
    meta:set_string("max_offered",  max)
    -- Update to show the correct number of items:
    circular_saw:update_inventory(pos, 0)
  end

  if fields.quit then
    -- Needed so the form remembers its scroll position.
    circular_saw.update_formspec(pos)
    --minetest.chat_send_all('test quit event')
  end
end



local function has_saw_privilege(meta, player)
  if not meta then return false end
  if not player then return false end
  
  if minetest.check_player_privs(player, "protection_bypass") then
    return true
  end

  local owner = (meta:get_string("owner") or "")
  if player:get_player_name() == owner then
    return true
  end
    
  return false
end


-- Moving the inventory of the circular_saw around is not allowed because it
-- is a fictional inventory. Moving inventory around would be rather
-- impractical and make things more difficult to calculate:
function circular_saw.allow_metadata_inventory_move(
    pos, from_list, from_index, to_list, to_index, count, player)
  return 0
end


-- Only input- and recycle-slot are intended as input slots:
function circular_saw.allow_metadata_inventory_put(pos, listname, index, stack, player)
  local meta = minetest.get_meta(pos)
  if not has_saw_privilege(meta, player) then return 0 end
  
  if listname == "fuel" then
    if stack:get_name() == "default:mese_crystal_fragment" then
      return stack:get_count()
    else
      return 0
    end
  end
  
  -- The player is not allowed to put something in there:
  if listname == "output" or listname == "micro" then
    return 0
  end

  local inv  = meta:get_inventory()
  local stackname = stack:get_name()
  local count = stack:get_count()

  -- Only alow those items that are offered in the output inventory to be recycled:
  if listname == "recycle" then
    if not inv:contains_item("output", stackname) then
      return 0
    end
    local stackmax = stack:get_stack_max()
    local instack = inv:get_stack("input", 1)
    local microstack = inv:get_stack("micro", 1)
    local incount = instack:get_count()
    local incost = (incount * 8) + microstack:get_count()
    local maxcost = (stackmax * 8) + 7
    local cost = circular_saw:get_cost(inv, stackname)
    if (incost + cost) > maxcost then
      return math_max((maxcost - incost) / cost, 0)
    end
    return count
  end

  -- Only accept certain blocks as input which are known to be craftable into stairs:
  if listname == "input" then
    if not inv:is_empty("input") then
      if inv:get_stack("input", index):get_name() ~= stackname then
        return 0
      end
    end
    if not inv:is_empty("micro") then
      local microstackname = inv:get_stack("micro", 1):get_name():gsub("^.+:micro_", "", 1)
      local cutstackname = stackname:gsub("^.+:", "", 1)
      if microstackname ~= cutstackname then
        return 0
      end
    end

    -- Check if this nodename is known to us.
    for registered_name, _ in pairs(circular_saw.known_nodes) do
      if registered_name == stackname and inv:room_for_item("input", stack) then
        return count
      end
    end

    return 0
  end
end

-- Taking is allowed from all slots (even the internal microblock slot).
-- Putting something in is slightly more complicated than taking anything
-- because we have to make sure it is of a suitable material:
function circular_saw.on_metadata_inventory_put(
    pos, listname, index, stack, player)
  -- We need to find out if the circular_saw is already set to a
  -- specific material or not:
  local meta = minetest.get_meta(pos)
  local inv  = meta:get_inventory()
  local stackname = stack:get_name()
  local count = stack:get_count()

  -- Putting something into the input slot is only possible if that had
  -- been empty before or did contain something of the same material:
  if listname == "input" then
    -- Each new block is worth 8 microblocks:
    circular_saw:update_inventory(pos, 8 * count)
  elseif listname == "recycle" then
    -- Lets look which shape this represents:
    local cost = circular_saw:get_cost(inv, stackname)
    local input_stack = inv:get_stack("input", 1)
    -- check if this would not exceed input itemstack max_stacks
    if input_stack:get_count() + ((cost * count) / 8) <= input_stack:get_stack_max() then
      circular_saw:update_inventory(pos, cost * count)
    end
  end
end

local mese_to_cut_ratio = 32

function circular_saw.allow_metadata_inventory_take(pos, listname, index, stack, player)
  local meta = minetest.get_meta(pos)
  if not has_saw_privilege(meta, player) then return 0 end
  
  if listname == "output" then
    local inv = meta:get_inventory()
    if inv:is_empty("fuel") then
      minetest.chat_send_player(player:get_player_name(), "# Server: No power to saw!")
			easyvend.sound_error(player:get_player_name())
      return 0
    else
			-- We do know how much each block at each position costs:
			local cost = circular_saw.names[index][3] * stack:get_count()

			local fuel = math.ceil(cost / mese_to_cut_ratio)
      if fuel < 1 then fuel = 1 end

      local fstack = inv:get_stack("fuel", 1)
      if fstack:get_count() < fuel then
        minetest.chat_send_player(player:get_player_name(), "# Server: Not enough energy!")
				easyvend.sound_error(player:get_player_name())
        return 0
      end
    end
  end

  return stack:get_count()
end

function circular_saw.on_metadata_inventory_take(
    pos, listname, index, stack, player)

  -- Prevent (inbuilt) swapping between inventories with different blocks
  -- corrupting player inventory or Saw with 'unknown' items.
  local meta          = minetest.get_meta(pos)
  local inv           = meta:get_inventory()
  local input_stack = inv:get_stack(listname,  index)
  if not input_stack:is_empty() and input_stack:get_name()~=stack:get_name() then
    local player_inv = player:get_inventory()
    if player_inv:room_for_item("main", input_stack) then
      player_inv:add_item("main", input_stack)
    end

    circular_saw:reset(pos)
    return
  end
  
  -- If it is one of the offered stairs: find out how many
  -- microblocks have to be substracted:
  if listname == "output" then
    -- We do know how much each block at each position costs:
    local cost = circular_saw.names[index][3] * stack:get_count()

    local fuel = math.ceil(cost / mese_to_cut_ratio)
    if fuel < 1 then fuel = 1 end
    inv:remove_item("fuel", ItemStack("default:mese_crystal_fragment " .. fuel))
    
    circular_saw:update_inventory(pos, -cost)
  elseif listname == "micro" then
    -- Each microblock costs 1 microblock:
    circular_saw:update_inventory(pos, -stack:get_count())
  elseif listname == "input" then
    -- Each normal (= full) block taken costs 8 microblocks:
    circular_saw:update_inventory(pos, 8 * -stack:get_count())
  end
  -- The recycle field plays no role here since it is processed immediately.
end

function circular_saw.update_formspec(pos)
  local fancy_inv = default.gui_bg..default.gui_bg_img..default.gui_slots
  local meta = minetest.get_meta(pos)
  local scrollval = meta:get_string("scrollbar_val")
  local vcount = meta:get_int("variant_count")

  --minetest.chat_send_all('test2')

	-- Modify formspec size and inventory size in order to make room for more blocks.
  meta:set_string("formspec", "size[9,10]"..fancy_inv..
      "label[0,0.15;" ..S("Input\nMaterial").. "]" ..
      "list[context;input;1.2,0.15;1,1;]" ..
      "label[0,1.15;" ..S("Left-Over").. "]" ..
      "list[context;micro;1.2,1.15;1,1;]" ..
      "label[0,2.15;" ..S("Recycle\nOutput").. "]" ..
      "list[context;recycle;1.2,2.15;1,1;]" ..
      "field[0.3,4.0;1,1;max_offered;" ..S("Max").. ":;${max_offered}]" ..
      "field_close_on_enter[max_offered;false]" ..
      "button[1.2,3.7;1,1;Set;" ..S("Set").. "]" ..

      "real_coordinates[true]" ..
      "scroll_container[3.5,0.5;7.8,6.05;output_grid;vertical]" ..
      "list[context;output;0.03,0.03;6,23;]" ..
      "scroll_container_end[]" ..
      "scrollbaroptions[max=225;thumbsize=70;largestep=50;smallstep=3]" ..
      "scrollbar[11.0,0.5;0.4,6.05;vertical;output_grid;" .. scrollval .. "]" ..
      "label[3.5,6.85;Material variants: " .. vcount .. "]" ..
      "real_coordinates[false]" ..

      "list[current_player;main;0.5,6.25;8,4;]" ..
      "label[0,4.85;Mese Fuel\nStorage]" ..
      "list[context;fuel;1.2,4.85;1,1;]"
  )

  local inv = meta:get_inventory()
  if inv:get_size("output") ~= INVENTORY_SIZE then
    inv:set_size("output", INVENTORY_SIZE)
  end
end

function circular_saw.on_construct(pos)
  local meta = minetest.get_meta(pos)

  circular_saw.update_formspec(pos)

  meta:set_int("anz", 0) -- No microblocks inside yet.
  meta:set_string("max_offered", 64) -- How many items of this kind are offered by default?

  local inv = meta:get_inventory()
  inv:set_size("input", 1)    -- Input slot for full blocks of material x.
  inv:set_size("micro", 1)    -- Storage for 1-7 surplus microblocks.
  inv:set_size("recycle", 1)  -- Surplus partial blocks can be placed here.
  inv:set_size("output", INVENTORY_SIZE) -- Many versions of stair-parts of material x.
  inv:set_size("fuel", 1)

  circular_saw:reset(pos)
end


function circular_saw.can_dig(pos,player)
  local meta = minetest.get_meta(pos)
  local inv = meta:get_inventory()
  if not inv:is_empty("input") or
    not inv:is_empty("micro") or
    not inv:is_empty("recycle") or
    not inv:is_empty("fuel") then
    return false
  end
  -- Can be dug by anyone when empty, not only by the owner:
  return true
end



function circular_saw.after_place_node(pos, placer)
  local meta = minetest.get_meta(pos)
  local owner = placer and placer:get_player_name() or ""
  local dname = rename.gpn(owner)
  meta:set_string("owner",  owner)
  meta:set_string("rename", dname)

  circular_saw.update_infotext(pos)
end



if not circular_saw.loaded then
	local c = "circular_saw:core"
	local f = circular_saw.modpath .. "/init.lua"
	reload.register_file(c, f, false)
	circular_saw.loaded = true


  minetest.register_node("circular_saw:circular_saw",  {
    description = "Circular Table Saw\n\nRequires mese fragments to power the saw wheel.\nDo not allow children to use.",
    drawtype = "nodebox",
    node_box = {
      type = "fixed",
      fixed = {
        {-0.4, -0.5, -0.4, -0.25, 0.25, -0.25}, -- Leg
        {0.25, -0.5, 0.25, 0.4, 0.25, 0.4}, -- Leg
        {-0.4, -0.5, 0.25, -0.25, 0.25, 0.4}, -- Leg
        {0.25, -0.5, -0.4, 0.4, 0.25, -0.25}, -- Leg
        {-0.5, 0.25, -0.5, 0.5, 0.375, 0.5}, -- Tabletop
        {-0.01, 0.4375, -0.125, 0.01, 0.5, 0.125}, -- Saw blade (top)
        {-0.01, 0.375, -0.1875, 0.01, 0.4375, 0.1875}, -- Saw blade (bottom)
        {-0.25, -0.0625, -0.25, 0.25, 0.25, 0.25}, -- Motor case
      },
    },

    dumpnodes_tile = {"default_wood.png"},
    tiles = {
      "moreblocks_circular_saw_top.png",
      "moreblocks_circular_saw_bottom.png",
      "moreblocks_circular_saw_side.png"
    },
    paramtype = "light",
    sunlight_propagates = true,
    paramtype2 = "facedir",

    on_rotate = function(...)
      return screwdriver.rotate_simple(...)
    end,

    groups = utility.dig_groups("furniture", {
      immovable = 1,
    }),
    sounds = default.node_sound_wood_defaults(),
    on_construct = function(...) return circular_saw.on_construct(...) end,
    can_dig = function(...) return circular_saw.can_dig(...) end,
    stack_max = 1,

    -- Set the owner of this circular saw.
    after_place_node = function(...) return circular_saw.after_place_node(...) end,

    -- The amount of items offered per shape can be configured:
    on_receive_fields = function(...) return circular_saw.on_receive_fields(...) end,
    allow_metadata_inventory_move = function(...) return circular_saw.allow_metadata_inventory_move(...) end,
    -- Only input- and recycle-slot are intended as input slots:
    allow_metadata_inventory_put = function(...) return circular_saw.allow_metadata_inventory_put(...) end,
    allow_metadata_inventory_take = function(...) return circular_saw.allow_metadata_inventory_take(...) end,
    -- Taking is allowed from all slots (even the internal microblock slot). Moving is forbidden.
    -- Putting something in is slightly more complicated than taking anything because we have to make sure it is of a suitable material:
    on_metadata_inventory_put = function(...) return circular_saw.on_metadata_inventory_put(...) end,
    on_metadata_inventory_take = function(...) return circular_saw.on_metadata_inventory_take(...) end,

    -- Called by rename LBM.
    _on_update_infotext = function(pos)
      circular_saw.update_infotext(pos)
    end,

    _on_update_formspec = function(pos)
      -- Update circular saw.
      circular_saw.update_formspec(pos)
      circular_saw:update_inventory(pos, 0)
    end,
  })


  minetest.register_craft({
    output = "circular_saw:circular_saw",
    recipe = {
      {'', 'gem_cutter:blade', ''},
      {'group:wood', 'group:wood', 'group:wood'},
      {'cast_iron:ingot', 'techcrafts:electric_motor', 'cast_iron:ingot'},
    }
  })
end