serial.c

这是用Ｗ７７Ｅ５８编写的控制ＧＳＭ模块

//本函数集来自“51单片机世界”，作者斑竹丁丁（聂小猛）。
//主页地址http://www.mcu51.com
//串口中断服务程序，仅需做简单调用即可完成串口输入输出的处理
//出入均设有缓冲区，大小可任意设置。
//可供使用的函数名:
//char getbyte(void);从接收缓冲区取一个byte,如不想等待则在调用前检测inbufsign是否为1。
//getline(char idata *line, unsigned char n); 获取一行数据回车结束，必须定义最大输入字符数
//putbyte(char c);放入一个字节到发送缓冲区
//putbytes(unsigned char *outplace,j);放一串数据到发送缓冲区，自定义长度
//putstring(unsigned char code *puts);发送一个定义在程序存储区的字符串到串口
//puthex(unsigned char c);发送一个字节的hex码，分成两个字节发。
//putchar(uchar c,uchar j);输出一个无符号字符数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
//putint(uint ui,uchar j);输出一个无符号整型数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
//delay(unsigned char d); 延时n x 100ns
//putinbuf(uchar c);人工输入一个字符到输入缓冲区
//CR;发送一个回车换行
//*************************************************************************
#include <w77e58.h>
#include "global.h"
#include "serial.h"
#include "timer.h"
#include "m32.h"

extern uchar idata SysTimer;
extern char xdata ans[];
#define  OLEN  32                     /* size of serial transmission buffer   */
xdata   unsigned char  outbuf[OLEN];          /* storage for transmission buffer      */
unsigned char xdata  *outlast=outbuf;    //最后由中断传输出去的字节位置
unsigned char xdata  *putlast=outbuf;    //最后放入发送缓冲区的字节位置

xdata   unsigned char  outbuf1[OLEN];          /* storage for transmission buffer      */
unsigned char xdata  *outlast1=outbuf1;    //最后由中断传输出去的字节位置
unsigned char xdata  *putlast1=outbuf1;    //最后放入发送缓冲区的字节位置


#define  ILEN  32                     /* OLD 12 size of serial receiving buffer      */
#define  ILEN1  12                     /* size of serial receiving buffer      */

idata   unsigned char inbuf[ILEN];
unsigned char idata *inlast=inbuf;       //最后由中断进入接收缓冲区的字节位置
unsigned char idata *getlast=inbuf;      //最后取走的字节位置

idata   unsigned char inbuf_1[ILEN1];
unsigned char idata *inlast_1=inbuf_1;       //最后由中断进入接收缓冲区的字节位置
unsigned char idata *getlast_1=inbuf_1;      //最后取走的字节位置



bit   outbufsign0;       //最后一个数据覵BUF发完标志  发完＝0
bit   outbufsign;        //输出缓冲区非空标志   有=1
bit   inbufsign;         //接收缓冲区非空标志   有=1
bit   inbufful;          //输入缓冲区满标志  满=1

bit   outbufsign01;       //最后一个数据覵BUF发完标志  发完＝0
bit   outbufsign1;        //输出缓冲区非空标志   有=1
bit   inbufsign_1;       //接收缓冲区非空标志   有=1
bit   inbufful_1;        //输入缓冲区满标志  满=1


extern  uchar   idata   SysTimer;
extern  uchar   idata   Uart0Timer;

#define CR putstring("\r\n")   //CR=回车换行





//*****************************
//放入一个字节到发送缓冲区
void putbyte(char xdata c)
{
    uchar xdata i,j;
    ES=0;            /*暂停串行中断，以免数据比较时出错?     */
        //if (outlast=putlast)
    while ( (((outlast-putlast)==2) && (outlast > putlast )) || ((outlast < putlast) && (OLEN-(putlast-outlast)==2)))
        { ES=1; c++;c--;ES=0;
    //        i=(0-TH1);
        //        do{i--;j=39; do {j--;}while(j!=0); }while(i!=0);     //i=39
        }
    *putlast=c;            //放字节进入缓冲区
     putlast++;          //发送缓冲区指针加一
    if (putlast==outbuf+OLEN) putlast=outbuf;  //指针到了顶部换到底部
    outbufsign=1;
    if (!outbufsign0)  {outbufsign0=1;TI=1;  }   //缓冲区开始为空置为有，启动发送
    ES=1;
}


void putbyte1(char xdata c)
{
    uchar xdata i,j;
    ES1=0;            /*暂停串行中断，以免数据比较时出错?     */
        //if (outlast=putlast)
    while ( (((outlast1-putlast1)==2) && (outlast1 > putlast1 )) || ((outlast1 < putlast1) && (OLEN-(putlast1-outlast1)==2)))
        { ES1=1; c++;c--;ES1=0;
        }
    *putlast1=c;            //放字节进入缓冲区
     putlast1++;          //发送缓冲区指针加一
    if (putlast1==outbuf1+OLEN) putlast1=outbuf1;  //指针到了顶部换到底部
    outbufsign1=1;
    if (!outbufsign01)  {outbufsign01=1;TI_1=1;  }   //缓冲区开始为空置为有，启动发送
    ES1=1;
}


#if 0
//******************************
//放一串数据到发送缓冲区
void putbytes(unsigned char xdata* outplace,int xdata j)
{      
        int xdata i;
        for(i=0;i<j;i++)
        {
		   putbyte(*outplace);
           outplace++;
        }
     
}

//******************************
//放一串数据到发送缓冲区
void putbytes1(unsigned char xdata* outplace,int xdata j)
{      
        int xdata i;
        for(i=0;i<j;i++)
        {
		   putbyte1(*outplace);
           outplace++;
        }
}
#endif


#if 0
//******************************
//输出一个无符号字符数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
//例如putchar(0x32,2),输出"4.8".
//putchar(0x32,3),输出"0.48".
//putchar(0x32,1),输出"48".
void putchar(uchar c,uchar j)
{
uchar  idata free[4];uchar data i;
i=0;
free[i++]=(c/100+0x30);
if (j==3) free[i++]='.';
free[i++]=(c%100)/10+0x30;
if (j==2) free[i++]='.';
if (j==2 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=(c%10)+0x30;
if (j==1 && free[i-3]==0x30) free[i-3]=0x20;
if (j==1 && free[i-3]==0x20 && free[i-2]==0x30) free[i-2]=0x20;
putbytes(free,i);
}

//******************************
//输出一个无符号整型数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
void putint(uint ui,uchar j)
{uchar idata free[6];
 uchar data i;
i=0;
free[i++]=(ui/10000+0x30);
if (j==5) free[i++]='.';
free[i++]=((ui%10000)/1000+0x30);
if (j==4) free[i++]='.';
if (j==4 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=((ui%1000)/100+0x30);
if (j==3) free[i++]='.';
if (j==3 && free[i-4]==0x30) free[i-4]=0x20;
if (j==3 && free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=((ui%100)/10+0x30);
if (j==2) free[i++]='.';
if (j==2 && free[i-5]==0x30) free[i-5]=0x20;
if (j==2 && free[i-5]==0x20 &&  free[i-4]==0x30) free[i-4]=0x20;
if (j==2 && free[i-5]==0x20 &&  free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=(ui%10+0x30);
if (j==1 && free[i-5]==0x30) free[i-5]=0x20;
if (j==1 && free[i-5]==0x20 &&  free[i-4]==0x30) free[i-4]=0x20;
if (j==1 && free[i-5]==0x20 &&  free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
if (j==1 && free[i-5]==0x20 &&  free[i-4]==0x20 && free[i-3]==0x20 && free[i-2]==0x30) free[i-2]=0x20;
   putbytes(free,i);
}

#endif

//***************************************
//发送一个定义在程序存储区的字符串到串口
void putstring(unsigned char  *puts)
{
      for (;*puts!=0;puts++)   //遇到停止符0结束
      {
	      putbyte(*puts);
	      
      }
}

void putstring1(unsigned char  *puts)
{
      for (;*puts!=0;puts++)   //遇到停止符0结束
      {
	      putbyte1(*puts);
          
	  }
}


#if 0
//*************************************

//发送一个字节的hex码，分成两个字节发。
unsigned char code hex_[]={"0123456789ABCDEF"};
void puthex(unsigned char c)
{
       int ch;
       ch=(c>>4)&0x0f;
       putbyte(hex_[ch]);
       ch=c&0x0f;
       putbyte(hex_[ch]);
}
#endif



//*************************************
//从接收缓冲区取一个byte,如不想等待则在调用前检测inbufsign是否为1。
uchar getbyte (void)
{ 
       char idata c ;
       while (!inbufsign);     //缓冲区空等待
       ES=0;
       c= *getlast;            //取数据
       getlast++;              //最后取走的数据位置加一
       inbufful=0;            //输入缓冲区的满标志清零
       if(getlast==inbuf+ILEN) getlast=inbuf; //地址到顶部回到底部
       if (getlast==inlast) inbufsign=0;       //地址相等置接收缓冲区空空标志，再取数前要检该标志
       ES=1;
       return (c);        //取回数据
    
}