Steel Trapdoor.
[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 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                 is_ground_content = false,
198                 drop = name,
199                 drawtype = "nodebox",
200                 node_box = {
201                         type = "fixed",
202                         fixed = def.node_box_bottom
203                 },
204                 selection_box = {
205                         type = "fixed",
206                         fixed = def.selection_box_bottom
207                 },
208                 groups = def.groups,
209                 
210                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
211                         pos.y = pos.y+1
212                         after_dig_node(pos, name.."_t_1", digger)
213                 end,
214                 
215                 on_rightclick = function(pos, node, clicker)
216                         if check_player_priv(pos, clicker) then
217                                 on_rightclick(pos, 1, name.."_t_1", name.."_b_2", name.."_t_2", {1,2,3,0})
218                         end
219                 end,
220                 
221                 on_rotate = function(pos, node, user, mode, new_param2)
222                         return on_rotate(pos, node, 1, user, name.."_t_1", mode)
223                 end,
224
225                 can_dig = check_player_priv,
226                 sounds = def.sounds,
227                 sunlight_propagates = def.sunlight,
228                 on_blast = make_on_blast(name, 1, "_b_1", "_t_1")
229         })
230
231         minetest.register_node(name.."_t_1", {
232                 tiles = {tt[2], tt[2], tt[2], tt[2], tt[1], tt[1].."^[transformfx"},
233                 paramtype = "light",
234                 paramtype2 = "facedir",
235                 is_ground_content = false,
236                 drop = "",
237                 drawtype = "nodebox",
238                 node_box = {
239                         type = "fixed",
240                         fixed = def.node_box_top
241                 },
242                 selection_box = {
243                         type = "fixed",
244                         fixed = def.selection_box_top
245                 },
246                 groups = def.groups,
247                 
248                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
249                         pos.y = pos.y-1
250                         after_dig_node(pos, name.."_b_1", digger)
251                 end,
252                 
253                 on_rightclick = function(pos, node, clicker)
254                         if check_player_priv(pos, clicker) then
255                                 on_rightclick(pos, -1, name.."_b_1", name.."_t_2", name.."_b_2", {1,2,3,0})
256                         end
257                 end,
258                 
259                 on_rotate = function(pos, node, user, mode, new_param2)
260                         return on_rotate(pos, node, -1, user, name.."_b_1", mode)
261                 end,
262
263                 can_dig = check_player_priv,
264                 sounds = def.sounds,
265                 sunlight_propagates = def.sunlight,
266                 on_blast = make_on_blast(name, -1, "_t_1", "_b_1")
267         })
268
269         minetest.register_node(name.."_b_2", {
270                 tiles = {tb[2], tb[2], tb[2], tb[2], tb[1].."^[transformfx", tb[1]},
271                 paramtype = "light",
272                 paramtype2 = "facedir",
273                 is_ground_content = false,
274                 drop = name,
275                 drawtype = "nodebox",
276                 node_box = {
277                         type = "fixed",
278                         fixed = def.node_box_bottom
279                 },
280                 selection_box = {
281                         type = "fixed",
282                         fixed = def.selection_box_bottom
283                 },
284                 groups = def.groups,
285                 
286                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
287                         pos.y = pos.y+1
288                         after_dig_node(pos, name.."_t_2", digger)
289                 end,
290                 
291                 on_rightclick = function(pos, node, clicker)
292                         if check_player_priv(pos, clicker) then
293                                 on_rightclick(pos, 1, name.."_t_2", name.."_b_1", name.."_t_1", {3,0,1,2})
294                         end
295                 end,
296                 
297                 on_rotate = function(pos, node, user, mode, new_param2)
298                         return on_rotate(pos, node, 1, user, name.."_t_2", mode)
299                 end,
300
301                 can_dig = check_player_priv,
302                 sounds = def.sounds,
303                 sunlight_propagates = def.sunlight,
304                 on_blast = make_on_blast(name, 1, "_b_2", "_t_2")
305         })
306
307         minetest.register_node(name.."_t_2", {
308                 tiles = {tt[2], tt[2], tt[2], tt[2], tt[1].."^[transformfx", tt[1]},
309                 paramtype = "light",
310                 paramtype2 = "facedir",
311                 is_ground_content = false,
312                 drop = "",
313                 drawtype = "nodebox",
314                 node_box = {
315                         type = "fixed",
316                         fixed = def.node_box_top
317                 },
318                 selection_box = {
319                         type = "fixed",
320                         fixed = def.selection_box_top
321                 },
322                 groups = def.groups,
323                 
324                 after_dig_node = function(pos, oldnode, oldmetadata, digger)
325                         pos.y = pos.y-1
326                         after_dig_node(pos, name.."_b_2", digger)
327                 end,
328                 
329                 on_rightclick = function(pos, node, clicker)
330                         if check_player_priv(pos, clicker) then
331                                 on_rightclick(pos, -1, name.."_b_2", name.."_t_1", name.."_b_1", {3,0,1,2})
332                         end
333                 end,
334                 
335                 on_rotate = function(pos, node, user, mode, new_param2)
336                         return on_rotate(pos, node, -1, user, name.."_b_2", mode)
337                 end,
338
339                 can_dig = check_player_priv,
340                 sounds = def.sounds,
341                 sunlight_propagates = def.sunlight,
342                 on_blast = make_on_blast(name, -1, "_t_2", "_b_2")
343         })
344
345 end
346
347 doors.register_door("doors:door_wood", {
348         description = "Wooden Door",
349         inventory_image = "doors_wood.png",
350         groups = {snappy=1,choppy=2,oddly_breakable_by_hand=2,flammable=2,door=1},
351         tiles_bottom = {"doors_wood_b.png", "doors_brown.png"},
352         tiles_top = {"doors_wood_a.png", "doors_brown.png"},
353         sounds = default.node_sound_wood_defaults(),
354         sunlight = false,
355 })
356
357 minetest.register_craft({
358         output = "doors:door_wood",
359         recipe = {
360                 {"group:wood", "group:wood"},
361                 {"group:wood", "group:wood"},
362                 {"group:wood", "group:wood"}
363         }
364 })
365
366 doors.register_door("doors:door_steel", {
367         description = "Steel Door",
368         inventory_image = "doors_steel.png",
369         groups = {snappy=1,bendy=2,cracky=1,melty=2,level=2,door=1},
370         tiles_bottom = {"doors_steel_b.png", "doors_grey.png"},
371         tiles_top = {"doors_steel_a.png", "doors_grey.png"},
372         only_placer_can_open = true,
373         sounds = default.node_sound_wood_defaults(),
374         sunlight = false,
375 })
376
377 minetest.register_craft({
378         output = "doors:door_steel",
379         recipe = {
380                 {"default:steel_ingot", "default:steel_ingot"},
381                 {"default:steel_ingot", "default:steel_ingot"},
382                 {"default:steel_ingot", "default:steel_ingot"}
383         }
384 })
385
386 doors.register_door("doors:door_glass", {
387         description = "Glass Door",
388         inventory_image = "doors_glass.png",
389         groups = {snappy=1,cracky=1,oddly_breakable_by_hand=3,door=1},
390         tiles_bottom = {"doors_glass_b.png", "doors_glass_side.png"},
391         tiles_top = {"doors_glass_a.png", "doors_glass_side.png"},
392         sounds = default.node_sound_glass_defaults(),
393         sunlight = true,
394 })
395
396 minetest.register_craft({
397         output = "doors:door_glass",
398         recipe = {
399                 {"default:glass", "default:glass"},
400                 {"default:glass", "default:glass"},
401                 {"default:glass", "default:glass"}
402         }
403 })
404
405 doors.register_door("doors:door_obsidian_glass", {
406         description = "Obsidian Glass Door",
407         inventory_image = "doors_obsidian_glass.png",
408         groups = {snappy=1,cracky=1,oddly_breakable_by_hand=3,door=1},
409         tiles_bottom = {"doors_obsidian_glass_b.png", "doors_obsidian_glass_side.png"},
410         tiles_top = {"doors_obsidian_glass_a.png", "doors_obsidian_glass_side.png"},
411         sounds = default.node_sound_glass_defaults(),
412         sunlight = true,
413 })
414
415 minetest.register_craft({
416         output = "doors:door_obsidian_glass",
417         recipe = {
418                 {"default:obsidian_glass", "default:obsidian_glass"},
419                 {"default:obsidian_glass", "default:obsidian_glass"},
420                 {"default:obsidian_glass", "default:obsidian_glass"}
421         }
422 })
423
424
425 ----trapdoor----
426
427 function doors.register_trapdoor(name, def)
428         local name_closed = name
429         local name_opened = name.."_open"
430
431         local function check_player_priv(pos, player)
432                 if not def.only_placer_can_open then
433                         return true
434                 end
435                 local meta = minetest.get_meta(pos)
436                 local pn = player:get_player_name()
437                 return meta:get_string("doors_owner") == pn
438         end
439
440         def.on_rightclick = function (pos, node, clicker, itemstack, pointed_thing)
441                 if not check_player_priv(pos, clicker) then
442                         return
443                 end
444                 local newname = node.name == name_closed and name_opened or name_closed
445                 local sound = false
446                 if node.name == name_closed then sound = def.sound_open end
447                 if node.name == name_opened then sound = def.sound_close end
448                 if sound then
449                         minetest.sound_play(sound, {pos = pos, gain = 0.3, max_hear_distance = 10})
450                 end
451                 minetest.swap_node(pos, {name = newname, param1 = node.param1, param2 = node.param2})
452         end
453
454         def.on_rotate = minetest.get_modpath("screwdriver") and screwdriver.rotate_simple
455
456         -- Common trapdoor configuration
457         def.drawtype = "nodebox"
458         def.paramtype = "light"
459         def.paramtype2 = "facedir"
460         def.is_ground_content = false
461         def.can_dig = check_player_priv
462
463         if def.only_placer_can_open then
464                 def.after_place_node = function(pos, placer, itemstack, pointed_thing)
465                         local pn = placer:get_player_name()
466                         local meta = minetest.get_meta(pos)
467                         meta:set_string("doors_owner", pn)
468                         meta:set_string("infotext", "Owned by "..pn)
469
470                         if not minetest.setting_getbool("creative_mode") then
471                                 return true
472                         end
473                         return false
474                 end
475         end
476
477         local def_opened = table.copy(def)
478         local def_closed = table.copy(def)
479
480         def_closed.node_box = {
481                 type = "fixed",
482                 fixed = {-0.5, -0.5, -0.5, 0.5, -0.4, 0.5}
483         }
484         def_closed.selection_box = {
485                 type = "fixed",
486                 fixed = {-0.5, -0.5, -0.5, 0.5, -0.4, 0.5}
487         }
488         def_closed.tiles = { def.tile_front, def.tile_front, def.tile_side, def.tile_side,
489                 def.tile_side, def.tile_side }
490
491         def_opened.node_box = {
492                 type = "fixed",
493                 fixed = {-0.5, -0.5, 0.4, 0.5, 0.5, 0.5}
494         }
495         def_opened.selection_box = {
496                 type = "fixed",
497                 fixed = {-0.5, -0.5, 0.4, 0.5, 0.5, 0.5}
498         }
499         def_opened.tiles = { def.tile_side, def.tile_side, def.tile_side, def.tile_side,
500                 def.tile_front, def.tile_front }
501         def_opened.drop = name_closed
502         def_opened.groups.not_in_creative_inventory = 1
503
504         minetest.register_node(name_opened, def_opened)
505         minetest.register_node(name_closed, def_closed)
506 end
507
508
509
510 doors.register_trapdoor("doors:trapdoor", {
511         description = "Trapdoor",
512         inventory_image = "doors_trapdoor.png",
513         wield_image = "doors_trapdoor.png",
514         tile_front = "doors_trapdoor.png",
515         tile_side = "doors_trapdoor_side.png",
516         groups = {snappy=1, choppy=2, oddly_breakable_by_hand=2, flammable=2, door=1},
517         sounds = default.node_sound_wood_defaults(),
518         sound_open = "doors_door_open",
519         sound_close = "doors_door_close"
520 })
521
522 doors.register_trapdoor("doors:trapdoor_steel", {
523         description = "Steel Trapdoor",
524         inventory_image = "doors_trapdoor_steel.png",
525         wield_image = "doors_trapdoor_steel.png",
526         tile_front = "doors_trapdoor_steel.png",
527         tile_side = "doors_trapdoor_steel_side.png",
528         only_placer_can_open = true,
529         groups = {snappy=1, bendy=2, cracky=1, melty=2, level=2, door=1},
530         sounds = default.node_sound_wood_defaults(),
531         sound_open = "doors_door_open",
532         sound_close = "doors_door_close"
533 })
534
535 minetest.register_craft({
536         output = 'doors:trapdoor 2',
537         recipe = {
538                 {'group:wood', 'group:wood', 'group:wood'},
539                 {'group:wood', 'group:wood', 'group:wood'},
540                 {'', '', ''},
541         }
542 })
543
544 minetest.register_craft({
545         output = 'doors:trapdoor_steel 2',
546         recipe = {
547                 {'default:steel_ingot', 'default:steel_ingot', 'default:steel_ingot'},
548                 {'default:steel_ingot', 'default:steel_ingot', 'default:steel_ingot'},
549                 {'', '', ''},
550         }
551 })
552