#include p16f887.inc

BSF STATUS,RP1
BSF STATUS,RP0

CLRF ANSEL
CLRF ANSELH

BCF STATUS,RP1
;BSF STATUS,RP0
BCF STATUS,RP1
BSF STATUS,RP0
MOVLW B'00000000'
MOVWF TRISB
BCF STATUS,RP1
BCF STATUS,RP0
MOVLW B'01000000'
MOVWF PORTB
nop
loop:
RLF PORTB,1
nop
nop
RRF PORTB,1
goto loop
nop
end