Autor Tema: Matriz De Led  (Leído 2237 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado jmik

  • PIC10
  • *
  • Mensajes: 5
Matriz De Led
« en: 25 de Mayo de 2005, 00:38:00 »
Hola Amigos tengo un problema, resulta que consegui un programa y arme un circuito de Matriz de led "Publick" funciona perfectamente no se como puedo hacer para cambiar las letras, para crear mi propio texto. Aca les dejo el programa por si alguno me puede ayudar,  Son pocas letras faltantes para completar el abecedario .... Saludos y Gracias.

; Desarrollo Humano

status      equ   0x03
porta      equ   0x05
trisa      equ   0x85
portd      equ   0x08
trisd      equ   0x88
eedata      equ   0x10C
eeadr      equ   0x10D
eedath      equ   0x10E
eeadrh      equ   0x10F
eecon1      equ   0x18C
columna      equ   0x21
fila0      equ   0x22
fila1      equ   0x23
temp      equ   0x24
veces      equ   0x25
desplaza   equ   0x26
aux      equ   0x27
aux1      equ   0x28
incr      equ   0x29

   org 0x00
      goto inicio

   org 0x05
inicio      bsf   status, 5   ;Banco 1
      
      clrf   trisa
      clrf   trisd

comienzo   bcf   status, 5   ;Banco 0
      clrf   incr
      movlw   0x13
      movwf   desplaza
      clrf   veces
reinicio   clrf   columna   
      bsf   status, 6   ;Banco 2
      movlw   0x01
      movwf   eeadrh
      clrf   eeadr
      bcf   status,6   ;Banco 0
      movf   incr, 0
      bsf   status, 6   ;Banco 2
      addwf   eeadr, 1
ciclo      call   lectura
      call   puertos
      bsf   status, 6   ;Banco 2
      incf   eeadr
      bcf   status,   6   ;Banco 0
      incf   columna   
      movf   columna, 0
      addwf   desplaza, 0
      movwf   aux
      bsf   status, 0
      movlw   0x14
      movwf   aux1
      movf   aux, 0
      subwf   aux1
      btfsc   status, 0
      goto    ciclo
      incf   veces
      movlw   0x0A      
      xorwf   veces, 0
      btfss   status, 2   
      goto   reinicio
      clrf   veces
      decf   desplaza, 1
      movlw   0xFE
      xorwf   desplaza, 0
      btfss   status, 2
      goto   reinicio
      movlw   0x02
      addwf   desplaza, 1
      incf   incr, 1
      movlw   0xF0         
      xorwf   incr, 0
      btfss   status, 2
      goto   reinicio
      goto    comienzo

lectura      bsf   status, 5
      bsf   status, 6   ;Banco 3
      bsf   eecon1, 7
      bsf   eecon1, 0   ;Inicia lectura
      NOP
      NOP
      bcf   status, 5   ;Banco 2
      movf   eedata, 0
      bcf   status, 6   ;Banco 0
      movwf   fila0
      bsf   status, 6   ;Banco 2
      movf   eedath, 0
      bcf   status, 6   ;Banco 0
      movwf   fila1
      btfsc   fila0, 7
      bsf   fila1, 6
   return

puertos      movf   columna, 0
      addwf   desplaza, 0
      movwf   porta
      movf   fila0, 0
      movwf   portd
      call   tiempo
      clrf   portd
      clrf   porta
      incf   columna, 1
      movf   columna, 0
      addwf   desplaza, 0
      movwf   porta
      movf   fila1, 0
      movwf   portd
      call   tiempo
      clrf   portd
      clrf   porta
   return

tiempo       movlw  0xff
           movwf  temp
loop       decfsz temp, 1
           goto   loop
          return



   org   0x100
      data   0x2A3E      ;E
      data   0x222A
      data   0x1E00      ;L
      data   0x2020
      data   0x0000      ;SPC
      data   0x2400      ;S
      data   0x2A2A
      data   0x0012
      data   0x2A3E      ;E
      data   0x222A
      data   0x3E00      ;R
      data   0x0A0A
      data   0x0034
      data   0x0000      ;SPC
      data   0x083E      ;H
      data   0x3E08   
      data   0x1E00      ;U
      data   0x2020
      data   0x003E
      data   0x043E      ;M
      data   0x0408
      data   0x003E
      data   0x0A3E      ;A
      data   0x3C0A
      data   0x3E00      ;N
      data   0x0804
      data   0x3E10
      data   0x1C00      ;O
      data   0x2222
      data   0x001C
      data   0x0000      ;SPC
      data   0x083E      ;H
      data   0x3E08
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x0000      ;SPC
      data   0x043E      ;N
      data   0x1008
      data   0x003E
      data   0x0A3E      ;A
      data   0x3C0A
      data   0x1C00      ;C
      data   0x2222
      data   0x0022
      data   0x3E22      ;I
      data   0x0022
      data   0x223E      ;D
      data   0x1C22      
      data   0x1C00      ;O
      data   0x2222
      data   0x001C
      data   0x0000      ;SPC
      data   0x0A3E      ;P
      data   0x040A
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x0A3E      ;R
      data   0x340A
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x0000      ;SPC
      data   0x2A3E      ;E
      data   0x222A
      data   0x2200      ;X
      data   0x0814
      data   0x2214
      data   0x3E00      ;P
      data   0x0A0A
      data   0x0004
      data   0x2A3E      ;E
      data   0x222A
      data   0x3E00      ;R
      data   0x0A0A
      data   0x0034
      data   0x3E22      ;I
      data   0x0022   
      data   0x043E      ;M
      data   0x0408
      data   0x003E
      data   0X2A3E      ;E
      data   0x222A
      data   0x3E00      ;N
      data   0x0804
      data   0x3E10
      data   0x0200      ;T
      data   0x023E
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x0A3E      ;R
      data   0x340A
      data   0x0000      ;SPC
      data   0x0200      ;T
      data   0x023E
      data   0x1C00      ;O
      data   0x2222
      data   0x001C
      data   0x223E      ;D
      data   0x1C22
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x2A24      ;S
      data   0x122A
      data   0x0000      ;SPC
      data   0x1E00      ;L
      data   0x2020
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x2A24      ;S
      data   0x122A
      data   0x0000      ;SPC
      data   0x3E00      ;E
      data   0x2A2A
      data   0x0022
      data   0x223E      ;D
      data   0x1C22
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C
      data   0x223E      ;D
      data   0x1C22
      data   0x3E00      ;E
      data   0x2A2A
      data   0x0022
      data   0x2A24      ;S
      data   0x122A
      data   0x0080      ;coma
      data   0x0020
      data   0x0000      ;SPC
      data   0x221C      ;C
      data   0x2222
      data   0x1C00      ;O
      data   0x2222
      data   0x001C
      data   0x043E      ;N
      data   0x1008
      data   0x003E
      data   0x0000      ;SPC
      data   0x2A24      ;s
      data   0x122A
      data   0x1E00      ;u
      data   0x2020
      data   0x001E
      data   0x2A24      ;s
      data   0x122A
      data   0x0000      ;SPC
      data   0x3E00      ;E
      data   0x2A2A
      data   0x0022
      data   0x1422      ;X
      data   0x1408
      data   0x0022
      data   0x0A3E      ;P
      data   0x040A
      data   0x3E00      ;E
      data   0x2A2A
      data   0x0022
      data   0x0A3E      ;R
      data   0x340A
      data   0x2200      ;I
      data   0x223E
      data   0x3E00      ;E
      data   0x2A2A
      data   0x0022
      data   0x043E      ;N
      data   0x1008
      data   0x003E
      data   0x221C      ;C
      data   0x2222
      data   0x2200      ;I
      data   0x223E
      data   0x3E00      ;A
      data   0x0A0A   
      data   0x003C      
      data   0x2A24      ;S
      data   0x122A
      data   0x0000      ;SPC
      data   0x3E00      ;P
      data   0x0A0A
      data   0x0004
      data   0x0A3E      ;R
      data   0x340A
      data   0x1C00      ;O
      data   0x2222
      data   0x001C
      data   0x0A3E      ;P
      data   0x040A
      data   0x2200      ;I
      data   0x223E
      data   0x3E00      ;A      
      data   0x0A0A
      data   0x003C
      data   0x2A24      ;S
      data   0x122A
      data   0x0000      ;SPC
      data   0x0200      ;Y
      data   0x3804
      data   0x0204
      data   0x0000      ;SPC
      data   0x0000   
      data   0x2A3E      ;E
      data   0x222A
      data   0x2400      ;S
      data   0x2A2A   
      data   0x0012
      data   0x0A3E      ;P
      data   0x040A
      data   0x3E00      ;E
      data   0x2A2A
      data   0x0022
      data   0x221C      ;C
      data   0x2222
      data   0x2200      ;I
      data   0x223E
      data   0x3E00      ;A
      data   0x0A0A
      data   0x003C   
      data   0x201E      ;L
      data   0x0020      
      data   0x2A3E      ;E
      data   0x222A
      data   0x2400      ;S
      data   0x2A2A
      data   0x0012
      data   0x2000      ;punto
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
      data   0x0000
       end