startup

local m = peripheral.wrap("right")
local r = peripheral.wrap("left")
local cb = peripheral.wrap("top")

local menu_options = {
  [1] = {text="Demarrer", color=colors.green},
  [2] = {text="Arreter", color=colors.red},
  [3] = {text="Quitter", color=colors.white}
}

local termX, termY = term.getSize()
local alert = false
local maxtemp = 100
local error = ""

local function menuDraw(selected)
  local yPos = termY/2 - #menu_options/2
  for index, data in pairs(menu_options) do
    menu_options[index].bounds = {
      x1 = termX/2 - (#data.text+4)/2;
      x2 = termX/2 + (#data.text+4)/2;
      y = yPos;
    }
    term.setTextColor(data.color)
    term.setCursorPos(data.bounds.x1, data.bounds.y)

    local text = index==selected and "[ "..data.text.." ]" or "  "..data.text.."  "
    term.write(text)
    yPos = yPos+1
  end
end

local function verifheat()
  a,b,c,i = r.get(1)
  if a == nil then
    return true
  end
  term.setTextColor(colors.orange)
  term.setCursorPos(1,termY-1)
  term.write("Temp : "..i["heat"].."         ")
  if i["heat"]>=maxtemp then
    if alert == false then
      alert = true
      cb.say("Reacteur en surchauffe !")
    end
    redstone.setOutput("back", true)
    m.transmit(1,1,"stop")
    term.setTextColor(colors.red)
    term.setCursorPos(1,termY)
    term.write("Le reacteur est arrete.         ")
    return false
  else
    if alert == true then
      alert = false
      cb.say("Reacteur revenu a la normale !")
    end
    redstone.setOutput("back", false)
    return false
  end
end

term.clear()

local selector = 1

while true do
  menuDraw(selector)
  if verifheat() then
    error = "Mauvaise carte dans le lecteur !"
    break
  end
  os.startTimer(0.2)
  local e = {os.pullEvent()}
  if e[1] == "key" then
    if e[2] == keys.down then
      selector = selector < #menu_options and selector+1 or 1
    elseif e[2] == keys.up then
      selector = selector > 1 and selector-1 or #menu_options
    elseif e[2] == keys.enter then
      if selector == 1 then
        m.transmit(1, 1, "start")
        term.setTextColor(colors.green)
        term.setCursorPos(1, termY)
        term.write("Le reacteur est demarre.     ")
      elseif selector == 2 then
        m.transmit(1, 1,"stop")
        term.setTextColor(colors.red)
        term.setCursorPos(1, termY)
        term.write("Le reacteur est arrete.      ")
      elseif selector == 3 then
        break
      end
    end
  end
end

term.clear()
term.setTextColor(colors.white)
term.setCursorPos(1,1)
m.transmit(1, 1, "stop")
redstone.setOutput("back", false)
if error == "" then
  print("Fin du programme, reacteur arrete.")
else
  print(error)
end