function ReadAll() returns int

{ byte i; byte n; int s;

// Lesen saemtlicher Bausteine (PCFaddr)

  s = 0;

  for i = 0 ... 15

  { if PCFaddr and (1 shl i) != 0

    { i2c.cstart(AddrR[i]);

      n = i2c.readlast();

      i2c.stop();

//    Berechnung von ChgeData 

//    danach speichern von ReadData

      ChgeData[i] = ReadData[i] xor n;

      s = s + ChgeData[i];

      ReadData[i] = n;

    }

  }

  return s;            

}