| | |
| | | -- Technic CNC v1.0 by kpo |
| | | -- Based on the NonCubic Blocks MOD v1.4 by yves_de_beck |
| | | local shape = {} |
| | | local size = 0 |
| | | local onesize_products = { |
| | | slope = 2, |
| | | slope_edge = 1, |
| | |
| | | cylinder = 2, |
| | | sphere = 1, |
| | | stick = 8, |
| | | slope_upsdwn = 2, |
| | | slope_edge_upsdwn = 1, |
| | | slope_inner_edge_upsdwn = 1, |
| | | cylinder_hor = 2, |
| | | slope_upsdown = 2, |
| | | slope_edge_upsdown = 1, |
| | | slope_inner_edge_upsdown = 1, |
| | | cylinder_horizontal = 2, |
| | | slope_lying = 2, |
| | | onecurvededge = 1, |
| | | twocurvededge = 1, |
| | |
| | | element_edge = 2, |
| | | } |
| | | |
| | | local showbackground = "--" |
| | | local max_cncruns = 99 |
| | | local max_products = 99 |
| | | --cnc_recipes ={} |
| | | --registered_cnc_recipes_count=1 |
| | | -- |
| | | --function register_cnc_recipe (string1,string2) |
| | | -- cnc_recipes[registered_cnc_recipes_count]={} |
| | | -- cnc_recipes[registered_cnc_recipes_count].src_name=string1 |
| | | -- cnc_recipes[registered_cnc_recipes_count].dst_name=string2 |
| | | -- registered_cnc_recipes_count=registered_cnc_recipes_count+1 |
| | | -- if unified_inventory then |
| | | -- unified_inventory.register_craft({ |
| | | -- type = "cnc milling", |
| | | -- output = string2, |
| | | -- items = {string1}, |
| | | -- width = 0, |
| | | -- }) |
| | | -- end |
| | | --end |
| | | |
| | | --showlabelin = "" |
| | | --showlabelout = "label[4.5,5.5;Out:]" |
| | | local cnc_formspec = |
| | | "invsize[9,11;]".. |
| | | "label[1,0;Choose Milling Program:]".. |
| | | "image_button[1,0.5;1,1;technic_cnc_slope.png;slope; ]".. |
| | | "image_button[2,0.5;1,1;technic_cnc_slope_edge.png;slope_edge; ]".. |
| | | "image_button[3,0.5;1,1;technic_cnc_slope_inner_edge.png;slope_inner_edge; ]".. |
| | | "image_button[4,0.5;1,1;technic_cnc_pyramid.png;pyramid; ]".. |
| | | "image_button[5,0.5;1,1;technic_cnc_spike.png;spike; ]".. |
| | | "image_button[6,0.5;1,1;technic_cnc_cylinder.png;cylinder; ]".. |
| | | "image_button[7,0.5;1,1;technic_cnc_sphere.png;sphere; ]".. |
| | | "image_button[8,0.5;1,1;technic_cnc_stick.png;stick; ]".. |
| | | |
| | | -- I want the CNC machine to be a two block thing |
| | | "image_button[1,1.5;1,1;technic_cnc_slope_upsdwn.png;slope_upsdown; ]".. |
| | | "image_button[2,1.5;1,1;technic_cnc_slope_edge_upsdwn.png;slope_edge_upsdown; ]".. |
| | | "image_button[3,1.5;1,1;technic_cnc_slope_inner_edge_upsdwn.png;slope_inner_edge_upsdown; ]".. |
| | | "image_button[4,1.5;1,1;technic_cnc_cylinder_horizontal.png;cylinder_horizontal; ]".. |
| | | |
| | | "image_button[1,2.5;1,1;technic_cnc_slope_lying.png;slope_lying; ]".. |
| | | "image_button[2,2.5;1,1;technic_cnc_onecurvededge.png;onecurvededge; ]".. |
| | | "image_button[3,2.5;1,1;technic_cnc_twocurvededge.png;twocurvededge; ]".. |
| | | |
| | | "label[1,3.5;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; ]".. |
| | | "image_button[2,4;1,1;technic_cnc_element_straight.png;element_straight; ]".. |
| | | "image_button[3,4;1,1;technic_cnc_element_end.png;element_end; ]".. |
| | | "image_button[4,4;1,1;technic_cnc_element_cross.png;element_cross; ]".. |
| | | "image_button[5,4;1,1;technic_cnc_element_t.png;element_t; ]".. |
| | | "image_button[6,4;1,1;technic_cnc_element_edge.png;element_edge; ]".. |
| | | |
| | | "label[0, 5.5;In:]".. |
| | | "list[current_name;src;0.5,5.5;1,1;]".. |
| | | "label[4, 5.5;Out:]".. |
| | | "list[current_name;dst;5,5.5;4,1;]".. |
| | | |
| | | "list[current_player;main;0,7;8,4;]" |
| | | |
| | | |
| | | local cnc_power_formspec= |
| | | "label[0,3;Power]".. |
| | | "image[0,1;1,2;technic_power_meter_bg.png]" |
| | | |
| | | local size = 1; |
| | | |
| | | minetest.register_node("technic:cnc", { |
| | | description = "CNC Milling Machine", |
| | | tiles = {"technic_cnc_top.png", "technic_cnc_bottom.png", "technic_cnc_side.png", |
| | |
| | | type = "fixed", |
| | | fixed = {-0.5, -0.5, -0.5, 0.5, 0.5, 0.5}, |
| | | }, |
| | | groups = {oddly_breakable_by_hand=2, cracky=3, dig_immediate=1}, |
| | | groups = {cracky=2}, |
| | | legacy_facedir_simple = true, |
| | | technic_power_machine=1, |
| | | internal_EU_buffer=0; |
| | | internal_EU_buffer_size=5000; |
| | | cnc_time = 0; |
| | | src_time = 0; -- fixme |
| | | |
| | | on_construct = function(pos) |
| | | local meta = minetest.env:get_meta(pos) |
| | | meta:set_string("infotext", "CNC machine") |
| | | meta:set_float("technic_power_machine", 1) |
| | | meta:set_float("internal_EU_buffer", 0) |
| | | meta:set_float("internal_EU_buffer_size", 5000) |
| | | meta:set_string("formspec", cnc_formspec..cnc_power_formspec) |
| | | meta:set_float("cnc_time", 0) |
| | | |
| | | local inv = meta:get_inventory() |
| | | inv:set_size("src", 1) |
| | | inv:set_size("dst", 4) |
| | | |
| | | meta:set_string("formspec", cnc_formspec) |
| | | meta:set_string("infotext", "CNC Milling Machine") |
| | | end, |
| | | |
| | | can_dig = function(pos,player) |
| | | local meta = minetest.env:get_meta(pos); |
| | | local inv = meta:get_inventory() |
| | | if not inv:is_empty("input") or not inv:is_empty("output") then |
| | | if not inv:is_empty("src") or not inv:is_empty("dst") then |
| | | minetest.chat_send_player(player:get_player_name(), "CNC machine cannot be removed because it is not empty"); |
| | | return false |
| | | end |
| | | return true |
| | | end, |
| | | |
| | | on_construct = function(pos) |
| | | local meta = minetest.env:get_meta(pos) |
| | | if technic_cnc_api.allow_menu_background == true or technic_cnc_api.allow_menu_background == 1 then |
| | | showbackground = "background[-0.15,-0.25;8.40,11.75;technic_cnc_background.png]" |
| | | end |
| | | |
| | | meta:set_string("formspec", "invsize[8,11;]".. |
| | | "label[0,0;Choose Milling Program:]".. |
| | | "image_button[0,0.5;1,1;technic_cnc_slope.png;slope; ]".. |
| | | "image_button[1,0.5;1,1;technic_cnc_slope_edge.png;slope_edge; ]".. |
| | | "image_button[2,0.5;1,1;technic_cnc_slope_inner_edge.png;slope_inner_edge; ]".. |
| | | "image_button[3,0.5;1,1;technic_cnc_pyramid.png;pyramid; ]".. |
| | | "image_button[4,0.5;1,1;technic_cnc_spike.png;spike; ]".. |
| | | "image_button[5,0.5;1,1;technic_cnc_cylinder.png;cylinder; ]".. |
| | | "image_button[6,0.5;1,1;technic_cnc_sphere.png;sphere; ]".. |
| | | "image_button[7,0.5;1,1;technic_cnc_stick.png;stick; ]".. |
| | | |
| | | "image_button[0,1.5;1,1;technic_cnc_slope_upsdwn.png;slope_upsdwn; ]".. |
| | | "image_button[1,1.5;1,1;technic_cnc_slope_edge_upsdwn.png;slope_upsdwn_edge; ]".. |
| | | "image_button[2,1.5;1,1;technic_cnc_slope_inner_edge_upsdwn.png;slope_upddown_inner_edge; ]".. |
| | | "image_button[5,1.5;1,1;technic_cnc_cylinder_horizontal.png;cylinder_horizontal; ]".. |
| | | |
| | | "image_button[0,2.5;1,1;technic_cnc_slope_lying.png;slope_lying; ]".. |
| | | "image_button[1,2.5;1,1;technic_cnc_onecurvededge.png;onecurvededge; ]".. |
| | | "image_button[2,2.5;1,1;technic_cnc_twocurvededge.png;twocurvededge; ]".. |
| | | |
| | | "label[0,3.5;Slim Elements half / normal height:]".. |
| | | |
| | | "image_button[0,4;1,0.5;technic_cnc_full.png;full; ]".. |
| | | "image_button[0,4.5;1,0.5;technic_cnc_half.png;half; ]".. |
| | | "image_button[1,4;1,1;technic_cnc_element_straight.png;element_straight; ]".. |
| | | "image_button[2,4;1,1;technic_cnc_element_end.png;element_end; ]".. |
| | | "image_button[3,4;1,1;technic_cnc_element_cross.png;element_cross; ]".. |
| | | "image_button[4,4;1,1;technic_cnc_element_t.png;element_t; ]".. |
| | | "image_button[5,4;1,1;technic_cnc_element_edge.png;element_edge; ]".. |
| | | |
| | | "label[0, 5.5;In:]".. -- showlabelin.. |
| | | "list[current_name;input;0.5,5.5;1,1;]".. |
| | | "field[3, 6;1,1;num_cncruns;Repeat program:;${num_cncruns}]".. -- Fill default with meta data num_cncruns |
| | | "label[4, 5.5;Out:]".. -- showlabelout.. |
| | | "list[current_name;output;4.5,5.5;1,1;]".. |
| | | |
| | | "list[current_player;main;0,7;8,4;]".. |
| | | showbackground) |
| | | meta:set_string("infotext", "CNC Milling Machine") |
| | | meta:set_string("num_cncruns", 1 ); |
| | | |
| | | local inv = meta:get_inventory() |
| | | inv:set_size("input", 1) |
| | | inv:set_size("output", 1) |
| | | end, |
| | | |
| | | on_receive_fields = function(pos, formname, fields, sender) |
| | | -- REGISTER MILLING PROGRAMMS AND OUTPUTS: |
| | | -- REGISTER MILLING PROGRAMS AND OUTPUTS: |
| | | ------------------------------------------ |
| | | -- Program for half/full size |
| | | if fields["full"] then |
| | |
| | | return |
| | | end |
| | | |
| | | -- Resolve the node name and the number of items to make |
| | | local meta = minetest.env:get_meta(pos) |
| | | local inv = meta:get_inventory() |
| | | |
| | | -- Limit the number entered |
| | | if( fields.num_cncruns and tonumber( fields.num_cncruns) > 0 and tonumber(fields.num_cncruns) < 100 ) then |
| | | meta:set_string( "num_cncruns", fields.num_cncruns ); |
| | | else |
| | | minetest.chat_send_player(sender:get_player_name(), "CNC machine runs set to a bad value. Machine resets."); |
| | | meta:set_string( "num_cncruns", 1 ); |
| | | fields.num_cncruns = 1 |
| | | end |
| | | |
| | | -- Do nothing if the machine is empty |
| | | if inv:is_empty("input") then |
| | | return |
| | | end |
| | | |
| | | -- Do nothing if the output is not empty and the product used is not the same as what is already there |
| | | |
| | | -- Resolve the node name and the number of items to make and the number of items to take |
| | | local product = "" |
| | | local produces = 1 |
| | | local input_used = 1 |
| | | local inputstack = inv:get_stack("input", 1) |
| | | local inputstack = inv:get_stack("src", 1) |
| | | local inputname = inputstack:get_name() |
| | | local multiplier = 1 |
| | | local multiplier = 0 |
| | | for k, _ in pairs(fields) do |
| | | -- Set a multipier for the half/full size capable blocks |
| | | if twosize_products[k] ~= nil then |
| | |
| | | end |
| | | |
| | | if onesize_products[k] ~= nil or twosize_products[k] ~= nil then |
| | | product = inputname .. "_technic_cnc_" .. k |
| | | produces = math.min( fields.num_cncruns*multiplier, max_products) -- produce at most max_products |
| | | input_used = math.min( math.floor(produces/multiplier), inputstack:get_count()) -- use at most what we got |
| | | produces = input_used*multiplier -- final production |
| | | print(size) |
| | | print(fields.num_cncruns) |
| | | print(product) |
| | | print(produces) |
| | | print(input_used) |
| | | print("------------------") |
| | | meta:set_float( "cnc_multiplier", multiplier) |
| | | meta:set_string("cnc_user", sender:get_player_name()) |
| | | end |
| | | |
| | | if onesize_products[k] ~= nil or (twosize_products[k] ~= nil and size==2) then |
| | | meta:set_string("cnc_product", inputname .. "_technic_cnc_" .. k) |
| | | break |
| | | end |
| | | |
| | | if twosize_products[k] ~= nil and size==1 then |
| | | meta:set_string("cnc_product", inputname .. "_technic_cnc_" .. k .. "_double") |
| | | break |
| | | end |
| | | end |
| | | return |
| | | end, -- callback function |
| | | }) |
| | | |
| | | minetest.register_node("technic:cnc_active", { |
| | | description = "CNC Machine", |
| | | tiles = {"technic_cnc_top.png", "technic_cnc_bottom.png", "technic_cnc_side.png", |
| | | "technic_cnc_side.png", "technic_cnc_side.png", "technic_cnc_front_active.png"}, |
| | | paramtype2 = "facedir", |
| | | groups = {cracky=2,not_in_creative_inventory=1}, |
| | | legacy_facedir_simple = true, |
| | | can_dig = function(pos,player) |
| | | local meta = minetest.env:get_meta(pos); |
| | | local inv = meta:get_inventory() |
| | | if not inv:is_empty("src") or not inv:is_empty("dst") then |
| | | minetest.chat_send_player(player:get_player_name(), "CNC machine cannot be removed because it is not empty"); |
| | | return false |
| | | end |
| | | return true |
| | | end, |
| | | }) |
| | | |
| | | minetest.register_abm( |
| | | { |
| | | nodenames = {"technic:cnc","technic:cnc_active"}, |
| | | interval = 1, |
| | | chance = 1, |
| | | action = function(pos, node, active_object_count, active_object_count_wider) |
| | | local meta = minetest.env:get_meta(pos) |
| | | local charge= meta:get_float("internal_EU_buffer") |
| | | local max_charge= meta:get_float("internal_EU_buffer_size") |
| | | local cnc_cost=350 |
| | | |
| | | local load = math.floor((charge/max_charge)*100) |
| | | meta:set_string("formspec", cnc_formspec.. |
| | | "image[0,1;1,2;technic_power_meter_bg.png^[lowpart:".. |
| | | (load)..":technic_power_meter_fg.png]" |
| | | ) |
| | | |
| | | local inv = meta:get_inventory() |
| | | local srclist = inv:get_list("src") |
| | | if inv:is_empty("src") then |
| | | meta:set_float("cnc_on",0) |
| | | meta:set_string("cnc_product", "") -- Reset the program |
| | | end |
| | | |
| | | if (meta:get_float("cnc_on") == 1) then |
| | | if charge>=cnc_cost then |
| | | charge=charge-cnc_cost; |
| | | meta:set_float("internal_EU_buffer",charge) |
| | | meta:set_float("src_time", meta:get_float("src_time") + 1) |
| | | if meta:get_float("src_time") >= meta:get_float("cnc_time") then |
| | | local product = meta:get_string("cnc_product") |
| | | if inv:room_for_item("dst",product) then |
| | | -- CNC does the transformation |
| | | ------------------------------ |
| | | if minetest.registered_nodes[product] ~= nil then |
| | | inv:add_item("output",product .. " " .. produces) |
| | | inputstack:take_item(input_used) |
| | | inv:set_stack("input",1,inputstack) |
| | | else |
| | | minetest.chat_send_player(sender:get_player_name(), "CNC machine does not know how to mill this material. Please remove it."); |
| | | inv:add_item("dst",product .. " " .. meta:get_float("cnc_multiplier")) |
| | | srcstack = inv:get_stack("src", 1) |
| | | srcstack:take_item() |
| | | inv:set_stack("src",1,srcstack) |
| | | if inv:is_empty("src") then |
| | | meta:set_float("cnc_on",0) |
| | | meta:set_string("cnc_product", "") -- Reset the program |
| | | -- print("cnc product reset") |
| | | end |
| | | return; |
| | | end, -- callback function |
| | | else |
| | | minetest.chat_send_player(meta:get_string("cnc_user"), "CNC machine does not know how to handle this material. Please remove it."); |
| | | end |
| | | else |
| | | minetest.chat_send_player(meta:get_string("cnc_user"), "CNC inventory full!") |
| | | end |
| | | meta:set_float("src_time", 0) |
| | | end |
| | | end |
| | | end |
| | | |
| | | if (meta:get_float("cnc_on")==0) then |
| | | if not inv:is_empty("src") then |
| | | local product = meta:get_string("cnc_product") |
| | | if minetest.registered_nodes[product] ~= nil then |
| | | meta:set_float("cnc_on",1) |
| | | hacky_swap_node(pos,"technic:cnc_active") |
| | | meta:set_string("infotext", "CNC Machine Active") |
| | | cnc_time=3 |
| | | meta:set_float("cnc_time",cnc_time) |
| | | meta:set_float("src_time", 0) |
| | | return |
| | | end |
| | | else |
| | | hacky_swap_node(pos,"technic:cnc") |
| | | meta:set_string("infotext", "CNC Machine Inactive") |
| | | end |
| | | end |
| | | end |
| | | }) |
| | | ---------- |
| | | |
| | | register_LV_machine ("technic:cnc","RE") |
| | | register_LV_machine ("technic:cnc_active","RE") |
| | | ------------------------- |
| | | |
| | | -- Milling Machine Recipe |
| | | -- CNC Machine Recipe |
| | | ------------------------- |
| | | minetest.register_craft({ |
| | | output = 'technic:cnc', |