| commit | author | age | ||
| 636b0f | 1 | local S = technic.getter |
| Z | 2 | |
| 871ded | 3 | technic.register_power_tool("technic:prospector", 300000) |
| 636b0f | 4 | |
| Z | 5 | local function get_metadata(toolstack) |
| 6 | local m = minetest.deserialize(toolstack:get_metadata()) | |
| 7 | if not m then m = {} end | |
| 8 | if not m.charge then m.charge = 0 end | |
| 9 | if not m.target then m.target = "" end | |
| 10 | if not m.look_depth then m.look_depth = 7 end | |
| 11 | if not m.look_radius then m.look_radius = 1 end | |
| 12 | return m | |
| 13 | end | |
| 14 | ||
| 15 | minetest.register_tool("technic:prospector", { | |
| 16 | description = S("Prospector"), | |
| 17 | inventory_image = "technic_prospector.png", | |
| 18 | wear_represents = "technic_RE_charge", | |
| 19 | on_refill = technic.refill_RE_charge, | |
| 20 | on_use = function(toolstack, user, pointed_thing) | |
| 21 | if not user or not user:is_player() or user.is_fake_player then return end | |
| 22 | if pointed_thing.type ~= "node" then return end | |
| 23 | local toolmeta = get_metadata(toolstack) | |
| 24 | local look_diameter = toolmeta.look_radius * 2 + 1 | |
| 25 | local charge_to_take = toolmeta.look_depth * (toolmeta.look_depth + 1) * look_diameter * look_diameter | |
| 26 | if toolmeta.charge < charge_to_take then return end | |
| 27 | if toolmeta.target == "" then | |
| 28 | minetest.chat_send_player(user:get_player_name(), "Right-click to set target block type") | |
| 29 | return | |
| 30 | end | |
| 31 | toolmeta.charge = toolmeta.charge - charge_to_take | |
| 32 | toolstack:set_metadata(minetest.serialize(toolmeta)) | |
| 33 | technic.set_RE_wear(toolstack, toolmeta.charge, technic.power_tools[toolstack:get_name()]) | |
| 34 | local start_pos = pointed_thing.under | |
| 35 | local forward = minetest.facedir_to_dir(minetest.dir_to_facedir(user:get_look_dir(), true)) | |
| 36 | local right = forward.x ~= 0 and { x=0, y=1, z=0 } or (forward.y ~= 0 and { x=0, y=0, z=1 } or { x=1, y=0, z=0 }) | |
| 37 | local up = forward.x ~= 0 and { x=0, y=0, z=1 } or (forward.y ~= 0 and { x=1, y=0, z=0 } or { x=0, y=1, z=0 }) | |
| 38 | local base_pos = vector.add(start_pos, vector.multiply(vector.add(right, up), - toolmeta.look_radius)) | |
| 39 | local found = false | |
| 40 | for f = 0, toolmeta.look_depth-1 do | |
| 41 | for r = 0, look_diameter-1 do | |
| 42 | for u = 0, look_diameter-1 do | |
| 43 | if minetest.get_node(vector.add(vector.add(vector.add(base_pos, vector.multiply(forward, f)), vector.multiply(right, r)), vector.multiply(up, u))).name == toolmeta.target then found = true end | |
| 44 | end | |
| 45 | end | |
| 46 | end | |
| 47 | if math.random() < 0.02 then found = not found end | |
| 48 | minetest.chat_send_player(user:get_player_name(), minetest.registered_nodes[toolmeta.target].description.." is "..(found and "present" or "absent").." in "..look_diameter.."x"..look_diameter.."x"..toolmeta.look_depth.." region") | |
| 49 | minetest.sound_play("technic_prospector_"..(found and "hit" or "miss"), { pos = vector.add(user:getpos(), { x = 0, y = 1, z = 0 }), gain = 1.0, max_hear_distance = 10 }) | |
| 50 | return toolstack | |
| 51 | end, | |
| 52 | on_place = function(toolstack, user, pointed_thing) | |
| 53 | if not user or not user:is_player() or user.is_fake_player then return end | |
| 54 | local toolmeta = get_metadata(toolstack) | |
| 55 | local pointed | |
| 56 | if pointed_thing.type == "node" then | |
| 57 | local pname = minetest.get_node(pointed_thing.under).name | |
| 58 | local pdef = minetest.registered_nodes[pname] | |
| 59 | if pdef and (pdef.groups.not_in_creative_inventory or 0) == 0 and pname ~= toolmeta.target then | |
| 60 | pointed = pname | |
| 61 | end | |
| 62 | end | |
| 63 | local look_diameter = toolmeta.look_radius * 2 + 1 | |
| 64 | minetest.show_formspec(user:get_player_name(), "technic:prospector_control", | |
| 65 | "size[7,8.5]".. | |
| 66 | "item_image[0,0;1,1;"..toolstack:get_name().."]".. | |
| 67 | "label[1,0;"..minetest.formspec_escape(toolstack:get_definition().description).."]".. | |
| 68 | (toolmeta.target ~= "" and | |
| 69 | "label[0,1.5;Current target:]".. | |
| 70 | "label[0,2;"..minetest.formspec_escape(minetest.registered_nodes[toolmeta.target].description).."]".. | |
| 71 | "item_image[0,2.5;1,1;"..toolmeta.target.."]" or | |
| 72 | "label[0,1.5;No target set]").. | |
| 73 | (pointed and | |
| 74 | "label[3.5,1.5;May set new target:]".. | |
| 75 | "label[3.5,2;"..minetest.formspec_escape(minetest.registered_nodes[pointed].description).."]".. | |
| 76 | "item_image[3.5,2.5;1,1;"..pointed.."]".. | |
| 77 | "button_exit[3.5,3.65;2,0.5;target_"..pointed..";Set target]" or | |
| 78 | "label[3.5,1.5;No new target available]").. | |
| 79 | "label[0,4.5;Region cross section:]".. | |
| 80 | "label[0,5;"..look_diameter.."x"..look_diameter.."]".. | |
| 81 | "label[3.5,4.5;Set region cross section:]".. | |
| 82 | "button_exit[3.5,5.15;1,0.5;look_radius_0;1x1]".. | |
| 83 | "button_exit[4.5,5.15;1,0.5;look_radius_1;3x3]".. | |
| 84 | "button_exit[5.5,5.15;1,0.5;look_radius_3;7x7]".. | |
| 85 | "label[0,6;Region depth:]".. | |
| 86 | "label[0,6.5;"..toolmeta.look_depth.."]".. | |
| 87 | "label[3.5,6;Set region depth:]".. | |
| 88 | "button_exit[3.5,6.65;1,0.5;look_depth_7;7]".. | |
| 89 | "button_exit[4.5,6.65;1,0.5;look_depth_14;14]".. | |
| 90 | "button_exit[5.5,6.65;1,0.5;look_depth_21;21]".. | |
| 91 | "label[0,7.5;Accuracy:]".. | |
| 92 | "label[0,8;98%]") | |
| 93 | return | |
| 94 | end, | |
| 95 | }) | |
| 96 | ||
| 97 | minetest.register_on_player_receive_fields(function(user, formname, fields) | |
| 98 | if formname ~= "technic:prospector_control" then return false end | |
| 99 | if not user or not user:is_player() or user.is_fake_player then return end | |
| 100 | local toolstack = user:get_wielded_item() | |
| 101 | if toolstack:get_name() ~= "technic:prospector" then return true end | |
| 102 | local toolmeta = get_metadata(toolstack) | |
| 103 | for field, value in pairs(fields) do | |
| 104 | if field:sub(1, 7) == "target_" then | |
| 105 | toolmeta.target = field:sub(8) | |
| 106 | end | |
| 107 | if field:sub(1, 12) == "look_radius_" then | |
| 108 | toolmeta.look_radius = field:sub(13) | |
| 109 | end | |
| 110 | if field:sub(1, 11) == "look_depth_" then | |
| 111 | toolmeta.look_depth = field:sub(12) | |
| 112 | end | |
| 113 | end | |
| 114 | toolstack:set_metadata(minetest.serialize(toolmeta)) | |
| 115 | user:set_wielded_item(toolstack) | |
| 116 | return true | |
| 117 | end) | |
| 118 | ||
| 119 | minetest.register_craft({ | |
| 120 | output = "technic:prospector", | |
| 121 | recipe = { | |
| 122 | {"moreores:pick_silver", "moreores:mithril_block", "pipeworks:teleport_tube_1"}, | |
| 123 | {"technic:brass_ingot", "technic:control_logic_unit", "technic:brass_ingot"}, | |
| 871ded | 124 | {"", "technic:blue_energy_crystal", ""}, |
| 636b0f | 125 | } |
| Z | 126 | }) |
