waveloop_0 ; loop time is 153.6uS - F=6.5104KHz
movlw 0x80 ;
movwf PORTB ;
l_01
incf PORTB,f ; do it
goto l_01 ; and loop