forked from minetest-mods/technic
221fc1376e
This deprecates the variables onesize_products and twosize_products by using a shared definition table. With these changes, it should be easier to add new programs in the future. New feature: Tooltips are added to all programs. (only applies to newly placed nodes)
295 lines
9.2 KiB
Lua
295 lines
9.2 KiB
Lua
-- Technic CNC v1.0 by kpoppel
|
|
-- Based on the NonCubic Blocks MOD v1.4 by yves_de_beck
|
|
|
|
-- Idea:
|
|
-- Somehow have a tabbed/paged panel if the number of shapes should expand
|
|
-- beyond what is available in the panel today.
|
|
-- I could imagine some form of API allowing modders to come with their own node
|
|
-- box definitions and easily stuff it in the this machine for production.
|
|
|
|
local S = technic_cnc.getter
|
|
|
|
local allow_metadata_inventory_put
|
|
local allow_metadata_inventory_take
|
|
local allow_metadata_inventory_move
|
|
local can_dig
|
|
local desc_tr = S("CNC Machine")
|
|
|
|
if technic_cnc.use_technic then
|
|
minetest.register_craft({
|
|
output = 'technic:cnc',
|
|
recipe = {
|
|
{'default:glass', 'technic:diamond_drill_head', 'default:glass'},
|
|
{'technic:control_logic_unit', 'technic:machine_casing', 'basic_materials:motor'},
|
|
{'technic:carbon_steel_ingot', 'technic:lv_cable', 'technic:carbon_steel_ingot'},
|
|
},
|
|
})
|
|
|
|
allow_metadata_inventory_put = technic.machine_inventory_put
|
|
allow_metadata_inventory_take = technic.machine_inventory_take
|
|
allow_metadata_inventory_move = technic.machine_inventory_move
|
|
can_dig = technic.machine_can_dig
|
|
desc_tr = S("@1 CNC Machine", S("LV"))
|
|
else
|
|
minetest.register_craft({
|
|
output = 'technic:cnc',
|
|
recipe = {
|
|
{'default:glass', 'default:diamond', 'default:glass'},
|
|
{'basic_materials:ic', 'default:steelblock', 'basic_materials:motor'},
|
|
{'default:steel_ingot', 'default:mese', 'default:steel_ingot'},
|
|
},
|
|
})
|
|
|
|
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
return stack:get_count()
|
|
end
|
|
|
|
allow_metadata_inventory_take = function(pos, listname, index, stack, player)
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
return stack:get_count()
|
|
end
|
|
|
|
allow_metadata_inventory_move = function(pos, from_list, from_index,
|
|
to_list, to_index, count, player)
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
return 0
|
|
end
|
|
return count
|
|
end
|
|
|
|
can_dig = function(pos, player)
|
|
if player and minetest.is_protected(pos, player:get_player_name()) then return false end
|
|
local meta = minetest.get_meta(pos);
|
|
local inv = meta:get_inventory()
|
|
return inv:is_empty("dst")
|
|
and inv:is_empty("src")
|
|
and default.can_interact_with_node(player, pos)
|
|
end
|
|
end
|
|
|
|
local function add_buttons(do_variants, t, x, y)
|
|
local X_OFFSET = 1
|
|
local BUTTONS_PER_ROW = 7
|
|
|
|
-- ipairs: only iterate over continuous integers
|
|
for _, data in ipairs(technic_cnc.programs) do
|
|
-- Never add full variants. Only add half variants when asked
|
|
if not data.half_counterpart and (do_variants == (data.full_counterpart ~= nil)) then
|
|
--print("add", data.suffix)
|
|
t[#t + 1] = ("image_button[%g,%g;1,1;%s.png;%s; ]"):format(
|
|
x + X_OFFSET, y, data.suffix, data.short_name
|
|
)
|
|
t[#t + 1] = ("tooltip[%s;%s]"):format(
|
|
data.short_name, minetest.formspec_escape(data.desc .. " (* " .. data.output .. ")")
|
|
)
|
|
|
|
x = x + 1
|
|
if x == BUTTONS_PER_ROW then
|
|
x = 0
|
|
y = y + 1
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
local function make_formspec()
|
|
local t = {
|
|
"size[9,11;]",
|
|
"label[1,0;"..S("Choose Milling Program:").."]",
|
|
}
|
|
add_buttons(false, t, 0, 0.5)
|
|
|
|
t[#t + 1] = (
|
|
"label[1,3.5;"..S("Slim Elements half / normal height:").."]"..
|
|
"image_button[1,4;1,0.5;technic_cnc_full.png;full; ]"..
|
|
"image_button[1,4.5;1,0.5;technic_cnc_half.png;half; ]"
|
|
)
|
|
add_buttons(true, t, 1, 4)
|
|
|
|
t[#t + 1] = (
|
|
"label[0, 5;"..S("In:").."]"..
|
|
"list[current_name;src;0.5,5.5;1,1;]"..
|
|
"label[4, 5;"..S("Out:").."]"..
|
|
"list[current_name;dst;5,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 table.concat(t)
|
|
end
|
|
|
|
local cnc_formspec = nil
|
|
|
|
minetest.register_on_mods_loaded(function()
|
|
technic_cnc._populate_shortcuts()
|
|
cnc_formspec = make_formspec()
|
|
end)
|
|
|
|
|
|
-- The form handler is declared here because we need it in both the inactive and active modes
|
|
-- in order to be able to change programs wile it is running.
|
|
local function form_handler(pos, formname, fields, sender)
|
|
local meta = minetest.get_meta(pos)
|
|
|
|
-- REGISTER MILLING PROGRAMS AND OUTPUTS:
|
|
------------------------------------------
|
|
-- Program for half/full size
|
|
if fields["full"] then
|
|
meta:set_int("size", 1)
|
|
return
|
|
end
|
|
|
|
if fields["half"] then
|
|
meta:set_int("size", 2)
|
|
return
|
|
end
|
|
|
|
-- Resolve the node name and the number of items to make
|
|
local inv = meta:get_inventory()
|
|
local inputstack = inv:get_stack("src", 1)
|
|
local inputname = inputstack:get_name()
|
|
local size = meta:get_int("size")
|
|
if size < 1 then size = 1 end
|
|
|
|
for k, _ in pairs(fields) do
|
|
-- Set a multipier for the half/full size capable blocks
|
|
local program = technic_cnc.programs["technic_cnc_" .. k]
|
|
if size == 1 and program and program.full_counterpart then
|
|
program = technic_cnc.programs["technic_cnc_" .. k .. "_double"]
|
|
end
|
|
if program then
|
|
local multiplier = program.output
|
|
local product = inputname .. "_" .. program.suffix
|
|
|
|
meta:set_float( "cnc_multiplier", multiplier)
|
|
meta:set_string("cnc_user", sender:get_player_name())
|
|
|
|
if program.half_counterpart then -- is full
|
|
if size == 1 then
|
|
meta:set_string("cnc_product", product)
|
|
--print(product, multiplier)
|
|
end
|
|
break -- no larger sizes allowed
|
|
end
|
|
|
|
-- half for normal
|
|
meta:set_string("cnc_product", product)
|
|
--print(product, multiplier)
|
|
break
|
|
end
|
|
end
|
|
|
|
if not technic_cnc.use_technic then
|
|
local result = meta:get_string("cnc_product")
|
|
|
|
if not inv:is_empty("src")
|
|
and minetest.registered_nodes[result]
|
|
and inv:room_for_item("dst", result) then
|
|
local srcstack = inv:get_stack("src", 1)
|
|
srcstack:take_item()
|
|
inv:set_stack("src", 1, srcstack)
|
|
inv:add_item("dst", result.." "..meta:get_int("cnc_multiplier"))
|
|
end
|
|
end
|
|
end
|
|
|
|
-- Action code performing the transformation
|
|
local run = function(pos, node)
|
|
local meta = minetest.get_meta(pos)
|
|
local inv = meta:get_inventory()
|
|
local eu_input = meta:get_int("LV_EU_input")
|
|
local machine_name = desc_tr
|
|
local machine_node = "technic:cnc"
|
|
local demand = 450
|
|
|
|
local result = meta:get_string("cnc_product")
|
|
if inv:is_empty("src") or
|
|
(not minetest.registered_nodes[result]) or
|
|
(not inv:room_for_item("dst", result)) then
|
|
technic.swap_node(pos, machine_node)
|
|
meta:set_string("infotext", S("@1 Idle", machine_name))
|
|
meta:set_string("cnc_product", "")
|
|
meta:set_int("LV_EU_demand", 0)
|
|
return
|
|
end
|
|
|
|
if eu_input < demand then
|
|
technic.swap_node(pos, machine_node)
|
|
meta:set_string("infotext", S("@1 Unpowered", machine_name))
|
|
elseif eu_input >= demand then
|
|
technic.swap_node(pos, machine_node.."_active")
|
|
meta:set_string("infotext", S("@1 Active", machine_name))
|
|
meta:set_int("src_time", meta:get_int("src_time") + 1)
|
|
if meta:get_int("src_time") >= 3 then -- 3 ticks per output
|
|
meta:set_int("src_time", 0)
|
|
local srcstack = inv:get_stack("src", 1)
|
|
srcstack:take_item()
|
|
inv:set_stack("src", 1, srcstack)
|
|
inv:add_item("dst", result.." "..meta:get_int("cnc_multiplier"))
|
|
end
|
|
end
|
|
meta:set_int("LV_EU_demand", demand)
|
|
end
|
|
|
|
-- The actual block inactive state
|
|
minetest.register_node(":technic:cnc", {
|
|
description = desc_tr,
|
|
tiles = {"technic_cnc_top.png", "technic_cnc_bottom.png", "technic_cnc_side.png",
|
|
"technic_cnc_side.png", "technic_cnc_side.png", "technic_cnc_front.png"},
|
|
groups = {cracky=2, technic_machine=1, technic_lv=1},
|
|
connect_sides = {"bottom", "back", "left", "right"},
|
|
paramtype2 = "facedir",
|
|
legacy_facedir_simple = true,
|
|
on_construct = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("infotext", desc_tr)
|
|
meta:set_float("technic_power_machine", 1)
|
|
meta:set_string("formspec", cnc_formspec)
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("src", 1)
|
|
inv:set_size("dst", 4)
|
|
end,
|
|
can_dig = can_dig,
|
|
allow_metadata_inventory_put = allow_metadata_inventory_put,
|
|
allow_metadata_inventory_take = allow_metadata_inventory_take,
|
|
allow_metadata_inventory_move = allow_metadata_inventory_move,
|
|
on_receive_fields = form_handler,
|
|
technic_run = technic_cnc.use_technic and run,
|
|
})
|
|
|
|
-- Active state block
|
|
if technic_cnc.use_technic then
|
|
|
|
minetest.register_node(":technic:cnc_active", {
|
|
description = desc_tr,
|
|
tiles = {"technic_cnc_top_active.png", "technic_cnc_bottom.png", "technic_cnc_side.png",
|
|
"technic_cnc_side.png", "technic_cnc_side.png", "technic_cnc_front_active.png"},
|
|
groups = {cracky=2, technic_machine=1, technic_lv=1, not_in_creative_inventory=1},
|
|
connect_sides = {"bottom", "back", "left", "right"},
|
|
paramtype2 = "facedir",
|
|
drop = "technic:cnc",
|
|
legacy_facedir_simple = true,
|
|
can_dig = can_dig,
|
|
allow_metadata_inventory_put = allow_metadata_inventory_put,
|
|
allow_metadata_inventory_take = allow_metadata_inventory_take,
|
|
allow_metadata_inventory_move = allow_metadata_inventory_move,
|
|
on_receive_fields = form_handler,
|
|
technic_run = run,
|
|
technic_disabled_machine_name = "technic:cnc",
|
|
})
|
|
|
|
technic.register_machine("LV", "technic:cnc", technic.receiver)
|
|
technic.register_machine("LV", "technic:cnc_active", technic.receiver)
|
|
else
|
|
minetest.register_alias("technic:cnc_active", "technic:cnc")
|
|
end
|