Wenn du testen willst ob die einzelnen Oorts noch funktionieren dann versuche mal folgendes:

do
If pinx.y = 0 Then
waitms 50
toggle Portx.y
end if

Loop

Jetzt brauchst du nur noch x und y durch die entsprechenden Buchstaben und Zahlen der einzelnen Ports zu ersetzen, bzw Taster und LED anschließen. Das Programm schaltet einfach nur bei Tastendruck
( If pinx.y = 0) einen Ausgangsport ein, (toggle Portx.y) bei wiederholten Tastendruck wieder aus.

Gruß

Neutro