mods/xpanes/init.lua

   1 -- xPanes mod by xyz  custom by davedevils
   2 function pane(node, desc, dropitem, recipeitem, color)
   3         local function rshift(x, by)
   4           return math.floor(x / 2 ^ by)
   5         end
   6
   7         local directions = {
   8                 {x = 1, y = 0, z = 0},
   9                 {x = 0, y = 0, z = 1},
  10                 {x = -1, y = 0, z = 0},
  11                 {x = 0, y = 0, z = -1},
  12         }
  13
  14         local function update_pane(pos)
  15                 if minetest.env:get_node(pos).name:find("xpanes:pane_"..node..""..color) == nil then
  16                         return
  17                 end
  18                 local sum = 0
  19                 for i = 1, 4 do
  20                         local node = minetest.env:get_node({x = pos.x + directions[i].x, y = pos.y + directions[i].y, z = pos.z + directions[i].z})
  21                         if minetest.registered_nodes[node.name].walkable ~= false then
  22                                 sum = sum + 2 ^ (i - 1)
  23                         end
  24                 end
  25                 if sum == 0 then
  26                         sum = 15
  27                 end
  28                 minetest.env:add_node(pos, {name = "xpanes:pane_"..node..""..color.."_"..sum})
  29         end
  30
  31         local function update_nearby(pos)
  32                 for i = 1,4 do
  33                         update_pane({x = pos.x + directions[i].x, y = pos.y + directions[i].y, z = pos.z + directions[i].z})
  34                 end
  35         end
  36
  37         local half_blocks = {
  38                 {0, -0.5, -0.06, 0.5, 0.5, 0.06},
  39                 {-0.06, -0.5, 0, 0.06, 0.5, 0.5},
  40                 {-0.5, -0.5, -0.06, 0, 0.5, 0.06},
  41                 {-0.06, -0.5, -0.5, 0.06, 0.5, 0}
  42         }
  43
  44         local full_blocks = {
  45                 {-0.5, -0.5, -0.06, 0.5, 0.5, 0.06},
  46                 {-0.06, -0.5, -0.5, 0.06, 0.5, 0.5}
  47         }
  48
  49         for i = 1, 15 do
  50                 local need = {}
  51                 local cnt = 0
  52                 for j = 1, 4 do
  53                         if rshift(i, j - 1) % 2 == 1 then
  54                                 need[j] = true
  55                                 cnt = cnt + 1
  56                         end
  57                 end
  58                 local take = {}
  59                 if need[1] == true and need[3] == true then
  60                         need[1] = nil
  61                         need[3] = nil
  62                         table.insert(take, full_blocks[1])
  63                 end
  64                 if need[2] == true and need[4] == true then
  65                         need[2] = nil
  66                         need[4] = nil
  67                         table.insert(take, full_blocks[2])
  68                 end
  69                 for k in pairs(need) do
  70                         table.insert(take, half_blocks[k])
  71                 end
  72                 local texture = "xpanes_pane_"..node..""..color..".png"
  73                 if cnt == 1 then
  74                         texture = "xpanes_pane_half_"..node..""..color..".png"
  75                 end
  76                 minetest.register_node("xpanes:pane_"..node..""..color.."_"..i, {
  77                         drawtype = "nodebox",
  78                         tile_images = {"xpanes_top_"..node..""..color..".png", "xpanes_top_"..node..""..color..".png", texture},
  79                         paramtype = "light",
  80                         use_texture_alpha = true,
  81                         groups = {snappy=2,cracky=3,oddly_breakable_by_hand=3},
  82                         drop = dropitem,
  83                         node_box = {
  84                                 type = "fixed",
  85                                 fixed = take
  86                         },
  87                         selection_box = {
  88                                 type = "fixed",
  89                                 fixed = take
  90                         }
  91                 })
  92         end
  93
  94         minetest.register_node("xpanes:pane_"..node..""..color, {
  95                 description = desc,
  96                 tile_images = {"xpanes_pane_"..node..""..color..".png"},
  97                 inventory_image = "xpanes_pane_"..node..""..color..".png",
  98                 paramtype = "light",
  99                 stack_max = 64,
 100                 use_texture_alpha = true,
 101                 wield_image = "xpanes_pane_"..node..""..color..".png",
 102                 node_placement_prediction = "",
 103                 on_construct = update_pane,
 104                 drop = "",
 105         })
 106
 107         minetest.register_on_placenode(update_nearby)
 108         minetest.register_on_dignode(update_nearby)
 109
 110         minetest.register_craft({
 111                 output = 'xpanes:pane_'..node..''..color..' 16',
 112                 recipe = {
 113                         {recipeitem, recipeitem, recipeitem},
 114                         {recipeitem, recipeitem, recipeitem}
 115                 }
 116         })
 117 end
 118 -- Glass
 119 pane("glass", "Glass Pane", "", "default:glass", "_natural")
 120 pane("glass", "Glass Pane Red", "", "default:glass_red", "_red")
 121 pane("glass", "Glass Pane Green", "", "default:glass_green", "_green")
 122 pane("glass", "Glass Pane Blue", "", "default:glass_blue", "_blue")
 123 pane("glass", "Glass Pane Light Blue", "", "default:glass_light_blue", "_light_blue")
 124 pane("glass", "Glass Pane Black", "", "default:glass_black", "_black")
 125 pane("glass", "Glass Pane White", "", "default:glass_white", "_white")
 126 pane("glass", "Glass Pane Yellow", "", "default:glass_yellow", "_yellow")
 127 pane("glass", "Glass Pane Brown", "", "default:glass_brown", "_brown")
 128 pane("glass", "Glass Pane Orange", "", "default:glass_orange", "_orange")
 129 pane("glass", "Glass Pane Pink", "", "default:glass_pink", "_pink")
 130 pane("glass", "Glass Pane Gray", "", "default:glass_gray", "_gray")
 131 pane("glass", "Glass Pane Lime", "", "default:glass_lime", "_lime")
 132 pane("glass", "Glass Pane Silver", "", "default:glass_silver", "_silver")
 133 pane("glass", "Glass Pane Magenta", "", "default:glass_magenta", "_magenta")
 134 pane("glass", "Glass Pane Purple", "", "default:glass_purple", "_purple")
 135
 136
 137 -- Iron
 138 pane("iron", "Iron Fence", "xpanes:pane_iron", "default:steel_ingot", "")