Hallo Chris,
Pseudocode
Gruß.Code:... blabla .. blabla Dim VergleichsVariable As Eram Byte ' Eeprom-Variable .. muss natürlich erst geschrieben werden Dim Temp As Byte Config Portc = Input ' Eingangsport Config Portd = Output 'da hängen Deine LED's dran Do Temp=Pinc If Temp = VergleichsVariable Then Portd.0 = 1 ' Gleich, dann LED an Else Portd.0 = 0 ' Ungleich, LED aus End If Loop
Rainer
Lesezeichen