I have tried to create a delay to blink an led on and off using the below code but the led remains on. Can anyone see the prob.
Rich (BB code):
#include "p16F690.inc"
__CONFIG H'30F0'
TMR0 equ 01
STATUS equ 03
PORTB equ 06
TRISB equ 86
RES_VECT CODE 0x0000
GOTO START
MAIN_PROG CODE
;DELAY
DELAY1 CLRF TMR0 ;START TMR0.
LOOPA MOVF TMR0,W ;READ TMR0 INTO W.
SUBLW D'32' ;TIME - 32
BTFSS STATUS,2 ; Check TIME-W¼0
GOTO LOOPA ;Time is not¼32.
RETLW 0 ;Time is 32, return.
START
BCF STATUS,RP0 ;Bank 0
BCF STATUS,RP1 ;
CLRF PORTB ;Init PORTB
BSF STATUS,RP0 ;Bank 1
MOVLW 0x00
MOVWF TRISB ;
BCF STATUS,RP0 ;Bank 0
LOOP BSF PORTB,6
CALL DELAY1
BCF PORTB,6
CALL DELAY1
GOTO LOOP ; loop forever
END