RC2

R=peripheral.wrap("back")
M=peripheral.wrap("top")

while true do
L = R.getControlRodLevel(0)
S = R.getHotFluidProducedLastTick()
T = R.getHotFluidAmount()
W = R.getWasteAmount()
W = W+W
a = 0

 if S < 143 then
   a=a-1
 end
 if S > 146 then
  a=a+1
 end
 if T < W +1000 then
 a=a-2
 end
 if T > W +3000 then
 a=a+2
 end

 if L+a <99 then
  if L+a >1 then
   R.setControlRodLevel(0,L+a)
  end
 end
 M.clear()
 M.setCursorPos(1,1)
 M.write("Regler I Rod-%")
 M.setCursorPos(1,2)
 M.write(" "..T-W.." ")
 M.setCursorPos(8,2)
 M.write("I  "..L+a.." ")

-- print(" "..L+a.." ")
-- print(" "..W.." ")
 sleep(5)
end