base-bees

local confMainPort = 1000
local confMyPort = 1004

local beeData = {}

if(not os.loadAPI("hydraApi")) then
    error("Could not load hydraApi")
end

local modem = hydraApi.getModem(true)
local net = hydraApi.getModem(false)
local alv = hydraApi.getAllAlvearies()

if(modem == nil) then
    print("No wireless modem found.")
end

while true do
    local data = ""
    local queenData = {}

    for key, a in pairs(alv) do
        local tableItem = a.getStackInSlot(0)
        local tableQueen = a.getQueen()

        if(tableQueen == nil) then -- No queen
            queenData["name"] = "Empty"
            queenData["empty"] = true
            queenData["health"] = 0
            queenData["maxHealth"] = 0
            queenData["fraction"] = 0
        else
            queenData["name"] = string.gsub(tableItem["name"], " Queen","")
            queenData["health"] = tableQueen["Health"]
            queenData["maxHealth"] = tableQueen["MaxHealth"]
            queenData["fraction"] = tableQueen["Health"] / tableQueen["MaxHealth"]
            queenData["empty"] = false
        end

        print(queenData["name"] .. ": " .. tostring(queenData["health"]) .. " " .. hydraApi.formatPercent(queenData["fraction"]))

        beeData[key] = queenData
    end

    if(modem ~= nil) then
        modem.transmit(confMainPort, confMyPort, beeData)
    end

    os.sleep(2)
end