发布于 2004-11-11 18:02:57
0楼
我的程序如下:
主程序:
LD SM0.0
CALL SBR_0
LD SM0.0
CALL SBR_1
LD SM0.0
CALL SBR_2
子程序0 初始化
LD SM0.1
MOVW +0, VW1002
MOVW +0, VW1004
MOVW +0, VW1010
MOVW +64, VW1006
MOVW +16, VW1008
MOVD +0, VD1026
MOVD +0, VD1030
MOVD +0, VD1034
MOVD +0, VD1038
MOVD +0, VD1042
MOVD +0, VD1046
MOVD +0, VD1050
MOVD +0, VD1054
MOVD +0, VD1058
LD SM0.1
MOVW +0, VW1012
MOVW +0, VW1014
MOVW +0, VW1016
MOVW +64, VW1018
MOVW +16, VW1022
MOVD +0, VD1062
MOVD +0, VD1066
MOVD +0, VD1070
MOVD +0, VD1074
MOVD +0, VD1078
MOVD +0, VD1082
MOVD +0, VD1086
MOVD +0, VD1090
MOVD +0, VD1094
LD SM0.1
MOVB 5, SMB34
ATCH INT_0, 10
ENI
子程序1 TD200初始化
LD SM0.1
MOVW +55, VW26
LD SM0.0
= V14.7
LD V3.2
LPS
INCW VW26
AENO
MOVW VW26, VW1120
AENO
*I +50, VW1120
AENO
MOVW VW1120, AQW0
LPP
R V3.2, 1
LD V3.3
LPS
DECW VW26
AENO
MOVW VW26, VW1124
AENO
*I +50, VW1124
AENO
MOVW VW1124, AQW0
LPP
R V3.3, 1
子程序 自由口通讯初始化
LD SM0.1
MOVB 16#09, SMB30
MOVB 250, SMB35
ATCH INT_1, 11
ENI
中断0 模拟量求平均
LD SM0.0
MOVW AIW0, VW1010
ITD VW1010, VD1026
DTR VD1026, VD1034
+R VD1034, VD1038
INCW VW1002
LDW>= VW1002, VW1006
MOVR VD1038, VD1042
/R 64.0, VD1042
MOVD +0, VD1038
MOVW +0, VW1002
LD SM0.0
MOVR VD1042, VD1054
AENO
/R 3200.0, VD1054
AENO
MOVR VD1054, VD76
LD SM0.0
= V14.6
LD SM0.0
MOVW AIW2, VW1016
ITD VW1016, VD1062
DTR VD1062, VD1070
+R VD1070, VD1074
INCW VW1012
LDW>= VW1012, VW1018
MOVR VD1074, VD1078
/R 64.0, VD1078
MOVD +0, VD1074
MOVW +0, VW1012
LD SM0.0
MOVR VD1078, VD1090
AENO
/R 3200.0, VD1090
AENO
MOVR VD1090, VD1094
AENO
MOVR VD1094, VD116
LD SM0.0
= V14.5
子程序1 自由口通讯
LD SM0.5
EU
TRUNC VD1042, VD1240
TRUNC VD1078, VD1300
DTA VD1300, VB215, 2
DTA VD1240, VB201, 2
MOVB 26, VB200
XMT VB200, 0
往事