capI = peripheral.wrap("cofh_thermalexpansion_energycell_0")
capII = peripheral.wrap("cofh_thermalexpansion_energycell_1")
y = 0
z = 0
function cap_1()
  cap1 = capI.getEnergyStored("nort") / capI.getMaxEnergyStored("north")
  cap1 = cap1 * 100
end

function cap_2()
  cap2 = capII.getEnergyStored("north") / capII.getMaxEnergyStored("north")
  cap2 = cap2 * 100
end

function redstone()
  if rs.testBundledInput("left", colors.blue) == true then
    x = 1
    y = 0
    rs.setOutput("right", true)
  else
    if (rs.testBundledInput("left", colors.white) == false) and (z == 0) then
      if cap1  > 90 then
         rs.setOutput("right", false)
         x = 0
         if y == 0 then
           rs.setOutput("top", true)
           sleep(1)
           rs.setOutput("top", false)
            y = 1
         end
      elseif cap1 < 30 then
         rs.setOutput("right", true)
         x = 1
         y = 0
      end
    else
       rs.setOutput("right", true)
       x = 1
       y = 0
       if rs.testBundledInput("left", colors.orange) == false then
         z = 0
       else
         z = 1
       end
     end
  end
end

function energy()
  io1 = capII.getEnergyStored("north")
  sleep(1)
  io2 = capII.getEnergyStored("north")
  IO = io2 - io1
end

function monitor()
 energy()
 m.clear()
 m.setBackgroundColor(59)
 m.setTextColor(1875)
   m.setCursorPos(15,12)
  if IO > 0 then
    m.write("Input: " ..IO)
  else
    m.write("Output: " ..IO)
  end
  m.setCursorPos(15,3)
  m.write("Energy Stored")
  m.setCursorPos(15,4)
  m.write("capacitor II.")
  m.setCursorPos(15,5)
  m.write(capII.getEnergyStored("north"))
  m.setCursorPos(15,6)
  m.write(cap2.. "%")
  m.setCursorPos(15,9)
  m.write("capacitor I.")
  m.setCursorPos(15,10)
  m.write(capI.getEnergyStored("north"))
  m.setCursorPos(15,11)
  m.write(cap1.. "%")
  m.setCursorPos(5,16)
  if x == 0 then
  m.write("Redstone signal: Off")
  m.setCursorPos(5,17)
  m.write("Quarry: On")
  m.setCursorPos(5,15)
  m.write("Buffer: Low")
  else
   if y == 0 then
     m.write("Redstone signal: On")
     m.setCursorPos(5,15)
     m.write("Buffer: Empty")
   else
     if z == 0 then
       m.write("Redstone signal: Off-Low energy")
       m.setCursorPos(5,15)
       m.write("Buffer: Empty")
     else
       m.write("Redstone signal: On")
       m.setCursorPos(5,15)
       m.write("Buffer: Full")
     end
   end
  m.setCursorPos(5,17)
  m.write("Quarry: Off")
  end
end

while true do
  cap_1()
  cap_2()
  if rs.testBundledInput("left", colors.blue) == true then
    y = 0
  else
    y = 1
  end
  redstone()
  m = peripheral.wrap("monitor_0")
  monitor()
  m = peripheral.wrap("monitor_1")
  monitor()
  sleep(1)
end