NVault

-- Этот импорт нам нужен для управления роботом
local robot = require("robot")

...

-- Данная функция передвинет бота на блок враво
local function right()
  robot.turnRight();
  robot.forward();
  robot.turnLeft();
end

-- Данная функция передвинет бота на блок влево
local function left()
  robot.turnLeft();
  robot.forward();
  robot.turnRight();
end

-- Мы можем писать <direction> в виде целых чисел, но куда
-- удобнее пользоваться той библиотекой
local sides = require("sides")

...

-- Данная функция пройдёт <times> раз в направлении <direction>
-- и применит на каждый блок функцию <fn>
local function scan_row(direction, times, fn)
  local mf = nil
  -- <left> и <right> - это функции, которые мы описали выше
  if direction == sides.left then
    mf = left
  elseif direction == sides.right then
    mf = right
  end

  -- В lua цикл for идёт [start, end], не как в C++: [start, end)
  -- Поэтому и <times-1> (хотя можно начать с 1 и проходить до times, да)
  for i=0,times-1 do
    fn()
    mf()
  end
end

-- Библиотека взаимодействия с компонентам
local component = require("component")

...

-- Номер слота ящика. Всегда 2 🤷
local slot = 2
-- Запишем нужный компонент в переменную, для простоты доступа
local ic = component.inventory_controller
-- Здесь будем хранить данные о состоянии предметов в массиве
local data_table = {}

...

-- А вот и сама функция
local function get_drawer_data(side)
  -- Пытаемся получить доступ к слоту <slot> через сторону <side>
  local slot_data = ic.getStackInSlot(side, slot)
  -- Если получилось, то записываем имя [modid:itemname], надпись
  -- и кол-во предметов в слоте, затем записываем в таблицу
  if slot_data then
    local item_data = {}
    item_data.name = slot_data.name
    item_data.label = slot_data.label
    item_data.size = slot_data.size

    data_table[slot_data.name] = item_data
  end
end

-- Нам понадобится конвертировать данные в формат JSON,
-- а стандартных средст для этого нет, поэтому
-- воспользуемся этой замечательной библиотекой
-- (файл дать не могу из-за авторских прав)
-- from: http://regex.info/code/JSON.lua
JSON = (loadfile "JSON.lua")()

-- Ваш идентификатор TG (можно узнать через @JsonDumpBot)
local chat_id = "XXXXXXXXX"
-- Токен бота
local token = "XXXXXXXXXX:XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
local method = "sendMessage"
local url = "https://api.telegram.org/bot" .. token .. "/" .. method

...

-- Проходим по таблице с данными, собираем отчёт
local function form_report()
  local outcome = "Report on " .. os.date() .. "@MLC (Minecraft Local Time)"
  for k,v in pairs(data_table) do
    outcome = outcome .. "\n" .. v.label .. " - " .. v.size
  end
  outcome = outcome .. "\n\nNext update in 1 hour"
  return outcome
end

-- Отправляем данные через бота себе в TG
local function send_data(data)
  -- Собираем отправляемые данные в новую таблицу
  local j_data = {}
  j_data.chat_id = chat_id
  j_data.text = data

  -- Нужные для отправки заголовки
  local r_headers = {}
  r_headers["Content-Type"] = "application/json"

  -- Конвертируем нагрузку в JSON
  local raw_json_text = JSON:encode(j_data)
  -- Отправляем запрос
  local handle = internet.request(url, raw_json_text, r_headers, "POST")
end

-- Почему бы не использовать глобальную переменную для цикла работы?
-- Можно будет придумать какое-то внешнее действие, переключающее
-- переменную в False, но об этом я сейчас говорить не буду
local running = true

...

-- Основная функция
local function main()
  -- Будем считать итерации - просто для удобства
  local iterations = 0
  while running do
    print("Iteraion", iterations)
    iterations = iterations + 1

    -- Можно было бы как-то по-другому сделать, но так тоже хорошо
    -- Тут в качестве <fn> передаётся анонимная функция, которая будет вызывать
    -- функцию получения данных из слота <sides.front>
    scan_row(sides.right, row_width, function() get_drawer_data(sides.front) end)
    robot.up()
    scan_row(sides.left, row_width, function() get_drawer_data(sides.front) end)
    robot.up()
    scan_row(sides.right, row_width, function() get_drawer_data(sides.front) end)
    robot.up()
    scan_row(sides.left, row_width, function() get_drawer_data(sides.front) end)
    robot.down()
    robot.down()
    robot.down()

    local report = form_report()
    send_data(report)
    print("Sleeping for 1 hour...")
    os.sleep(60 * 60)
    data_table = {}
  end
end

-- И естественно - надо вызвать нашу функцию
main()

local component = require("component")
local internet = require("internet")
local sides = require("sides")
local robot = require("robot")

-- from: http://regex.info/code/JSON.lua
JSON = (loadfile "JSON.lua")()

local chat_id = "XXXXXXXXX"
local token = "XXXXXXXXXX:XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
local method = "sendMessage"
local url = "https://api.telegram.org/bot" .. token .. "/" .. method

local row_width = 12
local slot = 2
local ic = component.inventory_controller
local data_table = {}
local running = true

local function get_drawer_data(side)
  local slot_data = ic.getStackInSlot(side, slot)
  if slot_data then
    local item_data = {}
    item_data.name = slot_data.name
    item_data.label = slot_data.label
    item_data.size = slot_data.size

    data_table[slot_data.name] = item_data
  end
end

local function right()
  robot.turnRight();
  robot.forward();
  robot.turnLeft();
end

local function left()
  robot.turnLeft();
  robot.forward();
  robot.turnRight();
end

local function scan_row(direction, times, fn)
  local mf = nil
  if direction == sides.left then
    mf = left
  elseif direction == sides.right then
    mf = right
  end

  for i=0,times-1 do
    fn()
    mf()
  end
end

local function form_report()
  local outcome = "Report on " .. os.date() .. "@MLC (Minecraft Local Time)"
  for k,v in pairs(data_table) do
    outcome = outcome .. "\n" .. v.label .. " - " .. v.size
  end
  outcome = outcome .. "\n\nNext update in 1 hour"
  return outcome
end

local function send_data(data)
  local j_data = {}
  j_data.chat_id = chat_id
  j_data.text = data

  local r_headers = {}
  r_headers["Content-Type"] = "application/json"

  local raw_json_text = JSON:encode(j_data)
  local handle = internet.request(url, raw_json_text, r_headers, "POST")
end

local function main()
  local iterations = 0
  while running do
    print("Iteraion", iterations)
    iterations = iterations + 1

    scan_row(sides.right, row_width, function() get_drawer_data(sides.front) end)
    robot.up()
    scan_row(sides.left, row_width, function() get_drawer_data(sides.front) end)
    robot.up()
    scan_row(sides.right, row_width, function() get_drawer_data(sides.front) end)
    robot.up()
    scan_row(sides.left, row_width, function() get_drawer_data(sides.front) end)
    robot.down()
    robot.down()
    robot.down()

    local report = form_report()
    send_data(report)
    print("Sleeping for 1 hour...")
    os.sleep(60 * 60)
    data_table = {}
  end
end

main()