From c687e8cb7b9e624474353b0cc10acc5db14192f8 Mon Sep 17 00:00:00 2001 From: Jordan Snelling <jordach.snelling@gmail.com> Date: Thu, 27 Jun 2013 09:40:03 +0200 Subject: [PATCH] Merge pull request #36 from ObKo/blocks --- technic/mining_drill.lua | 390 +++++++++++++++++++++++++++++++++++++++++++++++++++--- 1 files changed, 363 insertions(+), 27 deletions(-) diff --git a/technic/mining_drill.lua b/technic/mining_drill.lua index 4ccfc95..86c18ac 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,373 @@ {'', '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 + 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 + 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() + 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() + 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 + charge=meta["charge"] + if charge-mining_drill_power_usage>0 then + print(dump(meta)) + 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