ex77.c

gprs gsm 的c语言驱动程序。keil编译

//    "扩展模块"    实验七十七  GPRS通信实验（可选）
//
//  这是新增加的实验：手机互相通话
//  把第"40"号模块"键盘显示"的片选信号CS40孔接第"36"号模块";
//  片选信号"YS0（08000-08FFFH）孔。
//  用实验箱上0-9按键作为手机数字键用来拔号；
//  用“TRACE"键作为拔打功能键
//  用”STEP"键作为挂机键
//  用“HERE"键作为应答键
//  用实验连线把"Lab51CPU板”上P3.0孔连第32号模块的“RXD”孔，P3.1孔连“TXD"孔
//  用串口线把GPRS模块上DB9和实验箱上第32号模块中的DB9连接起来。
//  把SIM卡插入模块的卡座中。
//  模块上的“BUZZER"孔连实验平台第06号模块”音响及合成“的Vin1孔。
//  用实验连线给GPRE模块加电，注意不能接反！！！。
//  程序清单：(keil例程\实验七十五\C51\EX77.C)

#include <reg51.h>
#include <intrins.h>
#define LEDLen 6

xdata unsigned char OUTBIT _at_ 0x8002;        // 位控制口
xdata unsigned char OUTSEG _at_ 0x8004;        // 段控制口
xdata unsigned char IN     _at_ 0x8001;        // 键盘读入口

char code dx516[3] _at_ 0x0023;//mon51
unsigned  tmp;
//char code str[] = "51854615;";
char idata str[] ={0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,';'};

unsigned char LEDBuf[LEDLen];                  // 显示缓冲
code unsigned char LEDMAP[] = {                // 八段管显示码
  0x3f, 0x06, 0x5b, 0x4f, 0x66, 0x6d, 0x7d, 0x07,
  0x7f, 0x6f, 0x77, 0x7c, 0x39, 0x5e, 0x79, 0x71
};

void Delay(unsigned char CNT)
{
  unsigned char i;

  while (CNT-- !=0)
    for (i=100; i !=0; i--);
}

void DisplayLED()
{
  unsigned char i;
  unsigned char Pos;
  unsigned char LED;

  Pos = 0x20;                                  // 从左边开始显示
  for (i = 0; i < LEDLen; i++) {
    OUTBIT = 0;                                // 关所有八段管
    LED = LEDBuf[i];
    OUTSEG = LED;
    OUTBIT = Pos;                              // 显示一位八段管
    Delay(1);
    Pos >>= 1;                                 // 显示下一位
  }
}

code unsigned char KeyTable[] = {              // 键码定义
  0x16, 0x15, 0x14, 0xff,
  0x13, 0x12, 0x11, 0x10,
  0x0d, 0x0c, 0x0b, 0x0a,
  0x0e, 0x03, 0x06, 0x09,
  0x0f, 0x02, 0x05, 0x08,
  0x00, 0x01, 0x04, 0x07
};

unsigned char TestKey()
{
   OUTBIT = 0;                                 // 输出线置为0
   return (~IN & 0x0f);                        // 读入键状态(高四位不用)
}

unsigned char GetKey(void)
{
  unsigned char Pos;
  unsigned char i;
  unsigned char k;

  i = 6;
  Pos = 0x20;                                  // 找出键所在列
  do {
    OUTBIT = ~ Pos;
    Pos >>= 1;
    k = ~IN & 0x0f;
  } while ((--i != 0) && (k == 0));

  // 键值 = 列 x 4 + 行
  if (k != 0) {
    i *= 4;
    if (k & 2)
      i += 1;
    else if (k & 4)
      i += 2;
    else if (k & 8)
      i += 3;

    OUTBIT = 0;
    do Delay(10); while (TestKey());           // 等键释放

    return(KeyTable[i]);                       // 取出键码
  } else return(0xff);
}



void send_str()
// 传送字串
{       unsigned char j;
	unsigned char i = 0;
	while(str[i] != '\0')
	{
		SBUF = str[i];
		while(!TI);				// 等特数据传送
		TI = 0;					// 清除数据传送标志
		i++;					// 下一个字符
	}
}


void send_char(unsigned char txd)
// 传送一个字符
{
	SBUF = txd;
	while(!TI);				// 等特数据传送
	TI = 0;					// 清除数据传送标志
}


 unsigned char Buf;
void main()
{
   int i;
   char  j=0;
   unsigned int Buf1;
   TMOD = 0x20;			// 定时器1工作于8位自动重载模式, 用于产生波特率
   TH1 = 0xFD;				// 波特率9600
   TL1 = 0xFD;

   SCON = 0x50;			// 设定串行口工作方式
   PCON &= 0xef;			// 波特率不倍增

   TR1 = 1;				// 启动定时器1
   IE = 0x0;				// 禁止任何中断

   LEDBuf[0] = 0xff;
   LEDBuf[1] = 0xff;
   LEDBuf[2] = 0xff;
   LEDBuf[3] = 0xff;
   LEDBuf[4] = 0x00;
   LEDBuf[5] = 0x00;

   while (1) {
   DisplayLED();
   while (TestKey()){
   Buf  =  GetKey();
    if( (Buf&0xf0)==0){
 //  Buf1  =  GetKey();
   Buf1  =  (Buf& 0x0f)+0x30;

   str[j] = Buf1;
   j = j++;
   if(j==11)
   j=0;
   }

   LEDBuf[5] = LEDMAP[Buf & 0x0f];
        if(Buf==0x10){
        for(i=0;i++<6;)
        LEDBuf[i] = 0x40;
        LEDBuf[0] = 0x40;
        send_char('a');
        send_char('t');
        send_char('d');
        send_str();
        send_char(';');
        send_char(0x0d);
        send_char(0x0a);
        }
        if(Buf==0x11){
        j=0;
        send_char('a');
        send_char('t');
        send_char('h');
        send_char(0x0d);
        send_char(0x0a);
        LEDBuf[0] = 0xff;
        LEDBuf[1] = 0xff;
        LEDBuf[2] = 0xff;
        LEDBuf[3] = 0xff;
        LEDBuf[4] = 0x00;
        LEDBuf[5] = 0x00;
        }
        if(Buf==0x12){
        send_char('a');
        send_char('t');
        send_char('a');
        LEDBuf[4] = 0x40;
        send_char(0x0d);
        send_char(0x0a);
        }
     }
   }
}