Ayuda diagrama y codigo 16F873A

[lunitaagu]

Hola, quería que me ayuden a ver si el diagrama que estoy planteando esta bien, o si hay alguna otra forma de hacerlo, dispongo de 3 displays ánodo común y se me ocurrió esa manera. Y si alguno hizo este proyecto, agradecería que me lo pasen con el codigo, porque estoy empezando con esto, ya hice el programa mas o menos, pero podría reforzarlo bien si alguno me lo pasa. Muchísimas gracias por la atención. Mi mail es: lunitaagu@hotmail.com

[rivale]

El diagrama así como lo tienes funciona, estas muliplexando los displays. en cuanto al código puedes subir lo que tienes hecho y te ayudamos, pero no esperes que alguien te de el trabajo ya hecho

[lunitaagu]

te molestaria pasarme el mail y te mando los diagramas de flujo y el codigo? para no hacer tanto lio en el foro, o vos dirás.

[rivale]

te molestaria pasarme el mail y te mando los diagramas de flujo y el codigo? para no hacer tanto lio en el foro, o vos dirás.

Te recomendaría poner el código aca, la idea principal del foro es que todos puedan aprender de las experiencias de otros, además si pones tu código recibes ayuda de varios miembros el foro

[lunitaagu]

Hola, aca te dejo lo que estuve haciendo en estas dos semanas, estoy renegando mucho, me ayudaría que me dijeran si están bien las rutinas y si me podrían ayudar con el programa principal lo valoraría mucho. Muchisimas gracias por responder.

https://drive.google.com/file/d/0B2fLoJK7C3CbRmgydzFIX1N3MTA/edit?usp=sharing
https://drive.google.com/file/d/0B2fLoJK7C3CbVGRrV1M4NkdjYWs/edit?usp=sharing
https://drive.google.com/file/d/0B2fLoJK7C3CbZWtfcFhUM2dLVWc/edit?usp=sharing

[lunitaagu]

Gracias por tanta atención

[PalitroqueZ]

Hola, quería que me ayuden a ver si el diagrama que estoy planteando esta bien, o si hay alguna otra forma de hacerlo, dispongo de 3 displays ánodo común y se me ocurrió esa manera. Y si alguno hizo este proyecto, agradecería que me lo pasen con el codigo, porque estoy empezando con esto, ya hice el programa mas o menos, pero podría reforzarlo bien si alguno me lo pasa. Muchísimas gracias por la atención. Mi mail es: lunitaagu@hotmail.com

el diagrama de la hoja podría funcionar y en cuanto al programa no entiendo cuando dices que "mas o menos" y "reforzarlo", ¿tienes problemas con el código?

[lunitaagu]

si, se me re complico hacer el programa..

[lunitaagu]

Acá encontré uno y lo modifique, pero no se porque no asciende ni desciende.. aca les dejo el codigo y una foto de la simulacion porque no funciona, es problema del codigo estoy seguro..

INCLUDE P16F873a.INC
   

RET_10MS  movlw     .8        ; 1 set number of repetitions (B)
        movwf     PDel0     ; 1 |
PLoop1  movlw     .120      ; 1 set number of repetitions (A)
        movwf     PDel1     ; 1 |
PLoop2  clrwdt              ; 1 clear watchdog
        clrwdt              ; 1 cycle delay
        decfsz    PDel1, 1  ; 1 + (1) is the time over? (A)
        goto      PLoop2    ; 2 no, loop
        decfsz    PDel0,  1 ; 1 + (1) is the time over? (B)
        goto      PLoop1    ; 2 no, loop
PDelL1  goto PDelL2         ; 2 cycles delay
PDelL2  clrwdt              ; 1 cycle delay
        return              ; 2+2 Done
     
TABLA ADDWF PCL,F
 RETLW B'00000010'
 RETLW B'10011110'
 RETLW B'00100100'
 RETLW B'00001100'
 RETLW B'10011000'
 RETLW B'01001000'
 RETLW B'11000000'
 RETLW B'00011110'
 RETLW B'00000000'
 RETLW B'00011000'
 
MOSTRAR CLRF PORTC
 MOVF UNIDADES,W ;cargo el valor de las unidades
 CALL TABLA
 BSF PORTC,5 ;activo el display unidad
 MOVWF PORTB
 CALL RET_10MS
 BCF PORTC,5
 MOVF DECENAS,W
 CALL TABLA
 BSF PORTC,4
 MOVWF PORTB
 CALL RET_10MS
 BCF PORTC,4
 MOVF CENTENAS,W
 CALL TABLA
 BSF PORTC,3
 MOVWF PORTB
 CALL RET_10MS
 BCF PORTC,3
 MOVF UMIL,W
 CALL TABLA
 MOVWF PORTB
 BSF PORTC,2
 CALL RET_10MS
 BCF PORTC,2
 
 RETURN
 
VER CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR
 CALL MOSTRAR ;RETARDO DE 160ms
 RETURN
 
CONFIGURA     NOP
  BANKSEL    ANSEL    ;paso al banco 3
  CLRF    ANSEL
  CLRF    ANSELH
  BANKSEL TRISB
  MOVLW    B'01101100'
  MOVWF    OSCCON
  MOVLW    B'00000011'
  MOVWF    TRISA
  MOVLW    B'00000000'
  MOVWF    TRISB
  MOVLW    B'00000000'
  MOVWF    TRISC
  BANKSEL    PORTB    ;paso al banco 0
 
  CLRF    PORTB
  CLRF    UMIL
  CLRF    CENTENAS
  CLRF    DECENAS
  CLRF    UNIDADES

INICIO CALL MOSTRAR
 BTFSC PORTA,0
 GOTO UP
 BTFSC PORTA,1
 GOTO DOWN
 GOTO INICIO


UP CALL VER
 
 INCF UNIDADES,F
 MOVLW .10
 XORWF UNIDADES,W
 BTFSS STATUS,Z
 GOTO INICIO
 
 
 
 CLRF UNIDADES
 INCF DECENAS,F
 MOVLW .10
 XORWF DECENAS,W
 BTFSS STATUS,Z
 GOTO INICIO
 
 CLRF DECENAS
 INCF CENTENAS,F
 MOVLW .10
 XORWF CENTENAS,W
 BTFSS STATUS,Z
 GOTO INICIO
 
 
 CLRF CENTENAS
 INCF UMIL,F
 MOVLW .10
 XORWF UMIL,W
 BTFSS STATUS,Z
 GOTO INICIO
 CLRF UMIL
 GOTO INICIO
 
DOWN CALL VER
 
 DECF UNIDADES,F
 MOVLW .255
 XORWF UNIDADES,W
 BTFSS STATUS,Z
 GOTO INICIO
 

 MOVLW .9
 MOVWF UNIDADES
 
 DECF DECENAS,F
 MOVLW .255
 XORWF DECENAS,W
 BTFSS STATUS,Z
 GOTO INICIO
 
 MOVLW .9
 MOVWF DECENAS
 DECF CENTENAS,F
 MOVLW .255
 XORWF CENTENAS,W
 BTFSS STATUS,Z
 GOTO INICIO
 
 MOVLW .9
 MOVWF CENTENAS
 DECF UMIL,F
 MOVLW .255
 XORWF UMIL,W
 BTFSS STATUS,Z
 GOTO INICIO
 MOVLW .9
 MOVWF UMIL
 GOTO INICIO

 
 END

https://drive.google.com/file/d/0B2fLoJK7C3CbNGJvUm5aXzlZUjA/edit?usp=sharing