Grabacion

Grabacion: https://bit.ly/2xkm8j8 Programa en assembler utilizando MPLAB X IDE encender LED https://www.youtube.com/wa

Views 98 Downloads 7 File size 53KB

Report DMCA / Copyright

DOWNLOAD FILE

Recommend stories

Citation preview

Grabacion: https://bit.ly/2xkm8j8

Programa en assembler utilizando MPLAB X IDE encender LED

https://www.youtube.com/watch?time_continue=10&v=91ygpOcU2m4

Programa en assembler utilizando MPLAB X IDE con retardo

https://www.youtube.com/watch?time_continue=6&v=ne4B5fwPgoU

CODIGO list p=16f84A include

__CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC

INCLUDE

CLOCK equ 20000000

CBLOCK 0x0c contador_unidad contador_decena contador_centena contador_comun ENDC

#DEFINE Display PORTB #DEFINE Selector PORTA

Org 0

bsf STATUS,RP0 clrf Display clrf Selector bcf STATUS,RP0 clrf Display clrf Selector

INICIO clrf contador_unidad clrf contador_decena clrf contador_centena

UNIDAD incf contador_unidad,1 movlw D '10' subwf contador_unidad,w btfss STATUS,C goto ACT_DISPLAY clrf contador_unidad goto DECENA

DECENA incf contador_decena,1 movlw D '6' subwf contador_decena,w btfss STATUS,C goto ACT_DISPLAY clrf contador_decena goto CENTENA

CENTENA incf contador_decena,1 movlw D '10' subwf contador_centena,w btfss STATUS,C goto ACT_DISPLAY

clrf contador_cecena goto UNIDAD

ACT_DISPLAY movlw D'5' movwf contador_comun

ACTUALIZAR movlw B '1110' movwf Selector movf contador_unidad,w call NUMEROS movwf Display Delay_ms .1 movlw B'1101' movwf Selector movf contador_decena,w call NUMEROS movwf Display Delay_ms .1 movlw B'1011' movwf Selector movf contador_centena,w call NUMEROS movwf Display Delay_ms .1 decfsz contador_comun,1 goto ACTUALIZAR goto UNIDAD

NUMEROS retlw B'11000000' retlw B'11111001' retlw B'10100100' retlw B'10110000' retlw B'10011001' retlw B'10010010' retlw B'10000011' retlw B'11111000' retlw B'10000000' retlw B'10010000'

INCLUDE END

list p=16f84a #include __Config _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC org bsf bsf bsf bcf bcf bcf

0x00 STATUS, RP0 TRISA, 0 TRISA, 1 TRISB, 0 STATUS, PR0 PORTB, 0

encender btfss PORTA, 0 goto encender bsf PORTB, 0 estado btfss PORTA, 1 goto estado bcf PORTB, 0 goto encender end