test api

if not fs.exists("ui") then
    shell.run("pastebin get 6Key3fvX ui")
end
for a, b in pairs(rs.getSides()) do
    if peripheral.getType(b) == "monitor" then
        mon = peripheral.wrap(b);
        break
    end
end

term.redirect(mon);
rednet.open("right")

-- IMPLEMENTAZIONE DEL DRAWFILLEDBOX
local function drawPixelInternal(xPos, yPos)
    term.setCursorPos(xPos, yPos)
    term.write(" ")
end

function drawFilledBox(startX, startY, result)
    if result then
        term.setBackgroundColor(colors.lime)
    else
        term.setBackgroundColor(colors.red)
    end

    for x = startX, startX + 2 do
        for y = startY, startY + 1 do
            drawPixelInternal(x, y)
        end
    end
end

function draw(Nalveary, Bypass, Startx, y,nRighe, data)
    local Ncol = 0;x=Startx;Nriga = 1;
    for k = Bypass, Nalveary do
        if Nriga > 1 then
            x = x + 4
            if Nriga == nRighe+1 then
                x = Startx
                Nriga = 1
                y = y + 3
            end
        end
        Nriga = Nriga + 1
        drawFilledBox(x, y, data[k-1])
    end
end

function getData(ID)
    repeat
        senderId, message, protocol = rednet.receive()
        term.setBackgroundColor(colors.lime)
        term.setCursorPos(71, 7)
        print(ID .. "-->" .. senderId)
    until senderId == ID
    term.setCursorPos(71, 10)
    print(ID)
    return textutils.unserialize(message)
end

shell.run("ui")
while true do
    draw(15, 1, 3, 6,3, getData(6546))
    sleep(0.5)
    draw(7, 1, 19, 6,4, getData(6548))
    sleep(0.5)
    data = getData(6549)
    draw(9, 1, 39, 6,3, data)
    draw(13, 10, 43, 15,2, data)
    draw(15, 14,47, 21,1, data)
    sleep(0.5)
    draw(2,1,55,6,2,getData(6550))
    sleep(2)
end