Code:
Config Pind.2 = Input              'Als Eingang definieren
Portd.2 = 1                             'Pullup einschalten

do
If Pind.2 = 0 Then Goto xxx      'Eingang Schalten gegen Masse
loop