Privat control system

    local aps2 = 0
    local aps = 0
    local ppc = 0
    local re1 = 0
    local re2 = 0
    local re3 = 0
    local re4 = 0
    local pe = 0
    local ph = 0
    local aee = 0
    rednet.open("back")
    m = peripheral.wrap("top")
    while true do

      id, mes , prot1= rednet.receive()

      if id == 811 then
        ph = mes
      elseif id == 1179 then
        aee = mes
      elseif id == 930 then
        pe = mes
      elseif id == 1180 then
        re1 = mes
      elseif id == 1181 then
        re2 = mes
      elseif id == 1182 then
        re3 = mes
      elseif id == 1183 then
        re4 = mes
      elseif id == 790 then
        ppc = mes
      elseif id == 1184 then
        aps = mes
      elseif id == 1185 then
        aps2 = mes
      end

      print(id)
      m.clear()
      m.setCursorPos(10,1)
      m.write("Home Control")
      m.setCursorPos(1,4)
      m.write("pressure chamber pres.")
      if ppc >= 5 then
        m.write("!OVERLOAD!")
      elseif ppc <= 4.9 and ppc >= 0.2 then
        m.write(ppc)
      elseif ppc <= 0 then
        m.write("LOW PRESSURE")
      end
      m.setCursorPos(1,5)
      m.write("pressure Home: ")
      if ph >= 14 then
        m.write("!!!OVERLOAD!!!")
      elseif ph <= 13.5 and ph >= 0.5 then
        m.write(ph)
      elseif ph <= 0 then
        m.write("LOW PRESSURE")
      end
      m.setCursorPos(1,7)
      m.write("ME-system power: ")
      m.write(aee/1000000)
      m.write(" Mio.")

      m.setCursorPos(1,9)
      m.write("Pressure Elevator: ")
      if pe >= 5 then
        m.write("!OVERLOAD!")
      elseif pe <= 4.9 and pe >= 0.1 then
        m.write(pe)
      elseif pe <= 0 then
        m.write("LOW PRESSURE")
      end

      m.setCursorPos(1,12)
      m.write("Reso. Energy[1]: ")
      m.write(re1/1000000)
      m.write(" Mio.")

      m.setCursorPos(1,13)
      m.write("Reso. Energy[2]: ")
      m.write(re2/1000000)
      m.write(" Mio.")

      m.setCursorPos(1,14)
      m.write("Reso. Energy[3]: ")
      m.write(re3/1000000)
      m.write(" Mio.")

      m.setCursorPos(1,15)
      m.write("Reso. Energy[4]: ")
      m.write(re4/1000000)
      m.write(" Mio.")

      m.setCursorPos(1,16)
      m.write("-----------------------")

      m.setCursorPos(1,17)
      m.write("Energy gesamt:  ")
      m.write(re1/1000000+re2/1000000+re3/1000000+re4/1000000)
      m.write(" Mio.")

      m.setCursorPos(1,19)
      m.write("Me-System [Items] :  ")
      m.setCursorPos(1,20)
      m.write("free       /total ")
      m.setCursorPos(1,21)
      m.write(aps)

      m.setCursorPos(1,23)
      m.write("Me-System [Types] : ")
      m.setCursorPos(1,24)
      m.write("free /total ")
      m.setCursorPos(1,25)
      m.write(aps2)
    end