summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJeija <norrepli@gmail.com>2012-06-23 13:24:03 +0200
committerJeija <norrepli@gmail.com>2012-06-23 13:24:03 +0200
commit04bcc458d9ff0a7595b90c67a306b453afc95d7f (patch)
tree7f603ccda0296c9da38c24a0d4095b378d7c3399
parentbc80efd68568fb1d2a0525b24124b4273249d8d3 (diff)
downloadmesecons-04bcc458d9ff0a7595b90c67a306b453afc95d7f.tar
mesecons-04bcc458d9ff0a7595b90c67a306b453afc95d7f.tar.gz
mesecons-04bcc458d9ff0a7595b90c67a306b453afc95d7f.tar.bz2
mesecons-04bcc458d9ff0a7595b90c67a306b453afc95d7f.tar.xz
mesecons-04bcc458d9ff0a7595b90c67a306b453afc95d7f.zip
Several bugfixes and cleanups for movestones
-rw-r--r--mesecons_movestones/init.lua65
-rw-r--r--mesecons_mvps/init.lua42
2 files changed, 50 insertions, 57 deletions
diff --git a/mesecons_movestones/init.lua b/mesecons_movestones/init.lua
index 4af892d..891e248 100644
--- a/mesecons_movestones/init.lua
+++ b/mesecons_movestones/init.lua
@@ -64,27 +64,14 @@ minetest.register_entity("mesecons_movestones:movestone_entity", {
local direction=mesecon:get_movestone_direction(pos)
if not direction then
- minetest.env:place_node(pos, {name="mesecons_movestones:movestone"})
+ minetest.env:add_node(pos, {name="mesecons_movestones:movestone"})
self.object:remove()
return
end
self.object:setvelocity({x=direction.x*3, y=direction.y*3, z=direction.z*3})
- local lnode = minetest.env:get_node(pos)
- if lnode.name ~= "ignore" and lnode.name ~= "air" and lnode.name ~= "default:water" and lnode.name ~= "default:water_flowing" then
- local newnode
- repeat
- minetest.env:dig_node(pos)
- pos.x=pos.x+direction.x
- pos.y=pos.y+direction.y
- pos.z=pos.z+direction.z
- newnode = {name=lnode.name}
- lnode = minetest.env:get_node(pos)
- minetest.env:place_node(pos, newnode)
- nodeupdate(pos)
- until lnode.name == "ignore" or lnode.name == "air" or lnode.name == "default:water" or lnode.name == "default:water_flowing"
- end
+ mesecon:mvps_push(pos, direction)
end
})
@@ -113,7 +100,7 @@ mesecon:register_on_signal_on(function (pos, node)
or checknode.name=="ignore"
or checknode.name=="default:water"
or checknode.name=="default:water_flowing"
- minetest.env:dig_node(pos)
+ minetest.env:remove_node(pos)
nodeupdate(pos)
minetest.env:add_entity(pos, "mesecons_movestones:movestone_entity")
end
@@ -160,53 +147,17 @@ minetest.register_entity("mesecons_movestones:sticky_movestone_entity", {
if not direction then
--or (minetest.env:get_node_or_nil(pos).name ~="air"
--and minetest.env:get_node_or_nil(pos).name ~= nil) then
- minetest.env:place_node(pos, {name="mesecons_movestones:sticky_movestone"})
+ minetest.env:add_node(pos, {name="mesecons_movestones:sticky_movestone"})
self.object:remove()
return
end
self.object:setvelocity({x=direction.x*3, y=direction.y*3, z=direction.z*3})
- pos.x=pos.x+direction.x
- pos.y=pos.y+direction.y
- pos.z=pos.z+direction.z
-
- local lpos = {x=pos.x, y=pos.y, z=pos.z}
- local lnode = minetest.env:get_node(lpos)
- if lnode.name ~= "ignore" and lnode.name ~= "air" and lnode.name ~= "default:water" and lnode.name ~= "default:water_flowing" then
- local newnode
- repeat
- minetest.env:dig_node(lpos)
- lpos.x=lpos.x+direction.x
- lpos.y=lpos.y+direction.y
- lpos.z=lpos.z+direction.z
- newnode = {name=lnode.name}
- lnode = minetest.env:get_node(lpos)
- minetest.env:place_node(lpos, newnode)
- nodeupdate(lpos)
- until lnode.name == "ignore" or lnode.name == "air" or lnode.name == "default:water" or lnode.name == "default:water_flowing"
- end
+ mesecon:mvps_push(pos, direction)
--STICKY
- local lpos = {x=pos.x-direction.x, y=pos.y-direction.y, z=pos.z-direction.z} -- 1 away
- local lnode = minetest.env:get_node(lpos)
- local lpos2 = {x=pos.x-direction.x*2, y=pos.y-direction.y*2, z=pos.z-direction.z*2} -- 2 away
- local lnode2 = minetest.env:get_node(lpos2)
-
- if lnode.name ~= "ignore" and lnode.name ~= "air" and lnode.name ~= "default:water" and lnode.name ~= "default:water_flowing" then return end
- if lnode2.name == "ignore" or lnode2.name == "air" or lnode2.name == "default:water" or lnode2.name == "default:water_flowing" then return end
-
- local oldpos = {x=lpos2.x+direction.x, y=lpos2.y+direction.y, z=lpos2.z+direction.z}
- repeat
- minetest.env:place_node(oldpos, {name=minetest.env:get_node(lpos2).name})
- nodeupdate(oldpos)
- oldpos = {x=lpos2.x, y=lpos2.y, z=lpos2.z}
- lpos2.x = lpos2.x-direction.x
- lpos2.y = lpos2.y-direction.y
- lpos2.z = lpos2.z-direction.z
- lnode = minetest.env:get_node(lpos2)
- until lnode.name=="air" or lnode.name=="ignore" or lnode.name=="default:water" or lnode.name=="default:water_flowing"
- minetest.env:dig_node(oldpos)
+ mesecon:mvps_pull_all(pos, direction)
end
})
@@ -237,7 +188,7 @@ mesecon:register_on_signal_on(function (pos, node)
or checknode.name=="default:water"
or checknode.name=="default:water_flowing"
- minetest.env:dig_node(pos)
+ minetest.env:remove_node(pos)
nodeupdate(pos)
minetest.env:add_entity(pos, "mesecons_movestones:sticky_movestone_entity")
end
@@ -255,4 +206,4 @@ mesecon:add_rules("movestone", {
{x=1, y=-1, z=0},
{x=-1, y=1, z=0},
{x=-1, y=-1, z=0},
-{x=-1, y=0, z=0}}) \ No newline at end of file
+{x=-1, y=0, z=0}})
diff --git a/mesecons_mvps/init.lua b/mesecons_mvps/init.lua
index 150f59f..419dee0 100644
--- a/mesecons_mvps/init.lua
+++ b/mesecons_mvps/init.lua
@@ -20,6 +20,48 @@ function mesecon:register_mvps_stopper(nodename)
mesecon.mvps_stoppers[i]=nodename
end
+function mesecon:mvps_push(pos, direction) -- pos: pos of mvps; direction: direction of push
+ pos.x=pos.x+direction.x
+ pos.y=pos.y+direction.y
+ pos.z=pos.z+direction.z
+
+ local lpos = {x=pos.x, y=pos.y, z=pos.z}
+ local lnode = minetest.env:get_node(lpos)
+ local newnode
+ minetest.env:remove_node(lpos)
+ while not(lnode.name == "ignore" or lnode.name == "air" or lnode.name == "default:water" or lnode.name == "default:water_flowing") do
+ lpos.x=lpos.x+direction.x
+ lpos.y=lpos.y+direction.y
+ lpos.z=lpos.z+direction.z
+ newnode = lnode
+ lnode = minetest.env:get_node(lpos)
+ minetest.env:add_node(lpos, newnode)
+ nodeupdate(lpos)
+ end
+end
+
+function mesecon:mvps_pull_all(pos, direction) -- pos: pos of mvps; direction: direction of pull
+ local lpos = {x=pos.x-direction.x, y=pos.y-direction.y, z=pos.z-direction.z} -- 1 away
+ local lnode = minetest.env:get_node(lpos)
+ local lpos2 = {x=pos.x-direction.x*2, y=pos.y-direction.y*2, z=pos.z-direction.z*2} -- 2 away
+ local lnode2 = minetest.env:get_node(lpos2)
+
+ if lnode.name ~= "ignore" and lnode.name ~= "air" and lnode.name ~= "default:water" and lnode.name ~= "default:water_flowing" then return end
+ if lnode2.name == "ignore" or lnode2.name == "air" or lnode2.name == "default:water" or lnode2.name == "default:water_flowing" then return end
+
+ local oldpos = {x=lpos2.x+direction.x, y=lpos2.y+direction.y, z=lpos2.z+direction.z}
+ repeat
+ minetest.env:add_node(oldpos, {name=minetest.env:get_node(lpos2).name})
+ nodeupdate(oldpos)
+ oldpos = {x=lpos2.x, y=lpos2.y, z=lpos2.z}
+ lpos2.x = lpos2.x-direction.x
+ lpos2.y = lpos2.y-direction.y
+ lpos2.z = lpos2.z-direction.z
+ lnode = minetest.env:get_node(lpos2)
+ until lnode.name=="air" or lnode.name=="ignore" or lnode.name=="default:water" or lnode.name=="default:water_flowing"
+ minetest.env:remove_node(oldpos)
+end
+
mesecon:register_mvps_stopper("default:chest")
mesecon:register_mvps_stopper("default:chest_locked")
mesecon:register_mvps_stopper("default:furnace")