BigReactors Reactor Screen

--[[
  BigReactors Screen - by Tim3Game
  WARNING: All is in Slovak
  ODPORUCANE:
  Advanced Monitor + Advanced Computer
  Editovat peripherali
--]]
while true do
  reactor = peripheral.wrap("BigReactors-Reactor_1")
  mon = peripheral.wrap("monitor_1")
  chat = peripheral.wrap("bottom")
  maxfuel = "10"
  rednetID = 1
  mon.clear()

  -- Funkcnost
  mon.setCursorPos(5,1)
  if reactor.getActive()==true then
    mon.setTextColor(colors.green)
    mon.write("ON")
  else
    mon.setTextColor(colors.red)
    mon.write("OFF")
  end

  -- Produkcia
  mon.setCursorPos(1,2)
  mon.setTextColor(colors.white)
  mon.write("RF/t: ")
  mon.setCursorPos(5,2)
  mon.setTextColor(colors.lime)
  mon.write(reactor.getEnergyProducedLastTick)

  -- Obsah
  mon.setCursorPos(1,3)
  mon.setTextColor(colors.white)
  mon.write("Obsah: ")
  mon.setCursorPos(5,3)
  mon.setTextColor(colors.lime)
  mon.write(reactor.getEnergyStored)

  -- Spotreba
  mon.setCursorPos(1,4)
  mon.setTextColor(colors.white)
  mon.write("Spotreba: ")
  mon.setCursorPos(5,4)
  mon.setTextColor(colors.lime)
  mon.write(reactor.getFuelConsumedLastTick)

-- TEPLOTY
  mon.setCursorPos(1,5)
  mon.setTextColor(colors.red)
  mon.write("TEPLOTY")
  -- Teplota obalu
  mon.setCursorPos(1,6)
  mon.setTextColor(colors.white)
  mon.write("Obal: ")
  mon.setCursorPos(5,6)
  mon.setTextColor(colors.lime)
  mon.write(reactor.getCasingTemperature)
  -- Teplota Jadra
  mon.setCursorPos(1,7)
  mon.setTextColor(colors.white)
  mon.write("Jadro: ")
  mon.setCursorPos(5,7)
  mon.setTextColor(colors.lime)
  mon.write(reactor.getFuelTemperature)

-- AUTOMATICKE VYPNUTIE PRI VELKEJ SPOTREBE PALIVA

  --if reactor.getFuelConsumedLastTick > maxfuel then
  --  reactor.setActive(false)
  --    rednet.send(rednetID, Reaktor bol vypnuti kvoli vysokej spotrebe paliva)
  --end