From 08b09aab94471133a80fb8bc984f4f0689350959 Mon Sep 17 00:00:00 2001 From: Cristiano Magro <cristiano.magro@vola.it> Date: Sun, 11 Oct 2020 17:16:52 +0200 Subject: [PATCH] mege treetrap e chainsaw --- technic/tools/mining_lasers.lua | 218 ++++++++++++++++++++++-------------------------------- 1 files changed, 89 insertions(+), 129 deletions(-) diff --git a/technic/tools/mining_lasers.lua b/technic/tools/mining_lasers.lua index caa416f..e4dd178 100644 --- a/technic/tools/mining_lasers.lua +++ b/technic/tools/mining_lasers.lua @@ -1,167 +1,127 @@ - -local r_corr = 0.25 -- Remove a bit more nodes (if shooting diagonal) to let it look like a hole (sth like antialiasing) -local mk1_charge = 40000 - local mining_lasers_list = { --- {<num>, <range of the laser shots>, <max_charge>}, - {"1", 7, mk1_charge}, - {"2", 11, mk1_charge * 4}, - {"3", 30, mk1_charge * 16}, +-- {<num>, <range of the laser shots>, <max_charge>, <charge_per_shot>}, + {"1", 7, 50000, 1000}, + {"2", 14, 200000, 2000}, + {"3", 21, 650000, 3000}, } - -local f_1 = 0.5 - r_corr -local f_2 = 0.5 + r_corr +local allow_entire_discharging = true local S = technic.getter minetest.register_craft({ - output = 'technic:laser_mk1', + output = "technic:laser_mk1", recipe = { - {'default:diamond', 'default:steel_ingot', 'technic:battery'}, - {'', 'default:steel_ingot', 'technic:battery'}, - {'', '', 'default:copper_ingot'}, + {"default:diamond", "basic_materials:brass_ingot", "default:obsidian_glass"}, + {"", "basic_materials:brass_ingot", "technic:red_energy_crystal"}, + {"", "", "default:copper_ingot"}, + } +}) +minetest.register_craft({ + output = "technic:laser_mk2", + recipe = { + {"default:diamond", "technic:carbon_steel_ingot", "technic:laser_mk1"}, + {"", "technic:carbon_steel_ingot", "technic:green_energy_crystal"}, + {"", "", "default:copper_ingot"}, + } +}) +minetest.register_craft({ + output = "technic:laser_mk3", + recipe = { + {"default:diamond", "technic:carbon_steel_ingot", "technic:laser_mk2"}, + {"", "technic:carbon_steel_ingot", "technic:blue_energy_crystal"}, + {"", "", "default:copper_ingot"}, } }) - -local function get_used_dir(dir) - local abs_dir = {x = math.abs(dir.x), - y = math.abs(dir.y), - z = math.abs(dir.z)} - local dir_max = math.max(abs_dir.x, abs_dir.y, abs_dir.z) - if dir_max == abs_dir.x then - local tab = {"x", {x = 1, y = dir.y / dir.x, z = dir.z / dir.x}} - if dir.x >= 0 then - tab[3] = "+" - end - return tab - end - if dir_max == abs_dir.y then - local tab = {"y", {x = dir.x / dir.y, y = 1, z = dir.z / dir.y}} - if dir.y >= 0 then - tab[3] = "+" - end - return tab - end - local tab = {"z", {x = dir.x / dir.z, y = dir.y / dir.z, z = 1}} - if dir.z >= 0 then - tab[3] = "+" - end - return tab -end - -local function node_tab(z, d) - local n1 = math.floor(z * d + f_1) - local n2 = math.floor(z * d + f_2) - if n1 == n2 then - return {n1} - end - return {n1, n2} -end - -local function laser_node(pos, player) - local node = minetest.get_node(pos) - if node.name == "air" - or node.name == "ignore" - or node.name == "default:lava_source" - or node.name == "default:lava_flowing" then - return - end - if node.name == "default:water_source" - or node.name == "default:water_flowing" then +local function laser_node(pos, node, player) + local def = minetest.registered_nodes[node.name] + if def.liquidtype ~= "none" and def.buildable_to then minetest.remove_node(pos) - minetest.add_particle(pos, - {x=0, y=2, z=0}, - {x=0, y=-1, z=0}, - 1.5, - 8, - false, - "smoke_puff.png") + minetest.add_particle({ + pos = pos, + velocity = {x = 0, y = 1.5 + math.random(), z = 0}, + acceleration = {x = 0, y = -1, z = 0}, + size = 6 + math.random() * 2, + texture = "smoke_puff.png^[transform" .. math.random(0, 7), + }) return end - if player then - minetest.node_dig(pos, node, player) - end + def.on_dig(pos, node, player) end -local function laser_nodes(pos, dir, player, range) - local t_dir = get_used_dir(dir) - local dir_typ = t_dir[1] - if t_dir[3] == "+" then - f_tab = {0, range} - else - f_tab = {-range,0} +local keep_node = {air = true} +local function can_keep_node(name) + if keep_node[name] ~= nil then + return keep_node[name] end - local d_ch = t_dir[2] - if dir_typ == "x" then - for d = f_tab[1],f_tab[2],1 do - local x = d - local ytab = node_tab(d_ch.y, d) - local ztab = node_tab(d_ch.z, d) - for _, y in pairs(ytab) do - for _, z in pairs(ztab) do - laser_node({x = pos.x + x, y = pos.y + y, z = pos.z + z}, player) - end - end - end - return - end - if dir_typ == "y" then - for d = f_tab[1], f_tab[2] do - local xtab = node_tab(d_ch.x, d) - local y = d - local ztab = node_tab(d_ch.z, d) - for _, x in pairs(xtab) do - for _, z in pairs(ztab) do - laser_node({x = pos.x + x, y = pos.y + y, z = pos.z + z}, player) - end - end - end - return - end - for d = f_tab[1], f_tab[2] do - local xtab = node_tab(d_ch.x, d) - local ytab = node_tab(d_ch.y, d) - local z = d - for _, x in pairs(xtab) do - for _, y in pairs(ytab) do - laser_node({x = pos.x + x, y = pos.y + y, z = pos.z + z}, player) - end - end - end + keep_node[name] = minetest.get_item_group(name, "hot") ~= 0 + return keep_node[name] end local function laser_shoot(player, range, particle_texture, sound) - local playerpos = player:getpos() + local player_pos = player:get_pos() + local player_name = player:get_player_name() local dir = player:get_look_dir() - local startpos = {x = playerpos.x, y = playerpos.y + 1.6, z = playerpos.z} - local mult_dir = vector.multiply(dir, 50) - minetest.add_particle(startpos, dir, mult_dir, range / 11, 1, false, particle_texture) - laser_nodes(vector.round(startpos), dir, player, range) - minetest.sound_play(sound, {pos = playerpos, gain = 1.0, max_hear_distance = range}) + local start_pos = vector.new(player_pos) + -- Adjust to head height + start_pos.y = start_pos.y + (player:get_properties().eye_height or 1.625) + minetest.add_particle({ + pos = start_pos, + velocity = dir, + acceleration = vector.multiply(dir, 50), + expirationtime = (math.sqrt(1 + 100 * (range + 0.4)) - 1) / 50, + size = 1, + texture = particle_texture .. "^[transform" .. math.random(0, 7), + }) + minetest.sound_play(sound, {pos = player_pos, max_hear_distance = range}) + for pos in technic.trace_node_ray_fat(start_pos, dir, range) do + if minetest.is_protected(pos, player_name) then + minetest.record_protection_violation(pos, player_name) + break + end + local node = minetest.get_node(pos) + if node.name == "ignore" + or not minetest.registered_nodes[node.name] then + break + end + if not can_keep_node(node.name) then + laser_node(pos, node, player) + end + end end - for _, m in pairs(mining_lasers_list) do technic.register_power_tool("technic:laser_mk"..m[1], m[3]) minetest.register_tool("technic:laser_mk"..m[1], { description = S("Mining Laser Mk%d"):format(m[1]), inventory_image = "technic_mining_laser_mk"..m[1]..".png", + range = 0, stack_max = 1, + wear_represents = "technic_RE_charge", + on_refill = technic.refill_RE_charge, on_use = function(itemstack, user) - local meta = get_item_meta(itemstack:get_metadata()) - if not meta or not meta.charge then + local meta = minetest.deserialize(itemstack:get_metadata()) + if not meta or not meta.charge or meta.charge == 0 then return end - if meta.charge - 400 > 0 then - laser_shoot(user, m[2], "technic_laser_beam_mk"..m[1]..".png", "technic_laser_mk"..m[1]) - meta.charge = meta.charge - 400 + + local range = m[2] + if meta.charge < m[4] then + if not allow_entire_discharging then + return + end + -- If charge is too low, give the laser a shorter range + range = range * meta.charge / m[4] + end + laser_shoot(user, range, "technic_laser_beam_mk" .. m[1] .. ".png", + "technic_laser_mk" .. m[1]) + if not technic.creative_mode then + meta.charge = math.max(meta.charge - m[4], 0) technic.set_RE_wear(itemstack, meta.charge, m[3]) - itemstack:set_metadata(set_item_meta(meta)) + itemstack:set_metadata(minetest.serialize(meta)) end return itemstack end, }) end - -- Gitblit v1.8.0