react4

local reactor
local temp
local energy
local rdata

function refreshdata()
  local datarec = {}
  datarec.connected = reactor.getConnected()
  datarec.active = reactor.getActive()
  datarec.getnumrods = reactor.getNumberOfControlRods()
  datarec.energy = reactor.getEnergyStored()
  datarec.fueltemp = reactor.getFuelTemperature()
  datarec.casetemp = reactor.getCasingTemperature()
  datarec.fuelamt = reactor.getFuelAmount()
  datarec.wasteamt = reactor.getWasteAmount()
  datarec.capacity = reactor.getFuelAmountMax()
  datarec.rodname = reactor.getControlRodName(0)
  datarec.rodlevel = reactor.getControlRodLevel(0)
  return datarec
end

reactor = peripheral.wrap("back")
-- temp = reactor.getFuelTemperature()
-- energy = reactor.getEnergyStored()
-- term.write(" temp ")
-- term.write(temp)
-- term.write(" energy" )
-- term.write(energy)
term.clear()

rdata = refreshdata()
while rdata.connected and rdata.active do
  rdata = refreshdata()
 -- term.clear()
  term.setCursorPos(1,1)
  term.write(" energy ")
  term.write(rdata.energy)
  term.setCursorPos(1,2)
  term.write(" rodlevel ")
  term.write(rdata.rodlevel)
  term.setCursorPos(5,5)
--  term.write(i)

  if rdata.energy < 9000000 and rdata.rodlevel > 0 then

    reactor.setControlRodLevel(0,0)
    term.setCursorPos(6,6)
    term.write("pullrod")
  else if rdata.energy > 9000000 and rdata.rodlevel == 0 then

     reactor.setControlRodLevel(0,100)
     term.setCursorPos(7,7)
     term.write("pushrod")
  else
     term.setCursorPos(6,6)
     term.write("f     f")
     term.setCursorPos(7,7)
     term.write("f     f")
  end
  os.sleep(2)
end
end
term.setCursorPos(0,8)
term.write("shutdown")
term.setCursorPos(0,9)