Add MV-Freezer (#457)

upsala

2018-12-09 e1a71a8fb0bf052358cdb6b197a5bf5b20341205

 technic/machines/register/machine_base.lua

@@ -1,6 +1,9 @@

local S = technic.getter

local fs_helpers = pipeworks.fs_helpers
local tube_entry = "^pipeworks_tube_connection_metallic.png"

local tube = {
   insert_object = function(pos, node, stack, direction)
      local meta = minetest.get_meta(pos)
@@ -10,8 +13,10 @@
   can_insert = function(pos, node, stack, direction)
      local meta = minetest.get_meta(pos)
      local inv = meta:get_inventory()
      local onestack = stack:peek_item(1)
      return inv:room_for_item("src", onestack)
      if meta:get_int("splitstacks") == 1 then
         stack = stack:peek_item(1)
      end
      return inv:room_for_item("src", stack)
   end,
   connect_sides = {left = 1, right = 1, back = 1, top = 1, bottom = 1},
}
@@ -39,7 +44,7 @@
   for k, v in pairs(groups) do active_groups[k] = v end

   local formspec =
      "invsize[8,9;]"..
      "size[8,9;]"..
      "list[current_name;src;"..(4-input_size)..",1;"..input_size..",1;]"..
      "list[current_name;dst;5,1;2,2;]"..
      "list[current_player;main;0,5;8,4;]"..
@@ -134,15 +139,21 @@
         inv:set_list("dst", inv:get_list("dst_tmp"))
      end
   end
	

   local tentry = tube_entry
   if ltier == "lv" then
      tentry = ""
   end
   minetest.register_node("technic:"..ltier.."_"..machine_name, {
      description = machine_desc:format(tier),
      tiles = {"technic_"..ltier.."_"..machine_name.."_top.png", 
                    "technic_"..ltier.."_"..machine_name.."_bottom.png",
               "technic_"..ltier.."_"..machine_name.."_side.png",
               "technic_"..ltier.."_"..machine_name.."_side.png",
               "technic_"..ltier.."_"..machine_name.."_side.png",
               "technic_"..ltier.."_"..machine_name.."_front.png"},
      tiles = {
         "technic_"..ltier.."_"..machine_name.."_top.png"..tentry, 
         "technic_"..ltier.."_"..machine_name.."_bottom.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_side.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_side.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_side.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_front.png"
      },
      paramtype2 = "facedir",
      groups = groups,
      tube = data.tube and tube or nil,
@@ -152,9 +163,23 @@
      on_construct = function(pos)
         local node = minetest.get_node(pos)
         local meta = minetest.get_meta(pos)

         local form_buttons = ""
         if not string.find(node.name, ":lv_") then
            form_buttons = fs_helpers.cycling_button(
               meta,
               pipeworks.button_base,
               "splitstacks",
               {
                  pipeworks.button_off,
                  pipeworks.button_on
               }
            )..pipeworks.button_label
         end

         meta:set_string("infotext", machine_desc:format(tier))
         meta:set_int("tube_time",  0)
         meta:set_string("formspec", formspec)
         meta:set_string("formspec", formspec..form_buttons)
         local inv = meta:get_inventory()
         inv:set_size("src", input_size)
         inv:set_size("dst", 4)
@@ -167,17 +192,38 @@
      allow_metadata_inventory_move = technic.machine_inventory_move,
      technic_run = run,
      after_place_node = data.tube and pipeworks.after_place,
      after_dig_node = technic.machine_after_dig_node
      after_dig_node = technic.machine_after_dig_node,
      on_receive_fields = function(pos, formname, fields, sender)
         local node = minetest.get_node(pos)
         if not pipeworks.may_configure(pos, sender) then return end
         fs_helpers.on_receive_fields(pos, fields)
         local meta = minetest.get_meta(pos)
         local form_buttons = ""
         if not string.find(node.name, ":lv_") then
            form_buttons = fs_helpers.cycling_button(
               meta,
               pipeworks.button_base,
               "splitstacks",
               {
                  pipeworks.button_off,
                  pipeworks.button_on
               }
            )..pipeworks.button_label
         end
         meta:set_string("formspec", formspec..form_buttons)
      end,
   })

   minetest.register_node("technic:"..ltier.."_"..machine_name.."_active",{
      description = machine_desc:format(tier),
      tiles = {"technic_"..ltier.."_"..machine_name.."_top.png",
               "technic_"..ltier.."_"..machine_name.."_bottom.png",
               "technic_"..ltier.."_"..machine_name.."_side.png",
               "technic_"..ltier.."_"..machine_name.."_side.png",
               "technic_"..ltier.."_"..machine_name.."_side.png",
               "technic_"..ltier.."_"..machine_name.."_front_active.png"},
      tiles = {
         "technic_"..ltier.."_"..machine_name.."_top.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_bottom.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_side.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_side.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_side.png"..tentry,
         "technic_"..ltier.."_"..machine_name.."_front_active.png"
      },
      paramtype2 = "facedir",
      drop = "technic:"..ltier.."_"..machine_name,
      groups = active_groups,
@@ -191,6 +237,25 @@
      allow_metadata_inventory_move = technic.machine_inventory_move,
      technic_run = run,
      technic_disabled_machine_name = "technic:"..ltier.."_"..machine_name,
      on_receive_fields = function(pos, formname, fields, sender)
         local node = minetest.get_node(pos)
         if not pipeworks.may_configure(pos, sender) then return end
         fs_helpers.on_receive_fields(pos, fields)
         local meta = minetest.get_meta(pos)
         local form_buttons = ""
         if not string.find(node.name, ":lv_") then
            form_buttons = fs_helpers.cycling_button(
               meta,
               pipeworks.button_base,
               "splitstacks",
               {
                  pipeworks.button_off,
                  pipeworks.button_on
               }
            )..pipeworks.button_label
         end
         meta:set_string("formspec", formspec..form_buttons)
      end,
   })

   technic.register_machine(tier, "technic:"..ltier.."_"..machine_name,            technic.receiver)