Reactor control (Big Reactor)

--Variables--
local reactorNum = 1
local rods = 1
local reactor = peripheral.wrap("right")
--
local mode = "manual"
local modem = peripheral.wrap("right")
local rodsPos = {}

--Functions--
local function round(num, idp)
  local mult = 10^(idp or 0)
  return math.floor(num * mult + 0.5) /mult
end

local function Checks(Rods)

    --steam prod--
    SteamProd = reactor.getHotFluidProducedLastTick()
    term.setTextColor(colors.lime)
    term.setCursorPos(1,7)
    term.write(round(SteamProd))
    --steam buffer--
    SteamBuffer = reactor.getHotFluidAmount()
    term.setTextColor(colors.lime)
    term.setCursorPos(1,9)
    term.write(round(SteamBuffer))
    --core temp--
    Coretemp = reactor.getFuelTemperature()
    term.setTextColor(colors.lime)
    term.setCursorPos(1,11)
    term.write(round(Coretemp))
    --case temp--
    Casetemp = reactor.getCasingTemperature()
    term.setTextColor(colors.lime)
    term.setCursorPos(1,13)
    term.write(round(Casetemp))

    if rods < 1 then
        term.setTextColor(colors.orange)
        term.setCursorPos(1,15)
        term.write("Error")
    end


    for i = 0, rods do
        j = i + 1
        rodsPos[j] = reactor.getControlRodLevel(i)
        term.setTextColor(colors.lime)
        c = i + 4
        term.setCursorPos(c,15)
        term.write(round(rodsPos[j]))
    end

end

term.clear()
term.setTextColor(colors.blue)
term.setCursorPos(1,1)
term.write("Reactor "..reactorNum)

term.setTextColor(colors.red)
term.setCursorPos(1,2)
term.write("Status: ")
term.setCursorPos(1,4)
term.write("Mode: ")
term.setCursorPos(1,6)
term.write("Steam produce Mb/T: ")
term.setCursorPos(1,8)
term.write("Steam buffer Mb/T: ")
term.setCursorPos(1,10)
term.write("Core T: ")
term.setCursorPos(1,12)
term.write("Case-Heat T: ")
term.setCursorPos(1,14)
term.write("Rods Pos.: ")

while true do
parallel.waitForAny(Checks(Rods))
end