Zefram
2014-07-07 5e4a87b92599aa0fc9a56081209c930d08a2c3bd
commit | author | age
8e03d7 1 -- Configuration
R 2
9019eb 3 local chainsaw_max_charge      = 30000 -- Maximum charge of the saw
S 4 -- Gives 2500 nodes on a single charge (about 50 complete normal trees)
5 local chainsaw_charge_per_node = 12
6 -- Cut down tree leaves.  Leaf decay may cause slowness on large trees
7 -- if this is disabled.
8 local chainsaw_leaves = true
9
10 -- The default trees
11 local timber_nodenames = {
12     ["default:jungletree"] = true,
13     ["default:papyrus"]    = true,
14     ["default:cactus"]     = true,
15     ["default:tree"]       = true,
16     ["default:apple"]      = true,
8e03d7 17 }
82cba9 18
9019eb 19 if chainsaw_leaves then
918166 20     timber_nodenames["default:leaves"] = true
N 21     timber_nodenames["default:jungleleaves"] = true
8e03d7 22 end
82cba9 23
ee0765 24 -- technic_worldgen defines rubber trees if moretrees isn't installed
S 25 if minetest.get_modpath("technic_worldgen") or
9019eb 26         minetest.get_modpath("moretrees") then
ee0765 27     timber_nodenames["moretrees:rubber_tree_trunk_empty"] = true
S 28     timber_nodenames["moretrees:rubber_tree_trunk"]       = true
29     if chainsaw_leaves then
c63658 30         timber_nodenames["moretrees:rubber_tree_leaves"] = true
ee0765 31     end
S 32 end
33
8e03d7 34 -- Support moretrees if it is there
9019eb 35 if minetest.get_modpath("moretrees") then
c63658 36     timber_nodenames["moretrees:apple_tree_trunk"]                 = true
P 37     timber_nodenames["moretrees:apple_tree_trunk_sideways"]        = true
38     timber_nodenames["moretrees:beech_trunk"]                      = true
39     timber_nodenames["moretrees:beech_trunk_sideways"]             = true
40     timber_nodenames["moretrees:birch_trunk"]                      = true
41     timber_nodenames["moretrees:birch_trunk_sideways"]             = true
42     timber_nodenames["moretrees:fir_trunk"]                        = true
43     timber_nodenames["moretrees:fir_trunk_sideways"]               = true
44     timber_nodenames["moretrees:oak_trunk"]                        = true
45     timber_nodenames["moretrees:oak_trunk_sideways"]               = true
46     timber_nodenames["moretrees:palm_trunk"]                       = true
47     timber_nodenames["moretrees:palm_trunk_sideways"]              = true
48     timber_nodenames["moretrees:pine_trunk"]                       = true
49     timber_nodenames["moretrees:pine_trunk_sideways"]              = true
50     timber_nodenames["moretrees:rubber_tree_trunk_sideways"]       = true
51     timber_nodenames["moretrees:rubber_tree_trunk_sideways_empty"] = true
52     timber_nodenames["moretrees:sequoia_trunk"]                    = true
53     timber_nodenames["moretrees:sequoia_trunk_sideways"]           = true
54     timber_nodenames["moretrees:spruce_trunk"]                     = true
55     timber_nodenames["moretrees:spruce_trunk_sideways"]            = true
56     timber_nodenames["moretrees:willow_trunk"]                     = true
57     timber_nodenames["moretrees:willow_trunk_sideways"]            = true
58     timber_nodenames["moretrees:jungletree_trunk"]                 = true
59     timber_nodenames["moretrees:jungletree_trunk_sideways"]        = true
82cba9 60
c63658 61     if chainsaw_leaves then
P 62         timber_nodenames["moretrees:apple_tree_leaves"]        = true
63         timber_nodenames["moretrees:oak_leaves"]               = true
64         timber_nodenames["moretrees:fir_leaves"]               = true
65         timber_nodenames["moretrees:fir_leaves_bright"]        = true
66         timber_nodenames["moretrees:sequoia_leaves"]           = true
67         timber_nodenames["moretrees:birch_leaves"]             = true
68         timber_nodenames["moretrees:birch_leaves"]             = true
69         timber_nodenames["moretrees:palm_leaves"]              = true
70         timber_nodenames["moretrees:spruce_leaves"]            = true
71         timber_nodenames["moretrees:spruce_leaves"]            = true
72         timber_nodenames["moretrees:pine_leaves"]              = true
73         timber_nodenames["moretrees:willow_leaves"]            = true
74         timber_nodenames["moretrees:jungletree_leaves_green"]  = true
75         timber_nodenames["moretrees:jungletree_leaves_yellow"] = true
76         timber_nodenames["moretrees:jungletree_leaves_red"]    = true
77     end
8e03d7 78 end
82cba9 79
9019eb 80 -- Support growing_trees
S 81 if minetest.get_modpath("growing_trees") then
c63658 82     timber_nodenames["growing_trees:trunk"]         = true
P 83     timber_nodenames["growing_trees:medium_trunk"]  = true
84     timber_nodenames["growing_trees:big_trunk"]     = true
85     timber_nodenames["growing_trees:trunk_top"]     = true
86     timber_nodenames["growing_trees:trunk_sprout"]  = true
87     timber_nodenames["growing_trees:branch_sprout"] = true
88     timber_nodenames["growing_trees:branch"]        = true
89     timber_nodenames["growing_trees:branch_xmzm"]   = true
90     timber_nodenames["growing_trees:branch_xpzm"]   = true
91     timber_nodenames["growing_trees:branch_xmzp"]   = true
92     timber_nodenames["growing_trees:branch_xpzp"]   = true
93     timber_nodenames["growing_trees:branch_zz"]     = true
94     timber_nodenames["growing_trees:branch_xx"]     = true
82cba9 95
9019eb 96     if chainsaw_leaves then
c63658 97         timber_nodenames["growing_trees:leaves"] = true
P 98     end
8e03d7 99 end
R 100
9019eb 101 -- Support growing_cactus
S 102 if minetest.get_modpath("growing_cactus") then
c63658 103     timber_nodenames["growing_cactus:sprout"]                       = true
P 104     timber_nodenames["growing_cactus:branch_sprout_vertical"]       = true
105     timber_nodenames["growing_cactus:branch_sprout_vertical_fixed"] = true
106     timber_nodenames["growing_cactus:branch_sprout_xp"]             = true
107     timber_nodenames["growing_cactus:branch_sprout_xm"]             = true
108     timber_nodenames["growing_cactus:branch_sprout_zp"]             = true
109     timber_nodenames["growing_cactus:branch_sprout_zm"]             = true
110     timber_nodenames["growing_cactus:trunk"]                        = true
111     timber_nodenames["growing_cactus:branch_trunk"]                 = true
112     timber_nodenames["growing_cactus:branch"]                       = true
113     timber_nodenames["growing_cactus:branch_xp"]                    = true
114     timber_nodenames["growing_cactus:branch_xm"]                    = true
115     timber_nodenames["growing_cactus:branch_zp"]                    = true
116     timber_nodenames["growing_cactus:branch_zm"]                    = true
117     timber_nodenames["growing_cactus:branch_zz"]                    = true
118     timber_nodenames["growing_cactus:branch_xx"]                    = true
8e03d7 119 end
R 120
9019eb 121 -- Support farming_plus
S 122 if minetest.get_modpath("farming_plus") then
123     if chainsaw_leaves then
c63658 124         timber_nodenames["farming_plus:cocoa_leaves"] = true
P 125     end
8e03d7 126 end
R 127
5cf765 128
S 129 local S = technic.getter
130
131 technic.register_power_tool("technic:chainsaw", chainsaw_max_charge)
132
8e03d7 133 -- Table for saving what was sawed down
9019eb 134 local produced = {}
8e03d7 135
9019eb 136 -- Save the items sawed down so that we can drop them in a nice single stack
S 137 local function handle_drops(drops)
138     for _, item in ipairs(drops) do
139         local stack = ItemStack(item)
140         local name = stack:get_name()
141         local p = produced[name]
142         if not p then
143             produced[name] = stack
c63658 144         else
9019eb 145             p:set_count(p:get_count() + stack:get_count())
c63658 146         end
9019eb 147     end
S 148 end
149
150 --- Iterator over positions to try to saw around a sawed node.
151 -- This returns nodes in a 3x2x3 area. It does not return lower (y) positions
152 -- to prevent the chainsaw from cutting down nodes below the cutting position.
153 -- @param pos Reference to sawing position.  Note that this is overridden.
154 local function iterSawTries(pos)
155     -- Shift the position down on the x and z axes
156     pos.x, pos.z = pos.x - 1, pos.z - 1
157     -- Save our starting position for reseting it later
158     local startx, startz = pos.x, pos.z
159     -- We will move out by one in every direction except -y
160     local endx, endy, endz = pos.x + 2, pos.y + 1, pos.z + 2
161     -- Adjust for initial increment
162     pos.x = pos.x - 1
163
164     return function()
165         if pos.x < endx then
166             pos.x = pos.x + 1
167         else
168             pos.x = startx
169             if pos.z < endz then
170                 pos.z = pos.z + 1
171             else
172                 pos.z = startz
173                 if pos.y < endy then
174                     pos.y = pos.y + 1
175                 else
176                     return nil
177                 end
178             end
179         end
180         return pos
c63658 181     end
8e03d7 182 end
R 183
184 -- This function does all the hard work. Recursively we dig the node at hand
185 -- if it is in the table and then search the surroundings for more stuff to dig.
9019eb 186 local function recursive_dig(pos, remaining_charge)
S 187     if remaining_charge < chainsaw_charge_per_node then
c63658 188         return remaining_charge
P 189     end
9019eb 190     local node = minetest.get_node(pos)
S 191
192     if not timber_nodenames[node.name] then
193         return remaining_charge
194     end
195
196     -- wood found - cut it
197     handle_drops(minetest.get_node_drops(node.name, ""))
198     minetest.remove_node(pos)
199     remaining_charge = remaining_charge - chainsaw_charge_per_node
200
201     -- Check surroundings and run recursively if any charge left
202     for pos in iterSawTries(pos) do
203         if remaining_charge < chainsaw_charge_per_node then
204             break
205         end
206         if timber_nodenames[minetest.get_node(pos).name] then
207             remaining_charge = recursive_dig(pos, remaining_charge)
208         end
209     end
c63658 210     return remaining_charge
P 211 end
212
213 -- Function to randomize positions for new node drops
214 local function get_drop_pos(pos)
215     local drop_pos = {}
216
217     for i = 0, 8 do
218         -- Randomize position for a new drop
219         drop_pos.x = pos.x + math.random(-3, 3)
220         drop_pos.y = pos.y - 1
221         drop_pos.z = pos.z + math.random(-3, 3)
222
223         -- Move the randomized position upwards until
224         -- the node is air or unloaded.
225         for y = drop_pos.y, drop_pos.y + 5 do
226             drop_pos.y = y
227             local node = minetest.get_node_or_nil(drop_pos)
228
229             if not node then
230                 -- If the node is not loaded yet simply drop
231                 -- the item at the original digging position.
232                 return pos
233             elseif node.name == "air" then
9019eb 234                 -- Add variation to the entity drop position,
S 235                 -- but don't let drops get too close to the edge
236                 drop_pos.x = drop_pos.x + (math.random() * 0.8) - 0.5
237                 drop_pos.z = drop_pos.z + (math.random() * 0.8) - 0.5
c63658 238                 return drop_pos
P 239             end
240         end
241     end
242
243     -- Return the original position if this takes too long
244     return pos
e23f87 245 end
19c9a0 246
9019eb 247 -- Chainsaw entry point
S 248 local function chainsaw_dig(pos, current_charge)
249     -- Start sawing things down
250     local remaining_charge = recursive_dig(pos, current_charge)
251     minetest.sound_play("chainsaw", {pos = pos, gain = 1.0,
252             max_hear_distance = 10})
5cf765 253
9019eb 254     -- Now drop items for the player
S 255     for name, stack in pairs(produced) do
256         -- Drop stacks of stack max or less
257         local count, max = stack:get_count(), stack:get_stack_max()
258         stack:set_count(max)
259         while count > max do
260             minetest.add_item(get_drop_pos(pos), stack)
261             count = count - max
c63658 262         end
9019eb 263         stack:set_count(count)
S 264         minetest.add_item(get_drop_pos(pos), stack)
265     end
266
267     -- Clean up
268     produced = {}
269
270     return remaining_charge
5cf765 271 end
S 272
273
274 minetest.register_tool("technic:chainsaw", {
275     description = S("Chainsaw"),
276     inventory_image = "technic_chainsaw.png",
277     stack_max = 1,
99fd5d 278     wear_represents = "technic_RE_charge",
00d7c9 279     on_refill = technic.refill_RE_charge,
5cf765 280     on_use = function(itemstack, user, pointed_thing)
S 281         if pointed_thing.type ~= "node" then
282             return itemstack
283         end
9019eb 284
5cf765 285         local meta = minetest.deserialize(itemstack:get_metadata())
9019eb 286         if not meta or not meta.charge or
S 287                 meta.charge < chainsaw_charge_per_node then
5cf765 288             return
S 289         end
290
9019eb 291         local name = user:get_player_name()
51c02e 292         if minetest.is_protected(pointed_thing.under, name) then
S 293             minetest.record_protection_violation(pointed_thing.under, name)
294             return
9019eb 295         end
S 296
297         -- Send current charge to digging function so that the
298         -- chainsaw will stop after digging a number of nodes
299         meta.charge = chainsaw_dig(pointed_thing.under, meta.charge)
300
5cf765 301         technic.set_RE_wear(itemstack, meta.charge, chainsaw_max_charge)
S 302         itemstack:set_metadata(minetest.serialize(meta))
303         return itemstack
304     end,
305 })
306
307 minetest.register_craft({
9019eb 308     output = "technic:chainsaw",
c63658 309     recipe = {
5e4a87 310         {"technic:stainless_steel_ingot", "mesecons_button:button_off", "technic:battery"},
Z 311         {"technic:fine_copper_wire",      "technic:motor",              "technic:battery"},
312         {"",                              "",                           "technic:stainless_steel_ingot"},
c63658 313     }
5cf765 314 })
9019eb 315