newFurnaceSystem

rednet.open("top");
rednet.host("API", "FurnaceSystem");

local status = "loading...";

function getData()
    local connected = 0;
    for i = 1,8,1 do
        local furnace = rednet.lookup("furnaceSystem", "Furnace" .. i);
        if furnace ~= nil then
            rednet.send(furnace, "getStatus", "furnaceSystem");
            local from, message = rednet.receive("furnaceSystem", 1);
        end

        if message == nil then message = false end
        if from == furnace and message == true then
            connected = connected + 1;
        end
    end
    if connected == 0 then return "Offline";
    elseif connected > 0 and connected < 8 then return "Partially Online"
    elseif connected == 8 then return "Online";
    end
end

function main()
    while true do
        status = getData();
        sleep(0);
    end
end

function api()
    while true do
        local from, message = rednet.receive("API");
        if message == "getFurnaceData" then
            print(status);
            rednet.send(from, status, "API");
        end
        sleep(0);
    end
end

parallel.waitForAny(main, api);