main.ls1

数控系统的模拟系统,用SSTC51仿真单片机,仿真数控机床切割,能执行数控机床代码.

000B E500     F     1011             MOV     A,Fm1
000D 6480           1012             XRL     A,#080H
000F 9480           1013             SUBB    A,#080H
0011 400D           1014             JC      ?C0031
0013 E500     F     1015             MOV     A,n+01H
0015 1500     F     1016             DEC     n+01H
0017 7002           1017             JNZ     ?C0393
0019 1500     F     1018             DEC     n
001B                1019     ?C0393:
001B 120000   F     1020             LCALL   L?0467
001E 80E4           1021             SJMP    ?C0029
0020                1022     ?C0031:
                    1023     
                    1024                             
0020 E500     F     1025             MOV     A,n+01H
0022 1500     F     1026             DEC     n+01H
0024 7002           1027             JNZ     ?C0394
0026 1500     F     1028             DEC     n
0028                1029     ?C0394:
0028 120000   F     1030             LCALL   L?0469
                    1031     
                    1032                             
002B 80D7           1033             SJMP    ?C0029
                    1034     
                    1035                             
002D                1036     ?C0033:
002D 22             1037             RET     
A51 MACRO ASSEMBLER  MAIN                                                                 05/19/2007 22:35:26 PAGE    17

                    1038     
                    1039     
                    1040     
                    1041     
                    1042     
----                1043             RSEG  ?PR?xoy3?MAIN
0000                1044     xoy3:
                    1045             USING   0
                    1046                             
                    1047     
                    1048                             
0000 C290           1049             CLR     X_F
                    1050     
                    1051                             
0002 C292           1052             CLR     Y_F
0004                1053     ?C0034:
                    1054     
                    1055                             
0004 E500     F     1056             MOV     A,n+01H
0006 4500     F     1057             ORL     A,n
0008 6023           1058             JZ      ?C0038
                    1059     
                    1060                             
000A C3             1061             CLR     C
000B E500     F     1062             MOV     A,Fm1
000D 6480           1063             XRL     A,#080H
000F 9480           1064             SUBB    A,#080H
0011 400D           1065             JC      ?C0036
0013 E500     F     1066             MOV     A,n+01H
0015 1500     F     1067             DEC     n+01H
0017 7002           1068             JNZ     ?C0395
0019 1500     F     1069             DEC     n
001B                1070     ?C0395:
001B 120000   F     1071             LCALL   L?0468
001E 80E4           1072             SJMP    ?C0034
0020                1073     ?C0036:
                    1074     
                    1075                             
0020 E500     F     1076             MOV     A,n+01H
0022 1500     F     1077             DEC     n+01H
0024 7002           1078             JNZ     ?C0396
0026 1500     F     1079             DEC     n
0028                1080     ?C0396:
0028 120000   F     1081             LCALL   L?0470
                    1082     
                    1083                             
002B 80D7           1084             SJMP    ?C0034
                    1085     
                    1086                             
002D                1087     ?C0038:
002D 22             1088             RET     
                    1089     
                    1090     
                    1091     
                    1092     
                    1093     
----                1094             RSEG  ?PR?xoy4?MAIN
0000                1095     xoy4:
                    1096             USING   0
                    1097                             
                    1098     
                    1099                             
                    1100     
                    1101                             
0000 D290           1102             SETB    X_F
                    1103     
A51 MACRO ASSEMBLER  MAIN                                                                 05/19/2007 22:35:26 PAGE    18

                    1104                             
0002 C292           1105             CLR     Y_F
0004                1106     ?C0039:
                    1107     
                    1108                             
0004 E500     F     1109             MOV     A,n+01H
0006 4500     F     1110             ORL     A,n
0008 6023           1111             JZ      ?C0043
                    1112     
                    1113                             
000A C3             1114             CLR     C
000B E500     F     1115             MOV     A,Fm1
000D 6480           1116             XRL     A,#080H
000F 9480           1117             SUBB    A,#080H
0011 400D           1118             JC      ?C0041
0013 E500     F     1119             MOV     A,n+01H
0015 1500     F     1120             DEC     n+01H
0017 7002           1121             JNZ     ?C0397
0019 1500     F     1122             DEC     n
001B                1123     ?C0397:
001B 120000   F     1124             LCALL   L?0468
001E 80E4           1125             SJMP    ?C0039
0020                1126     ?C0041:
                    1127     
                    1128                             
0020 E500     F     1129             MOV     A,n+01H
0022 1500     F     1130             DEC     n+01H
0024 7002           1131             JNZ     ?C0398
0026 1500     F     1132             DEC     n
0028                1133     ?C0398:
0028 120000   F     1134             LCALL   L?0470
                    1135     
                    1136                             
002B 80D7           1137             SJMP    ?C0039
                    1138     
                    1139                             
002D                1140     ?C0043:
002D 22             1141             RET     
                    1142     
                    1143     
                    1144     
                    1145     
                    1146     
                    1147     
----                1148             RSEG  ?PR?xoy5?MAIN
0000                1149     xoy5:
                    1150             USING   0
                    1151                             
                    1152     
                    1153                             
0000 D290           1154             SETB    X_F
0002                1155     ?C0044:
                    1156     
                    1157                             
0002 E500     F     1158             MOV     A,n+01H
0004 4500     F     1159             ORL     A,n
0006 600D           1160             JZ      ?C0046
                    1161     
                    1162                             
0008 E500     F     1163             MOV     A,n+01H
000A 1500     F     1164             DEC     n+01H
000C 7002           1165             JNZ     ?C0399
000E 1500     F     1166             DEC     n
0010                1167     ?C0399:
0010 120000   F     1168             LCALL   x_zm
0013 80ED           1169             SJMP    ?C0044
A51 MACRO ASSEMBLER  MAIN                                                                 05/19/2007 22:35:26 PAGE    19

                    1170     
                    1171                             
0015                1172     ?C0046:
0015 22             1173             RET     
                    1174     
                    1175     
                    1176     
                    1177     
                    1178     
----                1179             RSEG  ?PR?xoy6?MAIN
0000                1180     xoy6:
                    1181             USING   0
                    1182                             
                    1183     
                    1184                             
0000 D292           1185             SETB    Y_F
0002                1186     ?C0047:
                    1187     
                    1188                             
0002 E500     F     1189             MOV     A,n+01H
0004 4500     F     1190             ORL     A,n
0006 600D           1191             JZ      ?C0049
                    1192     
                    1193                             
0008 E500     F     1194             MOV     A,n+01H
000A 1500     F     1195             DEC     n+01H
000C 7002           1196             JNZ     ?C0400
000E 1500     F     1197             DEC     n
0010                1198     ?C0400:
0010 120000   F     1199             LCALL   y_zm
0013 80ED           1200             SJMP    ?C0047
                    1201     
                    1202                             
0015                1203     ?C0049:
0015 22             1204             RET     
                    1205     
                    1206     
                    1207     
                    1208     
                    1209     
----                1210             RSEG  ?PR?xoy7?MAIN
0000                1211     xoy7:
                    1212             USING   0
                    1213                             
                    1214     
                    1215                             
0000 C290           1216             CLR     X_F
0002                1217     ?C0050:
                    1218     
                    1219                             
0002 E500     F     1220             MOV     A,n+01H
0004 4500     F     1221             ORL     A,n
0006 600D           1222             JZ      ?C0052
                    1223     
                    1224                             
0008 E500     F     1225             MOV     A,n+01H
000A 1500     F     1226             DEC     n+01H
000C 7002           1227             JNZ     ?C0401
000E 1500     F     1228             DEC     n
0010                1229     ?C0401:
0010 120000   F     1230             LCALL   x_zm
0013 80ED           1231             SJMP    ?C0050
                    1232     
                    1233                             
0015                1234     ?C0052:
0015 22             1235             RET     
A51 MACRO ASSEMBLER  MAIN                                                                 05/19/2007 22:35:26 PAGE    20

                    1236     
                    1237     
                    1238     
                    1239     
                    1240     
----                1241             RSEG  ?PR?xoy8?MAIN
0000                1242     xoy8:
                    1243             USING   0
                    1244                             
                    1245     
                    1246                             
0000 C292           1247             CLR     Y_F
0002                1248     ?C0053:
                    1249     
                    1250                             
0002 E500     F     1251             MOV     A,n+01H
0004 4500     F     1252             ORL     A,n
0006 600D           1253             JZ      ?C0055
                    1254     
                    1255                             
0008 E500     F     1256             MOV     A,n+01H
000A 1500     F     1257             DEC     n+01H
000C 7002           1258             JNZ     ?C0402
000E 1500     F     1259             DEC     n
0010                1260     ?C0402:
0010 120000   F     1261             LCALL   y_zm
0013 80ED           1262             SJMP    ?C0053
                    1263     
                    1264                             
0015                1265     ?C0055:
0015 22             1266             RET