Hi,
Noch was, der mittlere Pin des Schalters muß gegen Masse...Code:Config Pind.2 = Input 'Einzelne Pins werden mit "config pin" Config Pind.3 = Input 'und nicht mit "config port" konfiguriert Config Portb = Output Set Pind.2 'Pullups einschalten Set Pind.3 portd.2=1 portd.3=1 'Pins werden immer mit "PIN" und nicht mit "PORT" Gelesen. 'beim schreiben also immer "port", beim lesen "pin" do If Pind.2 = 0 Then Portb.2 = 1 'Relais 1 aus Portb.3 = 0 'Relais 2 ein End If If Pind.3 = 0 Then Portb.2 = 0 'Relais 1 ein Portb.3 = 1 'Relais 2 aus End If Loop End
Gruß
Christopher





Zitieren

Lesezeichen