simh-testsetgenerator/PDP8/tests/diags/maindec-8e-d0bb-pb.pal
2020-01-01 16:03:54 -08:00

2200 lines
154 KiB
Text

TITLE "AUTOMATIC DISASSEMBLY OF maindec-8e-d0bb-pb.bin BY D8TAPE"
////////////////////////////////////////////////////////////////////////////////
/
/ Automatic Disassembly of maindec-8e-d0bb-pb.bin
/ Generated 2010 02 19 00:10:29
/ Generated by d8tape version 0.351
/ Visit http://www.pdp12.org/pdp8/software/index.html for updates
/
/ Symbol format:
/ AIx -- Auto-index variables (address range 001x)
/ Caaaa -- Constants (non-unique)
/ Daaaa -- Data (read/write variables)
/ Kvvvv -- Program-wide unique constants
/ Laaaa -- Labels for control flow targets
/ Saaaa -- Subroutines
/
/ Where:
/ aaaa is the definition address
/ vvvv is the value of the constant
/ x is the last digit of the address 001x for auto-index variables
/
/ 3704 locations used, 2632 code and 1052 data
////////////////////////////////////////////////////////////////////////////////
*0200
*0000
L0000,
D0000, 0000 / AND L0000
L0001,
D0001, 5001 / JMP L0001
D0002, 0002 / AND D0002
D0003, 0003 / AND D0003
*0007
D0007, 0000 / AND L0000
*0020
C0020, 7777 / CLA MQA SCA MQL LSR +
C0021, 3777 / DCA I C0177
C0022, 5777 / JMP I C0177
C0023, 6777 / 6777
C0024, 7377 / CLA CLL CMA CML IAC RTR RTL
C0025, 7577 / MQA SCA MQL LSR +
C0026, 7677 / CLA SCA MQL LSR +
C0027, 7737 / CLA MQA MQL LSR +
D0030, 0000 / AND L0000
C0031, 7757 / CLA MQA SCA LSR +
C0032, 7767 / CLA MQA SCA MQL DVI +
C0033, 7773 / CLA MQA SCA MQL SHL +
C0034, 7775 / CLA MQA SCA MQL ASR +
C0035, 7776 / SPA SNA SZL CLA OSR HLT
C0036, 0000 / AND L0000
C0037, 1777 / TAD I C0177
C0040, 0777 / AND I C0177
C0041, 0377 / AND C0177
D0042, 0177 / AND C0177
C0043, 0077 / AND C0077
C0044, 0037 / AND C0037
C0045, 0017 / AND AI7
C0046, 0007 / AND D0007
C0047, 0003 / AND D0003
D0050, 0000 / AND L0000
C0051, 0001 / AND L0001
L0052,
C0052, 4400 / JMS I L0000
C0053, 4577 / JMS I C0177
C0054, 2525 / ISZ I C0125
C0055, 6666 / 6666
C0056, 4444 / JMS I C0044
C0057, 7070 / CMA CML RAR
C0060, 0707 / AND I C0107
C0061, 5252 / JMP L0052
C0062, 1111 / TAD C0111
C0063, 5555 / JMP I C0155
C0064, 5200 / JMP L0000
C0065, 0004 / AND C0004
*0110
D0110, 0000 / AND L0000
*0172
C0172, 0176 / AND C0176
D0173, 0172 / AND C0172
C0174, 0173 / AND D0173
C0175, 0174 / AND C0174
C0176, 0175 / AND C0175
C0177, 1234 / TAD C0034
*0200
L0200,
CLA / @@0200=7200
SKP / @@0201=7410
D0202, 0000 / AND L0000
TAD L0052 / @@0203=1052
DCA D0377 / @@0204=3377
SZA / @@0205=7440
HLT / @@0206=7402
SKP / @@0207=7410
D0210, 0000 / AND L0000
TAD L0052 / @@0211=1052
CIA / @@0212=7041
TAD D0377 / @@0213=1377
SZA / @@0214=7440
HLT / @@0215=7402
CLA / @@0216=7200
TAD C0053 / @@0217=1053
DCA D0202 / @@0220=3202
SZA / @@0221=7440
HLT / @@0222=7402
TAD C0053 / @@0223=1053
CIA / @@0224=7041
TAD D0202 / @@0225=1202
SZA / @@0226=7440
HLT / @@0227=7402
CLA / @@0230=7200
TAD C0020 / @@0231=1020
DCA D0202 / @@0232=3202
SZA / @@0233=7440
HLT / @@0234=7402
TAD D0202 / @@0235=1202
CMA / @@0236=7040
SZA / @@0237=7440
HLT / @@0240=7402
CLA / @@0241=7200
TAD C0036 / @@0242=1036
DCA D0202 / @@0243=3202
SZA / @@0244=7440
HLT / @@0245=7402
TAD D0202 / @@0246=1202
SZA / @@0247=7440
C0250, 7402 / HLT
CLA / @@0251=7200
TAD C0054 / @@0252=1054
DCA D0202 / @@0253=3202
SZA / @@0254=7440
HLT / @@0255=7402
TAD C0054 / @@0256=1054
CIA / @@0257=7041
TAD D0202 / @@0260=1202
SZA / @@0261=7440
HLT / @@0262=7402
CLA / @@0263=7200
TAD C0055 / @@0264=1055
DCA D0202 / @@0265=3202
SZA / @@0266=7440
HLT / @@0267=7402
TAD C0055 / @@0270=1055
CIA / @@0271=7041
TAD D0202 / @@0272=1202
SZA / @@0273=7440
HLT / @@0274=7402
CLA / @@0275=7200
TAD C0056 / @@0276=1056
DCA D0377 / @@0277=3377
SZA / @@0300=7440
HLT / @@0301=7402
TAD C0056 / @@0302=1056
CIA / @@0303=7041
TAD D0377 / @@0304=1377
SZA / @@0305=7440
HLT / @@0306=7402
CLA / @@0307=7200
TAD C0057 / @@0310=1057
DCA D0377 / @@0311=3377
SZA / @@0312=7440
HLT / @@0313=7402
TAD C0057 / @@0314=1057
CIA / @@0315=7041
TAD D0377 / @@0316=1377
SZA / @@0317=7440
HLT / @@0320=7402
CLA / @@0321=7200
TAD C0060 / @@0322=1060
DCA L0000 / @@0323=3000
SZA / @@0324=7440
HLT / @@0325=7402
TAD C0060 / @@0326=1060
CIA / @@0327=7041
TAD L0000 / @@0330=1000
SZA / @@0331=7440
HLT / @@0332=7402
CLA / @@0333=7200
TAD C0061 / @@0334=1061
DCA L0000 / @@0335=3000
SZA / @@0336=7440
HLT / @@0337=7402
TAD C0061 / @@0340=1061
CIA / @@0341=7041
TAD L0000 / @@0342=1000
SZA / @@0343=7440
HLT / @@0344=7402
CLA / @@0345=7200
TAD C0062 / @@0346=1062
DCA L0000 / @@0347=3000
SZA / @@0350=7440
HLT / @@0351=7402
TAD C0062 / @@0352=1062
CIA / @@0353=7041
TAD L0000 / @@0354=1000
SZA / @@0355=7440
HLT / @@0356=7402
CLA / @@0357=7200
TAD C0063 / @@0360=1063
DCA L0000 / @@0361=3000
SZA / @@0362=7440
HLT / @@0363=7402
TAD C0063 / @@0364=1063
CIA / @@0365=7041
TAD L0000 / @@0366=1000
SZA / @@0367=7440
HLT / @@0370=7402
JMP L0375 / @@0371=5375
L0372,
AND I D0210 / @@0372=0610
JMP I C0374 / long jump to L3650 @@0373=5774
C0374,
C0374, 3650 / DCA I C0250
L0375,
NOP / @@0375=7000
SKP / @@0376=7410
D0377, 0000 / AND L0000
*0400
CLA / @@0400=7200
TAD I D0042 / @@0401=1442
CIA / @@0402=7041
TAD C0177 / @@0403=1177
SZA / @@0404=7440
HLT / @@0405=7402
CLA / @@0406=7200
SKP / @@0407=7410
D0410, 0000 / AND L0000
TAD C0020 / @@0411=1020
AND I D0042 / @@0412=0442
CIA / @@0413=7041
TAD C0177 / @@0414=1177
SZA / @@0415=7440
HLT / @@0416=7402
CLA / @@0417=7200
TAD C0020 / @@0420=1020
DCA L0000 / @@0421=3000
ISZ I C0036 / @@0422=2436
HLT / @@0423=7402
TAD L0000 / @@0424=1000
SZA / @@0425=7440
HLT / @@0426=7402
CLA / @@0427=7200
TAD I C0172 / @@0430=1572
CIA / @@0431=7041
TAD C0176 / @@0432=1176
SZA / @@0433=7440
HLT / @@0434=7402
CLA / @@0435=7200
TAD C0020 / @@0436=1020
C0437, 0572 / AND I C0172
CIA / @@0440=7041
TAD C0176 / @@0441=1176
SZA / @@0442=7440
HLT / @@0443=7402
CLA / @@0444=7200
TAD C0172 / @@0445=1172
DCA L0000 / @@0446=3000
ISZ I C0036 / @@0447=2436
SKP / @@0450=7410
HLT / @@0451=7402
TAD L0000 / @@0452=1000
CIA / @@0453=7041
TAD C0172 / @@0454=1172
CMA / @@0455=7040
SZA / @@0456=7440
HLT / @@0457=7402
CLA / @@0460=7200
TAD I D0173 / @@0461=1573
CIA / @@0462=7041
TAD C0172 / @@0463=1172
SZA / @@0464=7440
HLT / @@0465=7402
CLA / @@0466=7200
TAD C0020 / @@0467=1020
AND I D0173 / @@0470=0573
CIA / @@0471=7041
TAD C0172 / @@0472=1172
SZA / @@0473=7440
HLT / @@0474=7402
CLA / @@0475=7200
TAD D0173 / @@0476=1173
DCA L0000 / @@0477=3000
ISZ I C0036 / @@0500=2436
SKP / @@0501=7410
HLT / @@0502=7402
TAD L0000 / @@0503=1000
CIA / @@0504=7041
TAD D0173 / @@0505=1173
CMA / @@0506=7040
SZA / @@0507=7440
HLT / @@0510=7402
CLA / @@0511=7200
TAD I C0174 / @@0512=1574
CIA / @@0513=7041
TAD D0173 / @@0514=1173
SZA / @@0515=7440
HLT / @@0516=7402
CLA / @@0517=7200
TAD C0020 / @@0520=1020
AND I C0174 / @@0521=0574
CIA / @@0522=7041
TAD D0173 / @@0523=1173
SZA / @@0524=7440
HLT / @@0525=7402
CLA / @@0526=7200
TAD C0174 / @@0527=1174
DCA L0000 / @@0530=3000
ISZ I C0036 / @@0531=2436
SKP / @@0532=7410
HLT / @@0533=7402
TAD L0000 / @@0534=1000
CIA / @@0535=7041
TAD C0174 / @@0536=1174
CMA / @@0537=7040
SZA / @@0540=7440
HLT / @@0541=7402
CLA / @@0542=7200
TAD I C0175 / @@0543=1575
CIA / @@0544=7041
TAD C0174 / @@0545=1174
SZA / @@0546=7440
HLT / @@0547=7402
CLA / @@0550=7200
TAD C0020 / @@0551=1020
AND I C0175 / @@0552=0575
CIA / @@0553=7041
TAD C0174 / @@0554=1174
SZA / @@0555=7440
HLT / @@0556=7402
CLA / @@0557=7200
TAD C0175 / @@0560=1175
DCA L0000 / @@0561=3000
ISZ I C0036 / @@0562=2436
SKP / @@0563=7410
HLT / @@0564=7402
TAD L0000 / @@0565=1000
CIA / @@0566=7041
TAD C0175 / @@0567=1175
CMA / @@0570=7040
SZA / @@0571=7440
HLT / @@0572=7402
JMP L0577 / @@0573=5377
L0574,
AND I D0410 / @@0574=0610
JMP I C0576 / long jump to L3637 @@0575=5776
C0576,
C0576, 3637 / DCA I C0437
L0577,
NOP / @@0577=7000
*0600
CLA / @@0600=7200
TAD I C0176 / @@0601=1576
CIA / @@0602=7041
TAD C0175 / @@0603=1175
SZA / @@0604=7440
HLT / @@0605=7402
CLA / @@0606=7200
TAD C0036 / @@0607=1036
C0610, 3010 / DCA AI0
C0611, 0410 / AND I AI0
C0612, 1010 / TAD AI0
TAD C0035 / @@0613=1035
CMA / @@0614=7040
SZA / @@0615=7440
HLT / @@0616=7402
CLA / @@0617=7200
TAD C0035 / @@0620=1035
C0621, 3010 / DCA AI0
C0622, 0410 / AND I AI0
C0623, 1010 / TAD AI0
TAD C0036 / @@0624=1036
CMA / @@0625=7040
SZA / @@0626=7440
HLT / @@0627=7402
CLA / @@0630=7200
TAD C0034 / @@0631=1034
C0632, 3010 / DCA AI0
C0633, 3410 / DCA I AI0
C0634, 1010 / TAD AI0
TAD C0051 / @@0635=1051
CMA / @@0636=7040
SZA / @@0637=7440
HLT / @@0640=7402
CLA / @@0641=7200
TAD C0033 / @@0642=1033
C0643, 3010 / DCA AI0
C0644, 1410 / TAD I AI0
CLA / @@0645=7200
C0646, 1010 / TAD AI0
TAD C0047 / @@0647=1047
CMA / @@0650=7040
SZA / @@0651=7440
HLT / @@0652=7402
CLA / @@0653=7200
TAD C0032 / @@0654=1032
C0655, 3010 / DCA AI0
C0656, 0410 / AND I AI0
C0657, 1010 / TAD AI0
TAD C0046 / @@0660=1046
CMA / @@0661=7040
SZA / @@0662=7440
HLT / @@0663=7402
CLA / @@0664=7200
TAD C0031 / @@0665=1031
C0666, 3010 / DCA AI0
C0667, 0410 / AND I AI0
C0670, 1010 / TAD AI0
TAD C0045 / @@0671=1045
CMA / @@0672=7040
SZA / @@0673=7440
HLT / @@0674=7402
CLA / @@0675=7200
TAD C0027 / @@0676=1027
C0677, 3010 / DCA AI0
C0700, 0410 / AND I AI0
C0701, 1010 / TAD AI0
TAD C0044 / @@0702=1044
CMA / @@0703=7040
SZA / @@0704=7440
HLT / @@0705=7402
CLA / @@0706=7200
TAD C0026 / @@0707=1026
C0710, 3010 / DCA AI0
C0711, 0410 / AND I AI0
C0712, 1010 / TAD AI0
TAD C0043 / @@0713=1043
CMA / @@0714=7040
SZA / @@0715=7440
HLT / @@0716=7402
CLA / @@0717=7200
TAD C0025 / @@0720=1025
C0721, 3010 / DCA AI0
C0722, 0410 / AND I AI0
C0723, 1010 / TAD AI0
TAD D0042 / @@0724=1042
CMA / @@0725=7040
SZA / @@0726=7440
HLT / @@0727=7402
CLA / @@0730=7200
TAD C0024 / @@0731=1024
C0732, 3010 / DCA AI0
C0733, 0410 / AND I AI0
C0734, 1010 / TAD AI0
TAD C0041 / @@0735=1041
CMA / @@0736=7040
SZA / @@0737=7440
HLT / @@0740=7402
CLA / @@0741=7200
TAD C0023 / @@0742=1023
C0743, 3010 / DCA AI0
C0744, 0410 / AND I AI0
C0745, 1010 / TAD AI0
TAD C0040 / @@0746=1040
CMA / @@0747=7040
SZA / @@0750=7440
HLT / @@0751=7402
CLA / @@0752=7200
TAD C0022 / @@0753=1022
C0754, 3010 / DCA AI0
C0755, 2410 / ISZ I AI0
NOP / @@0756=7000
C0757, 1010 / TAD AI0
TAD C0037 / @@0760=1037
CMA / @@0761=7040
SZA / @@0762=7440
HLT / @@0763=7402
CLA / @@0764=7200
TAD C0021 / @@0765=1021
C0766, 3010 / DCA AI0
C0767, 0410 / AND I AI0
C0770, 1010 / TAD AI0
TAD C0021 / @@0771=1021
CMA / @@0772=7040
SZA / @@0773=7440
HLT / @@0774=7402
NOP / @@0775=7000
NOP / @@0776=7000
NOP / @@0777=7000
*1000
CLA / @@1000=7200
TAD C0020 / @@1001=1020
C1002, 3010 / DCA AI0
C1003, 0410 / AND I AI0
C1004, 1010 / TAD AI0
TAD C0020 / @@1005=1020
CMA / @@1006=7040
SKP / @@1007=7410
D1010, 0000 / AND L0000
SZA / @@1011=7440
HLT / @@1012=7402
CLA / @@1013=7200
TAD C0036 / @@1014=1036
C1015, 3011 / DCA AI1
C1016, 0411 / AND I AI1
C1017, 1011 / TAD AI1
TAD C0035 / @@1020=1035
CMA / @@1021=7040
SZA / @@1022=7440
HLT / @@1023=7402
CLA / @@1024=7200
TAD C0035 / @@1025=1035
C1026, 3011 / DCA AI1
C1027, 0411 / AND I AI1
C1030, 1011 / TAD AI1
TAD C0036 / @@1031=1036
CMA / @@1032=7040
SZA / @@1033=7440
HLT / @@1034=7402
CLA / @@1035=7200
TAD C0034 / @@1036=1034
C1037, 3011 / DCA AI1
C1040, 3411 / DCA I AI1
C1041, 1011 / TAD AI1
TAD C0051 / @@1042=1051
CMA / @@1043=7040
SZA / @@1044=7440
HLT / @@1045=7402
CLA / @@1046=7200
TAD C0033 / @@1047=1033
C1050, 3011 / DCA AI1
C1051, 1411 / TAD I AI1
CLA / @@1052=7200
C1053, 1011 / TAD AI1
TAD C0047 / @@1054=1047
CMA / @@1055=7040
SZA / @@1056=7440
HLT / @@1057=7402
CLA / @@1060=7200
TAD C0032 / @@1061=1032
C1062, 3011 / DCA AI1
C1063, 0411 / AND I AI1
C1064, 1011 / TAD AI1
TAD C0046 / @@1065=1046
CMA / @@1066=7040
SZA / @@1067=7440
HLT / @@1070=7402
CLA / @@1071=7200
TAD C0031 / @@1072=1031
C1073, 3011 / DCA AI1
C1074, 0411 / AND I AI1
C1075, 1011 / TAD AI1
TAD C0045 / @@1076=1045
CMA / @@1077=7040
SZA / @@1100=7440
HLT / @@1101=7402
CLA / @@1102=7200
TAD C0027 / @@1103=1027
C1104, 3011 / DCA AI1
C1105, 0411 / AND I AI1
C1106, 1011 / TAD AI1
TAD C0044 / @@1107=1044
CMA / @@1110=7040
SZA / @@1111=7440
HLT / @@1112=7402
CLA / @@1113=7200
TAD C0026 / @@1114=1026
C1115, 3011 / DCA AI1
C1116, 0411 / AND I AI1
C1117, 1011 / TAD AI1
TAD C0043 / @@1120=1043
CMA / @@1121=7040
SZA / @@1122=7440
HLT / @@1123=7402
CLA / @@1124=7200
TAD C0025 / @@1125=1025
C1126, 3011 / DCA AI1
C1127, 0411 / AND I AI1
C1130, 1011 / TAD AI1
TAD D0042 / @@1131=1042
CMA / @@1132=7040
SZA / @@1133=7440
HLT / @@1134=7402
CLA / @@1135=7200
TAD C0024 / @@1136=1024
C1137, 3011 / DCA AI1
C1140, 0411 / AND I AI1
C1141, 1011 / TAD AI1
TAD C0041 / @@1142=1041
CMA / @@1143=7040
SZA / @@1144=7440
HLT / @@1145=7402
CLA / @@1146=7200
TAD C0023 / @@1147=1023
C1150, 3011 / DCA AI1
C1151, 0411 / AND I AI1
C1152, 1011 / TAD AI1
TAD C0040 / @@1153=1040
CMA / @@1154=7040
SZA / @@1155=7440
HLT / @@1156=7402
CLA / @@1157=7200
TAD C0022 / @@1160=1022
C1161, 3011 / DCA AI1
C1162, 2411 / ISZ I AI1
NOP / @@1163=7000
C1164, 1011 / TAD AI1
TAD C0037 / @@1165=1037
CMA / @@1166=7040
SZA / @@1167=7440
HLT / @@1170=7402
NOP / @@1171=7000
JMP L1176 / @@1172=5376
L1173,
AND I D1010 / @@1173=0610
JMP I C1175 / long jump to L3626 @@1174=5775
C1175,
C1175, 3626 / DCA I C1026
L1176,
NOP / @@1176=7000
NOP / @@1177=7000
*1200
CLA / @@1200=7200
TAD C0021 / @@1201=1021
C1202, 3011 / DCA AI1
C1203, 0411 / AND I AI1
C1204, 1011 / TAD AI1
TAD C0021 / @@1205=1021
CMA / @@1206=7040
SZA / @@1207=7440
HLT / @@1210=7402
CLA / @@1211=7200
TAD C0020 / @@1212=1020
C1213, 3011 / DCA AI1
C1214, 0411 / AND I AI1
C1215, 1011 / TAD AI1
TAD C0020 / @@1216=1020
CMA / @@1217=7040
SZA / @@1220=7440
HLT / @@1221=7402
CLA / @@1222=7200
TAD C0036 / @@1223=1036
C1224, 3012 / DCA AI2
C1225, 0412 / AND I AI2
C1226, 1012 / TAD AI2
TAD C0035 / @@1227=1035
CMA / @@1230=7040
SZA / @@1231=7440
HLT / @@1232=7402
CLA / @@1233=7200
TAD C0035 / @@1234=1035
C1235, 3012 / DCA AI2
C1236, 0412 / AND I AI2
C1237, 1012 / TAD AI2
TAD C0036 / @@1240=1036
CMA / @@1241=7040
SZA / @@1242=7440
HLT / @@1243=7402
CLA / @@1244=7200
TAD C0034 / @@1245=1034
C1246, 3012 / DCA AI2
C1247, 3412 / DCA I AI2
C1250, 1012 / TAD AI2
TAD C0051 / @@1251=1051
CMA / @@1252=7040
SZA / @@1253=7440
HLT / @@1254=7402
CLA / @@1255=7200
TAD C0033 / @@1256=1033
C1257, 3012 / DCA AI2
C1260, 1412 / TAD I AI2
CLA / @@1261=7200
C1262, 1012 / TAD AI2
TAD C0047 / @@1263=1047
CMA / @@1264=7040
SZA / @@1265=7440
HLT / @@1266=7402
CLA / @@1267=7200
TAD C0032 / @@1270=1032
C1271, 3012 / DCA AI2
C1272, 0412 / AND I AI2
C1273, 1012 / TAD AI2
TAD C0046 / @@1274=1046
CMA / @@1275=7040
SZA / @@1276=7440
HLT / @@1277=7402
CLA / @@1300=7200
TAD C0031 / @@1301=1031
C1302, 3012 / DCA AI2
C1303, 0412 / AND I AI2
C1304, 1012 / TAD AI2
TAD C0045 / @@1305=1045
CMA / @@1306=7040
SZA / @@1307=7440
HLT / @@1310=7402
CLA / @@1311=7200
TAD C0027 / @@1312=1027
C1313, 3012 / DCA AI2
C1314, 0412 / AND I AI2
C1315, 1012 / TAD AI2
TAD C0044 / @@1316=1044
CMA / @@1317=7040
SZA / @@1320=7440
HLT / @@1321=7402
CLA / @@1322=7200
TAD C0026 / @@1323=1026
C1324, 3012 / DCA AI2
C1325, 0412 / AND I AI2
C1326, 1012 / TAD AI2
TAD C0043 / @@1327=1043
CMA / @@1330=7040
SZA / @@1331=7440
HLT / @@1332=7402
CLA / @@1333=7200
TAD C0025 / @@1334=1025
C1335, 3012 / DCA AI2
C1336, 0412 / AND I AI2
C1337, 1012 / TAD AI2
TAD D0042 / @@1340=1042
CMA / @@1341=7040
SZA / @@1342=7440
HLT / @@1343=7402
CLA / @@1344=7200
TAD C0024 / @@1345=1024
C1346, 3012 / DCA AI2
C1347, 0412 / AND I AI2
C1350, 1012 / TAD AI2
TAD C0041 / @@1351=1041
CMA / @@1352=7040
SZA / @@1353=7440
HLT / @@1354=7402
CLA / @@1355=7200
TAD C0023 / @@1356=1023
C1357, 3012 / DCA AI2
C1360, 0412 / AND I AI2
C1361, 1012 / TAD AI2
TAD C0040 / @@1362=1040
CMA / @@1363=7040
SZA / @@1364=7440
HLT / @@1365=7402
CLA / @@1366=7200
TAD C0022 / @@1367=1022
C1370, 3012 / DCA AI2
C1371, 2412 / ISZ I AI2
NOP / @@1372=7000
C1373, 1012 / TAD AI2
TAD C0037 / @@1374=1037
CMA / @@1375=7040
SZA / @@1376=7440
HLT / @@1377=7402
*1400
CLA / @@1400=7200
TAD C0021 / @@1401=1021
C1402, 3012 / DCA AI2
C1403, 0412 / AND I AI2
C1404, 1012 / TAD AI2
TAD C0021 / @@1405=1021
CMA / @@1406=7040
SZA / @@1407=7440
HLT / @@1410=7402
CLA / @@1411=7200
TAD C0020 / @@1412=1020
C1413, 3012 / DCA AI2
C1414, 0412 / AND I AI2
C1415, 1012 / TAD AI2
TAD C0020 / @@1416=1020
CMA / @@1417=7040
SZA / @@1420=7440
HLT / @@1421=7402
CLA / @@1422=7200
TAD C0036 / @@1423=1036
C1424, 3013 / DCA AI3
C1425, 0413 / AND I AI3
C1426, 1013 / TAD AI3
TAD C0035 / @@1427=1035
CMA / @@1430=7040
SZA / @@1431=7440
HLT / @@1432=7402
CLA / @@1433=7200
TAD C0035 / @@1434=1035
C1435, 3013 / DCA AI3
C1436, 0413 / AND I AI3
C1437, 1013 / TAD AI3
TAD C0036 / @@1440=1036
CMA / @@1441=7040
SZA / @@1442=7440
HLT / @@1443=7402
CLA / @@1444=7200
TAD C0034 / @@1445=1034
C1446, 3013 / DCA AI3
C1447, 3413 / DCA I AI3
C1450, 1013 / TAD AI3
TAD C0051 / @@1451=1051
CMA / @@1452=7040
SZA / @@1453=7440
HLT / @@1454=7402
CLA / @@1455=7200
TAD C0033 / @@1456=1033
C1457, 3013 / DCA AI3
C1460, 1413 / TAD I AI3
CLA / @@1461=7200
C1462, 1013 / TAD AI3
TAD C0047 / @@1463=1047
CMA / @@1464=7040
SZA / @@1465=7440
HLT / @@1466=7402
CLA / @@1467=7200
TAD C0032 / @@1470=1032
C1471, 3013 / DCA AI3
C1472, 0413 / AND I AI3
C1473, 1013 / TAD AI3
TAD C0046 / @@1474=1046
CMA / @@1475=7040
SZA / @@1476=7440
HLT / @@1477=7402
CLA / @@1500=7200
TAD C0031 / @@1501=1031
C1502, 3013 / DCA AI3
C1503, 0413 / AND I AI3
C1504, 1013 / TAD AI3
TAD C0045 / @@1505=1045
CMA / @@1506=7040
SZA / @@1507=7440
HLT / @@1510=7402
CLA / @@1511=7200
TAD C0027 / @@1512=1027
C1513, 3013 / DCA AI3
C1514, 0413 / AND I AI3
C1515, 1013 / TAD AI3
TAD C0044 / @@1516=1044
CMA / @@1517=7040
SZA / @@1520=7440
HLT / @@1521=7402
CLA / @@1522=7200
TAD C0026 / @@1523=1026
C1524, 3013 / DCA AI3
C1525, 0413 / AND I AI3
C1526, 1013 / TAD AI3
TAD C0043 / @@1527=1043
CMA / @@1530=7040
SZA / @@1531=7440
HLT / @@1532=7402
CLA / @@1533=7200
TAD C0025 / @@1534=1025
C1535, 3013 / DCA AI3
C1536, 0413 / AND I AI3
C1537, 1013 / TAD AI3
TAD D0042 / @@1540=1042
CMA / @@1541=7040
SZA / @@1542=7440
HLT / @@1543=7402
CLA / @@1544=7200
TAD C0024 / @@1545=1024
C1546, 3013 / DCA AI3
C1547, 0413 / AND I AI3
C1550, 1013 / TAD AI3
TAD C0041 / @@1551=1041
CMA / @@1552=7040
SZA / @@1553=7440
HLT / @@1554=7402
CLA / @@1555=7200
TAD C0023 / @@1556=1023
C1557, 3013 / DCA AI3
C1560, 0413 / AND I AI3
C1561, 1013 / TAD AI3
TAD C0040 / @@1562=1040
CMA / @@1563=7040
SZA / @@1564=7440
HLT / @@1565=7402
CLA / @@1566=7200
TAD C0022 / @@1567=1022
C1570, 3013 / DCA AI3
C1571, 2413 / ISZ I AI3
NOP / @@1572=7000
C1573, 1013 / TAD AI3
TAD C0037 / @@1574=1037
CMA / @@1575=7040
SZA / @@1576=7440
HLT / @@1577=7402
*1600
CLA / @@1600=7200
TAD C0021 / @@1601=1021
C1602, 3013 / DCA AI3
C1603, 0413 / AND I AI3
C1604, 1013 / TAD AI3
TAD C0021 / @@1605=1021
CMA / @@1606=7040
SZA / @@1607=7440
HLT / @@1610=7402
CLA / @@1611=7200
TAD C0020 / @@1612=1020
C1613, 3013 / DCA AI3
C1614, 0413 / AND I AI3
C1615, 1013 / TAD AI3
TAD C0020 / @@1616=1020
CMA / @@1617=7040
SZA / @@1620=7440
HLT / @@1621=7402
CLA / @@1622=7200
TAD C0036 / @@1623=1036
C1624, 3014 / DCA AI4
C1625, 0414 / AND I AI4
C1626, 1014 / TAD AI4
TAD C0035 / @@1627=1035
CMA / @@1630=7040
SZA / @@1631=7440
HLT / @@1632=7402
CLA / @@1633=7200
TAD C0035 / @@1634=1035
C1635, 3014 / DCA AI4
C1636, 0414 / AND I AI4
C1637, 1014 / TAD AI4
TAD C0036 / @@1640=1036
CMA / @@1641=7040
SZA / @@1642=7440
HLT / @@1643=7402
CLA / @@1644=7200
TAD C0034 / @@1645=1034
C1646, 3014 / DCA AI4
C1647, 3414 / DCA I AI4
C1650, 1014 / TAD AI4
TAD C0051 / @@1651=1051
CMA / @@1652=7040
SZA / @@1653=7440
HLT / @@1654=7402
CLA / @@1655=7200
TAD C0033 / @@1656=1033
C1657, 3014 / DCA AI4
C1660, 1414 / TAD I AI4
CLA / @@1661=7200
C1662, 1014 / TAD AI4
TAD C0047 / @@1663=1047
CMA / @@1664=7040
SZA / @@1665=7440
HLT / @@1666=7402
CLA / @@1667=7200
TAD C0032 / @@1670=1032
C1671, 3014 / DCA AI4
C1672, 0414 / AND I AI4
C1673, 1014 / TAD AI4
TAD C0046 / @@1674=1046
CMA / @@1675=7040
SZA / @@1676=7440
HLT / @@1677=7402
CLA / @@1700=7200
TAD C0031 / @@1701=1031
C1702, 3014 / DCA AI4
C1703, 0414 / AND I AI4
C1704, 1014 / TAD AI4
TAD C0045 / @@1705=1045
CMA / @@1706=7040
SZA / @@1707=7440
HLT / @@1710=7402
CLA / @@1711=7200
TAD C0027 / @@1712=1027
C1713, 3014 / DCA AI4
C1714, 0414 / AND I AI4
C1715, 1014 / TAD AI4
TAD C0044 / @@1716=1044
CMA / @@1717=7040
SZA / @@1720=7440
HLT / @@1721=7402
CLA / @@1722=7200
TAD C0026 / @@1723=1026
C1724, 3014 / DCA AI4
C1725, 0414 / AND I AI4
C1726, 1014 / TAD AI4
TAD C0043 / @@1727=1043
CMA / @@1730=7040
SZA / @@1731=7440
HLT / @@1732=7402
CLA / @@1733=7200
TAD C0025 / @@1734=1025
C1735, 3014 / DCA AI4
C1736, 0414 / AND I AI4
C1737, 1014 / TAD AI4
TAD D0042 / @@1740=1042
CMA / @@1741=7040
SZA / @@1742=7440
HLT / @@1743=7402
CLA / @@1744=7200
TAD C0024 / @@1745=1024
C1746, 3014 / DCA AI4
C1747, 0414 / AND I AI4
C1750, 1014 / TAD AI4
TAD C0041 / @@1751=1041
CMA / @@1752=7040
SZA / @@1753=7440
HLT / @@1754=7402
CLA / @@1755=7200
TAD C0023 / @@1756=1023
C1757, 3014 / DCA AI4
C1760, 0414 / AND I AI4
C1761, 1014 / TAD AI4
TAD C0040 / @@1762=1040
CMA / @@1763=7040
SZA / @@1764=7440
HLT / @@1765=7402
CLA / @@1766=7200
TAD C0022 / @@1767=1022
C1770, 3014 / DCA AI4
C1771, 2414 / ISZ I AI4
NOP / @@1772=7000
C1773, 1014 / TAD AI4
TAD C0037 / @@1774=1037
CMA / @@1775=7040
SZA / @@1776=7440
HLT / @@1777=7402
*2000
CLA / @@2000=7200
TAD C0021 / @@2001=1021
C2002, 3014 / DCA AI4
C2003, 0414 / AND I AI4
C2004, 1014 / TAD AI4
TAD C0021 / @@2005=1021
CMA / @@2006=7040
SKP / @@2007=7410
C2010, 0000 / AND L0000
SZA / @@2011=7440
HLT / @@2012=7402
CLA / @@2013=7200
TAD C0020 / @@2014=1020
C2015, 3014 / DCA AI4
C2016, 0414 / AND I AI4
C2017, 1014 / TAD AI4
TAD C0020 / @@2020=1020
CMA / @@2021=7040
SZA / @@2022=7440
HLT / @@2023=7402
CLA / @@2024=7200
TAD C0036 / @@2025=1036
C2026, 3015 / DCA AI5
C2027, 0415 / AND I AI5
C2030, 1015 / TAD AI5
TAD C0035 / @@2031=1035
CMA / @@2032=7040
SZA / @@2033=7440
HLT / @@2034=7402
CLA / @@2035=7200
TAD C0035 / @@2036=1035
C2037, 3015 / DCA AI5
C2040, 0415 / AND I AI5
C2041, 1015 / TAD AI5
TAD C0036 / @@2042=1036
CMA / @@2043=7040
SZA / @@2044=7440
HLT / @@2045=7402
CLA / @@2046=7200
TAD C0034 / @@2047=1034
C2050, 3015 / DCA AI5
C2051, 3415 / DCA I AI5
C2052, 1015 / TAD AI5
TAD C0051 / @@2053=1051
CMA / @@2054=7040
SZA / @@2055=7440
HLT / @@2056=7402
CLA / @@2057=7200
TAD C0033 / @@2060=1033
C2061, 3015 / DCA AI5
C2062, 1415 / TAD I AI5
CLA / @@2063=7200
C2064, 1015 / TAD AI5
TAD C0047 / @@2065=1047
CMA / @@2066=7040
SZA / @@2067=7440
HLT / @@2070=7402
CLA / @@2071=7200
TAD C0032 / @@2072=1032
C2073, 3015 / DCA AI5
C2074, 0415 / AND I AI5
C2075, 1015 / TAD AI5
TAD C0046 / @@2076=1046
CMA / @@2077=7040
SZA / @@2100=7440
HLT / @@2101=7402
CLA / @@2102=7200
TAD C0031 / @@2103=1031
C2104, 3015 / DCA AI5
C2105, 0415 / AND I AI5
C2106, 1015 / TAD AI5
TAD C0045 / @@2107=1045
CMA / @@2110=7040
SZA / @@2111=7440
HLT / @@2112=7402
CLA / @@2113=7200
TAD C0027 / @@2114=1027
C2115, 3015 / DCA AI5
C2116, 0415 / AND I AI5
C2117, 1015 / TAD AI5
TAD C0044 / @@2120=1044
CMA / @@2121=7040
SZA / @@2122=7440
HLT / @@2123=7402
CLA / @@2124=7200
TAD C0026 / @@2125=1026
C2126, 3015 / DCA AI5
C2127, 0415 / AND I AI5
C2130, 1015 / TAD AI5
TAD C0043 / @@2131=1043
CMA / @@2132=7040
SZA / @@2133=7440
HLT / @@2134=7402
CLA / @@2135=7200
TAD C0025 / @@2136=1025
C2137, 3015 / DCA AI5
C2140, 0415 / AND I AI5
C2141, 1015 / TAD AI5
TAD D0042 / @@2142=1042
CMA / @@2143=7040
SZA / @@2144=7440
HLT / @@2145=7402
CLA / @@2146=7200
TAD C0024 / @@2147=1024
C2150, 3015 / DCA AI5
C2151, 0415 / AND I AI5
C2152, 1015 / TAD AI5
TAD C0041 / @@2153=1041
CMA / @@2154=7040
SZA / @@2155=7440
HLT / @@2156=7402
CLA / @@2157=7200
TAD C0023 / @@2160=1023
C2161, 3015 / DCA AI5
C2162, 0415 / AND I AI5
C2163, 1015 / TAD AI5
TAD C0040 / @@2164=1040
CMA / @@2165=7040
SZA / @@2166=7440
HLT / @@2167=7402
NOP / @@2170=7000
NOP / @@2171=7000
JMP L2176 / @@2172=5376
L2173,
AND I C2010 / @@2173=0610
JMP I C2175 / long jump to L3615 @@2174=5775
C2175,
C2175, 3615 / DCA I C2015
L2176,
NOP / @@2176=7000
NOP / @@2177=7000
*2200
CLA / @@2200=7200
TAD C0022 / @@2201=1022
C2202, 3015 / DCA AI5
C2203, 2415 / ISZ I AI5
NOP / @@2204=7000
C2205, 1015 / TAD AI5
TAD C0037 / @@2206=1037
CMA / @@2207=7040
SZA / @@2210=7440
HLT / @@2211=7402
CLA / @@2212=7200
TAD C0021 / @@2213=1021
C2214, 3015 / DCA AI5
C2215, 0415 / AND I AI5
C2216, 1015 / TAD AI5
TAD C0021 / @@2217=1021
CMA / @@2220=7040
SZA / @@2221=7440
HLT / @@2222=7402
CLA / @@2223=7200
TAD C0020 / @@2224=1020
C2225, 3015 / DCA AI5
C2226, 0415 / AND I AI5
C2227, 1015 / TAD AI5
TAD C0020 / @@2230=1020
CMA / @@2231=7040
SZA / @@2232=7440
HLT / @@2233=7402
CLA / @@2234=7200
TAD C0036 / @@2235=1036
C2236, 3016 / DCA AI6
C2237, 0416 / AND I AI6
C2240, 1016 / TAD AI6
TAD C0035 / @@2241=1035
CMA / @@2242=7040
SZA / @@2243=7440
HLT / @@2244=7402
CLA / @@2245=7200
TAD C0035 / @@2246=1035
C2247, 3016 / DCA AI6
C2250, 0416 / AND I AI6
C2251, 1016 / TAD AI6
TAD C0036 / @@2252=1036
CMA / @@2253=7040
SZA / @@2254=7440
HLT / @@2255=7402
CLA / @@2256=7200
TAD C0034 / @@2257=1034
C2260, 3016 / DCA AI6
C2261, 3416 / DCA I AI6
C2262, 1016 / TAD AI6
TAD C0051 / @@2263=1051
CMA / @@2264=7040
SZA / @@2265=7440
HLT / @@2266=7402
CLA / @@2267=7200
TAD C0033 / @@2270=1033
C2271, 3016 / DCA AI6
C2272, 1416 / TAD I AI6
CLA / @@2273=7200
C2274, 1016 / TAD AI6
TAD C0047 / @@2275=1047
CMA / @@2276=7040
SZA / @@2277=7440
HLT / @@2300=7402
CLA / @@2301=7200
TAD C0032 / @@2302=1032
C2303, 3016 / DCA AI6
C2304, 0416 / AND I AI6
C2305, 1016 / TAD AI6
TAD C0046 / @@2306=1046
CMA / @@2307=7040
SZA / @@2310=7440
HLT / @@2311=7402
CLA / @@2312=7200
TAD C0031 / @@2313=1031
C2314, 3016 / DCA AI6
C2315, 0416 / AND I AI6
C2316, 1016 / TAD AI6
TAD C0045 / @@2317=1045
CMA / @@2320=7040
SZA / @@2321=7440
HLT / @@2322=7402
CLA / @@2323=7200
TAD C0027 / @@2324=1027
C2325, 3016 / DCA AI6
C2326, 0416 / AND I AI6
C2327, 1016 / TAD AI6
TAD C0044 / @@2330=1044
CMA / @@2331=7040
SZA / @@2332=7440
HLT / @@2333=7402
CLA / @@2334=7200
TAD C0026 / @@2335=1026
C2336, 3016 / DCA AI6
C2337, 0416 / AND I AI6
C2340, 1016 / TAD AI6
TAD C0043 / @@2341=1043
CMA / @@2342=7040
SZA / @@2343=7440
HLT / @@2344=7402
CLA / @@2345=7200
TAD C0025 / @@2346=1025
C2347, 3016 / DCA AI6
C2350, 0416 / AND I AI6
C2351, 1016 / TAD AI6
TAD D0042 / @@2352=1042
CMA / @@2353=7040
SZA / @@2354=7440
HLT / @@2355=7402
CLA / @@2356=7200
TAD C0024 / @@2357=1024
C2360, 3016 / DCA AI6
C2361, 0416 / AND I AI6
C2362, 1016 / TAD AI6
TAD C0041 / @@2363=1041
CMA / @@2364=7040
SZA / @@2365=7440
HLT / @@2366=7402
CLA / @@2367=7200
TAD C0023 / @@2370=1023
C2371, 3016 / DCA AI6
C2372, 0416 / AND I AI6
C2373, 1016 / TAD AI6
TAD C0040 / @@2374=1040
CMA / @@2375=7040
SZA / @@2376=7440
HLT / @@2377=7402
*2400
CLA / @@2400=7200
TAD C0022 / @@2401=1022
C2402, 3016 / DCA AI6
C2403, 2416 / ISZ I AI6
NOP / @@2404=7000
C2405, 1016 / TAD AI6
TAD C0037 / @@2406=1037
CMA / @@2407=7040
SZA / @@2410=7440
HLT / @@2411=7402
CLA / @@2412=7200
TAD C0021 / @@2413=1021
C2414, 3016 / DCA AI6
C2415, 0416 / AND I AI6
C2416, 1016 / TAD AI6
TAD C0021 / @@2417=1021
CMA / @@2420=7040
SZA / @@2421=7440
HLT / @@2422=7402
CLA / @@2423=7200
TAD C0020 / @@2424=1020
C2425, 3016 / DCA AI6
C2426, 0416 / AND I AI6
C2427, 1016 / TAD AI6
TAD C0020 / @@2430=1020
CMA / @@2431=7040
SZA / @@2432=7440
HLT / @@2433=7402
CLA / @@2434=7200
TAD C0036 / @@2435=1036
C2436, 3017 / DCA AI7
C2437, 0417 / AND I AI7
C2440, 1017 / TAD AI7
TAD C0035 / @@2441=1035
CMA / @@2442=7040
SZA / @@2443=7440
HLT / @@2444=7402
CLA / @@2445=7200
TAD C0035 / @@2446=1035
C2447, 3017 / DCA AI7
C2450, 0417 / AND I AI7
C2451, 1017 / TAD AI7
TAD C0036 / @@2452=1036
CMA / @@2453=7040
SZA / @@2454=7440
HLT / @@2455=7402
CLA / @@2456=7200
TAD C0034 / @@2457=1034
C2460, 3017 / DCA AI7
C2461, 3417 / DCA I AI7
C2462, 1017 / TAD AI7
TAD C0051 / @@2463=1051
CMA / @@2464=7040
SZA / @@2465=7440
HLT / @@2466=7402
CLA / @@2467=7200
TAD C0033 / @@2470=1033
C2471, 3017 / DCA AI7
C2472, 1417 / TAD I AI7
CLA / @@2473=7200
C2474, 1017 / TAD AI7
TAD C0047 / @@2475=1047
CMA / @@2476=7040
SZA / @@2477=7440
HLT / @@2500=7402
CLA / @@2501=7200
TAD C0032 / @@2502=1032
C2503, 3017 / DCA AI7
C2504, 0417 / AND I AI7
C2505, 1017 / TAD AI7
TAD C0046 / @@2506=1046
CMA / @@2507=7040
SZA / @@2510=7440
HLT / @@2511=7402
CLA / @@2512=7200
TAD C0031 / @@2513=1031
C2514, 3017 / DCA AI7
C2515, 0417 / AND I AI7
C2516, 1017 / TAD AI7
TAD C0045 / @@2517=1045
CMA / @@2520=7040
SZA / @@2521=7440
HLT / @@2522=7402
CLA / @@2523=7200
TAD C0027 / @@2524=1027
C2525, 3017 / DCA AI7
C2526, 0417 / AND I AI7
C2527, 1017 / TAD AI7
TAD C0044 / @@2530=1044
CMA / @@2531=7040
SZA / @@2532=7440
HLT / @@2533=7402
CLA / @@2534=7200
TAD C0026 / @@2535=1026
C2536, 3017 / DCA AI7
C2537, 0417 / AND I AI7
C2540, 1017 / TAD AI7
TAD C0043 / @@2541=1043
CMA / @@2542=7040
SZA / @@2543=7440
HLT / @@2544=7402
CLA / @@2545=7200
TAD C0025 / @@2546=1025
C2547, 3017 / DCA AI7
C2550, 0417 / AND I AI7
C2551, 1017 / TAD AI7
TAD D0042 / @@2552=1042
CMA / @@2553=7040
SZA / @@2554=7440
HLT / @@2555=7402
CLA / @@2556=7200
TAD C0024 / @@2557=1024
C2560, 3017 / DCA AI7
C2561, 0417 / AND I AI7
C2562, 1017 / TAD AI7
TAD C0041 / @@2563=1041
CMA / @@2564=7040
SZA / @@2565=7440
HLT / @@2566=7402
CLA / @@2567=7200
TAD C0023 / @@2570=1023
C2571, 3017 / DCA AI7
C2572, 0417 / AND I AI7
C2573, 1017 / TAD AI7
TAD C0040 / @@2574=1040
CMA / @@2575=7040
SZA / @@2576=7440
HLT / @@2577=7402
*2600
CLA / @@2600=7200
TAD C0022 / @@2601=1022
C2602, 3017 / DCA AI7
C2603, 2417 / ISZ I AI7
NOP / @@2604=7000
C2605, 1017 / TAD AI7
TAD C0037 / @@2606=1037
CMA / @@2607=7040
SZA / @@2610=7440
HLT / @@2611=7402
CLA / @@2612=7200
TAD C0021 / @@2613=1021
C2614, 3017 / DCA AI7
C2615, 0417 / AND I AI7
C2616, 1017 / TAD AI7
TAD C0021 / @@2617=1021
CMA / @@2620=7040
SZA / @@2621=7440
HLT / @@2622=7402
CLA / @@2623=7200
TAD C0020 / @@2624=1020
C2625, 3017 / DCA AI7
C2626, 0417 / AND I AI7
C2627, 1017 / TAD AI7
TAD C0020 / @@2630=1020
CMA / @@2631=7040
SZA / @@2632=7440
HLT / @@2633=7402
JMP L2636 / @@2634=5236
HLT / @@2635=7402
L2636,
SKP / @@2636=7410
C2637, 2644 / ISZ I C2644
TAD C2637 / @@2640=1237
C2641, 3010 / DCA AI0
C2642, 5410 / JMP I AI0
HLT / @@2643=7402
C2644, 7402 / HLT
C2645, 4247 / JMS C2647
C2646, 7402 / HLT
C2647, 7402 / HLT
TAD C2647 / @@2650=1247
SKP / @@2651=7410
C2652, 2646 / ISZ I C2646
CIA / @@2653=7041
TAD C2652 / @@2654=1252
SZA / @@2655=7440
HLT / @@2656=7402
SKP / @@2657=7410
C2660, 2664 / ISZ I C2664
TAD C2660 / @@2661=1260
C2662, 3010 / DCA AI0
C2663, 4410 / JMS I AI0
C2664, 7402 / HLT
C2665, 7402 / HLT
TAD C2665 / @@2666=1265
SKP / @@2667=7410
C2670, 2664 / ISZ I C2664
CIA / @@2671=7041
TAD C2670 / @@2672=1270
SZA / @@2673=7440
HLT / @@2674=7402
JMP I C2676 / long jump to L4200 @@2675=5676
C2676,
C2676, 4200 / JMS C2600
L2677,
JMS I C2700 / long call to S4011 @@2677=4700
C2700,
C2700, 4011 / JMS AI1
C2701, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@2702=6041
HLT / @@2703=7402
CLA / @@2704=7200
TAD C2713 / @@2705=1313
DCA D0002 / @@2706=3002
ION / Enable Interrupts @@2707=6001
NOP / @@2710=7000
C2711, 7402 / HLT
C2712, 2711 / ISZ I C2711
C2713, 2714 / ISZ I C2714
SZA / @@2714=7440
HLT / @@2715=7402
TAD L0000 / @@2716=1000
CIA / @@2717=7041
TAD C2712 / @@2720=1312
SZA CLA / @@2721=7640
HLT / @@2722=7402
C2723, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@2724=6041
HLT / @@2725=7402
CLA / @@2726=7200
TAD C2735 / @@2727=1335
DCA D0002 / @@2730=3002
ION / Enable Interrupts @@2731=6001
TAD C0020 / @@2732=1020
C2733, 7402 / HLT
C2734, 2733 / ISZ I C2733
C2735, 2736 / ISZ I C2736
CMA / @@2736=7040
SZA / @@2737=7440
HLT / @@2740=7402
TAD L0000 / @@2741=1000
CIA / @@2742=7041
TAD C2734 / @@2743=1334
SZA CLA / @@2744=7640
HLT / @@2745=7402
C2746, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@2747=6041
HLT / @@2750=7402
CLA / @@2751=7200
TAD C2761 / @@2752=1361
DCA D0002 / @@2753=3002
TAD C0020 / @@2754=1020
ION / Enable Interrupts @@2755=6001
AND C0020 / @@2756=0020
C2757, 7402 / HLT
C2760, 2757 / ISZ I C2757
C2761, 2762 / ISZ I C2762
CMA / @@2762=7040
SZA / @@2763=7440
HLT / @@2764=7402
TAD L0000 / @@2765=1000
CIA / @@2766=7041
TAD C2760 / @@2767=1360
SZA CLA / @@2770=7640
HLT / @@2771=7402
JMP I C2773 / long jump to L3000 @@2772=5773
C2773,
C2773, 3000 / DCA L0000
*3000
L3000,
D3000, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3001=6041
HLT / @@3002=7402
CLA / @@3003=7200
TAD C3013 / @@3004=1213
DCA D0002 / @@3005=3002
TAD C0020 / @@3006=1020
ION / Enable Interrupts @@3007=6001
DCA D0003 / @@3010=3003
HLT / @@3011=7402
C3012, 3011 / DCA AI1
C3013, 3014 / DCA AI4
SZA / @@3014=7440
HLT / @@3015=7402
TAD D0003 / @@3016=1003
CMA / @@3017=7040
SZA / @@3020=7440
HLT / @@3021=7402
DCA D0003 / @@3022=3003
TAD L0000 / @@3023=1000
CIA / @@3024=7041
TAD C3012 / @@3025=1212
SZA CLA / @@3026=7640
HLT / @@3027=7402
C3030, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3031=6041
HLT / @@3032=7402
CLA / @@3033=7200
TAD C3044 / @@3034=1244
DCA D0002 / @@3035=3002
TAD C0035 / @@3036=1035
DCA D0003 / @@3037=3003
ION / Enable Interrupts @@3040=6001
ISZ D0003 / @@3041=2003
HLT / @@3042=7402
C3043, 3042 / DCA D0042
C3044, 3045 / DCA C0045
SZA / @@3045=7440
HLT / @@3046=7402
TAD D0003 / @@3047=1003
CMA / @@3050=7040
SZA / @@3051=7440
HLT / @@3052=7402
DCA D0003 / @@3053=3003
TAD L0000 / @@3054=1000
CIA / @@3055=7041
TAD C3043 / @@3056=1243
SZA CLA / @@3057=7640
HLT / @@3060=7402
C3061, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3062=6041
HLT / @@3063=7402
CLA / @@3064=7200
TAD C3076 / @@3065=1276
DCA D0002 / @@3066=3002
TAD C0020 / @@3067=1020
DCA D0003 / @@3070=3003
ION / Enable Interrupts @@3071=6001
ISZ D0003 / @@3072=2003
HLT / @@3073=7402
HLT / @@3074=7402
C3075, 3074 / DCA L0074
C3076, 3077 / DCA C0077
SZA / @@3077=7440
HLT / @@3100=7402
TAD D0003 / @@3101=1003
SZA / @@3102=7440
HLT / @@3103=7402
DCA D0003 / @@3104=3003
TAD L0000 / @@3105=1000
CIA / @@3106=7041
TAD C3075 / @@3107=1275
SZA CLA / @@3110=7640
HLT / @@3111=7402
C3112, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3113=6041
HLT / @@3114=7402
CLA / @@3115=7200
TAD C3124 / @@3116=1324
DCA D0002 / @@3117=3002
ION / Enable Interrupts @@3120=6001
L3121,
JMP L3121 / @@3121=5321
HLT / @@3122=7402
C3123, 3121 / DCA D0121
C3124, 3125 / DCA C0125
SZA / @@3125=7440
HLT / @@3126=7402
TAD L0000 / @@3127=1000
CIA / @@3130=7041
TAD C3123 / @@3131=1323
SZA CLA / @@3132=7640
HLT / @@3133=7402
C3134, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3135=6041
HLT / @@3136=7402
CLA / @@3137=7200
TAD C3146 / @@3140=1346
DCA D0002 / @@3141=3002
ION / Enable Interrupts @@3142=6001
JMS D0003 / @@3143=4003
HLT / @@3144=7402
C3145, 3144 / DCA C0144
C3146, 3147 / DCA C0147
SZA / @@3147=7440
HLT / @@3150=7402
TAD D0003 / @@3151=1003
CIA / @@3152=7041
TAD C3145 / @@3153=1345
SZA / @@3154=7440
HLT / @@3155=7402
TAD L0000 / @@3156=1000
CIA / @@3157=7041
TAD C0065 / @@3160=1065
SZA CLA / @@3161=7640
HLT / @@3162=7402
JMP I C3164 / long jump to L3200 @@3163=5764
C3164,
C3164, 3200 / DCA L3000
*3200
L3200,
C3200, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3201=6041
HLT / @@3202=7402
CLA / @@3203=7200
TAD C3213 / @@3204=1213
DCA D0002 / @@3205=3002
TAD C0020 / @@3206=1020
ION / Enable Interrupts @@3207=6001
CLA / @@3210=7200
D3211, 7402 / HLT
C3212, 3211 / DCA D3211
C3213, 3214 / DCA C3214
SZA / @@3214=7440
HLT / @@3215=7402
TAD L0000 / @@3216=1000
CIA / @@3217=7041
TAD C3212 / @@3220=1212
SZA CLA / @@3221=7640
HLT / @@3222=7402
C3223, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3224=6041
HLT / @@3225=7402
CLA / @@3226=7200
TAD C3236 / @@3227=1236
DCA D0002 / @@3230=3002
ION / Enable Interrupts @@3231=6001
TSF / Skip if teleprinter flag is a 1. @@3232=6041
HLT / @@3233=7402
D3234, 7402 / HLT
C3235, 3234 / DCA D3234
C3236, 3237 / DCA C3237
SZA / @@3237=7440
HLT / @@3240=7402
TAD L0000 / @@3241=1000
CIA / @@3242=7041
TAD C3235 / @@3243=1235
SZA CLA / @@3244=7640
HLT / @@3245=7402
C3246, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3247=6041
HLT / @@3250=7402
CLA / @@3251=7200
TAD C3311 / @@3252=1311
DCA D0002 / @@3253=3002
ION / Enable Interrupts @@3254=6001
IOF / Disable Interrupts @@3255=6002
ION / Enable Interrupts @@3256=6001
IOF / Disable Interrupts @@3257=6002
ION / Enable Interrupts @@3260=6001
IOF / Disable Interrupts @@3261=6002
ION / Enable Interrupts @@3262=6001
IOF / Disable Interrupts @@3263=6002
ION / Enable Interrupts @@3264=6001
IOF / Disable Interrupts @@3265=6002
ION / Enable Interrupts @@3266=6001
IOF / Disable Interrupts @@3267=6002
ION / Enable Interrupts @@3270=6001
IOF / Disable Interrupts @@3271=6002
ION / Enable Interrupts @@3272=6001
IOF / Disable Interrupts @@3273=6002
ION / Enable Interrupts @@3274=6001
IOF / Disable Interrupts @@3275=6002
ION / Enable Interrupts @@3276=6001
IOF / Disable Interrupts @@3277=6002
ION / Enable Interrupts @@3300=6001
IOF / Disable Interrupts @@3301=6002
ION / Enable Interrupts @@3302=6001
IOF / Disable Interrupts @@3303=6002
ION / Enable Interrupts @@3304=6001
IOF / Disable Interrupts @@3305=6002
TSF / Skip if teleprinter flag is a 1. @@3306=6041
HLT / @@3307=7402
SKP / @@3310=7410
C3311, 3313 / DCA C3313
SKP / @@3312=7410
HLT / @@3313=7402
TCF / Clear teleprinter flag. @@3314=6042
CLA / @@3315=7200
TAD C3326 / @@3316=1326
DCA D0002 / @@3317=3002
ION / Enable Interrupts @@3320=6001
NOP / @@3321=7000
NOP / @@3322=7000
NOP / @@3323=7000
NOP / @@3324=7000
SKP / @@3325=7410
C3326, 3330 / DCA C3330
SKP / @@3327=7410
HLT / @@3330=7402
IOF / Disable Interrupts @@3331=6002
C3332, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3333=6041
HLT / @@3334=7402
CLA / @@3335=7200
TAD C3345 / @@3336=1345
DCA D0002 / @@3337=3002
ION / Enable Interrupts @@3340=6001
SKP / @@3341=7410
HLT / @@3342=7402
D3343, 7402 / HLT
C3344, 3343 / DCA D3343
C3345, 3346 / DCA C3346
SZA / @@3346=7440
HLT / @@3347=7402
TAD L0000 / @@3350=1000
CIA / @@3351=7041
TAD C3344 / @@3352=1344
SZA CLA / @@3353=7640
HLT / @@3354=7402
C3355, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@3356=6041
HLT / @@3357=7402
CLA / @@3360=7200
TAD C3370 / @@3361=1370
DCA D0002 / @@3362=3002
ION / Enable Interrupts @@3363=6001
JMP I C3365 / long jump to L3366 @@3364=5765
C3365,
C3365, 3366 / DCA L3366
L3366,
D3366, 7402 / HLT
C3367, 3366 / DCA L3366
C3370, 3371 / DCA C3371
SZA / @@3371=7440
HLT / @@3372=7402
TAD L0000 / @@3373=1000
CIA / @@3374=7041
TAD C3367 / @@3375=1367
SZA CLA / @@3376=7640
HLT / @@3377=7402
C3400, 6007 / 6007
TAD C3412 / @@3401=1212
DCA D0002 / @@3402=3002
ION / Enable Interrupts @@3403=6001
NOP / @@3404=7000
C3405, 6007 / 6007
C3406, 6040 / 6040
C3407, 6000 / 6000
JMP L3413 / @@3410=5213
HLT / @@3411=7402
C3412, 3411 / DCA I AI1
L3413,
C3413, 6007 / 6007
JMP I C3415 / long jump to L3600 @@3414=5615
C3415,
C3415, 3600 / DCA I C3400
*3600
L3600,
C3600, 7200 / CLA
JMP I C3602 / long jump to L4000 @@3601=5602
C3602,
C3602, 4000 / JMS L0000
C3603, 4010 / JMS AI0
*4000
L4000,
AND I C4010 / @@4000=0610
JMP I C4002 / long jump to L3604 @@4001=5602
C4002,
C4002, 3604 / DCA I C4004
*3604
L3604,
TAD I C3603 / @@3604=1603
SZA / @@3605=7440
HLT / @@3606=7402
CLA / @@3607=7200
C3610, 3603 / DCA I C3603
CLA / @@3611=7200
JMP I C3613 / long jump to L2173 @@3612=5613
C3613,
C3613, 2173 / ISZ D0173
C3614, 2010 / ISZ AI0
*2173
L2173,
AND I C2010 / @@2173=0610
JMP I C2175 / long jump to L3615 @@2174=5775
C2175,
C2175, 3615 / DCA I C2015
*3615
L3615,
TAD I C3614 / @@3615=1614
SZA / @@3616=7440
HLT / @@3617=7402
JMP I C3621 / long jump to L3622 @@3620=5621
C3621,
C3621, 3622 / DCA I L3622
L3622,
C3622, 7200 / CLA
JMP I C3624 / long jump to L1173 @@3623=5624
C3624,
C3624, 1173 / TAD D0173
C3625, 1010 / TAD AI0
*1173
L1173,
AND I D1010 / @@1173=0610
JMP I C1175 / long jump to L3626 @@1174=5775
C1175,
C1175, 3626 / DCA I C1026
*3626
L3626,
TAD I C3625 / @@3626=1625
SZA / @@3627=7440
HLT / @@3630=7402
CLA / @@3631=7200
DCA I C3625 / @@3632=3625
CLA / @@3633=7200
JMP I C3635 / long jump to L0574 @@3634=5635
C3635,
C3635, 0574 / AND I C0174
C3636, 0410 / AND I AI0
*0574
L0574,
AND I D0410 / @@0574=0610
JMP I C0576 / long jump to L3637 @@0575=5776
C0576,
C0576, 3637 / DCA I C0437
*3637
L3637,
TAD I C3636 / @@3637=1636
SZA / @@3640=7440
HLT / @@3641=7402
CLA / @@3642=7200
DCA I C3636 / @@3643=3636
CLA / @@3644=7200
JMP I C3646 / long jump to L0372 @@3645=5646
C3646,
C3646, 0372 / AND C3772
C3647, 0210 / AND C3610
*0371
JMP L0375 / @@0371=5375
L0372,
AND I D0210 / @@0372=0610
JMP I C0374 / long jump to L3650 @@0373=5774
C0374,
C0374, 3650 / DCA I C0250
*3650
L3650,
TAD I C3647 / @@3650=1647
SZA / @@3651=7440
HLT / @@3652=7402
CLA / @@3653=7200
DCA I C3647 / @@3654=3647
CLA / @@3655=7200
JMP I C3657 / long jump to L0130 @@3656=5657
C3657,
C3657, 0130 / AND L0130
C3660, 0110 / AND D0110
*0130
L0130,
C0130, 0510 / AND I D0110
JMP I C0132 / long jump to L3661 @@0131=5532
C0132,
C0132, 3661 / DCA I C0061
*3661
L3661,
TAD I C3660 / @@3661=1660
SZA / @@3662=7440
HLT / @@3663=7402
CLA / @@3664=7200
DCA D0110 / @@3665=3110
CLA / @@3666=7200
JMP I C3670 / long jump to L0124 @@3667=5670
C3670,
C3670, 0124 / AND L0124
C3671, 0050 / AND D0050
*0124
L0124,
C0124, 0450 / AND I D0050
C0125, 5526 / JMP I C0126
DCA I C0072 / @@0126=3672
*3672
TAD I C3671 / @@3672=1671
SZA / @@3673=7440
HLT / @@3674=7402
CLA / @@3675=7200
DCA D0050 / @@3676=3050
CLA / @@3677=7200
JMP I C3701 / long jump to L0120 @@3700=5701
C3701,
C3701, 0120 / AND L0120
C3702, 0030 / AND D0030
*0120
L0120,
C0120, 0430 / AND I D0030
D0121, 5522 / JMP I C0122
C0122, 3703 / DCA I C0103
*3703
TAD I C3702 / @@3703=1702
SZA / @@3704=7440
HLT / @@3705=7402
CLA / @@3706=7200
DCA D0030 / @@3707=3030
CLA / @@3710=7200
DCA L0000 / @@3711=3000
JMP I C3713 / long jump to L0074 @@3712=5713
C3713,
C3713, 0074 / AND L0074
*0074
L0074,
D0074, 0400 / AND I L0000
JMP I C0076 / long jump to L3714 @@0075=5476
C0076,
C0076, 3714 / DCA I C0114
*3714
L3714,
TAD I C0036 / @@3714=1436
SZA / @@3715=7440
HLT / @@3716=7402
CLA / @@3717=7200
DCA L0000 / @@3720=3000
CLA / @@3721=7200
JMP I C3723 / long jump to L0070 @@3722=5723
C3723,
C3723, 0070 / AND L0070
*0070
L0070,
C0070, 0407 / AND I D0007
JMP I C0072 / long jump to L3724 @@0071=5472
C0072,
C0072, 3724 / DCA I L0124
*3724
L3724,
D3724, 1446 / TAD I C0046
SZA / @@3725=7440
HLT / @@3726=7402
CLA / @@3727=7200
DCA D0007 / @@3730=3007
TAD D3747 / @@3731=1347
IAC / @@3732=7001
DCA D3747 / @@3733=3347
TAD D3747 / @@3734=1347
TAD C3750 / @@3735=1350
SZA CLA / @@3736=7640
JMP I C3746 / long jump to L0200 @@3737=5746
DCA D3747 / @@3740=3347
TAD C3751 / @@3741=1351
TLS / Load the TTO from the content of AC4 @@3742=6046
L3743,
TSF / Skip if teleprinter flag is a 1. @@3743=6041
JMP L3743 / @@3744=5343
JMP I C3746 / long jump to L0200 @@3745=5746
C3746,
C3746, 0200 / AND L3600
D3747, 0000 / AND L0000
C3750, 4762 / JMS I C3762
C3751, 0207 / AND C3607
*4010
C4010, 0000 / AND L0000
////////////////////////////////////////////////////////////////////////////////
/
/ SUBROUTINE: S4011
/
/ Called from:
/ 2677 4201
/ Total 0002 (2) calls
////////////////////////////////////////////////////////////////////////////////
S4011,
0 / return area
TAD C4020 / @@4012=1220
DCA L0001 / @@4013=3001
DCA D0002 / @@4014=3002
DCA D0003 / @@4015=3003
ISZ S4011 / @@4016=2211
JMP I S4011 / return @@4017=5611
C4020, 5402 / JMP I D0002
*4200
L4200,
CLA CLL / AC = 0000 @@4200=7300
JMS I C4202 / long call to S4011 @@4201=4602
C4202,
C4202, 4011 / JMS AI1
CLA CLL CMA CML / @@4203=7360
C4204, 6007 / 6007
SKP / @@4205=7410
HLT / @@4206=7402
SNL / @@4207=7420
SZA / @@4210=7440
HLT / @@4211=7402
C4212, 6040 / 6040
SKP / @@4213=7410
HLT / @@4214=7402
TSF / Skip if teleprinter flag is a 1. @@4215=6041
HLT / @@4216=7402
C4217, 6007 / 6007
TSF / Skip if teleprinter flag is a 1. @@4220=6041
SKP / @@4221=7410
HLT / @@4222=7402
C4223, 6003 / 6003
SKP / @@4224=7410
HLT / @@4225=7402
C4226, 6007 / 6007
C4227, 6040 / 6040
C4230, 6003 / 6003
HLT / @@4231=7402
C4232, 6007 / 6007
C4233, 6035 / 6035
SKP / @@4234=7410
HLT / @@4235=7402
C4236, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@4237=6041
HLT / @@4240=7402
C4241, 6003 / 6003
SKP / @@4242=7410
HLT / @@4243=7402
CLA IAC / @@4244=7201
C4245, 6035 / 6035
C4246, 6040 / 6040
TSF / Skip if teleprinter flag is a 1. @@4247=6041
HLT / @@4250=7402
C4251, 6003 / 6003
HLT / @@4252=7402
C4253, 6007 / 6007
TAD C4267 / @@4254=1267
DCA D0002 / @@4255=3002
ION / Enable Interrupts @@4256=6001
SKP / @@4257=7410
HLT / @@4260=7402
C4261, 6000 / 6000
HLT / @@4262=7402
C4263, 6000 / 6000
SKP / @@4264=7410
HLT / @@4265=7402
JMP L4271 / @@4266=5271
C4267, 4270 / JMS C4270
HLT / @@4270=7402
L4271,
C4271, 6007 / 6007
TAD C4304 / @@4272=1304
DCA D0002 / @@4273=3002
ION / Enable Interrupts @@4274=6001
IOF / Disable Interrupts @@4275=6002
SKP / @@4276=7410
HLT / @@4277=7402
C4300, 6000 / 6000
SKP / @@4301=7410
HLT / @@4302=7402
JMP L4306 / @@4303=5306
C4304, 4305 / JMS C4305
HLT / @@4305=7402
L4306,
C4306, 6007 / 6007
CMA / @@4307=7040
C4310, 6004 / 6004
SKP / @@4311=7410
HLT / @@4312=7402
AND C0064 / @@4313=0064
SZA / @@4314=7440
HLT / @@4315=7402
CLA CLL CMA CML / @@4316=7360
C4317, 6004 / 6004
SNL / @@4320=7420
HLT / @@4321=7402
AND C0064 / @@4322=0064
CLL RAL / @@4323=7104
SZL / @@4324=7430
SZA / @@4325=7440
HLT / @@4326=7402
C4327, 6007 / 6007
C4330, 6040 / 6040
C4331, 6004 / 6004
AND C0064 / @@4332=0064
RTL / @@4333=7006
RAL / @@4334=7004
SZL / @@4335=7430
SZA / @@4336=7440
HLT / @@4337=7402
C4340, 6007 / 6007
TAD C4356 / @@4341=1356
DCA D0002 / @@4342=3002
ION / Enable Interrupts @@4343=6001
C4344, 6004 / 6004
AND C0064 / @@4345=0064
C4346, 6000 / 6000
HLT / @@4347=7402
CLL / @@4350=7102
RTR / @@4351=7012
SZL / @@4352=7430
SZA / @@4353=7440
HLT / @@4354=7402
JMP L4360 / @@4355=5360
C4356, 4357 / JMS C4357
HLT / @@4357=7402
L4360,
CLA CLL CML / @@4360=7320
TAD C4375 / @@4361=1375
DCA D0002 / @@4362=3002
C4363, 6005 / 6005
SKP / @@4364=7410
HLT / @@4365=7402
SNL / @@4366=7420
SZA / @@4367=7440
HLT / @@4370=7402
C4371, 6000 / 6000
HLT / @@4372=7402
JMP I C4374 / long jump to L4400 @@4373=5774
C4374,
C4374, 4400 / JMS I L0000
C4375, 4376 / JMS C4376
HLT / @@4376=7402
*4400
L4400,
C4400, 6007 / 6007
TAD C4415 / @@4401=1215
DCA D0002 / @@4402=3002
CLA CLL CML RAR / AC = 4000 (-4000 = -2048 dec) @@4403=7330
C4404, 6005 / 6005
SNL / @@4405=7420
HLT / @@4406=7402
C4407, 6000 / 6000
HLT / @@4410=7402
C4411, 6007 / 6007
CLA CLL / AC = 0000 @@4412=7300
JMP I C4414 / long jump to L2677 @@4413=5614
C4414,
C4414, 2677 / ISZ I C4477
C4415, 4416 / JMS I AI6
HLT / @@4416=7402
$