mepowermonitor

MonitorSide = "top"
GlassesSide = "left"
BackupGeneratorSide = "top"
Monitor1 = peripheral.wrap("monitor_82")
Monitor2 = peripheral.wrap("monitor_83")
Glasses = peripheral.wrap(GlassesSide)
EmergencyActivationPercentage = 50
cell1 = peripheral.wrap("cofh_thermalexpansion_energycell_118")
cell2 = peripheral.wrap("cofh_thermalexpansion_energycell_119")
cell3 = peripheral.wrap("cofh_thermalexpansion_energycell_120")
cell4 = peripheral.wrap("cofh_thermalexpansion_energycell_121")
cell5 = peripheral.wrap("cofh_thermalexpansion_energycell_122")
cell6 = peripheral.wrap("cofh_thermalexpansion_energycell_123")
cell7 = peripheral.wrap("cofh_thermalexpansion_energycell_124")
cell8 = peripheral.wrap("cofh_thermalexpansion_energycell_125")

function GetHexFromColour(clr)
    local colourOut = 0xCC4C4C --red
    if (clr == colours.white)  then colourOut = 0xFFFFFF end
    if (clr == colours.orange) then colourOut = 0xF2B233 end
    if (clr == colours.yellow) then colourOut = 0xDEDE6C end
    if (clr == colours.green)  then colourOut = 0x57A64E end
    if (clr == colours.cyan)   then colourOut = 0x4C99B2 end
    return colourOut;
end

function GetColourFromPercent(percentage)
    local colourOut = colours.red
    if (percentage > 15) then colourOut = colours.orange end
    if (percentage > 45) then colourOut = colours.yellow end
    if (percentage > 70) then colourOut = colours.green end
    if (percentage > 90) then colourOut = colours.cyan end
    return colourOut
end

function ClearScreens()
    Monitor1.setTextColor(colours.black)
    Monitor1.setBackgroundColor(colours.black)
    Monitor1.clear()
    Monitor1.setCursorPos(1,1)
    Monitor2.setTextColor(colours.black)
    Monitor2.setBackgroundColor(colours.black)
    Monitor2.clear()
    Monitor2.setCursorPos(1,1)
    Glasses.clear()
end

function DrawText(xPos, yPos, text, textColour, backgroundColour)
    Monitor1.setBackgroundColor(backgroundColour)
    Monitor1.setTextColor(textColour)
    Monitor1.setCursorPos(xPos,yPos)
    Monitor1.write(text)
    Monitor2.setBackgroundColor(backgroundColour)
    Monitor2.setTextColor(textColour)
    Monitor2.setCursorPos(xPos,yPos)
    Monitor2.write(text)
    Glasses.addText(xPos * 5, yPos * 8, text, GetHexFromColour(textColour))
end

function DrawLine(xPos, yPos, lineLength, colour)
    Monitor1.setBackgroundColor(colour)
    Monitor1.setTextColor(colour)
    Monitor1.setCursorPos(xPos,yPos)
    Monitor1.write(string.rep(" ", lineLength))
    Monitor2.setBackgroundColor(colour)
    Monitor2.setTextColor(colour)
    Monitor2.setCursorPos(xPos,yPos)
    Monitor2.write(string.rep(" ", lineLength))
    Glasses.addBox(xPos * 5, yPos * 5, lineLength * 5, 5, GetHexFromColour(colour), 1)
end

function ProgressBar(xPos, yPos, barLength, value, maxValue, backgroundColour, progressColour)
    DrawLine(xPos, yPos, barLength, backgroundColour) --backgoround bar
    local barSize = math.floor((value/maxValue) * barLength)
    DrawLine(xPos, yPos, barSize, progressColour) --progress so far
end

function DrawPowerBar(monitorX, yPos, cellName, cellEnergy, cellMaxEnergy, cellPercent, barColour)
    DrawText(3, yPos, cellName, colours.white, colours.black)
    ProgressBar(10, yPos, monitorX - 15, cellEnergy, cellMaxEnergy, barColour, GetColourFromPercent(cellPercent))
    DrawText(monitorX - 4, yPos, cellPercent .. "%", colours.white, colours.black)
end

function FetchAndRedraw()
    Monitor1.setTextScale(1)
    Monitor2.setTextScale(1)
    local monX, monY = Monitor1.getSize()

    local cell1Energy = cell1.getEnergyStored("unknown")
    local cell2Energy = cell2.getEnergyStored("unknown")
    local cell3Energy = cell3.getEnergyStored("unknown")
    local cell4Energy = cell4.getEnergyStored("unknown")
    local cell5Energy = cell5.getEnergyStored("unknown")
    local cell6Energy = cell6.getEnergyStored("unknown")
    local cell7Energy = cell7.getEnergyStored("unknown")
    local cell8Energy = cell8.getEnergyStored("unknown")

    local cell1MaxEnergy = cell1.getMaxEnergyStored("unknown")
    local cell2MaxEnergy = cell2.getMaxEnergyStored("unknown")
    local cell3MaxEnergy = cell3.getMaxEnergyStored("unknown")
    local cell4MaxEnergy = cell4.getMaxEnergyStored("unknown")
    local cell5MaxEnergy = cell5.getMaxEnergyStored("unknown")
    local cell6MaxEnergy = cell6.getMaxEnergyStored("unknown")
    local cell7MaxEnergy = cell7.getMaxEnergyStored("unknown")
    local cell8MaxEnergy = cell8.getMaxEnergyStored("unknown")

    local cell1Percent = math.floor((cell1Energy / cell1MaxEnergy) * 100)
    local cell2Percent = math.floor((cell2Energy / cell2MaxEnergy) * 100)
    local cell3Percent = math.floor((cell3Energy / cell3MaxEnergy) * 100)
    local cell4Percent = math.floor((cell4Energy / cell4MaxEnergy) * 100)
    local cell5Percent = math.floor((cell5Energy / cell5MaxEnergy) * 100)
    local cell6Percent = math.floor((cell6Energy / cell6MaxEnergy) * 100)
    local cell7Percent = math.floor((cell7Energy / cell7MaxEnergy) * 100)
    local cell8Percent = math.floor((cell8Energy / cell8MaxEnergy) * 100)

    local c1c
    local c2c
    local c3c
    local c4c
    local c5c
    local c6c
    local c7c
    local c8c

    if (cell1Percent == 0) then c1c = colours.red else c1c = colours.grey end
    if (cell2Percent == 0) then c2c = colours.red else c2c = colours.grey end
    if (cell3Percent == 0) then c3c = colours.red else c3c = colours.grey end
    if (cell4Percent == 0) then c4c = colours.red else c4c = colours.grey end
    if (cell5Percent == 0) then c5c = colours.red else c5c = colours.grey end
    if (cell6Percent == 0) then c6c = colours.red else c6c = colours.grey end
    if (cell7Percent == 0) then c7c = colours.red else c7c = colours.grey end
    if (cell8Percent == 0) then c8c = colours.red else c8c = colours.grey end

    local totalEnergyPercentage = cell1Percent + cell2Percent + cell3Percent + cell4Percent + cell5Percent + cell6Percent + cell7Percent + cell8Percent
    local shouldEmergencyPowerBeOn = totalEnergyPercentage < EmergencyActivationPercentage

    ClearScreens()

    DrawPowerBar(monX, 2,  "Cell 1", cell1Energy, cell1MaxEnergy, cell1Percent, c1c)
    DrawPowerBar(monX, 4,  "Cell 2", cell2Energy, cell2MaxEnergy, cell2Percent, c2c)
    DrawPowerBar(monX, 6,  "Cell 3", cell3Energy, cell3MaxEnergy, cell3Percent, c3c)
    DrawPowerBar(monX, 8,  "Cell 4", cell4Energy, cell4MaxEnergy, cell4Percent, c4c)
    DrawPowerBar(monX, 10, "Cell 5", cell5Energy, cell5MaxEnergy, cell5Percent, c5c)
    DrawPowerBar(monX, 12, "Cell 6", cell6Energy, cell6MaxEnergy, cell6Percent, c6c)
    DrawPowerBar(monX, 14, "Cell 7", cell7Energy, cell7MaxEnergy, cell7Percent, c7c)
    DrawPowerBar(monX, 16, "Cell 8", cell8Energy, cell8MaxEnergy, cell8Percent, c8c)

    DrawText(3, 18, "Emergency Power", colours.white, colours.black)

    if (shouldEmergencyPowerBeOn) then
        redstone.setOutput(BackupGeneratorSide, true)
        DrawText(3, 19, "ONLINE", colours.white, colours.green)

    else
        redstone.setOutput(BackupGeneratorSide, false)
        DrawText(3, 19, "OFFLINE", colours.white, colours.red)
    end
end

while true do
    FetchAndRedraw()
    os.sleep(2)
end