ecran_final

--/////////////////////////////////////////////////////////
--//----------- PROGRMAME COMPUTEUR CRAFT ---------------//
--//----------- ************************* ---------------//
--//------- AFFICHAGE DYNAMIQUE ET INTERACTIF -----------//
--//----- DE TUBINE ET REATEUR DE BIGREACTOR ------------//
--/////////////////////////////////////////////////////////

--Confguration
rednet.open("left")
local ecran=peripheral.wrap("top")
local idTurbine = "MasterEnergie"
local nbm = 8 --Nombre de turbin afficher
local k=0
parallel.waitForAll(Ecoute,Affichage,Tactille)
--////////////////////////////////////////////////////////
--//-------------------FUNCTION-------------------------//
--////////////////////////////////////////////////////////

-- Function de recuperation des infos envoye en wifi
function Ecoute()
    while true do
        local event, id, ID, TablData = os.pullEvent("rednet_message")
        if ID>=1 and  ID<=8 then
            --print(ID)
            data[ID]["PCon"]= false
            data[ID]=textutils.unserialize(TablData)
        elseif ID==100 then
            data100["PCon"]= false
            data100=textutils.unserialize(TablData)
        end
    end
end

-- Function du main d'affichage
function Affichage()
    Init()
    while true do --main
        k=k+1
        AffichageTurbine()
        AffichageReactor()
        os.sleep(0.8)
    end
end

-- Tout est dans le nom
function Tactile()

    local Mdata={}
    while true do
        local e, bt, yp, xp = os.pullEvent("monitor_touch")
        --Pour les turbines
        local i=1
        for i=1,nbm do
            local x=1 y=1
            if     i==1 then x=1  y=3
            elseif i==2 then x=1  y=52
            elseif i==3 then x=11 y=3
            elseif i==4 then x=11 y=52
            elseif i==5 then x=21 y=3
            elseif i==6 then x=21 y=52
            elseif i==7 then x=31 y=3
            elseif i==8 then x=31 y=52
            end
            --activee desactiver
            if yp>=y+6 and yp<=y+11  and xp>=x+2 and x<=x+5 then
                Mdata["numberTurbine"] = i
                Mdata["sInductor"] = data[i]["gInductor"]
                Mdata["sActive"] = !data[i]["gActive"]
            end
             --engagement desengagement
            if xp==x+1  and yp>=y+6  and yp<=y+12  then
                Mdata["numberTurbine"] = i
                Mdata["sActive"] = data[i]["gActive"]
                Mdata["sInductor"] =!data[i]["gInductor"]
            end
        end
        --pour le reacteur
        --activee desactiver
        if yp>=25 and yp<=33  and xp>=10 and x<=28 then
            Mdata["numberTurbine"] = i
            Mdata["sInductor"] = data[i]["gInductor"]
            Mdata["sActive"] = !data[i]["gActive"]
        end
        rednet.broadcast(idTurbine,textutils.serialize(Mdata))
        os.sleep(0.4)
    end
end

-- Function d'inisialisation
function Init()
    local cpt=1
    local data={}    --pour les turbins
    local data100={} --pour reactor
    data[1]={}
    data[2]={}
    data[3]={}
    data[4]={}
    data[5]={}
    data[6]={}
    data[7]={}
    data[8]={}
    data[100]={}

    windows = {} --pour les images
    windows[1] = window.create(ecran, 9 , 3 , 5, 5, true)--Tubines
    windows[2] = window.create(ecran, 58, 3 , 5, 5, true)
    windows[3] = window.create(ecran, 9 , 13, 5, 5, true)
    windows[4] = window.create(ecran, 58, 13, 5, 5, true)
    windows[5] = window.create(ecran, 9 , 23, 5, 5, true)
    windows[6] = window.create(ecran, 58, 23, 5, 5, true)
    windows[7] = window.create(ecran, 9 , 33, 5, 5, true)
    windows[8] = window.create(ecran, 58, 33, 5, 5, true)
    windows[100] = window.create(ecran, 31, 10, 9, 18, true)--Reactor
    windows[101] = window.create(ecran, 23, 2, 26, 6, true)--Titre

    --chargement
    ecran.setBackgroundColor(colors.blue)
    ecran.clear()
    line(10 ,20,50 ,4, colors.black)

    for cpt=1, 50 do
        line(10 ,20 ,cpt,4, colors.green)
        os.sleep(0.05)
    end
    os.sleep(0.5)
    ecran.setBackgroundColor(colors.black)
    ecran.clear()

    Titre = paintutils.loadImage("Titre")
    windows[101].setBackgroundColor(colors.black)
    windows[101].setTextColor(colors.black)
    windows[101].clear()
    term.redirect(windows[101])
    paintutils.drawImage(Titre, 1, 1)
end

-- Function d'affichage les donners des turbines
function AffichageTurbine()
    local turb
    if k == 5 then k = 1 end --pour les images

    local i=1
    for i=1,nbm do --data[1] a data[nbm]
        --chois de la position
        local x=1 y=1
        if     i==1 then x=1  y=3
        elseif i==2 then x=1  y=52
        elseif i==3 then x=11 y=3
        elseif i==4 then x=11 y=52
        elseif i==5 then x=21 y=3
        elseif i==6 then x=21 y=52
        elseif i==7 then x=31 y=3
        elseif i==8 then x=31 y=52
        end

        --Debut de l'affiche
        ecran.setTextColor(colors.white)
        ecran.setCursorPos(y+4,x)   --**--
        ecran.write("Turbine "..i)

        if data[i]["PCon"] == true then
            --L'activiter
            if data[i]["gActive"] == true then
                turb = paintutils.loadImage("turb"..k)
            else
                turb = paintutils.loadImage("turb0")
            end
            windows[i].setBackgroundColor(colors.black)
            windows[i].setTextColor(colors.black)
            windows[i].clear()
            term.redirect(windows[i])
            paintutils.drawImage(turb, 1, 1)

            --L'engagement
            if data[i]["gInductor"]==true then
                ecran.setCursorPos(y+4,x+1)
                ecran.setBackgroundColor(colors.black)
                ecran.write(" ")
                line(y+5 ,x+1 ,7 ,1, colors.blue)
                ecran.setCursorPos(y+5,x+1)
                ecran.write("Engager")
                ecran.setBackgroundColor(colors.black)
                ecran.write("   ")
            else
                line(y+4 ,x+1 ,7 ,1, colors.red)
                ecran.setCursorPos(y+4,x+1)
                ecran.write("Desengager")
                ecran.setBackgroundColor(colors.black)
            end

            ecran.setTextColor(colors.white)
            ecran.setCursorPos(y+1,x+7)
            ecran.write("Rotor: ")

            if data[i]["gSpeed"]<800 then
                ecran.setTextColor(colors.red)
            elseif data[i]["gSpeed"]<1000 then
                ecran.setTextColor(colors.blue)
            elseif data[i]["gSpeed"]<1700 then
                ecran.setTextColor(colors.red)
            elseif data[i]["gSpeed"]<1900 then
                ecran.setTextColor(colors.blue)
            else
                ecran.setTextColor(colors.red)
            end
            ecran.setCursorPos(y+8,x+7)
            ecran.write(number_format(data[i]["gSpeed"]).." RPM     ")
            ecran.setTextColor(colors.white)

            ecran.setCursorPos(y,x+8)
            ecran.write("Prod : "..number_format(data[i]["gProductLastTick"]).." RF/t     ")

        else
            --ecran.setCursorPos(y+4,x+4)
            --ecran.write("PC åA9teint")
            Titre = paintutils.loadImage("PCoff")
            windows[i].setBackgroundColor(colors.black)
            windows[i].setTextColor(colors.black)
            windows[i].clear()
            term.redirect(windows[i])
            paintutils.drawImage(turb, 1, 1)
        end
    end
end

--Function d'affichage des donners du reactor
function AffichageReactor()
    local reactor
    local y=25 x=9
    --Affichage de l'activiter
    ecran.setCursorPos(y+7,x)
    ecran.write("Reactor")
    if data100["PCon"] == true then
        if data100["gActive"]==true then
            reactor = paintutils.loadImage("reactor")
        else
            reactor = paintutils.loadImage("reactoroff")
        end
        windows[100].setBackgroundColor(colors.black)
        windows[100].setTextColor(colors.black)
        windows[100].clear()
        term.redirect(windows[100])
        paintutils.drawImage(reactor, 1, 1)
        ecran.setBackgroundColor(colors.black)

        --Affichage des donnes
        ecran.setTextColor(colors.white)
        ecran.setCursorPos(y,x+20) --le stock de yell en ingot
        ecran.write("Fuel: "..number_format(data100["gFuelAmount"]).." yell  ")
        ecran.setCursorPos(y+1,x+21)
        ecran.write("Decher: "..number_format(data100["gWasteAmount"]).." cyanit  ")
        ecran.setCursorPos(y+5,x+22) --le stock de yell en %
        ecran.write("Stock: "..math.ceil(data100["gFuelAmount"]/data100["gFuelAmountMax"]*100).."%")
        ecran.setCursorPos(y+1,x+23) --production en mb/t
        ecran.write("Prod: "..number_format(data100["gHotFluidProducedLastTick"]).." mb/t   ")
        ecran.setCursorPos(y,x+24) --comsomation de yell en mb
        ecran.write("Conso: "..number_format(data100["gFuelConsumedLastTick"]))
        ecran.setCursorPos(y+9,x+24)
        ecran.write("mb/t de yell")
        ecran.setCursorPos(y+4,x+25) --temperature en C
        ecran.write("Temp: "..number_format(data100["gCasingtemperature"]).." C  ")
        ecran.setCursorPos(y+4,x+26) --reactiviter %
        ecran.write("Reacto: "..number_format(data100["gFuelReactivity"]).." %  ")
    else
        ecran.setCursorPos(y+4,x)
        ecran.write("PC åA9teint")
        --Titre = paintutils.loadImage("")
        --windows[i].setBackgroundColor(colors.black)
        --windows[i].setTextColor(colors.black)
        --windows[i].clear()
        --term.redirect(windows[i])
        --paintutils.drawImage(turb, 1, 1)
    end
    --pour les erreurs
    --Titre = paintutils.loadImage("")
    --windows[i].setBackgroundColor(colors.black)
    --windows[i].setTextColor(colors.black)
    --windows[i].clear()
    --term.redirect(windows[i])
    --paintutils.drawImage(turb, 1, 1)
end

-- Crestion de rectangle de couleur
function line(x ,y ,long ,larg, color_font)
    ecran.setBackgroundColor(color_font)
    for yp=y, y+larg-1 do
        ecran.setCursorPos(x,yp)
        ecran.write(string.rep(" ", long))
    end
end

-- Bar de progresion
function prog(x ,y ,long ,larg, valmin, valmax ,color_bar ,color_font)
    line(x ,y ,long ,larg, color_font)
    local bar = math.floor((valmin/valmax)*long)
    line(x ,y ,bar ,larg, color_bar)
end

-- Function pour transformer 9876543 en 9 876 543
function number_format(n)
  local test=mille(n)
  if test.Mille==0 then
    return math.floor(n)
  else
    test.Mille=mille(test.Mille)
    if test.Mille.Mille==0 then
      return test.Mille.Cent.." "..cent(test.Cent)
    else
      return test.Mille.Mille.." "..cent(test.Mille.Cent).." "..cent(test.Cent)
    end
  end
end

-- Function pour etre sur d'avoir trois chiffre (99 devient 099, 9 devient 009)
function cent(n)
  n=math.floor(n)
  if n>99 then
    return n
   elseif n>9 then
    return "0"..n
   else
    return "00"..n
   end
end

-- Creer un objet avec les centaine d'un cotåA5A5A9 les millier de l'autre
function mille(n)
  if n<1000 then
    return {Mille=0,Cent=n}
  else
    return {Mille=math.floor(n/1000),Cent=n%1000}
  end
end