startup

t1 = peripheral.wrap("BigReactors-Turbine_0")
t2 = peripheral.wrap("BigReactors-Turbine_1")
t3 = peripheral.wrap("BigReactors-Turbine_2")
t4 = peripheral.wrap("BigReactors-Turbine_3")

m = peripheral.wrap("back")

print("Peripherals ConnectåA9s")

function actif(turbine)
  if turbine.getActive() then return true
  else return false end
end

function writeColor(color, text)
  if (m.isColor()) then
    m.setTextColor(color)
  end
  m.write(text)
  if (m.isColor()) then
    m.setTextColor(colors.white)
  end
end

function centerPrintM(text, y)
  local w,h = m.getSize()
    m.setCursorPos(w/2 - text:len()/2, y)
    m.write(text)
end

function getEnergyProd(turbine)
  local prod = math.ceil(turbine.getEnergyProducedLastTick())
  return prod - 0
end

function scp(x,y)
  m.setCursorPos(x,y)
end

function demandeActif(turbine)
  if actif(turbine) then
    writeColor(colors.green,"ON")
  else
    writeColor(colors.red,"OFF")
  end
end

function getSpeed(turbine)
  local speed = turbine.getRotorSpeed()
  return speed - 0
end

print("Initialisation TerminåA9e")
print("DåA9but du programme")

function Main()
m.clear()

centerPrintM("  Turbines",2)
scp(2,4)
m.write("N¥B0")
scp(6,4)
m.write("Statut")
scp(15,4)
m.write("Prod.")
scp(24,4)
m.write("RPM")

scp(2,6)
m.write("#1")
scp(2,7)
m.write("#2")
scp(2,8)
m.write("#3")
scp(2,9)
m.write("#4")

--

scp(8,6)
demandeActif(t1)

scp(8,7)
demandeActif(t2)

scp(8,8)
demandeActif(t3)

scp(8,9)
demandeActif(t4)

--

scp(12,6)
m.write(getEnergyProd(t1).." RF/t")

scp(12,7)
m.write(getEnergyProd(t2).." RF/t")

scp(12,8)
m.write(getEnergyProd(t3).." RF/t")

scp(12,9)
m.write(getEnergyProd(t4).." RF/t")

--

scp(24,6)
m.write(getSpeed(t1))

scp(24,7)
m.write(getSpeed(t2))

scp(24,8)
m.write(getSpeed(t3))

scp(24,9)
m.write(getSpeed(t4))

--

EnergyTotal = getEnergyProd(t1) + getEnergyProd(t2) + getEnergyProd(t3) + getEnergyProd(t4)
centerPrintM("Total : "..EnergyTotal.." RF/t",11)
EnergyTotal = 0
end

while true do
Main()
sleep(0.1)
end