MAIN:
NETWORK 1
LD SM0.1
CALL SBR_0
CALL SBR_1
NETWORK 2
LD SM0.7
= SM30.0
NETWORK 3
LD SM0.0
CALL SBR_2
***********************
SBR_0
NETWORK 1
//NETWORK COMMENTS
//
LD SM0.0
MOVB 16#15, SMB30
AENO
MOVB 16#E0, SMB87
AENO
MOVB 16#6A, SMB88
AENO
MOVB 16#FA, SMB89
AENO
MOVB 100, SMB94
NETWORK 2
//NETWORK COMMENTS
//
LD SM0.0
MOVB 1, VB0
MOVB 0, QB0
MOVW +0, MW0
NETWORK 3
LD SM0.0
ATCH INT_2, 23
ENI
***********************
SBR_1
NETWORK 1 //发送一号站帧
//
//NETWORK COMMENTS
//
LD SM0.0
MOVB 15, VB150
AENO
MOVB 16#6A, VB151
AENO
MOVB 16#71, VB152
AENO
MOVB 16#1E, VB153
AENO
MOVB VB0, VB154
AENO
MOVB 16#FA, VB165
NETWORK 2 //发送二号站帧
//
//NETWORK COMMENTS
//
LD SM0.0
MOVB 15, VB250
AENO
MOVB 16#0B, VB251
AENO
MOVB 16#71, VB252
AENO
MOVB 16#1E, VB253
AENO
MOVB VB0, VB254
AENO
MOVB 16#9B, VB265
NETWORK 3 //发送三号站帧
//
//NETWORK COMMENTS
//
LD SM0.0
MOVB 15, VB350
AENO
MOVB 16#2C, VB351
AENO
MOVB 16#71, VB352
AENO
MOVB 16#1E, VB353
AENO
MOVB VB0, VB354
AENO
MOVB 16#BC, VB365
NETWORK 4 //发送四号站帧
//
//NETWORK COMMENTS
//
LD SM0.0
MOVB 15, VB450
AENO
MOVB 16#1D, VB451
AENO
MOVB 16#71, VB452
AENO
MOVB 16#1E, VB453
AENO
MOVB VB0, VB454
AENO
MOVB 16#7D, VB465
**************************
SBR_2
NETWORK 1
LD SM0.0
INCW MW0
NETWORK 2
LDW= MW0, +8
= Q0.0
NETWORK 3
LDW= MW0, +7500
TOF T99, +100
NETWORK 4
LD SM0.0
AN T99
= Q0.2
NETWORK 5
LDW= MW0, +8000
LPS
AB= VB0, 1
MOVB 15, VB150
AENO
XMT VB150, 0
AENO
INCB VB0
LRD
AB= VB0, 2
MOVB 15, VB250
AENO
XMT VB250, 0
AENO
INCB VB0
LRD
AB= VB0, 3
MOVB 15, VB350
AENO
XMT VB350, 0
AENO
INCB VB0
LRD
AB>= VB0, 4
MOVB 15, VB450
AENO
XMT VB450, 0
AENO
MOVB 1, VB0
LPP
MOVW +0, MW0
**************************
INT_2
NETWORK 1 //接收信息处理
//
LD SM0.0
RCV VB500, 0
NETWORK 2
LD SM0.0
= Q0.7
这个程序能向各个站的发送数据
但不能接收数据
不知问题处在哪里?
实在郁闷,找不到错在哪里!
各位能否推荐一本S200的通讯实例的一本PDF的书籍
谢谢高手的指点