Autor Tema: Comunicacion Serie con PC  (Leído 2346 veces)

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

Desconectado XaviPIC

  • PIC10
  • *
  • Mensajes: 7
Comunicacion Serie con PC
« en: 23 de Julio de 2003, 02:53:00 »
Por favor necesito ayuda...........

Estoy haciendo una aplicacion en la que el PIC 16f873 tiene que comunicar con el PC, pero no me funciona y no se si es el PIC o el programa.

Me podeis decir si en el siguiente programa esta bien configurada la transmision?????
El programa parpadea un LED y envia una X cada vez que lo hace:


Me seria de gran ayuda que me despejarais las dudas.

Muchas gracias a todos.

Un saludo,
Xavi.


Desconectado pinchauvas3

  • PIC10
  • *
  • Mensajes: 7
RE: Comunicacion Serie con PC
« Respuesta #1 en: 05 de Agosto de 2003, 05:58:00 »
Hola Xavi, te mando un código hecho por mi y comprobado. El programa recibe un carácter por el puerto serie, lo muestra por la puerta b y lo devuelve por el puerto serie. Puedes usar el hyperterminal de windows para enviar datos. El programa está comentado, así que espero que no tengas problemas. Comentame como ha ido.

Desconectado pocher

  • Moderador Local
  • DsPIC30
  • *****
  • Mensajes: 2569
RE: Comunicacion Serie con PC
« Respuesta #2 en: 05 de Agosto de 2003, 12:56:00 »
Hola XaviPIC

El error esta en los bancos: estan fuera de sitio

Esta es la solución:

            LIST P=16F873
      INCLUDE "P16F873.INC"

TEMPO      EQU      0X20
TEMPO1      EQU      0X21

      ORG    0
      GOTO   INICIO
      ORG      0X05


;PROGRAMA PRINCIPAL

INICIO   CLRF   PORTB
   CLRF   PORTC
   BSF    STATUS,RP0
   ;BCF   STATUS,RP1
   CLRF   TRISB
   MOVLW   B"10111111"
   MOVWF   TRISC
   MOVLW   B"00100100"
   MOVWF   TXSTA
   MOVLW   .25
   MOVWF   SPBRG
   BCF   STATUS,RP0
   BSF   RCSTA,SPEN
   BSF   TXSTA,TXEN
   ;BCF   STATUS,RP0

BUCLE   MOVLW   "X"
   MOVWF   TXREG
   BSF   PORTB,0
   CALL   TEMP
   BCF   PORTB,0
   CALL   TEMP
   GOTO    BUCLE

TEMP   MOVLW   B"11111111"
   MOVWF   TEMPO
TEMP_1   DECFSZ   TEMPO
   GOTO   TEMP_2
   RETURN

TEMP_2   MOVLW   B"11111111"
   MOVWF   TEMPO1
TEMP_3   DECFSZ   TEMPO1
   GOTO   TEMP_3
   GOTO   TEMP_1
END

Un saludo


Desconectado XaviPIC

  • PIC10
  • *
  • Mensajes: 7
RE: Comunicacion Serie con PC
« Respuesta #3 en: 11 de Agosto de 2003, 09:17:00 »
Muchas gracias por todo encontr el error y todo me funciona a la perfeccion.

Si ha alguien le interesa estoy desarrollando un programa, con el poco conocimiento de visual basic que tengo, que consiste en un cliente y un servidor que van conectados en dos PCs distintos y a su vez estos a la red internet o ethernet. El servidor controla por el puerto serie una targeta con 4 reles y 5 sensores y va visualizandolo en la pantalla del PC y al la vez lo va enviando por la red al cliente que lo visualiza tambien. Los reles puedes conectarlos y desconectarlos  tanto desde el PC Servidor como del Cliente. Esto te permite un control de la targeta desde cualquier PC ""aunque de momento esta en pruebas"".

Un saludo,
Xavi.