379 lines
10 KiB
Lua
379 lines
10 KiB
Lua
local max_charge = {50000, 200000, 650000}
|
|
local power_usage_per_node = {200, 500, 800}
|
|
|
|
local S = technic.getter
|
|
|
|
minetest.register_craft({
|
|
output = 'technic:mining_drill',
|
|
recipe = {
|
|
{'default:tin_ingot', 'technic:diamond_drill_head', 'default:tin_ingot'},
|
|
{'technic:stainless_steel_ingot', 'basic_materials:motor', 'technic:stainless_steel_ingot'},
|
|
{'', 'technic:red_energy_crystal', 'default:copper_ingot'},
|
|
}
|
|
})
|
|
minetest.register_craft({
|
|
output = 'technic:mining_drill_mk2',
|
|
recipe = {
|
|
{'technic:diamond_drill_head', 'technic:diamond_drill_head', 'technic:diamond_drill_head'},
|
|
{'technic:stainless_steel_ingot', 'technic:mining_drill', 'technic:stainless_steel_ingot'},
|
|
{'', 'technic:green_energy_crystal', ''},
|
|
}
|
|
})
|
|
minetest.register_craft({
|
|
output = 'technic:mining_drill_mk3',
|
|
recipe = {
|
|
{'technic:diamond_drill_head', 'technic:diamond_drill_head', 'technic:diamond_drill_head'},
|
|
{'technic:stainless_steel_ingot', 'technic:mining_drill_mk2', 'technic:stainless_steel_ingot'},
|
|
{'', 'technic:blue_energy_crystal', ''},
|
|
}
|
|
})
|
|
for i = 1, 4 do
|
|
minetest.register_craft({
|
|
output = 'technic:mining_drill_mk3',
|
|
recipe = {
|
|
{'technic:diamond_drill_head', 'technic:diamond_drill_head', 'technic:diamond_drill_head'},
|
|
{'technic:stainless_steel_ingot', 'technic:mining_drill_mk2_'..i, 'technic:stainless_steel_ingot'},
|
|
{'', 'technic:blue_energy_crystal', ''},
|
|
}
|
|
})
|
|
end
|
|
|
|
local mining_drill_mode_text = {
|
|
{S("Single node.")},
|
|
{S("3 nodes deep.")},
|
|
{S("3 nodes wide.")},
|
|
{S("3 nodes tall.")},
|
|
{S("3x3 nodes.")},
|
|
}
|
|
|
|
local function drill_dig_it0(pos, player)
|
|
if minetest.is_protected(pos, player:get_player_name()) then
|
|
minetest.record_protection_violation(pos, player:get_player_name())
|
|
return
|
|
end
|
|
local node = minetest.get_node(pos)
|
|
local ndef = minetest.registered_nodes[node.name]
|
|
if not ndef or ndef.drawtype == "airlike" then
|
|
-- Covers "air", "ignore", unknown nodes and more.
|
|
return
|
|
end
|
|
local groups = ndef and ndef.groups or {}
|
|
|
|
if groups.lava then
|
|
return
|
|
end
|
|
if groups.water then
|
|
minetest.remove_node(pos)
|
|
return
|
|
end
|
|
ndef.on_dig(pos, node, player)
|
|
end
|
|
|
|
local function drill_dig_it1 (player)
|
|
local dir=player:get_look_dir()
|
|
if math.abs(dir.x)>math.abs(dir.z) then
|
|
if dir.x>0 then return 0 end
|
|
return 1
|
|
end
|
|
if dir.z>0 then return 2 end
|
|
return 3
|
|
end
|
|
|
|
local function drill_dig_it2 (pos,player)
|
|
pos.y=pos.y+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
pos.y=pos.y-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
pos.y=pos.y-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z-2
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
|
|
local function drill_dig_it3 (pos,player)
|
|
pos.y=pos.y+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
pos.y=pos.y-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
pos.y=pos.y-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
|
|
local function drill_dig_it4 (pos,player)
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
pos.z=pos.z-2
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
|
|
local function cost_to_use(drill_type, mode)
|
|
local mult
|
|
if mode == 1 then
|
|
mult = 1
|
|
elseif mode <= 4 then
|
|
mult = 3
|
|
else
|
|
mult = 9
|
|
end
|
|
return power_usage_per_node[drill_type] * mult
|
|
end
|
|
|
|
local function drill_dig_it(pos, player, mode)
|
|
if mode == 1 then
|
|
drill_dig_it0(pos, player)
|
|
end
|
|
|
|
if mode == 2 then -- 3 deep
|
|
local dir = drill_dig_it1(player)
|
|
if dir == 0 then -- x+
|
|
drill_dig_it0(pos, player)
|
|
pos.x = pos.x + 1
|
|
drill_dig_it0(pos, player)
|
|
pos.x = pos.x + 1
|
|
drill_dig_it0(pos, player)
|
|
end
|
|
if dir == 1 then -- x-
|
|
drill_dig_it0(pos, player)
|
|
pos.x=pos.x-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-1
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
if dir==2 then -- z+
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
if dir==3 then -- z-
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z-1
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
end
|
|
|
|
if mode==3 then -- 3 wide
|
|
local dir = drill_dig_it1(player)
|
|
if dir==0 or dir==1 then -- x
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.z=pos.z-2
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
if dir==2 or dir==3 then -- z
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x+1
|
|
drill_dig_it0 (pos,player)
|
|
pos.x=pos.x-2
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
end
|
|
|
|
if mode==4 then -- 3 tall, selected in the middle
|
|
drill_dig_it0 (pos,player)
|
|
pos.y=pos.y-1
|
|
drill_dig_it0 (pos,player)
|
|
pos.y=pos.y-1
|
|
drill_dig_it0 (pos,player)
|
|
end
|
|
|
|
if mode==5 then -- 3 x 3
|
|
local dir=player:get_look_dir()
|
|
if math.abs(dir.y)<0.5 then
|
|
dir=drill_dig_it1(player)
|
|
if dir==0 or dir==1 then -- x
|
|
drill_dig_it2(pos,player)
|
|
end
|
|
if dir==2 or dir==3 then -- z
|
|
drill_dig_it3(pos,player)
|
|
end
|
|
else
|
|
drill_dig_it4(pos,player)
|
|
end
|
|
end
|
|
|
|
minetest.sound_play("mining_drill", {pos = pos, gain = 1.0, max_hear_distance = 10,})
|
|
end
|
|
|
|
local function pos_is_pointable(pos)
|
|
local node = minetest.get_node(pos)
|
|
local nodedef = minetest.registered_nodes[node.name]
|
|
return nodedef and nodedef.pointable
|
|
end
|
|
|
|
local function mining_drill_mkX_setmode(user, itemstack, drill_type, max_modes)
|
|
local player_name = user:get_player_name()
|
|
local meta = technic.get_stack_meta(itemstack)
|
|
|
|
if not meta:contains("mode") then
|
|
minetest.chat_send_player(player_name,
|
|
S("Use while sneaking to change Mining Drill Mk%d modes."):format(drill_type))
|
|
end
|
|
local mode = meta:get_int("mode") + 1
|
|
if mode > max_modes then mode = 1 end
|
|
|
|
minetest.chat_send_player(player_name,
|
|
S("Mining Drill Mk%d Mode %d"):format(2, mode)..
|
|
": "..mining_drill_mode_text[mode][1])
|
|
itemstack:set_name(("technic:mining_drill_mk%d_%s"):format(drill_type, mode))
|
|
meta:set_int("mode", mode)
|
|
return itemstack
|
|
end
|
|
|
|
local function mining_drill_mkX_handler(itemstack, user, pointed_thing, drill_type, max_modes)
|
|
local keys = user:get_player_control()
|
|
local meta = technic.get_stack_meta(itemstack)
|
|
|
|
-- Mode switching (if possible)
|
|
if max_modes > 1 then
|
|
if not meta:contains("mode") or keys.sneak then
|
|
return mining_drill_mkX_setmode(user, itemstack, drill_type, max_modes)
|
|
end
|
|
end
|
|
if pointed_thing.type ~= "node" or not pos_is_pointable(pointed_thing.under) then
|
|
return
|
|
end
|
|
|
|
local charge = meta:get_int("technic:charge")
|
|
local mode = meta:contains("mode") and meta:get_int("mode") or 1
|
|
|
|
-- Check whether the tool has enough charge
|
|
local charge_to_take = cost_to_use(drill_type, mode)
|
|
if charge < charge_to_take then
|
|
return
|
|
end
|
|
|
|
-- Do the actual shoorting action
|
|
local pos = minetest.get_pointed_thing_position(pointed_thing, false)
|
|
drill_dig_it(pos, user, mode)
|
|
if not technic.creative_mode then
|
|
charge = charge - charge_to_take
|
|
meta:set_int("technic:charge", charge)
|
|
technic.set_RE_wear(itemstack, charge, max_charge[drill_type])
|
|
end
|
|
return itemstack
|
|
end
|
|
|
|
-- Simple mining drill registration
|
|
|
|
technic.register_power_tool("technic:mining_drill", max_charge[1])
|
|
|
|
minetest.register_tool("technic:mining_drill", {
|
|
description = S("Mining Drill Mk%d"):format(1),
|
|
inventory_image = "technic_mining_drill.png",
|
|
stack_max = 1,
|
|
wear_represents = "technic_RE_charge",
|
|
on_refill = technic.refill_RE_charge,
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
mining_drill_mkX_handler(itemstack, user, pointed_thing, 1, 1)
|
|
return itemstack
|
|
end,
|
|
})
|
|
|
|
-- Mk2 registration
|
|
|
|
minetest.register_tool("technic:mining_drill_mk2", {
|
|
description = S("Mining Drill Mk%d"):format(2),
|
|
inventory_image = "technic_mining_drill_mk2.png",
|
|
wear_represents = "technic_RE_charge",
|
|
on_refill = technic.refill_RE_charge,
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
mining_drill_mkX_handler(itemstack, user, pointed_thing, 2, 4)
|
|
return itemstack
|
|
end,
|
|
})
|
|
|
|
technic.register_power_tool("technic:mining_drill_mk2", max_charge[2])
|
|
|
|
for i = 1, 4 do
|
|
technic.register_power_tool("technic:mining_drill_mk2_"..i, max_charge[2])
|
|
minetest.register_tool("technic:mining_drill_mk2_"..i, {
|
|
description = S("Mining Drill Mk%d Mode %d"):format(2, i),
|
|
inventory_image = "technic_mining_drill_mk2.png^technic_tool_mode"..i..".png",
|
|
wield_image = "technic_mining_drill_mk2.png",
|
|
wear_represents = "technic_RE_charge",
|
|
on_refill = technic.refill_RE_charge,
|
|
groups = {not_in_creative_inventory=1},
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
mining_drill_mkX_handler(itemstack, user, pointed_thing, 2, 4)
|
|
return itemstack
|
|
end,
|
|
})
|
|
end
|
|
|
|
-- Mk3 registration
|
|
|
|
minetest.register_tool("technic:mining_drill_mk3", {
|
|
description = S("Mining Drill Mk%d"):format(3),
|
|
inventory_image = "technic_mining_drill_mk3.png",
|
|
wear_represents = "technic_RE_charge",
|
|
on_refill = technic.refill_RE_charge,
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
mining_drill_mkX_handler(itemstack, user, pointed_thing, 3, 5)
|
|
return itemstack
|
|
end,
|
|
})
|
|
|
|
technic.register_power_tool("technic:mining_drill_mk3", max_charge[3])
|
|
|
|
for i=1,5,1 do
|
|
technic.register_power_tool("technic:mining_drill_mk3_"..i, max_charge[3])
|
|
minetest.register_tool("technic:mining_drill_mk3_"..i, {
|
|
description = S("Mining Drill Mk%d Mode %d"):format(3, i),
|
|
inventory_image = "technic_mining_drill_mk3.png^technic_tool_mode"..i..".png",
|
|
wield_image = "technic_mining_drill_mk3.png",
|
|
wear_represents = "technic_RE_charge",
|
|
on_refill = technic.refill_RE_charge,
|
|
groups = {not_in_creative_inventory=1},
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
mining_drill_mkX_handler(itemstack, user, pointed_thing, 3, 5)
|
|
return itemstack
|
|
end,
|
|
})
|
|
end
|