Code:
FOR x = 0 to 5
HIGH PORTB.0[x]
Pause 100
Next x