Erstmal gehe ich davon aus das deine Sender auch 2 verschiedene ID's haben.
'Sender ID
Dim ID as String * 2
Dim IDar(3) as Byte at ID Overlay
ID = "01"
Und dann schau die das mal an:
If Chr(daten_buffer(3)) = "1" Then
Call Lcd_text(temperatur , 1 , 30 , 5 , Blue , White )...