📄 alm_q.lst
字号:
1001 3 PolVal.ObjVal[1]=0;
1002 3 PolFill(PolVal);
1003 3 }
1004 2 }
1005 1 if (FgARDI[7]==1)
1006 1 {
1007 2 if (((M2_0C1&0x08)!=0x08)||(f[7]==0)) //A8RDI
1008 2 {
1009 3 FgARDI[7]=0;
1010 3 PolVal.head=0x08;
1011 3 PolVal.oper_obj=7;
1012 3 PolVal.ObjVal[0]=7;
1013 3 PolVal.ObjVal[1]=0;
1014 3 PolFill(PolVal);
1015 3 }
1016 2 }
1017 1
1018 1 if (FgAUNEQ[7]==1)
1019 1 {
1020 2 if (((M2_0C1&0x02)!=0x02)||(f[7]==0)) //A8UNEQ
1021 2 {
1022 3 FgAUNEQ[7]=0;
1023 3 PolVal.head=0x08;
1024 3 PolVal.oper_obj=9;
1025 3 PolVal.ObjVal[0]=7;
1026 3 PolVal.ObjVal[1]=0;
1027 3 PolFill(PolVal);
1028 3 }
1029 2 }
1030 1 if (FgASLER[7]==1)
1031 1 {
1032 2 if (((M2_0C1&0x01)!=0x01)||(f[7]==0)) //A8SLER
1033 2 {
1034 3 FgASLER[7]=0;
1035 3 AlmVal.head=0x08;
1036 3 AlmVal.oper_obj=10;
1037 3 AlmVal.ObjVal[0]=7;
1038 3 AlmVal.ObjVal[1]=0;
1039 3 AlmInd(AlmVal);
1040 3 }
1041 2 }
1042 1 if (FgAJ2TIM[7]==1)
1043 1 {
1044 2 if (((M2_0DF&0x04)!=0x04)||(f[7]==0)) //A8J2TIM
1045 2 {
1046 3 FgAJ2TIM[7]=0;
1047 3 AlmVal.head=0x08;
C51 COMPILER V7.02b ALM_Q 01/18/2005 21:37:26 PAGE 18
1048 3 AlmVal.oper_obj=12;
1049 3 AlmVal.ObjVal[0]=7;
1050 3 AlmVal.ObjVal[1]=0;
1051 3 AlmInd(AlmVal);
1052 3 }
1053 2 }
1054 1 if (FgTLOS[8]==1)
1055 1 {
1056 2 TMP=T3_012&0x01;
1057 2 if ((f[8]==0)||(TMP==0x00)) //T9LOS
1058 2 {
1059 3 FgTLOS[8]=0;
1060 3 AlmVal.head=0x08;
1061 3 AlmVal.oper_obj=15;
1062 3 AlmVal.ObjVal[0]=8;
1063 3 AlmVal.ObjVal[1]=0;
1064 3 AlmInd(AlmVal);
1065 3 M3_050=M3_050&0xEF; //TnAIS=0,cancel send AIS in transmit data stream
1066 3 }
1067 2 }
1068 1 if (FgTLOC[8]==1)
1069 1 {
1070 2 if (((M3_045&0x02)!=0x02)||(f[8]==0)) //T9LOC
1071 2 {
1072 3 FgTLOC[8]=0;
1073 3 AlmVal.head=0x08;
1074 3 AlmVal.oper_obj=1;
1075 3 AlmVal.ObjVal[0]=24;
1076 3 AlmVal.ObjVal[1]=0;
1077 3 AlmInd(AlmVal);
1078 3 }
1079 2 }
1080 1 if (FgAAIS[8]==1)
1081 1 {
1082 2 if (((M3_031&0x80)!=0x80)||(f[8]==0)) //A9AIS
1083 2 {
1084 3 FgAAIS[8]=0;
1085 3 PolVal.head=0x08;
1086 3 PolVal.oper_obj=2;
1087 3 PolVal.ObjVal[0]=24;
1088 3 PolVal.ObjVal[1]=0;
1089 3 PolFill(PolVal);
1090 3 }
1091 2 }
1092 1 if (FgTDAIS[8]==1)
1093 1 {
1094 2 if (((M3_045&0x01)!=0x01)||(f[8]==0)) //T9DAIS
1095 2 {
1096 3 FgTDAIS[8]=0;
1097 3 PolVal.head=0x08;
1098 3 PolVal.oper_obj=2;
1099 3 PolVal.ObjVal[0]=56;
1100 3 PolVal.ObjVal[1]=0;
1101 3 PolFill(PolVal);
1102 3 }
1103 2 }
1104 1
1105 1 if (FgANDF[8]==1)
1106 1 {
1107 2 if (((M3_031&0x10)!=0x10)||(f[8]==0)) //A9NDF
1108 2 {
1109 3 FgANDF[8]=0;
C51 COMPILER V7.02b ALM_Q 01/18/2005 21:37:26 PAGE 19
1110 3 PolVal.head=0x08;
1111 3 PolVal.oper_obj=6;
1112 3 PolVal.ObjVal[0]=8;
1113 3 PolVal.ObjVal[1]=0;
1114 3 PolFill(PolVal);
1115 3 }
1116 2 }
1117 1 if (FgARDI[8]==1)
1118 1 {
1119 2 if (((M3_031&0x08)!=0x08)||(f[8]==0)) //A9RDI
1120 2 {
1121 3 FgARDI[8]=0;
1122 3 PolVal.head=0x08;
1123 3 PolVal.oper_obj=7;
1124 3 PolVal.ObjVal[0]=8;
1125 3 PolVal.ObjVal[1]=0;
1126 3 PolFill(PolVal);
1127 3 }
1128 2 }
1129 1
1130 1 if (FgAUNEQ[8]==1)
1131 1 {
1132 2 if (((M3_031&0x02)!=0x02)||(f[8]==0)) //A9UNEQ
1133 2 {
1134 3 FgAUNEQ[8]=0;
1135 3 PolVal.head=0x08;
1136 3 PolVal.oper_obj=9;
1137 3 PolVal.ObjVal[0]=8;
1138 3 PolVal.ObjVal[1]=0;
1139 3 PolFill(PolVal);
1140 3 }
1141 2 }
1142 1 if (FgASLER[8]==1)
1143 1 {
1144 2 if (((M3_031&0x01)!=0x01)||(f[8]==0)) //A9SLER
1145 2 {
1146 3 FgASLER[8]=0;
1147 3 AlmVal.head=0x08;
1148 3 AlmVal.oper_obj=10;
1149 3 AlmVal.ObjVal[0]=8;
1150 3 AlmVal.ObjVal[1]=0;
1151 3 AlmInd(AlmVal);
1152 3 }
1153 2 }
1154 1 if (FgAJ2TIM[8]==1)
1155 1 {
1156 2 if (((M3_04F&0x04)!=0x04)||(f[8]==0)) //A9J2TIM
1157 2 {
1158 3 FgAJ2TIM[8]=0;
1159 3 AlmVal.head=0x08;
1160 3 AlmVal.oper_obj=12;
1161 3 AlmVal.ObjVal[0]=8;
1162 3 AlmVal.ObjVal[1]=0;
1163 3 AlmInd(AlmVal);
1164 3 }
1165 2 }
1166 1
1167 1 if (FgTLOS[9]==1)
1168 1 {
1169 2 TMP=T3_052&0x01;
1170 2 if ((f[9]==0)||(TMP==0x00)) //T10LOS
1171 2 {
C51 COMPILER V7.02b ALM_Q 01/18/2005 21:37:26 PAGE 20
1172 3 FgTLOS[9]=0;
1173 3 AlmVal.head=0x08;
1174 3 AlmVal.oper_obj=15;
1175 3 AlmVal.ObjVal[0]=9;
1176 3 AlmVal.ObjVal[1]=0;
1177 3 AlmInd(AlmVal);
1178 3 M3_080=M3_080&0xEF; //TnAIS=0,cancel send AIS in transmit data stream
1179 3 }
1180 2 }
1181 1 if (FgTLOC[9]==1)
1182 1 {
1183 2 if (((M3_075&0x02)!=0x02)||(f[9]==0)) //T10LOC
1184 2 {
1185 3 FgTLOC[9]=0;
1186 3 AlmVal.head=0x08;
1187 3 AlmVal.oper_obj=1;
1188 3 AlmVal.ObjVal[0]=25;
1189 3 AlmVal.ObjVal[1]=0;
1190 3 AlmInd(AlmVal);
1191 3 }
1192 2 }
1193 1 if (FgAAIS[9]==1)
1194 1 {
1195 2 if (((M3_061&0x80)!=0x80)||(f[9]==0)) //A10AIS
1196 2 {
1197 3 FgAAIS[9]=0;
1198 3 PolVal.head=0x08;
1199 3 PolVal.oper_obj=2;
1200 3 PolVal.ObjVal[0]=25;
1201 3 PolVal.ObjVal[1]=0;
1202 3 PolFill(PolVal);
1203 3 }
1204 2 }
1205 1 if (FgTDAIS[9]==1)
1206 1 {
1207 2 if (((M3_075&0x01)!=0x01)||(f[9]==0)) //T10DAIS
1208 2 {
1209 3 FgTDAIS[9]=0;
1210 3 PolVal.head=0x08;
1211 3 PolVal.oper_obj=2;
1212 3 PolVal.ObjVal[0]=57;
1213 3 PolVal.ObjVal[1]=0;
1214 3 PolFill(PolVal);
1215 3 }
1216 2 }
1217 1
1218 1 if (FgANDF[9]==1)
1219 1 {
1220 2 if (((M3_061&0x10)!=0x10)||(f[9]==0)) //A10NDF
1221 2 {
1222 3 FgANDF[9]=0;
1223 3 PolVal.head=0x08;
1224 3 PolVal.oper_obj=6;
1225 3 PolVal.ObjVal[0]=9;
1226 3 PolVal.ObjVal[1]=0;
1227 3 PolFill(PolVal);
1228 3 }
1229 2 }
1230 1 if (FgARDI[9]==1)
1231 1 {
1232 2 if (((M3_061&0x08)!=0x08)||(f[9]==0)) //A10RDI
1233 2 {
C51 COMPILER V7.02b ALM_Q 01/18/2005 21:37:26 PAGE 21
1234 3 FgARDI[9]=0;
1235 3 PolVal.head=0x08;
1236 3 PolVal.oper_obj=7;
1237 3 PolVal.ObjVal[0]=9;
1238 3 PolVal.ObjVal[1]=0;
1239 3 PolFill(PolVal);
1240 3 }
1241 2 }
1242 1
1243 1 if (FgAUNEQ[9]==1)
1244 1 {
1245 2 if (((M3_061&0x02)!=0x02)||(f[9]==0)) //A10UNEQ
1246 2 {
1247 3 FgAUNEQ[9]=0;
1248 3 PolVal.head=0x08;
1249 3 PolVal.oper_obj=9;
1250 3 PolVal.ObjVal[0]=9;
1251 3 PolVal.ObjVal[1]=0;
1252 3 PolFill(PolVal);
1253 3 }
1254 2 }
1255 1 if (FgASLER[9]==1)
1256 1 {
1257 2 if (((M3_061&0x01)!=0x01)||(f[9]==0)) //A10SLER
1258 2 {
1259 3 FgASLER[9]=0;
1260 3 AlmVal.head=0x08;
1261 3 AlmVal.oper_obj=10;
1262 3 AlmVal.ObjVal[0]=9;
1263 3 AlmVal.ObjVal[1]=0;
1264 3 AlmInd(AlmVal);
1265 3 }
1266 2 }
1267 1 if (FgAJ2TIM[9]==1)
1268 1 {
1269 2 if (((M3_07F&0x04)!=0x04)||(f[9]==0)) //A10J2TIM
1270 2 {
1271 3 FgAJ2TIM[9]=0;
1272 3 AlmVal.head=0x08;
1273 3 AlmVal.oper_obj=12;
1274 3 AlmVal.ObjVal[0]=9;
1275 3 AlmVal.ObjVal[1]=0;
1276 3 AlmInd(AlmVal);
1277 3 }
1278 2 }
1279 1
1280 1 if (FgTLOS[10]==1)
1281 1 {
1282 2 TMP=T3_092&0x01;
1283 2 if ((f[10]==0)||(TMP==0x00)) //T11LOS
1284 2 {
1285 3 FgTLOS[10]=0;
1286 3 AlmVal.head=0x08;
1287 3 AlmVal.oper_obj=15;
1288 3 AlmVal.ObjVal[0]=10;
1289 3 AlmVal.ObjVal[1]=0;
1290 3 AlmInd(AlmVal);
1291 3 M3_0B0=M3_0B0&0xEF; //TnAIS=0,cancel send AIS in transmit data stream
1292 3 }
1293 2 }
1294 1 if (FgTLOC[10]==1)
1295 1 {
C51 COMPILER V7.02b ALM_Q 01/18/2005 21:37:26 PAGE 22
1296 2 if (((M3_0A5&0x02)!=0x02)||(f[10]==0)) //T11LOC
1297 2 {
1298 3 FgTLOC[10]=0;
1299 3 AlmVal.head=0x08;
1300 3 AlmVal.oper_obj=1;
1301 3 AlmVal.ObjVal[0]=26;
1302 3 AlmVal.ObjVal[1]=0;
1303 3 AlmInd(AlmVal);
1304 3 }
1305 2 }
1306 1 if (FgAAIS[10]==1)
1307 1 {
1308 2 if (((M3_091&0x80)!=0x80)||(f[10]==0)) //A11AIS
1309 2 {
1310 3 FgAAIS[10]=0;
1311 3 PolVal.head=0x08;
1312 3 PolVal.oper_obj=2;
1313 3 PolVal.ObjVal[0]=26;
1314 3 PolVal.ObjVal[1]=0;
1315 3 PolFill(PolVal);
1316 3 }
1317 2 }
1318 1 if (FgTDAIS[10]==1)
1319 1 {
1320 2 if (((M3_0A5&0x01)!=0x01)||(f[10]==0)) //T11DAIS
1321 2 {
1322 3 FgTDAIS[10]=0;
1323 3 PolVal.head=0x08;
1324 3 PolVal.oper_obj=2;
1325 3 PolVal.ObjVal[0]=58;
1326 3 PolVal.ObjVal[1]=0;
1327 3 PolFill(PolVal);
1328 3 }
1329 2 }
1330 1
1331 1 if (FgANDF[10]==1)
1332 1 {
1333 2 if (((M3_091&0x10)!=0x10)||(f[10]==0)) //A11NDF
1334 2 {
1335 3 FgANDF[10]=0;
1336 3 PolVal.head=0x08;
1337 3 PolVal.oper_obj=6;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -