发布于 2003-05-13 09:33:46
0楼
看懂下面的中断程序就可解决你的大多数问题,也请老师多多指点
NETWORK 1
LD SM0.0
DTCH 10
INCB VB881
AB= VB881, 1
MOVB 0, VB881
NETWORK 2
LD SM0.0
INCB VB882
AB= VB882, 5
MOVB 0, VB882
NETWORK 3 //NETWORK TITLE (single line)
//
//NETWORK COMMENTS
//
LD SM0.0
AB= VB881, 0
MOVD HC0, VD700
MOVD HC1, VD704
NETWORK 4 //NETWORK TITLE (single line)
//
//NETWORK COMMENTS
//
LD SM0.0
AB= VB881, 0
MOVD HC2, VD708
MOVD HC4, VD712
MOVD HC5, VD716
NETWORK 5
LD SM0.0
AB= VB881, 0
MOVD +0, SMD38
MOVB 16#C8, SMB37
HSC 0
MOVD +0, SMD48
MOVB 16#C8, SMB47
HSC 1
NETWORK 6 //reset
//
LD SM0.0
AB= VB881, 0
MOVD +0, SMD58
MOVB 16#C8, SMB57
HSC 2
MOVD +0, SMD148
MOVB 16#C8, SMB147
HSC 4
MOVD +0, SMD158
MOVB 16#C8, SMB157
HSC 5
NETWORK 7 //PID0**left__PVN
//
LD SM0.0
DTR VD700, AC0
/R 400.0, AC0
MOVR AC0, VD500
NETWORK 8 //PID0**left__SPN
//
LD SM0.0
ITD VW980, VD920
MOVD VD920, VD924
+D +1848, VD924
DTR VD924, VD960
MOVR VD960, VD928
/R 7878.0, VD928
MOVR VD928, VD504
AENO
AR> VD928, 1.0
MOVR 1.0, VD504
NETWORK 9 //PID0**left__MAIN
//
LD T222
PID VB500, 0
NETWORK 10 //PID0**left__MN
//
LD T222
LPS
MOVR VD508, VD932
+R 0.5, VD932
DTR VD678, VD964
AENO
MOVR VD964, VD940
*R VD932, VD940
LRD
ROUND VD940, VD936
LRD
DTI VD936, VW670
LRD
AW> VW670, +6030
MOVW +6030, VW670
LPP
AW< VW670, +2091
MOVW +2091, VW670
NETWORK 11
LD T222
A SM0.0
MOVW VW670, VW990
AENO
MOVW VW670, VW674
AENO
ITD VW674, VD678
NETWORK 12 //PID0**right__PVN
//
LD SM0.0
DTR VD704, AC1
/R 400.0, AC1
MOVR AC1, VD600
NETWORK 13 //PID0**right__SPN
//
LD SM0.0
ITD VW982, VD850
MOVD VD850, VD854
+D +1614, VD854
DTR VD854, VD858
MOVR VD858, VD862
/R 7410.0, VD862
MOVR VD862, VD604
AENO
AR> VD928, 1.0
MOVR 1.0, VD604
NETWORK 14 //PID0**right__MAIN
//
LD T222
PID VB600, 2
NETWORK 15 //PID0**right__MN
//
LD T222
LPS
MOVR VD608, VD866
+R 0.5, VD866
DTR VD690, VD694
AENO
MOVR VD694, VD874
*R VD866, VD874
LRD
ROUND VD874, VD870
LRD
DTI VD870, VW682
LRD
AW> VW682, +5796
MOVW +5796, VW682
LPP
AW< VW682, +2091
MOVW +2091, VW682
NETWORK 16
LD T222
A SM0.0
MOVW VW682, VW992
AENO
MOVW VW682, VW686
AENO
ITD VW686, VD690
NETWORK 17
LDD< VD708, +900
MOVW +0, VW992
AENO
MOVW +0, VW990
NETWORK 18
LD T222
MOVW VW990, SMW70
AENO
MOVW VW992, SMW80
NETWORK 19
LD SM0.0
PLS 1
AENO
PLS 0
NETWORK 20
LD SM0.0
MOVB 200, SMB34
ATCH timer, 10