BigReactors Reactor Screen 0.2

--[[
BigReactors Reactor Screen 0.2 for 0.3 by Tim3Game (Tested on BigReactors 0.34)
U can use this program, but not the issue for their own
]]--

while true do
  mon = peripheral.wrap("monitor_1")
  rea1 = peripheral.wrap("BigReactors-Reactor_1")
  chat = peripheral.wrap("bottom")
  -- Rednet (Computer ID's)
  owner = "5"

  -- Title
  mon.clear()
  mon.setCursorPos(3,1)
  mon.setTextColor(colors.red)
  mon.setTextScale(1)
  mon.write("BigReactors Reactor Screen")

  -- Status
  mon.setCursorPos(1,2)
  mon.setTextColor(colors.white)
  mon.write("STATUS: ")
    if rea1.getActive()==true then
      mon.setTextColor(colors.green)
      mon.write("ON")
    else
      mon.setTextColor(colors.red)
      mon.write("OFF")
    end

  -- RF/t
  mon.setCursorPos(1,3)
  mon.setTextColor(colors.white)
  mon.write("RF/t: ")
  mon.setTextColor(colors.lime)
  mon.write(rea1.getEnergyProducedLastTick())
  -- RF/s
  mon.setCursorPos(1,4)
  mon.setTextColor(colors.white)
  mon.write("RF/s: ")
  mon.setTextColor(colors.lime)
  mon.write(rea1.getEnergyProducedLastTick()*20)

  -- Stored
  mon.setCursorPos(1,5)
  mon.setTextColor(colors.white)
  mon.write("Stored: ")
  mon.setTextColor(colors.lime)
  mon.write(rea1.getEnergyStored())
  mon.write(" RF")

  -- Fuel Consume
  mon.setCursorPos(1,6)
  mon.setTextColor(colors.white)
  mon.write("Consumed: ")
  mon.setTextColor(colors.lime)
  mon.write(rea1.getFuelConsumedLastTick())

  -- Temperature
  mon.setCursorPos(5,7)
  mon.setTextColor(colors.red)
  mon.write("--- TEMPERATURE ---")
  -- Case temperatur
  mon.setCursorPos(1,8)
  mon.setTextColor(colors.white)
  mon.write("Case: ")
  mon.setTextColor(colors.lime)
  mon.write(rea1.getCasingTemperature())
  -- Fuel Temperatur
  mon.setCursorPos(1,9)
  mon.setTextColor(colors.white)
  mon.write("Fuel: ")
  mon.setTextColor(colors.lime)
  mon.write(rea1.getFuelTemperature())

-- Automatic shut-off when the reactor is turned off because it's full
  if rea1.getEnergyStored()==10000000 then
    rea1.setActive(false)
  end
  if rea1.getEnergyStored()==9999998 then
    chat.say("Reactor1:The reactor is full RF, so automatically turn off.")
    rednet.send(owner,"Reactor1:The reactor is full RF, so automatically turn off.")
  end



-- Messages for Chatbox (Moar Peripheral)
  --Message for: 100k RF Storage
  if rea1.getEnergyStored()==100000 then
    chat.say("Reactor1: Reactor have 100k RF Stored.")
  end
  --Message for: 500k RF Storage
  if rea1.getEnergyStored()==500000 then
    chat.say("Reactor1: Reactor have 500k RF Stored.")
  end
  --Message for: 1m RF Storage
  if rea1.getEnergyStored()==1000000 then
    chat.say("Reactor1: Reactor have 1m RF Stored.")
  end
  --Message for: 5m RF Storage
  if rea1.getEnergyStored()==5000000 then
    chat.say("Reactor1: Reactor have 5m RF Stored.")
  end
  --Message for: 10m RF Storage
  if rea1.getEnergyStored()==9999998 then
    chat.say("Reactor1: Reactor have 10m RF Stored.")
  end

-- Messages for RedNet (Computercraft)
  --Message for: 100k RF Storage
  if rea1.getEnergyStored()==100000 then
    rednet.send(owner,"Reactor1: Reactor have 100k RF Stored.")
  end
  --Message for: 500k RF Storage
  if rea1.getEnergyStored()==500000 then
    rednet.send(owner,"Reactor1: Reactor have 500k RF Stored.")
  end
  --Message for: 1m RF Storage
  if rea1.getEnergyStored()==1000000 then
    rednet.send(owner,"Reactor1: Reactor have 1m RF Stored.")
  end
  --Message for: 5m RF Storage
  if rea1.getEnergyStored()==5000000 then
    rednet.send(owner,"Reactor1: Reactor have 5m RF Stored.")
  end
  --Message for: 10m RF Storage
  if rea1.getEnergyStored()==9999998 then
    rednet.send(owner,"Reactor1: Reactor have 10m RF Stored.")
  end
  sleep(1)
end