power

function getHandle(peripheralMatch)
  local peripheralList = peripheral.getNames()
  local i, name

  for i, name in pairs(peripheralList) do
    if peripheral.getType(name) == peripheralMatch then
      return peripheral.wrap(name)
    end
  end
  return 0
end


reactor = getHandle("BigReactors-Reactor")
assert(reactor ~= 0, "Could Not Connect to a Reactor")

storage = getHandle("draconic_rf_storage")
if storage == 0 then storage = reactor end


function display(active, rodLevel, producedLastTick, storedEnergy)

  monitorDisplay(term, active, rodLevel, producedLastTick, storedEnergy)


  mon = getHandle("monitor")
  monitorDisplay(mon, active, rodLevel, producedLastTick, storedEnergy)

end

function monitorDisplay(mon, active, rodLevel, producedLastTick, storedEnergy)

  mon.clear()

  mon.setCursorPos(1,2)
  mon.write("Status: ")
  if active then
    mon.write("ON")
  else
    mon.write("OFF")
  end

  mon.setCursorPos(1,3)
  mon.write("Rod Level: "..rodLevel.."%")

  mon.setCursorPos(1,4)
  mon.write("Producing: "..math.floor(producedLastTick/1000 + 0.5).."kRF/t")

  mon.setCursorPos(1,5)
  mon.write("Stored: "..storedEnergy)

end

while true do

  active = reactor.getActive
  rodLvl = reactor.getControlRodLevel(1)
  producedLastTick = reactor.getEnergyProducedLastTick()
  storedEnergy = storage.getEnergyStored()

  display(active, rodLvl, producedLastTick, storedEnergy)

  sleep(1)

end