Matriz de leds 8x8 y 74ls373

Necesito ayuda con una matriz de leds 8x8, estoy usando el PIC16F877A. Para conectar la matriz al micro, estoy conectando 2 74ls373 uno para las filas y otro para las columnas. El pin /oe del flip-flop los estoy conectando a tierra, y los LE en diferentes pines del PIC para habilitar y deshabilitar los 74ls373.

El problema es que a la hora de montarlo en plaqueta no me sale nada, no aparece nada, no se si me hace falta adicionar algo mas al circuito que estoy usando o estoy conectando mal la matriz de leds, ya que la q uso tiene 24 pines pero no es bicolor.

El codigo fuente es:

Código:
    LIST        P=PIC16F877A
        INCLUDE        "P16F877A.INC"

__CONFIG    _WDT_OFF & _CP_OFF & _PWRTE_ON & _XT_OSC

            ORG            0X00
            GOTO         INICIO

;RC0 MANEJA COLUMNAS            DEJAR ASI!!
;RC1 MANEJA LAS FILAS            DEJAR ASI!!
;PORTB MANEJA LAS COLUMNAS        DEJAR ASI!!
;PORTD MANEJA LAS FILAS            MODIFICA IMAGEN
; APAGA LED CON 1
; PRENDE LED CON 0              
; AHI HAY DOS DIBUJITOS
RET1            EQU    0X20
RET2            EQU    0X21



INICIO
        BCF        STATUS,RP1        ;BANCO1
        BSF        STATUS,RP0
        CLRF    TRISD                ;PUERTOS        
        CLRF     TRISC                ;PUERTOS        
        CLRF     TRISB
        BCF     STATUS,RP0
        CLRF     PORTB
        CLRF     PORTC
        CLRF     PORTD

CICLO
        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'00000001'  ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'11111011'   ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,1
        BSF     PORTC,0
        MOVLW     B'00000010'     ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'11010001'        ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'00000100'     ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'10011011'        ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'00001000'     ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'01011111'        ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'00010000'     ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'01101111'        ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'00100000'     ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'10110011'        ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'01000000'     ;DEJAR ASI!!!
        MOVWF     PORTB
        MOVLW     B'11000111'        ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,1
        CALL     RETARDO

        BSF      PORTC,0
        BSF     PORTC,1
        MOVLW     B'10000000'     ;DEJAR ASI!!!
        MOVWF     PORTB    
        MOVLW     B'11111111'            ;MODIFICA LA IMAGEN
        MOVWF     PORTD
        BCF     PORTC,0
        BCF     PORTC,0
        CALL     RETARDO
        GOTO     CICLO

RETARDO
    MOVLW     D'10'
    MOVWF      RET1
    MOVLW     D'10'
    MOVWF     RET2

DELAY
     DECFSZ         RET1,1
    GOTO         DELAY
    DECFSZ        RET2,1
    GOTO         DELAY
    RETURN

Adjunto el esquema que estoy usando.

Gracias por sus respuestas.
 

Adjuntos

  • Matriz.rar
    43.4 KB · Visitas: 53
Última edición por un moderador:
Atrás
Arriba