do
Portb.1 = 1
Waitms 100
Portb.1 = 0
loop
Der Port wird auf 0 gesetzt, die Schleife springt zurück und setzt den Prot sofort wieder auf 1 ...
Bei einer Taktfrequenz von 8 MHz würde ich ehrlich gesagt nicht erwarten, dass man von dem Wechsel viel sehen kann - ein gleichmässiges Blinken ganz bestimmt nicht.

oder für Faule:

do
toggle portb.1
Waitms 100
loop
Nicht nur "fauler" - auch sinnvoller, weil der Port hier jeweils 100ms in einem Zustand bleibt bevor er wieder umgeschaltet wird.

Wenn man das mit einer LED kontrollieren will, muss man allerdings immer noch recht schnell "gucken" können