371 lines
10 KiB
Lua
371 lines
10 KiB
Lua
-- Facade Shaper
|
|
-- This machine serves the same purpose as the circular saw from moreblocks or the milling
|
|
-- maching from mymillwork. Namely, it provides a tool for creating shaped blocks that does
|
|
-- not rely on using recipes.
|
|
|
|
|
|
-- Balancing output per 1 input block with respect to apparent volume of output shape.
|
|
-- All current shapes are added, but shapes not present in this table will still be produced
|
|
-- one at a time — if that is the desired quantity, adding them is not required.
|
|
local output_ratios = {
|
|
bannerstone = 1,
|
|
bannerstone_corner = 1,
|
|
centerstone = 1,
|
|
column = 1,
|
|
column_corner = 1,
|
|
corbel = 1,
|
|
corbel_corner = 1,
|
|
corbel_corner_inner = 1,
|
|
carved_stone_a = 1,
|
|
carved_stone_a_corner = 1,
|
|
rgspro = 2,
|
|
rgspro_inner_corner = 1,
|
|
rgspro_outer_corner = 1,
|
|
corner_bricks = 2,
|
|
columnia_mid = 4,
|
|
columnia_bottom = 1,
|
|
columnia_top = 1,
|
|
columnia_crosslink = 1,
|
|
columnia_link = 4,
|
|
columnia_linkdown = 4,
|
|
}
|
|
|
|
-- The material to be used for buttons when no material is actually loaded.
|
|
-- It should be a generic material for which all the facade shapes are defined.
|
|
local demo_material = "default:stone"
|
|
|
|
-- Whether the facade should obey area protection for the inventories (as machines in technic mod)
|
|
-- or allow anybody to use them, but disallow the removal of machine itself (like circular saw in moreblocks)
|
|
local protect_inventories = false
|
|
|
|
|
|
|
|
local function prepare_formspec (material_name)
|
|
|
|
local output = string.gsub(material_name, "^.*:", "facade:")
|
|
|
|
local shaper_formspec =
|
|
|
|
"size[8,11;]"..
|
|
"label[0,0;" .. "Choose shape to produce:" .. "]"..
|
|
|
|
-- row 1, blocky shapes
|
|
"item_image_button[0,0.5;1,1;" .. output .. "_bannerstone" .. ";bannerstone; ]"..
|
|
"item_image_button[1,0.5;1,1;" .. output .. "_bannerstone_corner" .. ";bannerstone_corner; ]"..
|
|
"item_image_button[2,0.5;1,1;" .. output .. "_centerstone" .. ";centerstone; ]"..
|
|
"item_image_button[3,0.5;1,1;" .. output .. "_carved_stone_a" .. ";carved_stone_a; ]"..
|
|
"item_image_button[4,0.5;1,1;" .. output .. "_carved_stone_a_corner" .. ";carved_stone_a_corner; ]"..
|
|
"item_image_button[5,0.5;1,1;" .. output .. "_column" .. ";column; ]"..
|
|
"item_image_button[6,0.5;1,1;" .. output .. "_column_corner" .. ";column_corner; ]"..
|
|
|
|
-- row 2, corbel
|
|
"item_image_button[0,1.5;1,1;" .. output .. "_corbel" .. ";corbel; ]"..
|
|
"item_image_button[1,1.5;1,1;" .. output .. "_corbel_corner_inner" .. ";corbel_corner_inner; ]"..
|
|
"item_image_button[2,1.5;1,1;" .. output .. "_corbel_corner" .. ";corbel_corner; ]"..
|
|
|
|
-- row 3, cornice
|
|
"item_image_button[0,2.5;1,1;" .. output .. "_rgspro" .. ";rgspro; ]"..
|
|
"item_image_button[1,2.5;1,1;" .. output .. "_rgspro_inner_corner" .. ";rgspro_inner_corner; ]"..
|
|
"item_image_button[2,2.5;1,1;" .. output .. "_rgspro_outer_corner" .. ";rgspro_outer_corner; ]"
|
|
|
|
-- row 4, columnia
|
|
if not minetest.get_modpath("columnia") then
|
|
shaper_formspec = shaper_formspec ..
|
|
"item_image_button[0,3.5;1,1;" .. output .. "_columnia_mid" .. ";columnia_mid; ]"..
|
|
"item_image_button[1,3.5;1,1;" .. output .. "_columnia_bottom" .. ";columnia_bottom; ]"..
|
|
"item_image_button[2,3.5;1,1;" .. output .. "_columnia_crosslink" .. ";columnia_crosslink; ]"..
|
|
"item_image_button[3,3.5;1,1;" .. output .. "_columnia_link" .. ";columnia_link; ]"..
|
|
"item_image_button[4,3.5;1,1;" .. output .. "_columnia_linkdown" .. ";columnia_linkdown; ]"
|
|
|
|
-- this code is a provision in case top column pieces enter service
|
|
if minetest.registered_nodes[output .. "_columnia_top"] then
|
|
shaper_formspec = shaper_formspec ..
|
|
"item_image_button[5,3.5;1,1;" .. output .. "_columnia_top" .. ";columnia_top; ]"
|
|
end
|
|
|
|
end
|
|
|
|
-- row 5 for shapes which are not available for all materials
|
|
-- only one such shape exists so far, but more should be easy to add here
|
|
|
|
if minetest.registered_nodes[output .. "_corner_bricks"] then
|
|
shaper_formspec = shaper_formspec ..
|
|
"item_image_button[0,4.5;1,1;" .. output .. "_corner_bricks" .. ";corner_bricks; ]"
|
|
end
|
|
|
|
-- inventory part
|
|
|
|
shaper_formspec = shaper_formspec ..
|
|
|
|
"label[0, 5.5;".."In:".."]"..
|
|
"list[current_name;src;1,5.5;1,1;]"..
|
|
"label[3, 5.5;".."Out:".."]"..
|
|
"list[current_name;dst;4,5.5;4,1;]"..
|
|
|
|
"list[current_player;main;0,7;8,4;]"..
|
|
"listring[current_name;dst]"..
|
|
"listring[current_player;main]"..
|
|
"listring[current_name;src]"..
|
|
"listring[current_player;main]"
|
|
|
|
return(shaper_formspec)
|
|
|
|
end
|
|
|
|
|
|
-- a simple check for compatibile materials
|
|
local function check_material_applicability (material)
|
|
-- using centerstone node here, since it appears to be both one of the oldest
|
|
-- and defined for all materials as well, making it suitable for a quick check
|
|
if minetest.registered_nodes[string.gsub(material, "^.*:", "facade:") .. "_centerstone"] then
|
|
return true
|
|
else
|
|
return false
|
|
end
|
|
end
|
|
|
|
|
|
-- update the buttons to show shapes made from the actual material
|
|
local function update_formspec_put (pos, listname, index, stack, player)
|
|
|
|
if protect_inventories and minetest.is_protected(pos, player:get_player_name()) then
|
|
return
|
|
end
|
|
|
|
if listname ~= "src" then
|
|
return
|
|
end
|
|
|
|
local meta = minetest.get_meta(pos)
|
|
local material_name = stack:get_name()
|
|
|
|
if check_material_applicability(material_name) then
|
|
meta:set_string("formspec", prepare_formspec(material_name))
|
|
else
|
|
return
|
|
end
|
|
|
|
end
|
|
|
|
|
|
-- update the buttons to show shapes made from demo material if all material is removed
|
|
local function update_formspec_take (pos, listname, index, stack, player)
|
|
|
|
if protect_inventories and minetest.is_protected(pos, player:get_player_name()) then
|
|
return
|
|
end
|
|
|
|
if listname ~= "src" then
|
|
return
|
|
end
|
|
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
|
|
if inv:is_empty("src") then
|
|
meta:set_string("formspec", prepare_formspec(demo_material))
|
|
end
|
|
|
|
return
|
|
|
|
end
|
|
|
|
|
|
-- disallow putting in materials which are not supported
|
|
local function check_inventory_put (pos, listname, index, stack, player)
|
|
|
|
if protect_inventories and minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
|
|
if listname ~= "src" then
|
|
return 0
|
|
end
|
|
|
|
local material_name = stack:get_name()
|
|
|
|
if check_material_applicability(material_name) then
|
|
return(stack:get_count())
|
|
else
|
|
return 0
|
|
end
|
|
end
|
|
|
|
|
|
local function check_inventory_take (pos, listname, index, stack, player)
|
|
|
|
if protect_inventories and minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
|
|
if listname ~= "src" and listname ~= "dst" then
|
|
return 0
|
|
end
|
|
|
|
return(stack:get_count())
|
|
|
|
end
|
|
|
|
local function check_inventory_move (pos, from_list, from_index, to_list, to_index, count, player)
|
|
|
|
if protect_inventories and minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
|
|
return(stack:get_count())
|
|
|
|
end
|
|
|
|
-- process the form fields and convert source material to desired shapes
|
|
local function form_handler(pos, formname, fields, sender)
|
|
|
|
if protect_inventories and minetest.is_protected(pos, sender:get_player_name()) then
|
|
return
|
|
end
|
|
|
|
if fields.quit then
|
|
return
|
|
end
|
|
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
|
|
if inv:is_empty("src") then
|
|
return
|
|
end
|
|
|
|
local inputstack = inv:get_stack("src", 1)
|
|
local inputname = inputstack:get_name()
|
|
|
|
for shape,_ in pairs(fields) do
|
|
|
|
local result = string.gsub(inputname, "^.*:", "facade:") .. "_" .. shape
|
|
|
|
-- one can never be overly paranoid, unlike the quick check before, this one is precise
|
|
if not minetest.registered_nodes[result] then
|
|
return
|
|
end
|
|
|
|
-- output quantities are adjusted to preserve roughly same mass of resulting products
|
|
if output_ratios[shape] then
|
|
result = result .. " " .. output_ratios[shape]
|
|
end
|
|
|
|
if not inv:room_for_item("dst", result) then
|
|
return
|
|
end
|
|
|
|
inputstack:take_item(1)
|
|
inv:set_stack("src", 1, inputstack)
|
|
inv:add_item("dst", result)
|
|
|
|
end
|
|
return
|
|
end
|
|
|
|
local function check_removability (pos, player)
|
|
|
|
local meta = minetest.get_meta(pos)
|
|
local owner = meta:set_string("owner")
|
|
local pname = player:get_player_name()
|
|
local inv = meta:get_inventory()
|
|
|
|
-- owner may always remove the device
|
|
if owner and owner ~= "" and pname and pname ~= "" and owner == pname then
|
|
if inv:is_empty("src") and inv:is_empty("dst") then
|
|
return true
|
|
else
|
|
return false
|
|
end
|
|
end
|
|
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
return false
|
|
end
|
|
|
|
if inv:is_empty("src") and inv:is_empty("dst") then
|
|
return true
|
|
end
|
|
|
|
return false
|
|
|
|
end
|
|
|
|
|
|
minetest.register_node("facade:shaper", {
|
|
description = "Shaper Machine",
|
|
drawtype = "nodebox",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
-- base
|
|
{-1/2, -1/2, -1/2, 1/2, -14/32, 1/2},
|
|
-- back
|
|
{-8/32, -1/2, 12/32, 8/32, 1/2, 16/32},
|
|
-- table
|
|
{-8/32, -4/32, -16/32, 8/32, 4/32, 16/32},
|
|
-- rear table sliding support
|
|
{-16/32, -4/32, 12/32, 16/32, 4/32, 16/32},
|
|
-- front table sliding support
|
|
{-8/32, -14/32, -12/32, 8/32, -4/32, -16/32},
|
|
-- top tool beam
|
|
{-4/32, 16/32, -8/32, 4/32, 12/32, 12/32},
|
|
-- cutter holder
|
|
{-2/32, 7/32, -2/32, 2/32, 14/32, 2/32},
|
|
-- cutter
|
|
{-1/128, 6/32, -1/32, 1/128, 7/32, 1/32},
|
|
},
|
|
},
|
|
selection_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-1/2, -1/2, -1/2, 1/2, 1/2, 1/2},
|
|
},
|
|
},
|
|
tiles = { "facade_shaper_top.png",
|
|
"facade_shaper_bottom.png",
|
|
"facade_shaper_right.png",
|
|
"facade_shaper_left.png",
|
|
"facade_shaper_back.png",
|
|
"facade_shaper_front.png"},
|
|
groups = { oddly_breakable_by_hand=2, cracky=3, dig_immediate=1 },
|
|
paramtype = "light",
|
|
paramtype2 = "facedir",
|
|
legacy_facedir_simple = true,
|
|
on_construct = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("formspec", prepare_formspec(demo_material))
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("src", 1)
|
|
inv:set_size("dst", 4)
|
|
end,
|
|
after_place_node = function(pos, placer)
|
|
local meta = minetest.get_meta(pos)
|
|
local owner = placer and placer:get_player_name() or ""
|
|
meta:set_string("owner", owner)
|
|
if owner then
|
|
meta:set_string("infotext", ("Facade Shaper (owned by %s)"):format(owner))
|
|
else
|
|
meta:set_string("infotext", "Facade Shaper")
|
|
end
|
|
end,
|
|
can_dig = check_removability,
|
|
allow_metadata_inventory_put = check_inventory_put,
|
|
allow_metadata_inventory_take = check_inventory_take,
|
|
allow_metadata_inventory_move = check_inventory_move,
|
|
on_metadata_inventory_put = update_formspec_put,
|
|
on_metadata_inventory_take = update_formspec_take,
|
|
on_receive_fields = form_handler,
|
|
})
|
|
|
|
|
|
minetest.register_craft({
|
|
output = 'facade:shaper',
|
|
recipe = {
|
|
{'', 'default:diamond', '' },
|
|
{'default:steel_ingot', 'default:steelblock', 'default:steel_ingot' },
|
|
{'', 'default:steelblock' , '' },
|
|
|
|
},
|
|
})
|