TITLE "AUTOMATIC DISASSEMBLY OF maindec-8i-d02b-pb.bin BY D8TAPE" //////////////////////////////////////////////////////////////////////////////// / / Automatic Disassembly of maindec-8i-d02b-pb.bin / Generated 2010 02 19 00:10:31 / 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 / / 3427 locations used, 2471 code and 0736 data //////////////////////////////////////////////////////////////////////////////// *0000 D0000, 0000 / AND D0000 L0001, D0001, 5001 / JMP L0001 D0002, 0002 / AND D0002 D0003, 0003 / AND D0003 *0007 D0007, 0000 / AND D0000 *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 D0000 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 D0000 C0037, 1777 / TAD I C0177 C0040, 0777 / AND I C0177 C0041, 0377 / AND C0177 C0042, 0177 / AND C0177 C0043, 0077 / AND C0077 C0044, 0037 / AND C0037 C0045, 0017 / AND AI7 D0046, 0007 / AND D0007 C0047, 0003 / AND D0003 D0050, 0000 / AND D0000 C0051, 0001 / AND L0001 L0052, C0052, 4400 / JMS I D0000 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, 5252 / JMP L0052 C0064, 0004 / AND C0004 *0070 L0070, C0070, 0407 / AND I D0007 JMP I C0072 / long jump to L3600 @@0071=5472 C0072, C0072, 3600 / DCA I D0000 *0074 L0074, C0074, 0400 / AND I D0000 JMP I C0076 / long jump to L3550 @@0075=5476 C0076, C0076, 3550 / DCA I C0150 *0110 D0110, 0000 / AND D0000 *0120 L0120, C0120, 0430 / AND I D0030 JMP I C0122 / long jump to L3530 @@0121=5522 C0122, C0122, 3530 / DCA I L0130 *0124 L0124, C0124, 0450 / AND I D0050 C0125, 5526 / JMP I C0126 DCA I D0110 / @@0126=3510 *0130 L0130, C0130, 0510 / AND I D0110 D0131, 5532 / JMP I C0132 DCA I L0070 / @@0132=3470 *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 D0200, 0000 / AND D0000 L0201, CLA / @@0201=7200 TAD L0052 / @@0202=1052 DCA D0377 / @@0203=3377 SZA / @@0204=7440 HLT / @@0205=7402 TAD L0052 / @@0206=1052 SKP / @@0207=7410 D0210, 0000 / AND D0000 CIA / @@0211=7041 TAD D0377 / @@0212=1377 SZA / @@0213=7440 HLT / @@0214=7402 CLA / @@0215=7200 TAD C0053 / @@0216=1053 DCA D0200 / @@0217=3200 SZA / @@0220=7440 HLT / @@0221=7402 TAD C0053 / @@0222=1053 CIA / @@0223=7041 TAD D0200 / @@0224=1200 SZA / @@0225=7440 HLT / @@0226=7402 CLA / @@0227=7200 TAD C0020 / @@0230=1020 DCA D0200 / @@0231=3200 SZA / @@0232=7440 HLT / @@0233=7402 TAD D0200 / @@0234=1200 CMA / @@0235=7040 SZA / @@0236=7440 HLT / @@0237=7402 CLA / @@0240=7200 TAD C0036 / @@0241=1036 DCA D0200 / @@0242=3200 SZA / @@0243=7440 HLT / @@0244=7402 TAD D0200 / @@0245=1200 SZA / @@0246=7440 HLT / @@0247=7402 CLA / @@0250=7200 TAD C0054 / @@0251=1054 DCA D0200 / @@0252=3200 SZA / @@0253=7440 HLT / @@0254=7402 TAD C0054 / @@0255=1054 CIA / @@0256=7041 TAD D0200 / @@0257=1200 SZA / @@0260=7440 HLT / @@0261=7402 CLA / @@0262=7200 TAD C0055 / @@0263=1055 DCA D0200 / @@0264=3200 SZA / @@0265=7440 HLT / @@0266=7402 TAD C0055 / @@0267=1055 CIA / @@0270=7041 TAD D0200 / @@0271=1200 SZA / @@0272=7440 HLT / @@0273=7402 CLA / @@0274=7200 TAD C0056 / @@0275=1056 DCA D0377 / @@0276=3377 SZA / @@0277=7440 HLT / @@0300=7402 TAD C0056 / @@0301=1056 CIA / @@0302=7041 TAD D0377 / @@0303=1377 SZA / @@0304=7440 HLT / @@0305=7402 CLA / @@0306=7200 TAD C0057 / @@0307=1057 DCA D0377 / @@0310=3377 SZA / @@0311=7440 HLT / @@0312=7402 TAD C0057 / @@0313=1057 CIA / @@0314=7041 TAD D0377 / @@0315=1377 SZA / @@0316=7440 HLT / @@0317=7402 CLA / @@0320=7200 TAD C0060 / @@0321=1060 DCA D0000 / @@0322=3000 SZA / @@0323=7440 HLT / @@0324=7402 TAD C0060 / @@0325=1060 CIA / @@0326=7041 TAD D0000 / @@0327=1000 SZA / @@0330=7440 HLT / @@0331=7402 CLA / @@0332=7200 TAD C0061 / @@0333=1061 DCA D0000 / @@0334=3000 SZA / @@0335=7440 HLT / @@0336=7402 TAD C0061 / @@0337=1061 CIA / @@0340=7041 TAD D0000 / @@0341=1000 SZA / @@0342=7440 HLT / @@0343=7402 CLA / @@0344=7200 TAD C0062 / @@0345=1062 DCA D0000 / @@0346=3000 SZA / @@0347=7440 HLT / @@0350=7402 TAD C0062 / @@0351=1062 CIA / @@0352=7041 TAD D0000 / @@0353=1000 SZA / @@0354=7440 HLT / @@0355=7402 CLA / @@0356=7200 TAD C0063 / @@0357=1063 DCA D0000 / @@0360=3000 SZA / @@0361=7440 HLT / @@0362=7402 TAD C0063 / @@0363=1063 CIA / @@0364=7041 TAD D0000 / @@0365=1000 SZA / @@0366=7440 HLT / @@0367=7402 JMP L0374 / @@0370=5374 L0371, AND I D0210 / @@0371=0610 JMP I C0373 / long jump to L3450 @@0372=5773 C0373, C0373, 3450 / DCA I D0050 L0374, NOP / @@0374=7000 NOP / @@0375=7000 SKP / @@0376=7410 D0377, 0000 / AND D0000 CLA / @@0400=7200 TAD I C0042 / @@0401=1442 CIA / @@0402=7041 TAD C0177 / @@0403=1177 SZA / @@0404=7440 HLT / @@0405=7402 CLA / @@0406=7200 D0407, 7410 / SKP D0410, 0000 / AND D0000 TAD C0020 / @@0411=1020 AND I C0042 / @@0412=0442 CIA / @@0413=7041 TAD C0177 / @@0414=1177 SZA / @@0415=7440 HLT / @@0416=7402 CLA / @@0417=7200 TAD C0020 / @@0420=1020 DCA D0000 / @@0421=3000 ISZ I C0036 / @@0422=2436 HLT / @@0423=7402 TAD D0000 / @@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 AND I C0172 / @@0437=0572 CIA / @@0440=7041 TAD C0176 / @@0441=1176 SZA / @@0442=7440 HLT / @@0443=7402 CLA / @@0444=7200 TAD C0172 / @@0445=1172 DCA D0000 / @@0446=3000 ISZ I C0036 / @@0447=2436 SKP / @@0450=7410 HLT / @@0451=7402 TAD D0000 / @@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 D0000 / @@0477=3000 ISZ I C0036 / @@0500=2436 SKP / @@0501=7410 HLT / @@0502=7402 TAD D0000 / @@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 D0000 / @@0530=3000 ISZ I C0036 / @@0531=2436 SKP / @@0532=7410 HLT / @@0533=7402 TAD D0000 / @@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 D0000 / @@0561=3000 ISZ I C0036 / @@0562=2436 SKP / @@0563=7410 HLT / @@0564=7402 TAD D0000 / @@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 L3430 @@0575=5776 C0576, C0576, 3430 / DCA I D0030 L0577, NOP / @@0577=7000 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 D0046 / @@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 C0042 / @@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 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 D0000 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 D0046 / @@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 C0042 / @@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 L3410 @@1174=5775 C1175, C1175, 3410 / DCA I AI0 L1176, NOP / @@1176=7000 NOP / @@1177=7000 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 D0046 / @@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 C0042 / @@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 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 D0046 / @@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 C0042 / @@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 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 D0046 / @@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 C0042 / @@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 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 D0000 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 D0046 / @@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 C0042 / @@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 D2170, 7000 / NOP NOP / @@2171=7000 JMP L2176 / @@2172=5376 L2173, AND I C2010 / @@2173=0610 JMP I C2175 / long jump to L3370 @@2174=5775 C2175, C2175, 3370 / DCA D2170 L2176, NOP / @@2176=7000 NOP / @@2177=7000 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 D0046 / @@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 C0042 / @@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 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 D0046 / @@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 C0042 / @@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 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 JMS I C2676 / long call to S4011 @@2675=4676 C2676, C2676, 4011 / JMS AI1 TSF / Skip if teleprinter flag is a 1. @@2677=6041 TLS / Load the TTO from the content of AC4 @@2700=6046 L2701, TSF / Skip if teleprinter flag is a 1. @@2701=6041 JMP L2701 / @@2702=5301 CLA / @@2703=7200 TAD C2712 / @@2704=1312 DCA D0002 / @@2705=3002 ION / Enable Interrupts @@2706=6001 NOP / @@2707=7000 C2710, 7402 / HLT C2711, 2710 / ISZ I C2710 C2712, 2713 / ISZ I C2713 SZA / @@2713=7440 HLT / @@2714=7402 TAD D0000 / @@2715=1000 CIA / @@2716=7041 TAD C2711 / @@2717=1311 SZA CLA / @@2720=7640 HLT / @@2721=7402 TAD C0041 / @@2722=1041 TSF / Skip if teleprinter flag is a 1. @@2723=6041 TLS / Load the TTO from the content of AC4 @@2724=6046 L2725, TSF / Skip if teleprinter flag is a 1. @@2725=6041 JMP L2725 / @@2726=5325 CLA / @@2727=7200 TAD C2736 / @@2730=1336 DCA D0002 / @@2731=3002 ION / Enable Interrupts @@2732=6001 TAD C0020 / @@2733=1020 C2734, 7402 / HLT C2735, 2734 / ISZ I C2734 C2736, 2737 / ISZ I C2737 CMA / @@2737=7040 SZA / @@2740=7440 HLT / @@2741=7402 TAD D0000 / @@2742=1000 CIA / @@2743=7041 TAD C2735 / @@2744=1335 SZA CLA / @@2745=7640 HLT / @@2746=7402 TAD C0041 / @@2747=1041 TSF / Skip if teleprinter flag is a 1. @@2750=6041 TLS / Load the TTO from the content of AC4 @@2751=6046 L2752, TSF / Skip if teleprinter flag is a 1. @@2752=6041 JMP L2752 / @@2753=5352 CLA / @@2754=7200 TAD C2764 / @@2755=1364 DCA D0002 / @@2756=3002 TAD C0020 / @@2757=1020 ION / Enable Interrupts @@2760=6001 AND C0020 / @@2761=0020 C2762, 7402 / HLT C2763, 2762 / ISZ I C2762 C2764, 2765 / ISZ I C2765 CMA / @@2765=7040 SZA / @@2766=7440 HLT / @@2767=7402 TAD D0000 / @@2770=1000 CIA / @@2771=7041 TAD C2763 / @@2772=1363 SZA CLA / @@2773=7640 HLT / @@2774=7402 NOP / @@2775=7000 NOP / @@2776=7000 NOP / @@2777=7000 TAD C0041 / @@3000=1041 TSF / Skip if teleprinter flag is a 1. @@3001=6041 TLS / Load the TTO from the content of AC4 @@3002=6046 L3003, TSF / Skip if teleprinter flag is a 1. @@3003=6041 JMP L3003 / @@3004=5203 CLA / @@3005=7200 TAD C3015 / @@3006=1215 DCA D0002 / @@3007=3002 TAD C0020 / @@3010=1020 ION / Enable Interrupts @@3011=6001 DCA D0003 / @@3012=3003 HLT / @@3013=7402 C3014, 3013 / DCA AI3 C3015, 3016 / DCA AI6 SZA / @@3016=7440 HLT / @@3017=7402 TAD D0003 / @@3020=1003 CMA / @@3021=7040 SZA / @@3022=7440 HLT / @@3023=7402 DCA D0003 / @@3024=3003 TAD D0000 / @@3025=1000 CIA / @@3026=7041 TAD C3014 / @@3027=1214 SZA CLA / @@3030=7640 HLT / @@3031=7402 TAD C0041 / @@3032=1041 TSF / Skip if teleprinter flag is a 1. @@3033=6041 TLS / Load the TTO from the content of AC4 @@3034=6046 L3035, TSF / Skip if teleprinter flag is a 1. @@3035=6041 JMP L3035 / @@3036=5235 CLA / @@3037=7200 TAD C3050 / @@3040=1250 DCA D0002 / @@3041=3002 TAD C0035 / @@3042=1035 DCA D0003 / @@3043=3003 ION / Enable Interrupts @@3044=6001 ISZ D0003 / @@3045=2003 HLT / @@3046=7402 C3047, 3046 / DCA D0046 C3050, 3051 / DCA C0051 SZA / @@3051=7440 HLT / @@3052=7402 TAD D0003 / @@3053=1003 CMA / @@3054=7040 SZA / @@3055=7440 HLT / @@3056=7402 DCA D0003 / @@3057=3003 TAD D0000 / @@3060=1000 CIA / @@3061=7041 TAD C3047 / @@3062=1247 SZA CLA / @@3063=7640 HLT / @@3064=7402 TAD C0041 / @@3065=1041 TSF / Skip if teleprinter flag is a 1. @@3066=6041 TLS / Load the TTO from the content of AC4 @@3067=6046 L3070, TSF / Skip if teleprinter flag is a 1. @@3070=6041 JMP L3070 / @@3071=5270 CLA / @@3072=7200 TAD C3104 / @@3073=1304 DCA D0002 / @@3074=3002 TAD C0020 / @@3075=1020 DCA D0003 / @@3076=3003 ION / Enable Interrupts @@3077=6001 ISZ D0003 / @@3100=2003 HLT / @@3101=7402 HLT / @@3102=7402 C3103, 3102 / DCA C0102 C3104, 3105 / DCA C0105 SZA / @@3105=7440 HLT / @@3106=7402 TAD D0003 / @@3107=1003 SZA / @@3110=7440 HLT / @@3111=7402 DCA D0003 / @@3112=3003 TAD D0000 / @@3113=1000 CIA / @@3114=7041 TAD C3103 / @@3115=1303 SZA CLA / @@3116=7640 HLT / @@3117=7402 TAD C0041 / @@3120=1041 TSF / Skip if teleprinter flag is a 1. @@3121=6041 TLS / Load the TTO from the content of AC4 @@3122=6046 L3123, TSF / Skip if teleprinter flag is a 1. @@3123=6041 JMP L3123 / @@3124=5323 CLA / @@3125=7200 TAD C3134 / @@3126=1334 DCA D0002 / @@3127=3002 ION / Enable Interrupts @@3130=6001 L3131, JMP L3131 / @@3131=5331 HLT / @@3132=7402 C3133, 3131 / DCA D0131 C3134, 3135 / DCA C0135 SZA / @@3135=7440 HLT / @@3136=7402 TAD D0000 / @@3137=1000 CIA / @@3140=7041 TAD C3133 / @@3141=1333 SZA CLA / @@3142=7640 HLT / @@3143=7402 TAD C0041 / @@3144=1041 TSF / Skip if teleprinter flag is a 1. @@3145=6041 TLS / Load the TTO from the content of AC4 @@3146=6046 L3147, TSF / Skip if teleprinter flag is a 1. @@3147=6041 JMP L3147 / @@3150=5347 CLA / @@3151=7200 TAD C3160 / @@3152=1360 DCA D0002 / @@3153=3002 ION / Enable Interrupts @@3154=6001 JMS D0003 / @@3155=4003 HLT / @@3156=7402 C3157, 3156 / DCA C0156 C3160, 3161 / DCA C0161 SZA / @@3161=7440 HLT / @@3162=7402 TAD D0003 / @@3163=1003 CIA / @@3164=7041 TAD C3157 / @@3165=1357 SZA / @@3166=7440 HLT / @@3167=7402 TAD D0000 / @@3170=1000 CIA / @@3171=7041 TAD C0064 / @@3172=1064 SZA CLA / @@3173=7640 HLT / @@3174=7402 NOP / @@3175=7000 NOP / @@3176=7000 NOP / @@3177=7000 TAD C0041 / @@3200=1041 TSF / Skip if teleprinter flag is a 1. @@3201=6041 TLS / Load the TTO from the content of AC4 @@3202=6046 L3203, TSF / Skip if teleprinter flag is a 1. @@3203=6041 JMP L3203 / @@3204=5203 CLA / @@3205=7200 TAD C3215 / @@3206=1215 DCA D0002 / @@3207=3002 TAD C0020 / @@3210=1020 ION / Enable Interrupts @@3211=6001 CLA / @@3212=7200 D3213, 7402 / HLT C3214, 3213 / DCA D3213 C3215, 3216 / DCA C3216 SZA / @@3216=7440 HLT / @@3217=7402 TAD D0000 / @@3220=1000 CIA / @@3221=7041 TAD C3214 / @@3222=1214 SZA CLA / @@3223=7640 HLT / @@3224=7402 TAD C0041 / @@3225=1041 TSF / Skip if teleprinter flag is a 1. @@3226=6041 TLS / Load the TTO from the content of AC4 @@3227=6046 L3230, TSF / Skip if teleprinter flag is a 1. @@3230=6041 JMP L3230 / @@3231=5230 CLA / @@3232=7200 TAD C3242 / @@3233=1242 DCA D0002 / @@3234=3002 ION / Enable Interrupts @@3235=6001 TSF / Skip if teleprinter flag is a 1. @@3236=6041 HLT / @@3237=7402 D3240, 7402 / HLT C3241, 3240 / DCA D3240 C3242, 3243 / DCA C3243 SZA / @@3243=7440 HLT / @@3244=7402 TAD D0000 / @@3245=1000 CIA / @@3246=7041 TAD C3241 / @@3247=1241 SZA CLA / @@3250=7640 HLT / @@3251=7402 TAD C0041 / @@3252=1041 TSF / Skip if teleprinter flag is a 1. @@3253=6041 TLS / Load the TTO from the content of AC4 @@3254=6046 L3255, TSF / Skip if teleprinter flag is a 1. @@3255=6041 JMP L3255 / @@3256=5255 CLA / @@3257=7200 TAD C3317 / @@3260=1317 DCA D0002 / @@3261=3002 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 ION / Enable Interrupts @@3306=6001 IOF / Disable Interrupts @@3307=6002 ION / Enable Interrupts @@3310=6001 IOF / Disable Interrupts @@3311=6002 ION / Enable Interrupts @@3312=6001 IOF / Disable Interrupts @@3313=6002 TSF / Skip if teleprinter flag is a 1. @@3314=6041 HLT / @@3315=7402 SKP / @@3316=7410 C3317, 3321 / DCA C3321 SKP / @@3320=7410 HLT / @@3321=7402 TCF / Clear teleprinter flag. @@3322=6042 CLA / @@3323=7200 TAD C3334 / @@3324=1334 DCA D0002 / @@3325=3002 ION / Enable Interrupts @@3326=6001 NOP / @@3327=7000 NOP / @@3330=7000 NOP / @@3331=7000 NOP / @@3332=7000 SKP / @@3333=7410 C3334, 3336 / DCA C3336 SKP / @@3335=7410 HLT / @@3336=7402 IOF / Disable Interrupts @@3337=6002 CLA / @@3340=7200 JMP I C3342 / long jump to L4000 @@3341=5742 C3342, C3342, 4000 / JMS D0000 C3343, 4010 / JMS AI0 *3350 L3350, TAD I C3343 / @@3350=1743 SZA / @@3351=7440 HLT / @@3352=7402 CLA / @@3353=7200 DCA I C3343 / @@3354=3743 CLA / @@3355=7200 JMP I C3357 / long jump to L2173 @@3356=5757 C3357, C3357, 2173 / ISZ D0173 C3360, 2010 / ISZ AI0 *3370 L3370, TAD I C3360 / @@3370=1760 SZA / @@3371=7440 HLT / @@3372=7402 JMP I C3374 / long jump to L3400 @@3373=5774 C3374, C3374, 3400 / DCA I D0000 *3400 L3400, CLA / @@3400=7200 JMP I C3402 / long jump to L1173 @@3401=5602 C3402, C3402, 1173 / TAD D0173 C3403, 1010 / TAD AI0 *3410 L3410, C3410, 1603 / TAD I C3403 SZA / @@3411=7440 HLT / @@3412=7402 CLA / @@3413=7200 DCA I C3403 / @@3414=3603 CLA / @@3415=7200 JMP I C3417 / long jump to L0574 @@3416=5617 C3417, C3417, 0574 / AND I C0174 C3420, 0410 / AND I AI0 *3430 L3430, TAD I C3420 / @@3430=1620 SZA / @@3431=7440 HLT / @@3432=7402 CLA / @@3433=7200 DCA I C3420 / @@3434=3620 CLA / @@3435=7200 JMP I C3437 / long jump to L0371 @@3436=5637 C3437, C3437, 0371 / AND C3571 C3440, 0210 / AND L3410 *3450 L3450, TAD I C3440 / @@3450=1640 SZA / @@3451=7440 HLT / @@3452=7402 CLA / @@3453=7200 DCA I C3440 / @@3454=3640 CLA / @@3455=7200 JMP I C3457 / long jump to L0130 @@3456=5657 C3457, C3457, 0130 / AND L0130 C3460, 0110 / AND D0110 *3470 TAD I C3460 / @@3470=1660 SZA / @@3471=7440 HLT / @@3472=7402 CLA / @@3473=7200 DCA D0110 / @@3474=3110 CLA / @@3475=7200 JMP I C3477 / long jump to L0124 @@3476=5677 C3477, C3477, 0124 / AND L0124 C3500, 0050 / AND D0050 *3510 TAD I C3500 / @@3510=1700 SZA / @@3511=7440 HLT / @@3512=7402 CLA / @@3513=7200 DCA D0050 / @@3514=3050 CLA / @@3515=7200 JMP I C3517 / long jump to L0120 @@3516=5717 C3517, C3517, 0120 / AND L0120 C3520, 0030 / AND D0030 *3530 L3530, TAD I C3520 / @@3530=1720 SZA / @@3531=7440 HLT / @@3532=7402 CLA / @@3533=7200 DCA D0030 / @@3534=3030 CLA / @@3535=7200 DCA D0000 / @@3536=3000 JMP I C3540 / long jump to L0074 @@3537=5740 C3540, C3540, 0074 / AND L0074 *3550 L3550, TAD I C0036 / @@3550=1436 SZA / @@3551=7440 HLT / @@3552=7402 CLA / @@3553=7200 DCA D0000 / @@3554=3000 CLA / @@3555=7200 JMP I C3557 / long jump to L0070 @@3556=5757 C3557, C3557, 0070 / AND L0070 *3600 L3600, TAD I D0046 / @@3600=1446 C3601, 7440 / SZA HLT / @@3602=7402 CLA / @@3603=7200 DCA D0007 / @@3604=3007 TAD D3623 / @@3605=1223 IAC / @@3606=7001 DCA D3623 / @@3607=3223 TAD D3623 / @@3610=1223 TAD C3624 / @@3611=1224 SZA CLA / @@3612=7640 JMP I C3622 / long jump to L0201 @@3613=5622 DCA D3623 / @@3614=3223 TAD C3625 / @@3615=1225 TLS / Load the TTO from the content of AC4 @@3616=6046 L3617, TSF / Skip if teleprinter flag is a 1. @@3617=6041 JMP L3617 / @@3620=5217 JMP I C3622 / long jump to L0201 @@3621=5622 C3622, C3622, 0201 / AND C3601 D3623, 0000 / AND D0000 C3624, 7730 / SPA SZL CLA C3625, 0207 / AND C3607 *4000 L4000, AND I D4010 / @@4000=0610 JMP I C4002 / long jump to L3350 @@4001=5602 C4002, C4002, 3350 / DCA C4150 *4010 D4010, 0000 / AND D0000 //////////////////////////////////////////////////////////////////////////////// / / SUBROUTINE: S4011 / / Called from: / 2675 / Total 0001 (1) calls //////////////////////////////////////////////////////////////////////////////// S4011, 0 / return area TAD C4021 / @@4012=1221 DCA L0001 / @@4013=3001 DCA D0002 / @@4014=3002 DCA D0003 / @@4015=3003 TAD C0041 / @@4016=1041 ISZ S4011 / @@4017=2211 JMP I S4011 / return @@4020=5611 C4021, 5402 / JMP I D0002 $