ecran_testG2

--config
rednet.open("left")
local ecran=peripheral.wrap("top")
local nbm = 8 --1 a 8

local data100={} --pour reactor
local data={}    --pour les turbins
data[1]={}
data[2]={}
data[3]={}
data[4]={}
data[5]={}
data[6]={}
data[7]={}
data[8]={}
windows = {}
windows[1] = window.create(ecran, 1 , 2 , 5, 5, true)
windows[2] = window.create(ecran, 50, 2 , 5, 5, true)
windows[3] = window.create(ecran, 1 , 11, 5, 5, true)
windows[4] = window.create(ecran, 50, 11, 5, 5, true)
windows[5] = window.create(ecran, 1 , 21, 5, 5, true)
windows[6] = window.create(ecran, 50, 21, 5, 5, true)
windows[7] = window.create(ecran, 1 , 31, 5, 5, true)
windows[8] = window.create(ecran, 50, 31, 5, 5, true)

local turb
local k=0

-- 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]=textutils.unserialize(TablData)
        elseif ID==100 then
            data100=textutils.unserialize(TablData)
        end
    end
end

function Affichage()
    --chargement
    ecran.setBackgroundColor(colors.blue)
    ecran.clear()
    line(10 ,20,50 ,4, colors.black)
    local cpt=1
    for cpt=1, 50 do
        line(10 ,20 ,cpt,4, colors.green)
        os.sleep(0.1)
    end
    os.sleep(0.5)
    ecran.setBackgroundColor(colors.black)
    ecran.clear()
    while true do --main
        k=k+1
        AffichageTurbine()
        AffichageReactor()
        os.sleep(0.25)
    end
end

-- function d'affichage les donners des turbines
function AffichageTurbine()

    if k == 5 then k = 1 end --pour les images
        local i=1
        for i=1,nbm do --data[1] a data[nbm]
            os.sleep(0.1)
            --print(i)
            --chois de la position
            local x=1 y=1
            if     i==1 then x=1 y=1
            elseif i==2 then x=1  y=50
            elseif i==3 then x=12 y=1
            elseif i==4 then x=12 y=50
            elseif i==5 then x=24 y=1
            elseif i==6 then x=24 y=50
            elseif i==7 then x=36 y=1
            elseif i==8 then x=36 y=50
            end

            --debut de l'affiche
            ecran.setTextColor(colors.white)
            ecran.setCursorPos(y,x)   --**--
            ecran.write("Turbine "..i)
            --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+10,x+1+5)
                ecran.write("Engager")
                ecran.setBackgroundColor(colors.black)
                ecran.write("   ")
            else
                ecran.setCursorPos(y+10,x+1+5)
                ecran.write("Desengager")
                ecran.setBackgroundColor(colors.black)
            end
        end
    end
end

-- function d'affichage des donners du rector
function AffichageReactor()

    local y=25 x=10
        --affichage de l'activiter
        ecran.setCursorPos(y,x)
        ecran.write("Reactor")
        if data100["gActive"]==true then
            line(y ,x+1 ,6 ,1, colors.green)
            ecran.setCursorPos(y,x+1)
            ecran.write("Active")
            ecran.setBackgroundColor(colors.black)
            ecran.write("   ")
        else
            line(y+8 ,x+1 ,8 ,1, colors.red)
            ecran.setCursorPos(y,x+1)
            ecran.write("Desactive ")
            ecran.setBackgroundColor(colors.black)
        end

        --affichage des donnes
        ecran.setTextColor(colors.white)
        ecran.setCursorPos(y,x+2) --le stock de yell en ingot
        ecran.write("Fuel   : "..number_format(data100["gFuelAmount"]/1000).." yell")
        ecran.setCursorPos(y,x+3) --le stock de yell en %
        ecran.write("Stock  : "..math.ceil(data100["gFuelAmount"]/data100["gFuelAmountMax"]*100).."%")
        ecran.setCursorPos(y,x+4) --production en mb/t
        ecran.write("Prod   : "..number_format(data100["gHotFluidProducedLastTick"]).." mb/t   ")
        ecran.setCursorPos(y,x+5) --comsomation de yell en mb
        ecran.write("Conso  : "..number_format(data100["gFuelConsumedLastTick"]))
        ecran.setCursorPos(y+10,x+5)
        ecran.write(" mb/t de yell")
        ecran.setCursorPos(y,x+6) --temperature en C
        ecran.write("temp   : "..number_format(data100["gCasingtemperature"]).." C  ")
        ecran.setCursorPos(y,x+7) --reactiviter %
        ecran.write("reacti : "..number_format(data100["gFuelReactivity"]).." %  ")
end

function onoff()
local type
local a
    while true do
        local e, bt, xp, yp = os.pullEvent("monitor_touch")
        if bt=="top" then
        if (yp<8 and xp==2 ) then
            type ="turbin 1" a="actif"
        elseif xp>10 and xp<18 and yp==2 then
            type ="turbin 1" a="engag"
        elseif xp<8 and yp==9 then
            type ="turbin 2" a="actif"
        elseif xp>10 and xp<18 and yp==9 then
            type ="turbin 1" a="engag"
        --elseif xp<8 and yp==16 then
        --  type ="turbin 3"
        --elseif xp>27 and xp<35 and yp==2 then
        --  type ="turbin 4"
        --elseif xp>27 and xp<35 and yp==9 then
        --  type ="turbin 5"
        --elseif xp>27 and xp<35 and yp==16 then
        --  type ="turbin 6"
        end
        rednet.broadcast(type,a)
        os.sleep(0.5)
        end
    end
end

function onoffR()
local type
    while true do
        local e, bt, xp, yp = os.pullEvent("monitor_touch")
        if bt=="monitor_8" then
            if yp==2 then
                type ="reactor"
            elseif yp==9  then
                type ="rod 1 +"
            elseif yp==10 then
                type ="rod 2 +"
            end
            rednet.broadcast(type)
            os.sleep(0.5)
        end
    end
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åA5A9 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

parallel.waitForAll(Ecoute,Affichage)