__CONFIG _CP_OFF&_WDT_OFF&_PWRTE_ON&_XT_OSC
List P=16F84A
#include <P16F84A.inc>
Retardo equ 20H
Retardo2 equ 21H
Retardo3 equ 22H
org 00H
goto inicio
inicio: bsf STATUS, RP0
bcf PORTA, 0
bcf STATUS, RP0
bcf PORTA, 0
sigue: bsf PORTA, 0
movlw d'10'
movwf Retardo3
movlw d'100'
movwf Retardo2
movlw d'250'
movwf Retardo
nop
decfsz Retardo,f
goto $-2
decfsz Retardo2,f
goto $-6
decfsz Retardo3,f
goto $-8
bcf PORTA, 0
movlw d'10'
movwf Retardo3
movlw d'100'
movwf Retardo2
movlw d'250'
movwf Retardo
nop
decfsz Retardo,f
goto $-2
decfsz Retardo2,f
goto $-6
decfsz Retardo3,f
goto $-8
goto sigue
end
No hay comentarios:
Publicar un comentario