ShadowNinja
2013-10-30 be2f30a1a2f5b6c2aae7fd4cf8231aec2da0844d
commit | author | age
8e03d7 1 -- Configuration
R 2 local chainsaw_max_charge      = 30000 -- 30000 - Maximum charge of the saw
3 local chainsaw_charge_per_node = 12    -- 12    - Gives 2500 nodes on a single charge (about 50 complete normal trees)
4 local chainsaw_leaves          = true  -- true  - Cut down entire trees, leaves and all
5
be2f30 6 local S = technic.getter
S 7
ee0765 8 technic.register_power_tool("technic:chainsaw", chainsaw_max_charge)
82cba9 9
R 10 minetest.register_tool("technic:chainsaw", {
be2f30 11     description = S("Chainsaw"),
eac484 12     inventory_image = "technic_chainsaw.png",
S 13     stack_max = 1,
14     on_use = function(itemstack, user, pointed_thing)
15         if pointed_thing.type == "node" then
16             return itemstack
17         end
18         local meta = get_item_meta(itemstack:get_metadata())
19         if not meta or not meta.charge then
20             return
21         end
22         -- Send current charge to digging function so that the chainsaw will stop after digging a number of nodes.
2a54e0 23         if meta.charge < chainsaw_charge_per_node then
eac484 24             return
S 25         end
8e03d7 26
eac484 27         local pos = minetest.get_pointed_thing_position(pointed_thing, above)
4a35d5 28         meta.charge = chainsaw_dig_it(pos, user, meta.charge)
eac484 29         technic.set_RE_wear(itemstack, meta.charge, chainsaw_max_charge)
S 30         itemstack:set_metadata(set_item_meta(meta))
31         return itemstack
32     end,
82cba9 33 })
R 34
35 minetest.register_craft({
8e03d7 36         output = 'technic:chainsaw',
R 37         recipe = {
38                 {'technic:stainless_steel_ingot', 'technic:stainless_steel_ingot', 'technic:battery'},
19c9a0 39                 {'technic:stainless_steel_ingot', 'technic:motor',                 'technic:battery'},
S 40                 {'',                               '',                             'default:copper_ingot'},
8e03d7 41         }
82cba9 42 })
R 43
8e03d7 44 -- The default stuff
R 45 local timber_nodenames={["default:jungletree"] = true,
46                         ["default:papyrus"]    = true,
47                         ["default:cactus"]     = true,
48                         ["default:tree"]       = true,
49                         ["default:apple"]      = true
50 }
82cba9 51
8e03d7 52 if chainsaw_leaves == true then
R 53         timber_nodenames["default:leaves"] = true
54 end
82cba9 55
ee0765 56 -- technic_worldgen defines rubber trees if moretrees isn't installed
S 57 if minetest.get_modpath("technic_worldgen") or
58    minetest.get_modpath("moretrees") then
59     timber_nodenames["moretrees:rubber_tree_trunk_empty"] = true
60     timber_nodenames["moretrees:rubber_tree_trunk"]       = true
61     if chainsaw_leaves then
62                 timber_nodenames["moretrees:rubber_tree_leaves"] = true
63     end
64 end
65
8e03d7 66 -- Support moretrees if it is there
R 67 if( minetest.get_modpath("moretrees") ~= nil ) then
68         timber_nodenames["moretrees:apple_tree_trunk"]                 = true
69         timber_nodenames["moretrees:apple_tree_trunk_sideways"]        = true
70         timber_nodenames["moretrees:beech_trunk"]                      = true
71         timber_nodenames["moretrees:beech_trunk_sideways"]             = true
72         timber_nodenames["moretrees:birch_trunk"]                      = true
73         timber_nodenames["moretrees:birch_trunk_sideways"]             = true
74         timber_nodenames["moretrees:fir_trunk"]                        = true
75         timber_nodenames["moretrees:fir_trunk_sideways"]               = true
76         timber_nodenames["moretrees:oak_trunk"]                        = true
77         timber_nodenames["moretrees:oak_trunk_sideways"]               = true
78         timber_nodenames["moretrees:palm_trunk"]                       = true
79         timber_nodenames["moretrees:palm_trunk_sideways"]              = true
80         timber_nodenames["moretrees:pine_trunk"]                       = true
81         timber_nodenames["moretrees:pine_trunk_sideways"]              = true
82         timber_nodenames["moretrees:rubber_tree_trunk_sideways"]       = true
83         timber_nodenames["moretrees:rubber_tree_trunk_sideways_empty"] = true
84         timber_nodenames["moretrees:sequoia_trunk"]                    = true
85         timber_nodenames["moretrees:sequoia_trunk_sideways"]           = true
86         timber_nodenames["moretrees:spruce_trunk"]                     = true
87         timber_nodenames["moretrees:spruce_trunk_sideways"]            = true
88         timber_nodenames["moretrees:willow_trunk"]                     = true
89         timber_nodenames["moretrees:willow_trunk_sideways"]            = true
90         timber_nodenames["moretrees:jungletree_trunk"]                 = true
91         timber_nodenames["moretrees:jungletree_trunk_sideways"]        = true
82cba9 92
ee0765 93         if chainsaw_leaves then
8e03d7 94                 timber_nodenames["moretrees:apple_tree_leaves"]        = true
R 95                 timber_nodenames["moretrees:oak_leaves"]               = true
96                 timber_nodenames["moretrees:sequoia_leaves"]           = true
97                 timber_nodenames["moretrees:birch_leaves"]             = true
98                 timber_nodenames["moretrees:birch_leaves"]             = true
99                 timber_nodenames["moretrees:palm_leaves"]              = true
100                 timber_nodenames["moretrees:spruce_leaves"]            = true
101                 timber_nodenames["moretrees:spruce_leaves"]            = true
102                 timber_nodenames["moretrees:pine_leaves"]              = true
103                 timber_nodenames["moretrees:willow_leaves"]            = true
104                 timber_nodenames["moretrees:jungletree_leaves_green"]  = true
105                 timber_nodenames["moretrees:jungletree_leaves_yellow"] = true
106                 timber_nodenames["moretrees:jungletree_leaves_red"]    = true
107         end
108 end
82cba9 109
8e03d7 110 -- Support growing_trees if it is there
R 111 if( minetest.get_modpath("growing_trees") ~= nil ) then
112         timber_nodenames["growing_trees:trunk"]         = true
113         timber_nodenames["growing_trees:medium_trunk"]  = true
114         timber_nodenames["growing_trees:big_trunk"]     = true
115         timber_nodenames["growing_trees:trunk_top"]     = true
116         timber_nodenames["growing_trees:trunk_sprout"]  = true
117         timber_nodenames["growing_trees:branch_sprout"] = true
118         timber_nodenames["growing_trees:branch"]        = true
119         timber_nodenames["growing_trees:branch_xmzm"]   = true
120         timber_nodenames["growing_trees:branch_xpzm"]   = true
121         timber_nodenames["growing_trees:branch_xmzp"]   = true
122         timber_nodenames["growing_trees:branch_xpzp"]   = true
123         timber_nodenames["growing_trees:branch_zz"]     = true
124         timber_nodenames["growing_trees:branch_xx"]     = true
82cba9 125
8e03d7 126         if chainsaw_leaves == true then
R 127                 timber_nodenames["growing_trees:leaves"] = true
128         end
129 end
130
131 -- Support growing_cactus if it is there
132 if( minetest.get_modpath("growing_cactus") ~= nil ) then
133         timber_nodenames["growing_cactus:sprout"]                       = true
134         timber_nodenames["growing_cactus:branch_sprout_vertical"]       = true
135         timber_nodenames["growing_cactus:branch_sprout_vertical_fixed"] = true
136         timber_nodenames["growing_cactus:branch_sprout_xp"]             = true
137         timber_nodenames["growing_cactus:branch_sprout_xm"]             = true
138         timber_nodenames["growing_cactus:branch_sprout_zp"]             = true
139         timber_nodenames["growing_cactus:branch_sprout_zm"]             = true
140         timber_nodenames["growing_cactus:trunk"]                        = true
141         timber_nodenames["growing_cactus:branch_trunk"]                 = true
142         timber_nodenames["growing_cactus:branch"]                       = true
143         timber_nodenames["growing_cactus:branch_xp"]                    = true
144         timber_nodenames["growing_cactus:branch_xm"]                    = true
145         timber_nodenames["growing_cactus:branch_zp"]                    = true
146         timber_nodenames["growing_cactus:branch_zm"]                    = true
147         timber_nodenames["growing_cactus:branch_zz"]                    = true
148         timber_nodenames["growing_cactus:branch_xx"]                    = true
149 end
150
151 -- Support farming_plus if it is there
152 if( minetest.get_modpath("farming_plus") ~= nil ) then
153    if chainsaw_leaves == true then
154       timber_nodenames["farming_plus:cocoa_leaves"] = true
155    end
156 end
157
158 -- Table for saving what was sawed down
159 local produced
160
161 -- Saw down trees entry point
162 chainsaw_dig_it = function(pos, player,current_charge)
163         local remaining_charge=current_charge
164
165         -- Save the currently installed dropping mechanism so we can restore it.
166     local original_handle_node_drops = minetest.handle_node_drops
167
168         -- A bit of trickery here: use a different node drop callback
169         -- and restore the original afterwards.
170         minetest.handle_node_drops = chainsaw_handle_node_drops
171
172         -- clear result and start sawing things down
173         produced = {}
174         remaining_charge = recursive_dig(pos, remaining_charge, player)
175         minetest.sound_play("chainsaw", {pos = pos, gain = 1.0, max_hear_distance = 10,})
176
177         -- Restore the original noder drop handler
178         minetest.handle_node_drops = original_handle_node_drops
179
180         -- Now drop items for the player
181         local number, produced_item, p
182         for produced_item,number in pairs(produced) do
183                 --print("ADDING ITEM: " .. produced_item .. " " .. number)
184                 -- Drop stacks of 99 or less
185                 p = {
186                         x = pos.x + math.random()*4,
187                         y = pos.y,
188                         z = pos.z + math.random()*4
189                 }
190                 while number > 99 do
191                         minetest.env:add_item(p, produced_item .. " 99")
192                         p = {
193                                 x = pos.x + math.random()*4,
194                                 y = pos.y,
195                                 z = pos.z + math.random()*4
196                         }
197                         number = number - 99
198                 end
199                 minetest.env:add_item(p, produced_item .. " " .. number)
200         end
201         return remaining_charge
202 end
203
204 -- Override the default handling routine to be able to count up the
205 -- items sawed down so that we can drop them i an nice single stack
206 chainsaw_handle_node_drops = function(pos, drops, digger)
207         -- Add dropped items to list of collected nodes
208         local _, dropped_item
209         for _, dropped_item in ipairs(drops) do
210                 if produced[dropped_item] == nil then
211                         produced[dropped_item] = 1
212                 else
213                         produced[dropped_item] = produced[dropped_item] + 1
214                 end
215         end
216 end
217
218 -- This function does all the hard work. Recursively we dig the node at hand
219 -- if it is in the table and then search the surroundings for more stuff to dig.
220 recursive_dig = function(pos, remaining_charge, player)
221         local node=minetest.env:get_node(pos)
222         local i=1
223         -- Lookup node name in timber table:
224         if timber_nodenames[node.name] ~= nil then
225                 -- Return if we are out of power
226                 if remaining_charge < chainsaw_charge_per_node then
227                         return 0
228                 end
229                 local np
230                 -- wood found - cut it.
231                 minetest.env:dig_node(pos)
232
233                 remaining_charge=remaining_charge-chainsaw_charge_per_node
234                 -- check surroundings and run recursively if any charge left
235                 np={x=pos.x+1, y=pos.y, z=pos.z}
236                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
237                         remaining_charge = recursive_dig(np, remaining_charge)
238                 end
239                 np={x=pos.x+1, y=pos.y, z=pos.z+1}
240                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
241                         remaining_charge = recursive_dig(np, remaining_charge)
242                 end
243                 np={x=pos.x+1, y=pos.y, z=pos.z-1}
244                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
245                         remaining_charge = recursive_dig(np, remaining_charge)
246                 end
247
248                 np={x=pos.x-1, y=pos.y, z=pos.z}
249                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
250                         remaining_charge = recursive_dig(np, remaining_charge)
251                 end
252                 np={x=pos.x-1, y=pos.y, z=pos.z+1}
253                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
254                         remaining_charge = recursive_dig(np, remaining_charge)
255                 end
256                 np={x=pos.x-1, y=pos.y, z=pos.z-1}
257                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
258                         remaining_charge = recursive_dig(np, remaining_charge)
259                 end
260
261                 np={x=pos.x, y=pos.y+1, z=pos.z}
262                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
263                         remaining_charge = recursive_dig(np, remaining_charge)
264                 end
265
266                 np={x=pos.x, y=pos.y, z=pos.z+1}
267                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
268                         remaining_charge = recursive_dig(np, remaining_charge)
269                 end
270                 np={x=pos.x, y=pos.y, z=pos.z-1}
271                 if timber_nodenames[minetest.env:get_node(np).name] ~= nil then
272                         remaining_charge = recursive_dig(np, remaining_charge)
273                 end
274                 return remaining_charge
275         end
276         -- Nothing sawed down
277         return remaining_charge
e23f87 278 end
19c9a0 279