基于MODEM的单片机与PC机间的远程通信究研

　　if(mum1= =0x35)drev(); /*回响码为0x35则转入数据接收与处理器程序*/

　　}

　　while(key= =0);

　　key=bioskey(0);

　　if(key= =0x011b)return; /*按ESC键则返回*/

　　4.2 单片机程序设计

　　单片机程序框图如图6所示。

　　程序清单如下：

　　LD 72H，#4003H;8255命令口地址

　　LD 70H;#0082HH;A口为输出，B口为输入

　　STB 70H，[72H]

　　LDB 16H，#20 ;串口初始化

　　LDB 11H，#09H ;方式1

　　LDB 0EH，#4DH;波特率为1200bps

　　LDB 0EH,80H

　　LDB 18H,#0CH;堆栈

　　ORB IOC1，#20H

　　LD 72H，#4000H ;8255的A口地址

　　LD 70H，#0003H ;使RTS和DTR均为高电平

　　STB 70H，[72H]

　　LCALL COMZ0 ;连续发出四个0

　　LCALL DT ;延时1000nS

　　LCALL COMZ1 ;初始化MODEM，发出at命令：ata

　　LCALL DT

　　LCALL COMZ2 ;初始化MODEM，发出at命令：ate1q0v1l3x4s0=1

　　LCALL DT

　　LCALL COMZ3 ;初始化MODEM，发出at命令：atS7=30

　　LCALL DT

　　RING0：LDB SPCON，#09H

　　RING1：LDB 60H，SPSTAT

　　JBC 60H，6，RING1

　　ANDB 60H，#0BFH

　　LDB 70H，SUBF ;从串口接收一个数据

　　CMPB 70H，#80H

　　JE TD ;发送数据程序

　　LJMP RING1

　　由于单片机向MODEM发出at命令程序是相似的，故在此仅为at命令：ate1q0v1l3x4s0=1为例来加以说明。假设at命令存放在以0AB40H为首地址的外部存贮器中。程序如下：

　　COMZ2：LD72H，#0AB40H ;at命令首地址

　　LDB 20H，#17

　　COMZ2A：LDB 70H，[72H]+ ;取at命令

　　LDB SBUF，70H ;向串口送at命令

　　DJNZ 20H，COMZ2A

　　LDB 70H，#0DH

　　LDB SBUF，70H ;发出确认码

　　RET