ich glaub deine lesen sub iss falsch da lieste immer das erste byte, gibst es aus und dann das zweite und gibst es aus und so weiter

Code:
Sub Send 

Disable Timer1 
Disable Interrupts                                          'Deaktivieren von Timer1 und Interrupts da aktion Zeitkritisch! 

For Adr2 = 1 To 255                                          'Adressen 1 bis 255 auslesen und an UART ausgeben 
Adr3 = Adr2 + 1
Readeeprom Tempread , Adr2                                  'Lese Eeprom aus 
Readeeprom Tempread2 , Adr3                                  'Lese Eeprom aus 
Tempread3 = Makeint(Temread , Tempread2)
Print Tempread3                                              'Temperatur an UART ausgeben 
Next Adr2 

Enable Timer1 
Enable Interrupts                                           'Timer1 und Interrupts wieder aktivieren! 

End Sub
So iss nicht getestet aber sollte funzn

Martin