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