sendrtca.c

EasyARM2200开发平台试验用的通信软件

/****************************************************************************
* 文件名：SENDRTCA.C
* 功能：运行RTC进行计时，并将所时间值不断的通过串口向上位机发送。上位机使用EasyARM
*      软件，在全仿真的DOS字符窗口观察结果。
*      通讯波特率115200，8位数据位，1位停止位，无奇偶校验。
* 说明：
****************************************************************************/
#include  "config.h"  


/* 定义串口模式设置数据结构 */
typedef  struct  UartMode
{  uint8 datab;         // 字长度，5/6/7/8
   uint8 stopb;         // 停止位，1/2
   uint8 parity;    	// 奇偶校验位，0为无校验，1奇数校验，2为偶数校验
}  UARTMODE;



/****************************************************************************
* 名称：UART0_Ini()
* 功能：初始化串口0。设置其工作模式及波特率。
* 入口参数：baud                波特率
*          set          模式设置(UARTMODE数据结构)
* 出口参数：返回值为1时表示初始化成功，为0表示参数出错
****************************************************************************/
uint8  UART0_Ini(uint32 baud, UARTMODE set)
{  uint32  bak;
   
   /* 参数过滤 */
   if( (0==baud)||(baud>115200) ) return(0);
   if( (set.datab<5)||(set.datab>8) ) return(0);
   if( (0==set.stopb)||(set.stopb>2) ) return(0);
   if( set.parity>4 ) return(0);

   /* 设置串口波特率 */
   U0LCR = 0x80;                        // DLAB位置1
   bak = (Fpclk>>4)/baud;
   U0DLM = bak>>8;
   U0DLL = bak&0xff;
   
   /* 设置串口模式 */
   bak = set.datab-5;                   // 设置字长度
   if(2==set.stopb) bak |= 0x04;        // 判断是否为2位停止位  
   
   if(0!=set.parity) {set.parity = set.parity-1; bak |= 0x08;}
   bak |= set.parity<<4;              	// 设置奇偶校验
      
   U0LCR = bak;
   
   return(1);
}



/****************************************************************************
* 名称：SendByte()
* 功能：向串口发送字节数据，并等待发送完毕。
* 入口参数：data                要发送的数据
* 出口参数：无
****************************************************************************/
void  SendByte(uint8 data)
{  U0THR = data;                    // 发送数据

   while( (U0LSR&0x20)==0 );        // 等待数据发送
}



/****************************************************************************
* 名称：PC_DispChar()
* 功能：向PC机发送显示字符。
* 入口参数：x        显示位置的纵坐标，0-79   
*          y        显示位置的横坐标，0-24 
*          chr      显示的字符，不能为0xff
*          color    显示的状态包括前景色、背景色、闪耀位。它与dos的字符显示状态一样。 
*                   即0~3位：前景色，4~6位：背景色，7位：闪耀位。
* 出口参数：无
****************************************************************************/
void  PC_DispChar(uint8 x, uint8 y, uint8 chr, uint8 color)
{  SendByte(0xff);
   SendByte(x);
   SendByte(y);
   SendByte(chr);
   SendByte(color);
}



/****************************************************************************
* 名称：ISendStr()
* 功能：向PC机发送字串，以便显示。
* 入口参数：x        显示位置的纵坐标，0-79   
*          y        显示位置的横坐标，0-24 
*          color    显示的状态包括前景色、背景色、闪耀位。它与dos的字符显示状态一样。 
*                   即0~3位：前景色，4~6位：背景色，7位：闪耀位。
*          str      要发送的字符串，字串以'\0'结束
* 出口参数：无
****************************************************************************/
void  ISendStr(uint8 x, uint8 y, uint8 color, uint8 const *str)
{  while(1)
   {  if(*str=='\0') break;                     // 若为'\0'，则退出
      PC_DispChar(x++, y, *str++, color);       // 发送显示数据
      if(x>=80)
      {  x = 0;
         y++;
      }
   }
} 


/****************************************************************************
* 名称：SendTimeRtc()
* 功能：读取RTC的时间值，并将读出的时分秒值由串口发送到上位机显示。
* 入口参数：无
* 出口参数：无
****************************************************************************/
void  SendTimeRtc(void)
{  uint8  data_buf[11];
   uint32  datas;
   uint32  times;
   uint32  bak;
    
   times = CTIME0;			    // 读取完整时钟寄存器
   datas = CTIME1;
   
   bak = (datas>>16)&0xFFF;     // 取得年值
   data_buf[0] = bak/1000+'0';
   bak = bak%1000;
   data_buf[1] = bak/100+'0';
   bak = bak%100;
   data_buf[2] = bak/10+'0';
   data_buf[3] = bak%10+'0';
   data_buf[4] = '.';
   
   bak = (datas>>8)&0x0F;       // 取得月值
   data_buf[5] = bak/10+'0';
   data_buf[6] = bak%10+'0';
   data_buf[7] = '.';
   
   bak = datas&0x1F;            // 取得日值
   data_buf[8] = bak/10+'0';
   data_buf[9] = bak%10+'0';
   data_buf[10] = '\0';
   
   ISendStr(28, 5, 0x04, data_buf);
   
   bak = (times>>16)&0x1F;		// 取得时的值
   data_buf[0] = bak/10+'0';
   data_buf[1] = bak%10+'0';		
   data_buf[2] = ':';
   
   bak = (times>>8)&0x3F;		// 取得分的值
   data_buf[3] = bak/10+'0';
   data_buf[4] = bak%10+'0';		
   data_buf[5] = ':';
   
   bak = times&0x3F;			// 取得秒的值
   data_buf[6] = bak/10+'0';
   data_buf[7] = bak%10+'0';		
   data_buf[8] = '\0';
   
   ISendStr(28, 13, 0x04, data_buf);
}



/****************************************************************************
* 名称：SendLogo()
* 功能：向串口发送LOGO显示数据。
* 入口参数：无
* 出口参数：无
****************************************************************************/
void  SendLogo(void)
{  uint8  const  STRDATE[] = "Date is :";
   uint8  const  STRTIME[] = "Time is :";
   uint8  const  STRWWW[]  = "WWW.ZLGMCU.COM";

   ISendStr(15, 5, 0x0F, STRDATE);
   ISendStr(15, 13, 0x0F, STRTIME);
   ISendStr(50, 20, 0x0F, STRWWW);
}



/****************************************************************************
* 名称：RTCIni()
* 功能：初始化实时时钟。
* 入口参数：无
* 出口参数：无
****************************************************************************/
void  RTCIni(void)
{  PREINT = Fpclk / 32768 - 1;	// 设置基准时钟分频器
   PREFRAC = Fpclk - (Fpclk / 32768) * 32768;
   
   YEAR = 2004;				    // 初始化年
   MONTH = 2;				    // 初始化月
   DOM = 19;				    // 初始化日
   HOUR = 8;
   MIN = 30;
   SEC = 0;
   
   
   CIIR = 0x01;				    // 设置秒值的增量产生一次中断
   
   CCR = 0x01;				    // 启动RTC
}


/****************************************************************************
* 名称：main()
* 功能：读取实时时钟的值，并从串口发送出去。  
****************************************************************************/
int  main(void)
{  UARTMODE  uart0_set;

   PINSEL0 = 0x00000005;            // 设置I/O连接到UART0
   PINSEL1 = 0x00000000;                
   
   uart0_set.datab = 8;             // 8位数据位
   uart0_set.stopb = 1;             // 1位停止位
   uart0_set.parity = 0;            // 无奇偶校验
   UART0_Ini(115200, uart0_set);    // 初始化串口模式
   U0FCR = 0x01;                    // 使能FIFO
   SendLogo();
   
   
   RTCIni();					    // 初始化RTC
   while(1)	
   {  while( 0==(ILR&0x01) );       // 等待RTC增量中断标志
      ILR = 0x01;				    // 清除中断标志
      SendTimeRtc();                // 读取时钟值,并向UART0发送
      
      while( 0==(ILR&0x01) );
      ILR = 0x01;
      SendTimeRtc();
   }
   
   return(0);
}