DM - Buildcraft

--0123456789ABCDEF0123456789ABCDEF0123456789ABCDE

local aText = {
 " ",
 "BuildCraft Items",
 " ",
}

local bText = {
  "Redstone Engine:",
  "- Low-Power Generator",
  "- Requires only a Redstone Signal",
}

local cText = {
  "Steam Engine:",
  "- Mid-Power Generator",
  "- Requires Fuel & Redstone Signal",
}

local dText = {
  "Energy Link:",
  "- Converts IC2 EU into BC Juels",
  "- Stable at 512 EU/t Total Input",
}

local eText = {
  "The Quarry:",
  "- Mines Up to 62x62 Area",
  "- The Lazy-Man's Resource Generator",
}

local sSide = "front"

local function printCenter(mon, t)
  local w, h = mon.getSize()
  mon.clear()
  local y = math.floor((h / 2) - (#t / 2))
  for i, line in ipairs(t) do
        local x = math.floor((w / 2) - (#line / 2))
        mon.setCursorPos(x, y + i)
        mon.write(line)
  end
end

local function printLeft(mon, t)
  local w, h = mon.getSize()
  mon.setTextScale(1)
  mon.clear()
  local y = math.floor((h / 2) - (#t / 2))
  for i, line in ipairs(t) do
        local x = 1
        mon.setCursorPos(x, y + i)
        mon.write(line)
  end
end

while 0<1 do
printCenter(peripheral.wrap(sSide), aText)
os.sleep(5)
printLeft(peripheral.wrap(sSide), bText)
os.sleep(5)
printLeft(peripheral.wrap(sSide), cText)
os.sleep(5)
printLeft(peripheral.wrap(sSide), dText)
os.sleep(5)
printLeft(peripheral.wrap(sSide), eText)
os.sleep(5)
end