自由口模式下PLC与计算机的通信

程序清单　　　　
主程序：
　　NETWORK 1
　　LDSM0.1//第一次扫描调用初始化子程序
　　CALLinitialize
　　NETWORK 2
　　LDB=VB134， VB199 //指令中的站地址与本机站地址相符
　　AB=VB102， 5//指令类型为读指令
　　AM0.0//BCC码校验正确
　　CALLRead//调用读子程序
　　NETWORK 3
　　LDB=VB134， VB199//指令中的站地址与本机站地址相符
　　AB= VB102， 6//指令类型为写指令
　　AM0.0//BCC码校验正确
　　CALLWrite//调用写子程序
　　NETWORK 4
　　LDM0.1//指令接收完成后调用BCC码校验子程序
　　CALLVerify
　　NETWORK 5
　　LDSM4.5//当端口空闲时启动RCV
　　RCVVB100， 0
　　Read子程序：
　　NETWORK 1
　　LDSM0.0//停止端口0的接收
　　RSM87.7， 1
　　RM0.0， 1
　　RCVVB100， 0
　　NETWORK 2
　　LDSM0.0//将数据写入发送缓冲区
　　MOVB 103， VB154
　　MOVB1， VB155
　　HTA*VD135， VB156， 16
　　MOVB26， VB174
　　MOVB21， VB153
　　NETWORK 3
　　LDSM0.0//计算BCC校验码
　　FORVW177， +1， +16
　　NETWORK 4
　　LDSM0.0
　　XORB*VD181， VB180
　　NETWORK 5
　　LDSM0.0
　　INCDVD181
　　NETWORK 6
　　NEXT
　　NETWORK 7
　　LDSM0.0
　　HTAVB180， VB172， 2//BCC校验码写入发送缓冲区
　　NETWORK 8
　　LDSM4.5//发送反馈信息
　　XMTVB153， 0
　　Write子程序：
　　NETWORK 1
　　LDSM0.0//停止端口0的接收
　　RSM87.7， 1
　　RM0.0， 1
　　RCVVB100， 0
　　NETWORK 2
　　LDSM0.0//装入要写如数据源的地址指针
　　MOVD&VB115， VD145
　　NETWORK 3
　　LDSM0.0//写入数据
　　ATH*VD145， *VD135， VB139
　　NETWORK 4
　　LDSM0.0//指令执行的反馈信息写入发送缓冲区
　　MOVB21， VB153
　　MOVB103， VB154
　　MOVB2， VB155
　　MOVB26， VB174
　　NETWORK 5
　　LDSM4.5//发送指令执行的反馈信息
　　XMTVB153， 0
　　Verify子程序：
　　NETWORK 1
　　LDSM0.0
　　RM0.1， 1//复位verify子程序的执行条件
　　NETWORK 2
　　LDSM0.0//计算BCC码
　　FORVW175， +1， +29
　　NETWORK 3
　　LDSM0.0
　　XORB*VD149， VB179
　　NETWORK 4
　　LDSM0.0
　　INCDVD149
　　NETWORK 5
　　NEXT
　　NETWORK 6
　　LDB=VB179， VB140//当BCC码校验正确时，M0.0置1
　　AB=VB133， 71
　　SM0.0， 1
　　NETWORK 7
　　LDB=VB133， 71//BCC码错误时发送反馈信息
　　AB《》VB179， VB140
　　MOVB21， VB153
　　MOVB103， VB154
　　MOVB3， VB155
　　MOVB26， VB174
　　RSM87.7， 1
　　RCVVB100， 0
　　XMTVB153， 0
　　NETWORK 8
　　LDB《》VB133， 71//指令格式错误或RCV超时时发送反馈信息
　　MOVB21， VB153
　　MOVB103， VB154
　　MOVB4， VB155
　　MOVB26， VB174
　　RSM87.7， 1
　　RCVVB100， 0
　　XMTVB153， 0
　　Initialize子程序：
　　NETWORK 1
　　LDSM0.0
　　MOVB9， SMB30//0口“9600，N，8，1”
　　NETWORK 2
　　LDSM0.0//RCV指令初始化
　　MOVB16#EC， SMB87
　　MOVB103， SMB88
　　MOVB71， SMB89
　　MOVB+1000， SMW92
　　MOVB35， SMB94
　　RSM87.2， 1
　　NETWORK 3
　　LDSM0.0
　　ATCHRCVcomplete， 23//连接口0接收完成的中断
　　NETWORK 4
　　LDSM0.0
　　ATCHXMTcomplete， 9//连接口0发送完成的中断
　　NETWORK 5
　　LDSM0.0
　　ENI//中断允许
　　NETWORK 6
　　LDSM0.0
　　MOVB2， VB199//将本机站地址装入寄存器
　　NETWORK 7
　　LDSM0.0
　　MOVB&VB102， VD149//装入地址指针
　　MOVB0， VB179//BCC码寄存器清零
　　MOVB&VB156， VD181//装入地址指针
　　MOVB0， VB180//BCC码寄存器清零
　　RCVcomplete中断程序
　　NETWORK 1
　　LDSM0.0
　　ATHVB103， VB134， 2//指令译码（ASCII码到十六进制）
　　ATHVB105， VB135， 8
　　ATHVB113， VB139， 2
　　ATHVB131， VB140， 2
　　SM0.1， 1//置位Verify子程序的触发条件
　　MOVB0， VB179//BCC码寄存器清零
　　MOVD&VB102， VD149//装入地址指针
　　XMTcomplete中断程序
　　NETWORK 1
　　LDSM0.0
　　RM0.0， 1//复位BCC校验码正确的标志位
　　SSM87.7， 1//允许口0进行接收
　　MOVB0， VB179//BCC校验码寄存器清零
　　MOVB0， VB180//BCC校验码寄存器清零
　　MOVD&VB102， VD149//重新装入地址指针
　　MOVD&VB156， VD181
　　MOVB0， VB133 //接收缓冲区中存放指令结束字符的字节清零