From 8e03d7ded6441b26e9d44102c0cd2ee39f9e90bc Mon Sep 17 00:00:00 2001
From: RealBadAngel <mk@realbadangel.pl>
Date: Sun, 30 Jun 2013 07:12:02 +0200
Subject: [PATCH] Sync with indev branch, bump version to 0.4.7
---
technic/mining_drill.lua | 389 +++++++++++++++++++++++++++++++++++++++++++++++++++---
1 files changed, 362 insertions(+), 27 deletions(-)
diff --git a/technic/mining_drill.lua b/technic/mining_drill.lua
index 4ccfc95..33a8e5a 100644
--- a/technic/mining_drill.lua
+++ b/technic/mining_drill.lua
@@ -1,25 +1,9 @@
mining_drill_max_charge=60000
-
-minetest.register_tool("technic:mining_drill", {
- description = "Mining Drill",
- inventory_image = "technic_mining_drill.png",
- stack_max = 1,
- on_use = function(itemstack, user, pointed_thing)
- if pointed_thing.type=="node" then
- item=itemstack:to_table()
- if item["metadata"]=="" or item["metadata"]=="0" then return end --tool not charged
- charge=tonumber(item["metadata"])
- if charge-200>0 then
- drill_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user)
- charge =charge-200;
- item["metadata"]=tostring(charge)
- set_RE_wear(item,charge,mining_drill_max_charge)
- itemstack:replace(item)
- end
- return itemstack
- end
- end,
-})
+mining_drill_mk2_max_charge=240000
+mining_drill_mk3_max_charge=960000
+mining_drill_power_usage=200
+mining_drill_mk2_power_usage=600
+mining_drill_mk3_power_usage=1800
minetest.register_craft({
output = 'technic:mining_drill',
@@ -29,21 +13,372 @@
{'', 'technic:red_energy_crystal', 'moreores: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', ''},
+ }
+})
+function drill_dig_it (pos, player,drill_type,mode)
+
+ local charge
+ if mode==1 then
+ drill_dig_it0 (pos,player)
+ end
+
+ if mode==2 then -- 3 deep
+ 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
+ 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-2
+ 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
+
+ if drill_type==1 then charge=mining_drill_power_usage end
+ if drill_type==2 then
+ if mode==1 then charge=mining_drill_mk2_power_usage end
+ if (mode==2 or mode==3 or mode==4) then charge=mining_drill_mk2_power_usage*3 end
+ end
+ if drill_type==3 then
+ if mode==1 then charge=mining_drill_power_usage end
+ if (mode==2 or mode==3 or mode==4) then charge=mining_drill_mk2_power_usage*6 end
+ if mode==5 then charge=mining_drill_mk2_power_usage*9 end
+ end
+ minetest.sound_play("mining_drill", {pos = pos, gain = 1.0, max_hear_distance = 10,})
+ return charge
+end
-
-
-function drill_dig_it (pos, player)
+function drill_dig_it0 (pos,player)
local node=minetest.env:get_node(pos)
if node.name == "air" or node.name == "ignore" then return end
if node.name == "default:lava_source" then return end
if node.name == "default:lava_flowing" then return end
if node.name == "default:water_source" then minetest.env:remove_node(pos) return end
if node.name == "default:water_flowing" then minetest.env:remove_node(pos) return end
-
- minetest.sound_play("mining_drill", {pos = pos, gain = 1.0, max_hear_distance = 10,})
minetest.node_dig(pos,node,player)
+end
-end
\ No newline at end of file
+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
+
+function drill_dig_it2 (pos,player)
+ 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-2
+ 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
+function drill_dig_it3 (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.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-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
+
+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
+
+register_power_tool ("technic:mining_drill",mining_drill_max_charge)
+minetest.register_tool("technic:mining_drill", {
+ description = "Mining Drill Mk1",
+ inventory_image = "technic_mining_drill.png",
+ stack_max = 1,
+ on_use = function(itemstack, user, pointed_thing)
+ if pointed_thing.type=="node" then
+ local item=itemstack:to_table()
+ local meta=get_item_meta(item["metadata"])
+ if meta==nil then return end --tool not charghed
+ if meta["charge"]==nil then return end
+ local charge=meta["charge"]
+ if charge-mining_drill_power_usage>0 then
+ charge_to_take=drill_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,1,1)
+ charge =charge-mining_drill_power_usage;
+ meta["charge"]=charge
+ item["metadata"]=set_item_meta(meta)
+ set_RE_wear(item,charge,mining_drill_max_charge)
+ itemstack:replace(item)
+ end
+ return itemstack
+ end
+ end,
+})
+
+minetest.register_tool("technic:mining_drill_mk2", {
+ description = "Mining Drill Mk2",
+ inventory_image = "technic_mining_drill_mk2.png",
+ on_use = function(itemstack, user, pointed_thing)
+ mining_drill_mk2_handler(itemstack,user,pointed_thing)
+ return itemstack
+ end,
+})
+register_power_tool ("technic:mining_drill_mk2",mining_drill_mk2_max_charge)
+
+for i=1,4,1 do
+register_power_tool ("technic:mining_drill_mk2_"..i,mining_drill_mk2_max_charge)
+minetest.register_tool("technic:mining_drill_mk2_"..i, {
+ description = "Mining Drill Mk2 in Mode "..i,
+ inventory_image = "technic_mining_drill_mk2.png^technic_tool_mode"..i..".png",
+ wield_image = "technic_mining_drill_mk2.png",
+ groups = {not_in_creative_inventory=1},
+ on_use = function(itemstack, user, pointed_thing)
+ mining_drill_mk2_handler(itemstack,user,pointed_thing)
+ return itemstack
+ end,
+})
+end
+
+minetest.register_tool("technic:mining_drill_mk3", {
+ description = "Mining Drill Mk3",
+ inventory_image = "technic_mining_drill_mk3.png",
+ on_use = function(itemstack, user, pointed_thing)
+ mining_drill_mk3_handler(itemstack,user,pointed_thing)
+ return itemstack
+ end,
+})
+register_power_tool ("technic:mining_drill_mk3",mining_drill_mk3_max_charge)
+
+for i=1,5,1 do
+register_power_tool ("technic:mining_drill_mk3_"..i,mining_drill_mk3_max_charge)
+minetest.register_tool("technic:mining_drill_mk3_"..i, {
+ description = "Mining Drill Mk3 in Mode "..i,
+ inventory_image = "technic_mining_drill_mk3.png^technic_tool_mode"..i..".png",
+ wield_image = "technic_mining_drill_mk3.png",
+ groups = {not_in_creative_inventory=1},
+ on_use = function(itemstack, user, pointed_thing)
+ mining_drill_mk3_handler(itemstack,user,pointed_thing)
+ return itemstack
+ end,
+})
+end
+
+function mining_drill_mk2_handler (itemstack,user,pointed_thing)
+ local keys=user:get_player_control()
+ local player_name=user:get_player_name()
+ local item=itemstack:to_table()
+ local meta=get_item_meta(item["metadata"])
+ if meta==nil or keys["sneak"]==true then return mining_drill_mk2_setmode(user,itemstack) end
+ if meta["mode"]==nil then return mining_drill_mk2_setmode(user,itemstack) end
+ if pointed_thing.type~="node" then return end
+ if meta["charge"]==nil then return end
+ charge=meta["charge"]
+ if charge-mining_drill_power_usage>0 then
+ local charge_to_take=drill_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,2,meta["mode"])
+ charge=charge-charge_to_take;
+ if charge<0 then charge=0 end
+ meta["charge"]=charge
+ item["metadata"]=set_item_meta(meta)
+ set_RE_wear(item,charge,mining_drill_mk2_max_charge)
+ itemstack:replace(item)
+ end
+ return itemstack
+end
+
+function mining_drill_mk3_handler (itemstack,user,pointed_thing)
+ local keys=user:get_player_control()
+ local player_name=user:get_player_name()
+ local item=itemstack:to_table()
+ local meta=get_item_meta(item["metadata"])
+ if meta==nil or keys["sneak"]==true then return mining_drill_mk3_setmode(user,itemstack) end
+ if meta["mode"]==nil then return mining_drill_mk3_setmode(user,itemstack) end
+ if pointed_thing.type~="node" then return end
+ if meta["charge"]==nil then return end
+ local charge=meta["charge"]
+ if charge-mining_drill_power_usage>0 then
+ local charge_to_take=drill_dig_it(minetest.get_pointed_thing_position(pointed_thing, above),user,3,meta["mode"])
+ charge=charge-charge_to_take;
+ if charge<0 then charge=0 end
+ meta["charge"]=charge
+ item["metadata"]=set_item_meta(meta)
+ set_RE_wear(item,charge,mining_drill_mk3_max_charge)
+ itemstack:replace(item)
+ end
+ return itemstack
+end
+
+mining_drill_mode_text={
+{"Single node."},
+{"3 nodes deep."},
+{"3 modes wide."},
+{"3 modes tall."},
+{"3x3 nodes."},
+}
+
+function mining_drill_mk2_setmode(user,itemstack)
+ local player_name=user:get_player_name()
+ local item=itemstack:to_table()
+ local meta=get_item_meta(item["metadata"])
+ if meta==nil then
+ meta={}
+ mode=0
+ end
+ if meta["mode"]==nil then
+ minetest.chat_send_player(player_name,"Hold shift and use to change Mining Drill Mk2 modes.")
+ meta["mode"]=0
+ mode=0
+ end
+ mode=(meta["mode"])
+ mode=mode+1
+ if mode>=5 then mode=1 end
+ minetest.chat_send_player(player_name, "Mining Drill Mk2 mode : "..mode.." - "..mining_drill_mode_text[mode][1] )
+ item["name"]="technic:mining_drill_mk2_"..mode
+ meta["mode"]=mode
+ item["metadata"]=set_item_meta(meta)
+ itemstack:replace(item)
+ return itemstack
+end
+
+function mining_drill_mk3_setmode(user,itemstack)
+ local player_name=user:get_player_name()
+ local item=itemstack:to_table()
+ local meta=get_item_meta(item["metadata"])
+ if meta==nil then
+ meta={}
+ mode=0
+ end
+ if meta["mode"]==nil then
+ minetest.chat_send_player(player_name,"Hold shift and use to change Mining Drill Mk3 modes.")
+ meta["mode"]=0
+ mode=0
+ end
+ mode=(meta["mode"])
+ mode=mode+1
+ if mode>=6 then mode=1 end
+ minetest.chat_send_player(player_name, "Mining Drill Mk3 mode : "..mode.." - "..mining_drill_mode_text[mode][1] )
+ item["name"]="technic:mining_drill_mk3_"..mode
+ meta["mode"]=mode
+ item["metadata"]=set_item_meta(meta)
+ itemstack:replace(item)
+ return itemstack
+end
--
Gitblit v1.8.0