Ilddor HTGR holo

local component = require("component")

local holo = component.hologram

local bolt =
{
   {0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1},
   {0, 0, 0, 0, 1, 2, 2, 2, 2, 2, 1},
   {0, 0, 0, 1, 1, 2, 2, 2, 2, 1, 1},
   {0, 0, 1, 1, 2, 2, 2, 2, 1, 1, 0},
   {0, 0, 1, 2, 2, 2, 2, 2, 1, 0, 0},
   {0, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1},
   {0, 1, 2, 2, 2, 2, 2, 2, 2, 2, 1},
   {1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 1},
   {1, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1},
   {1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 0},
   {0, 0, 0, 1, 2, 2, 2, 1, 1, 0, 0},
   {0, 0, 1, 1, 2, 2, 1, 1, 0, 0, 0},
   {0, 0, 1, 2, 2, 1, 1, 0, 0, 0, 0},
   {0, 0, 1, 2, 1, 1, 0, 0, 0, 0, 0},
   {0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0}
}

local moustache =
{
   {3, 0, 0, 3, 3, 0, 0, 3},
   {3, 3, 3, 3, 3, 3, 3, 3},
   {0, 3, 3, 0, 0, 3, 3, 0}
}

function initHolo()
   holo.clear()

   holo.setPaletteColor(1, 0x000000)
   holo.setPaletteColor(2, 0xFFFF00)
   holo.setPaletteColor(3, 0xFFFFFF)
end

function printBolt(z)
   for x=1,11 do
      for y=1,15 do
         if(not (bolt[y][x] == 0)) then
            holo.set(16 + x, 8 + 15 - y, z, gear[y][x])
         end
      end
   end
end

function printMoustache(z)
   for x=1,8 do
      for y=1,3 do
         if(not (moustache[y][x] == 0)) then
            holo.set(20 + x, 14 + 3 - y, z, moustache[y][x])
         end
      end
   end
end

initHolo()

printGear(23)
printGear(24)
printMoustache(25)