summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2014-07-21 14:29:45 +0100
committerVanessa Ezekowitz <vanessaezekowitz@gmail.com>2014-07-21 09:52:58 -0400
commitebccf81758ce7b5ace7a593f9985fa97b3435798 (patch)
treee990f7c0ce9293e4ceee5f5e763691b588a74e64
parent22eb00e5d1c0f9f1cce144beb7ad3f6cdb000768 (diff)
downloadpipeworks-ebccf81758ce7b5ace7a593f9985fa97b3435798.tar
pipeworks-ebccf81758ce7b5ace7a593f9985fa97b3435798.tar.gz
pipeworks-ebccf81758ce7b5ace7a593f9985fa97b3435798.tar.bz2
pipeworks-ebccf81758ce7b5ace7a593f9985fa97b3435798.tar.xz
pipeworks-ebccf81758ce7b5ace7a593f9985fa97b3435798.zip
Add dispenser
The dispenser is an automated item dropper.
-rw-r--r--default_settings.txt1
-rw-r--r--dispenser.lua200
-rw-r--r--init.lua1
-rw-r--r--textures/pipeworks_dispenser_back.pngbin0 -> 2031 bytes
-rw-r--r--textures/pipeworks_dispenser_bottom.pngbin0 -> 4508 bytes
-rw-r--r--textures/pipeworks_dispenser_front_off.pngbin0 -> 4722 bytes
-rw-r--r--textures/pipeworks_dispenser_front_on.pngbin0 -> 4676 bytes
-rw-r--r--textures/pipeworks_dispenser_side1.pngbin0 -> 4519 bytes
-rw-r--r--textures/pipeworks_dispenser_side2.pngbin0 -> 4518 bytes
-rw-r--r--textures/pipeworks_dispenser_top.pngbin0 -> 4501 bytes
10 files changed, 202 insertions, 0 deletions
diff --git a/default_settings.txt b/default_settings.txt
index f594a16..4aa4150 100644
--- a/default_settings.txt
+++ b/default_settings.txt
@@ -3,6 +3,7 @@
pipeworks.enable_pipes = true
pipeworks.enable_autocrafter = true
pipeworks.enable_deployer = true
+pipeworks.enable_dispenser = true
pipeworks.enable_node_breaker = true
pipeworks.enable_teleport_tube = true
pipeworks.enable_pipe_devices = true
diff --git a/dispenser.lua b/dispenser.lua
new file mode 100644
index 0000000..de78348
--- /dev/null
+++ b/dispenser.lua
@@ -0,0 +1,200 @@
+minetest.register_craft({
+ output = "pipeworks:dispenser_off",
+ recipe = {
+ { "default:desert_sand", "default:chest", "default:desert_sand" },
+ { "default:stone", "mesecons:piston", "default:stone" },
+ { "default:stone", "mesecons:mesecon", "default:stone" },
+ }
+})
+
+local function delay(x)
+ return (function() return x end)
+end
+
+local function dispenser_on(pos, node)
+ if node.name ~= "pipeworks:dispenser_off" then
+ return
+ end
+
+ node.name = "pipeworks:dispenser_on"
+ minetest.swap_node(pos, node)
+ nodeupdate(pos)
+
+ local meta = minetest.get_meta(pos)
+ local inv = meta:get_inventory()
+ local invlist = inv:get_list("main")
+ for i, stack in ipairs(invlist) do
+ if stack:get_name() ~= nil and stack:get_name() ~= "" then
+ local dir = minetest.facedir_to_dir(node.param2)
+ local pitch
+ local yaw
+ if dir.z < 0 then
+ yaw = 0
+ pitch = 0
+ elseif dir.z > 0 then
+ yaw = math.pi
+ pitch = 0
+ elseif dir.x < 0 then
+ yaw = 3*math.pi/2
+ pitch = 0
+ elseif dir.x > 0 then
+ yaw = math.pi/2
+ pitch = 0
+ elseif dir.y > 0 then
+ yaw = 0
+ pitch = -math.pi/2
+ else
+ yaw = 0
+ pitch = math.pi/2
+ end
+ local dropper_pos = {x = pos.x, y = pos.y - 1.5, z = pos.z} -- Player height
+ local dropper = {
+ get_inventory_formspec = delay(meta:get_string("formspec")),
+ get_look_dir = delay({x = -dir.x, y = -dir.y, z = -dir.z}),
+ get_look_pitch = delay(pitch),
+ get_look_yaw = delay(yaw),
+ get_player_control = delay({jump=false, right=false, left=false, LMB=false, RMB=false, sneak=true, aux1=false, down=false, up=false}),
+ get_player_control_bits = delay(0),
+ get_player_name = delay(":pipeworks:"..minetest.pos_to_string(pos)),
+ is_player = delay(true),
+ is_fake_player = true,
+ set_inventory_formspec = delay(),
+ getpos = delay(dropper_pos),
+ get_hp = delay(20),
+ get_inventory = delay(inv),
+ get_wielded_item = delay(stack),
+ get_wield_index = delay(i),
+ get_wield_list = delay("main"),
+ moveto = delay(),
+ punch = delay(),
+ remove = delay(),
+ right_click = delay(),
+ setpos = delay(),
+ set_hp = delay(),
+ set_properties = delay(),
+ set_wielded_item = function(self, item) inv:set_stack("main", i, item) end,
+ set_animation = delay(),
+ set_attach = delay(),
+ set_detach = delay(),
+ set_bone_position = delay(),
+ }
+ local stack2
+ if minetest.registered_items[stack:get_name()] then
+ stack2 = minetest.registered_items[stack:get_name()].on_drop(stack, dropper, dropper_pos) or stack
+ end
+ inv:set_stack("main", i, stack2)
+ return
+ end
+ end
+end
+
+local dispenser_off = function(pos, node)
+ if node.name == "pipeworks:dispenser_on" then
+ node.name = "pipeworks:dispenser_off"
+ minetest.swap_node(pos, node)
+ nodeupdate(pos)
+ end
+end
+
+for _, state in ipairs({ "off", "on" }) do
+ local grps = { snappy=2, choppy=2, oddly_breakable_by_hand=2, mesecon=2, tubedevice=1, tubedevice_receiver=1 }
+ if state == "on" then grps.not_in_creative_inventory = 1 end
+ minetest.register_node("pipeworks:dispenser_"..state, {
+ description = "Dispenser",
+ tile_images = {
+ "pipeworks_dispenser_top.png",
+ "pipeworks_dispenser_bottom.png",
+ "pipeworks_dispenser_side2.png",
+ "pipeworks_dispenser_side1.png",
+ "pipeworks_dispenser_back.png",
+ "pipeworks_dispenser_front_"..state..".png",
+ },
+ mesecons = {
+ effector = {
+ rules = pipeworks.rules_all,
+ action_on = dispenser_on,
+ action_off = dispenser_off,
+ },
+ },
+ tube={insert_object=function(pos,node,stack,direction)
+ local meta=minetest.get_meta(pos)
+ local inv=meta:get_inventory()
+ return inv:add_item("main",stack)
+ end,
+ can_insert=function(pos,node,stack,direction)
+ local meta=minetest.get_meta(pos)
+ local inv=meta:get_inventory()
+ return inv:room_for_item("main",stack)
+ end,
+ input_inventory="main",
+ connect_sides={back=1},
+ can_remove = function(pos, node, stack, dir)
+ return stack:get_count()
+ end},
+ is_ground_content = true,
+ paramtype2 = "facedir",
+ tubelike = 1,
+ groups = grps,
+ sounds = default.node_sound_stone_defaults(),
+ on_construct = function(pos)
+ local meta = minetest.get_meta(pos)
+ meta:set_string("formspec",
+ "invsize[8,9;]"..
+ "label[0,0;Dispenser]"..
+ "list[current_name;main;4,1;3,3;]"..
+ "list[current_player;main;0,5;8,4;]")
+ meta:set_string("infotext", "Dispenser")
+ local inv = meta:get_inventory()
+ inv:set_size("main", 3*3)
+ end,
+ can_dig = function(pos,player)
+ local meta = minetest.get_meta(pos)
+ local inv = meta:get_inventory()
+ return inv:is_empty("main")
+ end,
+ after_place_node = function (pos, placer)
+ pipeworks.scan_for_tube_objects(pos, placer)
+ local placer_pos = placer:getpos()
+
+ --correct for the player's height
+ if placer:is_player() then placer_pos.y = placer_pos.y + 1.5 end
+
+ --correct for 6d facedir
+ if placer_pos then
+ local dir = {
+ x = pos.x - placer_pos.x,
+ y = pos.y - placer_pos.y,
+ z = pos.z - placer_pos.z
+ }
+ local node = minetest.get_node(pos)
+ node.param2 = minetest.dir_to_facedir(dir, true)
+ minetest.set_node(pos, node)
+ minetest.log("action", "real (6d) facedir: " .. node.param2)
+ end
+
+ minetest.get_meta(pos):set_string("owner", placer:get_player_name())
+ end,
+ after_dig_node = pipeworks.scan_for_tube_objects,
+ allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+ local meta = minetest.get_meta(pos)
+ if player:get_player_name() ~= meta:get_string("owner") and meta:get_string("owner") ~= "" then
+ return 0
+ end
+ return count
+ end,
+ allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+ local meta = minetest.get_meta(pos)
+ if player:get_player_name() ~= meta:get_string("owner") and meta:get_string("owner") ~= "" then
+ return 0
+ end
+ return stack:get_count()
+ end,
+ allow_metadata_inventory_take = function(pos, listname, index, stack, player)
+ local meta = minetest.get_meta(pos)
+ if player:get_player_name() ~= meta:get_string("owner") and meta:get_string("owner") ~= "" then
+ return 0
+ end
+ return stack:get_count()
+ end,
+ })
+end
diff --git a/init.lua b/init.lua
index 8a6da60..265ae1d 100644
--- a/init.lua
+++ b/init.lua
@@ -121,6 +121,7 @@ if pipeworks.enable_pipe_devices then dofile(pipeworks.modpath.."/devices.lua")
if pipeworks.enable_redefines then dofile(pipeworks.modpath.."/compat.lua") end
if pipeworks.enable_autocrafter then dofile(pipeworks.modpath.."/autocrafter.lua") end
if pipeworks.enable_deployer then dofile(pipeworks.modpath.."/deployer.lua") end
+if pipeworks.enable_dispenser then dofile(pipeworks.modpath.."/dispenser.lua") end
if pipeworks.enable_node_breaker then
dofile(pipeworks.modpath.."/node_breaker.lua")
diff --git a/textures/pipeworks_dispenser_back.png b/textures/pipeworks_dispenser_back.png
new file mode 100644
index 0000000..f4fade2
--- /dev/null
+++ b/textures/pipeworks_dispenser_back.png
Binary files differ
diff --git a/textures/pipeworks_dispenser_bottom.png b/textures/pipeworks_dispenser_bottom.png
new file mode 100644
index 0000000..35416de
--- /dev/null
+++ b/textures/pipeworks_dispenser_bottom.png
Binary files differ
diff --git a/textures/pipeworks_dispenser_front_off.png b/textures/pipeworks_dispenser_front_off.png
new file mode 100644
index 0000000..4fc0017
--- /dev/null
+++ b/textures/pipeworks_dispenser_front_off.png
Binary files differ
diff --git a/textures/pipeworks_dispenser_front_on.png b/textures/pipeworks_dispenser_front_on.png
new file mode 100644
index 0000000..36f7f0b
--- /dev/null
+++ b/textures/pipeworks_dispenser_front_on.png
Binary files differ
diff --git a/textures/pipeworks_dispenser_side1.png b/textures/pipeworks_dispenser_side1.png
new file mode 100644
index 0000000..56e8973
--- /dev/null
+++ b/textures/pipeworks_dispenser_side1.png
Binary files differ
diff --git a/textures/pipeworks_dispenser_side2.png b/textures/pipeworks_dispenser_side2.png
new file mode 100644
index 0000000..8f306b2
--- /dev/null
+++ b/textures/pipeworks_dispenser_side2.png
Binary files differ
diff --git a/textures/pipeworks_dispenser_top.png b/textures/pipeworks_dispenser_top.png
new file mode 100644
index 0000000..8d6f9d0
--- /dev/null
+++ b/textures/pipeworks_dispenser_top.png
Binary files differ