Solucionario probabilidad voca 9

C:\Pics\teclado4x3\teclado3x4.asm ;******************************************************************* ;Programa que decodifica las teclas de un teclado matricial 3x4 y ;despliega en un display de 7segmentos el numero hexadecimal co;rrespondiente a la tecla pulsada, utilizando un microcontrolador ;pic 16f628a. Este programa es una adaptación de la rutina de con;trol de un teclado matricial 4x4que se encuentra en la página ;http://micropic.wordpress.com/2007/06/13/teclado-matricial-4x4/ ; ;Fecha: 11.09.07 Autor: Jorge A. Bojorquez ;http://micropic.wordpress.com;******************************************************************* list p=16f628a include p16f628a.inc __config 0x3F18 cblock NUM TECLA endc NUM.7 NUM.8 NUM.9 NUM.4 NUM.5 NUM.6 NUM.1 NUM.2 NUM.3 LET.A NUM.0 LET.b equ equ equ equequ equ equ equ equ equ equ equ 0x20

b'11011000' b'00000000' b'00010000' b'00011001' b'00010010' b'00000010' b'11011001' b'01000100' b'01010000' b'00001000' b'10000000' b'00000011'

; ; ; ; ; ;; ; ; ; ; ;

7 8 9 4 5 6 1 2 3 A 0 b

org 0x00 goto INICIO org 0x04 retfie org movlw movwf bsf movlw movwf clrf bcf 0x05 0x07 CMCON STATUS,RP0 0xF0 TRISB TRISA OPTION_REG,NOT_RBPU STATUS,RP0 NUM.0PORTA TECLADO PORTA PRINCIPAL

INICIO

bcf movlw movwf PRINCIPAL call movwf goto

; ; ; ; ; ; ; ; ; ; ;

Deshabilitar comparadores analogicos Cambio a banco 1 Nibble alto del puerto B comentrada y bajo como salida Puerto A como salida Resistencias de pull-up habilitadas Cambio a banco 0 Iniciar Puerto A para que despliegue un "0"

; Llamar a rutina de teclado ; Desplegar numero enpuerto A ; Ejecucuon ciclica del progra

;************************************************** ;** Rutina que escanea un teclado matricial 3x4 ** ;** recorriendo un 0 por cada una de sus filas y ** ;**leyendo el estado de cada columna, si la co- ** ;** lumna se encuentra con un estado logico alto ** ;** no se presiono ninguna tecla, si se encuen- ** ;** tra en bajo (0) entonces se detecta la tecla...