/***********************************************************/
//Title:ATMAGE128串口通信程序-查詢方式
//ICC-AVR : 2009-2-22 13:37:40
// Target : M128
// Crystal: 8.0000Mhz
//Author  :borlittle
//Function:usart0 test
//備注   :本程序經調試好使，如果程序不好使，請注意檢查更改波特率和晶振頻率以及
//檢查調試助手和單片機的熔絲位設置，尤其注意不要編程103模式兼容位
/***********************************************************/
#include <iom128v.h>
#include <macros.h>

#define uchar unsigned char      //定義無符號字符為 uchar
#define uint  unsigned int       //定義無符號整型
#define Crystal 8000000 //晶振8MHZ 
#define Baud 9600         //波特率


//函數聲明
void port_init(void);
void usart0_init(void);
void init_devices(void);
void usart0_char_send(uchar i);
void usart0_str_send(char *s);
uchar usart0_char_receive(void);

/******************端口初始化*******************************/
void port_init(void) 
{
 PORTA = 0xFF; 
 DDRA  = 0x00; 
 PORTB = 0xFF; 
 DDRB  = 0xFF; 
 PORTC = 0xFF; 
 DDRC  = 0x00;
  
 PORTE = 0xFF;   //設置RXD0和TXD0
 DDRE  = 0x02;
 
 PORTF = 0xFF; 
 DDRF  = 0x00; 
 PORTG = 0xFF; 
 DDRG  = 0xFF; 
}
/*****************串口0初始化*********************************/
void usart0_init(void) 
{
 UCSR0B = 0x00;                     //禁止發送和接收
 UCSR0A = 0x02;                     //倍速異步模式USX0=1
 UCSR0C = 0x06;                     //0000 0110，UCSZ01=1，UCSZ00=1；8位字符，1位停止位 
 UBRR0L=(Crystal/8/(Baud+1))%256;   //若為正常異步模式USX0=0則位(Crystal/16/(Baud+1))%256
 UBRR0H=(Crystal/8/(Baud+1))/256;   //參見ATMAGE128使用手冊
 UCSR0B = 0x18;                     //允許發送和接收
}
/******************初始器件**************************************/
void init_devices(void) 
{
 port_init();
 usart0_init();
 }
//****************發送一個字符******************************
void usart0_char_send(uchar i)
{
while(!(UCSR0A&(1<<UDRE0)));
UDR0=i;
}
/******************發送一個字符串*************************/
void usart0_str_send(char *s) 
{
 while(*s)
 {
 usart0_char_send(*s); 
 s++;
 }
}
/*****************接收一個字符****************************/
uchar usart0_char_receive(void) 
{
while(!(UCSR0A&(1<<RXC0)));
return UDR0;
}
/***************主函數*****************************/
void main(void)
{
uchar usart0_temp; 
init_devices();
usart0_str_send("usart0 WORKS WELL   ");
 while(1) 
 {
 usart0_temp=usart0_char_receive();   //等待接收數據
 usart0_str_send("當前數據是：");     //發送數據
 usart0_char_send(usart0_temp); 
 usart0_str_send("  ");
 } 
}