;desde Pc, se usa el programa "hyperterminal" ;modo asincrono a 300 bauds, 300 8-N-1 ;desde el teclado de la PC se envía un caracter hacia EVOLUPIC ;usando el puerto COM1. El EVOLUPIC funciona como repetidor (ECO) y ;regresa el caracter hacia la PC para desplegarlo en el monitor. ;también se puede enviar un archivo de texto desde hyperterminal ;para configurar el envío de un archivo de texto, siga lo siguiente: ;en hyperterminal seleccionar: >archivo>propiedades>configuración ;emulación=autodetect, Id.terminal=ANSI, líneas en buffer=500 ;>configuración ASCII ;al enviar ASCII: ;NO SELECCIONAR: "enviar fin de línea" ;NO SELECCIONAR: "eco de los caracteres escritos localmente" ;reterdo de línea=0 milisegundos ;retardo de caracter=0 milisegundos ;al recibir ASCII: ;seleccionar:"agregar avance de línea al final de cada línea" ;seleccionar:"ajustar líneas que sobrepasen ancho de terminal" ;clic en "aceptar" ;>transferir>enviar archivo de texto (seleccionar un archivo) ;usa cable DB9 macho-DB9 hembra processor 16F628 include __config _XT_OSC & _WDT_OFF & _PWRTE_OFF & _MCLRE_ON & _BODEN_OFF & _LVP_OFF #DEFINE BANCO0 BCF STATUS,5 #DEFINE BANCO1 BSF STATUS,5 INICIO ORG 00H BANCO1 MOVLW 02H ;B1/RX entrada, B2/TX salida MOVWF TRISB ;=> RB1=1 , RB2=0 MOVLW 0CFH ;x=207(10)=CF(16) en formula de baud rate MOVWF SPBRG ;para 300 bauds, modo sincrono MOVLW 00H ;BRG=0, SYNC=0, TXEN=0, TX9=0 MOVWF TXSTA ;baja Vel., Asin, no Hab. Tx, 8 bits de datos BANCO0 MOVLW 0X00 MOVWF RCREG MOVWF TXREG MOVLW 0X90 MOVWF RCSTA ;bits 7 SPEN y 4 CREN a uno RECIBO BTFSS PIR1,5 GOTO RECIBO MOVFW RCREG ;algo del teclado MOVWF TXREG ;valor a enviar de aqui pasa a TSR BANCO1 BSF TXSTA,5 ENVIO BTFSS TXSTA,1 GOTO ENVIO NOP BANCO0 GOTO INICIO END