Secuencia leds mplab

Solo disponible en BuenasTareas
  • Páginas : 2 (272 palabras )
  • Descarga(s) : 0
  • Publicado : 1 de junio de 2011
Leer documento completo
Vista previa del texto
LIST p=16f84

PDel0 equ 0x0c
PDel1 equ 0x0d
PDel2 equ 0x0e

led1 equ 0
led2 equ 1
led3 equ 2
led4 equ 3
led5 equ 4
led6 equ 5
led7 equ 6
led8equ 7

pulsador equ 0

porta equ 0x05
portb equ 0x06
status equ 0x03
trisa equ 0x85
trisb equ 0x86;----------------------------------------------------------------------------

reset org 0x00
goto inicio
org 0x05
inicio bsf status,5
movlw b'11111111'
movwf trisa
movlw b'00000000'movwf trisb
bcf status,5
bcf portb,9
;------------------------------------------------------------------------------
bucle btfsc porta,pulsador
goto apagargoto encender
bcf portb,led1
call retardo
bsf portb,led2
call retardo
bsf portb,led3
call retardobsf portb,led4
call retardo
bsf portb,led5
call retardo
bsf portb,led6
call retardo
bsf portb,led7call retardo
bsf portb,led8
call retardo

goto bucle
;--------------------------------------------------------------------------------
apagarbcf portb,pulsador
goto bucle

;--------------------------------------------------------------------------------
encender movlw b'00000000'
movwfportb
call retardo

movlw b'10101010'
movwf portb
call retardo

movlw b'01010101'
movwf portb
callretardo

movlw b'00110011'
movwf portb
call retardo

movlw b'11001100'
movwf portb
call retardo

goto bucle...
tracking img