p

while true do

  local Reactor = peripheral.wrap("right")
  EnergyLevel = Reactor.getEnergyStored()

  if EnergyLevel <= 5000 then
    Reactor.setActive(true)
  end

  if EnergyLevel >= 9995000 then
    Reactor.setActive(false)
  end

  term.clear()
  term.setCursorPos(1,1)


  RodLevels = {}

  local NumberOfRods = Reactor.getNumberOfControlRods()

  for i = 1, NumberOfRods do
    RodLevels[i] = Reactor.getControlRodLevel(i-1)

  end

  for key, value in pairs(RodLevels) do
    print("Rod " .. key ..": " .. value)
  end

  print("Enter ALL or individual rod number to change:")
  local input = read()

  print("Now enter the desired rod setting:")
  local RodSetting = tonumber(read())

  if input == "ALL" then
    Reactor.setAllControlRodLevels(RodSetting)

  elseif input ~= "ALL" then
    for x = 1, NumberOfRods do
      if tonumber(x) == tonumber(input) then
        Reactor.setControlRodLevel(x-1, RodSetting)
      end
    end
  end

  sleep(1)
end