【正文】 100NLEDR9 10KV1R10 10KVCC TXD RXD(AT89C51)RSTRST+ 10uK4K3K2 K5D1D2D4D3 K6R1 10KR2 10KR3 10KR4 10KVCC C12100uPR810 12348765LM386ALER7 5KC10FC11 220uFVCCA11 A10 A9 A825define uchar unsigned char//模擬串口sbit P1_0 = 0x90。sbit P1_1 = 0x91。sbit P1_2 = 0x92。sbit P31=P3^1。 //串口輸入sbit re=P3^0。 //串口輸出sbit reset=P3^3。 //單片機、語音芯片復位define RXD P1_0define TXD P1_1define WRDYN 44 //寫延時define RDDYN 43 //讀延時char i。uchar code dis1[]=jingdian1 。 //語音內容更新或增加uchar code dis2[]=jingdian2。uchar code dis3[]=jingdian3。uchar code dis4[]=jingdian4。uchar code dis5[]=jingdian5。uchar code dis5[]=jingdian6。uchar code dis5[]=jingdian7。uchar code dis5[]=jingdian8。uchar *p。void Delay1ms(unsigned int count) //延時1ms{unsigned int i,j。for(i=0。icount。i++)for(j=0。j120。j++)。}void delay(){int i,j。for(i=0。i255。i++)for(j=0。j120。j++)。}void send() //GPS發(fā)送{re=0。TMOD=0x02。 //計數器工作模式：方式 2 自動再裝入的8位計數器26EA=1。 //允許全部中斷TH0=0xf3。 //高8位計數器作為初值寄存器TL0=0xf3。 //低 8位計數器初值ET0=1。 //允許計數器0的中斷響應}main(){p=dis1。 //初始化界面Print(p)。 //初始顯示delay()。 reset=0。 //語音芯片復位delay()。delay()。delay()。reset=1。P31=1。send()。 //GPS發(fā)射TR0=1。 //啟動計 數器while(1){ Delay1ms(300)。while(P31)。 //判斷P31口是否為1,如果是則循環(huán)直到是0后往下執(zhí)行delay()。P24=0。 // 從P24 口輸出一個負脈沖使FWD有效，指針指向下一段delay()。P24=1。delay()。P20=0。 // PLAY有效，播放當前段delay()。P20=1。if(i==5){i=0。}else{i++。}switch(i) { case 0:{p=dis1。} break。27case 1:{p=dis2。} break。case 2:{p=dis3。} break。case 3:{p=dis4。} break。case 4:{p=dis5。} break。}。 GotoXY(6,1)。 //數據指針定位 void ttl(void)interrupt 1 // 定時器/計數器0(TF0) { re=~re。 } // re值取反產生TTL電平語音模塊程序設計：該模塊采用單片機端口輸出信號對語音芯片進行控制。P31=0。 // 模擬負脈沖 FWD 有效，播放指針指向下一段delay()。 P31=1。 delay()。 //給語音芯片一定的 執(zhí)行時間 P20=0。 //模擬負脈沖 PLAY 有效，播放當前段 delay()。 P20=1。GSM模 塊程序 設計：// AT 指令的定義 //char code AT_Tc35[]=AT+。 //連機char code Bps_Tc35[]=IPR=38400。 //波特率char code Text_tc35[]=CMGF=1。 //文本模式char code Read_Tc35[]=CMGR=。 //讀信息char code Erase_Tc35[]=CMGD=。 //刪除信息char code Send_Tc35[]=CMGS=。 //發(fā)送信息char code Creg_Tc35[]=CREG?。 //注冊void UART_Init(void){SCON=0x50。 // 01010000b=1 模式 scon,11011000b。ES=1。}void SendASC(unsigned char ASC){bit es。es=ES。ES=0。//關閉中斷TI=0。SBUF=ASC。while (!TI)。28TI=0。ES=es。}void SendToTc35 (unsigned char *p,unsigned char Long){while (Long){SendASC(*p++)。}}void Rs485_Do(void) interrupt 4 using 1{if (RI==1){RI=0。RsBuf[RsPoint++]=SBUF。if (RsPoint =sizeof(RsBuf)) {RsPoint=0。//FlagRs485=0。} //數據處理}}char code AT_Code[]=OK。void Send_AT (void){unsigned char *p。while (1){ClrRsBuf(RsBuf,sizeof(RsBuf))。SendToTc35(AT_Tc35,2)。 //ATSendASC(OVER)。//***************** 等待應答“ok”ES=1。 //必須中斷Delay(50)。p=strstr(RsBuf,AT_Code)。if(p != NULL ) break。}}void Send_BPS (void){SendToTc35(AT_Tc35,3)。 //AT+SendToTc35(Bps_Tc35,sizeof (Bps_Tc35)1)。//IPR=19200SendASC(OVER)。}29void SetText (void){SendToTc35(AT_Tc35,3)。 //AT+SendToTc35(Text_tc35,sizeof (Text_tc35)1)。//IPR=19200SendASC(OVER)。Delay(100)。unsigned char EraseMsg(unsigned char index){unsigned char *p,i=20。SendToTc35(AT_Tc35,3)。 //AT+SendToTc35(Erase_Tc35,sizeof (Erase_Tc35)1)。//IPR=19200SendASC(index)。SendASC(OVER)。ES=1。while (i){Delay(200)。p=strstr(RsBuf,AT_Code)。if (p !=NULL) { return 1。 }}return 0。}char code Ask_No[]=+CMGR: 0,0。char code ERROR[]=ERROR。char code Ask_Tc35[]=/。unsigned char ReadMsg(unsigned char index){unsigned char *p,i。unsigned char Buf[40]。SendToTc35(AT_Tc35,3)。 //AT+SendToTc35(Read_Tc35,sizeof (Read_Tc35)1)。SendASC(index)。SendASC(OVER)。ES=1。 //必須中斷Delay(600)。/*ES=0。SendToTc35(RsBuf,99)。ES=1。*///p=strstr(RsBuf,ERROR)。if (p !=NULL){30Send_AT()。return 0。}//p=strstr(RsBuf,Ask_No)。//無信息if (p !=NULL) return 0。//p=strstr(RsBuf,Ask_Tc35)。//20 個字節(jié)后是 MSGif (p ==NULL) return 0。//p=p+21。//for (i=0。isizeof(Buf)。i++){Buf[i]=*p++。}if (EraseMsg(index)==0) return 0。p=strcpy(RsBuf,Buf)。 //放回 RsBufreturn 1。}char code SK[]=。void SendMsgStart(void){unsigned char *p,i=10。SendToTc35(AT_Tc35,3)。 //AT+SendToTc35(Send_Tc35,sizeof (Send_Tc35)1)。//IPR=19200SendASC(YinHao)。SendToTc35(,sizeof ())。 //AT+SendASC(YinHao)。SendASC(OVER)。ES=1。while(i){Delay(100)。 //Get p=strstr(RsBuf,SK)。//if (p!=NULL) {ClrRsBuf(RsBuf,sizeof(RsBuf))。Delay(150)。 //Get break。}}}模擬串口程序：31define uchar unsigned charsbit P1_0 = 0x90。sbit P1_1 = 0x91。sbit P1_2 = 0x92。define RXD P1_0define TXD P1_1define WRDYN 44 //寫延時define RDDYN 43 //讀延時//往串口寫一個字節(jié)void WByte(uchar input){uchar i=8。TXD=(bit)0。//發(fā)送啟始位Delay2cp(39)。//發(fā)送8位數據位while(i){TXD=(bit)(inputamp。0x01)。//先傳低位Delay2cp(36)。input=input1。}//發(fā)送校驗位(無)TXD=(bit)1。//發(fā)送結束位Delay2cp(46)。}//從串口讀一個字節(jié)uchar RByte(void){uchar Output=0。uchar i=8。uchar temp=RDDYN。//發(fā)送8位數據位Delay2cp(RDDYN*)。//此處注意,等過起始位while(i){Output =1。if(RXD) Output =0x80。//先收低位Delay2cp(35)。//(9626)/2,循環(huán)共占用26個指令周期}while(temp)//在指定的時間內搜尋結束位。{Delay2cp(1)。if(RXD)break。//收到結束位便退出}return Output。}32//延時程序*void Delay2cp(unsigned char i){while(i)。//剛好兩個指令周期。