From e728df46df9ad47dec19dc0a68caafe2b88669a8 Mon Sep 17 00:00:00 2001 From: Anthony Zhang Date: Sun, 23 Jun 2013 19:15:31 -0400 Subject: [PATCH] Super duper pipeworks deployer and node breaker updates. --- attic/deployer.lua => deployer.lua | 105 ++++++++++----------- init.lua | 7 +- attic/node_breaker.lua => node_breaker.lua | 93 ++++++++++-------- 3 files changed, 103 insertions(+), 102 deletions(-) rename attic/deployer.lua => deployer.lua (68%) rename attic/node_breaker.lua => node_breaker.lua (59%) diff --git a/attic/deployer.lua b/deployer.lua similarity index 68% rename from attic/deployer.lua rename to deployer.lua index fdb4b15..5b500b7 100644 --- a/attic/deployer.lua +++ b/deployer.lua @@ -1,59 +1,67 @@ +if minetest.get_modpath("technic") then --technic installed + --register aliases in order to use technic's deployers + minetest.register_alias("pipeworks:deployer_off", "technic:deployer_off") + minetest.register_alias("pipeworks:deployer_on", "technic:deployer_on") + return +end + +--register aliases for when someone had technic installed, but then uninstalled it but not pipeworks +minetest.register_alias("technic:deployer_off", "pipeworks:deployer_off") +minetest.register_alias("technic:deployer_on", "pipeworks:deployer_on") + minetest.register_craft({ output = 'pipeworks:deployer_off 1', recipe = { {'default:wood', 'default:chest','default:wood'}, {'default:stone', 'mesecons:piston','default:stone'}, {'default:stone', 'mesecons:mesecon','default:stone'}, - } }) +function hacky_swap_node(pos,name) + local node=minetest.env:get_node(pos) + local meta=minetest.env:get_meta(pos) + local meta0=meta:to_table() + node.name=name + minetest.env:add_node(pos, node) + local meta=minetest.env:get_meta(pos) + meta:from_table(meta0) +end + deployer_on = function(pos, node) - local pos1={} - pos1.x=pos.x - pos1.y=pos.y - pos1.z=pos.z - local pos2={} - pos2.x=pos.x - pos2.y=pos.y - pos2.z=pos.z - if node.param2==3 then - pos1.x=pos1.x+1 - pos2.x=pos2.x+2 - end - if node.param2==2 then - pos1.z=pos1.z+1 - pos2.z=pos2.z+2 - end - if node.param2==1 then - pos1.x=pos1.x-1 - pos2.x=pos2.x-2 - end - if node.param2==0 then - pos1.z=pos1.z-1 - pos2.z=pos2.z-2 + if node.name ~= "pipeworks:deployer_off" then + return end - if node.name == "pipeworks:deployer_off" then - hacky_swap_node(pos,"pipeworks:deployer_on") - nodeupdate(pos) - local meta = minetest.env:get_meta(pos); - - local inv = meta:get_inventory() - local invlist=inv:get_list("main") - for i,stack in ipairs(invlist) do + local pos1 = {x=pos.x, y=pos.y, z=pos.z} + local pos2 = {x=pos.x, y=pos.y, z=pos.z} + if node.param2 == 3 then + pos1.x, pos2.x = pos1.x + 1, pos2.x + 2 + elseif node.param2 == 2 then + pos1.z, pos2.z = pos1.z + 1, pos2.z + 2 + elseif node.param2 == 1 then + pos1.x, pos2.x = pos1.x - 1, pos2.x - 2 + elseif node.param2 == 0 then + pos1.z, pos2.z = pos1.z - 1, pos2.z - 2 + end - if stack:get_name() ~=nil and stack:get_name() ~="" and minetest.env:get_node(pos1).name == "air" then - local placer={} - function placer:get_player_name() return "deployer" end - function placer:getpos() return pos end - function placer:get_player_control() return {jump=false,right=false,left=false,LMB=false,RMB=false,sneak=false,aux1=false,down=false,up=false} end - local stack2=minetest.item_place(stack,placer,{type="node", under=pos1, above=pos2}) - invlist[i]=stack2 - inv:set_list("main",invlist) + hacky_swap_node(pos,"pipeworks:deployer_on") + nodeupdate(pos) + + local inv = minetest.env:get_meta(pos):get_inventory() + local invlist = inv:get_list("main") + for i, stack in ipairs(invlist) do + if stack:get_name() ~= nil and stack:get_name() ~= "" and minetest.env:get_node(pos1).name == "air" then --obtain the first non-empty item slow + local placer = { + get_player_name = function() return "deployer" end, + getpos = function() return pos end, + get_player_control = function() return {jump=false,right=false,left=false,LMB=false,RMB=false,sneak=false,aux1=false,down=false,up=false} end, + } + local stack2 = minetest.item_place(stack, placer, {type="node", under=pos1, above=pos2}) + invlist[i] = stack2 + inv:set_list("main", invlist) return end - end end end @@ -142,18 +150,3 @@ minetest.register_node("pipeworks:deployer_on", { return inv:is_empty("main") end, }) - -function hacky_swap_node(pos,name) - local node=minetest.env:get_node(pos) - local meta=minetest.env:get_meta(pos) - local meta0=meta:to_table() - node.name=name - minetest.env:add_node(pos, node) - local meta=minetest.env:get_meta(pos) - meta:from_table(meta0) -end - - - - - diff --git a/init.lua b/init.lua index e662bc4..d943424 100644 --- a/init.lua +++ b/init.lua @@ -377,10 +377,7 @@ dofile(modpath.."/flowing_logic.lua") dofile(modpath.."/compat.lua") dofile(modpath.."/item_transport.lua") dofile(modpath.."/autocrafter.lua") - -minetest.register_alias("pipeworks:deployer_off", "technic:deployer_off") -minetest.register_alias("pipeworks:deployer_on", "technic:deployer_on") -minetest.register_alias("pipeworks:nodebreaker_off", "technic:node_breaker_off") -minetest.register_alias("pipeworks:nodebreaker_on", "technic:node_breaker_on") +dofile(modpath.."/deployer.lua") +dofile(modpath.."/node_breaker.lua") print("Pipeworks loaded!") diff --git a/attic/node_breaker.lua b/node_breaker.lua similarity index 59% rename from attic/node_breaker.lua rename to node_breaker.lua index 3af1902..105f431 100644 --- a/attic/node_breaker.lua +++ b/node_breaker.lua @@ -1,3 +1,14 @@ +if minetest.get_modpath("technic") then --technic installed + --register aliases in order to use technic's node breakers + minetest.register_alias("pipeworks:nodebreaker_off", "technic:nodebreaker_off") + minetest.register_alias("pipeworks:nodebreaker_on", "technic:nodebreaker_on") + return +end + +--register aliases for when someone had technic installed, but then uninstalled it but not pipeworks +minetest.register_alias("technic:nodebreaker_off", "pipeworks:nodebreaker_off") +minetest.register_alias("technic:nodebreaker_on", "pipeworks:nodebreaker_on") + minetest.register_craft({ output = 'pipeworks:nodebreaker_off 1', recipe = { @@ -8,7 +19,6 @@ minetest.register_craft({ } }) - function hacky_swap_node(pos,name) local node=minetest.env:get_node(pos) local meta=minetest.env:get_meta(pos) @@ -19,7 +29,6 @@ function hacky_swap_node(pos,name) meta:from_table(meta0) end - node_breaker_on = function(pos, node) if node.name == "pipeworks:nodebreaker_off" then hacky_swap_node(pos,"pipeworks:nodebreaker_on") @@ -35,6 +44,46 @@ node_breaker_off = function(pos, node) end end +function break_node (pos, n_param) + local pos1 = {x=pos.x, y=pos.y, z=pos.z} + local pos2 = {x=pos.x, y=pos.y, z=pos.z} + + --param2 3=x+ 1=x- 2=z+ 0=z- + local x_velocity, z_velocity = 0, 0 + if n_param == 3 then + pos2.x = pos2.x + 1 + pos1.x = pos1.x - 1 + x_velocity = -1 + elseif n_param == 2 then + pos2.z = pos2.z + 1 + pos1.z = pos1.z - 1 + z_velocity = -1 + elseif n_param == 1 then + pos2.x = pos2.x - 1 + pos1.x = pos1.x + 1 + x_velocity = 1 + elseif n_param == 0 then + pos2.z = pos2.z - 1 + pos1.x = pos1.z + 1 + z_velocity = 1 + end + + local node = minetest.env:get_node(pos2) + if node.name == "air" or name == "ignore" then + return nil + elseif minetest.registered_nodes[node.name] and minetest.registered_nodes[node.name].liquidtype ~= "none" then + return nil + end + local drops = minetest.get_node_drops(node.name, "default:pick_mese") + for _, dropped_item in ipairs(drops) do + local item1 = tube_item({x=pos.x, y=pos.y, z=pos.z}, dropped_item) + item1:get_luaentity().start_pos = {x=pos.x, y=pos.y, z=pos.z} + item1:setvelocity({x=x_velocity, y=0, z=z_velocity}) + item1:setacceleration({x=0, y=0, z=0}) + end + minetest.env:remove_node(pos2) +end + minetest.register_node("pipeworks:nodebreaker_off", { description = "Node Breaker", tile_images = {"pipeworks_nodebreaker_top_off.png","pipeworks_nodebreaker_bottom_off.png","pipeworks_nodebreaker_side2_off.png","pipeworks_nodebreaker_side1_off.png", @@ -59,42 +108,4 @@ minetest.register_node("pipeworks:nodebreaker_on", { paramtype2 = "facedir", groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, mesecon = 2,tubedevice=1,not_in_creative_inventory=1}, sounds = default.node_sound_stone_defaults(), -}) - -function break_node (pos,n_param) - local pos1={} - local pos2={} - pos1.x=pos.x - pos1.y=pos.y - pos1.z=pos.z - pos2.x=pos.x - pos2.y=pos.y - pos2.z=pos.z - - --param2 3=x+ 1=x- 2=z+ 0=z- - local x_velocity=0 - local z_velocity=0 - - if n_param==3 then pos2.x=pos2.x+1 pos1.x=pos1.x-1 x_velocity=-1 end - if n_param==2 then pos2.z=pos2.z+1 pos1.z=pos1.z-1 z_velocity=-1 end - if n_param==1 then pos2.x=pos2.x-1 pos1.x=pos1.x+1 x_velocity=1 end - if n_param==0 then pos2.z=pos2.z-1 pos1.x=pos1.z+1 z_velocity=1 end - - local node=minetest.env:get_node(pos2) - if node.name == "air" then return nil end - if node.name == "default:lava_source" then return nil end - if node.name == "default:lava_flowing" then return nil end - if node.name == "default:water_source" then minetest.env:remove_node(pos2) return nil end - if node.name == "default:water_flowing" then minetest.env:remove_node(pos2) return nil end - if node.name == "ignore" then minetest.env:remove_node(pos2) return nil end - local drops = minetest.get_node_drops(node.name, "default:pick_mese") - local _, dropped_item - for _, dropped_item in ipairs(drops) do - local item1=tube_item({x=pos.x,y=pos.y,z=pos.z},dropped_item) - item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z} - item1:setvelocity({x=x_velocity, y=0, z=z_velocity}) - item1:setacceleration({x=0, y=0, z=0}) - end - minetest.env:remove_node(pos2) -end - +}) \ No newline at end of file -- 2.30.2