Here it is in BoostC format.  You should be able to convert to JAL.

-------------------------serial.c------------------------

#include <system.h>
	
void RS232putch(unsigned char ByteVal)
{
    while(!(test_bit(pir1,4)));
    txreg = ByteVal;
}

unsigned char RS232getch(void)
{
    while(!(test_bit(pir1,5)));
    clear_bit(pir1,5);
    return(rcreg);
}

unsigned char RS232peekch(void)
{
    if(test_bit(pir1,5)) return(1);
    return(0);
}

	/* Set up serial port to run at desired baud rate */
	
void RS232Init(unsigned char BaudRate)
{
	set_bit(trisc,7);	// PORTC[RX] is Input
	clear_bit(trisc,6); // PORTC[TX] is Output
	spbrg = BaudRate;	// Set baud. see header file
	txsta = 0x24;		// Set TXEN and BRGH to 1
	rcsta = 0x90;		// Set SPEN and CREN to 1

	/*
	movlw	(1<<TXIE)|(1<<RXIE)
	iorwf	PIE1			; Enable Transmit and receive interrupts
    */

}

-----------------------serial.h---------------------------
void RS232Init(unsigned char BaudRate);
void RS232putch(unsigned char ByteVal);
char RS232getch(void);
unsigned char RS232peekch(void);

#define RS232_20MHZ_BAUD_115000		10
#define RS232_20MHZ_BAUD_57600		20
#define RS232_20MHZ_BAUD_28800		42
#define RS232_20MHZ_BAUD_19200		64
#define RS232_20MHZ_BAUD_9600		129

#define RS232_16MHZ_BAUD_115000		8
#define RS232_16MHZ_BAUD_57600		16
#define RS232_16MHZ_BAUD_28800		33
#define RS232_16MHZ_BAUD_19200		51
#define RS232_16MHZ_BAUD_9600		103

#define RS232_10MHZ_BAUD_115000		4
#define RS232_10MHZ_BAUD_57600		10
#define RS232_10MHZ_BAUD_28800		21
#define RS232_10MHZ_BAUD_19200		31
#define RS232_10MHZ_BAUD_9600		6
-- 
View this message in context: http://www.nabble.com/USART-on-16F876-tf2441492.html#a6840330
Sent from the PIC - [PIC] mailing list archive at Nabble.com.

-- 
http://www.piclist.com PIC/SX FAQ & list archive
View/change your membership options at
http://mailman.mit.edu/mailman/listinfo/piclist