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

程序清单如下：

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