Add screwdriver callbacks, and code them for doors and beds
[oweals/minetest_game.git] / mods / doors / init.lua
1 doors = {}
2
3 -- Registers a door
4 function doors.register_door(name, def)
5         def.groups.not_in_creative_inventory = 1
6
7         local box = {{-0.5, -0.5, -0.5, 0.5, 0.5, -0.5+1.5/16}}
8
9         if not def.node_box_bottom then
10                 def.node_box_bottom = box
11         end
12         if not def.node_box_top then
13                 def.node_box_top = box
14         end
15         if not def.selection_box_bottom then
16                 def.selection_box_bottom= box
17         end
18         if not def.selection_box_top then
19                 def.selection_box_top = box
20         end
21
22         if not def.sound_close_door then
23                 def.sound_close_door = "doors_door_close"
24         end
25         if not def.sound_open_door then
26                 def.sound_open_door = "doors_door_open"
27         end
28         
29         
30         minetest.register_craftitem(name, {
31                 description = def.description,
32                 inventory_image = def.inventory_image,
33
34                 on_place = function(itemstack, placer, pointed_thing)
35                         if not pointed_thing.type == "node" then
36                                 return itemstack
37                         end
38
39                         local ptu = pointed_thing.under
40                         local nu = minetest.get_node(ptu)
41                         if minetest.registered_nodes[nu.name].on_rightclick then
42                                 return minetest.registered_nodes[nu.name].on_rightclick(ptu, nu, placer, itemstack)
43                         end
44
45                         local pt = pointed_thing.above
46                         local pt2 = {x=pt.x, y=pt.y, z=pt.z}
47                         pt2.y = pt2.y+1
48                         if
49                                 not minetest.registered_nodes[minetest.get_node(pt).name].buildable_to or
50                                 not minetest.registered_nodes[minetest.get_node(pt2).name].buildable_to or
51                                 not placer or
52                                 not placer:is_player()
53                         then
54                                 return itemstack
55                         end
56
57                         if minetest.is_protected(pt, placer:get_player_name()) or
58                                         minetest.is_protected(pt2, placer:get_player_name()) then
59                                 minetest.record_protection_violation(pt, placer:get_player_name())
60                                 return itemstack
61                         end
62
63                         local p2 = minetest.dir_to_facedir(placer:get_look_dir())
64                         local pt3 = {x=pt.x, y=pt.y, z=pt.z}
65                         if p2 == 0 then
66                                 pt3.x = pt3.x-1
67                         elseif p2 == 1 then
68                                 pt3.z = pt3.z+1
69                         elseif p2 == 2 then
70                                 pt3.x = pt3.x+1
71                         elseif p2 == 3 then
72                                 pt3.z = pt3.z-1
73                         end
74                         if minetest.get_item_group(minetest.get_node(pt3).name, "door") == 0 then
75                                 minetest.set_node(pt, {name=name.."_b_1", param2=p2})
76                                 minetest.set_node(pt2, {name=name.."_t_1", param2=p2})
77                         else
78                                 minetest.set_node(pt, {name=name.."_b_2", param2=p2})
79                                 minetest.set_node(pt2, {name=name.."_t_2", param2=p2})
80                                 minetest.get_meta(pt):set_int("right", 1)
81                                 minetest.get_meta(pt2):set_int("right", 1)
82                         end
83
84                         if def.only_placer_can_open then
85                                 local pn = placer:get_player_name()
86                                 local meta = minetest.get_meta(pt)
87                                 meta:set_string("doors_owner", pn)
88                                 meta:set_string("infotext", "Owned by "..pn)
89                                 meta = minetest.get_meta(pt2)
90                                 meta:set_string("doors_owner", pn)
91                                 meta:set_string("infotext", "Owned by "..pn)
92                         end
93
94                         if not minetest.setting_getbool("creative_mode") then
95                                 itemstack:take_item()
96                         end
97                         return itemstack
98                 end,
99         })
100
101         local tt = def.tiles_top
102         local tb = def.tiles_bottom
103         
104         local function after_dig_node(pos, name, digger)
105                 local node = minetest.get_node(pos)
106                 if node.name == name then
107                         minetest.node_dig(pos, node, digger)
108                 end
109         end
110
111         local function check_and_blast(pos, name)
112                 local node = minetest.get_node(pos)
113                 if node.name == name then
114                         minetest.remove_node(pos)
115                 end
116         end
117
118         local function make_on_blast(base_name, dir, door_type, other_door_type)
119                 if def.only_placer_can_open then
120                         return function() end
121                 else
122                         return function(pos, intensity)
123                                 check_and_blast(pos, base_name .. door_type)
124                                 pos.y = pos.y + dir
125                                 check_and_blast(pos, base_name .. other_door_type)
126                         end
127                 end
128         end
129
130         local function on_rightclick(pos, dir, check_name, replace, replace_dir, params)
131                 pos.y = pos.y+dir
132                 if not minetest.get_node(pos).name == check_name then
133                         return
134                 end
135                 local p2 = minetest.get_node(pos).param2
136                 p2 = params[p2+1]
137                 
138                 minetest.swap_node(pos, {name=replace_dir, param2=p2})
139                 
140                 pos.y = pos.y-dir
141                 minetest.swap_node(pos, {name=replace, param2=p2})
142
143                 local snd_1 = def.sound_close_door
144                 local snd_2 = def.sound_open_door 
145                 if params[1] == 3 then
146                         snd_1 = def.sound_open_door 
147                         snd_2 = def.sound_close_door
148                 end
149
150                 if minetest.get_meta(pos):get_int("right") ~= 0 then
151                         minetest.sound_play(snd_1, {pos = pos, gain = 0.3, max_hear_distance = 10})
152                 else
153                         minetest.sound_play(snd_2, {pos = pos, gain = 0.3, max_hear_distance = 10})
154                 end
155         end
156
157         local function check_player_priv(pos, player)
158                 if not def.only_placer_can_open then
159                         return true
160                 end
161                 local meta = minetest.get_meta(pos)
162                 local pn = player:get_player_name()
163                 return meta:get_string("doors_owner") == pn
164         end
165
166         local function on_rotate(pos, node, dir, user, check_name, mode, new_param2)
167                 if not check_player_priv(pos, user) then
168                         return false
169                 end
170                 if mode ~= screwdriver.ROTATE_FACE then
171                         return false
172                 end
173
174                 pos.y = pos.y + dir
175                 if not minetest.get_node(pos).name == check_name then
176                         return false
177                 end
178                 if minetest.is_protected(pos, user:get_player_name()) then
179                         minetest.record_protection_violation(pos, user:get_player_name())
180                         return false
181                 end
182
183                 local node2 = minetest.get_node(pos)
184                 node2.param2 = (node2.param2 + 1) % 4
185                 minetest.swap_node(pos, node2)
186
187                 pos.y = pos.y - dir
188                 node.param2 = (node.param2 + 1) % 4
189                 minetest.swap_node(pos, node)
190                 return true
191         end
192
193         minetest.register_node(name.."_b_1", {
194                 tiles = {tb[2], tb[2], tb[2], tb[2], tb[1], tb[1].."^[transformfx"},
195                 paramtype = "light",
196                 paramtype2 = "facedir",
197                 drop = name,
198                 drawtype = "nodebox",
199                 node_box = {
200                         type = "fixed",
201                         fixed = def.node_box_bottom
202                 },
203                 selection_box = {
204                         type = "fixed",
205                         fixed = def.selection_box_bottom
206                 },
207                 groups = def.groups,
208                 
209                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
210                         pos.y = pos.y+1
211                         after_dig_node(pos, name.."_t_1", digger)
212                 end,
213                 
214                 on_rightclick = function(pos, node, clicker)
215                         if check_player_priv(pos, clicker) then
216                                 on_rightclick(pos, 1, name.."_t_1", name.."_b_2", name.."_t_2", {1,2,3,0})
217                         end
218                 end,
219                 
220                 on_rotate = function(pos, node, user, mode, new_param2)
221                         return on_rotate(pos, node, 1, user, name.."_t_1", mode)
222                 end,
223
224                 can_dig = check_player_priv,
225                 sounds = def.sounds,
226                 sunlight_propagates = def.sunlight,
227                 on_blast = make_on_blast(name, 1, "_b_1", "_t_1")
228         })
229
230         minetest.register_node(name.."_t_1", {
231                 tiles = {tt[2], tt[2], tt[2], tt[2], tt[1], tt[1].."^[transformfx"},
232                 paramtype = "light",
233                 paramtype2 = "facedir",
234                 drop = "",
235                 drawtype = "nodebox",
236                 node_box = {
237                         type = "fixed",
238                         fixed = def.node_box_top
239                 },
240                 selection_box = {
241                         type = "fixed",
242                         fixed = def.selection_box_top
243                 },
244                 groups = def.groups,
245                 
246                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
247                         pos.y = pos.y-1
248                         after_dig_node(pos, name.."_b_1", digger)
249                 end,
250                 
251                 on_rightclick = function(pos, node, clicker)
252                         if check_player_priv(pos, clicker) then
253                                 on_rightclick(pos, -1, name.."_b_1", name.."_t_2", name.."_b_2", {1,2,3,0})
254                         end
255                 end,
256                 
257                 on_rotate = function(pos, node, user, mode, new_param2)
258                         return on_rotate(pos, node, -1, user, name.."_b_1", mode)
259                 end,
260
261                 can_dig = check_player_priv,
262                 sounds = def.sounds,
263                 sunlight_propagates = def.sunlight,
264                 on_blast = make_on_blast(name, -1, "_t_1", "_b_1")
265         })
266
267         minetest.register_node(name.."_b_2", {
268                 tiles = {tb[2], tb[2], tb[2], tb[2], tb[1].."^[transformfx", tb[1]},
269                 paramtype = "light",
270                 paramtype2 = "facedir",
271                 drop = name,
272                 drawtype = "nodebox",
273                 node_box = {
274                         type = "fixed",
275                         fixed = def.node_box_bottom
276                 },
277                 selection_box = {
278                         type = "fixed",
279                         fixed = def.selection_box_bottom
280                 },
281                 groups = def.groups,
282                 
283                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
284                         pos.y = pos.y+1
285                         after_dig_node(pos, name.."_t_2", digger)
286                 end,
287                 
288                 on_rightclick = function(pos, node, clicker)
289                         if check_player_priv(pos, clicker) then
290                                 on_rightclick(pos, 1, name.."_t_2", name.."_b_1", name.."_t_1", {3,0,1,2})
291                         end
292                 end,
293                 
294                 on_rotate = function(pos, node, user, mode, new_param2)
295                         return on_rotate(pos, node, 1, user, name.."_t_2", mode)
296                 end,
297
298                 can_dig = check_player_priv,
299                 sounds = def.sounds,
300                 sunlight_propagates = def.sunlight,
301                 on_blast = make_on_blast(name, 1, "_b_2", "_t_2")
302         })
303
304         minetest.register_node(name.."_t_2", {
305                 tiles = {tt[2], tt[2], tt[2], tt[2], tt[1].."^[transformfx", tt[1]},
306                 paramtype = "light",
307                 paramtype2 = "facedir",
308                 drop = "",
309                 drawtype = "nodebox",
310                 node_box = {
311                         type = "fixed",
312                         fixed = def.node_box_top
313                 },
314                 selection_box = {
315                         type = "fixed",
316                         fixed = def.selection_box_top
317                 },
318                 groups = def.groups,
319                 
320                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
321                         pos.y = pos.y-1
322                         after_dig_node(pos, name.."_b_2", digger)
323                 end,
324                 
325                 on_rightclick = function(pos, node, clicker)
326                         if check_player_priv(pos, clicker) then
327                                 on_rightclick(pos, -1, name.."_b_2", name.."_t_1", name.."_b_1", {3,0,1,2})
328                         end
329                 end,
330                 
331                 on_rotate = function(pos, node, user, mode, new_param2)
332                         return on_rotate(pos, node, -1, user, name.."_b_2", mode)
333                 end,
334
335                 can_dig = check_player_priv,
336                 sounds = def.sounds,
337                 sunlight_propagates = def.sunlight,
338                 on_blast = make_on_blast(name, -1, "_t_2", "_b_2")
339         })
340
341 end
342
343 doors.register_door("doors:door_wood", {
344         description = "Wooden Door",
345         inventory_image = "doors_wood.png",
346         groups = {snappy=1,choppy=2,oddly_breakable_by_hand=2,flammable=2,door=1},
347         tiles_bottom = {"doors_wood_b.png", "doors_brown.png"},
348         tiles_top = {"doors_wood_a.png", "doors_brown.png"},
349         sounds = default.node_sound_wood_defaults(),
350         sunlight = false,
351 })
352
353 minetest.register_craft({
354         output = "doors:door_wood",
355         recipe = {
356                 {"group:wood", "group:wood"},
357                 {"group:wood", "group:wood"},
358                 {"group:wood", "group:wood"}
359         }
360 })
361
362 doors.register_door("doors:door_steel", {
363         description = "Steel Door",
364         inventory_image = "doors_steel.png",
365         groups = {snappy=1,bendy=2,cracky=1,melty=2,level=2,door=1},
366         tiles_bottom = {"doors_steel_b.png", "doors_grey.png"},
367         tiles_top = {"doors_steel_a.png", "doors_grey.png"},
368         only_placer_can_open = true,
369         sounds = default.node_sound_wood_defaults(),
370         sunlight = false,
371 })
372
373 minetest.register_craft({
374         output = "doors:door_steel",
375         recipe = {
376                 {"default:steel_ingot", "default:steel_ingot"},
377                 {"default:steel_ingot", "default:steel_ingot"},
378                 {"default:steel_ingot", "default:steel_ingot"}
379         }
380 })
381
382 doors.register_door("doors:door_glass", {
383         description = "Glass Door",
384         inventory_image = "doors_glass.png",
385         groups = {snappy=1,cracky=1,oddly_breakable_by_hand=3,door=1},
386         tiles_bottom = {"doors_glass_b.png", "doors_glass_side.png"},
387         tiles_top = {"doors_glass_a.png", "doors_glass_side.png"},
388         sounds = default.node_sound_glass_defaults(),
389         sunlight = true,
390 })
391
392 minetest.register_craft({
393         output = "doors:door_glass",
394         recipe = {
395                 {"default:glass", "default:glass"},
396                 {"default:glass", "default:glass"},
397                 {"default:glass", "default:glass"}
398         }
399 })
400
401 doors.register_door("doors:door_obsidian_glass", {
402         description = "Obsidian Glass Door",
403         inventory_image = "doors_obsidian_glass.png",
404         groups = {snappy=1,cracky=1,oddly_breakable_by_hand=3,door=1},
405         tiles_bottom = {"doors_obsidian_glass_b.png", "doors_obsidian_glass_side.png"},
406         tiles_top = {"doors_obsidian_glass_a.png", "doors_obsidian_glass_side.png"},
407         sounds = default.node_sound_glass_defaults(),
408         sunlight = true,
409 })
410
411 minetest.register_craft({
412         output = "doors:door_obsidian_glass",
413         recipe = {
414                 {"default:obsidian_glass", "default:obsidian_glass"},
415                 {"default:obsidian_glass", "default:obsidian_glass"},
416                 {"default:obsidian_glass", "default:obsidian_glass"}
417         }
418 })
419
420
421 ----trapdoor----
422
423 function doors.register_trapdoor(name, def)
424         local name_closed = name
425         local name_opened = name.."_open"
426
427         def.on_rightclick = function (pos, node)
428                 local newname = node.name == name_closed and name_opened or name_closed
429                 local sound = false
430                 if node.name == name_closed then sound = def.sound_open end
431                 if node.name == name_opened then sound = def.sound_close end
432                 if sound then
433                         minetest.sound_play(sound, {pos = pos, gain = 0.3, max_hear_distance = 10})
434                 end
435                 minetest.set_node(pos, {name = newname, param1 = node.param1, param2 = node.param2})
436         end
437
438         def.on_rotate = screwdriver.rotate_simple
439
440         -- Common trapdoor configuration
441         def.drawtype = "nodebox"
442         def.paramtype = "light"
443         def.paramtype2 = "facedir"
444
445         local def_opened = table.copy(def)
446         local def_closed = table.copy(def)
447
448         def_closed.node_box = {
449                 type = "fixed",
450                 fixed = {-0.5, -0.5, -0.5, 0.5, -0.4, 0.5}
451         }
452         def_closed.selection_box = {
453                 type = "fixed",
454                 fixed = {-0.5, -0.5, -0.5, 0.5, -0.4, 0.5}
455         }
456         def_closed.tiles = { def.tile_front, def.tile_front, def.tile_side, def.tile_side,
457                 def.tile_side, def.tile_side }
458
459         def_opened.node_box = {
460                 type = "fixed",
461                 fixed = {-0.5, -0.5, 0.4, 0.5, 0.5, 0.5}
462         }
463         def_opened.selection_box = {
464                 type = "fixed",
465                 fixed = {-0.5, -0.5, 0.4, 0.5, 0.5, 0.5}
466         }
467         def_opened.tiles = { def.tile_side, def.tile_side, def.tile_side, def.tile_side,
468                 def.tile_front, def.tile_front }
469         def_opened.drop = name_closed
470         def_opened.groups.not_in_creative_inventory = 1
471
472         minetest.register_node(name_opened, def_opened)
473         minetest.register_node(name_closed, def_closed)
474 end
475
476
477
478 doors.register_trapdoor("doors:trapdoor", {
479         description = "Trapdoor",
480         inventory_image = "doors_trapdoor.png",
481         wield_image = "doors_trapdoor.png",
482         tile_front = "doors_trapdoor.png",
483         tile_side = "doors_trapdoor_side.png",
484         groups = {snappy=1, choppy=2, oddly_breakable_by_hand=2, flammable=2, door=1},
485         sounds = default.node_sound_wood_defaults(),
486         sound_open = "doors_door_open",
487         sound_close = "doors_door_close"
488 })
489
490 minetest.register_craft({
491         output = 'doors:trapdoor 2',
492         recipe = {
493                 {'group:wood', 'group:wood', 'group:wood'},
494                 {'group:wood', 'group:wood', 'group:wood'},
495                 {'', '', ''},
496         }
497 })