os.loadAPI "monAPI"
local turbine1
local reactor1
local mon = monAPI.wrapMonitor("right")

mon.setTextColor(colors.white)
mon.setBackgroundColor(colors.black)
mon.clear()
mon.setCursorPos(1,1)
mon.setTextScale(0.5)

local section1 = mon.createSection(1,1,20,19)
section1.clear()
local section2 = mon.createSection(21,1,51,19)
section2.clear()
local section3 = mon.createSection(52,1,82,19)
section3.clear()


while true do
  rednet.open("back")
  id,message = rednet.receive()

  if  id == 158 then
   section2.clear()
   section2.setTextColor(colors.yellow)
   section2.drawBorder('#','#','+')
   section2.setCursorPos(2,3)
   section2.setTextColor(colors.white)
   section2.write('Turbine - Reactor Bank 1')
   section2.setCursorPos(2,4)
   section2.write('Data Broadcast Received')
   section2.setCursorPos(2,5)
   section2.write('System Status')
   section2.setCursorPos(2,7)
   section2.write('Turbine:')
   section2.setCursorPos(2,8)
    if message["turbine1rpm"] >= 1725 then
      section2.setTextColor(colors.green)
     elseif message["turbine1rpm"] >= 800 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('RPM: '..message["turbine1rpm"]..'')
   section2.setCursorPos(2,9)
    if message["turbine1Flow"] >= 1950 then
      section2.setTextColor(colors.green)
     elseif message["turbine1Flow"] >= 1000 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('Flow Rate: '..message["turbine1Flow"]..'mb/t')
   section2.setCursorPos(2,10)
    if message["turbine1RFT"] >= 25000 then
      section2.setTextColor(colors.green)
     elseif message["turbine1RFT"] >= 14000 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('Generation: '..message["turbine1RFT"]..' rf/t')
   section2.setCursorPos(2,11)
    if message["turbine1capacitor"] >= 900000 then
      section2.setTextColor(colors.green)
     elseif message["turbine1capacitor"] >= 400000 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('Capacitor: '..message["turbine1capacitor"]..'')
   section2.setCursorPos(2,13)
   section2.setTextColor(colors.white)
   section2.write('Reactor:')
   section2.setCursorPos(2,14)
    if message["reactor1Temp"] <= 700 then
      section2.setTextColor(colors.green)
     elseif message["reactor1Temp"] <= 800 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('Temp: '..message["reactor1Temp"]..'')
   section2.setCursorPos(2,15)
    if message["reactor1Steam"] >= 1950 then
      section2.setTextColor(colors.green)
     elseif message["reactor1Steam"] >= 1000 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('Steam Pressure: '..message["reactor1Steam"]..'')
   section2.setCursorPos(2,16)
    if message["reactor1Fuel"] <= 0.06 then
      section2.setTextColor(colors.green)
     elseif message["reactor1Fuel"] <= 0.05 then
      section2.setTextColor(colors.orange)
     else
      section2.setTextColor(colors.red)
    end
   section2.write('Fuel Consumption: '..message["reactor1Fuel"]..'')

 elseif id  == 159 then
   section3.clear()
   section3.setTextColor(colors.yellow)
   section3.drawBorder('#','#','+')
   section3.setCursorPos(2,3)
   section3.setTextColor(colors.white)
   section3.write('Turbine - Reactor Bank 2')
   section3.setCursorPos(2,4)
   section3.write('Data Broadcast Received')
   section3.setCursorPos(2,5)
   section3.write('System Status')
   section3.setCursorPos(2,7)
   section3.write('Turbine:')
   section3.setCursorPos(2,8)
    if message["turbine1rpm"] >= 1725 then
      section3.setTextColor(colors.green)
     elseif message["turbine1rpm"] >= 800 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('RPM: '..message["turbine1rpm"]..'')
   section3.setCursorPos(2,9)
    if message["turbine1Flow"] >= 1950 then
      section3.setTextColor(colors.green)
     elseif message["turbine1Flow"] >= 1000 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('Flow Rate: '..message["turbine1Flow"]..'mb/t')
   section3.setCursorPos(2,10)
    if message["turbine1RFT"] >= 25000 then
      section3.setTextColor(colors.green)
     elseif message["turbine1RFT"] >= 14000 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('Generation: '..message["turbine1RFT"]..' rf/t')
   section3.setCursorPos(2,11)
    if message["turbine1capacitor"] >= 900000 then
      section3.setTextColor(colors.green)
     elseif message["turbine1capacitor"] >= 400000 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('Capacitor: '..message["turbine1capacitor"]..'')
   section3.setCursorPos(2,13)
   section3.setTextColor(colors.white)
   section3.write('Reactor:')
   section3.setCursorPos(2,14)
    if message["reactor1Temp"] <= 700 then
      section3.setTextColor(colors.green)
     elseif message["reactor1Temp"] <= 800 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('Temp: '..message["reactor1Temp"]..'')
   section3.setCursorPos(2,15)
    if message["reactor1Steam"] >= 1950 then
      section3.setTextColor(colors.green)
     elseif message["reactor1Steam"] >= 1000 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('Steam Pressure: '..message["reactor1Steam"]..'')
   section3.setCursorPos(2,16)
    if message["reactor1Fuel"] <= 0.06 then
      section3.setTextColor(colors.green)
     elseif message["reactor1Fuel"] <= 0.05 then
      section3.setTextColor(colors.orange)
     else
      section3.setTextColor(colors.red)
    end
   section3.write('Fuel Consumption: '..message["reactor1Fuel"]..'')
 end

 end