list p=16f84 #include p16f84.inc portb equ 06h ;el puerto b esta en la posicion 06h de la ram trisb equ 86h ;regis de config de puerto b esta en la direcc 86h de la ram trisa equ 85h status equ 03h ;registro de estado esta en la direcc 03h de la ram ;se definen5 registros personales. tempo1 equ 0ch ;registro tempo1 esta en la direccion 0ch de la ram tempo2 equ 0dh ;registro tempo2 esta en la direcc 0dh de la ram tempo3 equ 0eh ;registro tempo3 esta en la direcc 0eh de la ram inicio bsf status,5 ;se posiciona en banco1 clrf trisb ;define el portb como salida clrf trisa ;define el porta como salida bcf status,5 movlw b'00000101' ;carga el acumulador con 00000101 movwf portb ;carga el contenido del acumulador en portb clrf tempo1 clrf tempo2 clrf tempo3 ciclo retardo1 incf tempo1,1 retardo2 incf tempo2,1 retardo3 incf tempo3,1 btfss tempo3,7 goto retardo3 clrf tempo3 btfss tempo2,7 goto retardo2 clrf tempo2 btfss tempo1,7 goto retardo1 clrf tempo1 comf portb,1 goto ciclo end