Secuencia leds mplab
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...
Regístrate para leer el documento completo.