2016-12-31 07:38:18 +01:00
local controller_nodebox = {
{ - 0.3125 , - 0.3125 , - 0.3125 , 0.3125 , 0.3125 , 0.3125 } , -- Core
{ - 0.1875 , 0.3125 , - 0.1875 , 0.1875 , 0.5 , 0.1875 } , -- +y_connector
{ - 0.1875 , - 0.5 , - 0.1875 , 0.1875 , - 0.3125 , 0.1875 } , -- -y_Connector
{ 0.3125 , - 0.1875 , - 0.1875 , 0.5 , 0.1875 , 0.1875 } , -- +x_connector
{ - 0.5 , - 0.1875 , - 0.1875 , - 0.3125 , 0.1875 , 0.1875 } , -- -x_connector
{ - 0.1875 , - 0.1875 , 0.3125 , 0.1875 , 0.1875 , 0.5 } , -- +z_connector
{ - 0.5 , 0.125 , - 0.5 , - 0.125 , 0.5 , - 0.3125 } , -- back_connector_3
{ 0.125 , 0.125 , - 0.5 , 0.5 , 0.5 , - 0.3125 } , -- back_connector_1
{ 0.125 , - 0.5 , - 0.5 , 0.5 , - 0.125 , - 0.3125 } , -- back_connector_2
{ - 0.5 , - 0.5 , - 0.5 , - 0.125 , - 0.125 , - 0.3125 } , -- back_connector_4
}
-- Master controller. Most complicated part of the whole system. Determines which direction a digtron moves and triggers all of its component parts.
minetest.register_node ( " digtron:controller " , {
description = " Digtron Control Unit " ,
2017-01-18 03:57:20 +01:00
_doc_items_longdesc = digtron.doc . controller_longdesc ,
_doc_items_usagehelp = digtron.doc . controller_usagehelp ,
2017-01-03 04:07:15 +01:00
groups = { cracky = 3 , oddly_breakable_by_hand = 3 , digtron = 1 } ,
2017-01-04 03:43:32 +01:00
drop = " digtron:controller " ,
2017-01-04 07:56:34 +01:00
sounds = digtron.metal_sounds ,
2017-01-06 07:52:09 +01:00
paramtype = " light " ,
2017-01-04 03:43:32 +01:00
paramtype2 = " facedir " ,
2017-01-06 07:52:09 +01:00
is_ground_content = false ,
2016-12-31 07:38:18 +01:00
-- Aims in the +Z direction by default
tiles = {
" digtron_plate.png^[transformR90 " ,
" digtron_plate.png^[transformR270 " ,
" digtron_plate.png " ,
" digtron_plate.png^[transformR180 " ,
" digtron_plate.png " ,
2017-01-11 06:59:11 +01:00
" digtron_plate.png^digtron_control.png " ,
2016-12-31 07:38:18 +01:00
} ,
drawtype = " nodebox " ,
node_box = {
type = " fixed " ,
fixed = controller_nodebox ,
} ,
2017-01-02 01:12:32 +01:00
on_construct = function ( pos )
2017-01-04 03:43:32 +01:00
local meta = minetest.get_meta ( pos )
2017-01-02 01:12:32 +01:00
meta : set_float ( " fuel_burning " , 0.0 )
meta : set_string ( " infotext " , " Heat remaining in controller furnace: 0 " )
end ,
2016-12-31 07:38:18 +01:00
on_rightclick = function ( pos , node , clicker , itemstack , pointed_thing )
2017-01-04 07:03:41 +01:00
local meta = minetest.get_meta ( pos )
if meta : get_string ( " waiting " ) == " true " then
-- Been too soon since last time the digtron did a cycle.
return
end
2017-01-09 05:34:27 +01:00
local newpos , status , return_code = digtron.execute_dig_cycle ( pos , clicker )
2017-01-04 07:03:41 +01:00
meta = minetest.get_meta ( newpos )
2017-01-03 04:07:15 +01:00
if status ~= nil then
meta : set_string ( " infotext " , status )
2016-12-31 07:38:18 +01:00
end
2017-01-04 07:03:41 +01:00
2017-01-07 17:52:39 +01:00
-- Start the delay before digtron can run again.
2017-01-04 07:03:41 +01:00
minetest.get_meta ( newpos ) : set_string ( " waiting " , " true " )
2017-01-08 09:23:10 +01:00
minetest.get_node_timer ( newpos ) : start ( digtron.cycle_time )
end ,
on_timer = function ( pos , elapsed )
minetest.get_meta ( pos ) : set_string ( " waiting " , nil )
2016-12-31 07:38:18 +01:00
end ,
} )
2017-01-07 17:52:39 +01:00
-- Auto-controller
2017-01-04 07:03:41 +01:00
---------------------------------------------------------------------------------------------------------------
2017-01-15 00:58:37 +01:00
local auto_formspec = " size[3.5,2] " ..
2017-01-04 07:03:41 +01:00
default.gui_bg ..
default.gui_bg_img ..
default.gui_slots ..
2017-01-15 00:58:37 +01:00
" field[0.5,0.8;1,0.1;cycles;Cycles;${cycles}] " ..
" tooltip[cycles;When triggered, this controller will try to run for the given number of cycles. The cycle count will decrement as it runs, so if it gets halted by a problem you can fix the problem and restart.] " ..
" button_exit[1.2,0.5;1,0.1;set;Set] " ..
2017-01-04 07:03:41 +01:00
" tooltip[set;Saves the cycle setting without starting the controller running] " ..
2017-01-15 00:58:37 +01:00
" button_exit[2.2,0.5;1,0.1;execute;Set & \n Execute] " ..
" tooltip[execute;Begins executing the given number of cycles] " ..
" field[0.5,2.0;1,0.1;slope;Slope;${slope}] " ..
" tooltip[slope;For diagonal digging. After every X nodes the auto controller moves forward, the controller will add an additional cycle moving the digtron laterally in the direction of the arrows on the side of this controller. Set to 0 for no lateral digging.] " ..
" field[1.5,2.0;1,0.1;offset;Offset;${offset}] " ..
" tooltip[offset;Sets the offset of the lateral motion defined in the Slope field. Note: this offset is relative to the controller's location. The controller will move down when it reaches the indicated point.] " ..
" field[2.5,2.0;1,0.1;period;Delay;${period}] " ..
" tooltip[period;Number of seconds to wait between each cycle] "
2017-01-04 07:03:41 +01:00
-- Needed to make this global so that it could recurse into minetest.after
digtron.auto_cycle = function ( pos )
2017-01-15 00:58:37 +01:00
local node = minetest.get_node ( pos )
local controlling_coordinate = digtron.get_controlling_coordinate ( pos , node.param2 )
2017-01-04 07:03:41 +01:00
local meta = minetest.get_meta ( pos )
local player = minetest.get_player_by_name ( meta : get_string ( " triggering_player " ) )
if player == nil or meta : get_string ( " waiting " ) == " true " then
return
end
2017-01-15 00:58:37 +01:00
local cycle = meta : get_int ( " cycles " )
local slope = meta : get_int ( " slope " )
if meta : get_string ( " lateral_done " ) ~= " true " and slope ~= 0 and ( pos [ controlling_coordinate ] + meta : get_int ( " offset " ) ) % slope == 0 then
--Do a downward dig cycle. Don't update the "cycles" count, these don't count towards that.
local newpos , status , return_code = digtron.execute_downward_dig_cycle ( pos , player )
if vector.equals ( pos , newpos ) then
status = status .. string.format ( " \n Cycles remaining: %d \n Halted! " , cycle )
meta : set_string ( " infotext " , status )
if return_code == 1 then --return code 1 happens when there's unloaded nodes adjacent, just keep trying.
minetest.after ( meta : get_int ( " period " ) , digtron.auto_cycle , newpos )
else
meta : set_string ( " formspec " , auto_formspec )
end
else
meta = minetest.get_meta ( newpos )
minetest.after ( meta : get_int ( " period " ) , digtron.auto_cycle , newpos )
meta : set_string ( " infotext " , status )
meta : set_string ( " lateral_done " , " true " )
end
return
end
2017-01-04 07:03:41 +01:00
2017-01-09 05:34:27 +01:00
local newpos , status , return_code = digtron.execute_dig_cycle ( pos , player )
2017-01-04 07:03:41 +01:00
if vector.equals ( pos , newpos ) then
status = status .. string.format ( " \n Cycles remaining: %d \n Halted! " , cycle )
meta : set_string ( " infotext " , status )
2017-01-08 01:00:15 +01:00
if return_code == 1 then --return code 1 happens when there's unloaded nodes adjacent, just keep trying.
minetest.after ( meta : get_int ( " period " ) , digtron.auto_cycle , newpos )
else
meta : set_string ( " formspec " , auto_formspec )
end
2017-01-04 07:03:41 +01:00
return
end
meta = minetest.get_meta ( newpos )
2017-01-15 00:58:37 +01:00
cycle = meta : get_int ( " cycles " ) - 1
meta : set_int ( " cycles " , cycle )
2017-01-04 07:03:41 +01:00
status = status .. string.format ( " \n Cycles remaining: %d " , cycle )
meta : set_string ( " infotext " , status )
2017-01-15 00:58:37 +01:00
meta : set_string ( " lateral_done " , nil )
2017-01-04 07:03:41 +01:00
if cycle > 0 then
2017-01-04 07:56:34 +01:00
minetest.after ( meta : get_int ( " period " ) , digtron.auto_cycle , newpos )
2017-01-04 07:03:41 +01:00
else
meta : set_string ( " formspec " , auto_formspec )
end
end
minetest.register_node ( " digtron:auto_controller " , {
description = " Digtron Automatic Control Unit " ,
2017-01-18 03:57:20 +01:00
_doc_items_longdesc = digtron.doc . auto_controller_longdesc ,
_doc_items_usagehelp = digtron.doc . auto_controller_usagehelp ,
2017-01-04 07:03:41 +01:00
groups = { cracky = 3 , oddly_breakable_by_hand = 3 , digtron = 1 } ,
drop = " digtron:auto_controller " ,
2017-01-04 07:56:34 +01:00
sounds = digtron.metal_sounds ,
2017-01-06 07:52:09 +01:00
paramtype = " light " ,
2017-01-04 07:03:41 +01:00
paramtype2 = " facedir " ,
2017-01-06 07:52:09 +01:00
is_ground_content = false ,
2017-01-04 07:03:41 +01:00
-- Aims in the +Z direction by default
tiles = {
2017-01-11 16:02:40 +01:00
" digtron_plate.png^[transformR90^digtron_auto_control_tint.png " ,
" digtron_plate.png^[transformR270^digtron_auto_control_tint.png " ,
2017-01-15 00:58:37 +01:00
" digtron_plate.png^digtron_axel_side.png^[transformR270^digtron_auto_control_tint.png " ,
" digtron_plate.png^digtron_axel_side.png^[transformR270^digtron_auto_control_tint.png " ,
2017-01-11 16:02:40 +01:00
" digtron_plate.png^digtron_auto_control_tint.png " ,
" digtron_plate.png^digtron_control.png^digtron_auto_control_tint.png " ,
2017-01-04 07:03:41 +01:00
} ,
drawtype = " nodebox " ,
node_box = {
type = " fixed " ,
fixed = controller_nodebox ,
} ,
on_construct = function ( pos )
local meta = minetest.get_meta ( pos )
meta : set_float ( " fuel_burning " , 0.0 )
meta : set_string ( " infotext " , " Heat remaining in controller furnace: 0 " )
meta : set_string ( " formspec " , auto_formspec )
-- Reusing offset and period to keep the digtron node-moving code simple, and the names still fit well
2017-01-04 07:56:34 +01:00
meta : set_int ( " period " , digtron.cycle_time )
2017-01-04 07:03:41 +01:00
meta : set_int ( " offset " , 0 )
2017-01-15 00:58:37 +01:00
meta : set_int ( " cycles " , 0 )
meta : set_int ( " slope " , 0 )
2017-01-04 07:03:41 +01:00
end ,
on_receive_fields = function ( pos , formname , fields , sender )
local meta = minetest.get_meta ( pos )
local offset = tonumber ( fields.offset )
local period = tonumber ( fields.period )
2017-01-15 00:58:37 +01:00
local slope = tonumber ( fields.slope )
local cycles = tonumber ( fields.cycles )
2017-01-04 07:03:41 +01:00
if period and period > 0 then
2017-01-04 07:56:34 +01:00
meta : set_int ( " period " , math.max ( digtron.cycle_time , math.floor ( period ) ) )
2017-01-04 07:03:41 +01:00
end
2017-01-15 00:58:37 +01:00
if offset then
meta : set_int ( " offset " , offset )
end
2017-01-04 07:03:41 +01:00
2017-01-15 00:58:37 +01:00
if slope and slope >= 0 then
meta : set_int ( " slope " , slope )
end
if cycles and cycles >= 0 then
meta : set_int ( " cycles " , math.floor ( cycles ) )
if sender : is_player ( ) and cycles > 0 then
2017-01-04 07:03:41 +01:00
meta : set_string ( " triggering_player " , sender : get_player_name ( ) )
if fields.execute then
meta : set_string ( " waiting " , nil )
meta : set_string ( " formspec " , nil )
2017-01-15 00:58:37 +01:00
digtron.auto_cycle ( pos )
2017-01-04 07:03:41 +01:00
end
end
end
2017-01-15 00:58:37 +01:00
if fields.set and slope and slope > 0 then
local node = minetest.get_node ( pos )
local controlling_coordinate = digtron.get_controlling_coordinate ( pos , node.param2 )
local newpos = pos --digtron.find_new_pos(pos, minetest.get_node(pos).param2)
local markerpos = { x = newpos.x , y = newpos.y , z = newpos.z }
local x_pos = math.floor ( ( newpos [ controlling_coordinate ] + offset ) / slope ) * slope - offset
markerpos [ controlling_coordinate ] = x_pos
minetest.add_entity ( markerpos , " digtron:marker_vertical " )
if x_pos >= newpos [ controlling_coordinate ] then
markerpos [ controlling_coordinate ] = x_pos - slope
minetest.add_entity ( markerpos , " digtron:marker_vertical " )
end
if x_pos <= newpos [ controlling_coordinate ] then
markerpos [ controlling_coordinate ] = x_pos + slope
minetest.add_entity ( markerpos , " digtron:marker_vertical " )
end
end
2017-01-04 07:03:41 +01:00
end ,
on_rightclick = function ( pos , node , clicker , itemstack , pointed_thing )
local meta = minetest.get_meta ( pos )
meta : set_string ( " infotext " , meta : get_string ( " infotext " ) .. " \n Interrupted! " )
meta : set_string ( " waiting " , " true " )
meta : set_string ( " formspec " , auto_formspec )
end ,
2017-01-08 09:23:10 +01:00
on_timer = function ( pos , elapsed )
minetest.get_meta ( pos ) : set_string ( " waiting " , nil )
end ,
2017-01-04 07:03:41 +01:00
} )
---------------------------------------------------------------------------------------------------------------
2016-12-31 07:38:18 +01:00
-- A much simplified control unit that only moves the digtron, and doesn't trigger the diggers or builders.
-- Handy for shoving a digtron to the side if it's been built a bit off.
minetest.register_node ( " digtron:pusher " , {
description = " Digtron Pusher Unit " ,
2017-01-18 03:57:20 +01:00
_doc_items_longdesc = digtron.doc . pusher_longdesc ,
_doc_items_usagehelp = digtron.doc . pusher_usagehelp ,
2017-01-03 04:07:15 +01:00
groups = { cracky = 3 , oddly_breakable_by_hand = 3 , digtron = 1 } ,
2017-01-04 03:43:32 +01:00
drop = " digtron:pusher " ,
2017-01-04 07:56:34 +01:00
sounds = digtron.metal_sounds ,
2017-01-06 07:52:09 +01:00
paramtype = " light " ,
2017-01-04 03:43:32 +01:00
paramtype2 = " facedir " ,
2017-01-06 07:52:09 +01:00
is_ground_content = false ,
2016-12-31 07:38:18 +01:00
-- Aims in the +Z direction by default
tiles = {
2017-01-11 16:02:40 +01:00
" digtron_plate.png^[transformR90^digtron_pusher_tint.png " ,
" digtron_plate.png^[transformR270^digtron_pusher_tint.png " ,
" digtron_plate.png^digtron_pusher_tint.png " ,
" digtron_plate.png^[transformR180^digtron_pusher_tint.png " ,
" digtron_plate.png^digtron_pusher_tint.png " ,
" digtron_plate.png^digtron_control.png^digtron_pusher_tint.png " ,
2016-12-31 07:38:18 +01:00
} ,
drawtype = " nodebox " ,
node_box = {
type = " fixed " ,
fixed = controller_nodebox ,
} ,
on_rightclick = function ( pos , node , clicker , itemstack , pointed_thing )
local meta = minetest.get_meta ( pos )
if meta : get_string ( " waiting " ) == " true " then
-- Been too soon since last time the digtron did a cycle.
return
end
2017-01-09 05:34:27 +01:00
local newpos , status_text , return_code = digtron.execute_move_cycle ( pos , clicker )
2017-01-10 08:29:09 +01:00
meta = minetest.get_meta ( newpos )
2017-01-09 05:34:27 +01:00
meta : set_string ( " infotext " , status_text )
2016-12-31 07:38:18 +01:00
2017-01-09 05:34:27 +01:00
-- Start the delay before digtron can run again.
minetest.get_meta ( newpos ) : set_string ( " waiting " , " true " )
minetest.get_node_timer ( newpos ) : start ( digtron.cycle_time )
2017-01-08 09:23:10 +01:00
end ,
on_timer = function ( pos , elapsed )
minetest.get_meta ( pos ) : set_string ( " waiting " , nil )
2016-12-31 07:38:18 +01:00
end ,
2017-01-08 09:23:10 +01:00
2016-12-31 07:38:18 +01:00
} )