Config Portb = &B00011000 'Grundzustand einstellen -> Pins als Eingänge(ausser 3,4)
Portb = &B11100111 'Pullup-Widerstände zuschalten

waitms 1000 = wait 1

spart speicher und ablaufzeit.
mfg psft