Make books writable
[oweals/minetest_game.git] / mods / default / functions.lua
index 6840c5d24219c865068d930a47dc2b1b3bb1b2c7..3525c1a8abdce3484d135a02bff3424d9bb36bde 100644 (file)
@@ -40,9 +40,9 @@ end
 function default.node_sound_sand_defaults(table)
        table = table or {}
        table.footstep = table.footstep or
-                       {name="default_sand_footstep", gain=0.5}
+                       {name="default_sand_footstep", gain=0.2}
        table.dug = table.dug or
-                       {name="default_sand_footstep", gain=1.0}
+                       {name="default_sand_footstep", gain=0.4}
        table.place = table.place or
                        {name="default_place_node", gain=1.0}
        default.node_sound_defaults(table)
@@ -64,7 +64,7 @@ function default.node_sound_leaves_defaults(table)
        table.footstep = table.footstep or
                        {name="default_grass_footstep", gain=0.35}
        table.dug = table.dug or
-                       {name="default_grass_footstep", gain=0.85}
+                       {name="default_grass_footstep", gain=0.7}
        table.dig = table.dig or
                        {name="default_dig_crumbly", gain=0.4}
        table.place = table.place or
@@ -83,99 +83,6 @@ function default.node_sound_glass_defaults(table)
        return table
 end
 
---
--- Legacy
---
-
-function default.spawn_falling_node(p, nodename)
-       spawn_falling_node(p, nodename)
-end
-
--- Horrible crap to support old code
--- Don't use this and never do what this does, it's completely wrong!
--- (More specifically, the client and the C++ code doesn't get the group)
-function default.register_falling_node(nodename, texture)
-       minetest.log("error", debug.traceback())
-       minetest.log('error', "WARNING: default.register_falling_node is deprecated")
-       if minetest.registered_nodes[nodename] then
-               minetest.registered_nodes[nodename].groups.falling_node = 1
-       end
-end
-
---
--- Global callbacks
---
-
--- Global environment step function
-function on_step(dtime)
-       -- print("on_step")
-end
-minetest.register_globalstep(on_step)
-
-function on_placenode(p, node)
-       --print("on_placenode")
-end
-minetest.register_on_placenode(on_placenode)
-
-function on_dignode(p, node)
-       --print("on_dignode")
-end
-minetest.register_on_dignode(on_dignode)
-
-function on_punchnode(p, node)
-end
-minetest.register_on_punchnode(on_punchnode)
-
-
---
--- Grow trees
---
-
-minetest.register_abm({
-       nodenames = {"default:sapling"},
-       interval = 10,
-       chance = 50,
-       action = function(pos, node)
-               local nu =  minetest.get_node({x=pos.x, y=pos.y-1, z=pos.z}).name
-               local is_soil = minetest.get_item_group(nu, "soil")
-               if is_soil == 0 then
-                       return
-               end
-               
-               minetest.log("action", "A sapling grows into a tree at "..minetest.pos_to_string(pos))
-               local vm = minetest.get_voxel_manip()
-               local minp, maxp = vm:read_from_map({x=pos.x-16, y=pos.y, z=pos.z-16}, {x=pos.x+16, y=pos.y+16, z=pos.z+16})
-               local a = VoxelArea:new{MinEdge=minp, MaxEdge=maxp}
-               local data = vm:get_data()
-               default.grow_tree(data, a, pos, math.random(1, 4) == 1, math.random(1,100000))
-               vm:set_data(data)
-               vm:write_to_map(data)
-               vm:update_map()
-       end
-})
-
-minetest.register_abm({
-       nodenames = {"default:junglesapling"},
-       interval = 10,
-       chance = 50,
-       action = function(pos, node)
-               local nu =  minetest.get_node({x=pos.x, y=pos.y-1, z=pos.z}).name
-               local is_soil = minetest.get_item_group(nu, "soil")
-               if is_soil == 0 then
-                       return
-               end
-               
-               minetest.log("action", "A jungle sapling grows into a tree at "..minetest.pos_to_string(pos))
-               local vm = minetest.get_voxel_manip()
-               local minp, maxp = vm:read_from_map({x=pos.x-16, y=pos.y-1, z=pos.z-16}, {x=pos.x+16, y=pos.y+16, z=pos.z+16})
-               local a = VoxelArea:new{MinEdge=minp, MaxEdge=maxp}
-               local data = vm:get_data()
-               default.grow_jungletree(data, a, pos, math.random(1,100000))
-               vm:set_data(data)
-               vm:write_to_map(data)
-               vm:update_map()
-       end
-})
 
 --
 -- Lavacooling
@@ -196,8 +103,8 @@ minetest.register_abm({
        neighbors = {"group:water"},
        interval = 1,
        chance = 1,
-       action = function(pos, node, active_object_count, active_object_count_wider)
-               default.cool_lava_flowing(pos, node, active_object_count, active_object_count_wider)
+       action = function(...)
+               default.cool_lava_flowing(...)
        end,
 })
 
@@ -206,37 +113,73 @@ minetest.register_abm({
        neighbors = {"group:water"},
        interval = 1,
        chance = 1,
-       action = function(pos, node, active_object_count, active_object_count_wider)
-               default.cool_lava_source(pos, node, active_object_count, active_object_count_wider)
+       action = function(...)
+               default.cool_lava_source(...)
        end,
 })
 
+
 --
 -- Papyrus and cactus growing
 --
 
+function default.grow_cactus(pos, node)
+       if node.param2 >= 4 then
+               return
+       end
+       pos.y = pos.y-1
+       if minetest.get_item_group(minetest.get_node(pos).name, "sand") == 0 then
+               return
+       end
+       pos.y = pos.y+1
+       local height = 0
+       while node.name == "default:cactus" and height < 4 and node.param2 == 0 do
+               height = height+1
+               pos.y = pos.y+1
+               node = minetest.get_node(pos)
+       end
+       if height == 4
+       or node.name ~= "air" then
+               return
+       end
+       minetest.set_node(pos, {name="default:cactus"})
+       return true
+end
+
+function default.grow_papyrus(pos, node)
+       pos.y = pos.y-1
+       local name = minetest.get_node(pos).name
+       if name ~= "default:dirt_with_grass"
+       and name ~= "default:dirt" then
+               return
+       end
+       if not minetest.find_node_near(pos, 3, {"group:water"}) then
+               return
+       end
+       pos.y = pos.y+1
+       local height = 0
+       while node.name == "default:papyrus" and height < 4 do
+               height = height+1
+               pos.y = pos.y+1
+               node = minetest.get_node(pos)
+       end
+       if height == 4
+       or node.name ~= "air" then
+               return
+       end
+       minetest.set_node(pos, {name="default:papyrus"})
+       return true
+end
+
+-- wrapping the functions in abm action is necessary to make overriding them possible
 minetest.register_abm({
        nodenames = {"default:cactus"},
        neighbors = {"group:sand"},
        interval = 50,
        chance = 20,
-       action = function(pos, node)
-               pos.y = pos.y-1
-               local name = minetest.get_node(pos).name
-               if minetest.get_item_group(name, "sand") ~= 0 then
-                       pos.y = pos.y+1
-                       local height = 0
-                       while minetest.get_node(pos).name == "default:cactus" and height < 4 do
-                               height = height+1
-                               pos.y = pos.y+1
-                       end
-                       if height < 4 then
-                               if minetest.get_node(pos).name == "air" then
-                                       minetest.set_node(pos, {name="default:cactus"})
-                               end
-                       end
-               end
-       end,
+       action = function(...)
+               default.grow_cactus(...)
+       end
 })
 
 minetest.register_abm({
@@ -244,28 +187,12 @@ minetest.register_abm({
        neighbors = {"default:dirt", "default:dirt_with_grass"},
        interval = 50,
        chance = 20,
-       action = function(pos, node)
-               pos.y = pos.y-1
-               local name = minetest.get_node(pos).name
-               if name == "default:dirt" or name == "default:dirt_with_grass" then
-                       if minetest.find_node_near(pos, 3, {"group:water"}) == nil then
-                               return
-                       end
-                       pos.y = pos.y+1
-                       local height = 0
-                       while minetest.get_node(pos).name == "default:papyrus" and height < 4 do
-                               height = height+1
-                               pos.y = pos.y+1
-                       end
-                       if height < 4 then
-                               if minetest.get_node(pos).name == "air" then
-                                       minetest.set_node(pos, {name="default:papyrus"})
-                               end
-                       end
-               end
-       end,
+       action = function(...)
+               default.grow_papyrus(...)
+       end
 })
 
+
 --
 -- dig upwards
 --
@@ -279,20 +206,10 @@ function default.dig_up(pos, node, digger)
        end
 end
 
---
--- Leafdecay
---
 
--- To enable leaf decay for a node, add it to the "leafdecay" group.
 --
--- The rating of the group determines how far from a node in the group "tree"
--- the node can be without decaying.
---
--- If param2 of the node is ~= 0, the node will always be preserved. Thus, if
--- the player places a node of that kind, you will want to set param2=1 or so.
+-- Leafdecay
 --
--- If the node is in the leafdecay_drop group then the it will always be dropped
--- as an item
 
 default.leafdecay_trunk_cache = {}
 default.leafdecay_enable_cache = true
@@ -305,6 +222,12 @@ minetest.register_globalstep(function(dtime)
                        math.floor(dtime * finds_per_second)
 end)
 
+default.after_place_leaves = function(pos, placer, itemstack, pointed_thing)
+       local node = minetest.get_node(pos)
+       node.param2 = 1
+       minetest.set_node(pos, node)
+end
+
 minetest.register_abm({
        nodenames = {"group:leafdecay"},
        neighbors = {"air", "group:liquid"},
@@ -359,7 +282,7 @@ minetest.register_abm({
                end
                if not do_preserve then
                        -- Drop stuff other than the node itself
-                       itemstacks = minetest.get_node_drops(n0.name)
+                       local itemstacks = minetest.get_node_drops(n0.name)
                        for _, itemname in ipairs(itemstacks) do
                                if minetest.get_item_group(n0.name, "leafdecay_drop") ~= 0 or
                                                itemname ~= n0.name then
@@ -378,3 +301,42 @@ minetest.register_abm({
        end
 })
 
+--
+-- Grass growing
+--
+
+minetest.register_abm({
+       nodenames = {"default:dirt"},
+       interval = 2,
+       chance = 200,
+       action = function(pos, node)
+               local above = {x=pos.x, y=pos.y+1, z=pos.z}
+               local name = minetest.get_node(above).name
+               local nodedef = minetest.registered_nodes[name]
+               if nodedef and (nodedef.sunlight_propagates or nodedef.paramtype == "light")
+                               and nodedef.liquidtype == "none"
+                               and (minetest.get_node_light(above) or 0) >= 13 then
+                       if name == "default:snow" or name == "default:snowblock" then
+                               minetest.set_node(pos, {name = "default:dirt_with_snow"})
+                       else
+                               minetest.set_node(pos, {name = "default:dirt_with_grass"})
+                       end
+               end
+       end
+})
+
+minetest.register_abm({
+       nodenames = {"default:dirt_with_grass"},
+       interval = 2,
+       chance = 20,
+       action = function(pos, node)
+               local above = {x=pos.x, y=pos.y+1, z=pos.z}
+               local name = minetest.get_node(above).name
+               local nodedef = minetest.registered_nodes[name]
+               if name ~= "ignore" and nodedef
+                               and not ((nodedef.sunlight_propagates or nodedef.paramtype == "light")
+                               and nodedef.liquidtype == "none") then
+                       minetest.set_node(pos, {name = "default:dirt"})
+               end
+       end
+})