Foro de elhacker.net

Buenas, estoy buscando un poco de ayuda para hacer 1 programa para el PIC16F84 en lenguaje ensamblador.

El programa se trata de lo siguiente:
Es un contador de coches de 1 garaje, hay 2 sensores que podrian ser perfectamente 2 entradas del puerto A, asta ahi llego. Tiene que ir contando los coches que entran y salen y sacar un numero del 0 al 9 en un display de 7 segmentos.  Y cuando llegue a 9, (es decir, cuando ya haya 10 coches en el garaje) pues se enciende una luz roja. Mientras tanto estara encendida una luz verde indicando que hay plazas. Ale, a ver si algun alma caritativa m ayuda plis.

Hey, no sabria decirme ninguno? Eske estoy muy perido :-\

Te iba a escribir el programa así explicandote como hacerlo, pero hay una cosa que no me cuadra..dices que hay dos sensores para detectar las entradas de coche...pero no sera uno que detecta entradas y otro salidas? Si es asi es sencillo y te puedo ayudar sin problemas, en 2 minutos tengo el programa.

Si creo q es asi, yo intuyo q un sensor es para la salida y otro para la entrada, uno incrementa el contador y otro lo decrementa, la luz verde indicaria q hay espacio disponible, la roja q se lleno la capacidad del garage :p

y seguramente el display lo maneja con el micro.

Exactamente, uno detecta los coches que entran llamemosle A y el otro los coches que salen (B), uno incrementa un rejistro Auxiliar y el otro lo decrementa antes de mandarlo al portB. Hice un programa, pero tenia fallos...

Mira..te propongo una cosa que te va a servir más de que yo te escriba el codigo o te lo indique paso a paso, pon tu programa y te correjimos los errores. Así la proxima vez no caeras en ellos  ;)

Bueno, aqui esta el programa. Lo siento por tardar tanto en responder k ando 1 poco liadillo...
 
LIST      P=16F84
               RADIX     HEX

               TRISA      EQU      0X05
               TRISB      EQU      0X06
               PORTA      EQU      0X05
               PORTB      EQU      0X06
               ESTADO     EQU      0X03
               AUXILIAR   EQU      0X0C
               ORG        0
               BSF        ESTADO,5
               BSF        TRISA,1
               BSF        TRISA,2
               CLRF       PORTB
               CLRF       TRISA,0
               CLRF       TRISA,3
               BCF        ESTADO,5
               BSF        PORTB,0          ;Asi empezamos a contar
               BSF        PORTB,5          ;como si hubiera 5 choches.
               BSF        PORTB,6
               BSF        PORTB,2
               BSF        PORTB,3
               BSF        PORTA,0
               MOVLW      PORTB            ;Movemos el portB al W.
               MOVWF      AUXILIAR         ;Movemos W al registro auxiliar.
SENAB          BTFSC      PORTA,1          ;Si el sensor A detecta coche-> salta a inc
               GOTO       INC
INC            INCF       AUXILIAR         ;Se incrementa el valor en 1.
               CLRF       PORTB            ;Se borra el portB                                           
               MOVLW      AUXILIAR         ;Se mueve el auxiliar a W.
               MOVWF      PORTB            ;Movemos W al portB y si marca
               BTFSC      B'01110011'      ;9 en el display salta a led rojo.
               GOTO       LEDROJO         
               GOTO       SENAB            ;Vuelve a senAB si no dectectan nada el sensorB
               BTFSC      PORTA,2          ;Si el sensor B detecta coche->salta a dec
               GOTO       DEC             
DEC            DECW       AUXILIAR         ;Decrementa AUXILIAR en 1
               MOVLW      AUXILIAR         ;Mueve el auxiliar al W.
               CLRF       PORTB            ;Borra el portB
               MOVWF      PORTB            ;Si el port B era 8 salta a led verde.
               BTFC       B'01111111'
               GOTO       LED VERDE
               GOTO       SENAB            ;Vuelve a senAB si no detectan nada los sensores A y B.
LEDROJO        CLRF       PORTA,3          ;Apaga la luz verde y enciende la roja.
               BSF        PORTA,4
               GOTO       SENAB           
LEDVERDE       BSF        PORTA,3          ;Apaga la luz roja y enciende la verde.
               CLRF       PORTA,4
               GOTO       SEMAB
               END                         ;Fin de programa

Si, ya se que no es ninguna marabilla ;D

Dos cosas que veo a simple vista:


Porta y TrisA los tienes definidos en la misma dirección de memoria..

Otra cosa...no uses goto.. la función INC metela en una subrutina y llamala con ACALL. Con el goto es facil despistarse y no queda muy bonito que digamos.

Por otra parte deberias dar un estado inicial a cada puerto segun si son entradas o salidas, sto no es obligatorio, pero en la universidad me lo remarcaron mucho y supongo que por algo a de ser xd.

Gracias por los consejos, otro fallo de mi programa eske no lleba bien el control de los coches que entran y salen del garaje y que no saca el numero que es en el display cuando lo incrementas o decrementas, esto es por ejemplo para sacar el 9 el codigo binario seria 01110011 y claro, si lo decremetas 01110010 y eso no es 8 en binario... daria un numero raro en el display.

Haber, lo que dices de incre/decre usando esas funciónes de suma o resta al numero decimal, no creo que te diese ningún numero raro. Vaya..supongo que usarás un decoder de catodo o anodo comúm para el display pero no deberias tener problemas al inc/dec ya que el valor al hacer la operación es el decimal el que se opera.

Lo que si, no se si usaras uno o dos dígitos, pero me parece que te faltaría una conversión a BCD que la puedes hacer simplemente dividiendo entre 10.

Y como hago para que cuando me marke el numero nueve en el display salte el led rojo? Ahora esto es lo que no entiendo, como se da cuenta el programa que esta marcando el numero nueve? pongo Btfsc B'01110011' y que salte a encender el led rojo apagar el verde o como?

Yo con los microcontroladores mc51/mc52, en el lenguaje hay una instrucción llamada CMP que es "compare" compara dos valores y si son distíntos salta a una etiqueta.

CMP valor1,valor2,[ETIQUETA]

Para tu pic debe haber algo parecido, deberias mirar-lo. Inlcuso quiza esto funcione, aunque no lo se porque no programo para ese pic.