Das geht noch einfacher!
Schließ die LED's "ganz normal" von Vcc über den üblichen Vorwiederstand gegen an den Controller an. (die meisten Ports können mehr Strom gegen Masse "sinken" als das sie ihn "sourcen" können. (find die Begriffe na ja - komisch )
Das Programm kann folgende Zeilen enthalten:

Config Portb = Output
Dim A as Byte
A= &b11111110

Do
Portb = A
Rotate A, Left, 1
Waitms 200
Loop

End


"Rotate" schiebt sämtliche Bits von A in dieser Konfiguration um jeweils eine Position nach links. Das MSB wird bei jedem rotieren zum LSB.