xwall.lua

   1 -- Code by Sokomine (https://github.com/Sokomine/xconnected)
   2 -- License : GPLv3
   3 -- Optimized by kilbith
   4
   5 local xwall = {}
   6 screwdriver = screwdriver or {}
   7
   8 xwall.get_candidate = {}
   9 local profiles = {
  10         {0, "_c0", 0}, {1, "_c1", 1}, {2, "_c1", 0}, {4, "_c1", 3},
  11         {8, "_c1", 2}, {5, "_ln", 1}, {10, "_ln", 0}, {3, "_c2", 0},
  12         {6, "_c2", 3}, {12, "_c2", 2}, {9, "_c2", 1}, {7, "_c3", 3},
  13         {11, "_c3", 0}, {13, "_c3", 1}, {14, "_c3", 2}, {15, "_c4", 1}
  14 }
  15
  16 for i = 1, #profiles do
  17         local p = profiles[i]
  18         local p1, p2, p3 = p[1], p[2], p[3]
  19         xwall.get_candidate[p1] = {p2, p3}
  20 end
  21
  22 local directions = {
  23         {x = 1, y = 0, z = 0}, {x = 0, y = 0, z = 1},
  24         {x = -1, y = 0, z = 0}, {x = 0, y = 0, z = -1}
  25 }
  26
  27 function xwall.update_one_node(pos, name, digged)
  28         if not pos or not name or not minetest.registered_nodes[name] then return end
  29         local candidates = {0, 0, 0, 0}
  30         local pow2 = {1, 2, 4, 8}
  31         local id = 0
  32
  33         for i = 1, #directions do
  34                 local dir = directions[i]
  35                 local node = minetest.get_node(vector.add(pos, dir))
  36                 local ndef = minetest.registered_nodes[node.name]
  37
  38                 if node and node.name and ndef then
  39                         if ndef.drop == name or (ndef.groups and ndef.groups.xwall) then
  40                                 candidates[i] = node.name
  41                                 id = id + pow2[i]
  42                         end
  43                 end
  44         end
  45
  46         if digged then return candidates end
  47
  48         local newnode = xwall.get_candidate[id]
  49         if newnode and newnode[1] then
  50                 local newname = name:sub(1, name:len()-3)..newnode[1]
  51                 local regnode = minetest.registered_nodes[newname]
  52
  53                 if newname and regnode then
  54                         minetest.swap_node(pos, {name=newname, param2=newnode[2]})
  55                 elseif newnode[1] == '_c0' and not regnode then
  56                         minetest.swap_node(pos, {name=name, param2=0})
  57                 end
  58         end
  59
  60         return candidates
  61 end
  62
  63 function xwall.update(pos, name, active, has_been_digged)
  64         if not pos or not name or not minetest.registered_nodes[name] then return end
  65
  66         local c = xwall.update_one_node(pos, name, has_been_digged)
  67         for j = 1, #directions do
  68                 local dir2 = directions[j]
  69                 if c[j] ~= 0 and c[j] ~= "ignore" then
  70                         xwall.update_one_node(vector.add(pos, dir2), c[j], false)
  71                 end
  72         end
  73 end
  74
  75 function xwall.register(name, def, node_box_data)
  76         for k, v in pairs(node_box_data) do
  77                 def.drawtype = "nodebox"
  78                 def.paramtype = "light"
  79                 def.paramtype2 = "facedir"
  80                 def.drop = name.."_ln"
  81                 def.node_box = {type = "fixed", fixed = node_box_data[k]}
  82
  83                 if not def.tiles then def.tiles = def.textures end
  84                 if not def.groups then
  85                         def.groups = {xwall=1, cracky=3}
  86                 else def.groups.xwall = 1 end
  87
  88                 local newdef = table.copy(def)
  89                 if k == "ln" then
  90                         newdef.on_construct = function(pos)
  91                                 return xwall.update(pos, name.."_ln", true, nil)
  92                         end
  93                 else newdef.groups.not_in_creative_inventory = 1 end
  94
  95                 newdef.after_dig_node = function(pos, _, _, _)
  96                         return xwall.update(pos, name.."_ln", true, true)
  97                 end
  98
  99                 minetest.register_node(name.."_"..k, newdef)
 100         end
 101 end
 102
 103 function xwall.construct_node_box_data(node_box_list, center_node_box_list, node_box_line)
 104         local res = {}
 105         res.c0, res.c1, res.c2, res.c3, res.c4 = {}, {}, {}, {}, {}
 106
 107         for _, v in pairs(node_box_list) do
 108                 res.c1[#res.c1+1] = v
 109                 res.c2[#res.c2+1] = v
 110                 res.c3[#res.c3+1] = v
 111                 res.c4[#res.c4+1] = v
 112         end
 113
 114         for _, v in pairs(node_box_list) do
 115                 res.c2[#res.c2+1] = {v[3], v[2], v[1], v[6], v[5], v[4]}
 116                 res.c3[#res.c3+1] = {v[3], v[2], v[1], v[6], v[5], v[4]}
 117                 res.c4[#res.c4+1] = {v[3], v[2], v[1], v[6], v[5], v[4]}
 118         end
 119
 120         for _, v in pairs(node_box_list) do
 121                 res.c3[#res.c3+1] = {v[4], v[2], v[3]-0.5,  v[1], v[5], v[6]-0.5}
 122                 res.c4[#res.c4+1] = {v[4], v[2], v[3]-0.5,  v[1], v[5], v[6]-0.5}
 123         end
 124
 125         for _, v in pairs(node_box_list) do
 126                 res.c4[#res.c4+1] = {v[3]-0.5, v[2], v[4], v[6]-0.5, v[5], v[1]}
 127         end
 128
 129         for _, v in pairs(center_node_box_list) do
 130                 res.c0[#res.c0+1] = v
 131                 res.c1[#res.c1+1] = v
 132                 res.c2[#res.c2+1] = v
 133                 res.c3[#res.c3+1] = v
 134                 res.c4[#res.c4+1] = v
 135         end
 136
 137         if #res.c0 < 1 then res.c0 = nil end
 138
 139         res.ln = node_box_line
 140         return res
 141 end
 142
 143 function xwall.register_wall(name, tiles, def)
 144         local node_box_data = xwall.construct_node_box_data(
 145                 {{-.1875,-.6875,0,.1875,.3125,.5}},{{-.25,-.6875,-.25,.25,.5,.25}},
 146                 {{-.1875,-.6875,-.5,.1875,.3125,.5}}
 147         )
 148
 149         if def then return end
 150         def = {
 151                 description = string.sub(name:gsub("%l", string.upper, 7), 8, -6).." Wall",
 152                 textures = {tiles, tiles, tiles, tiles},
 153                 sounds = default.node_sound_stone_defaults(),
 154                 groups = {cracky=3, stone=1, pane=1},
 155                 sunlight_propagates = true,
 156                 on_rotate = screwdriver.disallow,
 157                 collision_box = {
 158                         type = "fixed",
 159                         fixed = {-.5, -.5, -.25, .5, 1, .25}
 160                 }
 161         }
 162         xwall.register(name, def, node_box_data)
 163 end
 164
 165 xwall.register_wall("xdecor:cobble_wall", "default_cobble.png")
 166 xwall.register_wall("xdecor:mossycobble_wall", "default_mossycobble.png")