local component = require("component")
local term = require("term")
local event = require("event")

if not component.isAvailable("nc_fission_reactor") then
  print("Reactor not connected. Please connect the computer to the fission reactor.")
  os.exit()
end

local x , y = component.gpu.maxResolution()
local x = math.min(y,24) * 2
component.gpu.setResolution(x,x/2)

local reactor,MHP,WSEP,runv,help,auto,E,H,C,G = component.nc_fission_reactor,50,75,true,true,false

function run(b)
 if b and runv then return true
  else runv = false
 end
end

function insert(table, key, content) table[key] = content end
function runf() run(false) end
function updatef() reactor.forceUpdate() end
function autof() if auto == true then auto = false else auto = true end end
function helpf() if help == true then help = false else help = true end end
local keyactions = {[35]=helpf,[30]=autof,[22]=updatef,[18]=runf}

local preG = math.floor(reactor.getReactorProcessHeat())
if preG > 0
  then G = preG
 else G = "None"
end

local Help = {
"",
"Press U to call an update to all the values",
"Press A to toggle Auto control : " .. tostring(auto),
"Press E to exit the script",
"Press H to toggle this help message",
"The script is really slow so",
"exept some delay on key presses"
}

while run(true) do

 if auto == true then
  SEP = reactor.getEnergyStored() / reactor.getMaxEnergyStored() * 100
  HP = reactor.getHeatLevel() / reactor.getMaxHeatLevel() * 100
  if HP > MHP or SEP > WSEP
   then reactor.deactivate()
   else reactor.activate()
  end
 end

  if term.isAvailable() then

   E = (math.floor(reactor.getEfficiency() * 10)) / 10
   H = (math.floor(reactor.getHeatMultiplier() * 10)) / 10
   C = math.floor(math.abs(reactor.getEnergyChange()))

  if G ~= "None" then G = math.floor(reactor.getReactorProcessHeat()) end

  local A = ""
  if reactor.isProcessing()
   then A = "Active"
   else A = "Standby"
  end

local L = {
"" ,
"" .. math.floor(reactor.getLengthX()) .. "x" .. math.floor(reactor.getLengthY()) .. "x" .. math.floor(reactor.getLengthZ()) .. " " .. A .. " Fission Reactor" ,
"Fuel :       " .. reactor.getFissionFuelName() ,
"             " .. reactor.getFissionFuelPower() .. " RF/t - " .. reactor.getFissionFuelHeat() .. " H/t",
"Efficiency : " .. E .. "%" ,
"Heat :       " .. H .. "%" ,
"Energy :     " .. math.floor(reactor.getEnergyStored()) .. " / " .. math.floor(reactor.getMaxEnergyStored()) ,
"Energy I/O : " .. C ,
"Heat :       " .. math.floor(reactor.getHeatLevel()) .. " / " .. math.floor(reactor.getMaxHeatLevel()) ,
"Heat Gen :   " .. G,
}

  term.clear()

  for i, v in ipairs(L) do
   term.setCursor(3,i)
   term.write(v)
  end

  if help == true then
  insert(Help,3,"Press A to toggle Auto control : " .. tostring(auto))
   for i,v in ipairs(Help) do
    term.setCursor(3,10+i)
    term.write(v)
   end
  end

  local ev, _ , _ , v2 = event.pull(0.3)
  if ev == "key_up" then
   if keyactions[v2] ~= nil then keyactions[v2]() end
  end
 end
end

reactor.deactivate()
term.clear()
if component.isAvailable("gpu") then
component.gpu.setResolution(component.gpu.maxResolution())
end