pnginstaller

------------------------------------------- Библиотеки -------------------------------------------

local shell = require("shell")
local component = require("component")
local unicode = require("unicode")
local gpu = component.gpu

------------------------------------------- Переменные -------------------------------------------

--Массив с программами, которые необходимо загрузить. Первый элемент - ссылка на файл, второй - путь для сохранения файла.
local applications = {
{ "https://raw.githubusercontent.com/ChenThread/octagon/refs/heads/master/crc32.lua", "/home/crc32.lua" },
{ "https://raw.githubusercontent.com/ChenThread/octagon/refs/heads/master/inflate.lua", "/home/inflate.lua" },
{ "https://raw.githubusercontent.com/ChenThread/octagon/refs/heads/master/oczip.lua", "/home/oczip.lua" },
{ "https://raw.githubusercontent.com/ChenThread/octagon/refs/heads/master/png.lua", "/home/png.lua" },
{ "https://raw.githubusercontent.com/ChenThread/octagon/refs/heads/master/pngview.lua", "/home/pngview.lua" },

}

--Получаем размеры монитора
local xSize, ySize = gpu.getResolution()

------------------------------------------- Функции -------------------------------------------

--Отрисовка квадрата указанного цвета
local function square(x, y, width, height, background)
    gpu.setBackground(background)
    gpu.fill(x, y, width, height, " ")
end

--Запомнить область пикселей и возвратить ее в виде массива
local function rememberOldPixels(x, y, x2, y2)
    local newPNGMassiv = { ["backgrounds"] = {} }
    newPNGMassiv.x, newPNGMassiv.y = x, y
    --Перебираем весь массив стандартного PNG-вида по высоте
    local xCounter, yCounter = 1, 1
    for j = y, y2 do
        xCounter = 1
        for i = x, x2 do
            if (i > xSize or i < 0) or (j > ySize or j < 0) then
                error("Can't remember pixel, because it's located behind the screen: x("..i.."), y("..j..") out of xSize("..xSize.."), ySize("..ySize..")\n")
            end
            local symbol, fore, back = gpu.get(i, j)
            newPNGMassiv["backgrounds"][back] = newPNGMassiv["backgrounds"][back] or {}
            newPNGMassiv["backgrounds"][back][fore] = newPNGMassiv["backgrounds"][back][fore] or {}
            table.insert(newPNGMassiv["backgrounds"][back][fore], {xCounter, yCounter, symbol} )

            xCounter = xCounter + 1
            back, fore, symbol = nil, nil, nil
        end
        yCounter = yCounter + 1
    end
    return newPNGMassiv
end

--Нарисовать запомненные ранее пиксели из массива
local function drawOldPixels(massivSudaPihay)
    --Перебираем массив с фонами
    for back, backValue in pairs(massivSudaPihay["backgrounds"]) do
        gpu.setBackground(back)
        for fore, foreValue in pairs(massivSudaPihay["backgrounds"][back]) do
            gpu.setForeground(fore)
            for pixel = 1, #massivSudaPihay["backgrounds"][back][fore] do
                if massivSudaPihay["backgrounds"][back][fore][pixel][3] ~= transparentSymbol then
                    gpu.set(massivSudaPihay.x + massivSudaPihay["backgrounds"][back][fore][pixel][1] - 1, massivSudaPihay.y + massivSudaPihay["backgrounds"][back][fore][pixel][2] - 1, massivSudaPihay["backgrounds"][back][fore][pixel][3])
                end
            end
        end
    end
end

--Ограничение длины строки
local function stringLimit(mode, text, size, noDots)
    if unicode.len(text) <= size then return text end
    local length = unicode.len(text)
    if mode == "start" then
        if noDots then
            return unicode.sub(text, length - size + 1, -1)
        else
            return "…" .. unicode.sub(text, length - size + 2, -1)
        end
    else
        if noDots then
            return unicode.sub(text, 1, size)
        else
            return unicode.sub(text, 1, size - 1) .. "…"
        end
    end
end

--Шкала прогресса
local function progressBar(x, y, width, height, background, foreground, percent)
    local activeWidth = math.ceil(width * percent / 100)
    square(x, y, width, height, background)
    square(x, y, activeWidth, height, foreground)
end

--Окно загрузки
local function downloadWindow()
    --Задаем стартовые координаты
    local width, height = 60, 7
    local progressBarWidth = math.floor(width * 3 / 4)
    local x, y = math.floor(xSize / 2 - width / 2), math.floor(ySize / 2 - height / 2) + 1
    --Запоминаем старые пиксели
    local oldPixels = rememberOldPixels(x, y, x + width - 1, y + height - 1)
    --Рисуем верхний тулбар
    square(x, y, width, 1, 0xcccccc)
    local text = "Загрузка"
    local xPos, yPos = math.floor(xSize / 2 - unicode.len(text) / 2), y
    gpu.setForeground( 0x000000 )
    gpu.set(xPos, yPos, text)
    --Рисуем само окно
    square(x, y + 1, width, height - 1, 0xeeeeee)
    --Загружаем файлы и рисуем шкалу прогресса
    xPos, yPos = math.floor(xSize / 2 - progressBarWidth / 2), math.floor(ySize / 2)
    local percent = 0
    progressBar(xPos, yPos, progressBarWidth, 1, 0xcccccc, 0x3366CC, percent)
    for i = 1, #applications do
        progressBar(xPos, yPos, progressBarWidth, 1, 0xcccccc, 0x3366CC, percent)
        square(xPos, yPos + 1, progressBarWidth, 1, 0xeeeeee)
        gpu.setForeground(0x262626)
        gpu.set(xPos, yPos + 1, stringLimit("end", "Устанавливаю " .. applications[i][2], progressBarWidth))
        shell.execute("wget " .. applications[i][1] .. " " .. applications[i][2] .. " -fQ")
        percent = math.floor(100 * i / #applications)
    end
    progressBar(xPos, yPos, progressBarWidth, 1, 0xcccccc, 0x3366CC, percent)
    os.sleep(0.3)
    --Выпиливаем нарисованное окно
    drawOldPixels(oldPixels)
end

------------------------------------------- Программа -------------------------------------------

downloadWindow()