SHEET;1; PROGM;090;1;1;MASTER ROUTINE ENTRY;551;1 CHAPS;2;100;536; SHEET;2 PROCR;100;FIXED ENTRY POINTS TO MASTER NOTES;RADIX;B; 0;124;536;0;1;0;0;160(IPS INITIAL ENTRY) 1;124;264;10;1;0;0;161 gI/P O/P CONTROL 2;100;559;0;0;1;0;162(IPS:ASL'S) 3;124;205;0;1;0;0;163 gOPTIONS 4;100;233;0;0;0;0;164 (IPS: APT) 5;124;204;4;1;0;0;165 gPROGRAMME UNLOAD 6;100;0;0;0;0;0;166 7;124;244;0;1;0;0;167 gOVERLAY 8;100;0;0;0;0;0;168 9;124;207;0;1;0;0;169 gTYPE 10;124;263;16;1;0;0;*pp0*pp3*13e*60e 11;124;208;17;1;0;0;171g 12;100;0;0;0;0;0;172 13;124;243;66;1;0;0;*60e 14;124;264;0;1;0;0;gTEST ROUTE 15;100;0;0;0;0;0;175 5-FIGURE DATE 16;100;0;0;0;0;0;176 17;124;450;0;1;0;0;*13e RELEASE ROUTE 18;115;537;0;0;1;0;178 ON LINE STORE DUMP 19;100;0;2;0;0;0;179 ABDON/UNLOAD INDICATOR 20;100;0;3;0;0;0;180 MACHINE NO 21;100;0;0;0;0;0;181 SERIAL NUMBER 22;100;0;0;0;0;0;182 MOD NUMBER 23;124;182;0;1;0;0;*pp0*pp2*293 24;124;103;15;1;0;0;*2pe 25;124;182;0;1;0;0;*293 26;124;127;29;1;0;0;*31e 27;124;104;7;0;1;0;*pp2*263 28;124;268;7;1;0;0;183gPRIORITYQUEUE 29;100;0;0;0;0;0;184 USED IN TYPE PQ 30;100;0;0;0;0;0;185 LAST COMMAND 31;100;0;0;0;0;0;186 CD: MIN RT 32;100;0;0;0;0;0;187 CD: MAX RT 33;100;0;0;0;0;0;188 CD: 8*CH 34;100;0;0;0;0;0;189 CD: (8*CH)+4 35;100;0;0;0;0;0;190 TW: RT NO 36;100;0;2;0;0;0;191 TW: RT TYPE SHEET;3 CONST;101;1;FAST CHANNEL ASLS 0;(D)pppp0pppp;*3:t4pt CHANNEL 16 2;pppp0pppp; 4;pppp0pppp; 6;pppp0pppp; 8;pppp0pppp;CHANNEL 17 10;pppp0pppp; 12;pppp0pppp; 14;pppp0pppp; 16;pppp0pppp;CHANNEL 18 18;pppp0pppp; 20;pppp0pppp; 22;pppp0pppp; 24;pppp0pppp;CHANNEL 19 26;pppp0pppp; 28;pppp0pppp; 30;pppp0pppp; 32;pppp0pppp;CHANNEL 20 34;pppp0pppp; 36;pppp0pppp; 38;pppp0pppp; 40;pppp0pppp;CHANNEL 21 42;pppp0pppp; 44;pppp0pppp; 46;pppp0pppp; SHEET;4 CONST;102;1;TYPEWRITER ANNEXE 0;(D)7:(A)LDB(D)5.;TAB,L,D,B,L/E 2;(D)0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;0; 24;0; 26;0; 28;0; 30;0; 32;0; 34;0; 36;0; 38;0; 40;0; 42;0; 44;0; 46;0; 48;0; 50;0; 52;0; 54;0; 56;0; 58;0; 60;0; 62;0; 64;0; 66;0; 68;0; 70;0; 72;0; 74;0; 76;0; 78;0; 80;5.5.;SP,SP,SP,L/E,L/E 82;5.5.5.5.5.;L/E. L/E, L/E, L/E, L/E SHEET;5 PROCR;103;LOG ROUTINE SWITCH NOTES;RADIX;B; 0;100;0;0;0;0;0;INDICATOR L1 OPTIONS OFFERED 1;100;0;0;0;0;0;INDICATOR L2 COMMAND IGNORED 2;106;0;8;0;0;0;*59t;STORE LINK AFTER 3;124;0;2;0;3;0;*59t;INTERRUPTION 4;102;0;44;0;0;0; 5;100;212;0;0;3;0;*31e SET BINARY;HEAD OF QUEUE 6;124;212;0;1;1;0;SET MOD GROUP 0 7;124;103;23;1;0;0;(INTLY SL=4);SWITCH SL 8;124;186;0;1;0;0;gROUTE CLOSED;SWITCH L1 9;124;106;12;1;0;0;gROUTE ENGAGED 10;124;108;0;1;0;0;gDOUBTFUL BLOCK 11;124;103;12;1;0;0;gWARNING OF END 12;124;182;22;1;0;0;*293 gAVAILABLE;SWITCH SLAS 13;126;273;0;0;0;0;;(A),(B),(C), SET (C 14;106;103;16;0;0;0;;DECIMAL L SET RETUR 15;102;103;12;0;0;0;;PROG LINK 16;124;182;22;1;0;0;*293 SLAS=1 17;100;0;0;0;0;0;SETTING OF L5 18;106;198;8;1;0;0;*263;L5=1 19;124;185;0;1;0;0;;L5=2 20;124;186;15;1;0;0;;L5=3 21;106;104;8;0;0;0;SET SL=4 22;102;103;7;0;0;0; 23;125;0;1919;1;2;0;INTERROGATE I1-7,I9-11 TEST INDS STACKED 24;127;199;0;0;1;0;gYES: OP INT 25;124;106;12;1;0;0;(INTLY L6=2);SWITCH L6 26;106;175;0;0;3;0;;TEST REQUEST SET 27;127;178;0;0;1;0;gYES 28;125;0;2;0;3;0; 29;124;103;26;1;0;0; SHEET;6 PROCR;104;LOG ROUTINE SWITCH CONT NOTES;RADIX;B; 0;106;104;2;0;0;0;SET L6=2 1;102;103;25;0;0;0; 2;124;106;12;1;0;0;gSM;L6=2 3;126;109;10;1;3;0;SET (MR3) FOR REQUEST;L8=1 4;100;0;0;0;0;0;P 5;100;0;0;0;0;0;Q 6;100;0;0;0;0;0;(64+R)FIXED(T/W) 7;100;0;0;0;0;0;(64+R)VARIABLE(T/W) 8;124;103;23;1;0;0;SL=4 9;100;0;0;0;0;0;SPARE 10;100;0;0;0;0;0;1=256 MICROSECS INEFFECTIVE 11;100;0;0;0;0;0;1=APP 1SEC TIME CNTR SHEET;7 CONST;105;1;ANNEXES FOR FIXED COMMENT 0;(D)7:(A)LDB(D)5.;TAB,L,D,B,L/E 2;(D)6p7:(A)C I;R/S,TAB,C,SP,I 4;(A)GN (D)5.5.;G,N,SP,L/E,L/E SHEET;8 PROCR;106;MASTER ROUTINE SWITCH NOTES;RADIX;; 0;100;0;0;0;0;0;INDICATOR FOR 'ABDON' AND 'END' 1;100;0;4;0;0;0;*pp0*pp2*1.3 2;100;0;6;0;0;0;*1:3 3;100;0;12;0;0;0;*393 4;100;0;14;0;0;0;*4.3 5;100;0;16;0;0;0;*pp2*5t3 6;100;0;0;0;0;0;SPARE 7;100;0;0;0;0;0;MR3 SETTING FOR REQUEST T/W 8;100;0;18;0;0;0;*1.3*1:3*1p4*384*393*5t3*4.3 8 10 9;124;0;3;0;1;0;OPTION 8 10;126;0;158;0;1;0;g 11;124;108;9;1;0;0;g 12;124;106;14;1;0;0;;SWITCH SM 13;124;106;23;1;0;0;gCLOSED(S=3);S=1 TEST ROUTE 14;124;106;11;1;0;0;gENGAGED(S=2) 15;126;271;0;0;0;0;gD/B;TEST ROUTE 16;126;300;0;0;0;0;gW/E 17;106;107;5;0;0;0; 18;102;106;12;0;0;0;;S=4 19;106;107;6;1;0;0; 20;102;0;2;1;0;0;;SET UP MR1 21;106;107;0;1;0;0;ROUTE NO. & TYPE 22;124;265;1;1;0;0;gI/P O/P CONTROL 23;106;0;156;0;0;0;CURRENT TIME;S=3 TEMP, CLOSED 24;106;107;15;0;0;0;*pp0*pp1*46e 25;105;107;15;0;0;0;*46e 26;127;106;11;0;3;0;gNO;ACTION IS REQUIRED 27;126;107;6;1;1;0;;SET UP MR1 28;126;107;12;0;1;0;g 29;124;106;35;1;1;0;;S=4 NORMAL 30;106;107;6;1;0;0;;RESET MOD. GROUP 31;102;0;2;1;0;0;;SET UP MR1 32;100;107;0;1;1;0;;RESTORE (A)(B)(C) 33;126;107;14;0;1;0;g 34;126;107;14;0;1;0;g 35;100;0;0;0;0;0;MOD.GROUP SHEET;9 PROCR;107;MASTER ROUTINE SWITCH CONT NOTES;RADIX;B; 0;100;0;0;0;0;0;(A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;106;29;1;0;0;S=4 6;100;106;0;0;0;0;PROG LINK 7;100;0;0;0;0;0;START OF SPECIAL CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;4097;1;0;0;PROG ID NO 10;100;0;0;0;0;0;RUN & RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;LOCN BEFORE 1ST OPTION 14;100;0;0;0;0;0;LINK FOR I/P O/P, LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC TIME/ORIGINAL SWITCH SETTING 16;100;0;0;0;0;0;W/L'S 17;100;0;0;0;0;0; SHEET;10 PROCR;108;PSEUDO-SWITCH NOTES;RADIX;B; 0;100;210;8;0;2;0;SET (MR3)=8*CH;DOUBTFUL BLOCK 1;125;0;0;1;2;0;;ON LOG ASSEMBLER 2;115;100;35;0;0;0; 3;126;272;0;0;0;0;gSET D/B INDICATOR 4;124;103;12;1;0;0;gSLAS 5;100;0;0;0;3;0;06000 6;100;0;0;0;0;0;5/0 7;100;0;5;0;0;0; 8;100;0;0;0;0;0;STORE DUMP:WL FOR(71) 9;124;127;9;1;0;0; 10;124;127;9;1;0;0;SETTING FOR M/R SWITCH NON-INT 11;126;0;24;0;1;0;OVERFLOW 12;100;0;62;0;0;0;STORE DUMP=TAM 13;102;0;52;0;0;0;STORE DUMP:CLEAR TA 14;100;0;0;0;0;0;20/0, MR CONST FOR TYPE 15;100;0;20;0;0;0; 16;100;0;0;0;0;0;MR CONST FOR M/T ALTERNATE ROUTES 17;100;0;160;0;0;0;*011*244*234*224;00000001200008000040 18;100;0;192;0;0;0;*019*244*234*224;00000001440009600048 19;100;271;0;0;0;0;W/L 20;100;0;120;0;0;0; 21;127;127;9;0;3;0; 22;118;0;6;0;3;0;SAS=1 23;106;100;35;0;0;0;SLAS=2 24;124;186;0;1;0;0;L1=1 25;100;0;0;0;0;0; 26;100;0;0;0;0;0; 27;104;0;1028;1;1;0;*pp0*pp3*353 28;107;0;6000;0;3;0;STORE DUMP='XX' 29;102;0;0;0;0;0; *:SP:2:SP:SP 30;105;0;5124;1;1;0;*353 SHEET;11 PROCR;109;PSEUDO-SWITCH CONT NOTES;RADIX;B; 0;100;0;0;0;0;0;D/B W/L 1;100;0;64;0;0;0;64/0 FOR D/B 2;103;0;0;0;0;0; *:SP:3:SP:SP 3;105;0;5124;1;1;0;*353 4;107;0;0;0;0;0;EDG 5;105;0;5445;0;2;0; 6;107;0;65;0;0;0;I/P:1 7;105;0;5910;1;0;0; 8;107;0;65;0;0;0;O/P:1 9;106;0;1814;0;3;0; 10;100;0;0;0;0;0;MR3 SETTING FOR T/W 11;100;0;14;0;0;0;*pp0*pp2*393 12;100;0;6;0;0;0;*1.3 13;100;0;8;0;0;0;*1:3 14;100;0;16;0;0;0;*4.3 15;100;0;18;0;0;0;*pp2*5t3 16;100;0;20;0;0;0;*1.3*1:3*1p4*384*393*5t3*4.3 10 12 17;100;0;0;0;0;0;SDB SETTING 18;100;0;7999;0;1;0;COLLATION CONSTANT 19;100;0;0;0;0;0;STORE DUMP=MR 20;100;0;0;0;0;0;STORE DUMP=MR 21;100;0;0;0;0;0;STORE DUMP=COUNTER 22;100;0;0;0;0;0;STORE DUMP=STORE SIZE SHEET;12 PROCR;110;INITIAL PROGRAMME SWITCH 0;124;265;0;1;0;0;*pp0*pp2*062063;gI/P O/P CONTROL 1;106;0;157;0;0;0;*063 2;119;0;56;0;1;0;*063063 3;106;112;15;0;0;0;*46e 4;106;114;15;0;0;0;*46e46e 5;106;116;15;0;0;0;*46e*46e*46e 6;106;118;15;0;0;0;*46e*46e*46e*46e SHEET;13 PROCR;111;1ST COMMERCIAL PROGRAMME SWITCH NOTES;RADIX;B; 0;100;112;0;1;0;0;;INTERRUPTION,STORE 1;100;210;1;0;3;0;6'S;(A),(B),(C).SET(C) 2;106;0;8;0;0;0;;DECIMAL SET RETURN 3;102;112;14;0;0;0;;PROG. LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;112;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/0 R';SWITCH SP1 8;124;111;18;1;0;0;gCLOSED(S=2) 9;124;127;9;1;0;0;gENGAGED (S=3);TEST ROUTE 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;112;5;0;0;0;;SET S=4 13;102;111;7;0;0;0; 14;106;112;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;112;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3 TEMP CLOSED 19;105;112;15;0;0;0;*46e 20;127;127;9;0;3;0;gNO;ACTION IS REQUIRED 21;126;112;6;1;1;0;;ACTION IS REQUIRED 22;126;112;12;0;1;0;gMASTER ROUTINE 23;124;111;29;1;1;0; 24;106;112;6;1;0;0;;RESET MOD.GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;112;0;1;1;0;;RESTORE (A) (B) (C) 27;126;112;14;0;3;0;*063063;(19/0/1/0/56) 28;126;112;14;0;3;0;gPROGRAMME 29;100;0;0;0;3;0;MOD GROUP SHEET;14 PROCR;112;1ST COMML SWITCH CONT NOTES;RADIX;B; 0;100;0;0;0;0;0;(A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;111;23;1;0;0;S=4 6;100;111;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;0;0;0;0;PROGM ID NO;10827 10;100;0;0;0;0;0;RUN & RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINK;LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC.TIME/ORIG.SW.SETTING 16;100;0;0;0;0;0;TIME SPENT IN 17;100;0;0;0;0;0;PROGRAMME SHEET;15 PROCR;113;2ND COMMERCIAL PROGRAMME SWITCH NOTES;RADIX;B; 0;100;114;0;1;0;0;*1.2;INTERRUPTION,STORE 1;100;210;1;0;3;0;;(A),(B),(C) SET(C) 2;106;0;8;0;0;0;;DECIMAL SET RETURN 3;102;114;14;0;0;0;;PROG LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;114;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/0 R';SWITCH SP2 8;124;113;18;1;0;0;gCLOSED (S=3);TEST ROUTE 9;124;127;9;1;0;0;gENGAGED (S=2) 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;114;5;0;0;0;;SET S=4 13;102;113;7;0;0;0; 14;106;114;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;114;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3.TEMP.CLOSED 19;105;114;15;0;0;0;*46e46e 20;127;127;9;0;3;0;gNO;ACTION IS REQUIRED 21;126;114;6;1;1;0; 22;126;114;12;0;1;0;gM.R.;SET UP MR1 23;124;113;29;1;1;0; 24;106;114;6;1;0;0;;RESET MOD.GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;114;0;1;1;0;;RESTORE (A) (B) (C) 27;126;114;14;0;3;0;*063063;(19/0/1/0/56) 28;126;114;14;0;3;0;gPROGRAMME 29;100;0;0;0;0;0;MOD.GROUP SHEET;16 PROCR;114;2ND COMML SWITCH CONT NOTES;RADIX;B; 0;100;0;0;0;0;0;*1.2 (A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;113;23;1;0;0;S=4 6;100;113;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO.FOR D/D 9;100;0;0;0;0;0;PROG.ID.NO. 10;100;0;0;0;0;0;RUN & RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINKLINK FOR SI=4 15;100;0;0;0;0;0;ASSOC. TIME/ORIG.SWITCH.SETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; SHEET;17 PROCR;115;3RD COMMERCIAL PROGRAMME SWITCH NOTES;RADIX;B; 0;100;116;0;1;0;0;*1.2*1:2;INTERRUPTION, STORE 1;100;210;1;0;3;0;6'S;(A),(B),(C), SET (C) 2;106;0;8;0;0;0;;DECIMAL. SET RETURN 3;102;116;14;0;0;0;;PROG. LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;116;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/0 R';SWITCH SP3 8;124;115;18;1;0;0;gCLOSED(S=3) 9;124;127;9;1;0;0;gENGAGED(S=2);TEST ROUTE 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;116;5;0;0;0;;SET S=4 13;102;115;7;0;0;0; 14;106;116;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;116;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3, TEMP, CLOSED 19;105;116;15;0;0;0;*46e46e46e 20;127;127;9;0;3;0;gNO;IS REQUIRED 21;126;116;6;1;1;0;;S=5 22;126;116;12;0;1;0;gM.R. 23;124;115;29;1;1;0;;NORMAL 24;106;116;6;1;0;0;;RESET MOD.GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;116;0;1;1;0;;RE&STORE (A)(B)(C) 27;126;116;14;0;3;0;*063063;(19/0/1/0/56) 28;126;116;14;0;3;0;gPROGRAMME 29;100;0;0;0;0;0;MOD.GROUP SHEET;18 PROCR;116;3RD COMML SWITCH CONT NOTES;RADIX;B; 0;100;0;0;0;0;0;*1.2*1:2 A 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;115;23;1;0;0;S=4 6;100;115;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO. FOR D/D 9;100;0;0;0;0;0;PROG.ID.NO 10;100;0;0;0;0;0;RUN & RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINK,LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC. TIME/ORIG.SWITCH.SETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; SHEET;19 PROCR;117;4TH COMMERCIAL PROGRAMME SWITCH NOTES;RADIX;B; 0;100;118;0;1;0;0;*1.2*1:2*1p2;INTERRUPTION.STORE 1;100;210;1;0;3;0;6'S;(A),(B),(C) SET (C) 2;106;0;8;0;0;0;;DECIMAL SET RETURN 3;102;118;14;0;0;0;;PROG LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;118;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/0 R';SWITCH SP4 8;124;117;18;1;0;0;gCLOSED (S=3);TEST ROUTE 9;124;127;9;1;0;0;gENGAGED (S=2) 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;118;5;0;0;0;;SET (S=4) 13;102;117;7;0;0;0; 14;106;118;6;1;0;0;;SET UP MR 1 15;102;0;2;1;0;0; 16;106;118;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3.TEMP.CLOSED 19;105;118;15;0;0;0;*46e46e46e46e 20;127;127;9;0;3;0;gNO;IS REQUIRED 21;126;118;6;1;1;0;;S=5 22;126;118;12;0;1;0;gMR 23;124;117;29;1;1;0;;NORMAL 24;106;118;6;1;0;0;;RESET MOD GROUP 25;102;0;2;1;0;0;;SET UP MR 1 26;100;118;0;1;1;0;;RESTORE (A),(B),(C) 27;126;118;14;0;3;0;*063063;(19/0/1/0/56) 28;126;118;14;0;3;0;gPROGRAMME 29;100;0;0;0;0;0;MOD GROUP SHEET;20 PROCR;118;4TH COMML SWITCH CONT NOTES;RADIX;B; 0;100;0;0;0;0;0;*1.2*1:2*1p2 (A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;117;23;1;0;0;S=4 6;100;117;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;0;0;0;0;PROG 1D NO 10;100;0;0;0;0;0;RUN & RERUN 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINK. LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC TIME/ORIG SWITCH SETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; 18;106;0;157;0;0;0;*pp0*pp2*063 19;119;0;56;0;1;0;*063063 20;106;120;15;0;0;0;*46e 21;106;122;15;0;0;0;*46e46e 22;106;124;15;0;0;0;*46e46e46e 23;106;126;15;0;0;0;*46e46e46e46e 24;124;265;0;1;0;0;*062063;gI/P O/P CONTROL SHEET;21 PROCR;119;5TH COMMERCIAL PROGRAMME SWITCH 0;100;120;0;1;0;0;*1.2*1:2*1p2*382;INTERRUPTION STORE 1;100;210;1;0;3;0;;(A),(B),(C)SET(C) 2;106;0;8;0;0;0;;DECIMAL SET RETURN 3;102;120;14;0;0;0;;PROG LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;120;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/0 R';SWITCH SP5 8;124;119;18;1;0;0;gCLOSED(S=3);TEST ROUTE 9;124;127;9;1;0;0;gENGAGED(S=2) 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;120;5;0;0;0;;SET(S=4) 13;102;119;7;0;0;0; 14;106;120;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;120;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3,TEMP,CLOSED 19;105;120;15;0;0;0;*46e 20;127;127;9;0;3;0;gNO;IS REQUIRED 21;126;120;6;1;1;0;;S=5 22;126;120;12;0;1;0;gM.R. 23;124;119;29;1;1;0;;NORMAL 24;106;120;6;1;0;0;;RESET MOD GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;120;0;1;1;0;;RESTORE (A),(B),(C) 27;126;120;14;0;3;0;*063063;(19/0/1/0/56) 28;126;120;14;0;3;0;gPROGRAMME 29;100;0;0;0;0;0;MOD.GROUP SHEET;22 PROCR;120;5TH COMML SWITCH CONT 0;100;0;0;0;0;0;*1.2*1:2*1p2*382;(A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;119;23;1;0;0;S=4 6;100;119;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;0;0;0;0;PROG ID NO 10;100;0;0;0;0;0;RUN & RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINK,LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC TIME/ORIG.SW.SETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; SHEET;23 PROCR;121;6TH COMMERCIAL PROGRAMME SWITCH 0;100;122;0;1;0;0;*1.2*1:2*1p2*382*392;INTERRUPTION STORE 1;100;210;1;0;3;0;6'6;(A),(B),(C) SET(C) 2;106;0;8;0;0;0;;DECIMAL SET RETURN 3;102;122;14;0;0;0;;PROG LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;122;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/0 R';SWITCH SP6 8;124;121;18;1;0;0;gCLOSED(S=3);TEST ROUTE 9;124;127;9;1;0;0;gENGAGED(S=2) 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;122;5;0;0;0;;SET S=4 13;102;121;7;0;0;0; 14;106;122;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;122;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3,TEMP,CLOSED 19;105;122;15;0;0;0;*46e46e 20;127;127;9;0;3;0;gNO;IS REQUIRED 21;126;122;6;1;1;0;;S=5 22;126;122;12;0;1;0;gM.R. 23;124;121;29;1;1;0;;NORMAL 24;106;122;6;1;0;0;;RESET MOD GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;122;0;1;1;0;;RESTORE (A),(B),(C) 27;126;122;14;0;3;0;*063063;(19/0/1/0/56) 28;126;122;14;0;3;0;gPROGRAMME 29;100;0;0;0;0;0;MOD GROUP SHEET;24 PROCR;122;6TH COMML SWITCH CONT 0;100;0;0;0;0;0;*1.2*1:2*1p2*382*392; (A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;121;23;1;0;0;S=4 6;100;121;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;0;0;0;0;PROG ID NO 10;100;0;0;0;0;0;RUN & RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINK,LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC TIME/ORIG SWITCH SETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; SHEET;25 PROCR;123;7TH COMMERCIAL PROGRAMME SWITCH 0;100;124;0;1;0;0;*1.2*1:2*1p2*382*392*4.2 INTERRUPTION ST 1;100;210;1;0;3;0;6'5;(A),(B),(C)SET(C) 2;106;0;8;0;0;0;;DECIMAL SET RETURN 3;102;124;14;0;0;0;;PROG LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;124;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/OR';SWITCH SP5 8;124;123;18;1;0;0;gCLOSED(S=3);TEST ROUTE 9;124;127;9;1;0;0;gENGAGED(S=2) 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;124;5;0;0;0;;SET(S=4) 13;102;123;7;0;0;0; 14;106;124;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;124;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3,TEMP,CLOSED 19;105;124;15;0;0;0;*46e46e46e 20;127;127;9;0;3;0;gNO;IS REQUIRED 21;126;124;6;1;1;0;;S=5 22;126;124;12;0;1;0;gM.R. 23;124;123;29;1;1;0;;NORMAL 24;106;124;6;1;0;0;;RESET MOD GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;124;0;1;1;0;;RESTORE(A),(B),(C) 27;126;124;14;0;3;0;*063063;(19/0/1/0/56) 28;126;124;14;0;3;0;gPROGRAM 29;100;0;0;0;0;0;MOD GROUP SHEET;26 PROCR;124;7TH COMML SWITCH CONT 0;100;0;0;0;0;0;*1.2*1:2*1p2*382*392*4.2 A 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;123;23;1;0;0;S=4 6;100;123;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;0;0;0;0;PROG ID NO 10;100;0;0;0;0;0;RUN&RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P O/P CONTROL LINK,LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC TIME/ORIG OWITSETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; SHEET;27 PROCR;125;8TH COMMERCIAL PROGRAMME SWITCH 0;100;126;0;1;0;0;*1.2*1:2*1p2*382*392*4.2*5t2 INTERRUPTIO 1;100;210;1;0;3;0;6'5;(A),(B),(C)SET(C) 2;106;0;8;0;0;0;DECIMAL SET RETURN 3;102;126;14;0;0;0;;PROGRAM LINK 4;124;103;5;1;0;0;*063;(6/0/0/0/157) 5;107;126;16;1;0;0; 6;124;103;5;1;0;0;gHEAD OF QUEUE 7;124;127;9;1;0;0;OR'26/1/OR';SWITCH SP5 8;124;125;18;1;0;0;gCLOSED(S=3);TEST ROUTE 9;124;127;9;1;0;0;gENGAGED(S=2) 10;126;271;0;0;0;0;gD/B 11;126;300;0;0;0;0;gW/E 12;106;126;5;0;0;0;;SET(S=4) 13;102;125;7;0;0;0; 14;106;126;6;1;0;0;;SET UP MR1 15;102;0;2;1;0;0; 16;106;126;0;1;0;0; 17;124;265;1;1;0;0;*062063;gI/P O/P CONTROL 18;106;0;156;0;0;0;;S=3,TEMP CLOSED 19;105;126;15;0;0;0;*46e46e46e46e 20;127;127;9;0;3;0;gNO;IS REQUIRED 21;126;126;6;1;1;0;;S=5 22;126;126;12;0;1;0;gM.R. 23;124;125;29;1;1;0;;NORMAL 24;106;126;6;1;0;0;;RESET MOD GROUP 25;102;0;2;1;0;0;;SET UP MR1 26;100;126;0;1;1;0;;RESTORE(A),(B),(C) 27;126;126;14;0;3;0;*063063;(19/0/1/0/157) 28;126;126;14;0;3;0;gPROGRAM 29;100;0;0;0;0;0;MOD GROUP SHEET;28 PROCR;126;8TH COMML SWITCH CONT 0;100;0;0;0;0;0;*1.2*1:2*1p2*382*392*4.2*5t2 (A) 1;100;0;0;0;0;0; 2;100;0;0;0;0;0;(B) 3;100;0;0;0;0;0; 4;100;0;0;0;0;0;(C) 5;124;125;23;1;0;0;S=4 6;100;125;0;0;0;0;PROGRAMME LINK 7;100;0;0;0;0;0;START OF LAST CHAPTER 8;100;0;0;0;0;0;ALARM NO FOR D/D 9;100;0;0;0;0;0;PROG ID NO 10;100;0;0;0;0;0;RUN&RERUN NO 11;100;0;0;0;0;0;BIT PATTERN FOR OPTIONS 12;100;270;0;0;0;0;*464;00004 13;100;0;0;0;0;0;ADDRESS BEFORE FIRST OPTION 14;100;0;0;0;0;0;I/P,O/P CONTROL LINK,LINK FOR SI=4 15;100;0;0;0;0;0;ASSOC TIME/ORIG SWITCH SETTING 16;100;0;0;0;0;0;TIME SPENT IN PROG 17;100;0;0;0;0;0; SHEET;29 PROCR;127;COUNT INEFFECTIVE TIME NOTES;RADIX;B; 0;100;0;0;0;0;0;*2pt 1;100;0;0;0;0;0; 2;100;0;0;0;0;0; 3;100;0;1;0;0;0;*2pt 4;127;127;18;0;3;0;*pp0*pp2*3t32+3*3t32:3 5;127;127;19;0;3;0;*4e3 6;102;182;0;0;0;0;*293 7;124;166;0;0;2;0;*293743 8;127;127;20;0;3;0;*pp2*4+3 9;101;103;5;1;3;0; 10;102;0;2;0;0;0;;SET UP MR1 11;105;221;41;0;0;0;*16t TEST DELAY IN PROGRESS 12;127;379;56;0;3;0;*16t;gYES 13;125;0;4096;1;0;0;*2pt;SET I13 14;106;104;10;1;0;0;HAVE I BEEN 15;104;127;2;1;0;0;HERE LONG ENOUGH? 16;102;127;0;1;0;0; 17;101;0;178;1;3;0;*3t9*2+1*2:1 18;101;0;218;1;3;0;*3t9*2e1*2t1 19;101;0;24;1;3;0;*4e9 20;101;0;60;1;3;0;*4+9 21;107;104;10;1;0;0; 22;106;104;10;1;0;0; 23;105;127;0;1;0;0; 24;127;127;17;0;3;0;*2pt*4e3*4+3*3t32:3*3t32+3 25;125;0;4096;1;1;0; 26;124;103;5;1;0;0;*319 27;106;127;33;0;0;0;*312*31t2pt 28;124;127;31;1;0;0;*31t2pt 29;100;212;0;0;3;0;SET BINARY 30;101;0;1;1;3;0;AUGMENT COUNTER 31;107;0;156;0;0;0; 32;124;103;6;1;0;0;*312 33;100;0;102;0;0;0;*311 SHEET;30 CONST;128;0;DUMMY SHEET;31 PROCR;129;MOD GROUP BLISTERS+W/LS. 0;128;0;26;1;1;0;*59t RESTORE 1;100;112;0;1;1;0;MOD GROUP 3 2;126;112;14;0;3;0;gPROGRAM 3;128;129;6;1;1;0;LOC 3 OF SWITCH 4;100;129;6;0;0;0;TABLE ENTRY 5;100;0;6;0;0;0; 6;100;0;0;0;0;0;MR 1 7;100;0;0;0;0;0; 8;100;0;0;0;0;0;MR 2 9;100;0;0;0;0;0; 10;100;0;0;0;0;0;MR 3 11;100;0;0;0;0;0; 12;128;0;26;1;1;0;*1.2 RESTORE 13;100;114;0;1;1;0;MOD GROUP 3 14;126;114;14;0;3;0;gPROGRAM 15;128;129;18;1;1;0;LOC 3 OF SWITCH 16;100;129;18;0;0;0;TABLE ENTRY 17;100;0;6;0;0;0; 18;100;0;0;0;0;0;MR1 19;100;0;0;0;0;0; 20;100;0;0;0;0;0;MR2 21;100;0;0;0;0;0; 22;100;0;0;0;0;0;MR3 23;100;0;0;0;0;0; 24;128;0;26;1;1;0;*1:2 RESTORE 25;100;116;0;1;1;0;MOD GROUP 3 26;126;116;14;0;3;0;gPROGRAM 27;128;129;30;1;1;0;LOC 3 OF SWITCH 28;100;129;30;0;0;0;TABLE ENTRY 29;100;0;6;0;0;0; 30;100;0;0;0;0;0;MR 1 31;100;0;0;0;0;0; 32;100;0;0;0;0;0;MR 2 33;100;0;0;0;0;0; 34;100;0;0;0;0;0;MR 3 35;100;0;0;0;0;0; 36;128;0;26;1;1;0;*1p2 RESTORE 37;100;118;0;1;1;0;MOD GROUP 3 38;126;118;14;0;3;0;gPROGRAM 39;128;129;42;1;1;0;LOC 3 OF SWITCH 40;100;129;42;0;0;0;TABLE ENTRY 41;100;0;6;0;0;0; 42;100;0;0;0;0;0;MR1 43;100;0;0;0;0;0; 44;100;0;0;0;0;0;MR2 45;100;0;0;0;0;0; 46;100;0;0;0;0;0;MR3 47;100;0;0;0;0;0; 48;128;0;26;1;1;0;*382 RESTORE 49;100;120;0;1;1;0;MOD GROUP 3 50;126;120;14;0;3;0;gPROGRAM 51;128;129;54;1;1;0;LOC 3 OF SWITCH 52;100;129;54;0;0;0;TABLE ENTRY 53;100;0;6;0;0;0; 54;100;0;0;0;0;0;MR1 55;100;0;0;0;0;0; 56;100;0;0;0;0;0;MR2 57;100;0;0;0;0;0; 58;100;0;0;0;0;0;MR3 59;100;0;0;0;0;0; 60;128;0;26;1;1;0;*392 RESTORE 61;100;122;0;1;1;0;MOD GROUP 3 62;126;122;14;0;3;0;gPROGRAM 63;128;129;66;1;1;0;LOC 3 OF SWITCH 64;100;129;66;0;0;0;TABLE ENTRY 65;100;0;6;0;0;0; 66;100;0;0;0;0;0;MR1 67;100;0;0;0;0;0; 68;100;0;0;0;0;0;MR2 69;100;0;0;0;0;0; 70;100;0;0;0;0;0;MR3 71;100;0;0;0;0;0; 72;128;0;26;1;1;0;*4.2 RESTORE 73;100;124;0;1;1;0;MOD GROUP 3 74;126;124;14;0;3;0;gPROGRAM 75;128;129;78;1;1;0;LOC 3 OF SWITCH 76;100;129;78;0;0;0;TABLE ENTRY 77;100;0;6;0;0;0; 78;100;0;0;0;0;0;MR 1 79;100;0;0;0;0;0; 80;100;0;0;0;0;0;MR 2 81;100;0;0;0;0;0; 82;100;0;0;0;0;0;MR 3 83;100;0;0;0;0;0; 84;128;0;26;1;1;0;*5t2 RESTORE 85;100;126;0;1;1;0;MOD GROUP 3 86;126;126;14;0;3;0;gPROGRAM 87;128;129;90;1;1;0;LOC 3 OF SWITCH 88;100;129;90;0;0;0;TABLE ENTRY 89;100;0;6;0;0;0; 90;100;0;0;0;0;0;MR 1 91;100;0;0;0;0;0; 92;100;0;0;0;0;0;MR 2 93;100;0;0;0;0;0; 94;100;0;0;0;0;0;MR 3 95;100;0;0;0;0;0; SHEET;32 CONST;130;1;MASTER ROUTINE SPECIAL CHAPTER 0;(D)0;W/L'S FOR OPEN 2;0;OUTPUT FILE 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;(D)0;W/L'S FOR COMMENT 24;0; 26;0; 28;0; 30;0; 32;0; 34;0; 36;0; 38;0; 40;0; 42;0; 44;0; 46;0; 48;0; SHEET;33 PROCR;131;DUMMY HEADINGS FOR DESCRIPTION OF USES OF WL'S IN SPECIAL CHAPS NOTES;;;ALSO IS THE REMAINDER OF THE MASTER'S SPECIAL CHAP SHEET;34 PROCR;132;(1)IND MT O/P D/B (2)IND PRINTER W/E NOTES;156;;156 (3)S/R LINK PT O/P BLOCK S/R (4)IND OPEN M/T I/P REEL 0;100;0;0;0;0;0; SHEET;35 PROCR;133;(1)W/E IND PT O/P (2)RTE TYPE DURING PRINTER W/E NOTES;157;;157 (3)RTE TYPE DURING SNT COMMENT 0;100;0;0;0;0;0; SHEET;36 PROCR;134;(1)SR LINK DEALING WITH OPT 8-PT/CARD INPUT=RETURN ADDRESS NOTES;158;;IND IN OPEN MT I/P REEL 0;100;0;0;0;0;0; SHEET;37 PROCR;135;CH CH RT FOR MULTI-CHANNEL LOADING NOTES;159;; 0;100;0;0;0;0;0; SHEET;38 PROCR;136;MAIN'DB HAS OCCURRED'IND-SET JUST BEFORE THE DB IS TO BE DEALT WI NOTES;160;;EXTRACTED FROM LIST OF DB BY CHANNEL/ROUTE 0;100;0;0;0;0;0; SHEET;39 PROCR;137;COPY OF SR LINK'STEP BACK(A)BLOCKS,FWD 1 BLOCK' NOTES;161;; 0;100;0;0;0;0;0; SHEET;40 PROCR;138;RETURN LINK SET UP BEFORE ENTERING MISALIGNMENT FAILURE S/R NOTES;162;;162 0;100;0;0;0;0;0; SHEET;41 PROCR;139;COPY OF ASL DURING OPEN MT OUTPUT REEL NOTES;163;;163 0;100;0;0;0;0;0; SHEET;42 PROCR;140;IND THAT'CHANGE DECK'IN PROGRESS NOTES;164;;USED ONLY DURING REOPENING MT FILE 0;100;0;0;0;0;0; SHEET;43 PROCR;141;COPY OF SR LINK'RUN FWD,STEP FWD.READ'SR NOTES;165;;RE-OPENING MT FILE 0;100;0;0;0;0;0; SHEET;44 PROCR;142;COPY OF LINK INK IN'READ AND TEST BLOCK'SR NOTES;166;; 0;100;0;0;0;0;0; SHEET;45 PROCR;143;CTR FOR'NUMBER OF ATTEMPTS'WHEN RE-READING/WRITING MT DB NOTES;167;; 0;100;0;0;0;0;0; SHEET;46 PROCR;144;COPY OF SR LINKS IN'OPEN MT IN','OPEN MT OUT' NOTES;168;;AND'READ,TEST SENTINEL'FOR PT/CARD INPUT 0;100;0;0;0;0;0; SHEET;47 PROCR;145;(1)S/R LINK REQUEST T/W FOR OPTIONS AND REQUEST MR FOR OVERLAY OR NOTES;169;;169 (2)START OF COMMENT(3)BLOCK CTR FOR CHANGE REEL IN STEP 0;100;0;0;0;0;0; SHEET;48 PROCR;146;OPTION 13-'CHANGE MT DECK':BLOCK SERIAL TO BE ALIGNED ON AFTERWAR NOTES;170;; 0;100;0;0;0;0;0; SHEET;49 PROCR;147;COPY OF 162 SET UP BEFORE*2 NOTES;171;; 0;100;0;0;0;0;0; SHEET;50 PROCR;148;COPY OF 183 DURING OPTION 13 NOTES;172;; 0;100;0;0;0;0;0; SHEET;51 PROCR;149;S/R LINK FOR ALIGNMENT FAILURE-BLOCK 6 TEST NOTES;173;;173 ALIGNMENT FAILURE-REREAD AND SER COMMENT 0;100;0;0;0;0;0; SHEET;52 PROCR;150;INTERCODE ROUTE TYPE WHEN DEALING WITH DB ON MT NOTES;174;;WHEN TYPE IN SWITCH IS ALTERED TO BECOME SR LINK 0;100;0;0;0;0;0; SHEET;53 PROCR;151;IND WITHIN'MT ALIGNMENT FAILURE'GIVING USE OF ROUTE NOTES;175;;0=INPUT,2=OUTPUT AT PRESENT MOMENT 0;100;0;0;0;0;0; SHEET;54 PROCR;152;WL FOR'SWITCH 101'ORDERS IN TYPING COMMENTS NOTES;176;;26/0/0 ORDERS OR'CLEAR A'ORDER 0;100;0;0;0;0;0; SHEET;55 PROCR;153;COUNTER N USED IN VARIOUS STEP BACK NOTES;177;;177 AND STEP FORWARD ROUTINES 0;100;0;0;0;0;0; SHEET;56 PROCR;154;178,179=FIRST WORD OF MT BLOCK FOR REWRITING NOTES;178;;IN DB ON MT OUTPUT 0;100;0;0;0;0;0; SHEET;57 PROCR;155;SEE 178 NOTES;179;; 0;100;0;0;0;0;0; SHEET;58 PROCR;156;(1)IND PP DURING RUN FORWARD AND BACK 0=FORWARD 15=BACKWARDS NOTES;180;;180 (2) CTR M=NO BLOCKS TO BE STEPPED BACK IN STEP BACK ROUT 0;100;0;0;0;0;0; SHEET;59 PROCR;157;(1)CTR QQ=NO TIMES DIRECTION CHANGED DURING RUN FORWARD AND BACK NOTES;181;;181 (2) IND N FOR STEP FORWARD OR BACK ZERO=O/P NON ZERO=1/P 0;100;0;0;0;0;0; SHEET;60 PROCR;158;WORD 6 OF MT BLOCK IN OPEN FILE=PRESUMED SPOOL NUMBER NOTES;182;;FROM BLOCK AFTER'RUN FWD+STEP FWD+READ' 0;100;0;0;0;0;0; SHEET;61 PROCR;159;COPY OF LINK IN'ALIGNMENT FAILURE'SR-MT NOTES;183;;COPY OF LINK IN P/T O/P SR 0;100;0;0;0;0;0; SHEET;62 PROCR;160;DEC MT BLOCK NO FOUND,FOR'SER'COMMENT IN MT ALIGNMENT FAILURE NOTES;184;; 0;100;0;0;0;0;0; SHEET;63 PROCR;161;BINARY CTR OF ATTEMPTS AT REREADING NOTES;185;;BECAUSE OF MT SERIAL FAILURE 0;100;0;0;0;0;0; SHEET;64 PROCR;162;NUMBER OF BLOCKS STEPPED BACK IN AN ATTEMPT TO REALIGN NOTES;186;;186 DURING ALIGNMENT FAILURE S/R 0;100;0;0;0;0;0; SHEET;65 PROCR;163;INDICATOR SET BEFORE*2 NOTES;187;;187 USED IN OPTION 13 0;100;0;0;0;0;0; SHEET;66 PROCR;164;NON-ZERO IF PT O/P IS IN NON-STD MODE NOTES;188;;ONLY 1 SUCH FILE PERMITTED PER PROGRAM 0;100;0;0;0;0;0; SHEET;67 PROCR;165;OPEN FILE INDICATOR IN OPTION 13 NOTES;189;;189 0;100;0;0;0;0;0; SHEET;68 PROCR;166;190,191,ANNEX FOR P/T O/P(P/T O/P ASSEMBLER) NOTES;;;190 USED IN INTERRUPTIBLE COUNT 500 MS 0;100;0;0;0;0;0; SHEET;69 PROCR;167;SEE 190 NOTES;191;;191 0;100;0;0;0;0;0; SHEET;70 PROCR;168;P/T O/P W/L WORD MODIFIER NOTES;192;;192 0;100;0;0;0;0;0; SHEET;71 PROCR;169;P/T O/P W/L CHARACTER MODIFIER(GP ASSEMBLER) NOTES;193;;193 0;100;0;0;0;0;0; SHEET;72 PROCR;170;P/T O/P W/L CONTENTS OF 64+R NOTES;194;;194 0;100;0;0;0;0;0; SHEET;73 PROCR;171;P/T O/P W/L FILE IDENTITY NOTES;195;;195 0;100;0;0;0;0;0; SHEET;74 PROCR;172;P/T O/P W/L REEL COUNTER NOTES;196;;196 0;100;0;0;0;0;0; SHEET;75 PROCR;173;S/R LINK WRITE FINIS BLOCK,WRITE END OF TAPE INFORMATION NOTES;197;; 0;100;0;0;0;0;0; SHEET;76 CONST;174;0;WORKING LOCATIONS-OMIT SPACES 0;(B)0;*5:t OUT MODIFIER 1;4128;OUT MODIFIER 2;0;SPARE 3;8;PACK IN MODIFIER 4;4118;INDICATOR SPACES 5;0;INDICATOR L/E'S SHEET;77 PROCR;175;LOG REQUEST QUEUE 0;100;0;0;0;0;0;OPTION REQ 1;100;0;0;0;0;0;OPTION OUTSTANDING INDICATOR 2;100;0;0;0;0;0;MASTER REQ 3;100;106;0;0;0;0; 4;100;0;0;0;0;0;PROG 1 REQ 5;100;111;0;0;0;0; 6;100;0;0;0;0;0;*1.2;PROG 2 REQ 7;100;113;0;0;0;0; 8;100;0;0;0;0;0;*1:2;PROG 3 REQ 9;100;115;0;0;0;0; 10;100;0;0;0;0;0;*1p2;PROG 4 REQ 11;100;117;0;0;0;0; 12;100;0;0;0;0;0;*382;PROG 5 REQ 13;100;119;0;0;0;0; 14;100;0;0;0;0;0;*392;PROG 6 REQ 15;100;121;0;0;0;0; 16;100;0;0;0;0;0;*4.2;PROG 7 REQ 17;100;123;0;0;0;0; 18;100;0;0;0;0;0;*5t2;PROG 8 REQ 19;100;125;0;0;0;0; SHEET;78 PROCR;176;REQUEST TYPEWRITER FOR OPTIONS NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;106;176;0;0;0;0;STORE LINK 2;124;0;3;0;1;0; 3;102;0;169;0;0;0; 4;106;175;1;0;0;0;;TEST OPTION 5;127;176;17;0;1;0;gYES;OUTSTANDING 6;126;359;0;0;0;0;gRESTORE SI=3 7;106;210;1;0;0;0; 8;102;175;1;0;0;0;SET OPTION OUTSTANDING INDICATOR 9;126;177;0;0;0;0;gREQUEST T/W 10;124;104;4;1;3;0;SET UP (P) 11;125;0;8191;1;1;0;CLEAR I1-I13 12;125;0;128;1;0;0;SET I8 13;106;210;1;0;0;0; 14;102;103;0;0;0;0;SET LL1 15;124;0;3;0;1;0; 16;126;0;169;0;1;0;gLEAVE S/R 17;124;176;4;0;2;0; 18;102;0;42;0;1;0; 19;126;360;0;0;0;0;gSET SI=5 20;124;0;2;0;1;0; 21;124;0;9;1;0;0;gSI+9 SHEET;79 PROCR;177;REQUEST TYPEWRITER NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;126;179;0;0;0;0;gSEARCH LOG QUEUE S/R 2;106;177;0;0;0;0;SET REQUEST WITH LINK 3;102;175;2;0;3;0; 4;106;0;9;0;1;0;SET SPI=2 5;102;0;7;0;1;0; 6;106;104;3;0;0;0;SET L6=1 7;102;103;25;0;0;0; 8;124;103;5;1;0;0;gHEAD OF QUEUE SHEET;80 PROCR;178;RESET REQUEST 0;106;175;0;0;3;0;STORE RETURN LINK 1;102;103;17;0;0;0; 2;102;175;0;0;3;0;RESET REQUEST 3;106;0;6;0;0;0;;TEST ANSWER 4;127;180;0;0;0;0;gYES;TO OPTION 5;125;0;0;1;2;0; 6;124;0;6;0;1;0; 7;124;175;1;0;1;0; 8;126;0;36;1;1;0;SET UP MR1 9;126;103;17;0;1;0;gRETURN SHEET;81 PROCR;179;SEARCH LOG REQUEST QUEUE 0;100;0;0;0;0;0;LINK 1;101;0;0;1;3;0;CLEAR MODIFIER 2;102;106;7;0;0;0; 3;126;106;7;1;3;0;MR3 START/END LOG QUEUE 4;106;0;2;0;0;0;TEST NEXT ENTRY IN 5;105;175;3;0;3;0;LOG QUEUE FOR THIS PROGRAM 6;127;179;10;0;0;0;gYES 7;125;0;2;0;3;0;TEST END OF QUEUE 8;124;179;4;1;0;0;gNO NEXT ENTRY 9;124;208;17;1;0;0; 10;126;179;0;0;1;0;gLEAVE S/R SHEET;82 PROCR;180;TYPEWRITER ANSWER TO OPTIONS NOTES;RADIX;B;PREPARE TO OUTPUT 0;126;234;0;0;0;0;gS/R H 1;101;197;0;1;3;0;SELECT TABLE-START LOCN. 2;128;102;4;1;2;0;SET UP COMMENT IN T/W ANNEXE SHEET;83 PROCR;181;TYPEWRITER PREPARE TO OUTPUT NOTES;RADIX;B; 0;106;108;24;0;0;0;SET L1=1 1;102;103;8;0;0;0; 2;106;103;18;0;0;0;SET L5=1 3;102;182;22;0;0;0;*293 4;101;102;2;1;3;0; 5;103;104;6;0;0;0;SET UP '(64+R)' 6;102;104;7;0;0;0; 7;101;0;4118;1;3;0;*5:t*292 SET UP 8;103;174;0;0;0;0;MODIFIERS FOR PICK UP 9;102;174;4;1;0;0;INDICATOR 10;101;0;8;1;3;0; 11;102;174;3;0;0;0;MODIFIER FOR PACK IN 12;101;0;3;1;3;0;TEST OMIT CATEGORY SET 13;126;332;0;0;0;0; 14;127;181;17;0;0;0;gDON'T OMIT 15;106;182;61;0;0;0;SET UP SWITCH 16;124;181;18;1;0;0; 17;106;182;60;0;0;0; 18;102;182;24;0;0;0; 19;102;0;154;1;0;0;*5:t*292 20;106;212;12;1;0;0;*262 SET IND MOD REG 10/0 21;102;198;6;1;0;0; 22;101;0;3;1;3;0;*5:t OMIT CATEGORY 23;126;332;0;0;0;0;TEST SET 24;127;181;27;0;0;0;gDON'T OMIT 25;106;182;12;0;0;0;SET UP SWITCH 26;124;181;28;1;0;0; 27;106;181;40;0;0;0; 28;102;182;3;0;0;0;*5:t 29;100;198;0;1;2;0;BITS 1-6 IN EACH OCTET 30;124;104;7;0;1;0;COLLATE WORD TO BE OUTPUT 31;115;0;0;1;0;0; 32;102;198;8;1;0;0;*262 STORE 33;124;0;154;0;2;0;*293743 SET UP ASL 34;124;100;35;0;1;0; 35;102;0;64;0;0;0; 36;106;209;2;0;0;0; 37;105;100;35;0;0;0;SET SL=1 38;102;103;7;0;0;0; 39;124;103;7;1;0;0;gTEST ROUTE 40;124;182;12;1;0;0;*262*5:9 41;124;182;76;1;0;0;*pp0*pp2*293 42;102;182;0;0;0;0;*293293 43;124;182;0;1;0;0;*292293 44;106;182;0;0;0;0;*291293 45;103;166;0;1;0;0;*743 46;106;166;0;1;0;0;*743743 47;102;166;0;1;0;0;*743743743*293743 SHEET;84 PROCR;182;TYPEWRITER MAIN OUTPUT LOOP NOTES;RADIX;B; 0;106;198;8;1;0;0;*262 SELECT COLLATED WORD SWITCH L5 1;124;198;6;0;1;0; 2;118;0;4120;0;0;0;CHARACTER TO BE OUTPUT IN 3;118;0;8;0;0;0;*5:t ***** ALIGN TO Q1 4;118;0;4120;0;0;0;ALIGN TO Q1 5;103;0;154;1;0;0;*743 STORE WORD 6;127;182;86;0;0;0;gSPACE 7;101;0;61;1;2;0;IS A N/E 8;127;182;86;0;0;0;gYES 9;101;0;1;1;3;0; 10;102;182;85;0;0;0;SET INDICATOR 11;106;0;154;1;0;0;*5:t*743743 12;118;0;8;0;0;0;833-38 13;102;0;154;1;0;0;*743743743 14;124;100;35;0;1;0;OUTPUT 15;119;0;0;0;0;0; 16;102;182;93;0;0;0;*5:9 17;123;0;2;0;0;0;STEP AND TEST INDIRECT MOD REGISTER 18;100;198;6;0;0;0; 19;124;184;2;1;0;0;gUPDATE ASSEMBLER TABLE 20;101;0;15;0;1;0;;TEST END OF BLOCK 21;115;198;8;1;0;0;*262 COLLATE WORD JUST OUTPUT 22;124;104;7;0;1;0;*292 23;106;0;0;1;0;0;TO BE OUTPUT 24;124;174;0;0;1;0;*5:t ***** 25;118;0;0;1;0;0;ALIGN CHARACACTER 26;118;0;2;1;3;0;TO BITS 1-6 OF 27;101;0;0;1;3;0;REGISTER A 28;118;0;6;1;3;0; 29;127;183;0;0;0;0;gZERO 30;101;0;30;1;2;0; 31;127;183;7;0;0;0;gL/E 32;101;0;31;1;2;0; 33;127;183;0;0;0;0;gN/E 34;101;0;1;1;2;0; 35;127;183;5;0;0;0;gB/E 36;101;0;62;1;1;0; 37;103;174;4;1;0;0;SET INDICATOR 38;101;0;3;0;1;0;SET B 39;124;174;3;0;1;0;ALIGN CHARACTER 40;118;0;0;1;0;0; 41;114;0;154;1;0;0;PACK IN CHARACTER 42;106;182;62;0;0;0;STEP PACK IN 43;107;174;3;0;0;0;MODIFIER 44;123;0;2;0;0;0;STEP PICK UP 45;100;174;0;0;0;0;MODIFIER 46;124;182;51;1;0;0;gNEXT CHARACTER 47;101;0;2;1;3;0; 48;107;104;7;0;0;0;WORD MODIFIER 49;101;0;4118;1;3;0;RESET PICK UP 50;102;174;0;0;0;0;MODIFIER 51;106;174;3;0;0;0;TEST END OF O/P WORD 52;127;182;22;0;2;0;gNO 53;124;100;35;0;1;0;OUTPUT WORD 54;119;0;0;0;0;0; 55;101;0;8;1;3;0;RESET MODIFIER 56;102;174;3;0;0;0; 57;106;174;5;0;0;0;TEST SECOND L/E 58;127;184;0;0;3;0;gYES 59;124;184;2;1;0;0;UPDATE ASSEMBLER TABLE 60;124;182;63;1;0;0; 61;124;174;0;0;1;0; 62;116;0;2;0;0;0;*5:t 63;102;0;154;1;0;0; 64;126;402;0;0;0;0;gTEST FOR B/E 65;124;182;82;1;0;0;gB/E FOUND 66;124;100;35;0;1;0;OUTPUT 67;119;0;0;0;0;0; 68;125;0;0;1;2;0;DRAIN 69;100;109;18;0;2;0; 70;115;0;154;1;0;0;*292 71;101;0;7710;1;2;0;TEST FOR 2 L/E'S IN LAST WORD 72;127;184;0;0;0;0;gYES 73;106;212;4;0;0;0;STEP INDIRECT MOD TOO/P NEXT WORD 74;107;104;7;0;0;0; 75;125;0;0;1;2;0; 76;102;198;6;0;0;0;*262 77;100;198;0;1;2;0;BITS 1-6 IN EACH OCTET 78;124;104;7;0;1;0;COLLATE WORD TO BE OUTPUT 79;115;0;0;1;0;0; 80;102;198;8;1;0;0;*262 STORE 81;124;184;2;1;0;0;gUPDATE ASSEMBLER TABLE 82;115;198;4;1;0;0;*292 COLLATE OUT? 83;114;0;154;1;0;0; 84;124;402;9;1;0;0;*292 85;100;0;0;0;0;0;*262*5:t 86;106;182;85;0;0;0;TEST INDICATOR SET 87;127;182;91;0;0;0;NO 88;101;0;0;1;3;0;SET INDICATOR 89;102;182;85;0;0;0;ZERO 90;124;182;12;1;0;0; OUTPUT CHARACTER 91;101;0;1;1;3;0;INDICATOR FOR 92;124;182;16;1;0;0; 93;100;0;0;0;0;0;*262*5:t SHEET;85 PROCR;183;CONT 0;106;174;4;0;0;0;*5:t*292 TEST FIRST SPACE OR N/E 1;127;182;44;0;0;0;gNO 2;101;0;0;1;3;0;SET INDICATOR 3;102;174;4;0;0;0; 4;124;182;38;1;0;0;gOUTPUT SPACE 5;101;0;29;1;3;0;SELECT? 6;124;182;37;1;0;0;gOUTPUT? 7;106;174;5;0;0;0;TEST FIRST L/E 8;127;183;13;0;1;0;gNO 9;101;0;1;1;3;0;SET L/E INDICATOR 10;102;174;5;0;0;0; 11;101;0;30;1;3;0;L/E 12;124;182;38;1;0;0;g 13;106;174;3;0;0;0; 14;127;183;18;0;0;0; 15;106;182;62;0;0;0; 16;107;174;0;0;0;0; 17;124;183;2;1;0;0;gOUTPUT SPACE 18;101;0;1;1;2;0; 19;103;174;5;0;0;0;gOUTPUT L/E 20;101;0;30;1;3;0; 21;124;182;38;1;0;0;gOUTPUT L/E SHEET;86 PROCR;184;TYPEWRITER PROCEDURE AT END OF WORD NOTES;RADIX;B; 0;106;103;19;0;0;0;SET L5=2 1;102;182;22;0;0;0;*293293 2;100;210;8;0;2;0;SET(MR3)=8*CH NO 3;115;100;35;0;0;0; 4;102;0;6;1;0;0; 5;106;182;93;0;0;0;*262*5:t TEST O/P THIS TIME 6;127;103;7;0;1;0;*262*5:t gTEST ROUTE 7;106;100;35;1;0;0;UPDATE ASSEMBLER TABLE 8;102;252;0;1;3;0; 9;124;103;7;1;0;0;gTEST ROUTE SHEET;87 PROCR;185;TYPEWRITER END OF BLOCK ROUTINE NOTES;RADIX;B; 0;106;103;1;0;0;0;SELECT LL2;TEST COMMAND HAS 1;127;103;21;0;0;0;gNO;BEEN IGNORED 2;125;0;0;1;2;0;SET LL2=0 3;102;103;1;0;0;0; 4;101;105;2;1;3;0;SELECT START LOCN OF COMMENT 5;103;104;6;0;0;0;SET UP (64+R) 6;102;104;7;0;0;0; 7;106;103;18;0;0;0;SET L5=1 8;102;182;22;0;0;0;*293293 9;102;182;93;0;0;0;*5:9*262 CLEAR CHARACTER O/P INDICATOR 10;124;184;2;1;0;0;*293 gUPDATE ASSEMBLER TABLE SHEET;88 PROCR;186;TYPEWRITER ROUTE CLOSED ROUTINE NOTES;RADIX;B; 0;124;104;5;1;3;0;SET UP (Q) 1;106;182;22;0;0;0;*291293 2;102;103;17;0;0;0; 3;105;212;3;0;0;0;SET L1=2 4;107;103;8;0;0;0; 5;106;103;20;0;0;0;SET L5=3 6;102;182;22;0;0;0;*293293 7;124;186;12;1;0;0;g 8;125;0;4095;1;2;0;I1-I12;TEST IF OP HAS 9;101;0;3840;1;2;0;B9-B12;STACKED INDS 10;127;103;7;0;0;0;gNO, TEST ROUTE 11;102;103;1;0;0;0;SET LL2 12;125;0;8191;1;1;0;I1-I13 13;125;0;3840;1;0;0;I9-I12 14;124;103;7;1;0;0;gTEST ROUTE 15;106;108;24;0;0;0;SET L1=1 16;102;103;8;0;0;0; 17;106;103;17;0;0;0;RESET L5 AT PREVIOUS SETTING 18;102;182;22;0;0;0;*293293 19;125;0;8191;1;1;0;I1-I13 20;124;104;5;0;1;0;RESET (I)=(Q) 21;125;0;0;1;0;0; 22;124;182;22;1;0;0;*292293 SHEET;89 PROCR;187;TYPEWRITER DOUBTFUL BLOCK ROUTINE NOTES;RADIX;B; 0;125;0;2048;1;2;0;;TEST I12 SET 1;127;187;5;0;0;0;gNO 2;125;0;8191;1;1;0;CLEAR I1-I13 3;124;104;5;0;1;0;RESET (I)=(Q) 4;125;0;0;1;0;0; 5;106;103;16;0;0;0;SET SLAS=1 6;102;103;12;0;0;0; 7;106;198;2;1;0;0;L/E FOR O/P 8;102;0;154;1;0;0;*293743 9;124;100;35;0;1;0; 10;119;0;0;0;0;0; 11;106;104;6;0;0;0;SET UP(64+R) 12;105;212;4;0;0;0; 13;102;104;7;0;0;0; 14;106;108;24;0;0;0;SET L1=1 15;102;103;8;0;0;0; 16;124;185;7;1;0;0;g 17;100;477;6;0;0;0;*pp0*pp2*41e 18;100;477;6;0;0;0;*09e08e07e5:e69e68e67e66e6te86e86e 19;127;199;17;0;1;0;*163 gNO 20;124;477;6;1;0;0;*14e 21;126;385;0;0;0;0;*163163 22;127;202;0;0;0;0;*463163 gYES 23;105;221;36;0;0;0;*85e SHEET;90 CONST;188;1;ROUTE NUMBER AND TYPE 0;(D)0; SHEET;91 PROCR;189;MAGNETIC FILE DETAILS SHEET;92 CONST;190;1;MAGNETIC TAPE FILE DETAILS 0;(D)0;BLOCK COUNTER 2;0; 4;0; 6;0; 8;0;*222 10;0; 12;0; 14;0; 16;0;*232 18;0; 20;0; 22;0; 24;0;*242 26;0; 28;0; 30;0;*222*232*242 32;0;REEL COUNTER 34;0; 36;0; 38;0; 40;0;*222 42;0; 44;0; 46;0; 48;0;*232 50;0; 52;0; 54;0; 56;0;*242 58;0; 60;0; 62;0;*222*232*242 64;0;PROGRAMME NUMBER 66;0; 68;0; 70;0; 72;0;*222 74;0; 76;0; 78;0; 80;0;*232 82;0; 84;0; 86;0; 88;0;*242 90;0; 92;0; 94;0;*222*232*242 96;0;FILE IDENTITY SHEET;93 CONST;191;1;MAG TAPE FILE DETAILS CONTD 0;(D)0; 2;0; 4;0; 6;0;*222 8;0; 10;0; 12;0; 14;0;*232 16;0; 18;0; 20;0; 22;0;*242 24;0; 26;0; 28;0;*222*232*242 30;0;RUN+RERUN NUMBER 32;0; 34;0; 36;0; 38;0;*222 40;0; 42;0; 44;0; 46;0;*232 48;0; 50;0; 52;0; 54;0;*242 56;0; 58;0; 60;0;*222*232*242 62;0;*01t HIGH DENSITY INDICATORS 64;0; 66;0; 68;0; 70;0;*222 72;0; 74;0; 76;0; 78;0;*232 80;0; 82;0; 84;0; 86;0;*242 88;0; 90;0; 92;0; SHEET;94 CONST;192;1;MAG TAPE FILE DETAILS CONT 0;(D)0;*51t 2;0; 4;0; 6;0; 8;0;*222 10;0; 12;0; 14;0; 16;0;*232 18;0; 20;0; 22;0; 24;0;*242 26;0; 28;0; 30;0; SHEET;95 CONST;193;1;DB COUNTS 0;(D)0;*8pt DB'S 2;0; 4;0; 6;0; 8;0;*222 10;0; 12;0; 14;0; 16;0;*232 18;0; 20;0; 22;0;*222*232 24;0;O/P BLOCK COUNTS 26;0; 28;0; 30;0; 32;0;*222 34;0; 36;0; 38;0; 40;0;*232 42;0; 44;0; 46;0;*222*232 48;0;SPOOL NOS 50;0; 52;0; 54;0; 56;0;*222 58;0; 60;0; 62;0; 64;0;*232 66;0; 68;0; 70;0;*222*232 SHEET;96 CONST;194;1;MAG TAPE DETAILS 0;(D)0;*3:t 2;0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;0; 24;0; 26;0; 28;0; 30;0; 32;0; 34;0; 36;0; 38;0; 40;0; 42;0; 44;0; 46;0; 48;0; 50;0; 52;0; 54;0; 56;0; 58;0; 60;0; 62;0; SHEET;97 CONST;195;1;MAG TAPE DETAILS 0;(D)0;*3:t 2;0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;0; 24;0; 26;0; 28;0; 30;0; 32;0; 34;0; 36;0; 38;0; 40;0; 42;0; 44;0; 46;0; 48;0; 50;0; 52;0; 54;0; 56;0; 58;0; 60;0; 62;0; SHEET;98 CONST;196;1;RELEASED TAPES LIST 0;(D)0; 2;0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;0; 24;0; 26;0;*4:24tt 28;0; 30;0; 32;0; 34;0; 36;0; 38;0; 40;0; 42;0; 44;0; 46;0; SHEET;99 TABLE;197;1; NOTES;;; 0;214;6;0;0;2;0;5;0;0;0;0;0;0;O,P,T,SP,SP 2;211;20;0;0;2;0;2;0;3;0;0;0;1;3 SP,L/E,L/E SHEET;100 CONST;198;1;LONG CONSTANTS FOR TYPEWRITER 0;(D)3p3p3p3p3p; 2;1.;L/E 4;5:5:5:5:5:;*291 QUERIES 6;0;*262 IND MOD REG 8;0;COLLATED WORD SHEET;101 PROCR;199;OPERATOR INTERVENTION NOTES;RADIX;B;DETERMINE GROUP 0;101;0;127;1;2;0;;TEST I1gI7 SET 1;127;103;25;0;0;0;gYES 2;101;0;127;1;1;0; 3;102;222;0;0;0;0;STORE INDICATOR SETTING 4;124;0;185;1;3;0;STORE(I) 5;126;107;6;1;1;0;SET (MR1) FOR M/R SWITCH 6;106;103;0;0;0;0;;TEST OPTION 7;127;199;12;0;1;0;gYES;OUTSTANDING 8;106;175;0;1;0;0;TEST OPTION IN PROGRESS 9;127;199;20;0;0;0;gNO 10;125;0;6143;1;1;0;CLEAR I1-I11 I13 11;124;199;18;1;0;0; 12;125;0;1792;1;2;0;;TEST OPTION 13;125;0;6143;1;1;0;CLEAR I1-I11 I13 14;127;200;0;0;0;0;*163 gYES 15;105;221;41;0;0;0;*16t;OPTIONS NOT ACCEPTED 16;127;200;0;0;2;0;*16t;DURING UPTIME DELAY 17;125;0;128;1;0;0;SET I8 18;102;103;1;0;0;0;SET C ION INDICATOR 19;124;103;5;1;0;0;gHEAD OF QUEUE 20;106;487;0;0;0;0;;TEST IF ALLOCATION 21;127;199;39;0;0;0;gNO;IS BEING PERFORMED 22;106;222;0;0;0;0; 23;101;0;1281;1;2;0;;TEST GP 5 FN 1 24;127;199;36;0;1;0;gNO 25;106;108;10;0;0;0;*14t 26;102;106;11;0;0;0;*14t 27;125;0;6143;1;1;0;CLEAR I1-I11,I13 28;125;0;127;1;0;0;SET I1-I7 29;106;460;49;0;0;0;*142 TEST READING C/D 30;127;199;35;0;0;0;gNO 31;106;222;16;0;0;0;YES RESTORE ASL 32;124;222;18;0;1;0; 33;102;0;64;0;0;0; 34;102;460;49;0;0;0;*142 35;124;295;0;1;0;0;*14e g 36;125;0;6143;1;1;0;CLEAR INDICATORS 37;125;0;127;1;0;0;SET I1gI7 38;124;199;18;1;0;0;g 39;125;0;1792;1;2;0;;TEST GROUP 0 40;127;199;47;0;0;0;;gYES 41;106;108;10;0;0;0;;SET M/R SWITCH 42;102;106;11;0;0;0;;NON-INT 43;125;0;1792;1;2;0;GROUP NO. 44;118;0;4126;0;0;0; 45;103;199;76;0;0;0; 46;101;0;8;1;2;0;*5p+*12+;0000500005 47;125;0;6143;1;1;0;CLEAR I1-I11,I13 48;125;0;127;1;0;0;SET I1-I7 49;127;477;6;0;2;0;gREJECT 50;106;222;0;0;0;0;STORE COMMAND 51;103;233;5;0;0;0; 52;102;487;0;0;0;0;SET ALLOCATOR LINK 53;101;0;5;0;1;0;*16t 54;115;222;0;0;0;0; 55;101;0;514;1;2;0; 56;127;199;65;0;0;0; 57;101;0;2;1;2;0; 58;127;199;65;0;0;0;g2/0/4 59;101;0;512;1;2;0; 60;127;199;65;0;0;0;g4/0/4 61;101;0;2;1;1;0; 62;127;199;65;0;0;0;g4/0/2 63;125;0;0;1;2;0; 64;124;199;74;1;0;0; 65;106;221;32;0;0;0; 66;127;199;74;0;0;0;gUPTIME NOT IN 67;106;108;9;0;0;0;SET M/R SWITCH 68;102;106;11;0;0;0;INT 69;126;379;0;0;0;0;gCLOSE RT 70;127;103;5;0;3;0;gPRIORITY QUEUE;DELAY 71;126;380;0;0;0;0;gSET EVERYTHING BACK 72;106;108;10;0;0;0; 73;102;106;11;0;0;0;*16t 74;124;199;76;0;1;0; 75;126;199;76;0;1;0; 76;100;0;0;0;0;0; 77;100;503;0;0;0;0;*09e08e07e5:e69e68e67e66e6te86e86e 78;100;516;0;0;0;0;gGROUP2 79;100;523;0;0;0;0;*41e gGROUP 3 80;100;524;0;0;0;0;gGROUP 4 81;100;477;6;0;0;0;*5pt*12t gGROUP 5 REJECT 82;100;532;0;0;0;0;gGROUP 6 SET ROUTE AVAILABLE 83;100;532;0;0;0;0;*5pt*12t gGROUP 7 WITHDRAW ROUTE 84;125;0;3855;1;2;0;*40t*41t 85;101;0;769;1;2;0;TEST STORE DUMP 86;127;463;0;0;0;0;gYES 87;125;0;6143;1;1;0;CLEAR I1-I11,I13 88;124;199;18;1;0;0;gSET C IGN INDICATOR SHEET;102 PROCR;200;GROUP D (1) NOTES;RADIX;B;TEST SELECTED OPTIONS 0;106;222;2;0;0;0;SET(MR1)FOR LAST 1;102;0;2;1;0;0;PROG.TO OFFER OPTIONS 2;101;213;10;1;3;0; 3;112;222;0;0;0;0;CONVERT OPT NO TO BINARY 4;103;222;1;0;0;0; TEST;IF OPTION CHOICE 5;101;0;16;1;2;0;;IS OUT OF RANGE 6;127;203;0;0;2;0;gREJECT 7;101;0;15;1;1;0; 8;102;222;4;0;0;0; 9;106;210;6;0;0;0;FORM BIT 10;124;222;4;0;1;0;CORRESPONDING TO 11;118;0;0;0;3;0;CHOSEN OPTION 12;118;0;4118;1;0;0; 13;115;0;41;0;1;0;;TEST CHOSEN OPTION 14;127;203;0;0;0;0;gREJECT;ALLOWED 15;124;104;4;0;0;0;SET INDICATORS WITH (P) 16;125;0;0;1;0;0; 17;101;0;512;1;2;0;*46t;TEST'DEFER OPTION' 18;127;202;5;0;0;0;*46t*463163 gYES 19;106;222;1;0;0;0; 20;104;0;43;0;1;0;FORM & STORE LOCN. CONTAINING S/C 21;102;222;1;0;0;0;ADDRESS CORRESPONDING TO CHOSEN OPTION 22;101;0;16;0;1;0; 23;115;0;38;0;1;0;;TEST IF SWITCH TO BE 24;127;201;0;0;0;0;gYES;SET AT 4 25;124;222;1;0;1;0;SET LINK FOR SI=1 26;106;0;0;0;0;0; 27;101;267;0;1;2;0; 28;104;209;10;0;0;0; 29;102;0;31;0;1;0; 30;102;0;45;0;1;0;CLEAR ASSOCIATED TIME 31;106;209;2;0;0;0;SET SI=1 32;105;0;30;0;1;0; 33;124;201;5;1;0;0;g SHEET;103 PROCR;201;GROUP O(2) NOTES;RADIX;B;OUTPUT COMMENT ETC. 0;124;222;1;0;1;0;;SET LINK FOR SI=4 1;106;0;0;0;0;0; 2;115;0;43;0;1;0; 3;102;0;44;0;1;0; 4;106;0;35;0;1;0;;SET SI=4 5;102;0;7;0;1;0;*163163;CONVERT OPT NO TO 6;106;222;0;0;0;0;;ALPHA 7;103;222;1;1;0;0; 8;106;222;0;1;0;0; 9;101;0;15;0;1;0;FILL Q1-4 10;114;214;6;1;0;0;PACK CHOSEN OPTION (ALPHA)g 11;102;175;0;1;0;0;SET REQ & CLEAR OPT OUTSTANDING IND 12;102;103;0;0;0;0;CLEAR LL1 13;124;177;6;1;0;0;gSET L6=1 SHEET;104 PROCR;202;GROUP O (3) NOTES;RADIX;B;DEFER OPTIONS 0;106;221;41;0;0;0;*16t TEST UPTIME STOPPED 1;127;202;5;0;2;0;gNO 2;106;0;2;0;0;0;TEST OPT FOR 3;126;386;0;0;0;0;*85e 4;127;203;0;0;0;0;*16t gYES REJECT 5;106;0;8;0;1;0;*46t;SET S=3 6;102;0;7;0;1;0; 7;126;347;0;0;0;0;gASSOC. TIME S/R 8;101;202;12;1;3;0; 9;102;0;42;0;1;0; 10;101;0;84;1;3;0;'D' 11;124;201;9;1;0;0; 12;124;270;0;0;2;0;*464;00004 13;102;0;42;0;1;0;;RESET LINK FOR SI=3 14;102;0;45;0;1;0;;CLEAR ASSOC. TIME 15;101;0;16;0;1;0;Q5B;TEST M/R OPTION 16;115;0;38;0;1;0; 17;127;205;19;0;0;0;gNO 18;124;0;2;0;1;0;;SET(MR1)FOR 19;126;0;36;1;1;0;;COMMERCIAL PROG. 20;124;290;0;1;0;0;gI/P O/P CONTROL SHEET;105 PROCR;203;OPERATOR INTERVENTION REJECTION NOTES;RADIX;B; 0;125;0;128;1;0;0;;SET I8,REJECT 1;126;177;0;0;0;0;g REQUEST T/W 2;101;0;4;1;3;0;;OPTIONS 3;126;234;0;0;0;0;gS/R H 4;124;216;18;0;2;0;EDIT COMMENT 5;128;102;4;1;2;0; 6;124;181;0;1;0;0;gLOG ROUTINE SHEET;106 PROCR;204;ENTRY FOR PROGRAMME UNLOAD NOTES;RADIX;B; 0;124;212;0;1;1;0;*pp0*pp2*49e 1;100;212;0;0;3;0;*09e06e;SET BINARY 2;126;385;0;0;0;0;*163 3;101;0;1;1;2;0;*pp2*46e 4;106;209;4;0;0;0;*49e;26/0/1 2 RESTORE(9) 5;102;0;9;0;0;0;*49t 6;124;212;0;1;1;0;*49t;SET MOD GP 0 7;126;250;0;0;0;0;*599 gSTORE MG3 S/R 8;126;238;0;0;0;0;*09e06e;gAUGMENT TIME SPENT 9;124;0;3;0;1;0;*60t;TEST TRIAL 10;106;0;11;0;0;0; 11;124;233;43;0;1;0; 12;127;0;0;0;1;0;*60t;gYES 13;126;462;0;0;0;0;gREQUEST M/R 14;106;0;179;0;0;0;UNLOAD/ABDON INDICATOR 15;124;295;15;1;0;0;gUNLOAD SHEET;107 PROCR;205;PROGRAMMED OFFER OF OPTIONS NOTES;RADIX;B; 0;124;212;0;1;1;0;;SET MOD. GP. 0 1;102;0;38;0;1;0;;STORE ALARM NO 2;118;0;10;1;0;0; 3;102;0;41;0;1;0;;STORE NO OF OPTIONS 4;124;0;2;0;1;0;;STORE RETURN VALUES 5;100;0;30;1;0;0;;OF (A)(B) & (C)IN SI 6;100;212;0;0;3;0;0;SET(C)BINARY 7;126;250;0;0;0;0;*599 gSTORE MG3 S/R 8;106;209;4;0;0;0;*49t;26/0/1 2 RESTORE (9) 9;102;0;9;0;0;0;*49t 10;106;210;6;0;0;0; 11;124;0;2;0;1;0; 12;124;0;41;0;1;0; 13;118;0;0;0;3;0; 14;101;0;511;1;1;0;*46e 15;102;0;41;0;1;0;;OF ALLOWABLE OPTIONS 16;106;100;2;0;0;0; 17;102;0;43;0;1;0;;1ST OPTION 18;126;238;0;0;0;0;*099 gAUGMENT TIME SPENT 19;126;176;0;0;0;0;gREQUEST D/D;IN PROG SHEET;108 PROCR;206;PROGRAMMED OFFER OF OPTIONS (2) NOTES;RADIX;B; 0;106;0;2;0;0;0;START OF SWITCH;STORE START OF SW 1;102;222;2;0;0;0;W/L;OF LAST PROGRAMME TO 2;106;0;38;1;1;0;;OFFER OPTIONS 3;102;222;6;1;0;0;ALARM NO/PROG IDENT.NO 4;126;234;0;0;0;0;gS/R H 5;124;216;26;0;2;0;;FORM COMMENT 6;128;102;4;1;2;0; 7;124;181;0;1;0;0;gOUTPUT COMMENT SHEET;109 PROCR;207;TYPE NOTES;RADIX;B; 0;124;212;0;1;1;0;SET MOD. GROUP 0 1;124;0;3;0;1;0;STORE ANNEXE START IN SP. CHAPTER 2;102;0;169;0;0;0; 3;126;250;0;0;0;0;*599 SET MOD GP 3 4;106;100;8;0;0;0;STORE LINK 5;102;0;44;0;1;0; 6;106;209;4;0;0;0;*49t;26/0/1 2 RESTORE (9) 7;102;0;9;0;0;0;*49t 8;126;238;0;0;0;0;*099 gAUGMENT TIME SPENT 9;126;177;0;0;0;0;gREQUEST T/W 10;126;234;0;0;0;0;gEDIT TIME 11;126;212;0;1;3;0;SET MRR3 =24/0 12;100;198;0;1;2;0;BITS 1-6 IN EACH QUARTET 13;118;0;4122;1;0;0; 14;124;0;3;0;1;0;COPY COMMENT TO ANNEXE 15;124;0;169;0;1;0; 16;106;0;0;1;3;0; 17;102;102;4;1;3;0; 18;115;102;4;1;3;0;;TEST END OF COMMENT 19;101;0;7710;1;2;0; 20;127;207;25;0;0;0;gYES 21;125;0;2;0;3;0; 22;124;207;14;1;0;0;g 23;106;211;20;1;0;0;SET L/E'S IN LAST WORD 24;102;102;26;1;0;0; 25;106;0;35;0;1;0;SET SI=4 26;102;0;7;0;1;0;*163 27;124;181;0;1;0;0;gOUTPUT COMMENT SHEET;110 PROCR;208;MASTER ROUTINE NOTES;RADIX;B;INTERNAL IMPOSSIBILITY 0;101;0;121;1;3;0;CODE LETTER Z 1;102;221;2;0;0;0; 2;126;107;6;1;1;0;SET(MR1)FOR M/R SWITCH 3;100;212;0;0;3;0;SET BINARY 4;126;177;0;0;0;0;gREQUEST T/W 5;106;177;1;0;0;0; 6;102;103;21;0;0;0;AMEND END OF LOG;ROUTINE 7;101;0;4;1;3;0; 8;126;234;0;0;0;0;gS/R H 9;106;214;28;1;0;0;X,X,X,N/E,N/E 10;102;102;4;1;0;0; 11;106;221;2;0;0;0; 12;118;0;8;0;0;0;;SET UP COMMENT 13;101;0;15;0;1;0;FILL Q1g48 14;115;211;20;1;0;0; 15;102;102;6;1;0;0; 16;124;181;0;1;0;0;gLOG ROUTINE 17;100;0;4095;0;0;0;HALT p p p 18;124;0;141;1;0;0;gINDEPENDENT STORE;PRINT 19;100;226;-2;0;0;0;*pp0*pp2*106 20;124;452;0;1;0;0;*pp2*343 (25)IN 150,OVERFLOW SHEET;111 PROCR;209;INSTRUCTION CONSTANTS NOTES;RADIX;B; 0;106;0;157;0;0;0;*09t*3+t;START TIMINGS 1;124;265;0;1;0;0;*09t*3+t 2;126;0;0;1;0;0;LOG, I/P O/P, REPORT S/R 3;126;0;8;0;3;0;SET TAG 15 S/R 4;126;0;2;0;1;0;SET TAG 15 S/R 5;124;456;0;1;0;0;*343 (25)IN 150,OVERFLOW 6;124;240;18;1;0;0;REPORT S/R 7;124;265;1;1;0;0;REPORT S/R,STOP TIMINGS 8;113;227;0;0;0;0;*106 USED IN ISU ALLOCATOR & S/R G 9;113;226;0;0;0;0;(124) IN ISU, ALLOCAS/RG 10;101;0;0;0;0;0;OP INT, P/T O/P 11;126;0;8;0;1;0;*499;MICR 12;106;0;8;0;0;0;*59t RETURN FROM PL5;MOD GROUP BLISTERS 13;106;212;18;1;0;0;/ABANDON PROGRAMME 14;104;0;6;0;1;0;DO 15;124;103;2;1;0;0;DO 16;102;0;44;0;0;0;ABANDON PROGRAMME 17;124;103;5;1;0;0;DO DO 18;126;0;44;0;3;0; 19;106;129;4;1;0;0;*59t SHEET;112 CONST;210;0;SHORT CONSTANTS 0;(D)01ppp;UNLOAD STORAGE 1;66666;DECIMAL RADIX 2;08000;*pp0*pp1*3:e4pe ALT RTE INDIC 3;04000;*3:e4pe ALT RTE INDIC 4;p0000;LOADER 5;.1000;158 IN Q5)-(15 IN Q4) 6;00001;1 7;66t66;CLOCK RADIX 8;000p8;COLLATE CH.NO 9;65536;CONVERSION TABLE CONSTANT 10;66668;RADIX FOR ROUTES 11;50000;CONST FOR XERONIC SKIP WORD AND FOR PTS 12;.0080;A.S.L. FOR PRINTER W/E 13;(D)0;*66t 14;0; 15;07008; SHEET;113 CONST;211;1;LONG CONSTANTS 0;(D)pppppppppp; 2;1000000000;STACK MINUS ZERO 4;4p4p4p4p41;SENTINELTYPE 1 6;6p6p6p6p6p;R/M'S 8;6e6e6e6e6e;%%%%% 10;7171717171;///// 12;1212121212;BBBBB 14;5p5p5p5p5p;FAULTY BLOCK MARKER 16;1p1p1p1p1p;FAULTY BLOCK MARKER 18;1.00000000;L/E IN TOP SEXTET FOR OPEN FILE 20;5.5.5.5.5.;L/E'S 22;0009000000;*pp0*pp2*1p3 24;0006000000;*1:3 26;0003000000;*1.3 28;000+000000;*383 30;0012000000;*4.3 32;0015000000;*5t3 34;000p000000;*pp2*393 SHEET;114 CONST;212;1;MOD REGISTER CONSTANTS 0;(D)0001800000;24:0 LOG ROUTINE LOAD S/R 2;0000800000;8:0 STORE DUMP 4;0001400002;20:2 2 USED VARIOUS PLACES 6;0018000000;*1.3*1:3*1p3*383*393*4.3*5t3 8;0003000000;48:0 RTI PTS ASSOCIATED TIME 10; + ;12=0T/W&P/T I/P 12; t ;10=0 T/W&P/T O/P 14;000e000080;*3:9 16;0000000000;*109 S.A.W W/L 18;000060001t;*599 MOD GROUP TABLE ENTRY SHEET;115 CONST;213;1;CONVERSION TABLES 0;(D)0000000001;BINARYgDECIMAL 2;0000000016; 4;0000000256; 6;0000004096; 8;0000065536; 10;0000000001;DECIMALgBINARY 12;000000000t; 14;0000000064; 16;000000 3.8; 18;0000000001;SECONDSgMINUTES 20;0000000016; 22;0000000416; 24;0000006816; 26;0000000001;BINARYgOCTARY 28;0000000020; 30;0000000320; SHEET;116 CONST;214;1;ALPHA CONSTANTS 0;(A) t;*pp0*pp1*353 2;(A) *;*353 4;(A)INEFF;*2p9 6;OPT ; 8;(D)7.(A) (D)7.;B/E,SP,SP,SP,B/E 10;(A)P Q(D)7:7:;P,SP,Q,N/E,N/E 12;(D)0514808000;A8/08000 14;(A)C REJ; 16;O REJ; 18;GP FN; 20;(D)5.7:7:5.7:;L/E,N/E,N/E,L/E,N/E. 22;5.7:7:6p;L/E N/E N/E R/S 24;(A)LOST ; 26;RC ; 28;(A)XXX (D)7:;X,X,X,SP,N/E 30;(A)NO CD; 32;OFLOW; 34;L%OUT;*pp0*pp1*353 36;L'OUT;*353 38;RTI ; 40;DB ; 42;WE ; 44;CHECK;*2.9669 46;ZZZ ; 48;LOP ; 50;LIP ; 52;ABDON; 54;END; 56;R T I; 58;DUMP ;*41t 60;(A)END(D)5.5.;*41t 62;(A)HIGH;*011 64;(A)INDEX; 66;CHAPT; 68;O%LAY;*pp0*pp1*353 70;O'LAY;*353 72;DUMP ;*41t*14t 74;ABAND; 76;ONED ;*41t*14t 78;(D)5.5.; 80;(A)SER ;*509 82;(A)U A ;*3t1 84;(A)LET ;*139 86;(A)REJEC; 88;CHD ;*5+9 90;(A)* 4 ;*779 SHEET;117 CONST;215;1;MORE ALPHA CONSTANTS 0;(A)PAUSE;*0:9 2;(A)PR CH;*0e9 4;(A)WDRAW;*129 6;AVAIL;*129 8;(A)REOPE;*0:9 10;(A)RUNCH;*0+9 12;(A)ROUCH;*119 14;(A)NEW ; 16;DOUBT; 18;(A)CARD ;*669 20;STORE;*679 22;(A)CH (D)007:;*68t 24;(D)6940674000;*68t 26;(A)TAPE ;*69t 28;UNLOA; 30;(A)DED(D)5.5.; 32;(A)REWOU; 34;(A)ND (D)5.5.;*69t 36;(A)PREFE;*86t 38;R GP ; 40;R SP ;*86t 42;(A)SHORT;*4tt 44;(A)LONG;*4tt 46;(A)TMS ;*8p9 SHEET;118 TABLE;216;1;OFLOW, OREJ, ENTER, END, PROG ALARM EDIT TABLES NOTES;;; 0;214;32;0;0;2;0;5;0;0;0;0;0;0;*342 O,F,L,O,W 2;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 4;221;0;0;0;0;0;5;0;0;0;0;0;0;PROG NO 6;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 8;222;10;0;0;1;0;t;0;0;0;2;0;0;(A) 10;222;12;0;0;1;0;t;0;2;0;2;0;0;(B) 12;221;1;0;0;0;0;1;0;2;0;0;0;0;DIVISION NO OF LINK 14;221;1;0;0;0;0;4;1;1;3;0;0;0;LOCATION WITHIN DIV 16;211;20;0;0;2;0;2;0;4;0;0;0;1;*342 L/E'S 18;214;16;0;0;2;0;5;0;0;0;0;0;0;O.SP.R.E.J 20;214;10;0;0;2;0;2;3;0;0;0;0;0;N/E, N/E 22;222;0;0;0;0;0;2;3;0;1;0;0;0;OPT NO 24;211;20;0;0;2;0;2;0;4;0;0;0;1;4 SP,L/E,L/E 26;214;2;0;0;2;0;1;4;0;0;0;0;0;ASTERISK 28;222;6;0;0;0;0;3;2;1;1;0;0;0;ALARM NO 30;214;10;0;0;2;0;1;4;0;0;0;0;0;N/E 32;222;7;0;0;0;0;5;0;0;0;0;0;0;PROG NO 34;211;20;0;0;2;0;2;0;2;0;0;0;1;2 SP,L/E,L/E SHEET;119 TABLE;217;1;L'OUT NOTES;;; 0;0;0;0;0;2;0;0;0;2;0;0;0;0;*pp0*pp2*31e 2;0;180;0;0;2;0;2;3;0;0;0;0;0;*pp2*583 4;214;36;0;0;2;0;5;0;0;0;0;0;0;*342 L',O.U,T 6;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 8;221;0;0;0;0;0;5;0;0;0;0;0;0;PROG NO 10;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 12;222;10;0;0;0;0;1;0;2;0;0;0;0;DIVISION NO(COMPT 16) 14;222;10;0;0;0;0;4;1;1;3;0;0;0;LOCATION WITHIN DIV 16;222;11;0;0;0;0;1;0;2;0;0;0;0;DIV NO OF LEP 18;222;11;0;0;0;0;4;1;1;3;0;0;0;LOCATION WITHIN DIV 20;222;12;0;0;0;0;1;0;2;0;0;0;0;DIV NO(COMPT 1) 22;222;12;0;0;0;0;4;1;1;3;0;0;0;LOCATION WITHIN DIV 24;211;20;0;0;2;0;2;0;2;0;0;0;1;*342 L/E'S 26;214;24;0;0;2;0;5;0;0;0;0;0;0;L,O,S,T, SP (OR O'LAY) 28;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 30;221;6;0;0;0;0;5;0;0;0;0;0;0;PROG NO 32;211;20;0;0;2;0;2;0;2;0;0;0;1;2 SP,L/E,L/E 34;0;156;0;0;0;0;2;2;0;0;0;0;0;*31e234 36;214;10;0;0;2;0;1;4;2;0;0;0;1;///// SP,SP N/E 38;105;2;0;0;2;0;1;0;0;0;0;0;0;R/S 40;0;156;0;0;0;0;2;2;0;0;0;0;0;*31e*583 2 DIGS 42;214;10;0;0;2;0;1;4;1;0;0;0;1;///// SP N/E 44;0;156;0;0;0;0;4;0;0;0;0;0;0;*31e*6e9 46;214;10;0;0;2;0;1;4;0;0;0;0;1;*6e9 N/E SHEET;120 TABLE;218;1;DATA HANDLING TABLES NOTES;;; 0;0;26;0;0;0;0;6;0;0;0;0;0;0;///// STORE GP 3 REG 2;211;3;0;0;0;0;2;0;0;0;0;0;0;STACK MINUS ZERO 4;222;10;0;0;0;0;6;0;0;0;0;0;0;///// RESTORE GP 3 REG 6;211;20;0;0;2;0;2;0;1;0;0;0;1;/////SP,L/E,L/E 8;226;0;0;0;0;0;0;0;1;0;0;0;0;*019 SHEET;121 TABLE;219;4; 0;225;4;0;0;2;1;0;0;0;0;0;0;1;CONTROL DATA SHEET;122 CONST;220;1;INPUT/OUTPUT CONSTANTS 0;(D)0000700000;(A) 2;000000003+;(B)READ CD 4;666t600000;MINS & SECS RADIX,(C) 6;0002600000;(A) 8;00004ppppp;(B),RUN ON M/T 10;0080000000;BIT 12,(C) SHEET;123 CONST;221;1;GENERAL W/L'S 0;(D)0;TO BE USED ONLY NON-INTERRUPTIBLY 2;0;(ALLOC LINK SET) C REJ. XXX, O'LAY, ETC. 4;0;PROG SWITCH DURING OVERLAY 6;0;(ALLOC LINK SET) PROG ID IN ALLOC&OLAY 8;0;ROUCH 10;0;O'LAY: ITEM 13 USED BY INTERX PRIORITIES 12;0;USED IN ALIGNMENT FAILURE 14;0;IND MOD REG FOR LOAD S/R 16;0;IND MOD REG FOR LOAD S/R 18;(D)7654321;*pp0*pp2*5t3 20;(D)654321;*4.3 22;(D)54321;*393 24;(D)4321;*383 26;(D)321;*1p3 28;(D)21;*1:3 30;(D)1;*pp2*063*1.3 32;;*16t 34;;2.3 36;;1ST PROGM 38;;*859 40;; 42;;1ST/2ND 44;;3RD/4TH 46;;5TH/6TH 48;;7TH/8TH SHEET;124 CONST;222;1;W/L'S FOR OP INT 0;(D)0;IND SETTING/BIN OPT NO 2;0;W/L/USED IN CHD 4;0;W/L/TRIALS IND IN ALLOC 6;0;W/L 8;0;PROG NO/PROG SL NO AFTER C.D. GP2 10;0;STORAGE GP3 REGISTERS 12;0;(A) (B) (C) IN O'FLOW 14;0;W/L'S IN L''OUT 16;0;ORIG 64+R DURING C.D. / W/L 18;0;(A) FOR C.D. 20;0;(B) FOR C.D. 22;0;(C) FOR C.D./ S/R G SHEET;125 CONST;223;0;COUNTERS & INDICATORS 0;(D)00000;*063 TIMING IND 1;00000;ALLOC & O'LAY SHEET;126 CONST;224;0;MULTI-CHANNEL LOADING LIST 0;(D)0;CH/RT 1;;RT TYPE 2;;PROGM 3;;SERIAL 4;;LT.CHAPT 5;;IDENTIFIER 6;;*57t 7;; 8;; 9;; 10;; 11;; 12;; 13;; 14;; 15;; 16;; 17;; 18;; 19;; 20;; 21;; 22;; 23;; 24;; 25;; 26;; 27;; 28;; 29;; 30;; 31;; 32;; 33;; 34;; 35;;*57t SHEET;127 CONST;225;1;MULTI-CHANNEL WL'S 0;(D)0;NORMAL ALLOC CH/RT 2;; 4;;TRIAL 6;;(A) 8;;(B) 10;;CH CH RT 12;;RT TYPE IN ASL 14;;MOD REG SHEET;128 TABLE;226;1; NOTES;;; 0;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 2;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 4;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 6;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 8;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 10;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 12;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 14;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 16;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 18;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 20;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 22;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 24;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 26;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 28;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 30;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 32;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 34;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 36;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 38;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 40;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 42;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 44;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 46;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 48;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 50;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 52;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 54;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 56;226;5;0;0;0;0;0;0;3;0;0;0;0;///// SHEET;129 TABLE;227;1; NOTES;;; 0;0;0;0;0;0;0;0;0;0;0;0;0;0;*102 2;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 4;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 6;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 8;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 10;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 12;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 14;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 16;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 18;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 20;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 22;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 24;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 26;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 28;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 30;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 32;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 34;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 36;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 38;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 40;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 42;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 44;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 46;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 48;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 50;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 52;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 54;0;0;0;0;0;0;0;0;0;0;0;0;0;///// 56;227;5;0;0;0;0;0;0;3;0;0;0;0;///// SHEET;130 CONST;228;1;UNPACKED INPUT 0;(D)0; 2;0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;0; SHEET;131 CONST;229;1;M/R TABLES TAG,MOD GP AND FP 0;(D)87654321;*1.3*1:3*1p3*383*393*4.3*5t3 2;0;*3t1*3e9 SHEET;132 PROCR;230;M/R STORE TABLE 0;100;0;4097;1;0;0; 1;101;108;0;0;0;0; 2;115;0;8191;1;3;0; 3;115;0;8191;1;3;0; 4;115;0;8191;1;3;0;*1.2 5;115;0;8191;1;3;0; 6;115;0;8191;1;3;0;*1:2 7;115;0;8191;1;3;0; 8;115;0;8191;1;3;0;*1p2 9;115;0;8191;1;3;0; 10;115;0;8191;1;3;0;*382 11;115;0;8191;1;3;0; 12;115;0;8191;1;3;0;*392 13;115;0;8191;1;3;0; 14;115;0;8191;1;3;0;*4.2 15;115;0;8191;1;3;0; 16;115;0;8191;1;3;0;*5t2 17;115;0;8191;1;3;0;*1.2*1:2*1p2*382*392*4.2*5t2 18;115;0;8191;1;3;0; 19;115;0;8191;1;3;0; 20;100;0;0;0;0;0;*pp0*pp2*3ee*01e*3.3*04e*14e*42e*46e*31e 21;100;0;0;0;0;0;*41e*3t3*14e*3:e*60e 22;100;217;26;0;0;0;*343 OFLOW EDIT TABLE 23;100;455;12;0;0;0;*34e RETURN ADD FOR TROFL 24;100;0;1;0;0;0;*443 25;100;0;9;0;0;0;*62e 26;100;0;4;0;0;0;*2.+62e SHEET;133 CONST;231;1;M/R STORE TABLE 0;(D)0;SET UP BY I.S.U. 2;0200002000; 4;0200004000; 6;0200006000; 8;0200008000; 10;020000t000; 12;020000+000; 14;020000.000; 16;0000010000; 18;pppppppppp; SHEET;134 CONST;232;1;M/R 2ND STORE TABLE 0;(D)0200008000;*3t2*3et 2;020000t000; 4;020000+000; 6;020000.000; 8;0000010000; 10;pppppppppp; 12;pppppppppp; 14;pppppppppp; 16;pppppppppp; 18;pppppppppp;*3t2*3et 20;(D)0000000000;(A)ON ENTRY TO PROG 22;0000000000;(B)ON ENTRY TO PROG SHEET;135 PROCR;233;ALLOCATOR PARAMETER TABLE NOTES;RADIX;; 0;100;0;0;0;0;0;ZERO 1;100;0;0;0;0;0;13-BIT START OF LOADING SYSTEM 2;100;0;0;0;0;0;15-BIT START OF LOADING SYSTEM 3;100;233;0;0;0;0;START OF THIS LIST 4;100;229;0;0;0;0;START OF M/R TABLES 5;100;0;0;0;0;0;ALLOCATE COMMAND/ZERO 6;100;247;0;0;0;0;LOAD NEXT CHAPTER S/R 7;100;236;0;0;0;0;READ NEXT BLOCK S/R 8;100;235;0;0;0;0;UPDATE SWITCH S/R 9;100;243;0;0;0;0;RETURN ADDRESS AFTER LOADING 10;100;222;10;0;0;0;LOCATION WHERE (MOD GP 3) IS STORED 11;100;0;60;0;0;0;PSEUDOROUTE FOR ROUTE 0 12;100;252;0;0;0;0;START OF USE OF ASSEMBER TABLE 13;100;208;1;0;0;0;XXX COMMENT 14;100;484;1;0;0;0;REJECT ALLOCATION COMMENT 15;100;270;0;0;0;0;*464 R/C LINK;00004 16;100;190;32;0;0;0;START OF REEL COUNTERS 17;100;177;0;0;0;0;REQUEST T/W S/R 18;100;102;4;0;0;0;START OF T/W ANNEXE 19;100;234;0;0;0;0;EDIT TIME S/R 20;100;181;0;0;0;0;ENTRY TO LOG ROUTINE 21;100;499;0;0;0;0;*01e NOT HIGH DENSITY IF ZERO 22;100;191;62;0;0;0;*01e 45/90K INDICATORS 23;117;496;64;0;0;0;64-(CONTROL DATA LIST START)FOR 45K 24;100;0;0;0;0;0;PROG TAPE ROUTE 25;100;0;1;0;0;0;*31e CLOCK=1,ZERO=NO CLOCK 26;100;0;0;0;0;0;*544*443 DUMPS PRINT; 2 27;108;0;9;0;0;0;*2.+62e*2.+*62e;0000000004 28;100;0;1;0;0;0;0=ISSUE 4 MASTER,1=ISSUE 6 OR LATER 29;100;230;0;0;0;0;START OF PRIORITY TABLE 30;100;231;0;0;0;0;START OF STORE TABLE 31;100;232;0;0;0;0;*3t3*3ee START OF SECOND STORE TABLE 32;116;0;64;0;0;0;*3:e MORE THAN 8 CHANNELS 33;100;0;1;0;0;0;*3.3*04e CARDS OR P/T INDICATOR 34;100;295;15;0;0;0;RETURN ADDRESS FOR PTS ABDON/END 35;100;190;0;0;0;0;PTS=PROG CHANNEL BLOCK CTRS 36;100;190;96;0;0;0;PTS=FILE IDENTITIES+REWIND INDS 37;100;464;18;0;0;0;*41e RETURN ADD FROM START OF STORE DUMP 38;100;246;14;0;0;0;RETURN TO RELEASE MR SWITCH 39;100;216;0;0;0;0;*343 OFLOW EDIT TABLE 40;100;246;8;0;0;0;RETURN ADD FOR O'LAY (END) 41;100;452;18;0;0;0;*34e RETURN ADD FOR TROFL 42;100;474;0;0;0;0;'SET TAG 15' SUBROUTINE 43;100;0;0;0;0;0;Q1-4=ABS PTS START,Q5=2XCHAP 44;100;0;0;0;0;0;TRIAL IN PROGRESS IND-START OF SWITCH 45;100;246;22;0;0;0;*60e RETURN ADD FOR O'LAY(START) 46;100;0;0;0;0;0;START OF SECOND STORE AREA 47;100;0;1;0;0;0;*80+ 48;100;0;0;0;0;0;SPECIAL CHAP INCREMENT IN CMR 49;100;130;0;0;0;0;END OF PRIORITY QUEUE 50;100;462;0;0;0;0;'REQUEST MASTER SWITCH'SUBROUTINE 51;100;296;4;0;0;0;*14e LOCN OF 'OPTA' SWITCH-PTS OVERLAY 52;100;468;10;0;0;0;*41e 53;100;175;1;0;0;0;'OPT OUTSTANDING'WL'S FOR PTS 54;100;176;10;0;0;0; 55;100;0;0;0;0;0;WL=INDEX IDENTIFIER M/CODE START SHEET;136 PROCR;234;SUB ROUTINE H NOTES;RADIX;B;TO EDIT TIME AND RIBBON SHIFT 0;100;0;0;0;0;0;LINK 1;127;234;5;0;0;0;*6e9;gZERO 2;101;217;34;1;1;0;TABLE START 3;128;102;2;1;2;0; 4;126;234;0;0;1;0;gLEAVE S/R 5;106;234;16;0;0;0;*6et;COUNTER 6;101;0;1;1;2;0;;SUBTRACT 1 7;103;234;16;0;0;0;;COPY 8;127;234;11;0;0;0;;gZERO 9;125;0;0;1;2;0;;CLEAR(A) 10;124;234;2;1;0;0;;g 11;101;217;44;1;3;0;TABLE START 12;128;102;2;1;2;0; 13;101;0;15;1;3;0; 14;102;234;16;0;0;0;;TRANSFER 15;126;234;0;0;1;0;;LEAVE S/R 16;100;0;15;0;0;0;*6et SHEET;137 PROCR;235;SUB-ROUTINE X NOTES;RADIX;B;TO UPDATE SWITCH 0;100;0;0;0;0;0; 1;101;0;0;0;1;0;CLEAR B 2;106;0;7;0;3;0;;TEST IF DESTINATION 3;105;0;9;0;3;0;;SWITCH SET AT 2 4;127;235;7;0;1;0;gNO 5;106;0;9;0;2;0;AMEND SEQUENCE 6;102;0;7;0;3;0;CHANGES IN SWITCH 7;106;0;9;0;2;0; 8;102;0;9;0;3;0; 9;106;0;20;0;2;0; 10;102;0;20;0;3;0; 11;126;235;0;0;1;0;gLEAVE S/R SHEET;138 PROCR;236;SUB-ROUTINE BB NOTES;RADIX;B;TO READ A BLOCK FROM M/T 0;100;0;0;0;0;0;LINK 1;106;212;8;1;0;0;*10t;SET UP 2;102;212;16;1;0;0;*10t;MODIFIER 3;100;220;0;1;1;0; 4;104;233;24;0;0;0;RTE NO 5;126;100;0;0;0;0;gREAD 6;126;350;0;0;0;0;*10t;TEST RTE 7;126;314;0;0;0;0;gTEST A1=BLOCK CTR 8;127;236;19;0;0;0; 9;101;0;0;1;3;0;CLEAR A 10;126;331;0;0;0;0;gSTEP COUNTER BY-1 11;123;0;1;0;0;0;TEST 48 ATTEMPTS 12;100;212;16;0;0;0; 13;124;236;15;1;0;0;gTRY AND FIND THIS BLOCK 14;124;236;3;1;0;0;gREALIGN ON PREVIOUS BLOCK 15;124;188;0;0;1;0;SET UP LAST 16;106;190;0;0;0;0;BLOCK NUMBER TO 17;102;0;1;1;3;0;AVOID SERIAL FAILURE 18;124;236;3;1;0;0;*10t gTRY AGAIN 19;124;0;124;0;1;0;UNPACK 20;106;0;56;1;0;0; 21;128;228;0;1;0;0; 22;124;210;1;1;1;0;SET MOD GROUP 3 23;126;236;0;0;1;0;gLEAVE S/R SHEET;139 PROCR;237;INPUT/OUTPUT S/R NOTES;RADIX;B;ALLOC AND OVERLAY 0;100;0;0;0;0;0;LINK 1;118;0;5;0;0;0; 2;104;233;24;0;0;0;RTE NO 3;125;0;4096;1;1;0;SET NON-INT 4;126;100;0;0;0;0;g 5;126;237;0;0;1;0;gLEAVE S/R SHEET;140 PROCR;238;AUGMENT TIME SPENT IN PROGRAMME S/R 0;100;0;0;0;0;0;*09t06t 1;100;210;1;0;3;0;*3+t 2;106;0;157;0;0;0; 3;107;0;46;1;1;0;*3+t 4;100;212;0;0;3;0;SET BINARY 5;126;238;0;0;1;0;*09t06t 6;115;228;1;0;0;0;*pp0*pp2*3t3*3ee 7;124;242;81;1;0;0;*363 gNO,REJECT 8;124;477;6;1;0;0;*363363 SHEET;141 PROCR;239;TEST SENTINEL TYPE 5 S/R 0;100;0;0;0;0;0; 1;124;212;0;1;1;0;MGO 2;106;228;0;0;0;0;TEST SENTINEL BLOCK 3;105;211;0;0;0;0; 4;127;239;10;0;1;0;gNO 5;101;0;1;0;1;0; 6;106;228;1;0;0;0;*3t3*3ee 7;101;0;5;1;2;0; 8;127;242;13;0;0;0;*3t2*3et NOT ALLOWED ON 326 9;101;0;80;1;2;0;*3t2*3et 10;126;239;0;0;1;0; SHEET;142 PROCR;240;REPORT REQUIRED PROG NOT ON FILE NOTES;RADIX;B; 0;101;0;27;1;3;0;;IN W/L 1;126;237;0;0;0;0;gCLOSE FILE 2;126;177;0;0;0;0;gREQUEST T/W 3;101;0;4;1;3;0; 4;126;234;0;0;0;0;gS/R H 5;124;214;24;0;2;0;SET EDIT TABLE FOR LOST 6;102;217;26;0;0;0; 7;124;217;26;0;2;0;;FORM COMMENT 8;128;102;4;1;2;0; 9;106;209;2;0;0;0;26/1/0/0/0 10;105;233;24;0;0;0;RTE NO 11;102;106;12;0;0;0;;SET M/R SWITCH=1 12;106;209;6;0;0;0; 13;102;106;22;0;0;0;;AMEND S/C AT END OF 14;126;347;0;0;0;0;*469 gASSOC TIME SR SI=1 CODING 15;106;233;24;0;0;0;*59t 16;102;0;30;0;1;0;*59t 17;124;181;0;1;0;0;gLOG ROUTINE 18;106;209;7;0;0;0; 19;102;106;22;0;0;0;;RESET S/C 20;124;225;14;0;1;0;*579 21;102;224;2;1;0;0;CLEAR IDENTITY OF LAST PROGRAM USED 22;124;245;0;1;0;0;g SHEET;143 PROCR;241;ALLOCATION AND OVERLAY NOTES;RADIX;B;SUB-ROUTINE A: OPEN FILE IF NECESSARY 0;100;0;0;0;0;0;LINK 1;101;0;0;1;3;0;*5+t CLEAR CHANGE DECK 2;124;0;3;0;3;0;INDICATOR 3;102;0;164;0;0;0;*5+t 4;124;241;8;0;2;0;SET UP PSEUDO 5;101;267;0;1;2;0;ROUTE TYPE 6;104;209;10;0;0;0; 7;126;237;0;0;0;0;gTEST RTE DEALING;WITH D/B 8;100;210;1;0;3;0;AUGMENT BLOCK 9;124;233;24;0;1;0;TEST FIRST TIME ANY 10;106;190;0;0;0;0;PROG TAPE LOADED 11;127;241;15;0;0;0;gYES 12;101;0;1;1;3;0;COUNTER 13;124;233;24;0;1;0; 14;107;190;0;0;0;0; 15;100;212;0;0;3;0; 16;124;233;24;0;1;0;STEP FORWARD 17;119;0;0;1;3;0; 18;126;351;0;0;0;0;gTEST ROUTE NOTING D/B 19;124;233;24;0;1;0;;TEST CORRECT BLOCK 20;124;0;64;0;1;0;;NUMBER 21;106;0;1;1;0;0; 22;127;241;16;0;3;0;gNO, PROBABLY FBM 23;124;233;24;0;1;0; 24;105;190;0;0;0;0; 25;127;241;28;0;1;0;gNO, NOT FBM 26;124;241;0;0;1;0; 27;124;0;1;1;0;0;gLEAVE S/R+1 28;124;233;24;0;1;0; 29;104;190;0;0;0;0;;TESTLAST 30;124;225;14;0;1;0;*579 31;106;224;5;0;0;0; 32;118;0;4123;1;0;0;SET UP PROG'S IDENTIFIER 33;124;0;10;0;2;0; 34;118;0;5;1;0;0; 35;102;221;2;1;0;0; 36;124;245;22;0;2;0;SET LINK IN S/R B 37;102;242;0;0;0;0; 38;124;242;68;1;0;0;gS/R B 39;100;210;6;0;2;0; 40;124;0;40;0;2;0; 41;126;237;0;0;0;0;gSTEP BACK 42;126;236;0;0;0;0;gS/R BB 43;124;0;124;0;1;0;;TEST CHAPTER 44;106;0;12;1;0;0;;HEADING BLOCK 45;105;214;66;1;0;0; 46;127;245;42;0;1;0;gNO 47;106;228;2;1;0;0;;TEST CORRECT PROG 48;105;221;6;1;0;0;;IDENTITY AND 49;127;245;42;0;1;0;gNO;SERIAL NO 50;106;228;0;0;0;0;;TEST IF REQUIRED 51;105;221;11;0;0;0;;CHAPTER 52;127;245;42;0;1;0;gNO 53;106;108;10;0;0;0;;SET M/R SWITCH 54;102;106;11;0;0;0;;NON-INT 55;106;218;0;1;0;0;;STORE GP 3 REGS 56;128;222;10;0;0;0; 57;124;212;0;1;1;0;;RESET MOD GP 0 58;126;221;4;1;2;0;SET (MR2) FOR PROG 59;106;0;32;0;2;0;OVERLAYED CH NO 60;104;0;32;0;2;0;;SET MR2 FOR START OF 61;104;0;37;0;2;0;START OF LAST CH;CH TO BE OVERLAYED 62;102;0;28;1;0;0; 63;124;210;1;1;1;0;;SET MOD GP3 64;124;0;3;0;2;0;*14t SET OPT A SWITCH AT 3 65;102;296;4;0;0;0;*14t 66;106;0;18;0;2;0;START OF CH 67;103;0;28;1;0;0;;SET (MR2)=START CH 68;126;247;0;0;0;0;gLOAD S/R SHEET;148 PROCR;246;OVERLAY (3) NOTES;RADIX;B; 0;106;221;11;0;0;0;STORE NO OF CHAP LOADED 1;124;225;14;0;1;0;*579 2;102;224;4;0;0;0; 3;124;221;5;0;1;0;*60t;TESTPROG 4;106;0;11;0;0;0;;UNDER TRIAL 5;127;246;8;0;0;0;gNO 6;124;233;43;0;1;0; 7;124;0;7;1;0;0;*60t;gPTS 8;124;212;0;1;1;0;0;SET MOD GROUP 0 9;126;221;4;1;2;0;SET (MR2) FOR PROG 10;106;0;35;0;2;0; 11;102;0;7;0;2;0;;SET SI=4 12;106;218;4;1;0;0;RESTORE GROUP 3 REGISTERS 13;128;0;26;0;0;0; 14;126;107;6;1;1;0;SET (MR1) FOR M/R;(NEEDED FOR PTS) 15;106;106;14;0;0;0;SET M/R SWITCH AT 2 16;102;106;12;0;0;0; 17;100;220;1;0;2;0;*60t BITS 1-3 18;106;220;1;0;0;0;7 19;114;233;24;0;0;0;*60t RESET ROUTE IN CASE OF PTS 20;126;480;0;0;0;0; 21;124;103;5;1;0;0;gHEAD OF QUEUE 22;102;221;0;0;0;0;*60t RETURN FROM PTS(START) 23;106;209;8;0;0;0; 24;124;233;24;0;1;0; 25;102;0;64;0;0;0; 26;106;209;9;0;0;0; 27;102;0;124;0;0;0; 28;106;221;0;0;0;0; 29;127;245;24;0;0;0;gALIGNED AT END OF CHAP 30;124;245;42;1;0;0;gALIGNED AT START OF PROG SHEET;149 PROCR;247;LOAD SUB-ROUTINE NOTES;RADIX;B;LOAD NEXT CHAPTER 0;100;0;0;0;0;0;LINK 1;102;221;3;0;0;0;STORE START OF PARAMETER TABLE 2;101;0;16;0;1;0;*60t;TEST PTS 3;115;247;0;0;0;0;;LOADED 4;127;247;7;0;0;0;gNO 5;106;0;4;0;0;0; 6;124;247;8;1;0;0;*60t;g 7;106;0;28;0;0;0;SET IND MOD REG 1 AT 8;102;221;14;1;0;0;START OF CHAPTER 9;126;236;0;0;0;0;gS/R BB 10;106;212;0;1;0;0;SET IND MOD REG 2 AT 11;102;221;16;1;0;0;24:0 12;124;221;16;0;1;0;STORE NEXT WORD 13;106;228;0;1;0;0; 14;103;221;0;1;0;0; 15;105;210;4;0;0;0;;TEST FOR END OF 16;127;247;40;0;0;0;gYES;CHAPTER 17;104;210;5;0;0;0;;TEST FOR MINUS ZERO 18;127;248;0;0;0;0;gYES 19;125;0;0;1;2;0;;TEST FOR PARAMETER 20;101;0;4;0;1;0;;IN Q3 21;115;221;0;0;0;0; 22;127;248;4;0;1;0;gYES 23;106;221;3;0;0;0;FORM ABSOLUTE LOCATION OF PARAMETER 24;107;221;0;0;0;0; 25;106;221;1;0;0;0;;TEST INFORMATION 26;127;247;30;0;3;0;gYES;IS NEGATIVE 27;124;221;0;0;1;0;ADD PARAMETER VALUE 28;104;0;0;0;0;0; 29;124;247;32;1;0;0; 30;124;221;0;0;1;0;SUBTRACT PARAMETER VALUE 31;105;0;0;0;0;0; 32;124;221;14;0;1;0;STORE IN CHAPTER 33;102;0;0;0;0;0; 34;123;0;1;0;0;0; 35;100;221;14;0;0;0; 36;123;0;2;0;0;0; 37;100;221;16;0;0;0; 38;124;247;12;1;0;0;gDEAL WITH NEXT LOCATION 39;124;247;9;1;0;0;gREAD AND UNPACK NEXT BLOCK 40;126;247;0;0;1;0;gLEAVE S/R SHEET;150 PROCR;248;LOAD SUB-ROUTINE CONT NOTES;RADIX;B; 0;106;218;2;1;0;0;STACK MINUS ZERO 1;124;221;14;0;1;0; 2;128;0;0;1;0;0; 3;124;247;34;1;0;0;g 4;101;0;3840;1;2;0;;TEST FOR 15 IN Q3 5;127;248;17;0;0;0;gYES 6;106;221;1;0;0;0;STORE WORD IN CHAPTER 7;124;221;14;0;1;0; 8;102;0;0;0;0;0; 9;100;212;4;0;2;0;FORM AND PACK 10;110;221;0;0;0;0;ENTRY POINT 11;118;0;4126;0;0;0;TO 3B M/R 12;101;0;158;1;1;0; 13;100;210;0;0;2;0; 14;124;221;14;0;1;0; 15;114;0;0;0;0;0; 16;124;247;34;1;0;0;g 17;106;221;1;0;0;0;STEP ON STACKING LOCATION COUNTER 18;107;221;14;0;0;0; 19;124;247;36;1;0;0;g 20;100;0;0;0;0;0;*pp0*pp2*14e*42e*46e*5+e 21;127;264;25;0;1;0;*163 gNO 22;100;285;43;0;0;0;*0138te;(12)RE-READ SHEET;151 PROCR;249;SET INDIRECT MR AND SEARCH MULTI-ROUTE LOADING,LIST 0;100;0;0;0;0;0;*57t 1;102;108;25;0;0;0;STORE A 2;101;0;36;1;3;0;;SET INDIRECT MR=36:0 3;102;225;15;0;0;0; 4;102;225;14;0;0;0; 5;106;108;25;0;0;0;SELECT A 6;124;225;14;0;1;0;SEARCH LIST 7;105;224;0;0;0;0; 8;127;249;14;0;0;0;gAVAIL 9;123;0;6;0;0;0;STEP MOD BY 6 10;100;225;14;0;0;0; 11;124;249;5;1;0;0;gDO NEXT SEARCH 12;124;249;0;0;1;0;gLEAVE S/R+1;END OF MOD 13;124;0;1;1;0;0; 14;126;249;0;0;1;0;*57t;gLEAVE SR SHEET;152 PROCR;250;STORE MOD GROUP 3 S/R 0;100;0;0;0;0;0;*59t STORE MOD 1;100;212;0;0;3;0;SET BINARY 2;106;0;3;0;1;0;GROUP 3 3;127;250;7;0;2;0;gNOT 28/1/1 4;102;250;6;0;0;0; 5;106;212;18;1;0;0; 6;128;129;6;1;1;0;FORMED BULK COPY ORDER 7;126;250;0;0;1;0;gLEAVE S/R SHEET;153 PROCR;251;USE OF ASSEMBLER TABLE SHEET;154 CONST;252;1;USE OF ASSEMBLER TABLE 0;(D)ppppp ;CH0 LAST RT NO & TYPE 2;0;CH0 DB INDICATORS 4;0;CH3 RT 0 1ST WD 6;0;CH3 RT 0 2ND WD 8;ppppp ;CH1 LAST RT NO & TYPE 10;0;CH1 DB INDICATORS 12;0;CH3 RT 1 1ST WD 14;0;CH3 RT 1 2ND WD 16;ppppp ;CH2 LAST RT NO & TYPE 18;0;CH2 DB INDICATORS 20;0;CH3 RT 2 1ST WD 22;0;CH3 RT 2 2ND WD 24;ppppp ;CH3 LAST RT NO & TYPE 26;0;CH3 DB INDICATORS 28;0;CH3 RT 3 1ST WD 30;0;CH3 RT 3 2ND WD 32;ppppp ;CH4 LAST RT NO & TYPE 34;0;CH4 DB INDICATORS 36;0;CH3 RT 4 1ST WD 38;0;CH3 RT 4 2ND WD 40;ppppp ;CH5 LAST RT NO & TYPE 42;0;CH5 DB INDICATORS 44;0;CH3 RT 5 1ST WD 46;0;CH3 RT 5 2ND WD 48;ppppp ;CH6 LAST RT NO & TYPE 50;0;CH6 DB INDICATORS 52;0;CH3 RT 6 1ST WD 54;0;CH3 RT 6 2ND WD 56;ppppp ;CH7 LAST RT NO & TYPE 58;0;CH7 DB INDICATORS 60;0;CH3 RT 7 1ST WD 62;0;CH3 RT 7 2ND WD 64;0;*02t3:t4pt*53t0tt3:t4pt 66;0;RT 19/18 PROG NO 68;0;RT 17/16 FILE ID 70;0;*53t0tt3:t4pt 72;0;RT 25/24 PROG NO 74;0;RT 27/26 PROG NO 76;0;RT 25/24 FILE ID 78;0;RT 27/26 FILE ID 80;0;*53t0tt3:t4pt 82;0;RT 19/18 REEL NO 84;0;PADDING 86;0;*53t0tt3:t4pt 88;0;RT 25/24 REEL NO 90;0;RT 27/26 REEL NO;24100 SHEET;155 CONST;253;1;P/T I/P(CH2)W/L'S 0;(D)0;*53t0tt3:t4pt 2;0;2ND WORD 4;0;RT 1 6;0; 8;0;RT 2 10;0; 12;0;RT 3 14;0;;24200 SHEET;156 CONST;254;1;40-COL CARD READER W/L'S 0;(A);*16t0tt3:t4pt 2;;RT 4 2ND WORD 4;;RT5 1ST WORD 6;;RT5 2ND WORD 8;;RT6 1ST WORD 10;;RT6 2ND WORD 12;;RT7 1ST WORD 14;;RT7 2ND WORD;24300 SHEET;157 CONST;255;1;P/TI/P(CH2)W/L'S SHEET;158 CONST;256;1;PADDING 0;(D)0;*3:t4pt 2;0; SHEET;159 CONST;257;1;CHANNEL 16 ETC 0;(D)ppppp ;*3:t4pt CH 16 2;0;CH16 DB INDS 4;0; 6;0; 8;ppppp ;CH17 10;0; 12;0; 14;0; 16;ppppp ;CH18 18;0; 20;0; 22;0; 24;ppppp ;CH19 26;0; 28;0; 30;0; 32;ppppp ;CH20 34;0; 36;0; 38;0; 40;ppppp ;CH21 42;0; 44;0; 46;0; SHEET;160 CONST;258;1;MISC WL'S AND CONSTANTS 0;(A)*(D)00410000; *:SP:1:SP:SP 2;(D)0;COL 1 4;0;COL 2&6 6;0;COL 3 8;0;COL 4 10;0;COL 5 12;0001+00080;BULK COPY FOR LOG 14;2001+00000;BULK CLEAR FOR PRINTER W/E 16;0;(MR2) 18;8000000000; 20;0;LIB CARD SERIAL NUMBER, ROUTE BEING REWOUND 22;(A)SNT? ; 24;HDG ; 26;FINIS; 28;(D)7t(A)END(D)7e;(END) 30;0;USED IN ABANDON S/R SHEET;161 CONST;259;1;MATRIX FOR LIBRARIAN CARDS 0;(D)0;*25t*05t 2;0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0; 20;0; 22;0; 24;0; 26;0; 28;0; 30;0; 32;0; 34;0; 36;0; 38;0; 40;0; 42;0; 44;0; 46;0; 48;0; 50;0; SHEET;162 CONST;260;1;W/L'S FOR P/T O/P 0;(D)0;*05t CARD O/P ANNEXE 2;; 4;; 6;;*05t 8;(D)0001000024;*259*059 LIB CRD 10;(D)0;'(64+R)' 12;0;INDIRECT MODIFIER 14;3p00000000; 16;7.00000000; 18;0;REEL NO. FILE IDENTITY 20;0;W/L 22;7.7.7.7.7.; 24;3.00000000; SHEET;163 TABLE;261;1; NOTES;;; 0;258;2;0;0;2;0;3;0;0;0;0;0;0;COMMENT 2;258;5;0;0;0;0;3;2;0;1;0;0;0;ROUTE NUMBER 4;102;0;0;0;2;0;1;0;1;0;0;0;0;SP,TAB 6;258;4;0;0;0;0;5;0;0;0;0;0;0;COL 2 8;211;20;0;0;2;0;2;0;0;0;0;0;1;/////L/E,L/E 10;258;2;0;0;2;0;3;0;0;0;0;0;0;COMMENT 12;258;5;0;0;0;0;3;2;0;1;0;0;0;ROUTE NUMBER 14;102;0;0;0;2;0;1;0;1;0;0;0;0;SP,TAB 16;258;4;0;0;0;0;5;0;0;0;0;0;0;COL 2 18;102;0;0;0;2;0;1;0;1;0;0;0;0;SP,TAB 20;258;6;0;0;0;0;5;0;0;3;0;0;0;COL 3 22;102;0;0;0;2;0;1;0;1;0;0;0;0;SP,TAB 24;258;8;0;0;2;0;5;0;0;0;0;0;0;COLUMN 4 26;211;20;0;0;2;0;2;0;1;0;0;0;1;SP,L/E L/E 28;258;2;0;0;2;0;3;0;0;0;0;0;0;COMMENT 30;258;5;0;0;0;0;3;2;0;1;0;0;0;ROUTE NUMBER 32;102;0;0;0;2;0;1;0;1;0;0;0;0;SP TAB 34;258;4;0;0;0;0;5;0;0;0;0;0;0;COL 2 36;102;0;0;0;2;0;1;0;1;0;0;0;0;SP TAB 38;258;6;0;0;2;0;5;0;0;0;0;0;0;COL 3 40;102;0;0;0;2;0;1;0;1;0;0;0;0;SP TAB 42;258;8;0;0;2;0;5;0;0;0;0;0;0;COL 4 44;102;0;0;0;2;0;1;0;0;0;0;0;0;TAB 46;258;10;0;0;0;0;5;0;0;5;0;0;0;COL 5 48;211;20;0;0;2;0;2;0;0;0;0;0;1;L/E,L/E 50;102;72;0;0;0;0;5;0;0;4;0;0;1;*679 52;258;10;0;0;0;0;5;0;0;0;0;0;1;*8p9 SHEET;164 TABLE;262;1; NOTES;;; 0;258;2;0;0;2;0;3;0;0;0;0;0;0;COMMENT 2;258;5;0;0;0;0;3;2;0;1;0;0;0;ROUTE NUMBER 4;102;0;0;0;2;0;1;0;0;0;0;0;0;TAB 6;258;4;0;0;0;0;5;0;0;0;0;0;0;COL 2 8;102;0;0;0;2;0;1;0;0;0;0;0;0;TAB 10;258;6;0;0;0;0;5;0;0;0;0;0;0;COL 3 12;102;0;0;0;2;0;1;0;1;0;0;0;0;SP,TAB 14;258;8;0;0;0;0;5;0;0;0;0;0;0;COL 4 16;102;0;0;0;2;0;1;0;2;0;0;0;0;2 SP,TAB 18;258;10;0;0;2;0;5;0;0;0;0;0;0;COL 5 20;211;20;0;0;2;0;2;0;0;0;0;0;1;L/E,L/E 22;211;20;0;0;2;0;2;0;0;0;0;0;1;*3pt*712 24;258;21;0;0;0;0;3;2;2;1;0;0;0;*3pt*712 LIB NO 26;258;21;0;0;0;0;3;2;2;1;0;0;0;*71t*3p9 LIB NO 28;211;20;0;0;2;0;2;0;0;0;0;0;1; 30;260;18;0;0;0;0;5;0;5;0;0;0;0;REEL PROGM 10 32;258;21;0;0;0;0;3;2;2;1;0;0;0;*71t*3p9 LIB NO 34;214;22;0;0;2;0;4;1;3;0;0;0;1;/////3SP L/E N/E N/E R/S SHEET;165 PROCR;263;W.L'S FOR OPTIONS AND ZZZ COMMENT NOTES;RADIX;; 0;101;0;0;0;3;0;CONSTANT 1;100;295;0;0;0;0;*14e;(1)ABANDON 2;100;410;7;0;0;0;(2)ALARM TYPE 3 3;100;416;0;0;0;0;(3) 4;100;289;6;0;0;0;(4) ALARM TYPE 2 5;100;289;4;0;0;0;(5) 6;100;289;2;0;0;0;(6) 7;100;289;0;0;0;0;(7) 8;100;106;9;0;0;0;*42e;(8) ALARM TYPE 1 9;100;280;30;0;0;0;*42e;(9) 10;100;290;0;0;0;0;*46e;(10)REOFFER OPTIONS 11;100;286;35;0;0;0;;(11)RE-WRITE 12;100;285;3;0;0;0;*0138te;(12)RE-READ 13;100;291;0;0;0;0;*5+e;(13)CHANGE DECKS 14;100;263;23;0;0;0;*77t;(14)ZZZ08 15;100;442;32;0;0;0;*77t;(15)CONTINUE RUN FWD 16;126;312;0;0;0;0;gZZZ01 17;126;312;0;0;0;0;g 02 18;126;312;0;0;0;0;g 03 19;126;312;0;0;0;0;g 04 20;126;312;0;0;0;0;g 05 21;126;312;0;0;0;0;g 06 22;126;312;0;0;0;0;g 07 23;126;312;0;0;0;0;g 08 24;126;312;0;0;0;0;g 09 25;126;312;0;0;0;0;g10 26;100;210;1;0;3;0;*pp0*pp2*063 27;106;0;157;0;0;0;*063063 SHEET;166 PROCR;264;SET UP SI NOTES;RADIX;B; 0;101;267;0;1;2;0;PSEUDOROWTETYPE;PROGRAMMED 1;102;0;31;0;1;0;;TEST ROUTE 2;124;252;0;0;2;0;;USE OF ASSR TABLE 3;102;0;32;0;1;0; 4;106;209;4;0;0;0;*49t 5;102;0;9;0;0;0;*49t 6;106;0;3;0;1;0;*59t STORING MOD;GROUP 3 7;127;264;29;0;2;0;TEST 28/1/1 8;126;250;0;0;0;0;*59t STORE MOD GROUP 3 S/R 9;124;264;29;1;0;0; 10;124;212;0;1;1;0;SET MOD GROUP 0 11;124;0;2;0;1;0;STORE (AB) IN SI 12;100;0;30;1;0;0; 13;106;0;3;0;1;0;*59t STORING MOD GROUP 3 14;127;264;18;0;2;0;gNOT 28/1/1 15;102;264;17;0;0;0; 16;106;212;18;1;0;0; 17;128;129;6;1;1;0;*59t 18;106;100;0;0;0;0;SET UP LINK IN SI 19;102;0;44;1;1;0;SET ASSOC TIME=0 20;106;209;4;0;0;0;*49t;26/0/1 2 RESTORE (9) 21;102;0;9;0;0;0;*49t 22;106;0;31;0;1;0;*169199 23;101;0;48;1;2;0;*19t TEST SELECT REEL COUNTER 24;127;449;0;0;0;0;*19t gYES 25;101;0;1;1;2;0;*16t*19+;0000000049 26;124;0;2;0;1;0;TEST UPTIME POCKET SELECT 27;127;0;12;0;0;0;*16t gYES-UPTIME 28;126;338;0;0;0;0;SET SI=1 29;124;0;2;0;1;0;*063 OBEY TEST ROUTE(SET DECIMAL) 30;124;0;7;1;0;0;*063063 g51+7;(6/0/0/0/157) 31;107;0;46;1;1;0;*09t06t 32;100;212;0;0;3;0;SET (C) FOR BINARY 33;124;0;2;0;1;0; 34;124;0;7;1;0;0;*09t06t 35;124;263;16;1;0;0;*pp0*pp2*03e*02e*04e*05e*19e*1ee*30e*2.e 36;124;263;16;1;0;0;*49e*16e*56e82e*82e*81e 37;124;436;9;1;0;0;*1te M/T INPUT 38;124;268;0;1;0;0;*pp2*1te1te SHEET;167 PROCR;265;FORM INTERCHANGE AREA ADDRESSES NOTES;RADIX;B; 0;119;0;56;0;1;0;*099069*3+9 RESET MILLISECOND TIMER 1;103;188;0;1;0;0; 2;118;0;6;0;3;0;FORM INSTRUCTION;SWITCH SAS 20000 SHEET;168 PROCR;266;NB THE PRECEDING ORDER IS'SWITCH SAS'SET AT'26/0/0gDB:DETECT NOTES;;;DURING'SET DB IND'IF DB FOUND IN'TEST ROUTE'IN PROG SWITCH 0;104;0;32;0;1;0;*4p2*3:2;PSEUDO ROUTE 1;104;263;0;0;0;0;*4p2*3:2;1/0/3 ORDER 2;124;188;1;0;1;0;RTE TYPE 1-48*OR*SR;LINK-THIS ADDRESS+1 SHEET;169 PROCR;267;SWITCH SI NOTES;RADIX;B; 0;124;267;0;1;0;0; 1;124;405;0;1;0;0;*03e*3:4*4p4 P/T O/P; 3 3 2;124;263;16;1;0;0;ZZZ COMMENT 3;124;388;0;1;0;0;*05e*3:4*4p4 DEC O/P ; 4 4 4;124;390;0;1;0;0;*3:4*4p4 PRINTER; 3 3 5;124;373;0;1;0;0;*02e*3:4*4p4 P/T I/P; 3 3 6;124;375;0;1;0;0;*04e CARD I/P 7;124;420;0;1;0;0;*3:4*4p4 M/T I/P; 3 3 8;124;433;0;1;0;0;*3:4*4p4 M/T O/P; 3 3 9;124;390;0;1;0;0;*3:4*4p4 PRINTER; 3 3 10;124;395;0;1;0;0;*30e*4p4*3:4 AUTOLECTOR;3 3 11;124;401;0;1;0;0;*03e P/T O/P;OPEN FILE 12;124;263;16;1;0;0;ZZZ COMMENT 13;124;387;0;1;0;0;*05e DEC CARD OUTPUT 14;124;269;2;1;0;0;PRINTER 15;124;364;0;1;0;0;*02e P/T INPUT 16;124;366;0;1;0;0;*04e DEC CARD INPUT 17;124;409;0;1;0;0;MAG TAPE INPUT 18;124;424;0;1;0;0;MAG TAPE OUTPUT 19;124;269;2;1;0;0;PRINTER 20;124;394;0;1;0;0;*30e AUTOLECTOR 21;124;408;0;1;0;0;*03e P/T OUTPUT;CLOSE FILE 22;124;263;16;1;0;0;ZZZ COMMENT 23;124;391;0;1;0;0;*05e DEC CARD OUTPUT 24;124;268;0;1;0;0;PRINTER 25;124;383;0;1;0;0;*1te1te*02e P/T INPUT 26;124;383;0;1;0;0;*1te1te*04e DEC CARD INPUT 27;124;423;0;1;0;0;*1te MAG TAPE INPUT 28;124;436;0;1;0;0;MAG TAPE OUTPUT 29;124;268;0;1;0;0;PRINTER 30;124;268;0;1;0;0;*30e AUTOLECTOR 31;124;424;0;1;0;0;MAG TAPE OUTPUT;OPEN FILE 32;124;409;0;1;0;0;MAG TAPE INPUT;32 33;124;437;0;1;0;0;CURRENT USE O/P;REWIND 34;124;437;2;1;0;0;CURRENT USE I/P;34 35;124;438;2;1;0;0;CURRENT USE O/P;RUN BACK 36;124;438;9;1;0;0;CURRENT USE I/P;36 37;124;438;0;1;0;0;CURRENT USE I/P;RUN FORWARD 38;124;438;0;1;0;0;CURRENT USE I/P;38 39;124;444;2;1;0;0;O/PgO/P;STEP BACK 40;124;443;0;1;0;0;I/PgI/P;40 41;124;446;2;1;0;0;*1ee FUTURE USE O/P;STEP FORWARD 42;124;446;0;1;0;0;*1ee FUTURE USE I/P;42 43;124;444;0;1;0;0;O/PgI/P;STEP BACK 44;124;443;2;1;0;0;I/PgO/P;44 45;124;434;0;1;0;0;gMAG TAPE OUTPUT;CLOSE REEL 46;124;422;0;1;0;0;MAG TAPE INPUT;46 47;124;448;0;1;0;0;SET;REEL NUMBER 48;124;263;16;1;0;0;gZZZ01 SELECT;48 49;124;378;0;1;0;0;*16t49t56t82t81t81t*16e UPT POCKET SEL 50;124;397;0;1;0;0;*49t56t81t82t*49e;MICR INPUT 51;124;398;0;1;0;0;*49e;MICR POCKET SELECT 52;124;396;0;1;0;0;*49e;MICR OPEN FILE 53;124;400;0;1;0;0;*56e82e;DATA TRANS OPEN FILE 54;124;399;0;1;0;0;*56e82e;DATA TRANS READ 55;124;269;2;1;0;0;*81t82t*81e;OPEN 5-8 HOLE P/T 56;124;268;0;1;0;0;*81e;CLOSE 5-8 HOLE P/T 57;124;390;0;1;0;0;*81e*3:4 OUTPUT;0000000003 58;124;389;0;1;0;0;*82e;NHKG OUTPUT 59;124;269;2;1;0;0;*82e;NHKG OPEN 60;124;391;5;1;0;0;*82e;NHKG CLOSE SHEET;170 PROCR;268;UPDATE USE OF ASSEMBLER TABLE ETC. NOTES;RADIX;; 0;124;188;0;0;1;0; 1;119;0;0;1;2;0;SET ROUTE TO MANUAL OR UNLOAD 2;106;211;0;0;0;0; 3;102;188;1;0;0;0;SET RT TYPE AT p5 4;106;188;0;0;0;0; 5;126;299;0;0;0;0;gCLEAR D/B INDICATOR 6;126;349;0;0;0;0;gUPDATE ASSEMBLER TABLE 7;124;0;2;0;1;0;RESTORE MOD GROUP 8;124;0;29;1;1;0; 9;124;0;2;0;1;0;*59t STORE ABC 10;100;0;30;1;0;0; 11;124;0;2;0;1;0;PREPARE FOR ENTRY 12;106;0;26;0;0;0;TO SWITCH 13;102;268;14;0;0;0; 14;100;0;0;0;0;0;*59t 15;124;0;2;0;1;0; 16;124;0;28;1;0;0;g COMMERCIAL PROG. SHEET;171 PROCR;269;UPDATE ASSEMBLER TABLE:SET UP (AB) NOTES;RADIX;B; 0;102;188;1;0;0;0;STORE RTE TYPE 1;126;349;0;0;0;0;gUPDATE USE OF ASSEMBLER TABLE 2;106;0;40;0;1;0;SET(A)=RUN NUMBER 3;118;0;4127;0;0;0; 4;100;212;0;0;2;0;SET (B)=0 5;124;268;7;1;0;0;gRESET MOD GP SHEET;172 PROCR;270;ROUTE CLOSED ROUTINE NOTES;RADIX;B; 0;106;209;2;0;0;0;*462;LARGE AND NEGATIVE 1;102;0;45;0;1;0;*462 SET PROG TIME TO INHIBIT'RC'COMMENT 2;126;347;0;0;0;0;*469 SET PROG TIME 3 MINS AHEAD OF CLOCK 3;106;270;15;0;0;0; 4;124;0;3;0;1;0;SET SETTING FOR S101 5;102;0;176;0;0;0;TO TEST ROUTE 6;106;0;30;0;1;0;*13t;TEST RTE 7/7 7;101;0;175;1;2;0;*3:+;00023 8;127;263;24;0;0;0;*13t gYES,ZZZ COMMENT 9;106;214;26;1;0;0;SET RC FOR COMMENT 10;102;258;2;1;0;0; 11;126;356;0;0;0;0;gSET UP PROGRAMME NO 12;101;0;4;1;3;0; 13;126;345;0;0;0;0;gEDIT TIME SET UP RTE NO 14;124;282;9;1;0;0;gOUTPUT COMMENT 15;126;338;0;0;0;0; SHEET;173 PROCR;271;DOUBTFUL BLOCK: PREPARATION NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK=SI+11 1;124;271;0;0;1;0;SET UP (MR1) 2;106;0;25;1;0;0; 3;102;0;2;1;0;0; 4;100;210;8;0;2;0;SET (MR3)=8*CH NO 5;115;0;30;0;1;0; 6;126;272;0;0;0;0;gSET D/B INDICATOR 7;124;271;0;0;1;0; 8;124;0;1;1;0;0;gSI+12 SHEET;174 PROCR;272;SET DOUBTFUL BLOCK INDICATOR 0;100;0;0;0;0;0;LINK 1;102;0;6;1;0;0;SET (MR3) = 8 * CH NO 2;100;220;1;0;2;0;STORE RTE NO IN W/L 3;115;252;0;0;3;0; 4;102;109;0;0;0;0; 5;101;0;1;0;1;0; 6;106;252;1;0;3;0;*16t;TEST BEFORE POCKET 7;101;0;49;1;2;0;;SELECT ON UPTIME 8;127;272;48;0;0;0;*16t;gYES SPURIOUS 9;106;252;1;0;3;0;*49t 10;101;0;50;1;2;0;;TEST MICR READ 11;127;284;0;0;0;0;;gYES 12;101;0;1;1;2;0;;TEST MICR WRITE 13;127;284;0;0;0;0;*49t;gYES 14;106;0;31;0;1;0;*56t82t 15;101;0;54;1;2;0; 16;124;0;2;0;3;0; 17;127;0;12;0;0;0;;gYES 18;106;0;31;0;1;0; 19;101;267;0;1;1;0; 20;101;399;22;1;2;0; 21;118;0;6;0;0;0; 22;127;284;0;0;0;0;*56t82t 23;106;252;1;0;3;0;*82t;D/B LINK 24;101;0;58;1;2;0;;MANDATORY 25;127;284;0;0;0;0;*82t 26;106;0;31;0;1;0;*81t;5-8 HOLE OUTPUT 27;101;0;57;1;2;0; 28;127;284;0;0;0;0;*81t;gYES 29;106;252;1;0;3;0;*83t 30;101;0;5;1;2;0; 31;127;272;35;0;1;0;gNOT P/T INPUT 32;106;0;33;0;1;0; 33;101;0;1;1;2;0; 34;127;272;48;0;0;0;*83t;8-HOLE P/T SPURIOUS 35;106;252;1;0;3;0; 36;105;211;0;0;0;0; 37;127;272;50;0;0;0;gYES 38;106;252;1;0;3;0;;TEST RT TYPE 0 39;127;272;41;0;1;0;gNO 40;124;0;11;0;2;0;;SET RTE TYPE 11 41;124;109;0;0;1;0; 42;118;0;0;1;0;0;SET RT TYPE AS D/B INDICATOR 43;114;252;2;1;3;0; 44;106;103;13;0;0;0;SET SAS=2 45;102;265;2;0;0;0; 46;106;108;23;0;0;0;SET SLAS=2 47;102;103;12;0;0;0; 48;106;211;0;0;0;0;CLEAR ASSEMBLER TABLE 49;102;252;1;0;3;0; 50;126;272;0;0;1;0; 51;100;0;0;0;0;0;*pp0*pp2 52;124;263;16;1;0;0;*03e*02e*04e*05e*30e*2.e 53;127;279;32;0;0;0;*42e 54;127;285;59;0;0;0;*43e 55;101;280;6;1;3;0;*66e 56;126;351;0;0;0;0;*09e06e;TEST RTE NOTING D/B 57;127;285;43;0;1;0;*013 gNO 58;127;279;32;0;2;0;*42t42e gNO 59;124;282;5;1;0;0;*2.286e PRINTER;4 SHEET;175 PROCR;273;DOUBTFUL BLOCK : DETECTION 0;100;0;0;0;0;0;LINK 1;100;210;8;0;2;0;SET (MR3)=8*CH NO 2;102;109;0;0;0;0; 3;115;109;0;0;0;0; 4;102;0;6;1;0;0; 5;100;220;1;0;2;0;STORE 'RTE NO WITHIN CH' 6;115;109;0;0;0;0; 7;102;109;0;0;0;0; 8;101;0;1;0;1;0;TEST D/B INDICATOR 9;124;109;0;0;1;0;SET FOR THIS ROUTE 10;118;0;0;1;0;0; 11;115;252;2;1;3;0; 12;127;276;3;0;0;0;gNO SHEET;176 PROCR;274;DOUBTFUL BLOCK : INITIATION 0;118;0;1;0;0;0; 1;114;252;2;1;3;0;CLEAR D/B INDICATOR 2;118;109;0;1;2;0; 3;118;0;4120;0;0;0;SET SDB AT ROUTE TYPE 4;103;109;17;0;0;0; 5;101;0;2;1;2;0;;TEST T/W 6;127;274;12;0;0;0;gYES 7;101;0;9;1;2;0;;TEST NOTE DB 8;127;274;12;0;0;0;gYES 9;106;188;1;0;0;0; 10;124;0;3;0;1;0; 11;102;0;174;0;0;0; 12;102;109;0;0;0;0; 13;124;109;0;0;1;0;;TEST ALL 14;104;252;2;1;0;0;;ENTRIES ZERO 15;123;0;8;0;0;0; 16;100;109;0;0;0;0; 17;124;274;13;1;0;0; 18;127;274;29;0;1;0;gNO 19;101;0;128;1;3;0;*3:t 20;102;212;14;0;0;0; 21;124;212;14;0;1;0; 22;104;252;2;1;0;0; 23;123;0;8;0;0;0; 24;100;212;14;0;0;0; 25;124;274;21;1;0;0; 26;127;274;29;0;1;0;*3:t 27;106;108;22;0;0;0;18/0/36 RESET SWITCH SAS 28;102;265;2;0;0;0; 29;124;109;17;0;1;0; SHEET;177 PROCR;275;DOUBTFUL BLOCK SWITCH 0;124;275;0;1;0;0;;SWITCH SDB 1;124;277;0;1;0;0;*03e P/T O/P 2;124;187;0;1;0;0;TYPEWRITER;2 3;124;282;5;1;0;0;*05e CARD OUTPUT;3 4;124;282;0;1;0;0;*2.286e PRINTER;4 5;124;279;2;1;0;0;*429*02e P/T INPUT;5 6;124;279;7;1;0;0;*421*02e P/T INPUT;5 7;124;279;5;1;0;0;*421*04e 8;124;279;0;1;0;0;*429*04e CARD INPUT;6 9;124;285;0;1;0;0;M/T INPUT;7 10;124;286;0;1;0;0;M/T OUTPUT;8 11;124;282;5;1;0;0;SPECIAL PRINTER;9 12;124;284;0;1;0;0;*30e AUTOLECTOR;10 SHEET;178 PROCR;276;NOTE D/B 0;106;210;1;0;0;0;;11 1;124;0;3;0;1;0;SET D/B IND IN SP CH 2;102;0;160;0;0;0; 3;106;188;0;1;0;0; 4;118;0;6;0;3;0; 5;126;273;0;0;1;0;g SHEET;179 PROCR;277;PAPER TAPE OUTPUT DOUBTFUL BLOCK 0;106;0;31;0;1;0;*03t 1;101;267;0;1;1;0;TEST D/B GENUINE 2;101;404;8;1;2;0; 3;105;209;10;0;0;0; 4;127;288;0;0;1;0;gNO 5;126;339;0;0;0;0;SET (MR3)=(3) 6;106;0;188;0;3;0;*28t;TEST NON STD 7;127;277;20;0;0;0;gNO 8;106;0;194;0;3;0;RESET(64+R) 9;102;0;192;0;3;0; 10;106;0;33;0;1;0;;TEST LINK 11;127;263;18;0;0;0;gNO ZZZ COMMENT 12;101;0;15;0;1;0;RETURN TO PROGRAMME 13;114;0;44;0;1;0;BY LINK 14;106;214;40;1;0;0;SET UP DB FOR COMMENT 15;102;258;2;1;0;0; 16;126;361;0;0;0;0;gSET UP PART OF COMMENT 17;106;291;2;0;0;0;SET SETTING OF 18;102;0;176;0;3;0;S101 TO TEST ROUTE 19;124;282;9;1;0;0;gOUTPUT COMMENT 20;101;0;0;1;3;0;*28t 21;100;210;8;0;2;0;*73t*74t 22;115;188;0;0;0;0;;TEST CHANNEL 6 23;101;0;48;1;2;0; 24;127;277;45;0;0;0;*73t*74t;gYES P/T O/P ASS 25;124;0;3;0;3;0;*73t;GP ASSEMBLER 26;124;0;190;0;2;0; 27;124;188;0;0;3;0; 28;102;0;64;0;0;0; 29;106;260;24;1;0;0; 30;126;278;0;0;0;0;gOUTPUT S/R 31;127;277;25;0;1;0;gD/B OCCURED 32;101;0;10;1;3;0;SET COUNTER FOR 33;102;0;192;0;3;0;NUMBER OF DB MARKS 34;101;0;31;1;3;0; 35;118;0;8;0;0;0; 36;126;278;0;0;0;0;gOUTPUT S/R 37;127;277;25;0;1;0;gD/B OCCURED 38;106;0;192;0;3;0; 39;101;0;2;1;2;0; 40;127;277;33;0;1;0;gNEXT D/B INDICATOR 41;106;260;24;1;0;0; 42;126;278;0;0;0;0;gOUTPUT S/R 43;127;277;41;0;1;0;*73t gD/B OCCURRED 44;124;277;57;1;0;0;*739*749 45;106;260;16;1;0;0;*74t;P/T ASSEMBLER 46;102;0;154;1;0;0;SET UP WORD 47;126;278;0;0;0;0;gOUTPUT S/R 48;127;277;45;0;1;0;gD/B OCCURED 49;106;211;14;1;0;0;SET FAULTY BLOCK MARKER 50;102;0;154;1;0;0;SET UP WORD 51;126;278;0;0;0;0;gOUTPUT S/R 52;127;277;45;0;1;0;gD/B OCCURED 53;106;260;16;1;0;0;B/E 54;102;0;154;1;0;0;SET UP WORD 55;126;278;0;0;0;0;gOUTPUT S/R 56;127;277;53;0;1;0;*74t gD/B OCCURRED 57;106;214;40;1;0;0;SET DB FOR COMMENT 58;102;258;2;1;0;0; 59;124;277;61;0;2;0; 60;124;282;8;1;0;0;gOUTPUT COMMENT 61;126;339;0;0;0;0;gSET(MR3)=(3) 62;106;0;194;0;3;0;RESET(64+R) 63;102;0;192;0;3;0; 64;106;0;174;0;3;0;RESTORE RTE TYPE 65;102;0;31;0;1;0; 66;102;0;174;0;3;0;CLEAR W/L 67;124;403;4;1;0;0;gO/P BLOCK S/R SHEET;180 PROCR;278;PAPER TAPE OUTPUT DOUBTFUL BLOCK OUTPUT S/R 0;100;0;0;0;0;0;*03t LINK 1;102;0;190;1;3;0;*739 STORE WORD 2;124;188;0;0;1;0;OUTPUT 3;119;0;0;0;0;0; 4;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 5;126;339;0;0;0;0;SET(MR3)=(3) 6;106;0;160;0;3;0;TEST D/B OCCURED 7;126;278;0;0;1;0;g SHEET;181 PROCR;279;D/B, P/T & CARD INPUT NOTES;RADIX;B;OFFER OPTIONS 0;101;280;4;1;3;0;*42t*66e 1;124;279;3;1;0;0;g 2;101;280;0;1;3;0; 3;124;0;3;0;1;0; 4;102;0;158;0;0;0;*42t 5;101;0;6;1;3;0;*422*04t 6;124;279;8;1;0;0;*04t 7;101;0;5;1;3;0;*029 8;102;280;42;0;0;0;*422 9;124;0;3;0;1;0;PROG SP CHAP START 10;106;0;174;0;0;0; 11;101;0;7;1;2;0;READING? 12;127;279;24;0;2;0;*42t42e gNO 13;106;0;33;0;1;0;TEST IF LINK SPECIFIED IN Q6-10 B 14;127;279;24;0;0;0;*42e gNO 15;101;0;15;0;1;0; 16;114;0;44;0;1;0; 17;106;214;40;1;0;0;SET 'DB' FOR COMMENT 18;102;258;2;1;0;0; 19;126;361;0;0;0;0;gSET UP PART OF COMMENT 20;106;270;15;0;0;0;SET SETTING OF S101 21;124;0;3;0;1;0;TO TEST ROUTE 22;102;0;176;0;0;0; 23;124;282;9;1;0;0;gOUTPUT COMMENT 24;106;258;0;1;0;0;*42t;SET UP ALARM 1 25;102;258;2;1;0;0; 26;126;362;0;0;0;0;gSET RTE TO MANUAL ETC 27;126;345;0;0;0;0;gEDIT TIME 28;124;0;897;0;2;0;*14+46+*14+*46+;003840089600385 29;102;0;41;0;1;0;PERMISSIBLE OPTIONS 30;101;261;0;1;3;0;SELECT TABLE START LOCN. 31;124;335;0;1;0;0;*42t 32;101;280;0;1;3;0;*422 33;124;282;8;1;0;0; SHEET;182 PROCR;280;*42 OPTIONS 8 & 9 NOTES;RADIX;B; 0;126;329;0;0;0;0;g READ 1;126;352;0;0;0;0;*42t*09e06e;TEST RTE NOTING D/B 2;125;0;0;1;2;0;*66t 3;124;280;5;1;0;0; 4;106;210;13;0;0;0; 5;102;210;14;0;0;0;*66t 6;126;341;0;0;0;0; 7;102;0;2;1;3;0;CLEAR SECOND WORD OF ANNEXE 8;126;329;0;0;0;0;gREAD 9;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 10;126;341;0;0;0;0;gSET (MR3)=(64+R) 11;126;344;0;0;0;0;gS/R WW 12;124;210;14;0;1;0;*669 13;106;0;0;1;3;0;;TEST ALIGNMENT CORRECT 14;124;109;0;0;1;0; 15;105;252;4;1;0;0; 16;127;281;0;0;1;0;gNO 17;124;210;14;0;1;0;*669 18;106;0;2;1;3;0; 19;124;109;0;0;1;0; 20;105;252;6;1;0;0; 21;127;281;0;0;1;0;gNO 22;106;188;0;0;0;0;*16t 23;105;100;31;0;0;0;TEST UPTIME*UPTIME ROUTE SMALL 24;127;280;30;0;2;0;gNO 25;126;378;10;0;0;0; 26;124;280;30;1;0;0;gACCEPTED 27;106;0;32;0;1;0;MEANT TO REJECT? 28;127;281;0;0;1;0;gRE OFFER OPTIONS;gNO 29;126;378;4;0;0;0;*16t 44 OF SWITCH 30;126;341;0;0;0;0;gSET (MR3)=(64+R) 31;102;0;2;1;3;0;CLEAR SECOND WORD OF ANNEXE 32;126;329;0;0;0;0;gREAD 33;124;0;3;0;1;0; 34;106;0;158;0;0;0;;TEST IF P/T 35;101;280;0;1;2;0; 36;127;280;38;0;0;0; 37;106;210;6;0;0;0;;SET UP ROUTE TYPE 38;101;0;5;1;1;0; 39;124;287;50;1;0;0;*42t 40;106;280;42;0;0;0;*422 41;124;287;50;1;0;0; 42;100;0;0;0;0;0;*422 SHEET;183 PROCR;281;ALIGNMENT INCORRECT FOR OPTION 8 NOTES;RADIX;B; 0;126;339;0;0;0;0;*42t 1;126;344;0;0;0;0;gS/R WW 2;124;109;0;0;1;0;SET FIRST TWO WORDS FOR COMMENT 3;106;252;4;1;0;0; 4;102;258;6;1;0;0; 5;124;109;0;0;1;0; 6;106;252;6;1;0;0; 7;102;258;8;1;0;0; 8;106;214;40;1;0;0;SETDB/ FOR COMMENT 9;102;258;2;1;0;0; 10;106;0;158;0;3;0;SELECT RETURN LINK 11;126;362;0;0;0;0;g SET RTE TO MANUAL 12;124;370;6;1;0;0;gOUTPUT COMMENT SHEET;184 PROCR;282;DOUBTFUL BLOCK:PRINTER NOTES;RADIX;B; 0;106;0;33;0;1;0;*2.286t TEST IF LINK SPECIFIED 1;105;0;30;0;1;0;*54t44t 2;127;282;5;0;0;0; 3;106;0;33;0;1;0;*54t44t 4;127;279;15;0;1;0;*2.286t gYES 5;106;214;40;1;0;0;SET DB/ FOR COMMENT 6;102;258;2;1;0;0; 7;101;283;0;1;3;0; 8;126;362;0;0;0;0;gSET RTE TO MANUAL ETC 9;124;261;0;0;2;0;SELECT TABLE START 10;124;336;0;1;0;0;gOUTPUT COMMENT SHEET;185 PROCR;283;PRINTER:ROUTINE AFTER D/B NOTES;RADIX;B; 0;126;330;0;0;0;0;gWRITE 1;101;0;4;1;3;0;*2.486+;00009 2;124;287;50;1;0;0;gEND ROUTINE SHEET;186 PROCR;284;DOUBTFUL BLOCK-AUTOLECTOR & CHEQUE SORTER 0;106;0;33;0;1;0;*30t49t56t81t82t82t 1;127;263;18;0;0;0;gNO ZZZ COMMENT 2;101;0;15;0;1;0;RETURN TO PROGRAM 3;114;0;44;0;1;0;BY LINK 4;106;0;35;0;1;0;SET SI=4 5;102;0;7;0;1;0; 6;106;0;33;0;1;0;ENSURE LINK NOT 7;105;0;39;0;1;0;BOGUS 8;127;263;18;0;0;0;gOPEN FILE,ZZZ COMMENT 9;124;397;13;1;0;0;gRETURN TO PROGM SHEET;187 PROCR;285;DOUBTFUL BLOCK:M/T INPUT NOTES;RADIX;B; 0;126;314;0;0;0;0;TEST A1=BLOCK COUNTER 1;127;288;0;0;1;0;gNO TO END ROUTINE 2;124;285;43;1;0;0;*019;STEP BACK 50/8 BLOCK 3;106;212;4;0;0;0; 4;126;306;0;0;0;0;g 5;126;342;0;0;0;0;*019 6;126;329;0;0;0;0;gREAD 7;126;343;0;0;0;0;*019 8;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 9;124;0;3;0;1;0;;TEST D/B IND SET 10;106;0;160;0;0;0; 11;127;285;27;0;0;0;*43e 12;126;358;0;0;0;0;gSTEP CTR OF TRIES=C 13;127;285;3;0;1;0;*013 gNO 14;124;0;3;0;1;0;;TEST RTE TYPE 7 15;106;0;174;0;0;0; 16;101;0;7;1;2;0; 17;127;285;21;0;1;0;gNO 18;106;0;33;0;1;0;;TEST LINK TO BE AMEN 19;127;285;21;0;0;0;gNO 20;127;285;63;0;2;0;g YES 21;125;0;0;1;2;0; 22;124;0;3;0;1;0; 23;102;0;175;0;0;0; 24;101;0;6145;1;3;0;*14+5++*14+*5++;020480614402049 25;102;0;41;0;1;0; 26;124;294;0;1;0;0;gOFFER OPTIONS 27;106;214;40;1;0;0;*43t;SET UP'DB' 28;102;258;2;1;0;0; 29;126;361;0;0;0;0;gSET UP PART OF COMMENT 30;106;109;6;1;0;0;SET UP I/P:1 31;102;258;8;1;0;0; 32;101;285;61;1;3;0;SET UP LINK FOR SI=5 33;126;363;0;0;0;0;g & SETTING OF S101 34;124;0;3;0;1;0;SET UP NO OF ATTEMPTS 35;106;0;167;0;0;0; 36;100;210;1;0;3;0;*519 37;107;258;8;1;0;0; 38;100;212;0;0;3;0;*519 39;125;0;0;1;2;0; 40;124;0;3;0;1;0;CLEAR COUNTER C 41;102;0;167;0;0;0; 42;124;432;9;1;0;0;*43t 43;124;188;0;0;1;0;*01t;TEST<52/10 BLOCKS 44;106;190;0;0;0;0; 45;101;0;82;1;2;0;*8t4;00010 46;127;285;3;0;3;0;gYES 47;101;0;50;1;3;0;*8t4;00008 48;126;306;0;0;0;0;gSTEP BACK 50 BLOCKS,FORWARD 1 49;126;339;0;0;0;0;gSET(MR3)=(3) 50;101;0;48;1;3;0;*8t4 COUNTER;00006 51;102;0;177;0;3;0; 52;126;355;0;0;0;0;STEP FORWARD 53;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 54;126;339;0;0;0;0;gSET(MR3)=(3) 55;106;0;177;0;3;0;;STEP COUNTER BY 56;105;210;6;0;0;0;;MINUS ONE AND 57;127;285;5;0;0;0;gYES;TEST END 58;124;285;51;1;0;0;*01t 59;124;0;3;0;1;0;*432;CLEAR COUNTER 60;102;0;167;0;0;0;*432 61;101;0;7;1;3;0; 62;124;287;50;1;0;0; 63;101;0;7;1;3;0; 64;102;0;31;0;1;0;RESET RTE TYPE 7 IN SI+31 65;124;0;3;0;1;0; 66;102;0;167;0;0;0;CLEAR ATTEMPTS COUNTER 67;106;0;33;0;1;0; 68;124;279;15;1;0;0;g AMEND LINK 69;127;287;31;0;0;0;*pp0*pp2*43e 70;127;286;46;0;0;0;*01e01e 71;127;293;34;0;0;0;*01t01e 72;127;287;28;0;1;0;*51e;gOMIT 73;126;351;0;0;0;0;*09e06e;TEST RTE NOTING D/B 74;127;425;23;0;0;0;*43e43e*51e51e;gBLOCK 7 75;124;285;6;1;0;0;*01901e SHEET;188 PROCR;286;DOUBTFUL BLOCK:M/T OUTPUT NOTES;RADIX;B; 0;126;341;0;0;0;0;gSET (MR3)=(64+R) 1;124;188;0;0;1;0;TEST BLOCK 7 2;106;190;0;0;0;0; 3;101;0;7;1;2;0; 4;127;286;9;0;1;0;gNO 5;106;0;6;0;0;0;TEST FINISHED 6;118;0;4124;0;0;0;OPENING FILE 7;101;0;14;1;2;0; 8;127;288;0;0;1;0;gYES IGNORE O/B 9;106;0;0;1;3;0;STORE A1 10;124;0;3;0;1;0; 11;102;0;178;1;0;0; 12;126;331;0;0;0;0; 13;101;0;3;1;3;0;STEP BACK 3 BLOCKS 14;126;306;0;0;0;0;gFORWARD 1 15;126;355;0;0;0;0;gSTEP FORWARD 16;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 17;124;0;3;0;1;0;;TEST D/B OCCURRED 18;106;0;160;0;0;0; 19;127;286;22;0;0;0;gNO 20;101;0;2;1;3;0; 21;124;286;14;1;0;0;gTRY AGAIN 22;126;314;0;0;0;0;gTEST A1=BLOCK CTR 23;127;286;67;0;1;0;gNO 24;126;339;0;0;0;0;gSET(MR3)=3 25;102;0;171;0;3;0;CLEAR OPTION INDICATOR 26;102;0;186;0;3;0; 27;126;321;0;0;0;0;g 28;126;341;0;0;0;0;gSET MR3=(64+R) 29;106;211;14;1;0;0;SET A1=FAULTY BLOCK WORD 30;102;0;0;1;3;0; 31;124;0;3;0;3;0;PACK 32;106;0;178;1;0;0; 33;101;0;15;0;1;0; 34;114;0;0;1;3;0; 35;126;341;0;0;0;0;gSET (MR3) = (64+R) 36;124;0;3;0;1;0; 37;106;0;179;1;0;0; 38;105;220;1;0;0;0; 39;127;286;46;0;0;0;gBLOCK 7 40;106;0;2;1;3;0;;TEST A2=R/M'S 41;105;211;6;1;0;0; 42;127;286;45;0;0;0;*01e01e 43;124;0;1;0;2;0;AUGMENT 2ND WORD 44;107;0;3;1;3;0; 45;126;342;0;0;0;0;*019 gSET ASL FOR HI-D 46;126;330;0;0;0;0;WRITE 47;126;343;0;0;0;0;*019 48;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 49;100;210;1;0;3;0;*8pt;SET DECIMAL 50;101;0;1;1;3;0;;AUGMENT 51;124;188;0;0;1;0;;DB'S 52;107;193;0;0;0;0;;COUNT 53;100;212;0;0;3;0;*8pt;SET BINARY 54;124;0;3;0;1;0;;TEST D/B IND SET 55;106;0;160;0;0;0; 56;127;287;0;0;0;0;*43e 57;101;0;1;1;3;0;*43t*51t STEP DB'S COUNTER 58;124;188;0;0;3;0; 59;107;192;0;0;0;0;*43t*51t 60;126;358;0;0;0;0;gSTEP COUNTER C 61;127;286;35;0;1;0;gNO;TEST C=6 62;106;212;4;0;0;0; 63;124;0;3;0;1;0; 64;102;0;175;0;0;0; 65;101;0;5121;1;3;0;*14+5++*14+*5++;010240512001025 66;124;285;25;1;0;0;g 67;126;315;0;0;0;0;gTEST A1 FOR FBM 68;124;286;80;1;0;0;gFMB FOUND 69;126;339;0;0;0;0;gSET(MR3)=3 70;101;286;22;1;3;0;STORE RETURN LOCATION 71;102;0;162;0;3;0; 72;126;323;0;0;0;0; 73;126;316;0;0;0;0;gALIGNMENT FAILURE 74;124;286;22;1;0;0;g 75;126;318;0;0;0;0;gTEST BLOCK 6 76;124;291;25;1;0;0;gOPEN REEL 77;126;317;0;0;0;0;gREREAD 78;126;319;0;0;0;0;gSTEP ATTEMPTS COUNTER 79;124;286;22;1;0;0;g 80;101;0;3;0;1;0; 81;126;339;0;0;0;0;SET(MR3)=3 82;115;0;179;1;3;0;;CORRECTLY FOR REWRIT 83;102;221;0;0;0;0; 84;126;341;0;0;0;0;(MR3)=(64+R) 85;115;0;1;1;3;0; 86;105;221;0;0;0;0; 87;127;286;27;0;0;0;gYES 88;101;0;3;1;3;0; 89;126;306;0;0;0;0;gSTEP BACK(3)FORWARD 1 90;126;355;0;0;0;0;gSTEP FORWARD 91;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 92;124;286;22;1;0;0;g SHEET;189 PROCR;287;DB/COMMENT:M/T OUTPUT NOTES;RADIX;B; 0;106;214;40;1;0;0;*43t;SET UP'DB' 1;102;258;2;1;0;0; 2;126;345;0;0;0;0;gEDIT TIME, SET UP ROUTE NUMBER 3;126;356;0;0;0;0;gSET UP PROGRAMME NUMBER 4;124;0;3;0;1;0;SET UP BLOCK NUMBER 5;106;0;179;1;0;0; 6;102;258;6;0;0;0; 7;126;188;0;1;3;0;*519 8;101;0;1;1;3;0;*5:t OMIT CATEGORY 9;126;332;0;0;0;0;gTEST CATEGORY SET 10;127;287;14;0;0;0;*5:t*51e;gEVERY D/B 11;106;192;0;0;3;0;*51t TEST COUNTER 12;101;0;11;1;2;0;REACHED 12 13;127;287;28;0;3;0;gNOT 12 14;100;210;1;0;3;0;CONVERT AND 15;101;213;0;1;3;0; 16;112;192;0;0;3;0;FOR COMMENT 17;102;258;9;1;0;0;CONVERT TO ALPHA 18;106;258;8;1;0;0; 19;101;0;64;1;2;0; 20;100;212;0;0;3;0; 21;124;0;3;0;3;0; 22;102;0;167;0;0;0; 23;102;192;0;0;3;0;*51t 24;106;109;8;1;0;0;SET UP O/P:1 25;102;258;8;1;0;0; 26;124;287;28;0;2;0; 27;124;285;33;1;0;0;g OUTPUT 'DB' 28;106;0;30;1;1;0;SET UP ROUTE NO AND TYPE 29;102;188;0;1;0;0; 30;126;359;0;0;0;0;*43t 31;124;0;3;0;1;0;*4315195:9;CLEAR COUNTER 32;102;0;167;0;0;0;*4315195:9 33;126;341;0;0;0;0;gSET(MR3)=(64+R) 34;124;0;3;0;1;0;RESTORE A1 35;106;0;178;1;0;0; 36;102;0;0;1;3;0; 37;106;210;6;0;0;0; 38;126;333;0;0;0;0;gSTEP BLOCK CNTR BY 1 39;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 40;126;188;0;1;2;0;*01t 41;100;210;6;0;2;0;SET(B) 42;124;0;3;0;1;0; 43;106;0;179;1;0;0;;TEST BLOCK 7 44;105;220;1;0;0;0; 45;127;287;47;0;0;0;gYES 46;126;342;0;0;0;0;*01t 47;126;330;0;0;0;0;gWRITE 48;126;343;0;0;0;0;*019 49;106;212;3;0;0;0;SET RTE TYPE 8 50;103;188;1;0;0;0; 51;126;349;0;0;0;0;gUPDATE ASSEMELER TABLE 52;126;359;0;0;0;0;gSET SI=4, RESTORE LINK FOR SI=3 SHEET;190 PROCR;288;DOUBTFUL BLOCK:END ROUTINE NOTES;RADIX;B; 0;126;339;0;0;0;0;gSET (MR3) = (3) 1;106;0;174;0;3;0;RESTORE RTE TYPE 2;127;288;4;0;1;0; 3;106;188;1;0;0;0; 4;102;0;31;0;1;0; 5;102;0;174;0;3;0;CLEAR W/L 6;124;264;28;1;0;0;g SHEET;191 PROCR;289;OPTIONS 4,5,6 & 7 NOTES;RADIX;B; 0;124;0;4;0;2;0;SELECT 4 1;124;289;5;1;0;0;g 2;101;0;3;1;3;0;SELECT 3 3;124;289;5;1;0;0;g 4;106;212;4;0;0;0;SELECT 2 5;126;306;0;0;0;0;STEP BACK(A)BLOCKS FORWARD 1 6;126;339;0;0;0;0;gSET (MR3)=(3) 7;106;0;171;0;3;0;;TEST REALIGNING 8;101;286;22;1;2;0; 9;127;289;24;0;0;0;gYES 10;100;210;6;0;2;0;*01t;SET(B) 11;126;188;0;1;2;0;SET(MR2)=R 12;106;190;0;0;2;0;;TEST BLOCK SIX OR 13;101;0;8;1;2;0;;SEVEN 14;127;289;16;0;3;0;gYES 15;126;342;0;0;0;0;*01t 16;126;329;0;0;0;0;gREAD 17;126;343;0;0;0;0;*019 18;106;0;164;0;3;0;*5+t;TEST IF CHD 19;127;289;25;0;1;0;*5+t;gYES 20;101;0;7;1;3;0;SET RTE TYPE 21;102;188;1;0;0;0; 22;106;0;171;0;3;0; 23;124;351;3;1;0;0;g UPDATE ASSEMBLER TABLE 24;126;355;0;0;0;0;gSTEP FORWARD 25;125;0;0;1;2;0; 26;124;289;21;1;0;0;gCLEAR ASSEMBLER TABLE SHEET;192 PROCR;290;OPTION 10:REOFFER OPTIONS NOTES;RADIX;B; 0;125;0;0;1;2;0;*46t DRAIN 1;126;346;0;0;0;0;gEDIT TIME 2;124;335;2;1;0;0;gOFFER OPTIONS SHEET;193 PROCR;291;OPTION 13 0;124;291;4;0;2;0;*5+t 1;126;362;0;0;0;0;gUNLOAD 2;126;338;0;0;0;0;gSET SI=1 3;124;462;9;1;0;0;gSI+1 4;126;339;0;0;0;0;gSET(MR3)=(3) 5;106;0;164;0;3;0; 6;127;292;13;0;1;0;gYES 7;106;0;187;0;3;0;TEST CHANGE DECKS IN; MISALIGNMENT 8;127;291;18;0;0;0;gNO 9;126;322;0;0;0;0;TEST ALIGNING FROM O;/P 10;124;291;16;1;0;0;gNO 11;106;212;4;0;0;0; 12;102;0;175;0;3;0; 13;106;0;183;0;3;0; 14;102;0;172;0;3;0; 15;124;292;6;1;0;0;gCHANGE DECKS 16;125;0;0;1;2;0; 17;124;291;12;1;0;0;g 18;126;340;0;0;0;0;gSET(MR3)=R 19;124;0;3;0;1;0;;TEST IF I/P 20;106;0;175;0;0;0; 21;127;291;31;0;1;0;gNO 22;106;190;0;0;3;0; 23;101;0;9;1;2;0;;TEST D/B IN OPEN 24;127;292;0;0;2;0;*5+t gNO CHANGE DECK;FILE 25;126;339;0;0;0;0;gSET (MR3)=(3) 26;101;291;29;1;3;0;SET UP PSEUDO RTE TYPE 27;101;267;0;1;2;0; 28;124;288;4;1;0;0;gEND ROUTINE 29;126;339;0;0;0;0;gSET(MR3)=(3) 30;124;307;10;1;0;0;g 31;106;190;0;0;3;0;*5+t;TEST D/B IN 32;101;0;6;1;2;0;;OPEN FILE 33;127;291;25;0;3;0;gYES SHEET;194 PROCR;292;CHANGE DECKS(1) 0;126;339;0;0;0;0;*5+t SET(MR3)=(3) 1;106;0;175;0;3;0;;TEST IF I/P 2;127;292;6;0;0;0;gYES 3;124;188;0;0;1;0;STORE BLOCK COUNTER 4;106;190;0;0;0;0; 5;124;292;11;1;0;0;g 6;124;188;0;0;1;0; 7;106;190;0;0;0;0;STORE BLOCK COUNTER 8;100;210;1;0;3;0;MINUS ONE;SET DECIMAL 9;105;210;6;0;0;0; 10;100;212;0;0;3;0;;SET BINARY 11;103;0;170;0;3;0; 12;102;0;164;0;3;0;SET INDICATOR FOR OP;EN REEL 13;106;0;175;0;3;0;;TEST IF I/P 14;127;292;26;0;1;0;gNO 15;106;0;170;0;3;0;;TEST BLOCK NO 16;101;0;8;1;2;0;;<8 17;127;292;24;0;2;0;gNO 18;124;188;0;0;1;0; 19;119;0;0;0;3;0;RUN FORWARD 20;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 21;126;355;0;0;0;0;gSTEP FORWARD 22;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 23;124;292;40;1;0;0;g 24;126;410;0;0;0;0;gOPEN INPUT REEL 25;124;292;40;1;0;0;g 26;106;0;170;0;3;0; 27;101;0;6;1;2;0; 28;127;292;34;0;1;0;gNOT BLOCK 7 29;124;188;0;0;1;0;TEST IF OPENING FILE 30;106;0;64;0;0;0; 31;118;0;4124;0;0;0; 32;101;0;14;1;2;0; 33;127;425;20;0;0;0;*51e51e*43e43e 34;126;425;0;0;0;0;gOPEN OUTPUT REEL 35;106;0;170;0;3;0; 36;101;0;7;1;2;0; 37;127;292;40;0;1;0;g NOT BLOCK 8 38;101;0;2;1;3;0; 39;126;306;0;0;0;0;STEP BACK 2 FORWARD 1 40;126;339;0;0;0;0;gSET(MR3)=(3) 41;106;0;170;0;3;0; 42;124;188;0;0;1;0;SET UP BLOCK 43;103;190;0;0;0;0;COUNTER 44;100;210;1;0;3;0;DECIMAL;STEP FORWARD 45;101;0;9;1;2;0;SUB 9;(BLOCK COUNTER)-9 46;100;212;0;0;3;0;BINARY;BLOCKS 47;127;292;61;0;0;0;gBLOCK 9 OR END OF STEP FORWARD 48;127;292;61;0;3;0;gBLOCK<9 49;102;0;177;0;3;0;STORE COUNTER IN C+177 50;126;342;0;0;0;0;*019 SET ASL FOR HIGH DENSITY 51;126;355;0;0;0;0;STEP FORWARD 52;126;343;0;0;0;0;*019 CLEAR BIT 1 ASL 53;126;352;0;0;0;0;*09e06e TEST RTE NOTING D/B 54;126;315;0;0;0;0;TEST A1 FOR FBM'S 55;124;292;50;1;0;0;gYES DON'T COUNT THIS BLOCK 56;126;339;0;0;0;0;SET (MR3)=(3) 57;106;0;177;0;3;0;COUNTER 58;100;210;1;0;3;0;DECIMAL 59;101;0;1;1;2;0;SUB 1 60;124;292;46;1;0;0;gTEST ZERO 61;126;314;0;0;0;0;gTEST A1=BLOCK COUNTER 62;127;293;10;0;0;0;gYES 63;127;293;0;0;3;0;TEST A1ACTUAL BLOCK 13;100;210;1;0;3;0;SET DECIMAL 14;105;0;1;1;3;0; 15;127;316;49;0;0;0;gA1=BLOCK COUNTER 16;127;316;34;0;3;0;gNO 17;101;0;8;1;2;0;;TEST DIFFERENCE <8 18;127;316;52;0;2;0;g NO 19;101;0;7;1;1;0; 20;100;212;0;0;3;0;SET BINARY 21;127;316;30;0;0;0;g 22;124;0;3;0;1;0; 23;102;0;177;0;0;0; 24;126;355;0;0;0;0;gSTEP FORWARD 25;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 26;124;0;3;0;1;0;;TEST ALIGNED 27;106;0;177;0;0;0;;CORRECTLY 28;105;210;6;0;0;0; 29;127;316;22;0;1;0;gNO 30;126;322;0;0;0;0;gTEST O/P OR I/P 31;124;316;46;1;0;0;gI/P 32;126;355;0;0;0;0;gSTEP FORWARD 33;124;316;47;1;0;0;g 34;106;0;1;1;3;0;;EXPECTED X 53;127;411;59;0;2;0;gNO 54;106;190;32;0;3;0;SET X=Y 55;118;0;2;0;0;0; 56;114;190;32;0;3;0; 57;124;0;3;0;1;0;SET IND 3 58;102;0;158;0;0;0; 59;126;341;0;0;0;0;gSET(MR3)=(64+R) 60;124;410;48;1;0;0;g SHEET;314 PROCR;412;FORM X-Y FOR TEST ON REEL COUNTER NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;126;340;0;0;0;0;gSET (MR3) =R 2;101;0;3;0;1;0;STORE Y 3;115;190;32;0;3;0; 4;118;0;2;1;0;0; 5;102;258;10;0;0;0; 6;115;190;32;0;3;0;FORM X-Y 7;105;258;10;0;0;0; 8;126;412;0;0;1;0;gLEAVE S/R SHEET;315 PROCR;413;TEST CORRECT SOURCE BLOCK NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;106;0;15;1;3;0;;TEST CORRECT 2;103;260;18;0;0;0;*719 STORE FOR COMMENT 3;124;188;0;0;1;0;;PROGRAMME NUMBER 4;105;190;64;0;0;0; 5;127;417;0;0;1;0;gNO, HDG COMMENT 6;106;0;6;0;3;0;;TEST CORRECT FILE 7;124;188;0;0;1;0;;IDENTITY 8;105;190;96;0;0;0; 9;127;417;0;0;1;0;gNO, HDG COMMENT 10;101;0;30;0;1;0;;TEST CORRECT RUN 11;115;0;9;1;3;0;;NUMBER 12;102;221;0;0;0;0; 13;124;188;0;0;1;0; 14;115;191;30;0;0;0; 15;105;221;0;0;0;0; 16;127;417;0;0;1;0;gNO, HDG COMMENT 17;126;413;0;0;1;0;gLEAVE S/R SHEET;316 PROCR;414;HDG COMMENT FOR FIRST OPEN INPUT FILE NOTES;RADIX;B; 0;125;0;0;1;2;0;;TEST IF SUITE IS 1;101;0;28;0;1;0;;060 2;115;0;39;0;1;0; 3;105;108;5;0;0;0; 4;127;410;41;0;0;0;gYES 5;126;418;0;0;0;0;gSET UP BLOCK, UNLOAD 6;101;0;28;0;1;0;SET UP SUITE NO 7;115;0;32;0;1;0; 8;102;258;6;0;0;0; 9;101;0;12;0;1;0; 10;115;0;33;0;1;0;FORM UP FILE LETTER-/REEL 1 11;118;0;2;0;0;0; 12;101;0;4209;1;1;0;-/ 13;118;0;4;0;0;0; 14;101;0;65;1;1;0;1 15;102;258;10;1;0;0; 16;102;258;8;0;0;0;CLEAR RUN&RERUN NO 17;106;262;34;1;0;0;SET UP LTE 18;102;262;20;1;0;0; 19;124;262;0;0;2;0; 20;124;0;3;0;1;0;EDIT INTO SP CHAP 21;128;0;130;1;2;0; 22;126;341;0;0;0;0;gSET (MR3)=(64+R) 23;106;0;15;1;3;0;SET UP PROG NO 24;102;258;6;0;0;0; 25;106;0;6;1;3;0;SET UP FILE 1D/REEL NO 26;118;0;2;0;0;0; 27;101;0;113;1;1;0;/ 28;118;0;4;0;0;0; 29;104;0;10;1;3;0;REEL NO 30;102;258;10;1;0;0; 31;106;0;9;1;3;0;SET UP RUN & RERUN NO 32;102;258;8;0;0;0; 33;106;216;34;1;0;0;SET UP LAST TABLE ENTRY 34;102;262;20;1;0;0; 35;124;262;8;0;2;0;EDIT INTO SP CHAP 36;124;0;3;0;1;0; 37;128;0;146;1;2;0; 38;106;261;8;1;0;0;RESTORE LAST TABLE ENTRY 39;102;262;20;1;0;0; 40;124;336;2;1;0;0;gOUTPUT COMMENT 41;126;418;0;0;0;0;*012 gSET UP HDG 42;106;214;62;1;0;0;SET UP 45K 43;124;370;4;1;0;0;gOUTPUT COMMENT SHEET;317 PROCR;415;REEL NUMBER FAILURE NOTES;RADIX;B;COMMENT AND OFFER OPTIONS 0;126;418;0;0;0;0;gSET UP HDG 1;106;109;2;1;0;0;SET UP *,*,3,SP,SP 2;102;258;2;1;0;0; 3;126;346;0;0;0;0;g EDIT TIME 4;126;311;0;0;0;0;SET UP REEL NUMBER 5;104;258;10;1;0;0; 6;102;258;6;1;0;0; 7;126;341;0;0;0;0;SET (MR3=64+R) 8;101;0;15;0;1;0; 9;115;0;10;0;3;0; 10;104;258;10;1;0;0; 11;102;258;8;1;0;0; 12;101;0;12;0;1;0; 13;124;188;0;0;1;0; 14;114;190;32;0;0;0;SET X=0 IN REEL COUNTER 15;124;0;3;0;1;0;SET UP TAPE NUMBER 16;106;0;182;0;0;0; 17;102;258;10;1;0;0; 18;124;0;519;0;2;0;*14+46+*14+*46+;000060051800007 19;102;0;41;0;1;0; 20;101;261;28;1;3;0; 21;124;335;0;1;0;0;gOFFER OPTIONS SHEET;318 PROCR;416;OPTIONS 2 AND3 NOTES;RADIX;B;REEL NUMBER FAILURE 0;126;341;0;0;0;0;gSET (MR3)=(64+R) 1;106;0;11;1;3;0;PACK IN ACTUAL REEL NO. 2;101;0;3;0;1;0; 3;124;188;0;0;1;0; 4;114;190;32;0;0;0; 5;126;339;0;0;0;0;gSET (MR3)=(3) 6;124;410;4;1;0;0;gOPEN REEL SHEET;319 PROCR;417;HDG COMMENT FOR SUBSEQUENT OPEN REELS NOTES;RADIX;B; 0;126;418;0;0;0;0;gSET UP HDG 1;126;340;0;0;0;0;gSET (MR3)=R 2;106;190;64;0;3;0;SET UP PROG NO 3;102;258;6;0;0;0; 4;126;311;0;0;0;0;gSET UP FILE ID 5;107;258;10;1;0;0; 6;106;191;30;0;3;0;SET UP RUN & RERUN NOS 7;124;414;16;1;0;0;g SHEET;320 PROCR;418;SET UP HDG COMMENT NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;126;357;0;0;0;0;gCOUNT 500 M SECS 2;106;258;24;1;0;0;SET UP 'HDG' 3;102;258;2;1;0;0; 4;124;0;3;0;1;0; 5;106;0;165;0;0;0; 6;101;0;1;1;2;0;RETURN LINK 7;126;362;0;0;0;0;gUNLOAD, ETC. 8;126;418;0;0;1;0;g LEAVE S/R SHEET;321 PROCR;419;SET UP HDG COMMENT (PAPER TAPE OR CARDS) 0;100;0;0;0;0;0;LINK 1;106;258;24;1;0;0;SET UP HDG 2;102;258;2;1;0;0; 3;124;367;4;0;2;0;RETURN LINK 4;126;362;0;0;0;0;gUNLOAD ETC 5;126;419;0;0;1;0;gLEAVE S/R SHEET;322 PROCR;420;MAGNETIC TAPE INPUT NOTES;RADIX;B; 0;102;420;9;0;0;0;*4p1*3:1 1;126;314;0;0;0;0;TEST A1=BLOCK COUNTER 2;127;421;4;0;1;0;gNO 3;126;339;0;0;0;0;SET(MR3)=(3) 4;102;0;171;0;3;0;CLEAR OPTION INDICATOR 5;102;0;186;0;3;0;CLEAR INDICATOR 6;106;0;185;0;3;0;TEST ATTEMPTS COUNTER ZERO 7;127;421;0;0;1;0;gNO 8;126;430;0;0;0;0;*3:94p9 1AA S/R 9;100;0;0;0;0;0;*4p1*3:1 10;126;342;0;0;0;0;*019 11;126;329;0;0;0;0;READ 12;126;343;0;0;0;0;*019 13;106;210;6;0;0;0;STEP BLOCK COUNTER 14;126;333;0;0;0;0;g 15;124;268;6;1;0;0;gUPDATE ASSEMBLER TABLE,RETURN TO PROG SHEET;323 PROCR;421;MT INPUT:BLOCK NUMBER NOT AS EXPECTED NOTES;RADIX;B; 0;126;321;0;0;0;0;g'SER' COMMENT 1;101;0;7;1;3;0; 2;102;0;31;0;1;0;SET ROUTE TYPE='MT IN' 3;124;264;28;1;0;0;gANOTHER READ ORDER 4;126;315;0;0;0;0;gTEST A1 FOR FBM 5;124;421;31;1;0;0;gFBM FOUND 6;106;0;1;1;3;0;;TEST A1=SENTINEL 7;105;211;5;1;0;0;;TYPE 2 8;105;210;6;0;0;0; 9;127;421;40;0;0;0;gYES 10;105;210;6;0;0;0;;TEST A1=SENTINEL 11;127;421;16;0;1;0;gNO 12;106;0;5;1;3;0;;TEST A3=BL CNTR 13;124;188;0;0;1;0; 14;105;190;0;0;0;0; 15;127;263;19;0;0;0;gYES ZZZ4 COMMENT 16;101;421;60;1;3;0;SELECT RETURN LOCATION 17;124;0;3;0;1;0; 18;102;0;162;0;0;0; 19;126;323;0;0;0;0;gTEST OPTION LINK 20;126;316;0;0;0;0;gALIGNMENT FAILURE 21;124;421;24;1;0;0; 22;126;317;0;0;0;0;gREREAD 23;126;319;0;0;0;0;gSTEP ATTEMPTS COUNTER 24;124;0;3;0;1;0;TEST D/B OCCURRED 25;106;0;160;0;0;0; 26;127;420;1;0;0;0;gNO 27;101;0;7;1;3;0; 28;124;0;3;0;1;0; 29;102;0;174;0;0;0; 30;124;285;0;1;0;0;gD/B ROUTINE 31;124;0;3;0;1;0;;TEST INDICATOR SET 32;106;0;186;0;0;0; 33;127;421;36;0;0;0;gNO 34;101;0;3;1;3;0;STEP BACK 3 BLOCKS 35;126;306;0;0;0;0;FORWARD 1 36;126;329;0;0;0;0;gREAD 37;101;0;7;1;3;0; 38;103;188;1;0;0;0; 39;124;351;5;1;0;0;gTEST ROUTE 40;106;0;5;1;3;0;;TEST A3=BL CNTR 41;124;188;0;0;1;0; 42;105;190;0;0;0;0; 43;127;421;16;0;1;0;gNO 44;106;0;39;0;1;0;*6+t PROG ID 45;105;210;15;0;0;0;07008 46;127;421;54;0;1;0;gNOT 07008 47;106;258;26;1;0;0;FINIS;07008 48;102;0;4;1;3;0; 49;126;430;0;0;0;0;*4p93:9 IAA FOR FCC 50;106;420;9;0;0;0;*4p2*3:2 51;102;421;52;0;0;0;IAA 52;100;0;0;0;0;0;*4p2*3:2 53;124;268;7;1;0;0;*6+t 54;106;0;33;0;1;0;;TEST LINK 55;127;268;7;0;3;0;gYES 56;126;334;0;0;0;0;gSTEP REEL COUNTER 57;126;357;0;0;0;0;gCOUNT 500 MILLISECS 58;126;324;0;0;0;0;gUNLOAD, 'NEW' COMMENT 59;126;410;0;0;0;0;gOPEN NEW REEL 60;101;0;7;1;3;0;SET UP RTE TYPE 61;103;188;1;0;0;0; 62;102;0;31;0;1;0; 63;106;188;0;0;0;0; 64;118;0;6;0;3;0; 65;124;266;0;1;0;0;*4p4*3:4 gMAIN PATH; 4 4 SHEET;324 PROCR;422;CLOSE MAGNETIC TAPE INPUT REEL NOTES;RADIX;B; 0;126;334;0;0;0;0;gSTEP REEL COUNTER 1;126;357;0;0;0;0;gCOUNT 500 M.SECS. 2;126;362;0;0;0;0;gUNLOAD 3;124;422;6;0;2;0; 4;126;363;0;0;0;0;gSET LINK FOR SI=5 & SETTING FOR S101 5;124;324;3;1;0;0;*17e 6;126;359;0;0;0;0;gSET SI=4, RESTORE LINK FOR SI=3 7;126;451;0;0;0;0;*8p9;gTMS COMMENT 8;124;268;7;1;0;0;gRESET MOD. GROUP SHEET;325 PROCR;423;CLOSE MAGNETIC TAPE INPUT FILE NOTES;RADIX;B; 0;126;341;0;0;0;0;*1tt gSET(MR3)=(64+R) 1;106;0;4;1;3;0;;TEST 'FINIS' BLOCK 2;105;258;26;1;0;0; 3;127;436;10;0;0;0;gYES 4;106;0;1;1;3;0;;TEST SENTINEL TYPE 3 5;105;211;5;1;0;0; 6;105;212;4;0;0;0; 7;127;436;10;0;0;0;gYES 8;101;0;4;1;3;0;*5:t;OMIT EDG? 9;126;332;0;0;0;0; 10;127;436;6;0;1;0;*5:t;gYES 11;126;451;0;0;0;0;*8p9 12;106;109;4;1;0;0;SET UP'EDG' 13;102;258;2;1;0;0; 14;126;357;0;0;0;0;COUNT 500 MILLISECS 15;126;362;0;0;0;0;gUNLOAD ETC 16;124;188;0;0;1;0;SET UP BLOCK NO. 17;106;190;0;0;0;0; 18;102;258;6;0;0;0; 19;124;188;0;0;3;0;CLEAR BLOCK COUNTER 20;102;190;0;0;0;0; 21;124;188;0;0;1;0;CLEAR REEL COUNTER 22;102;190;32;0;0;0; 23;126;326;0;0;0;0;*179 gALTERNATE ROUTES 24;124;383;19;0;2;0; 25;126;363;0;0;0;0;gSET LINK FOR SI=5 SETTING OF S101 26;124;432;8;1;0;0;gOUTPUT COMMENT SHEET;326 PROCR;424;OPEN MAGNETIC TAPE OUTPUT FILE NOTES;RADIX;B; 0;126;425;0;0;0;0;gOPEN MAG TAPE O/P REEL 1;106;0;40;0;1;0; 2;118;0;4127;0;0;0; 3;124;409;9;1;0;0;g SHEET;327 PROCR;425;OPEN MAGNETIC TAPE OUTPUT REEL NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;126;339;0;0;0;0;gSET(MR3)=(3) 2;106;425;0;0;0;0; 3;102;0;168;0;3;0;LINK TO 168 OF SPECIAL CHAP 4;126;188;0;1;2;0;SET(MR2)=R 5;106;0;64;0;2;0;STORE CURRENT ASL 6;102;221;0;0;0;0;*5+9 7;102;0;163;0;3;0;*5+1 8;101;0;14;1;3;0;FORM NEW ASL 9;118;0;4;0;0;0;C+106 10;104;0;3;0;0;0; 11;101;0;106;1;1;0; 12;105;221;0;0;0;0;*5+t;TEST ALREADY SET UP 13;127;425;18;0;0;0;;gYES 14;104;221;0;0;0;0;*5+t 15;102;0;64;0;2;0; 16;106;221;0;0;0;0;*5+t 17;102;0;163;0;3;0;*5+t 18;101;0;15;1;3;0;SET TAG 15 19;123;0;126;1;3;0;IN LIMIT WORD 20;101;0;0;1;3;0;*43t*51t CLEAR DB'S COUNTER 21;124;188;0;0;3;0; 22;102;192;0;0;0;0;*43t*51t 23;126;307;0;0;0;0;gRUN FORWARD ETC 24;124;0;3;0;1;0;*5+t;TEST CHD 25;106;0;164;0;0;0; 26;127;425;31;0;0;0;gNO 27;124;0;3;0;1;0; 28;106;0;189;0;0;0;;TEST OPEN FILE 29;127;428;0;0;0;0;gNO,REOPEN O/P REEL 30;124;425;36;1;0;0;*5+t YES REWRITE BLOCK 7 31;126;429;0;0;0;0;gTEST TAPE RELEASED S/R 32;124;428;0;1;0;0;gNO 33;101;0;1;1;3;0; 34;124;0;3;0;1;0; 35;102;0;189;0;0;0;SET OPEN FILE IND(FOR CMD 36;126;340;0;0;0;0;gSET (MR3)=R 37;106;190;32;0;3;0;;TEST REEL COUNTER 38;103;221;0;0;0;0; 39;127;425;54;0;0;0;gYES;=0 40;118;0;4126;1;0;0;;TEST X=p 41;101;0;15;1;2;0; 42;127;425;48;0;1;0;gNO 43;118;0;4;1;0;0;SET X=Y 44;101;0;12;0;1;0; 45;124;188;0;0;1;0; 46;114;190;32;0;0;0; 47;124;425;56;1;0;0;gYES 48;126;412;0;0;0;0;gFORM X-Y;TEST Y>X IN REEL 49;127;425;62;0;2;0;g 50;106;190;32;0;3;0;SET X=Y 51;118;0;2;0;0;0; 52;114;190;32;0;3;0; 53;124;425;62;1;0;0;g 54;124;0;257;0;2;0;SET REEL COUNTER=1:1 55;102;190;32;0;3;0; 56;106;0;32;0;1;0;STORE PROGRAMME NO 57;102;190;64;0;3;0; 58;106;0;33;0;1;0;STORE FILE IDENTITY 59;102;190;96;0;3;0; 60;106;0;40;0;1;0;STORE RUN & RE-RUN NUMBERS 61;102;191;30;0;3;0; 62;126;341;0;0;0;0;gSET(MR3)=(64+R) SHEET;328 PROCR;426;SET UP LOP COMMENT AND SOURCE BLOCK NOTES;RADIX;B; 0;124;0;7;0;2;0;SET UP XERONIC WORD 1;124;188;0;0;1;0; 2;103;190;0;0;0;0; 3;103;0;1;1;3;0; 4;104;211;18;1;0;0; 5;102;0;4;1;3;0; 6;102;0;2;1;3;0;CLEAR 2ND WORD 7;124;188;0;0;1;0;SET UP PROG NO 8;106;190;64;0;0;0; 9;103;260;18;0;0;0;*719 STORE FOR COMMENT 10;102;0;15;1;3;0; 11;106;100;15;0;0;0;SET UP DATE 12;102;0;13;1;3;0; 13;106;214;8;1;0;0;SET UP B/E WORD 14;102;0;18;1;3;0; 15;126;431;0;0;0;0;gSET UP FILE, RUN & REEL 16;124;188;0;0;1;0;*01t;TEST 90K FILE 17;106;191;62;0;0;0; 18;127;426;20;0;0;0;gNO 19;106;210;6;0;0;0;*01t 20;102;0;17;1;3;0;SET UP 45/90K IND 21;126;330;0;0;0;0;gWRITE 22;126;429;0;0;0;0;gTEST TAPE RELEASED S/R 23;124;426;30;1;0;0;*5+e;gNO 24;106;258;8;0;0;0;*8:t SPOOL NO 25;105;196;0;0;3;0;TEST=NEXT IN LIST 26;127;426;28;0;1;0;*8:t NOg 27;102;196;0;0;3;0;DELETE TAPE NO 28;125;0;1;0;3;0;*8:t 29;124;426;24;1;0;0;*8:t 30;124;0;3;0;1;0;*5+t;TEST IF CHANGE 31;106;0;164;0;0;0;;DECKS 32;127;426;72;0;1;0;*5+t;gYES 33;101;0;8;1;3;0;SET ROUTE TYPE 8 34;102;188;1;0;0;0; 35;126;350;0;0;0;0;gTEST RTE DEALING WITH D/B 36;126;341;0;0;0;0;gSET(MR3)=(64+R) 37;126;431;0;0;0;0;gSET UP COMMENT 38;106;214;48;1;0;0;SET UP 'LOP' 39;102;258;2;1;0;0; 40;126;339;0;0;0;0;gSET (MR3)=(3) 41;106;0;182;0;3;0; 42;102;258;8;0;0;0; 43;102;0;189;0;3;0;CLEAR OPEN FILE IND(FOR CHD) 44;124;188;0;0;1;0;*01t;TEST 90K FILE 45;106;191;62;0;0;0; 46;127;426;51;0;0;0;*3pe71e*3pe;gNO 47;101;0;24;0;1;0;SET UP'H'IN'HOP'COMMENT 48;124;0;88;0;2;0; 49;118;0;3;0;0;0; 50;114;258;3;0;0;0;*01t 51;100;210;1;0;3;0;*3pt;SET DECIMAL 52;106;258;21;0;0;0;STEP CARD SERIAL NUMBER 53;104;210;6;0;0;0; 54;100;212;0;0;3;0;SET BINARY 55;102;258;21;0;0;0;*3pt 56;106;262;24;1;0;0;*3pt*3p2712 57;102;262;20;1;0;0;*3pt*3p2712 58;106;262;30;1;0;0;*71t 59;102;262;20;1;0;0;*71t 60;124;426;74;0;2;0; 61;126;363;0;0;0;0;gSET LINK FOR SI=5, SETTING OF S101 62;124;262;0;0;2;0;SELECT TABLE START LOCATION 63;124;0;3;0;1;0;SET UP COMMENT IN SPECIAL CHAPTER 64;128;0;130;1;2;0; 65;106;262;22;1;0;0;*3pt*712 66;102;262;20;1;0;0;*3pt*712 67;106;262;28;1;0;0;*71t 68;102;262;20;1;0;0; 69;106;262;32;1;0;0;*3pt 70;102;262;26;1;0;0;*71t*3pt 71;124;336;2;1;0;0;g OUTPUT COMMENT 72;126;352;0;0;0;0;*5+t*09e06e;TEST RTE NOTING D/B 73;124;292;40;1;0;0;*5+t 74;126;359;0;0;0;0;gSET SI=4,RESTORE LINK FOR SI=3 SHEET;329 PROCR;427;SET UP AND PUNCH LIBRARIAN CARD NOTES;RADIX;B; 0;124;428;22;1;0;0;*251;gAVOID 1;124;0;2;0;1;0;*25t SET (MR3)=(64+R) 2;124;0;30;0;1;0; 3;106;0;64;0;0;0; 4;102;0;6;1;0;0; 5;106;0;30;0;1;0;STORE RTE NUMBER 6;124;0;3;0;1;0; 7;102;0;158;0;0;0; 8;124;427;41;0;2;0;SET UP RTE NO & TYPE FOR CARDS 9;101;267;0;1;2;0; 10;118;0;5;0;0;0; 11;104;260;8;0;0;0; 12;102;0;30;1;1;0; 13;106;258;21;0;0;0;SET UP CARD SERIAL NO 14;102;0;3;1;3;0; 15;124;0;3;0;1;0; 16;106;0;182;0;0;0;SET UP SPOOL NO 17;102;0;5;1;3;0; 18;124;0;3;0;1;0;SET (MR2)=R 19;106;0;158;0;0;0; 20;102;0;4;1;0;0; 21;106;190;64;0;2;0;SET UP PROGRAMME NO 22;102;0;7;1;3;0; 23;106;191;30;0;2;0;SET UP RUN AND RERUN NOS 24;102;0;9;1;3;0; 25;106;190;96;0;2;0;SET UP FILE IDENTITY 26;118;0;6;0;0;0; 27;102;0;10;1;3;0; 28;101;0;3;0;1;0;SET UP REEL NO 29;115;190;32;0;2;0; 30;118;0;1;0;0;0; 31;104;0;139;0;0;0; 32;102;258;11;1;0;0; 33;106;258;10;1;0;0; 34;107;0;10;1;3;0; 35;106;0;138;0;0;0;SET UP DATE 36;102;0;13;1;3;0; 37;106;214;8;1;0;0;SET UP B/E 38;102;0;14;1;3;0; 39;102;0;0;1;3;0; 40;124;264;28;1;0;0;gSET SI=1,TEST ROUTE,ETC 41;124;260;8;0;1;0;;TEST ANOTHER LIB 42;106;0;64;0;0;0;;CARD BEING PROCESSED 43;118;0;4124;0;0;0; 44;101;0;13;1;2;0; 45;127;427;40;0;0;0;gYES 46;124;0;3;0;1;0; 47;124;0;158;0;1;0;EDIT INTO MATRIX FORM 48;124;0;64;0;1;0; 49;124;0;0;0;2;0; 50;129;259;0;0;0;0; 51;106;258;18;1;0;0;AUGMENT BY B40 52;107;259;6;1;0;0; 53;101;0;3;1;3;0;SET UP RTE NO AND TYPE FOR CARDS 54;118;0;5;0;0;0; 55;104;260;8;0;0;0; 56;103;188;0;1;0;0; 57;124;260;9;0;1;0;UPDATE ASSEMBLER TABLE 58;102;252;0;1;0;0; 59;124;260;8;0;1;0;INTERCHANGE AREA ADDRESSES 60;101;0;3520;0;3;0; 61;124;188;0;0;1;0;OUTPUT 62;119;0;0;0;0;0; 63;126;350;0;0;0;0;gTEST RTE DEALING WITH D/B 64;124;260;8;0;1;0;INTERCHANGE AREA ADDRESSES 65;101;0;3520;0;3;0; 66;106;0;4;0;0;0;SET UP ROUTE NO 67;103;0;30;0;1;0; 68;102;188;0;0;0;0; 69;124;188;0;0;1;0;CLEAR 2ND WORD 70;124;0;64;0;1;0; 71;102;0;2;1;0;0; 72;124;428;22;1;0;0;*25t g SHEET;330 PROCR;428;RE-OPEN MAGNETIC TAPE OUTPUT REEL NOTES;RADIX;B; 0;124;188;0;0;1;0;;TEST REEL COUNTER 1;106;190;32;0;0;0;;=0 2;127;432;0;0;0;0;gYES RT1 COMMENT 3;118;0;4126;0;0;0;;TESTX=p 4;101;0;15;1;2;0; 5;127;432;0;0;0;0;gYES RT1 COMMENT 6;126;412;0;0;0;0;gFORM X-Y;TEST Y>X IN REEL 7;127;432;0;0;3;0;gYES RT1 COMMENT 8;126;308;0;0;0;0;gREAD, TEST BLOCK 9;126;341;0;0;0;0;gSET MR3=64+R 10;126;413;0;0;0;0;gTEST CORRECT SOURCE BLOCK 11;101;0;3;0;1;0;;TEST CORRECT REEL 12;124;188;0;0;1;0;;NUMBER 13;115;190;32;0;0;0; 14;105;0;11;1;3;0; 15;127;417;0;0;1;0;gNO, HDG COMMNET 16;124;0;3;0;1;0;RESTORE ASL 17;106;0;163;0;0;0; 18;124;0;2;0;1;0; 19;124;0;30;0;1;0; 20;102;0;64;0;0;0; 21;124;411;0;1;0;0;g 22;124;0;3;0;1;0;RESTORE ASL 23;106;0;163;0;0;0; 24;124;0;2;0;1;0; 25;124;0;30;0;1;0; 26;102;0;64;0;0;0; 27;124;0;3;0;1;0;;TEST LINK FROM 28;106;0;168;0;0;0;;W/E PROCEDURE 29;101;306;0;1;2;0; 30;127;411;45;0;1;0;gNO 31;106;212;3;0;0;0;SET UP ROUTE TYPE 32;102;0;31;0;1;0; 33;124;0;2;0;1;0; 34;124;0;12;1;0;0;gSI+12 SHEET;331 PROCR;429;TEST TAPE RELEASED S/R 0;100;0;0;0;0;0; 1;126;212;8;1;3;0;*4:34te;(MR3)=48:0 2;124;0;3;0;1;0;SPOOL EX SENTINEL 3;106;0;182;0;0;0; 4;103;258;8;0;0;0;STORE FOR COMMENT 5;118;0;4127;1;1;0;*8+t WORKING TAPE? 6;127;429;8;0;0;0;YESg 7;118;0;1;1;1;0;*8+t 8;105;196;0;0;3;0;TEST=NEXT IN LIST 9;127;429;14;0;0;0;gYES 10;104;196;0;0;3;0; 11;125;0;1;0;3;0; 12;124;429;8;1;0;0;gNEXT ONE 13;126;429;0;0;1;0;gLEAVE S/R NOT IN RT1 14;124;429;0;0;3;0; 15;124;0;1;1;0;0;gS/R+1 IN RT1 SHEET;332 PROCR;430;INTERCHANGE AREA ADDRESSES FOR FCC 0;100;0;0;0;0;0;*3:t4pt 1;106;0;32;0;1;0;PSEUDOROUTE 2;102;430;13;0;0;0;WL 3;124;430;13;0;1;0; 4;100;0;64;0;2;0;PSEUDOROUTE START LOCNgB 5;124;188;0;0;1;0; 6;106;0;64;0;0;0;ROUTE START LOCN 7;124;430;13;0;1;0; 8;102;0;64;0;0;0;gPSEUDOROUTE START 9;118;0;10;1;1;0;(B)gA 10;124;188;0;0;1;0; 11;102;0;64;0;0;0;PSEUDO ROUTEgROUTE 12;126;430;0;0;1;0; 13;100;0;0;0;0;0;WL FOR THIS S/R SHEET;333 PROCR;431;SET UP'LIP'AND'LOP'COMMENTS NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;126;345;0;0;0;0;gEDIT TIME,SET UP RTE NUMBER 2;126;356;0;0;0;0;SET UP PROGRAMME NUMBER 3;124;188;0;0;1;0;SET UP FILE IDENTITY 4;106;190;96;0;0;0; 5;103;0;6;1;3;0; 6;118;0;2;0;0;0; 7;101;0;113;1;1;0; 8;118;0;4;0;0;0; 9;102;258;10;1;0;0; 10;101;0;3;0;1;0; 11;124;188;0;0;1;0;SET UP FILE IDENTITY/REEL NUMBER 12;115;190;32;0;0;0; 13;102;258;7;1;0;0; 14;106;258;6;0;0;0; 15;107;258;10;1;0;0; 16;102;0;10;1;3;0;SET UP REEL NUMBER 17;124;188;0;0;1;0;SET UP RUN AND RE-RUN NUMBERS 18;106;191;30;0;0;0; 19;103;258;6;0;0;0; 20;102;0;9;1;3;0; 21;126;431;0;0;1;0; SHEET;334 PROCR;432;SET UP 'RTI' COMMENT NOTES;RADIX;B; 0;126;357;0;0;0;0;gCOUNT 500 MILLISECS 1;106;214;38;1;0;0;SET UP 'RTI' 2;102;258;2;1;0;0; 3;124;425;23;0;2;0; 4;126;362;0;0;0;0;gUNLOAD ETC 5;124;0;3;0;1;0;SET UP TAPE NUMBER 6;106;0;182;0;0;0; 7;102;258;6;0;0;0; 8;102;258;8;1;0;0;CLEAR COL 4 9;124;261;10;0;2;0;SELECT TABLE START LOCATION 10;124;336;0;1;0;0;gOUTPUT COMMENT SHEET;335 PROCR;433;MAGNETIC TAPE OUTPUT NOTES;RADIX;; 0;102;433;2;0;0;0;*4p1*3:1 1;126;430;0;0;0;0;*3:94p9 1AA SS/R 2;100;0;0;0;0;0;*4p1*3:1 3;126;188;0;1;2;0;SET(MR2)=R 4;126;341;0;0;0;0;SET(MR3)=(64+R) 5;102;0;2;1;3;0;SET 2ND WORD OF BLOCK=0 6;106;190;0;0;2;0;SELECT BLOCK WITHIN REEL CTR 7;100;210;1;0;3;0;SET(C) DECIMAL;STEP COUNTER BY 1 8;104;210;6;0;0;0;ADD 1 9;103;0;1;1;3;0;INSERT BLOCK NO. 10;102;190;0;0;2;0;;STORE BLOCK WITHIN 11;101;0;1;1;3;0;*8pt 12;107;193;24;0;2;0;*8pt 13;100;212;0;0;3;0;SET BINARY 14;126;342;0;0;0;0;*019 15;126;330;0;0;0;0;WRITE 16;126;343;0;0;0;0;*019 17;124;268;6;1;0;0;gUPDATE USE OF ASSEMBLER TABLE SHEET;336 PROCR;434;CLOSE MAGNETIC TAPE OUTPUT REEL NOTES;RADIX;B; 0;126;435;0;0;0;0;gSET UP END OF REEL SENTINEL 1;126;310;0;0;0;0;gWRITE END OF REEL INFORMATION 2;124;422;0;1;0;0;gUNLOAD SHEET;337 PROCR;435;SET UP END OF REEL SENTINEL NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;126;341;0;0;0;0;gSET (MR3)=(64+R) 2;106;211;6;1;0;0;SET R/M WORD IN 2ND. WORD 3;102;0;2;1;3;0; 4;106;214;8;1;0;0;SET B/E WORD IN 4TH. WORD 5;102;0;6;1;3;0; 6;106;211;4;1;0;0; 7;104;210;6;0;0;0; 8;126;435;0;0;1;0;gLEAVE S/R SHEET;338 PROCR;436;CLOSE MAGNETIC TAPE OUTPUT FILE NOTES;RADIX;B; 0;124;188;0;0;3;0;TEST BLOCK COUNTER 1;106;190;0;0;0;0;=5 2;101;0;6;1;2;0; 3;127;263;25;0;3;0;gYES ZZZ10 JUST REWOUND 4;126;309;0;0;0;0;gWRITE END OF FILE 5;126;310;0;0;0;0;gINFORMATION 6;125;0;0;1;2;0; 7;124;188;0;0;1;0; 8;102;190;0;0;0;0;CLEAR BLOCK CNTR 9;125;0;0;1;2;0;*1t1 10;124;188;0;0;1;0;CLEAR REEL CNTR 11;102;190;32;0;0;0; 12;126;357;0;0;0;0;gCOUNT 500 MILLISECS 13;126;451;0;0;0;0;*8p9 14;126;362;0;0;0;0;gUNLOAD 15;126;326;0;0;0;0;*179 gALTERNATE ROUTES 16;124;268;4;1;0;0;g SHEET;339 PROCR;437;REWIND NOTES;RADIX;B; 0;126;309;0;0;0;0;gWRITE END OF 1;126;310;0;0;0;0;gFILE INFORMATION 2;126;357;0;0;0;0;gCOUNT 500 MILLISECS 3;126;451;0;0;0;0;*8p9 4;126;340;0;0;0;0;g SET (MR3)=R 5;101;0;3;0;1;0; 6;115;190;32;0;3;0; 7;105;210;6;0;0;0;1 8;127;437;13;0;0;0;gREEL CTR=1,NO TAPE CHANGE 9;106;210;6;0;0;0;SET REEL CNTR=1 10;114;190;32;0;3;0; 11;126;324;0;0;0;0;gUNLOAD, NEW TAPE 12;124;268;7;1;0;0;gRESET MOD GP 13;124;188;0;0;1;0;REWIND 14;119;0;0;1;1;0; 15;106;210;4;0;0;0;SET REWIND IND TO 16;107;190;96;0;3;0;COUNT 500 M-SECS 17;101;0;5;1;3;0;SET BLOCK 18;124;188;0;0;3;0;COUNTER=5 19;102;190;0;0;0;0; 20;102;188;1;0;0;0;CLEAR ASSEMBLER TABLE, 21;124;268;6;1;0;0;g RESET MOD GROUP SHEET;340 PROCR;438;RUN FORWARD AND BACK (1) NOTES;RADIX;B; 0;125;0;0;1;2;0; 1;124;438;10;1;0;0;gSET PP=0, QQ=0 2;126;309;0;0;0;0;gWRITE END OF FILE 3;126;310;0;0;0;0;gINFORMATION 4;101;0;1;1;3;0;STEP BACK 3 FORWARD 1 5;101;0;2;1;1;0; 6;126;306;0;0;0;0; 7;126;315;0;0;0;0;TEST A1 FOR FBM 8;124;438;5;1;0;0;gYES STEP BACK 2 FORWARD 1 9;101;0;15;1;3;0;SET PP=15, QQ=0 10;124;0;3;0;1;0; 11;102;0;180;1;0;0; 12;126;341;0;0;0;0;gSET (MR3)=(64+R) 13;124;0;2;0;1;0;CLEAR IDENTIFIER WORD 14;124;0;33;0;1;0; 15;102;0;0;1;3;0; SHEET;341 PROCR;439;RUN FORWARD & BACK (2) NOTES;RADIX;B; 0;126;315;0;0;0;0;gTEST A1=FBM 1;124;440;0;1;0;0;gYES 2;124;0;7;0;2;0;TEST HEADING BLOCK 3;105;0;1;1;3;0; 4;127;441;15;0;2;0;gYES 5;106;0;1;1;3;0;;TEST SENTINEL TYPE 3 6;105;211;5;1;0;0; 7;105;210;6;0;0;0; 8;127;441;0;0;0;0;gYES 9;105;210;6;0;0;0;;TEST SENTINEL TYPE 3 10;127;442;16;0;0;0;gYES 11;124;0;3;0;1;0;;TEST D/B OCCURRED 12;106;0;160;0;0;0; 13;127;440;0;0;1;0;gYES 14;124;0;2;0;1;0;;TEST IDENTIFIER WORD 15;124;0;33;0;1;0;;=0 16;106;0;1;1;3;0; 17;127;440;0;0;0;0;gYES 18;105;0;32;0;1;0;;TEST REQUIRED BLOCK 19;127;442;0;0;1;0;gNO 20;106;0;1;1;3;0;SET BLOCK CNTR=A1 21;124;188;0;0;1;0; 22;102;190;0;0;0;0; 23;124;0;3;0;1;0; 24;102;0;181;0;0;0; 25;124;268;7;1;0;0;gRESET MOD GP SHEET;342 PROCR;440;RUN FORWARD & BACK (3) NOTES;RADIX;B; 0;124;0;3;0;1;0;;TEST PP=0 1;106;0;180;0;0;0; 2;127;440;16;0;0;0;gYES 3;106;212;4;0;0;0; 4;126;306;0;0;0;0;gSTEP BACK 2, STEP FORWARD 5;126;357;0;0;0;0;gCOUNT 500 M.SECS 6;124;188;0;0;1;0;RUN BACK 7;119;0;0;0;2;0; 8;126;351;0;0;0;0;gTEST RTE NOTING D/B 9;126;342;0;0;0;0;*019 SET (64+R) FOR HIGH DENSITY 10;106;210;6;0;0;0; 11;126;306;0;0;0;0;g STEP BACK, STEP FORWARD 12;126;343;0;0;0;0;*019 CLEAR BIT 1 OF (64+R) 13;126;329;0;0;0;0;gREAD 14;126;351;0;0;0;0;gTEST RTE NOTING D/B 15;124;439;0;1;0;0;g 16;126;341;0;0;0;0;SET(MR3)=(64+R) 17;106;0;4;1;3;0;TEST FINIS 18;105;258;26;1;0;0; 19;127;442;16;0;0;0;gYES 20;126;315;0;0;0;0;gTEST A1=FBK 21;124;440;13;1;0;0;gYES 22;124;188;0;0;1;0;RUN FORWARD 23;119;0;0;0;3;0; 24;126;351;0;0;0;0;gTEST RTE NOTING D/B 25;126;342;0;0;0;0;*019 SET (64+R) FOR HIGH DENSITY 26;106;212;4;0;0;0; 27;124;440;11;1;0;0;gSTEP BACK 2, FORWARD 1 SHEET;343 PROCR;441;RUN FORWARD & BACK (4) NOTES;RADIX;B; 0;106;210;6;0;0;0;AUGMENT REEL CNTR BY 1 1;100;210;1;0;3;0; 2;124;188;0;0;1;0; 3;107;190;32;0;0;0; 4;100;212;0;0;3;0; 5;126;357;0;0;0;0;COUNT 500 MILLISECS 6;126;324;0;0;0;0;gUNLOAD, 'NEW' COMMENT 7;126;410;0;0;0;0;gOPEN INPUT REEL 8;126;341;0;0;0;0;gSET (MR3)=(64+R) 9;124;0;2;0;1;0;CLEAR IDENTIFIER WORD 10;124;0;33;0;1;0; 11;102;0;0;1;3;0; 12;126;339;0;0;0;0;gSET (MR3)=(3) 13;102;0;180;0;3;0;SET PP=0 14;124;440;16;1;0;0;g 15;126;340;0;0;0;0;gSET(MR3)=R 16;101;0;3;0;1;0;;TEST REEL NO=1 17;115;190;32;0;3;0; 18;105;210;6;0;0;0; 19;127;442;6;0;0;0;gYES 20;125;0;0;1;2;0;AUG MENT REEL CNTR BY-1 21;100;210;1;0;3;0; 22;105;210;6;0;0;0; 23;124;441;2;1;0;0;g SHEET;344 PROCR;442;RUN FORWARD & BACK (5) NOTES;RADIX;B; 0;102;258;10;0;0;0;STORE DIFFERENCE, AN - REQ'D WORD 1;126;339;0;0;0;0;gSET (MR3)=(3) 2;106;0;180;0;3;0;TEST PP=0 3;127;442;14;0;0;0;gYES 4;106;258;10;0;0;0;;TEST DIFFERENCE < 0 5;127;440;0;0;2;0;gNO 6;126;339;0;0;0;0;gSET (MR3=((3) 7;102;0;180;0;3;0;SET PP=0 8;106;0;181;0;3;0;STEP QQ BY 1 9;104;210;6;0;0;0; 10;103;0;181;0;3;0; 11;101;0;6;1;2;0;*774;00002 12;127;263;23;0;0;0;*773;gZZZ08 13;124;440;0;1;0;0;g 14;106;258;10;0;0;0;;TEST DIFFERENCE > 0 15;127;440;0;0;3;0;gNO 16;126;339;0;0;0;0;gSET (MR3)=(3) 17;124;0;15;0;2;0; 18;124;442;7;1;0;0;gSET PP=15 19;106;214;90;1;0;0;*77t;OFFER 20;102;258;2;1;0;0; 21;126;361;0;0;0;0;EDIT TIME SET UP PROG NO 22;106;0;33;0;1;0;IDENTIFIER WORD 23;102;258;6;0;0;0; 24;106;0;32;0;1;0;IDENTIFIER VALUE 25;102;258;8;0;0;0; 26;102;258;10;1;0;0;CLEAR COL 5 27;101;0;3;1;3;0; 28;118;0;13;0;3;0;SET BITS 14 AND 15 29;102;0;41;0;1;0; 30;101;262;0;1;3;0;TABLE START ADDR. 31;124;335;0;1;0;0;gOFFER OPTIONS 32;126;362;0;0;0;0;OPT 15;SET ROUTE TO MANUAL 33;101;0;1;1;3;0;SET REEL COUNTER = 1 34;124;188;0;0;1;0; 35;102;190;32;0;0;0; 36;126;410;0;0;0;0;OPEN I/P REEL 37;124;438;9;1;0;0;gRUN FORWARD SHEET;345 PROCR;443;STEP BACK 1 NOTES;RADIX;B; 0;124;0;3;0;1;0;SET N NON-ZERO 1;102;0;181;0;0;0; 2;101;0;3;1;3;0;SET M=L+3 3;124;444;5;1;0;0;g; 43627 4;100;0;4102;0;3;0; SHEET;346 PROCR;444;STEP BACK 2 NOTES;RADIX;B; 0;124;0;3;0;1;0;SET N NON-ZERO 1;102;0;181;0;0;0; 2;126;309;0;0;0;0;gWRITE END OF FILE 3;126;310;0;0;0;0;gINFORMATION 4;101;0;5;1;3;0; 5;100;210;1;0;3;0; 6;104;0;32;0;1;0;SET M=L+5 7;100;212;0;0;3;0; 8;124;0;3;0;1;0; 9;102;0;180;0;0;0; 10;106;0;32;0;1;0; 11;127;263;20;0;3;0;gYES 12;127;444;27;0;1;0;gNO;TEST L=0 13;106;0;31;0;1;0; 14;101;0;44;1;2;0;;TEST RTE. TYPE=44 15;127;263;20;0;1;0;gNO 16;124;188;0;0;1;0;TEST BLOCK COUNTER=8 17;106;190;0;0;0;0; 18;101;0;8;1;2;0; 19;127;446;23;0;0;0;*019 gYES 20;127;444;27;0;1;0;*012 gNO 21;101;0;3;1;3;0; 22;126;306;0;0;0;0;STEP BACK 3, FORWARD 1 23;101;0;6;1;3;0; 24;124;188;0;0;1;0; 25;102;190;0;0;0;0;SET BLOCK COUNTER=6 26;124;446;29;1;0;0;*012 27;125;0;0;1;2;0; 28;100;210;1;0;3;0; 29;105;0;32;0;1;0;STEP BLOCK CNTR BY-L-1 30;126;331;0;0;0;0;g 31;126;340;0;0;0;0;gSET (MR3)=R 32;100;210;1;0;3;0;;TEST BLOCK CTR > 33;106;190;0;0;3;0;;NO. OF HEADING BLOCK 34;101;0;6;1;2;0; 35;127;445;0;0;3;0;gNO 36;100;212;0;0;3;0; 37;101;213;10;1;3;0;CONVERT M 38;124;0;3;0;1;0; 39;112;0;180;0;0;0; 40;126;306;0;0;0;0;gSTEP BACK M, FORWARD 1 BLOCK 41;126;329;0;0;0;0;gREAD 42;126;351;0;0;0;0;gTEST ROUTE NOTING D/B 43;126;315;0;0;0;0;gTEST A1 FOR FBM 44;124;444;58;1;0;0;gFBM FOUND 45;100;210;1;0;3;0;DEC 46;126;314;0;0;0;0;gTEST A1=BLOCK COUNTER 47;100;212;0;0;3;0;BIN 48;127;446;8;0;0;0;gYES 49;127;444;60;0;3;0;gYES;TEST A1BLOCK COUNTER 7;127;447;42;0;2;0;gYES 8;126;329;0;0;0;0;g READ 9;126;351;0;0;0;0;gTEST RTE NOTING D/B 10;124;446;6;1;0;0;g 11;124;0;3;0;1;0;;TEST D/B OCCURRED 12;106;0;160;0;0;0; 13;127;447;19;0;0;0;gNO 14;126;329;0;0;0;0;gREAD 15;126;351;0;0;0;0;gTEST RTE NOTING D/B 16;124;0;3;0;1;0; 17;106;0;160;0;0;0;;TEST D/B OCCURRED 18;127;263;22;0;1;0;gYES, ZZZ COMMENT 19;106;210;6;0;0;0; 20;100;210;1;0;3;0;STEP REEL CNTR BY 1 21;124;188;0;0;1;0; 22;107;190;32;0;0;0; 23;126;341;0;0;0;0;gSET (MR3)=(64+R) 24;106;210;6;0;0;0;STORE BLOCK COUNTER. 25;105;0;5;1;3;0;AUGMENTED BY-A3-1 26;124;188;0;0;1;0; 27;104;190;0;0;0;0; 28;124;0;3;0;1;0; 29;102;0;169;0;0;0; 30;100;212;0;0;3;0; 31;126;357;0;0;0;0;COUNT 500 MILLISECS 32;126;324;0;0;0;0;gUNLOAD 'NEW' COMMENT 33;126;410;0;0;0;0;gOPEN NEW INPUT REEL 34;100;210;1;0;3;0;SET DECIMAL 35;124;0;3;0;1;0;AUGMENT STORED CTR. 36;106;0;169;0;0;0;;BY HEADING BLOCKS 37;101;0;7;1;1;0;AND RESTORE 38;124;188;0;0;1;0; 39;102;190;0;0;0;0; 40;100;212;0;0;3;0;SET BINARY 41;124;446;6;1;0;0;g 42;101;446;6;1;3;0;SELECT RETURN LOCATION 43;124;0;3;0;1;0; 44;102;0;162;0;0;0; 45;126;323;0;0;0;0;gTEST OPTION LINK 46;126;316;0;0;0;0;gALIGNMENT FAILURE 47;124;446;6;1;0;0;g 48;126;317;0;0;0;0;gREREAD 49;126;319;0;0;0;0;gSTEP ATTEMPTS COUNTER 50;124;446;6;1;0;0;*1et 51;127;263;16;0;2;0;*pp0*pp2*223*2333:e*2433:e gNO 52;127;263;16;0;2;0;*3:e 53;127;263;16;0;3;0;*3:3;gZZZ01 54;127;449;13;0;3;0;*3:e243*3:e233533 SHEET;350 PROCR;448;SET REEL COUNTER 0;106;188;0;0;0;0; 1;103;0;6;1;0;0;SET(MR3)=R;TEST IF M/T 2;101;0;16;1;2;0;*3:t 3;127;448;6;0;3;0;*3:t 4;101;0;111;1;2;0;*224*2343:+*2443:+;000080001600024 5;127;263;16;0;3;0;*223*2333:e*2433:e;gNO:ZZZ01 6;106;190;32;0;3;0;;TEST REEL COUNTER=0 7;127;448;10;0;1;0;gNO 8;124;0;3840;0;2;0;SETX=p 9;102;190;32;0;3;0; 10;101;0;3;0;1;0;SET Y=NEW REEL NO 11;106;0;32;0;1;0; 12;114;190;32;0;3;0; 13;124;269;4;1;0;0;g SHEET;351 PROCR;449;SELECT REEL COUNTER 0;106;0;30;0;1;0;*19t 1;103;0;6;1;0;0;SET(MR3)=R 2;101;0;24;1;2;0;*02t*534 TEST P/T;0000000016 3;127;449;8;0;3;0;*3:3*3:e243*3:e233533 gNO 4;101;0;5;1;2;0;*534*0t4;0001300013 5;127;449;8;0;2;0;*3:e 6;106;252;64;0;3;0;*53+0t+3:+*53+3:+;0005000058 7;124;269;4;1;0;0;g 8;106;0;6;0;0;0;*02t 9;101;0;128;1;2;0;*3:t242*3:t232532*3:t 10;127;263;16;0;3;0;*3:t;gZZZ01 11;101;0;24;1;2;0;*234*224;0001600008 12;127;263;16;0;2;0;*3:t242*3:t232532 ZZZ01 13;101;0;3;0;1;0; 14;125;0;0;1;2;0; 15;115;190;32;0;3;0;SELECT REEL COUNTER 16;124;269;4;1;0;0;g SHEET;352 PROCR;450;RELEASE-ROUTE 0;124;212;0;1;1;0;*13t SET MOD GROUP 0 1;103;188;0;0;0;0;STORE(A) 2;102;0;30;0;1;0; 3;126;238;0;0;0;0;*069099;gAUGMENT TIME SPENT 4;126;250;0;0;0;0;*599 gSTORE MOD GROUP 3 5;106;100;16;0;0;0;STORE LINK 6;102;0;44;1;1;0; 7;126;353;0;0;0;0;gSELECT ROUTE NUMBER FROM LAST CHAPTER 8;127;450;12;0;0;0;gYES;TEST REQUIRED ENTRY 9;125;0;2;0;3;0;;TEST END OF TABLE 10;124;353;2;1;0;0;gNO 11;124;327;8;1;0;0;gXXXG COMMENT 12;101;0;16;0;1;0;STORE ROUTE TYPE 13;115;0;34;0;3;0; 14;118;0;4124;0;0;0; 15;102;188;1;0;0;0; 16;105;0;34;1;3;0;SET ENTRY NEGATIVE 17;127;263;24;0;2;0;gZZZ09 18;102;0;34;1;3;0; 19;101;0;12;0;1;0;*17t18t 20;115;0;34;0;3;0;;ROUTE ALLOCATED 21;105;210;3;0;0;0; 22;127;450;25;0;0;0;gNO 23;104;210;3;0;0;0;STORE ALTERNATE ROUTE 24;118;0;4126;0;0;0;AND SET 25;102;533;5;0;0;0;*17t18t 26;101;0;175;1;3;0;*3:+;00023 27;126;328;0;0;0;0;gCHANGE PARAMETER TABLES 28;106;188;1;0;0;0;SET ROUTE AVAILABLE 29;124;188;0;0;1;0; 30;102;0;64;0;0;0; 31;100;210;8;0;2;0;SET (MR2)=8*CH NO 32;115;188;0;0;0;0; 33;102;0;4;1;0;0; 34;101;0;1;0;1;0;CLEAR D/B INDICATOR 35;124;188;0;0;1;0; 36;118;0;0;1;0;0; 37;114;252;2;1;2;0; 38;106;533;5;0;0;0;*17t18t 39;127;450;43;0;0;0;gNO 40;102;188;0;0;0;0;SET UP ALT ROUTE 41;102;533;5;0;0;0;CLEAR INDICATOR 42;124;450;28;1;0;0;*17t18t 43;106;214;84;1;0;0; 44;102;258;2;1;0;0; 45;126;345;0;0;0;0;gEDIT TIME ETC 46;126;356;0;0;0;0;gSET UP PROG NO 47;124;450;50;0;2;0; 48;126;363;0;0;0;0;gSET LINK FOR SI=5 49;124;282;9;1;0;0;gOUTPUT COMMENT 50;126;359;0;0;0;0;gSET SI=4 51;124;268;7;1;0;0;gPROG SHEET;353 PROCR;451;OUTPUT NO OF O/P DB'S PER REEL 0;100;0;0;0;0;0;*8pt 1;106;451;0;0;0;0;STORE RETURN ADDR 2;124;0;3;0;1;0; 3;102;0;197;0;0;0; 4;106;0;30;1;1;0;SET UP ROUTE NO 5;103;188;0;1;0;0; 6;102;0;6;1;0;0;(MR3)=R 7;106;193;0;0;3;0;DB COUNT 8;127;451;29;0;0;0;gZERO NO COMMENT 9;102;258;6;0;0;0; 10;102;193;0;0;3;0;CLEAR COUNT 11;106;215;46;1;0;0;'TMS' 12;102;258;2;1;0;0; 13;126;345;0;0;0;0;EDIT TIME SET UP RTE NO 14;126;356;0;0;0;0;SET UP PROG NO 15;106;193;24;0;3;0;O/P BLOCK COUNT 16;102;258;8;0;0;0; 17;102;193;24;0;3;0;CLEAR 18;106;193;48;0;3;0;SPOOL NO 19;102;258;10;0;0;0; 20;101;261;52;1;3;0;CONVERT TO ALPHA 21;128;258;10;1;2;0; 22;101;451;26;1;3;0;RETURN ADD 23;126;363;0;0;0;0; 24;101;262;0;1;3;0; 25;124;336;0;1;0;0;gOUTPUT COMMENT 26;126;359;0;0;0;0; 27;106;0;30;1;1;0;RESTORE 188/2 28;102;188;0;1;0;0;FROM SI+30 29;124;0;3;0;1;0; 30;126;0;197;0;1;0;gLEAVE S/R SHEET;354 PROCR;452;LOCKOUT AND OVERFLOW ROUTINE NOTES;RADIX;;HALT VERSION 0;124;212;0;1;1;0;*34t SET MOD GROUP 0 1;100;212;0;0;3;0;BINARY 2;106;0;24;0;0;0; 3;102;0;38;0;1;0;STORE(24) 4;124;214;32;0;2;0;AMEND EDIT TABLE 5;102;217;26;0;0;0; 6;106;0;1;0;0;0;STORE(1) 7;102;0;40;0;1;0; 8;106;0;44;0;1;0;STORE LAST 9;102;0;41;0;1;0;ENTRY POINT 10;106;0;39;0;1;0;STORE PROG NUMBER 11;103;221;6;0;0;0; 12;105;107;9;0;0;0;;TEST IF MASTER 13;127;452;26;0;0;0;gYES 14;126;177;0;0;0;0;gREQUEST T/W 15;124;217;26;0;2;0;EDIT COMMENT 16;128;102;4;1;2;0; 17;124;0;4;0;2;0; 18;126;234;0;0;0;0;gS/R H 19;124;181;0;1;0;0;gLOG ROUTINE 20;124;212;0;1;1;0;SET MOD GROUP 0 21;100;212;0;0;3;0;BINARY 22;106;0;16;0;0;0;STORE(16) 23;102;0;38;0;1;0;STORE(16) 24;124;214;36;0;2;0; 25;124;452;5;1;0;0;g 26;106;217;26;0;0;0; 27;105;214;32;0;0;0; 28;127;452;30;0;0;0;gOFLOW 29;101;0;1;1;3;0;L'OUT 30;101;0;83;1;1;0; 31;124;208;1;1;0;0;gXXX COMMENT SHEET;355 PROCR;453;CONVERT S/R (FOR LOCKOUT AND OVERFLOW) 0;100;0;0;0;0;0;*342;LINK 1;118;0;4124;1;0;0;STORE DIVISION NUMBER 2;118;0;3;1;3;0; 3;118;0;4;0;0;0; 4;102;221;0;0;0;0; 5;118;0;13;1;3;0;CONVERT LOCATION WITHIN DIVISION 6;102;222;10;0;0;0; 7;100;210;1;0;3;0;SET DECIMAL 8;101;213;0;1;3;0;SELECT TABLE START 9;112;222;10;0;0;0; 10;107;221;0;0;0;0; 11;100;212;0;0;3;0;SET BINARY 12;106;221;0;0;0;0; 13;126;453;0;0;1;0;gLEAVE S/R SHEET;356 PROCR;454;LOCKOUT ROUTINE NOTES;RADIX;B; 0;124;0;2;0;1;0;*342 1;100;0;30;1;0;0;STORE(A)(B)(C) 2;100;212;0;0;3;0;SET BINARY 3;126;474;0;0;0;0;gSET TAG 15 4;124;212;0;1;1;0;0;SET MOD GROUP 0 5;106;0;2;0;0;0;(MR1) 6;105;107;6;0;0;0;M/R LINK;TEST FOR M/R LOCKOUT 7;127;455;14;0;0;0;g 8;125;0;0;1;2;0; 9;101;0;15;0;1;0;COLLATE(16) 10;115;0;16;0;0;0; 11;105;210;6;0;0;0;SUBTRACT ONE 12;126;453;0;0;0;0;gCONVERT S/R 13;102;0;38;0;1;0; 14;101;0;15;0;1;0;COLLATE LAST ENTRY POINT 15;115;0;44;0;1;0; 16;126;453;0;0;0;0;gCONVERT S/R 17;102;0;43;0;1;0; 18;106;0;32;0;0;0;*3t4; 1 19;126;453;0;0;0;0;gCONVERT S/R 20;102;0;45;0;1;0; SHEET;357 PROCR;455;LOCKOUT ROUTINE (2) NOTES;RADIX;B; 0;123;177;0;0;2;0;*342;REQUEST T/W 1;106;0;39;0;1;0;PROG IDENT NO 2;102;221;0;0;0;0; 3;106;0;38;0;1;0;;STORE DETAILS 4;102;222;10;0;0;0; 5;106;0;43;0;1;0; 6;102;222;11;0;0;0; 7;106;0;45;0;1;0; 8;102;222;12;0;0;0; 9;124;217;4;0;2;0;;EDIT COMMENT 10;128;102;4;1;2;0; 11;124;0;4;0;2;0; 12;126;234;0;0;0;0;gS/R H 13;124;181;0;1;0;0;gLOG ROUTINE 14;101;0;84;1;3;0;CODE LETTER (D) 15;124;208;1;1;0;0;g SHEET;358 PROCR;456;OVERFLOW ROUTINE NOTES;RADIX;B; 0;124;0;2;0;1;0;*342;STORE (A) (B),(C) 1;100;0;30;1;0;0; 2;100;212;0;0;3;0;SET BINARY 3;106;108;11;0;0;0;26/0/1/0/24;ARRANGE TO IGNORE 4;102;0;25;0;0;0;;FURTHER OVERFLOW 5;124;212;0;1;1;0;0;SET MOD GROUP 0 6;106;0;2;0;0;0;;TEST IF M/R OVERFLOW 7;105;107;6;0;0;0; 8;127;457;17;0;0;0;g 9;106;0;24;0;0;0;STORE CONTENTS OF COMPARTMENT 24 10;103;0;38;0;1;0; 11;118;0;6;0;0;0;GET RID OF TAG 12;118;0;4122;0;0;0; 13;105;210;6;0;0;0;SUBTRACT 1 14;126;453;0;0;0;0;gCONVERT S/R 15;102;0;45;0;1;0; 16;106;209;5;0;0;0;24/1/0/282/0 17;102;0;25;0;0;0;;RESET (25) 18;126;177;0;0;0;0;gREQUEST T/W 19;106;0;39;0;1;0;PROG.IDENT.NO 20;102;221;0;0;0;0;W/L SHEET;359 PROCR;457;OVERFLOW ROUTINE 2 NOTES;RADIX;B; 0;124;0;2;0;1;0;*342 1;100;0;30;1;1;0;;SELECT DETAILS & 2;100;222;10;1;0;0;;STORE IN FIXED AREAS 3;100;212;0;0;3;0;;RESET(C) BINARY 4;106;0;45;0;1;0; 5;102;221;1;0;0;0; 6;124;0;3;0;1;0;*60t;TEST IF TRIAL 7;106;0;11;0;0;0; 8;127;457;15;0;0;0;gNO 9;106;0;38;0;1;0;;TEST IF O'FLOW 10;118;0;6;0;0;0; 11;118;0;4122;0;0;0; 12;101;535;0;1;2;0;;IN M/R AREA 13;124;233;43;0;1;0; 14;127;0;3;0;2;0;*60t gNO 15;124;216;0;0;2;0; 16;124;455;10;1;0;0;g 17;101;0;83;1;3;0;CODE LETTER (C) 18;124;208;1;1;0;0;g SHEET;360 PROCR;458;UNASSIGNED ACTION 0;124;0;2;0;1;0;*3t2 1;100;0;30;1;0;0;STORE A.B C IN SI 2;124;212;0;1;1;0;SET MOD GROUP 0 3;100;212;0;0;3;0;SET BINARY 4;106;0;2;0;0;0;;TEST IF M/R UA 5;105;107;6;0;0;0; 6;127;458;34;0;0;0;gYES:XXX D 7;125;0;0;1;2;0;SET UP CONVERT TABLE 8;101;0;15;0;1;0;*342 9;115;0;0;0;0;0;COLLATE OUT LINK 10;126;453;0;0;0;0;gCONVERT S/R 11;102;0;45;0;1;0;*342 12;102;213;8;0;0;0;*34t 13;100;210;1;0;3;0; 14;101;213;0;1;3;0;CONVERT LINK 15;112;0;0;0;0;0; 16;102;0;45;0;1;0; 17;100;212;0;0;3;0; 18;106;210;9;0;0;0;RESET CONVERT TABLE 19;102;213;8;0;0;0;*34t 20;126;177;0;0;0;0;gREQUEST TW 21;106;0;39;0;1;0;SET UP PROG NO 22;102;258;4;0;0;0; 23;106;0;45;0;1;0;SET UP LINK 24;102;258;6;0;0;0; 25;102;258;8;1;0;0; 26;102;258;5;0;0;0; 27;101;261;10;1;3;0;EDIT COMMENT 28;128;102;4;1;2;0; 29;106;214;82;1;0;0;SET UP 'CPF' 30;102;102;4;1;0;0; 31;101;0;4;1;3;0; 32;126;234;0;0;0;0;gEDIT TIME 33;124;181;0;1;0;0;gLOG ROUTINE 34;101;0;99;1;3;0; 35;124;208;1;1;0;0;*3t2 36;102;226;0;0;0;0;*pp0*pp2*0te*103*4:3103 37;127;460;42;0;0;0;*20e 38;127;460;42;0;1;0;*20e20e SHEET;361 PROCR;459;SUB-ROUTINE G NOTES;RADIX;B;TO READ CONTROL DATA 0;100;0;0;0;0;0;LINK 1;102;222;17;0;0;0;FUNCTION NUMBER 2;106;0;4;0;0;0;;TEST CONTROL DATA 3;105;100;31;0;0;0;;RTE ACCEPTABLE 4;127;460;47;0;3;0;gNO, REJECT 5;106;100;32;0;0;0; 6;105;0;4;0;0;0; 7;127;460;47;0;3;0;gNO, REJECT 8;106;0;64;0;2;0; 9;102;222;16;0;0;0;W/L 10;106;209;8;0;0;0;14/0/0/17/60;SET UP (64+R) 11;103;460;49;0;0;0;*141 12;102;0;64;0;2;0; 13;126;107;6;1;1;0;;SET (MR1) FOR M/R 14;106;209;9;0;0;0;;SET UP (64+R1) 15;103;0;127;0;0;0; 16;102;227;0;0;0;0;*103 17;101;0;5;1;3;0;*14t SET OPT P1 SWITCH 18;102;296;4;0;0;0;*14t 19;101;0;63;1;3;0;*101 20;106;0;4;0;0;0;*109 21;118;0;4118;1;0;0; 22;106;0;4;0;0;0;*04t*02t;TEST PAPER TAPE OR 23;105;100;34;0;0;0;;CARD ROUTE 24;127;460;43;0;2;0;*04t*02t;gCARDS 25;101;0;5;1;3;0;*02+;00006 26;118;0;5;0;0;0; 27;104;0;4;0;0;0;ROUTE NO 28;100;222;18;1;0;0;STORE (AB) 29;126;100;0;0;0;0;gI/P O/P CONTROL;READ 30;100;222;18;1;1;0;*102 31;126;100;0;0;0;0;*102 32;126;350;0;0;0;0;*109 33;106;222;16;0;0;0;RESTORE (64+R) 34;124;222;18;0;1;0; 35;102;0;64;0;0;0; 36;102;460;49;0;0;0;*141 37;106;211;0;0;0;0;SET ASSEMBLER TABLE AT p5 38;124;100;33;0;1;0; 39;102;252;1;0;0;0; 40;102;296;4;0;0;0;*149 CLEAR OPTA SWITCH 41;106;222;17;0;0;0;;TEST FN=0 (I.E. PLS) 42;127;460;40;0;0;0;*20e SHEET;362 PROCR;460;SUB ROUTINE G (CONT) NOTES;RADIX;B; 0;106;226;0;1;0;0;;TEST 1ST WORD OF 1;105;211;8;1;0;0;;BLOCK IS CD WORD 2;127;498;0;0;1;0;gNO, REJECT 3;106;226;3;1;0;0;;TEST 2ND WORD ZERO 4;103;222;8;0;0;0;STORE IT 5;127;460;14;0;1;0;gNO 6;101;0;5;0;1;0;;TEST RTI COMMAND 7;115;233;5;0;0;0; 8;101;0;1025;1;2;0; 9;127;460;14;0;0;0;gYES 10;101;0;2;1;2;0;*4tt 11;127;460;14;0;0;0;*4tt 12;101;0;5;1;2;0;*4t4;00003 13;127;460;45;0;3;0;gNO 14;106;226;5;1;0;0;STORE SERIAL NO OR CH 8 RTE NO 15;102;222;9;0;0;0; 16;106;233;5;0;0;0; 17;102;0;185;0;0;0; 18;106;226;7;1;0;0;STORE RUN NUMBER 19;102;229;3;0;0;0;*3t4*3e+;0000300003 20;106;222;17;0;0;0;;TEST ALLOCATE 21;101;0;2;1;2;0;;COMMAND 22;127;460;27;0;0;0;gYES 23;101;0;2;1;2;0; 24;127;460;27;0;0;0;gYES 25;101;0;5;1;2;0; 26;127;460;40;0;1;0;*20e20e 27;106;214;8;1;0;0;BE WORD INTO ANNEX 28;102;226;16;1;0;0; 29;106;258;15;0;0;0;CLEAR WORKING LOCAMONS 30;101;0;18;1;2;0;SET UP REG A FOR CLEAR 31;118;0;5;0;0;0; 32;128;225;4;0;0;0; 33;124;219;0;0;2;0;UNPACK ALLOC DATA FR.TRIALgCH CH RT 34;128;226;8;0;3;0; 35;106;233;21;0;0;0;*01t;TEST HIGH DENSITY 36;127;460;40;0;0;0;*20e 37;106;222;18;0;0;0;ROUTE NUMBER 38;102;0;4;1;0;0; 39;124;459;1;1;0;0;*01t 40;124;222;18;0;1;0;*20t SET RTE TO MANUAL 41;119;0;0;1;3;0;*20t 42;126;459;0;0;1;0;g LEAVE S/R 43;101;0;6;1;3;0;*04t*02t 44;124;459;26;1;0;0;*04t*02t 45;124;0;81;0;2;0;CODE LETTER A 46;124;498;1;1;0;0;g 47;124;0;83;0;2;0;CODE LETTER C 48;124;498;3;1;0;0; 49;100;0;0;0;0;0;*141 SHEET;363 PROCR;461;SUB-ROUTINE Q NOTES;RADIX;B;TO FORM STORE CONTROL DATA RTE NO 0;100;0;0;0;0;0;LINK 1;101;0;2;0;1;0;FILL Q2B 2;125;0;0;1;2;0;DRAIN 3;115;222;0;0;0;0;IND. SETTING 4;118;0;4127;1;0;0;FORM & STORE ROUTE NO. 5;104;100;33;0;0;0; 6;102;0;4;0;0;0; 7;126;461;0;0;1;0;gLEAVE S/R SHEET;364 PROCR;462;SUB-ROUTINE U* NOTES;RADIX;B;REQUEST M/R FOR OVERLAY OR UNLOAD 0;100;0;0;0;0;0;LINK 1;106;462;0;0;0;0;STORE LINK IN SPECIAL CHAPTER 2;124;0;3;0;1;0; 3;102;0;169;0;0;0; 4;106;487;0;0;0;0;;TEST IF ALLOCATOR 5;127;462;11;0;0;0;gNO;LINK SET 6;124;462;4;0;2;0;SET LINK FOR SI=5 7;102;0;42;0;1;0; 8;126;360;0;0;0;0;gSET SI=5 9;124;0;2;0;1;0; 10;124;0;9;1;0;0;gTO S(I+1) 11;106;0;9;0;1;0;SET SI=2 12;103;0;7;0;1;0; 13;102;487;0;0;0;0;SET ALLOCATOR LINK 14;125;0;127;1;0;0;SET I1-7 15;124;0;3;0;1;0; 16;126;0;169;0;1;0;gLEAVE S/R 17;100;226;-2;0;0;0;*pp0*pp1*106 SHEET;365 PROCR;463;STORE DUMP NOTES;RADIX;B;INITIAL SET-UP ROUTINE (1) 0;106;220;9;0;0;0;*41t 1;103;487;0;0;0;0;SET ALLOCATOR LINK 2;102;296;4;0;0;0;*149 SET OPT A SWITCH AT 4 3;106;0;1;0;0;0;*3tt 4;102;227;7;1;0;0;*3tt*106 5;106;100;0;0;0;0;DIV 0 LOCS 160/161 6;102;227;41;1;0;0;*106 7;126;474;0;0;0;0;*3t1;SET TAG 15 8;106;0;153;0;0;0;*3t4;00191 9;102;227;45;1;0;0;*106 10;106;0;32;0;0;0;*3t2 11;102;227;9;1;0;0;*3t2*106 12;102;227;4;1;0;0;*106 IN CASE WORD 4 CONTAINS FINIS SHEET;366 PROCR;464;STORE DUMP NOTES;RADIX;B;INITIAL SET-UP ROUTINE (2) 0;106;107;6;1;0;0;*41t;SET MR1 FOR M/R 1;102;0;2;1;0;0; 2;106;108;10;0;0;0;;SET M/R SWITCH 3;102;106;11;0;0;0;;NON-INT 4;102;109;20;0;0;0;CLEAR MODIFIER 5;106;225;0;1;0;0;*57t;RESET PARA TO 6;102;233;24;0;0;0;*57t;ORIG CH CH RT 7;126;472;0;0;0;0;gSTORE RTE 7 DETAILS 8;106;209;9;0;0;0;;SET UP ASL'S 9;124;233;24;0;1;0;;IN 10;102;0;64;0;0;0;;(71) OR(79)&(126) 11;106;209;8;0;0;0; 12;102;0;126;0;0;0; 13;106;392;9;0;0;0;*25t*05t;AVOID PUNCHING 14;102;427;1;0;0;0;*25t*05t;LIBRARIAN CARD 15;106;233;44;0;0;0;*60t;TEST TRIAL IN 16;124;233;43;0;1;0; 17;127;0;1;0;1;0;*60t;ENTER PTS 18;100;214;12;1;2;0;;OPEN O/P FILE 19;101;0;18;1;3;0; 20;126;237;0;0;0;0;gI/P-O/P S/R 21;106;392;10;0;0;0;*25t*05t;RESTORE LIBRARIAN 22;102;427;1;0;0;0;*25t*05t;CARD ROUTINE 23;106;214;8;1;0;0;B/E WD 24;103;227;52;1;0;0;*101 25;102;226;52;1;0;0; 26;126;470;0;0;0;0;gWRITE S/R;LOCATIONS BLOCK SHEET;367 PROCR;465;STORE DUMP NOTES;RADIX;B;DUMP ROUTINE (1) 0;106;230;0;0;0;0;*41t M/R PROG NO;SET UP FIRST 1;102;226;5;1;0;0;;HEADING BLOCK 2;106;100;15;0;0;0;DATE 3;102;226;7;1;0;0; 4;106;0;156;0;0;0;TIME 5;102;226;9;1;0;0; 6;124;130;0;0;2;0;PRIORITY QUEUE END 7;102;226;17;1;0;0; 8;126;470;0;0;0;0;gWRITE S/R 9;124;109;20;0;1;0;;SET UP FURTHER 10;106;230;3;0;0;0;;HEADING BLOCKS 11;124;0;126;0;3;0; 12;103;0;5;1;0;0; 13;105;211;0;0;0;0;TEST FOR p5 14;127;466;0;0;0;0;gYES 15;124;109;20;0;3;0; 16;124;230;3;0;3;0; 17;106;0;39;0;0;0;PROG NO 18;124;0;126;0;3;0; 19;102;0;5;1;0;0; 20;124;109;20;0;3;0; 21;124;230;3;0;3;0; 22;124;0;37;0;3;0; 23;106;0;4;0;0;0;NO OF CHAPS 24;124;0;126;0;3;0; 25;102;0;7;1;0;0; 26;124;109;20;0;3;0;FORM BULK COPY TABLE 27;124;230;3;0;3;0; 28;124;0;37;0;3;0; 29;124;0;20;0;2;0; 30;104;108;14;1;0;0; 31;124;0;126;0;3;0;COPY CHAPTER 32;128;0;9;0;1;0;INFORMATION 33;101;0;2;1;3;0;STEP MODIFIER 34;107;109;20;0;0;0; 35;124;465;8;1;0;0;gNEXT PROG SHEET;368 PROCR;466;STORE DUMP NOTES;RADIX;B;DUMP ROUTINE(2) 0;101;0;4;1;3;0;*41t;PREPARE FOR 1;102;109;20;0;0;0;;MAIN LOOP 2;102;109;19;0;0;0; 3;102;109;21;0;0;0;CLEAR COUNTER 4;101;0;8;0;1;0; 5;115;0;153;0;0;0;SET UP STORE SIZE 6;127;466;8;0;1;0;*3t2 7;106;258;0;0;0;0;*3t2 8;103;109;22;0;0;0; 9;102;108;27;0;0;0;SET UP ABSURD TAG 10;126;469;0;0;0;0;gTEST END OF BLOCK S/R SHEET;369 PROCR;467;STORE DUMP NOTES;RADIX;B;DUMP ROUTINE (3)-MAIN OUTPUT LOOP 0;124;109;21;0;3;0;*41t;TEST FOR NEW TAG 1;123;0;0;0;3;0; 2;105;108;27;0;0;0; 3;127;467;9;0;0;0;gNO 4;107;108;27;0;0;0;;SET UP NEW TAG 5;106;108;27;1;0;0; 6;124;109;19;0;3;0; 7;102;0;4;1;0;0; 8;126;469;0;0;0;0;gTEST END OF BLOCK S/R 9;101;0;2;1;3;0;FORM BULK SET UP NEXT 10;118;0;5;0;0;0;COPY TABLE;LONG WORD 11;104;109;21;0;0;0;;OF STORE 12;124;109;19;0;3;0; 13;128;0;5;0;1;0; 14;126;469;0;0;0;0;gTEST END OF BLOCK S/R 15;123;0;2;0;0;0;STEP COUNTER;TEST END OF STORE 16;100;109;21;0;0;0; 17;124;467;0;1;0;0;gNO 18;101;0;8;0;1;0;*3et 19;115;0;153;0;0;0;TEST SECOND STORE PRINTED 20;105;109;22;0;0;0; 21;127;467;33;0;1;0;gYES 22;106;467;32;0;0;0; 23;102;109;21;0;0;0; 24;101;0;4;0;1;0;TEST SECOND STORE 25;115;0;153;0;0;0; 26;127;467;33;0;0;0;gNO 27;118;0;1;0;0;0; 28;104;467;32;0;0;0;SET UP SECOND STORE SIZE 29;103;109;22;0;0;0; 30;102;108;27;0;0;0;SET UP ABSURD TAG 31;124;467;0;1;0;0;gPRINT SECOND STORE 32;100;0;0;1;0;0;*3et 33;126;470;0;0;0;0;gWRITE S/R SHEET;370 PROCR;468;STORE DUMP NOTES;RADIX;B;END ROUTINE (1) 0;101;0;28;1;3;0;*41t;CLOSE O/P FILE 1;126;237;0;0;0;0;gI/P-O/P S/R 2;126;473;0;0;0;0;*459;RESTORE ROUTE 7 3;124;214;58;0;2;0; 4;123;0;168;0;2;0; 5;125;0;0;1;2;0;DRAIN 6;102;296;4;0;0;0;*149;CLEAR OPT A SWITCH 7;106;233;44;0;0;0;*60t;TEST IF PTS 8;124;233;43;0;1;0; 9;127;0;2;0;1;0;*60t;gYES 10;106;108;8;0;0;0;;RESTORE ASL 11;124;233;24;0;1;0; 12;102;0;64;0;0;0; 13;124;246;14;1;0;0;gNO SHEET;371 PROCR;469;STORE DUMP NOTES;RADIX;B;TEST END OF BLOCK SUBROUTINE 0;100;0;0;0;0;0;*41t LINK 1;123;0;4;0;0;0;STEP MODIFIER;TEST END OF BLOCK 2;100;109;19;0;0;0; 3;126;469;0;0;1;0;gNO 4;126;470;0;0;0;0;gWRITE S/R 5;106;0;126;0;0;0;SET UP BLOCK SIZE MODIFIER 6;103;109;19;0;0;0; 7;101;0;48;1;1;0; 8;102;109;20;0;0;0; 9;126;469;0;0;1;0;g SHEET;372 PROCR;470;STORE DUMP NOTES;RADIX;B;WRITE SUBROUTINE 0;100;0;0;0;0;0;*41t LINK 1;100;108;12;0;2;0; 2;101;0;8;1;3;0; 3;126;237;0;0;0;0;gI/P-O/P S/R 4;126;350;0;0;0;0;*109 5;106;108;12;1;0;0; 6;124;0;126;0;1;0;BULK CLEAR TA 7;128;0;0;0;0;0; 8;126;474;0;0;0;0;gSET TAG 15 S/R 9;126;470;0;0;1;0;g SHEET;373 PROCR;471;STORE DUMP-W/L'S FOR ROUTE 07 0;100;0;0;0;0;0;*45t 1;100;0;0;0;0;0; 2;100;0;0;0;0;0; 3;100;0;0;0;0;0; 4;100;0;0;0;0;0; 5;100;0;0;0;0;0;*019 SHEET;374 PROCR;472;STORE RT 7 DETAILS 0;100;0;0;0;0;0;*41t60t*41t45t 1;100;220;1;0;2;0;PACKS BITS 1-3 IN 2;106;220;1;0;0;0;ROUTE INDICATOR 3;114;233;24;0;0;0; 4;124;233;24;0;1;0; 5;106;0;64;0;0;0;;RTE 7 A.S.L. 6;102;108;8;0;0;0; 7;124;233;24;0;1;0;*45t 8;106;190;0;0;0;0;BLOCK COUNTERS 9;102;471;0;0;0;0; 10;124;233;24;0;1;0; 11;106;190;32;0;0;0;REEL COUNTER 12;102;471;1;0;0;0; 13;124;233;24;0;1;0; 14;106;190;64;0;0;0;PROGM NUMBER 15;102;471;2;0;0;0; 16;124;233;24;0;1;0; 17;106;190;96;0;0;0;FILE IDENTITY 18;102;471;3;0;0;0; 19;124;233;24;0;1;0; 20;106;191;30;0;0;0;RUN AND RERUN NUMBER 21;102;471;4;0;0;0; 22;124;233;24;0;1;0;*01t 23;106;191;62;0;0;0;90K INDICATORS 24;102;471;5;0;0;0;*45t*01t 25;124;233;24;0;1;0;CLEAR REEL COUNTER 26;102;190;32;0;0;0; 27;126;472;0;0;1;0;gLEAVE S/R SHEET;375 PROCR;473;RESTORE RT 7 DETAILS 0;100;0;0;0;0;0;*41t60t*45t 1;106;471;0;0;0;0; 2;124;233;24;0;1;0; 3;102;190;0;0;0;0;BLOCK COUNTER 4;106;471;1;0;0;0; 5;124;233;24;0;1;0; 6;102;190;32;0;0;0;REEL COUNTER 7;106;471;2;0;0;0; 8;124;233;24;0;1;0; 9;102;190;64;0;0;0;PROGRAM NUMBER 10;106;471;3;0;0;0; 11;124;233;24;0;1;0; 12;102;190;96;0;0;0;FILE IDENTITY 13;106;471;4;0;0;0; 14;124;233;24;0;1;0; 15;102;191;30;0;0;0;RUN+RE-RUN NUMBER 16;106;471;5;0;0;0;*01t 17;124;233;24;0;1;0; 18;102;191;62;0;0;0;*01t 90K INDICATORS 19;126;473;0;0;1;0; SHEET;376 PROCR;474;SET TAG 15 SUBROUTINE NOTES;RADIX;B; 0;100;0;0;0;0;0;LINK 1;106;209;3;0;0;0;SET (9) TO IGNORE INTERRUPTION 2;102;0;9;0;0;0; 3;126;474;4;0;3;0;SET TAG 15 4;115;474;5;0;0;0; 5;125;0;4096;1;1;0;SET NON-INT 6;106;209;4;0;0;0; 7;102;0;9;0;0;0;RE-SET(9) 8;126;474;0;0;1;0;g SHEET;377 PROCR;475;THE UNLOADER-PRELIMINARIES 0;126;107;6;1;1;0;SET MR1 FOR MASTER 1;106;221;10;0;0;0;PROG ID;LOCATE PROG IN PQ 2;126;479;0;0;0;0;gS/R M* 3;124;476;19;1;0;0;gNOT FOUND 4;102;230;0;0;2;0;;REMOVE PROG FROM PQ 5;106;230;1;0;2;0;START OF SWITCH 6;102;0;6;0;0;0; 7;124;270;0;0;2;0;*464;00004 8;102;0;42;0;3;0; SHEET;378 PROCR;476;OUTPUT COMMENT 0;106;0;46;1;3;0;*09t06t;TOTAL TIME SPENT 1;118;0;4125;1;1;0; 2;101;0;5;0;2;0;ROUND OFF 3;102;222;6;1;0;0; 4;101;213;10;1;3;0;DECIMALgBINARY 5;112;222;6;1;0;0; 6;102;222;6;1;0;0; 7;100;220;5;0;3;0;SET RADIX FOR MINS&SECS 8;101;213;18;1;3;0; 9;112;222;6;1;0;0;CONVERT TIME SPENT 10;102;222;6;1;0;0;*09t06t 11;100;220;5;0;3;0;*2pt*091*061 RADIX FOR MINS AND SECS 12;101;213;18;1;3;0; 13;112;104;11;0;0;0;CONVERT INEFF TIME 14;102;221;2;0;0;0;*2pt 15;100;212;0;0;3;0;*2p9099069;BINARY 16;102;104;10;1;0;0;*2p9 17;101;482;0;1;3;0; 18;124;478;0;1;0;0;gOUTPUT COMMENT 19;101;0;97;1;3;0;J 20;124;208;1;1;0;0;gXXX COMMENT SHEET;379 PROCR;477;COMMAND REJECTION COMMENT 0;101;0;81;1;3;0;*362 CODE LETTER(A) 1;124;477;3;1;0;0; 2;101;0;82;1;3;0;CODE LETTER(B) 3;102;221;2;0;0;0; 4;124;481;0;0;2;0;START OF TABLE 5;124;478;0;1;0;0;*362 gCOMMENT 6;124;481;20;0;2;0;START OF TABLE SHEET;380 PROCR;478;OPERATOR INTERVENTION END ROUTINE 0;102;221;11;0;0;0;W/L 1;126;177;0;0;0;0;gREQUEST T/W 2;106;221;11;0;0;0;START OF TABLE 3;128;102;4;1;2;0;;SET UP COMMENT 4;126;234;0;0;0;0;gS/R M 5;126;480;0;0;0;0; 6;124;181;0;1;0;0;gLOG ROUTINE SHEET;381 PROCR;479;SUB-ROUTINE M*-TO SEARCH PRIORITY TABLE 0;100;0;0;0;0;0;LINK 1;102;221;0;0;0;0;STORE PROGRAMME NUMBER 2;102;0;4;1;0;0;CLEAR (MR2) 3;106;230;0;0;2;0;;TEST REQUIRED 4;105;221;0;0;0;0;;PROGRAMME 5;127;479;11;0;0;0;gYES 6;106;230;0;0;2;0;;TEST END OF TABLE 7;105;211;0;0;0;0; 8;127;479;13;0;0;0;gYES 9;125;0;2;0;2;0;STEP(MR2) 10;124;479;3;1;0;0;g 11;124;479;0;0;1;0; 12;124;0;1;1;0;0;gLEAVE S/R+1 13;126;479;0;0;1;0;gLEAVE S/R SHEET;382 PROCR;480;END ROUTINE AFTER ALLOCATION-OVERLAY-STORE DUMP NOTES;RADIX;;AND OPERATOR INTERVENTION 0;100;0;0;0;0;0; 1;106;221;41;0;0;0;*16t 2;127;480;29;0;2;0;g UPTIME NOT STOPPED 3;106;221;36;0;0;0;*85t 4;127;480;13;0;0;0;*85t 5;126;221;36;1;3;0; 6;106;0;45;0;3;0;REOPEN PROGRAM 7;127;480;11;0;3;0;*85t*0:t 8;125;0;0;1;2;0;PAUSED-RESET ORIGINAL 9;105;0;45;0;3;0;SWITCH SETTING 10;124;480;12;1;0;0;*85t*0:t 11;102;0;7;0;3;0; 12;102;0;45;0;3;0; 13;106;221;38;0;0;0;*85t 14;127;480;23;0;0;0; 15;126;221;38;1;3;0; 16;106;0;45;0;3;0;REOPEN 2ND PROGRAM 17;127;480;21;0;3;0;*0:t 18;125;0;0;1;2;0;PAUSED-RESET ORIGINAL 19;105;0;45;0;3;0;SWITCH SETTING 20;124;480;22;1;0;0;*0:t 21;102;0;7;0;3;0; 22;102;0;45;0;3;0;*85t 23;102;221;41;0;0;0;CLEAR INDICATORS 24;106;480;0;0;0;0;*85t TEST AFTER OVERLAY 25;101;246;21;1;2;0; 26;127;480;29;0;1;0;gNO 27;106;0;35;0;2;0; 28;102;0;7;0;2;0;*16t*85t 29;125;0;1919;1;2;0;SET L2 IF INDICATORS STACKED 30;101;0;127;1;2;0; 31;102;103;1;0;0;0; 32;125;0;6143;1;1;0;RESET INDICATORS 33;106;108;9;0;0;0; 34;102;106;11;0;0;0;SET M/R SWITCH INT 35;102;487;0;0;0;0; 36;102;296;4;0;0;0;*149 37;106;103;0;0;0;0;TEST OPTION OUTSTANDING 38;127;480;40;0;0;0; 39;125;0;128;1;0;0; 40;126;480;0;0;1;0; SHEET;383 TABLE;481;1;EDIT TABLES FOR COPYING TO C REJ 0;214;14;0;0;2;0;5;0;0;0;0;0;0;*362 C,SP,R,E,J 2;221;2;0;0;2;0;1;4;1;0;0;0;0;SP,CODE LETTER 4;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 6;222;8;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 8;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 10;214;18;0;0;2;0;2;0;1;0;0;0;0;SP,G,P 12;0;185;0;0;0;0;1;2;0;0;0;0;0; 14;214;18;0;0;2;0;2;3;1;0;0;0;0;SP,F,N 16;0;185;0;0;0;0;1;4;0;0;0;0;0; 18;211;20;0;0;2;0;2;0;1;0;0;0;1;*362 SP,L/E,L/E 20;214;14;0;0;2;0;5;0;0;0;0;0;0;C,SP,R,E,J 22;214;10;0;0;2;0;2;3;2;0;0;0;0;SP,SP,N/E,N/E 24;214;18;0;0;2;0;2;0;1;0;0;0;0;SP,G,P 26;222;0;0;0;0;0;1;2;0;0;0;0;0;GP NO 28;214;18;0;0;2;0;2;3;1;0;0;0;0;SP,F,N 30;222;0;0;0;0;0;1;4;0;0;0;0;0;FN NO 32;211;20;0;0;2;0;2;0;1;0;0;0;1;SP,L/E,L/E 34;211;20;0;0;2;0;2;0;1;0;0;0;1;*pp0*pp2*2pe093*2pe063 36;211;20;0;0;2;0;2;0;3;0;0;0;1;*2p309e06e 38;222;6;0;0;1;0;3;5;5;3;0;0;0;*063 40;222;6;0;0;1;0;2;8;1;0;0;1;0;*063063 SHEET;384 TABLE;482;1; 0;214;52;0;0;2;0;5;0;0;0;0;0;0;A,B,D,O,N,(OR E,N,D) 2;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 4;221;10;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 6;214;30;0;0;2;0;1;0;5;0;0;0;0;*09t06t*063 SP T 4SP 8;214;36;0;0;2;0;4;4;1;0;0;0;0;*09t06t*063063 SP T 4SP 10;214;4;0;0;2;0;5;0;7;0;0;0;0;*2pt 7SP,I,N,E,F,F 12;221;2;0;0;0;0;2;1;2;1;0;0;0;2SP,MINS 14;221;2;0;0;0;0;2;3;1;1;0;0;0;*2pt SP,SECS 16;211;20;0;0;2;0;2;0;2;0;0;0;1;*2pe093*2pe063*2p309e06e SHEET;385 PROCR;483;MINI-STORE PRINT 0;125;0;4096;1;1;0;*412;SET NON-INT 1;101;0;2048;1;3;0;SET UP ASL FOR INPUT 2;102;0;0;0;0;0; 3;125;0;0;1;2;0;DUMMY 4;119;0;0;0;1;0;INPUT 5;126;0;0;1;0;0;TEST RTE 6;100;0;291;0;0;0;CLOSED;HALT 1/2/3 7;124;483;5;1;0;0;ENGAGED 8;100;0;2049;0;0;0;DOUBTFUL;HALT 8/0/1 9;100;0;32;0;0;0;WARNING OF END;HALT 0/2/0 10;106;483;8;1;0;0; 11;128;0;2081;1;0;0; 12;124;0;2081;1;0;0;*412 13;124;487;80;1;0;0;*pp0*pp2*01e 14;124;477;6;1;0;0;*363363 gREJ 15;127;477;6;0;1;0;*363*36360e;gREJ 16;127;487;85;0;1;0;*36e60e;gYES REJ 17;124;488;1;1;0;0;*3t3*3ee 18;124;488;3;1;0;0;*3t201e*3et01e 19;124;491;8;1;0;0;*3t33t3*3ee3ee 20;124;491;9;1;0;0;*3t3363*3ee363 21;124;199;13;1;0;0;*41e SHEET;386 PROCR;484;REJECT PROGRAMME 0;101;0;86;1;3;0;*149 LETTER'F'FROM OPT A SWITCH 1;102;221;2;0;0;0;REJECT AFTER UNLOADING OTHER PROGS 2;124;212;0;1;1;0;;SET MOD GROUP 0 3;106;218;4;1;0;0;RESTORE MOD GP 3 REGISTERS 4;128;0;26;0;0;0; 5;123;0;26;1;0;0;*59t SET TAG 0 6;123;0;30;1;0;0;IN MOD GROUP 3 7;123;0;28;1;0;0;*59t 8;124;485;0;0;2;0;START OF EDIT TABLE 9;124;478;0;1;0;0;g SHEET;387 TABLE;485;1; 0;214;86;0;0;2;0;5;0;0;0;0;0;0;R,R,J,E,C 2;214;36;0;0;2;0;1;4;0;0;0;0;0;T, 4;221;2;0;0;2;0;1;4;4;0;0;0;0;4 SP,CODE LETTER 6;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 8;221;6;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 10;211;20;0;0;2;0;2;0;1;0;0;0;1;SP.L/E,L/E 12;222;6;0;0;1;0;3;5;5;3;0;0;0;*3+t*09t 14;222;6;0;0;1;0;2;8;1;0;0;1;0;SECS 16;214;30;0;0;2;0;1;0;5;0;0;0;0;/////5 SP'S N 18;214;36;0;0;2;0;4;4;1;0;0;0;0;/////SP,T,3 SP'S SHEET;388 CONST;486;0;SO'ALLOCATOR'STARTS IN EVEN ADDRESS SHEET;389 PROCR;487;THE ALLOCATOR NOTES;RADIX;B;PREPARATORY 0;100;0;0;0;0;0;LINK 1;106;230;2;1;0;0;*40t;TEST IF PROGRAM 2;105;211;0;1;0;0;;ALREADY 3;127;477;6;0;1;0;gYES;ALLOCATED 4;101;0;1026;1;3;0;SET UP 4/0/2 5;102;233;5;0;0;0;*40t 6;125;0;0;1;2;0;DUMMY ACTION FOR REFERENCES 7;106;225;5;1;0;0;*57t*60t TEST TRIALS ALLOC 8;127;487;12;0;0;0;gNO 9;106;225;0;0;0;0;FORM RTE NUMBER 10;101;0;7;1;1;0; 11;124;487;22;1;0;0;*60t 12;100;220;1;0;2;0;CONVERT FROM 13;115;225;11;1;0;0;CH CH RT 14;101;0;7;1;2;0;TEST ROUTE 7 15;127;487;40;0;0;0;gYES C REJ D 16;101;0;7;1;1;0; 17;104;225;11;1;0;0; 18;118;0;3;0;3;0;TO BINARY 19;118;0;4127;0;0;0; 20;127;487;66;0;0;0;NOT SPECIFIED 21;101;0;48;1;2;0;*3:9 22;103;225;10;1;0;0; 23;101;0;128;1;2;0;*3:9 24;127;487;40;0;3;0;TEST IN RANGE;NOgC REJ D 25;101;0;24;1;2;0;*224*234;0000800016 26;127;487;40;0;2;0;;NOgC REJ D 27;101;0;24;1;1;0;*3:1*224*234;000000000800016 28;101;0;152;1;1;0;*3:9*224*234;000000013600144 29;126;249;0;0;0;0;gSEARCH LIST FOR;AVAIL CH CH RT 30;124;487;42;1;0;0;gAVAIL 31;124;225;10;0;1;0;gNOT IN LIST;SEARCH ASL'S FOR 32;106;0;64;0;0;0;;AVAIL CH CH RT 33;103;225;12;1;0;0;COPY RT TYPE TO WL 34;101;0;4087;1;2;0;TEST pp7 35;127;487;49;0;0;0;gAVAIL 36;101;0;1;1;2;0;pp8 37;127;487;49;0;0;0;gAVAIL 38;101;0;3;1;2;0; 39;127;487;49;0;0;0;gAVAIL 40;101;0;84;1;3;0;*363363 41;124;477;3;1;0;0;*361 CREJ D 42;106;225;10;1;0;0;CH CH RT 43;103;233;24;0;0;0;*57t 44;106;225;6;1;0;0;STORE(A) 45;102;232;20;1;0;0; 46;106;225;8;1;0;0;STORE(B) 47;102;232;22;1;0;0; 48;124;487;68;1;0;0;*57t 49;101;0;36;1;3;0;;SET INDIRECT MR=36:0 50;102;225;15;0;0;0; 51;102;225;14;0;0;0; 52;124;225;14;0;1;0;;SEARCH FOR FIRST 53;106;224;1;0;0;0;;AVAIL SPACE IN 54;127;487;59;0;0;0;gAVOID SPACE;LIST 55;123;0;6;0;0;0;STEP MOD BY 6 56;100;225;14;0;0;0; 57;124;487;52;1;0;0;gLOOK FOR NEXT;SPACE 58;124;487;40;1;0;0;gNO ROOM-C REV;D 59;106;225;10;1;0;0;STORE CH CH RT 60;124;225;14;0;1;0;INTO LIST 61;102;224;0;0;0;0; 62;106;225;12;1;0;0;STORE RT.TYPE IN LIST 63;124;225;14;0;1;0; 64;102;224;1;0;0;0; 65;124;487;42;1;0;0; 66;106;225;0;0;0;0;PUT NORMAL ALLOC RT. 67;124;487;22;1;0;0;*57t 68;106;225;5;1;0;0;;TEST TRIALS ALLOC 69;127;487;80;0;0;0;*36e60e*36360e;gNO 70;106;233;44;0;0;0;*60t TEST TRIAL ALREADY IN PROCESS 71;127;487;85;0;1;0;*363 gYES CREJC 72;126;472;0;0;0;0;*459;STORE 07 DETAILS 73;106;210;6;0;0;0;SET TRIALS BIT IN 74;107;233;5;0;0;0;ALLOC COMMAND 75;101;0;1;1;3;0;*44t;RESET PRINT 76;102;233;26;0;0;0;*44t;INDICATOR 77;106;225;5;1;0;0;STORE TRIALS IND 78;102;222;5;0;0;0; 79;102;225;4;1;0;0;*60t;CLEAR TRIALS IND 80;106;222;8;1;0;0;STORE PROG 1D AND SERIAL NO 81;103;221;6;1;0;0; 82;126;479;0;0;0;0;gS/R M 83;124;488;0;1;0;0;*3t201e*3et01e*3t3*3ee 84;124;487;86;1;0;0;*363363;gC REJ B 85;101;0;1;1;3;0;*362 C 86;101;0;82;1;1;0;B 87;124;491;9;1;0;0; SHEET;390 PROCR;488;LOCATE A PIECE OF STORAGE FOR THE FIRST CHUNK OF P.L.S. NOTES;RADIX;B; 0;102;106;6;0;0;0;*3t1*3e9 1;106;218;8;1;0;0;*01t 2;128;497;0;1;1;0;*01t 3;106;211;0;1;0;0; 4;101;231;0;1;0;0;;TABLE 5;105;231;0;1;0;0;;TEST START 6;127;488;16;0;0;0;gYES 7;118;0;10;1;0;0; 8;101;0;2;1;2;0; 9;102;0;4;1;0;0; 10;106;0;1;0;2;0; 11;101;0;360;1;2;0;;BIG ENOUGH? 12;127;488;15;0;3;0;gNO 13;104;0;0;0;2;0; 14;124;488;22;1;0;0;g 15;125;0;0;1;2;0;DRAIN 16;126;479;0;0;0;0;gS/R M*;SEARCH FOR A ZERO 17;124;491;0;1;0;0;*3t3363*3ee363*3t33t3*3ee3ee 18;124;0;4;0;1;0;STORE;TABLE 19;124;230;1;0;1;0;START 20;124;0;37;0;1;0;OF 21;124;0;140;0;2;0;STRIP 22;102;233;2;0;0;0; 23;124;233;2;0;1;0;FORM & STORE 13-BIT FORM OF 24;101;0;0;1;3;0;START OF STRIP 25;102;233;1;0;0;0; SHEET;391 PROCR;489;LOCATE PROGRAMME NOTES;RADIX;B; 0;106;108;9;0;0;0;;SET M/R SWITCH INT. 1;102;106;11;0;0;0; 2;100;210;6;0;2;0;*572*60t 3;115;233;5;0;0;0; 4;127;489;6;0;0;0;gNO 5;106;220;1;0;0;0;*60t;SET BITS 1-3 OF RTE 6;100;220;1;0;2;0; 7;114;233;24;0;0;0;*572 8;106;209;8;0;0;0;SET UP A.S.L'S. 9;124;233;24;0;1;0; 10;102;0;64;0;0;0; 11;106;209;9;0;0;0; 12;102;0;124;0;0;0; 13;126;241;0;0;0;0;gS/R A 14;124;489;15;1;0;0;gFILE HAS BEEN OPENED 15;126;242;0;0;0;0;gS/R B 16;124;491;10;1;0;0;*363363;gREJ 17;106;0;185;0;0;0;*40t TEST O/WRITE ALLOC 18;101;0;1033;1;2;0; 19;127;489;34;0;1;0;g 20;106;231;2;1;0;0;SET UP STORE 21;102;231;0;1;0;0;TABLE 22;124;487;2;0;2;0; 23;102;231;2;0;0;0; 24;101;487;2;1;2;0; 25;107;231;3;0;0;0; 26;106;489;33;0;0;0;PLANT 24/1/0 ORDER 27;102;199;41;0;0;0;TO REJECT COMMANDS 28;105;210;6;0;0;0;*14t MAKE ABANDON 29;107;279;28;0;0;0;OPTION UNAVAILABLE 30;107;313;8;0;0;0; 31;107;415;18;0;0;0;*14t 32;124;489;34;1;0;0; 33;124;199;84;1;0;0;*40t*41e 34;106;108;10;0;0;0;;SET M/R SWITCH 35;102;106;11;0;0;0;;NON-INT SHEET;392 PROCR;490;LOAD FIRST CHAPTER NOTES;RADIX;B; 0;101;0;1;1;3;0;*14t SET OPTA SWITCH AT 1 1;102;296;4;0;0;0;*14t 2;106;218;0;1;0;0;STORE MOD GP 3 REGISTERS 3;128;222;10;0;0;0; 4;106;233;2;0;0;0;SET UP (28) FOR STACKING 5;103;0;28;1;0;0; 6;103;0;4;0;0;0;SET UP MR2 FOR STACKING TAG 14 7;101;0;360;1;1;0; 8;102;0;5;0;0;0; 9;126;474;0;0;0;0;gSET TAG 15 10;124;0;14;0;2;0;STACK TAG 14 11;123;0;0;1;2;0; 12;125;0;2;0;2;0; 13;124;490;11;1;0;0; 14;101;0;14;1;3;0;*59t SET TAG 14 IN MR2 OF MG6 TO 15;123;0;26;1;0;0; 16;123;0;30;1;0;0; 17;123;0;28;1;0;0;*59t KID PLS INTO;ALLOCATING MG3 18;124;233;0;0;2;0;PARAMETER TABLE START 19;126;247;0;0;0;0;gLOAD S/R 20;126;233;2;0;1;0;gTO PROGRAMME LOADING SYSTEM SHEET;393 PROCR;491; NOTES;RADIX;B;PROCEDURE AFTER FAILURE TO ALLOCATE 0;106;106;6;0;0;0;*3t2*3et;TEST SECOND STORE 1;127;491;8;0;1;0;*363 gYES,REJECT DEALT WITH 2;101;0;1;1;3;0; 3;102;106;6;0;0;0; 4;106;211;0;1;0;0; 5;101;232;0;1;0;0; 6;105;232;0;1;0;0; 7;124;488;6;1;0;0;*3t2*3et 8;101;0;85;1;3;0;*361 9;124;477;3;1;0;0;*364 g;00008 10;101;0;81;1;3;0;*362;CODE LETTER A 11;102;221;2;0;0;0; 12;124;225;14;0;1;0;*579 13;106;224;2;1;0;0;SET UP PROGRAM FOUND FOR COMMENT 14;102;222;8;1;0;0; 15;124;225;14;0;1;0;*579 16;102;224;2;1;0;0;CLEAR IDENTITY LAST PROGRAM USED 17;124;493;0;0;2;0;START OF EDIT TABLE 18;124;478;0;1;0;0;g SHEET;394 CONST;492;1;*38 FIXED COMMENT 0;(A)TIMIN;*09t*3+t 2;(A)G (D)5.5.;G,SP,SP,L/E,L/E 4;(A)TIMEN; 6;(A)D (D)5.5.;*09t*3+t 8;(A)PTAPE;*07t 10;(A)PCARD;*07t 12;(A)HIP ;*019 14;(A)OMIT;*5:t 16;(A)SET; 18;D/B; 20;SER; 22;SP; 24;EDG; 26;SP -; SHEET;395 TABLE;493;1;CREJ EDIT TABLE NOTES;;; 0;214;14;0;0;2;0;5;0;0;0;0;0;0;*362 'C REJ' 2;221;2;0;0;2;0;1;4;1;0;0;0;0;SP,CODE LETTER 4;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 6;221;6;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 8;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 10;222;8;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 12;214;10;0;0;2;0;1;3;0;0;0;0;0;N/E 14;214;18;0;0;2;0;2;0;1;0;0;0;0;SP,G,P 16;0;185;0;0;0;0;1;2;0;0;0;0;0; 18;214;18;0;0;2;0;2;3;1;0;0;0;0;SP,F,N 20;0;185;0;0;0;0;1;4;0;0;0;0;0; 22;211;20;0;0;2;0;2;0;0;0;0;0;1;*362 L/E,L/E 24;221;1;0;0;0;0;1;0;3;0;0;0;0;*pp0*pp2*61e 3SP,PRIORITY CLASS 26;215;12;0;0;2;0;5;0;0;0;0;0;0;*11312e 'ROUCH' 28;229;1;0;0;0;0;5;0;0;0;0;0;0;*3t3*3ee SHEET;396 TABLE;494;1; 0;100;29;0;0;0;0;1;4;3;0;0;0;0;*08t*61e SP,TAG 2;221;0;0;0;0;0;5;0;1;0;0;0;1;PROGM NO SHEET;397 TABLE;495;1; NOTES;;; 0;215;2;0;0;2;0;5;0;0;0;0;0;0;*0et 'PR CH' 2;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 4;222;8;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 6;211;20;0;0;2;0;2;0;2;0;0;0;1;*0et 8;215;8;0;0;2;0;5;0;0;0;0;0;0;*0:t 'REOPE' 10;214;18;0;0;2;0;1;4;0;0;0;0;0;N 12;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 14;222;8;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 16;211;20;0;0;2;0;2;0;1;0;0;0;1;*0:t 18;215;10;0;0;2;0;5;0;0;0;0;0;0;*0+t 'RUNCH' 20;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 22;222;8;0;0;0;0;5;0;0;0;0;0;0;PROGRAMME NUMBER 24;214;20;0;0;2;0;1;1;0;0;0;0;0;N/E 26;229;3;0;0;0;0;5;0;0;0;0;0;0;*3t3*3ee 28;211;20;0;0;2;0;2;0;1;0;0;0;1;*0+t 30;215;6;0;0;2;0;5;0;0;0;0;0;0;*11t12t*11312e 'AVAIL' 32;214;20;0;0;2;0;2;1;0;0;0;0;0;N/E,N/E 34;222;8;0;0;0;0;3;2;0;1;0;0;0;CH. & RTE. 36;222;9;0;0;0;0;3;2;1;3;0;0;0;CH * RTE(OLD) 38;211;20;0;0;2;0;2;0;4;0;0;0;1;4 SP,L/E.L/E SHEET;398 CONST;496;1;DUMMY PROCEDURE FOR VARIABLE ALLOCATION SHEET;399 CONST;497;1;STORED HIGH DENSITY 0;(D)0;*01t65t 2;0; 4;0; 6;0; 8;0; 10;0; 12;0; 14;0; 16;0; 18;0;*65t 20;0; 22;0; 24;0; 26;0; 28;0; 30;0; SHEET;400 PROCR;498;CONTROL DATA REJECTION NOTES;RADIX;B; 0;124;0;82;0;2;0;CODE LETTER B 1;124;222;18;0;1;0;SET ROUTE TO MANUAL 2;119;0;0;1;3;0; 3;102;221;2;0;0;0; 4;126;177;0;0;0;0;gREQUEST T/W 5;106;214;30;1;0;0;SET UP NO CD 6;102;102;4;1;0;0; 7;106;221;2;0;0;0;SET UP CODE LETTER 8;102;102;6;1;0;0; 9;124;197;2;0;2;0;SET UP L/E'S 10;128;102;8;1;2;0; 11;124;0;4;0;2;0; 12;124;478;4;1;0;0;g SHEET;401 PROCR;499;READ CONTROL DATA WITHOUT CHECKS NOTES;RADIX;B; 0;100;0;0;0;0;0;*01t 1;126;499;0;0;1;0;*01t SHEET;402 PROCR;500;SUB-ROUTINE R NOTES;RADIX;B;TO OBTAIN AND CHECK FUNCTION NUMBER 0;100;0;0;0;0;0;LINK 1;102;221;0;0;0;0;STORE LIMIT 2;115;222;0;0;0;0;;TEST IF FUNCTION 3;127;477;6;0;0;0;gYES,REJECT;NUMBER=0 4;105;221;0;0;0;0;;TEST IF OUTSIDE 5;127;477;6;0;2;0;gYES,REJECT;LIMIT 6;104;221;0;0;0;0; 7;126;500;0;0;1;0;gLEAVE S/R SHEET;403 PROCR;501;FORM CHECK,AND STORE PARAMETER FROM I5-7 0;100;0;0;0;0;0;*07t5:t6tt 1;101;0;2;0;1;0;TEST RANGE 2;115;0;185;0;0;0;COLLATE Q2 3;127;477;6;0;2;0;gOUT OF RANGE 4;101;0;0;1;3;0;FORM PARAMETER 5;115;222;0;0;0;0; 6;118;0;4127;0;0;0; 7;103;108;26;0;0;0; 8;126;177;0;0;0;0;gREQUEST T/W 9;106;108;26;0;0;0;SET UP MR2 10;103;0;4;0;0;0;STORE IT 11;126;501;0;0;1;0;gLEAVE S/R SHEET;404 PROCR;502;SUB-ROUTINE S NOTES;RADIX;B;CHECK ROUTE & FORM IT UP IN BINARY & PLACE IN M.R.2 0;100;0;0;0;0;0;*12t11t;LINK 1;101;0;2;1;3;0;SET MR3=2:0 2;118;0;5;0;0;0; 3;102;0;6;1;0;0; 4;106;222;8;0;3;0;CHANNEL AND ROUTE 5;118;0;4127;1;0;0;STORE CHANNEL 6;102;533;0;0;3;0; 7;118;0;1;1;0;0;STORE RTE 8;102;533;2;0;3;0; 9;101;213;10;1;3;0;CONVERT CHANNEL NUMBER 10;112;533;0;0;3;0;TO BINARY 11;103;533;0;0;3;0; 12;118;0;3;0;3;0;;PLACE IN MR2 13;104;533;2;0;3;0; 14;103;533;6;0;3;0; 15;103;0;4;1;0;0; 16;127;477;0;0;3;0;*364 gNOT IN RANGE;00008 17;101;0;176;1;2;0; 18;127;477;0;0;2;0;*364 gNO;00008 19;106;0;64;0;2;0;PLACE RTE TYPE IN 20;118;0;4127;1;0;0;TOP OF B 21;126;502;0;0;1;0;*12t11t;gLEAVE S/R 22;100;477;6;0;0;0;*pp0*pp2*09e*3+e*08e*07e*02e*04e*5:e 23;100;477;6;0;0;0;*69e*68e*67e*66e*6te 24;124;510;21;1;0;0;*3:e3:e 25;127;477;6;0;2;0;*3:e;C REJ 26;127;511;10;0;1;0;*8ee gNO 27;127;477;6;0;1;0;*363 SHEET;405 PROCR;503;GROUP 1 NOTES;RADIX;B;DETERMINE FUNCTION 0;101;0;1;0;1;0;*09t08t07t5:t69t68t67t66t6tt86t86t 1;101;0;12;1;3;0;*86+6t+*86+;0001000011 2;126;500;0;0;0;0;g S/R R 3;102;503;6;0;0;0; 4;124;503;6;0;1;0; 5;126;503;6;0;1;0; 6;100;477;6;0;0;0; GEN CONST;FUNCTION NO 7;100;504;0;0;0;0;*09e*3+e TIME;gSTART TIMINGS 8;100;505;0;0;0;0;*09e*3+e TIME;gSTOP TIMINGS 9;100;506;0;0;0;0;*08e PRINT PRIORITY;LIST 10;100;507;0;0;0;0;*07e*02e*04e;gPREFER PT 11;100;508;0;0;0;0;*5:e;gOMIT CATEGORIES 12;100;509;0;0;0;0;*69e;gREWIND AND UNLOAD 13;100;510;0;0;0;0;*68e;gAVAILABLE ROUTES 14;100;512;0;0;0;0;*67e;gAVAILABLE STORAGE 15;100;513;0;0;0;0;*66e;gCARD CHECK 16;100;514;0;0;0;0;*86t6tt*6te;gCHANGE CHANNEL 17;100;515;0;0;0;0;*869;gPREFER PRINTER SHEET;406 PROCR;504;GROUP 1:FUNCTION 1 NOTES;RADIX;B;START TIMINGS 0;106;223;0;0;0;0;*09t*3+t 1;127;504;27;0;1;0;*363 ALREADY ON 2;126;177;0;0;0;0;gREQUEST TYPEWRITER 3;126;212;6;1;2;0;144:0 4;106;209;0;0;0;0;6/0/0/0/157 5;102;111;4;0;2;0;SET UP INSTRUCTIONS;IN I/P O/P TO CLEAR 6;106;265;0;0;0;0;19/0/1/0/56;RESET MILLISEC TIMER 7;102;111;27;0;2;0; 8;102;111;46;1;2;0;W/L 9;106;209;1;0;0;0; 10;102;111;17;0;2;0; 11;125;0;48;0;2;0; 12;124;504;4;1;0;0;g 13;106;333;1;0;0;0;0/0/3/2/1 14;102;264;29;0;0;0; 15;106;209;0;0;0;0;6/0/0/0/157 16;103;264;30;0;0;0; 17;103;223;0;0;0;0;IND THAT TIMINGS ARE ON 18;106;485;12;1;0;0;;AMEND UNLOADER EDIT 19;102;482;6;1;0;0;;TABLE 20;106;485;14;1;0;0; 21;102;482;8;1;0;0; 22;106;492;0;1;0;0;;SET UP COMMENT 23;102;102;4;1;0;0; 24;106;492;2;1;0;0; 25;102;102;6;1;0;0; 26;124;478;4;1;0;0;g 27;125;0;0;1;2;0;*362 28;102;222;8;0;0;0; 29;124;477;0;1;0;0; SHEET;407 PROCR;505;GROUP 1:FUNCTION 2 NOTES;RADIX;B;STOP TIMINGS 0;126;177;0;0;0;0;*09t*3+t gREQUEST T/W 1;126;212;6;1;2;0;144:0 2;106;111;6;0;2;0; 3;102;111;4;0;2;0; 4;106;111;28;0;2;0;;OVERSTACK TIMING 5;102;111;27;0;2;0;;INSTRUCTIONS IN 6;106;209;7;0;0;0; 7;102;111;17;0;2;0; 8;125;0;48;0;2;0;;PRIORITY CONTROL 9;124;505;2;1;0;0;g 10;102;223;0;0;0;0;IND 11;106;264;33;0;0;0;;OVERSTACK TIMING 12;102;264;29;0;0;0;;INSTRUCTIONS IN I/P 13;106;264;34;0;0;0;;O/P CONTROL 14;102;264;30;0;0;0; 15;106;485;16;1;0;0;;AMEND UNLOADER EDIT 16;102;482;6;1;0;0;;TABLE 17;106;485;18;1;0;0; 18;102;482;8;1;0;0; 19;106;492;4;1;0;0;;SET UP COMMENT 20;102;102;4;1;0;0; 21;106;492;6;1;0;0; 22;124;504;25;1;0;0;g SHEET;408 PROCR;506;GROUP1: FUNCTION 3 NOTES;RADIX;B;PRINT PRIORITY LIST 0;126;177;0;0;0;0;*08t gREQUEST T/W 1;101;0;1008;0;1;0; 2;115;214;10;1;0;0;P.SP.Q 3;102;102;4;1;0;0;;COMMENT 4;102;0;4;1;0;0;MR2;CLEAR MR2 5;102;0;6;1;0;0;MR3 6;106;230;2;0;2;0; 7;127;506;27;0;0;0;gZERO,PROGRAM ABANDONED 8;106;230;2;1;2;0;PRIORITY TABLE ENTRY 9;103;221;0;1;0;0;W/L 10;105;211;0;1;0;0;15'S;TEST END OF TABLE 11;127;506;29;0;0;0;gYES;1ST TEST 12;124;221;1;0;1;0;*61t SWITCH START;FIND TAG 13;124;0;37;0;1;0;SPECIAL CHAPT START 14;106;0;10;0;0;0;TAG 15;102;100;29;0;0;0;*61t STORE TAG IN W/L 16;124;494;0;0;2;0;TABLE START 17;124;0;6;0;1;0; 18;128;102;6;1;2;0;EDIT ENTRY 19;106;0;6;0;0;0;*1.2*1:2*1p2*382 TEST END OF 20;101;0;12;1;2;0;IST LINE 21;127;506;26;0;1;0; 22;101;0;12;0;1;0; 23;115;211;20;0;0;0; 24;102;102;10;1;3;0; 25;125;0;2;0;3;0;*1.2*1:2*1p2*382 26;125;0;4;0;3;0; 27;125;0;2;0;2;0; 28;124;506;6;1;0;0;g 29;106;105;4;0;0;0;LE'S FOR END OF COMMENT 30;102;102;6;1;3;0; 31;124;478;4;1;0;0;g SHEET;409 PROCR;507;GP1 FN4: PREFER P/T, PREFER CARDS 0;101;0;32;1;2;0;*07t*02t*04t RANGE CHECK 1;126;501;0;0;0;0;FORM,CHECK AND STORE PARAMETER 2;102;233;33;0;0;0;STORE INDICATOR 3;124;0;4;0;1;0;MODIFY FOR PTAPE OR PCARDS 4;106;492;8;1;2;0; 5;102;102;4;1;0;0; 6;106;214;78;1;0;0;L/E L/E 7;124;508;14;1;0;0;*5:9 gSET UP COMMENT SHEET;410 PROCR;508;GP1 FN5: OMIT CATEGORIES 0;101;0;80;1;2;0;*5:t 1;126;501;0;0;0;0;FORM,CHECK,AND STORE PARAMETER 2;127;477;6;0;0;0; 3;126;332;0;0;0;0;TEST CATEGORY S/R 4;101;0;8191;1;1;0; 5;114;508;18;0;0;0;SET CATEGORY 6;101;0;8191;1;2;0; 7;127;508;9;0;0;0;gOMIT 8;101;0;2;1;3;0;FORM OMITX 9;102;0;6;0;0;0;OR SETX 10;106;492;14;1;3;0;FORM OMITX 11;102;102;4;1;0;0;FIRST WORD 12;124;0;4;0;1;0;D/B,SER,SP,OR EDG 13;106;492;16;1;2;0;*5:t 14;102;102;6;1;0;0;*07t5:t*02t5:t*04t5:t 15;106;214;78;1;0;0;L/E L/E 16;102;102;8;1;0;0; 17;124;478;4;1;0;0;gEND ROUTINE 18;100;0;0;0;0;0; SHEET;411 PROCR;509;REWIND AND UNLOAD PROGRAM TAPE COMMANDS 0;101;0;32;1;2;0;*69t 1;101;0;2;0;1;0;TEST RANGE 2;115;0;185;0;0;0;COLLATE Q2 3;127;477;6;0;2;0;gOUT OF RANGE 4;118;0;4127;0;1;0; 5;101;0;2;1;1;0; 6;118;0;2;0;3;0; 7;103;429;0;0;0;0; 8;127;509;11;0;0;0;gYES 9;101;0;34;1;3;0;34 10;124;509;12;1;0;0;gSKIP 11;101;0;27;1;3;0;27 12;118;0;4118;1;0;0;SHIFT(AB) 13;106;258;26;1;0;0;FINIS 14;124;0;192;0;1;0;*3:+;00064 15;102;0;4;1;0;0; 16;118;0;15;1;0;0;SHIFT(AB) 17;101;0;128;1;1;0;*3:9 18;126;100;0;0;0;0;I/P O/P S/R 19;126;177;0;0;0;0;gREQUEST T/W 20;106;215;26;1;0;0;TAPE 21;102;102;4;1;0;0; 22;124;429;0;0;1;0; 23;100;215;28;1;1;0; 24;100;102;6;1;0;0; 25;100;213;1;0;3;0; 26;125;0;0;1;2;0;CLEAR A 27;124;478;4;1;0;0;*69t;gT/W 49600 SHEET;412 PROCR;510;GP1 FN7 AVAILABLE ROUTES COMMAND 0;126;177;0;0;0;0;*68t;REQUEST TYPEWRITER 1;101;0;2;0;1;0; 2;115;0;185;0;0;0; 3;101;0;128;1;2;0; 4;127;510;23;0;2;0;*3:e CH 16,17,18 5;101;0;128;1;1;0; 6;126;510;9;0;0;0;*3:t gSET UP CHANNEL NUMBER 7;101;0;12;0;1;0; 8;124;510;29;1;0;0;SET UP REST OF COMMENT 9;100;0;0;0;0;0;*3:t 10;127;510;15;0;1;0;gNOT CHANNEL 0 11;101;0;3;1;3;0;;SET UP ZERO 12;118;0;3;0;0;0; 13;102;221;0;1;0;0; 14;124;510;17;1;0;0;*3:e3:e 15;103;221;1;1;0;0;;SET UP CH NUMBER 16;118;0;4127;0;0;0; 17;103;500;0;0;0;0;*3:t 18;124;213;10;0;2;0; 19;112;500;0;0;0;0;*3:t 20;118;0;3;0;3;0; 21;102;500;0;0;0;0; 22;126;510;9;0;1;0;*3:t 23;100;210;1;0;3;0; 24;101;0;352;1;1;0;ADD 160 25;100;213;11;0;3;0; 26;126;510;9;0;0;0; 27;101;0;60;0;1;0;*3:t 28;101;0;12;0;1;0;*3:1 29;106;215;22;1;0;0; 30;115;221;0;1;0;0; 31;102;102;4;1;0;0; 32;106;500;0;0;0;0;SET UP IND MOD REG 33;103;533;0;0;0;0;8*CH 34;101;0;8;1;1;0;9*CH 35;102;533;1;0;0;0; 36;102;533;2;1;0;0;MOD REG FOR TYPING 37;124;533;0;0;1;0;ROUTE 38;106;0;64;0;0;0; 39;118;0;4127;1;0;0;TEST AVAILABLE 40;127;510;51;0;0;0;gYES 41;101;0;255;1;2;0;TEST POTENTIALLY AVAILABLE 42;127;511;0;0;1;0;*8ee gNO 43;106;533;0;0;0;0;POTENTIALLY AVAILABLE 44;105;500;0;0;0;0; 45;127;510;47;0;1;0; 46;101;0;48;1;1;0; 47;118;0;3;0;0;0; 48;118;0;3;1;0;0; 49;101;0;955;0;1;0; 50;124;511;18;1;0;0;g 51;106;533;0;0;0;0;AVAILABLE 52;105;500;0;0;0;0; 53;127;510;55;0;1;0; 54;101;0;48;1;1;0; 55;118;0;3;0;0;0; 56;118;0;3;1;0;0; 57;101;0;907;0;1;0; 58;124;511;18;1;0;0;g SHEET;413 PROCR;511;GP1 FN7 AVAILABLE ROUTES COMMAND(2) 0;125;0;0;1;2;0;*68t*8et 1;102;533;4;1;0;0;CLEAR INDIRECT MOD REGISTER 2;124;533;4;0;1;0; 3;106;230;2;0;0;0;TEST PROS ENDED 4;127;511;31;0;0;0;gYES 5;105;211;0;0;0;0;TEST END OF TABLE 6;127;511;10;0;0;0;gYES 7;123;0;2;0;0;0;STEP MR 8;100;533;4;0;0;0; 9;124;511;2;1;0;0;*8et 10;106;533;0;0;0;0;ROUTE 11;105;500;0;0;0;0;8*CH 12;127;511;14;0;1;0;gNON ZERO 13;101;0;48;1;1;0;OBTAIN ZERO 14;118;0;3;0;0;0; 15;101;0;208;1;1;0;TO GIVE U 16;118;0;3;0;0;0; 17;101;0;947;0;1;0; 18;115;215;24;1;0;0;ADD IN REST OF WORD 19;124;533;2;0;1;0;STORE IN 20;102;102;6;1;0;0;T/W ANNEX 21;101;0;0;0;1;0; 22;123;0;2;0;0;0; 23;100;533;2;0;0;0; 24;123;0;1;0;0;0;LAST ROUTE 25;100;533;0;0;0;0; 26;124;510;37;1;0;0;gNO 27;106;214;78;0;0;0;L/E,L/E 28;102;102;22;1;0;0; 29;126;107;6;1;1;0;(MR1)FOR MASTER 30;124;478;4;1;0;0;gOUTPUT COMMENT 31;124;533;4;0;1;0;*8et 32;124;230;3;0;1;0;SET(MR1)FOR PROG 33;126;0;36;1;1;0;WHICH HAS REACHED END 34;126;354;0;0;0;0;gSET(MR3)=LC+2*NO FILES/LC 35;125;0;0;1;2;0; 36;101;0;3;0;1;0; 37;115;0;34;0;3;0; 38;105;533;0;0;0;0;TEST SAME ROUTE 39;127;511;43;0;0;0;gYES 40;125;0;1;0;3;0;*17+18+;00002 41;124;511;35;1;0;0;gNEXT ROUTE 42;124;511;7;1;0;0;gNEXT PROG 43;101;0;16;0;1;0; 44;115;0;34;0;3;0;RTE TYPE IN Q5 45;102;533;6;0;0;0;*13t 46;100;210;6;0;2;0;*17t18t;CLEAR BIT 1 OF 47;114;0;6;0;0;0;*17t18t;MR3 48;106;0;34;1;3;0;;TEST ROUTE RELEASED 49;127;511;7;0;3;0;;gYES 50;106;533;6;0;0;0;*13t 51;118;0;4123;1;0;0;RTE TYPE IN Q10 OF 13 52;124;510;51;1;0;0;*68t*8et 53;124;512;42;1;0;0;*pp0*pp2*3t3*3ee 54;100;0;0;0;0;0;SPARE SHEET;414 PROCR;512;EXCESS STORE COMMENT 0;126;177;0;0;0;0;*67t;gREQUEST T/W 1;106;215;20;1;0;0;SET UP STORE 2;102;102;4;1;0;0;IN T/W ANNEXE 3;101;0;20;1;3;0; 4;102;0;4;1;0;0; 5;126;212;12;1;3;0;10:0 6;106;230;19;0;2;0; 7;105;211;0;0;0;0;SUB 15'5 8;127;512;12;0;1;0;IF NOT 9;125;0;4098;0;2;0;YES 10;124;512;6;1;0;0;PICK UP NEXT WORD 11;124;512;25;1;0;0;*3t3*3ee 12;100;210;1;0;3;0;SET DECIMAL 13;124;213;0;0;2;0; 14;112;231;-1;0;2;0;CONVERT BINgDEC 15;102;102;72;0;0;0; 16;124;261;50;0;2;0; 17;124;0;6;0;1;0; 18;128;102;6;1;2;0; 19;100;213;1;0;3;0; 20;101;0;768;0;1;0; 21;114;102;6;1;3;0;CLEAR TOP QUARTET OF A 22;125;0;2;0;3;0;END OF WORD? 23;125;0;4098;0;2;0; 24;124;512;45;1;0;0;PICKUP NEXT WORD 25;106;500;0;0;0;0;*3t2*3et 26;127;512;42;0;3;0;IF NEG 27;101;0;18;1;3;0;IF POS 28;102;0;5;0;0;0; 29;101;0;38;1;1;0; 30;102;0;4;0;0;0; 31;101;0;1008;0;1;0; 32;115;214;20;1;0;0; 33;102;102;6;1;3;0;SET UP L.E.,N.E.,N.E 34;106;0;6;0;0;0; 35;101;0;2;1;1;0;SET START VALUE MR3 36;103;0;6;0;0;0; 37;101;0;10;1;1;0; 38;102;0;7;0;0;0;SET UP END VALUE MR3 39;101;0;1111;1;2;0; 40;102;500;0;0;0;0;SET IND NEG 41;124;512;6;1;0;0;*3t2*3et 42;106;214;78;1;0;0; 43;102;102;6;1;3;0; 44;124;478;4;1;0;0;TYPE 45;125;0;0;0;3;0; 46;124;512;6;1;0;0; 47;124;512;23;1;0;0; SHEET;415 PROCR;513;GP1 FN9:CHECK FIELD ON CARD INPUT 0;118;0;1;1;0;0;*66t 1;125;0;0;1;2;0;CLEAR A 2;115;0;185;0;0;0; 3;115;0;185;0;0;0; 4;118;0;4127;0;0;0; 5;102;210;13;0;0;0;STORE 2C 6;126;177;0;0;0;0;gREQUEST T/W 7;106;215;18;1;0;0;CARD 8;102;102;4;1;0;0; 9;106;214;44;1;0;0;CHECK 10;102;102;6;1;0;0; 11;106;210;13;0;0;0;C 12;118;0;15;0;3;0; 13;104;214;78;0;0;0;2 L/E'S 14;102;102;8;1;0;0; 15;124;478;4;1;0;0;g SHEET;416 PROCR;514;CHANGE CHANNEL 0;101;0;64;1;3;0;*6tt 1;126;501;0;0;0;0;FORM,CHECK AND STOREFROM I5-7 2;127;514;6;0;0;0;IF ZERO 3;101;0;1;1;2;0; 4;127;477;6;0;0;0;gREJECT 5;101;0;1;1;1;0; 6;118;0;3;0;3;0;;STORE 7;103;100;31;0;0;0; 8;103;100;32;0;0;0; 9;103;100;33;0;0;0; 10;101;0;4;1;1;0; 11;102;100;34;0;0;0; 12;106;215;2;1;0;0; 13;102;102;4;1;0;0; 14;101;0;64;1;3;0; 15;104;0;4;0;0;0; 16;118;0;8;0;1;0; 17;101;0;15;0;1;0; 18;115;211;20;0;0;0; 19;102;102;6;1;0;0; 20;124;478;4;1;0;0; SHEET;417 PROCR;515;SET PREFERRED PRINTER TYPE 0;126;177;0;0;0;0;*86t REQUEST TYPEWRITER 1;125;0;0;1;2;0; 2;101;0;1;0;1;0;COLLATE OUT 3;115;233;27;0;0;0;PRINTER TYPE 4;101;0;9;1;2;0;TEST=9 5;127;515;10;0;1;0;gNO 6;106;215;38;1;0;0;SET UP GP 7;102;102;6;1;0;0; 8;101;0;4;1;3;0; 9;124;515;13;1;0;0;g 10;106;215;40;1;0;0;SET UP SP 11;102;102;6;1;0;0; 12;101;0;9;1;3;0;COLLATE IN 13;114;233;27;0;0;0;NEW PRINTER TYPE 14;106;215;36;1;0;0;REST OF 15;102;102;4;1;0;0;COMMENT 16;106;214;78;0;0;0;L/E,L/E 17;102;102;8;1;0;0; 18;124;478;4;1;0;0;*86t 19;100;477;6;0;0;0;*pp0*pp2*0ee*1.3*0:e*0+e*12e*11e*40e 20;100;477;6;0;0;0;*4te;gREJECT 21;127;477;6;0;1;0;*57e363*363;gCREJ 22;100;477;6;0;0;0;*17e18e*61e;gREJ 23;115;222;0;0;0;0;*643 TEST IF FUNCTION NO.=0. 24;127;477;6;0;0;0;*643643;YESgREJECT 25;101;0;10;1;3;0;*64e61e 26;101;0;7;1;3;0;*64e61e0:e0+e 27;101;0;9;1;3;0;*64e61e0:e SHEET;418 PROCR;516;GROUP 2 NOTES;RADIX;B;DETERMINE FUNCTION 0;126;461;0;0;0;0;gS/R Q 1;101;0;14;1;3;0;*643*64e61e0:e0+e*64e61e0:e*64e61e 2;126;500;0;0;0;0;*643643;gS/R R 3;103;516;10;0;0;0; 4;101;0;11;1;2;0;*61t64t TEST COMMAND USES TAG 5;127;516;26;0;2;0;gYES 6;101;0;11;1;1;0;*61t64t 7;126;459;0;0;0;0;gS/R G 8;124;516;10;0;1;0; 9;126;516;10;0;1;0; 10;100;0;0;0;0;0;FUNCTION NUMBER 11;100;517;0;0;0;0;gUNLOAD 12;100;487;6;0;0;0;*17e18e;ALLOC 13;100;477;6;0;0;0;gREJECT 14;100;487;6;0;0;0;*17e18e;ALLOC 15;100;477;6;0;0;0;gREJECT 16;100;518;0;0;0;0;*0ee*1.3 gINTERCHANGE PRIORITIES 17;100;520;0;0;0;0;*0+t0:t61t64t*0:e;OPEN PROG 18;100;521;0;0;0;0;*0+e gRUNCH 19;100;522;0;0;0;0;*0:e gCLOSE PROGRAM 20;100;477;6;0;0;0;*61t64t;gREJECT 21;100;518;0;0;0;0;*0ee*1.3*61e;gINTERCHANGE 22;100;520;0;0;0;0;*0:e*61e;gOPEN PROG 23;100;522;0;0;0;0;*0:e*61e;gCLOSE PROG 24;100;477;6;0;0;0;*64t;gREJECT 25;100;517;0;0;0;0;*64t;gUNLOAD 26;101;0;2;0;1;0;FORM TAG NO 27;101;0;0;1;3;0; 28;115;0;185;0;0;0; 29;127;477;0;0;0;0;*364 g REJECT;00008 30;109;212;9;0;0;0; 31;118;0;9;1;0;0; 32;101;108;0;1;1;0;FORM SWITCH START 33;103;108;25;0;0;0; 34;101;127;9;1;2;0;*2p4;00002 35;127;517;2;0;2;0;gNOT A SWITCH 36;124;108;25;0;1;0;STORE PROG IDENT 37;106;0;39;0;0;0; 38;103;222;8;1;0;0; 39;127;477;0;0;0;0;*364 gREJECT;00008 40;124;516;8;1;0;0;gCOMMANDS SHEET;419 PROCR;517;GROUP2: FUNCTION 1 NOTES;RADIX;B;UNLOAD 0;106;222;8;1;0;0;STORE ID OF PROG TO BE UNLOADED 1;126;479;0;0;0;0;gS/R M* 2;124;477;0;1;0;0;*364 gREJECT;00008 3;106;0;4;0;0;0;;TEST MASTER ROUTINE 4;127;477;0;0;0;0;*364 YES REJECT;00008 5;124;0;4;0;1;0; 6;124;230;1;0;1;0;SET MR1 FOR PROG 7;126;0;36;1;1;0; 8;124;0;3;0;1;0;*60t 9;106;0;11;0;0;0; 10;124;233;43;0;1;0; 11;127;0;9;0;1;0;*60t gYES TO PTS 12;125;0;0;1;2;0;*601 13;124;295;15;1;0;0;gABANDON PROGRAM SHEET;420 PROCR;518;GROUP 2: FUNCTION 6 NOTES;RADIX;B;INTERCHANGE PRIORITIES 0;106;222;8;0;0;0;*0et*1.2 PROG IDENT NO 1;126;479;0;0;0;0;gS/R M* 2;124;477;0;1;0;0;*364 gREJECT;00008 3;106;0;4;0;0;0;;TEST IF COMMAND GIVE 4;103;0;5;0;0;0;;FOR TOP PROG. 5;101;0;4;1;2;0; 6;127;477;2;0;3;0;*364 gREJECT;00008 7;106;230;0;1;2;0; 8;102;221;0;1;0;0; 9;106;229;2;1;2;0;*3t4*3e+;0000200002 10;102;230;0;1;2;0; 11;106;221;0;1;0;0; 12;102;229;2;1;2;0;*3t4*3e+;0000200002 13;106;229;3;0;2;0;*3t4*3e+;0000300003 14;102;0;4;0;0;0; 15;101;220;3;1;3;0;;SET UP (MR'S 2&3) 16;102;0;6;0;0;0; 17;126;235;0;0;0;0;gS/R X SHEET;421 PROCR;519;INTERCHANGE PRIORITIES (2) NOTES;RADIX;B; 0;106;0;4;0;0;0;*0et*1.2 1;102;0;6;0;0;0; 2;124;0;5;0;1;0;;RESET MR'S 1&2 3;106;228;25;0;0;0;*3t4*3e+;0002500025 4;102;0;4;0;0;0; 5;126;235;0;0;0;0;gS/RX 6;106;0;4;0;0;0; 7;102;0;6;0;0;0; 8;124;0;5;0;1;0; 9;106;230;1;0;0;0;;RESET MR'S 2AND3 10;102;0;4;0;0;0; 11;126;235;0;0;0;0;gS/R X 12;106;0;4;0;0;0; 13;102;0;6;0;0;0; 14;101;220;3;1;3;0;;RESET (MR'S 2&3) 15;102;0;4;0;0;0; 16;126;235;0;0;0;0;gS/R X 17;124;495;0;0;2;0; 18;124;478;0;1;0;0; SHEET;422 PROCR;520;GROUP 2 FUNCTION 7 NOTES;RADIX;B;OPEN PROGRAMME 0;106;222;8;0;0;0;*0:t;PROG ID NO 1;126;479;0;0;0;0;gS/R M* 2;124;477;0;1;0;0;*364 gREJECT;00008 3;106;230;1;0;2;0;START OF SWITCH 4;102;0;4;1;0;0;;SET MR2= START OF SW 5;106;0;45;0;2;0;*462 ORIGINAL SW.SETTING 6;105;209;2;0;0;0;TEST 26/1/0 INSTRUCTION 7;127;477;2;0;0;0;*462*364 gYES REJECT;0000000008 NOT CLOSE 8;106;0;45;0;2;0;ORIGINAL SW. SETTING 9;127;477;2;0;2;0;*364 gREJ NOT CLOSED;00008 10;102;0;7;0;2;0;;RESET SWITCH 11;102;0;45;0;2;0;;CLEAR W/L 12;101;495;8;1;3;0;START OF EDIT TABLE 13;124;478;0;1;0;0;g SHEET;423 PROCR;521;GROUP 2: FUNCTION 8 NOTES;RADIX;B;AMEND RUN NUMBER 0;106;222;8;0;0;0;*0+t;PROG ID NO 1;126;479;0;0;0;0;gS/R M* 2;124;521;4;1;0;0;gPROG NOT IN PRIORITY LIST 3;124;477;2;1;0;0;*364 gREJ NOT ENDED;00008 4;126;479;0;0;0;0;gS/R M* 5;124;477;0;1;0;0;*364 gREJ NOT IN STO;00008 6;106;230;1;0;2;0;START OF SWITCH 7;102;0;6;0;0;0; 8;106;0;39;0;3;0;;TEST REQD PROG 9;105;222;8;0;0;0; 10;127;479;9;0;1;0;gNO 11;124;0;6;0;1;0;*60t;TEST PROG UNDER 12;124;0;37;0;1;0;;TRIAL 13;106;0;11;0;0;0; 14;127;521;43;0;1;0;*60t*363 15;106;222;8;0;0;0;REPLACE PROG IN PRIORITY LIST 16;102;230;0;0;2;0; 17;106;0;37;0;3;0;START OF LAST CHAP 18;102;0;4;0;0;0; 19;106;229;3;0;0;0;*3t4*3e+;0000300003 20;103;0;40;0;3;0;;STORE NEW RUN N 21;102;0;15;0;2;0; 22;106;226;9;0;0;0;;TEST (A), (B) 23;105;214;9;0;0;0;;SPECIFIED 24;127;521;29;0;0;0;gNO 25;106;226;10;1;0;0;STORE(A),(B) 26;102;0;30;1;3;0; 27;106;226;12;1;0;0; 28;124;521;30;1;0;0;g 29;102;0;30;1;3;0; 30;102;0;32;1;3;0; 31;106;210;1;0;0;0;SET (C) DECIMAL 32;102;0;34;0;3;0; 33;102;0;46;1;1;0;CLEAR TIME SPENT IN PROGRAMME 34;101;0;15;0;1;0; 35;106;0;10;0;2;0;TAG 36;118;0;4;0;0;0; 37;115;0;8;0;2;0;ENTRY PT 38;102;0;44;0;3;0; 39;106;0;35;0;3;0;SET SWITCH AT 4 40;102;0;7;0;3;0; 41;124;495;18;0;2;0;START OF EDIT TABLE 42;124;478;0;1;0;0; 43;124;0;83;0;2;0;*361 44;124;477;3;1;0;0;*364 g;00008 SHEET;424 PROCR;522;GROUP 2 FUNCTION 9 NOTES;RADIX;B;CLOSE PROGRAMME 0;106;222;8;0;0;0;*0:t 1;126;479;0;0;0;0;gS/R M* 2;124;477;0;1;0;0;*364 gREJECT;00008 3;106;230;1;0;2;0; 4;102;0;4;1;0;0; 5;106;0;7;0;2;0;;TEST IF SWITCH 6;105;0;9;0;2;0;;ALREADY CLOSED 7;127;477;2;0;0;0;*364 gYES REJECT;00008 8;106;0;7;0;2;0;STORE SWITCH SETTING IN ASS. TIME 9;102;0;45;0;2;0; 10;106;0;9;0;2;0;CLOSE SWITCH 11;102;0;7;0;2;0; 12;126;177;0;0;0;0;gREQUEST T/W 13;101;495;10;1;3;0;START OF EDIT TABLE 14;128;102;6;1;2;0; 15;106;215;0;1;0;0;FORM COMMENT 16;102;102;4;1;0;0; 17;101;0;768;0;1;0; 18;114;102;6;1;0;0; 19;124;478;4;1;0;0;gEDIT TIME SHEET;425 PROCR;523;GROUP 3 NOTES;RADIX;B;DETERMINE FUNCTION 0;101;0;1;0;1;0;*41t FILL QIB 1;101;0;2;1;3;0;LIMIT OF FN. NO. 2;126;500;0;0;0;0;gS/R R 3;124;463;0;1;0;0;gSTORE DUMP SHEET;426 PROCR;524;GROUP 4 NOTES;RADIX;B;DETERMINE FUNCTION 0;126;461;0;0;0;0; 1;101;0;10;1;3;0;*11+12+40+*11+40+;0000600008 2;126;500;0;0;0;0;gS/R R 3;103;524;7;0;0;0; 4;126;459;0;0;0;0;gS/R G 5;124;524;7;0;1;0; 6;126;524;7;0;1;0; 7;100;0;0;0;0;0;FUNCTION NUMBER 8;100;525;0;0;0;0;gSET RELEASED TAPES INDEX 9;100;487;6;0;0;0;gALLOC;WITHOUT 10;100;526;0;0;0;0;*4te SET REL TAPES INDEX 11;100;487;6;0;0;0; 12;100;477;6;0;0;0;gREJECT 13;100;527;0;0;0;0;*12e*11t12t40t;gAVAIL ROUTE 14;100;528;0;0;0;0;*12e gSET ROUTE NOT AVAILABLE 15;100;529;0;0;0;0;*11e gCHANGE ROUTE NO 16;100;487;1;0;0;0;*40e OVERWRITE ALLOC SHEET;427 PROCR;525;GROUP4: FUNCTION1 NOTES;RADIX;B;SET RELEASED TAPES INDEX 0;106;226;3;1;0;0;;TEST 2ND WORD ZERO 1;127;525;26;0;1;0;gNO 2;124;0;24;0;2;0;*4:4;00012 3;105;525;28;0;0;0; 4;102;525;28;0;0;0; 5;106;534;2;1;0;0;UNPACK INDEX 6;124;525;28;0;1;0; 7;128;196;0;1;0;0; 8;125;0;0;1;2;0;*6.t 9;124;525;28;0;1;0; 10;102;196;0;0;0;0;*6.t 11;106;534;4;1;0;0;*4:2*102 12;124;525;28;0;1;0; 13;128;196;12;1;0;0;*4:2*102 14;126;177;0;0;0;0;gREQUEST T/W 15;106;215;44;1;0;0;*4tt;'LONG' 16;102;102;8;1;0;0;*4tt 17;106;214;56;1;0;0;'R T I';SET UP COMMENT 18;102;102;4;1;0;0; 19;102;102;6;1;0;0;*6.t 20;106;226;4;1;0;0;SER NO 21;102;102;8;1;0;0;*6.t*4t4;000000014 22;106;214;78;1;0;0; 23;102;102;10;1;0;0;*6.+4t+*6.44t4;0000800016 24;102;102;10;1;0;0;*4t9*6.+;0000000008 25;124;478;4;1;0;0;gOUTPUT COMMENT 26;124;0;81;0;2;0;CODE LETTER A 27;124;498;3;1;0;0;g 28;100;0;0;0;0;0;IND (SET AT 0 OR 24) 29;127;477;2;0;1;0;*pp0*pp2*57e36e 30;127;477;6;0;1;0;*57e363 SHEET;428 PROCR;526;SET RELEASED TAPES INDEX (SHORT) NOTES;RADIX;; 0;106;226;3;1;0;0;*4tt 1;127;525;26;0;1;0;gNO CD A 2;101;0;12;1;3;0;SET UP MODIFIER 3;105;526;11;0;0;0; 4;102;526;11;0;0;0; 5;106;534;2;1;0;0;COPY TAPE NOS 6;124;526;11;0;1;0; 7;128;196;24;1;0;0; 8;126;177;0;0;0;0; 9;106;215;42;1;0;0;'SHORT' 10;124;525;16;1;0;0; 11;100;0;0;0;0;0;MODIFIER SHEET;429 PROCR;527;GROUP4:FUNCTION6 NOTES;RADIX;B;SET ROUTE AVAILABLE 0;126;502;0;0;0;0;*12t gS/R S 1;101;0;255;1;2;0;;TEST RTE UNAVAILABLE 2;127;527;10;0;1;0;*57e36e*57e363;CHECK LIST IF MULTI- 3;118;0;1;1;0;0; 4;102;0;64;0;2;0;SET ROUTE AVAILABLE 5;102;222;9;0;0;0; 6;124;215;6;0;2;0;*12t AMEND EDIT TABLE 7;102;495;30;0;0;0;*11t12t*111129 8;124;495;30;0;2;0;START OF EDIT TABLE 9;124;478;0;1;0;0; 10;106;0;4;0;0;0;*57t*12t CH CH RT IN MR 2 11;126;249;0;0;0;0;gSEARCH LIST 12;124;527;14;1;0;0;gFOUND 13;124;477;2;1;0;0;*364 gNO;00008 14;124;225;14;0;1;0;SET UP 64+R 15;106;224;1;0;0;0; 16;102;0;64;0;2;0; 17;106;258;15;0;0;0;SET UP TABLE ENTRY 18;101;0;22;1;2;0; 19;118;0;5;0;0;0; 20;124;225;14;0;1;0;CLEAR AREA 21;128;224;0;0;0;0; 22;124;527;5;1;0;0;gCOMMENT SHEET;430 PROCR;528;GROUP4:FUNCTION 7 NOTES;RADIX;B;SET ROUTE NOT AVAILABLE 0;126;502;0;0;0;0;*12t gS/R S 1;127;477;2;0;1;0;*364 gREJECT;00008 2;101;0;255;1;1;0;SET ROUTE UNAVAILABLE 3;118;0;1;1;0;0; 4;102;0;64;0;2;0; 5;102;222;9;0;0;0; 6;124;215;4;0;2;0;AMEND EDIT TABLE 7;124;527;7;1;0;0;*12t gCOMMENT 8;127;531;84;0;0;0;*pp0*pp2*873*88£;gYES REJECT 9;127;531;84;0;2;0;*87e;gYES REJECT 10;127;531;84;0;3;0;*87t87e;gNO REJECT 11;127;531;84;0;1;0;*87e87e;gNO REJECT 12;127;531;22;0;0;0;*853 gYES 13;127;531;65;0;0;0;*87987e;gYES SHEET;431 PROCR;529;GROUP 4 FUNCTION 8 NOTES;RADIX;B;CHANGE ROUTE NUMBER 0;126;502;0;0;0;0;*11t gS/R S 1;125;0;0;1;2;0;DRAIN 2;118;0;1;1;0;0; 3;103;531;88;0;0;0;*879889 4;103;533;4;0;3;0; 5;125;0;1;0;3;0;STEP MR3 6;124;502;4;1;0;0;gDECODE OLD ROUTE 7;106;0;64;0;2;0;PROG TAG IN Q5 IF OLD ROUTE IN USE 8;118;0;4124;0;0;0; 9;127;531;84;0;0;0;gNO REJECT 10;103;533;5;0;0;0;STORE TAG 11;101;0;13;1;2;0;;TEST IF M/R ROUTE 12;127;531;84;0;2;0;*873;gYES REJECT 13;106;533;4;0;0;0;;NEW ROUTE TYPE 14;101;0;5;1;2;0;;TEST P/T I/P 15;127;529;27;0;0;0;*88e;gYES SET INDZERO 16;106;533;1;0;0;0;OLD CHANNEL;TEST IF M/T ROUTE 17;101;0;16;1;2;0;*3:t;TEST M/T ROUTE 18;127;529;56;0;3;0;*3:t*87e;gNO 19;101;0;1;1;2;0;*234*244;0000200003 20;127;529;56;0;2;0;*87t87e;gNO 21;106;533;0;0;0;0;*87t88t*87t;NEW CHANNEL 22;101;0;16;1;2;0;*3:t;TEST M/T 23;127;531;84;0;3;0;*3:t;gNO REJECT 24;101;0;1;1;2;0;*234*244;0000200003 25;127;531;84;0;2;0;*87t;gNO REJECT 26;101;0;15;1;3;0;*889*871 27;102;531;88;0;0;0;SET IND NEG FOR MT ZERO FOR PT 28;126;212;6;1;3;0;;MR3 SPANS SWITCHES 29;106;112;0;0;3;0;;TEST OLD ROUTE 30;105;533;7;0;0;0;;IN SI+30 31;127;529;35;0;0;0;;gYES 32;125;0;48;0;3;0; 33;124;529;29;1;0;0;;gNEXT PROG 34;124;531;84;1;0;0;;gNO REJECT 35;124;0;6;0;1;0; 36;126;112;6;1;1;0; 37;106;0;31;0;1;0;;TEST OPENING FILE 38;101;0;15;1;2;0;*88+;00017 39;127;529;42;0;3;0;*87987e;gNO 40;101;0;4;1;2;0;*87t*88+;0000000002 41;127;529;65;0;3;0;*87t;gYES 42;106;0;31;0;1;0; 43;101;267;0;1;1;0; 44;101;305;23;1;2;0;*87t;TEST REOPEN 45;127;529;65;0;0;0;gYES;M/T O/P REEL 46;101;305;23;1;1;0; 47;101;421;59;1;2;0;;TEST REOPEN 48;127;529;65;0;0;0;gYES;M/T I/P REEL 49;101;421;59;1;1;0; 50;101;291;4;1;2;0;*5+t;TEST IN 51;127;529;65;0;0;0;gYES;OPT 13 52;101;291;4;1;1;0;*87t*5+t*889 53;101;365;33;1;2;0;*88t;TEST REOPEN 54;127;529;65;0;0;0;*88t gYES;P/T I/P REEL 55;124;531;84;1;0;0;*87t88t;gNO REJECT 56;126;212;6;1;3;0; 57;106;533;5;0;0;0;TAG 58;101;0;1;1;2;0; 59;127;529;63;0;0;0;g 60;125;0;48;0;3;0; 61;124;529;58;1;0;0;gTRY AGAIN 62;124;531;84;1;0;0;gREJECT 63;124;0;6;0;1;0; 64;126;112;6;1;1;0; 65;106;533;7;0;0;0;OLD ROUTE 66;102;188;0;0;0;0; 67;126;353;0;0;0;0;SELECT RTE NO FROM LAST CHAP 68;127;529;72;0;0;0;g 69;125;0;2;0;3;0;STEP TO TEST NEXT ROUTE 70;124;353;2;1;0;0;gNO 71;124;531;84;1;0;0;gREJECT 72;101;0;16;0;1;0;COLLATE OLD ROUTE TYPE 73;115;0;34;0;3;0;AND TEST SAME AS NEW ROUTE TYPE 74;118;0;4124;0;0;0; 75;103;533;5;0;0;0;*879 COPY OLD ROUTE TYPE 76;105;533;4;0;0;0; 77;127;529;80;0;0;0;*87e87e gYES 78;106;531;88;0;0;0;*87t NO MUST BE MT 79;127;531;84;0;2;0;*87t gNOT REJECT 80;124;533;6;0;1;0;TEST NEW ROUTE 81;106;0;64;0;0;0;AVAILABLE 82;118;0;4127;0;0;0; 83;127;531;84;0;1;0;gNO REJECT 84;106;0;64;0;2;0;INTERCHANGE ASL'S 85;124;533;6;0;0;0; 86;102;0;64;0;0;0; 87;106;533;5;0;0;0;*87+;00006 88;101;0;4080;1;1;0;ADD pp0 TO MAKE UNAVAILABLE 89;103;0;64;0;2;0; SHEET;432 PROCR;530;CHANGE ROUTE(2) 0;0;0;4086;1;2;0;*11t*04t*89t TEST RT TYPE 6 1;127;530;27;0;1;0;*853 gNO 2;101;0;7;1;2;0;REPLACE 3;127;530;27;0;1;0;UPTIME ROUTE 4;106;533;7;0;0;0; 5;105;221;37;0;0;0; 6;127;530;10;0;1;0; 7;106;533;6;0;0;0; 8;102;221;37;0;0;0; 9;124;530;12;1;0;0; 10;106;533;6;0;0;0; 11;102;221;39;0;0;0; 12;106;533;7;0;0;0;TEST W/E IND SET 13;105;381;22;0;0;0; 14;127;530;17;0;1;0;gNO 15;106;533;6;0;0;0;REPLACE 16;102;381;22;0;0;0; 17;106;533;7;0;0;0; 18;105;381;21;0;0;0; 19;127;530;22;0;1;0;gNO 20;106;533;6;0;0;0;REPLACE 21;102;381;21;0;0;0;*85t 22;106;0;65;0;2;0;INTERCHANGE OTHER 23;124;533;6;0;1;0;HALF OF ASL 24;102;0;65;0;0;0; 25;101;0;1;1;3;0;SET CARD IND=1 26;124;530;28;1;0;0; 27;125;0;0;1;2;0;SET CARD IND=0 28;102;531;89;0;0;0;*04t*89t 29;106;533;6;0;0;0;COLLATE NEW ROUTE 30;118;0;3;0;0;0;*87+;00007 31;104;533;4;0;0;0;*87t 32;118;0;4;0;0;0;*87t AND ROUTE TYPE 33;104;533;6;0;0;0;INTO SP CH DETAILS 34;101;0;403;0;1;0;*87+;00387 35;114;0;34;1;3;0; 36;106;533;6;0;0;0;NEW ROUTE 37;126;328;0;0;0;0;ALTER ROUTE NO IN PARAMETER LISTS 38;127;531;8;0;0;0;*pp0*pp2*043893 39;127;531;18;0;0;0;*042893;gYES 40;127;531;38;0;1;0;*87e88e*87e;gNO 41;124;527;8;1;0;0;*12e;gCOMMENT 42;126;351;0;0;0;0;*09e06e;TEST RTE NOTING D/B 43;124;477;6;1;0;0;*363 gC REJ SHEET;433 PROCR;531;CHANGE ROUTE(3) 0;125;0;0;1;2;0;*11t 1;101;0;3;0;1;0; 2;115;0;7;0;1;0;;TEST OLD RTE SET UP 3;105;531;7;0;0;0;;IN SI+7 4;127;531;12;0;1;0;*043893;gNO 5;105;531;89;0;0;0;*04t*89t;TEST OLD RTE+1 SET U 6;127;531;12;0;1;0;gNO;IN SI IF CARDS 7;101;0;1;1;1;0;*04t*89t 8;104;533;6;0;0;0;NEW ROUTE NO 9;114;0;7;0;1;0; 10;125;0;0;1;2;0; 11;102;0;45;0;1;0;CLEAR ASSOCIATED TIME 12;106;0;30;0;1;0;TEST OLD ROUTE IN SI+30 13;105;533;7;0;0;0; 14;127;531;20;0;1;0;*042893*87e88e;gNO 15;105;531;89;0;0;0;*04t*89t OLD RTE+1 IN SI+30 16;127;531;20;0;1;0;*87e88e;gNO 17;104;531;89;0;0;0;*04t*89t YES 18;104;533;6;0;0;0;SET UP NEW ROUTE 19;102;0;30;0;1;0;IN SI+30 20;106;531;88;0;0;0;*87t88t 21;127;531;31;0;0;0;*889*87e;gPT 22;127;531;38;0;2;0;*87t 23;126;108;16;1;3;0;COPY MT FILE 24;124;533;7;0;1;0;DETAILS 25;106;190;0;0;3;0; 26;124;533;6;0;1;0; 27;102;190;0;0;3;0; 28;125;0;24;0;3;0;*234*224;0001600008 29;124;531;24;1;0;0; 30;124;531;72;1;2;0;*87t gCOMMENT 31;124;531;72;0;2;0;*88t 32;102;325;0;0;0;0;COPY PAPER TAPE 33;106;533;7;0;0;0;FILE DETAILS FOR 34;102;221;1;0;0;0;SUBSEQUENT REELS 35;106;533;6;0;0;0;NEW ROUTE 36;102;188;0;0;0;0; 37;124;325;4;1;0;0;*88t*87t88t 38;106;533;1;0;0;0;SET MR3 39;118;0;3;0;3;0;AT 8*OLD CHANNEL 40;102;0;6;0;0;0; 41;106;252;0;0;3;0;TEST OLD ROUTE LAST 42;105;533;7;0;0;0;TO USE ITS CHANNEL 43;127;531;58;0;1;0;gNO 44;106;252;1;0;3;0;STORE ROUTE TYPE 45;103;533;5;0;0;0;FOR FUTURE USE 46;105;211;0;0;0;0;TEST ASSEMBLER TABLE CLEARED 47;127;531;58;0;0;0;YESg 48;126;107;6;1;1;0;(MR1)FOR MR SWITCH 49;106;533;7;0;0;0;OLD ROUTE 50;102;0;30;0;1;0;IN SI+30 51;126;352;0;0;0;0;*09e06e;TEST RTE NOTING D/B 52;124;533;7;0;1;0;SET ROUTE 53;119;0;0;1;2;0;TO MANUAL 54;124;0;3;0;1;0; 55;106;0;160;0;0;0;TEST D/B OCCURRED 56;127;531;72;0;0;0;gNO 57;124;531;69;1;0;0;gYES 58;106;533;1;0;0;0;TEST D/B IND SET 59;118;0;3;0;3;0;FOR OLD CHANNEL 60;102;0;6;0;0;0;8*OLD CHANNEL 61;101;0;1;0;1;0; 62;124;533;3;0;1;0;OLD ROUTE 63;118;0;0;1;0;0; 64;115;252;2;1;3;0;COLLATE OUT D/B IND 65;125;531;72;0;0;0;gNO 66;118;533;5;1;2;0;ALIGN TO 67;118;0;4120;0;0;0;Q1 OF A 68;102;533;5;0;0;0; 69;106;103;13;0;0;0;SET SWITCH SAS 70;102;265;2;0;0;0;=2 71;124;531;73;1;0;0;g 72;102;533;5;0;0;0;STORE D/B IND 73;106;533;0;0;0;0;NEW CH 74;118;0;3;0;3;0; 75;102;0;6;0;0;0;8*NEW CH 76;101;0;1;0;1;0; 77;106;533;5;0;0;0; 78;124;533;2;0;1;0; 79;118;0;0;1;0;0;COLLATE IN D/B IND 80;114;252;2;0;3;0;FOR NEW ROUTE 81;126;107;6;1;1;0;(MR1)FOR M/R 82;124;215;12;0;2;0;*129 83;124;527;7;1;0;0;*12e;gCOMMENT 84;126;107;6;1;1;0;(MR1)FOR M/R 85;106;221;9;0;0;0;*363 86;102;221;8;0;0;0;*362 87;124;477;0;1;0;0;*362 C REJ A 88;100;0;0;0;0;0;*879889;MT/PT INDICATOR 89;100;0;0;0;0;0;*11t*049*899 90;127;477;6;0;2;0;*pp0*pp2*3:e363;gC REJ 91;127;477;0;0;2;0;*3:e36e;gC REJ A SHEET;434 PROCR;532;GP6 AND GP7 SET ROUTE AVAILABLE AND WITHDRAW ROUTE 0;101;0;3;0;1;0;*5pt*12t COLLATE CHANNEL/ROUTE 1;115;0;185;0;0;0; 2;101;0;128;1;2;0;CONVERT RTE 3;127;532;5;0;3;0;*3:e363*3:e36e 4;101;0;224;1;1;0;*3:9 5;101;0;128;1;1;0; 6;102;222;8;0;0;0;STORE FOR ENTRY TO COMMANDS 7;124;199;76;0;1;0; 8;126;524;7;0;1;0; SHEET;435 CONST;533;1;W/L'S FOR OP INT 0;(D)0;OLD CHANNEL/NEW CHANNEL 2;0;OLD ROUTE/NEW ROUTE 4;0;WL/Q1 OF NEW ROUTE 6;0;OLD RTE/NEW RTE IN BINARY SHEET;436 TABLE;534;1;BULK COPY TABLES TO UNPACK RT1 NOTES;;;ALSO TO ENSURE ISUER STARTS IN EVEN LOCATION 0;226;5;0;0;0;0;8;0;1;0;0;0;0;*pp0*pp1*1034:3*4:3 2;226;5;0;0;0;0;0;0;3;0;0;0;0;*1034:3*4:3 4;227;5;0;0;0;0;8;0;1;0;0;0;0;*4:1 SHEET;437 PROCR;535;INITIAL SET UP END ROUTINE NOTES;RADIX;B; 0;124;535;2;0;3;0; 1;124;181;0;1;0;0; 2;100;0;0;0;0;0; SHEET;438 PROCR;536;FORM UP DIVISION 0 AND 1 DETAILS 0;102;103;1;0;1;0;TEST STORE PRINT 1;101;0;60;1;3;0;REQUIRED 2;101;0;60;1;2;0;*844;00030 3;127;536;6;0;0;0;gNO 4;101;0;1;1;3;0;SET IND 5;102;558;12;0;0;0; 6;101;535;0;1;3;0; 7;102;231;0;0;1;0; 8;124;551;0;1;0;0; SHEET;439 PROCR;537;STORE PRINT SET UP 0;125;0;4096;1;1;0;SET NON-INT 1;124;547;11;1;3;0;STORE INDICATORS 2;106;542;29;0;0;0; 3;124;0;0;0;3;0; 4;102;0;25;0;0;0; 5;125;0;8191;1;1;0;CLEAR INDICATORS 6;106;547;24;1;0;0;*3et;SET UP 7;102;547;2;1;0;0;*3et;STORE COUNTER 8;102;547;2;0;0;0;*3e1;CLEAR STORE COUNTER 9;124;550;0;0;2;0;EDIT HEADING 10;126;545;0;0;0;0;EDIT AND O/P S/R SHEET;440 PROCR;538;TEST FOR TAG CHANGES 0;125;0;1792;1;2;0; 1;127;538;3;0;0;0;;STORE I9-11 2;118;0;4126;0;1;0; 3;102;547;28;0;0;0;STORE TAG 4;125;0;1792;1;1;0;CLEAR I9-11 5;106;547;16;1;0;0;COPY 4 SHORT WORDS 6;104;547;2;0;0;0;NUMERICgALPHA 7;128;548;1;0;1;0; 8;124;547;2;0;3;0;STORE IST TAG;TEST TAG CHANGE 9;123;0;0;0;3;0; 10;103;547;4;0;0;0; 11;105;547;5;0;0;0;SECOND TAG 12;127;538;14;0;0;0;gNO 13;102;547;1;0;0;0;SET TAG CHANGE IND 14;124;547;2;0;3;0;STORE 2ND TAG;TEST TAG CHANGE 15;123;0;2;0;3;0; 16;103;547;5;0;0;0; 17;105;547;4;0;0;0; 18;127;539;0;0;0;0;gNO 19;102;547;1;0;0;0;SET TAG CHANGE IND SHEET;441 PROCR;539;SET UP EDIT TABLES 0;124;547;6;0;1;0; 1;106;548;0;1;0;0;NEXT SHORT WORD;TEST ZERO 2;127;539;6;0;0;0;gYES 3;126;543;0;0;0;0;gSET UP SHORT WORD S/R 4;124;547;6;0;1;0; 5;102;548;0;1;0;0; 6;123;0;2;0;0;0;STEP ON SH.WORD CTR 7;100;547;6;0;0;0;;TEST 4 SHORT WORDS D 8;124;539;0;1;0;0;gNO 9;102;547;6;0;0;0;RESET COUNTER 10;106;547;1;0;0;0;;TEST FOUR ZERO WORDS 11;127;539;45;0;1;0;gNO;OR NO TAG CHANGE 12;125;0;2;1;2;0;;TEST 12 SET 13;127;542;0;0;1;0;gYES 14;106;547;2;0;0;0; 15;124;999;0;0;3;0;TEST PRINTED TO END OF PROGRAM SWITCHES 16;101;130;0;1;2;0; 17;127;539;35;0;3;0;gNO 18;125;0;32;1;2;0;;TEST 16 SET 19;127;539;35;0;0;0;gNO 20;106;547;2;0;0;0; 21;101;0;8191;1;2;0; 22;127;539;29;0;2;0;gNOT IN DIV 0 23;101;0;8191;1;1;0; 24;101;535;2;1;2;0; 25;127;539;35;0;2;0;gNOT IN MASTER 26;101;535;2;1;3;0; 27;102;547;2;0;0;0;SKIP REST OF MASTER IN DIV 0 28;124;539;35;1;0;0; 29;124;550;0;0;2;0;ARRANGE TO SKIP REST OF MASTER 30;102;547;2;0;0;0; 31;100;547;29;0;2;0; 32;118;0;4124;1;0;0; 33;114;547;2;0;0;0; 34;125;0;32;1;1;0;CLEAR 16 35;123;0;4;0;0;0;;TEST END OF STORE 36;100;547;2;0;0;0; 37;124;538;0;1;0;0;gNO 38;124;542;0;1;0;0;*3e1 gEND ROUTINE 39;106;547;3;0;0;0;*3et TEST SECOND STORE 40;105;547;27;0;0;0;DEALT WITH 41;127;542;0;0;0;0;gYES 42;106;547;26;1;0;0;SET UP STORE COUNTER 43;102;547;2;1;0;0;FOR SECOND STORE 44;124;538;0;1;0;0;*3et gDEAL WITH SECOND STORE 45;106;547;28;0;0;0;TEST IF SELECTED TAG SET 46;127;540;0;0;0;0;gNO 47;105;547;4;0;0;0;TEST TAG1=SEL.TAG 48;127;540;0;0;0;0;gYES 49;106;547;4;0;0;0; 50;101;0;13;1;2;0;TEST TAG1=13g15 51;127;540;0;0;2;0;gYES 52;106;547;28;0;0;0; 53;105;547;5;0;0;0;TEST TAG2=SEL.TAG 54;127;540;0;0;0;0;gYES 55;106;547;5;0;0;0; 56;101;0;13;1;2;0;TEST TAG2=13g15 57;127;538;0;0;3;0;gNO SHEET;442 PROCR;540;DELETE L/E OR B/E 0;100;547;30;1;2;0;15'S INTO B 1;125;0;0;1;2;0; 2;124;547;2;0;3;0; 3;115;0;0;1;0;0;COLLATE OUT WORD N' 4;126;544;0;0;0;0;gL/E B/E S/R 5;106;547;14;1;0;0; 6;102;548;8;1;0;0; 7;100;547;30;1;2;0; 8;124;547;2;0;3;0; 9;115;0;2;1;0;0;COLLATE OUT WORD N+2' 10;126;544;0;0;0;0;gL/E B/E S/R 11;106;547;14;1;0;0; 12;102;548;10;1;0;0; 13;124;0;0;0;3;0; 14;100;210;1;0;3;0;DECIMAL 15;124;547;2;0;1;0;ADDRESS WITHIN 16;101;0;0;1;3;0;DIVISION 17;102;547;10;0;0;0; 18;124;0;0;0;3;0; 19;124;213;0;0;2;0; 20;112;547;10;0;0;0; 21;102;547;10;0;0;0; 22;124;0;0;0;3;0; 23;100;212;0;0;3;0;BINARY 24;124;547;2;0;3;0;DIV NO 25;124;0;0;0;2;0; 26;124;547;2;0;1;0; 27;101;0;0;1;2;0; 28;118;0;3;0;3;0;ALIGN IN Q5 29;107;547;10;0;0;0; SHEET;443 PROCR;541;OUTPUT 0;106;547;2;0;0;0; 1;103;549;38;0;0;0;SELECT PRINT LOCATIONS 2;101;0;1;1;1;0;SET UP QUARTET VALUES IN EDIT TABLE 3;103;549;40;0;0;0;FOR 4 SHORT WORDS 4;101;0;1;1;1;0; 5;103;549;42;0;0;0; 6;101;0;1;1;1;0; 7;102;549;44;0;0;0; 8;124;549;0;0;2;0; 9;126;545;0;0;0;0;gEDIT AND O/P S/R 10;102;548;14;0;0;0;CLEAR BE INDICATOR 11;102;547;1;0;0;0;CLEAR PRINT LINE IND 12;124;539;12;1;0;0;gTEST INDICATORS SHEET;444 PROCR;542;END ROUTINE 0;124;0;0;0;3;0; 1;106;0;140;0;0;0; 2;127;542;16;0;0;0;gNO 3;125;0;0;1;2;0; 4;102;547;2;0;0;0;CLEAR STORE CTR 5;124;547;2;0;1;0; 6;124;0;0;0;1;0; 7;101;0;0;1;3;0; 8;124;0;0;0;3;0; 9;105;0;140;0;0;0; 10;127;542;13;0;1;0; 11;124;549;58;0;2;0; 12;126;545;0;0;0;0; 13;123;0;1;0;0;0; 14;100;547;2;0;0;0; 15;124;542;5;1;0;0; 16;125;0;8191;1;1;0; 17;124;0;0;0;1;0; 18;125;0;0;1;0;0; 19;124;0;0;0;3;0; 20;106;209;5;0;0;0; 21;124;0;0;0;3;0; 22;102;0;25;0;0;0;RESET O'FLOW LINK 23;102;547;28;0;0;0; 24;123;542;25;0;2;0;RESET TAG 14 25;100;0;0;0;0;0; 26;124;0;0;0;3;0; 27;124;103;5;1;0;0;gPRIORITY QUEUE 28;124;0;0;0;3;0; 29;126;0;24;0;3;0; SHEET;445 PROCR;543;SET UP SHORT WORD S/R 0;100;0;0;0;0;0; 1;102;547;8;1;0;0;STORE SHORT WORD 2;100;547;12;0;2;0; 3;115;547;9;0;0;0;COLLATE OUT ACTION;SIGN BIT SET 4;118;0;4125;0;0;0;;IN BIT 37 5;102;548;12;0;0;0; 6;124;0;0;0;3;0; 7;100;210;1;0;3;0;SET DECIMAL 8;124;0;0;0;3;0; 9;124;213;0;0;2;0; 10;103;547;1;0;0;0; 11;112;548;12;0;0;0;CONVERT TO DECIMAL 12;102;548;12;0;0;0; 13;100;547;9;1;2;0;SH.WORD INTO B ALPHAgNUMERIC 14;118;0;6;1;0;0; 15;106;548;12;0;0;0; 16;118;0;3;0;3;0;SEPARATE ACTION DISCMOD 17;118;0;1;1;3;0; 18;118;0;2;0;3;0; 19;118;0;2;1;3;0; 20;102;548;13;0;0;0;STORE A,D,M 21;118;0;1;1;3;0; 22;118;0;3;1;0;0; 23;102;548;12;0;0;0;ADDRESS 24;124;0;0;0;3;0; 25;124;213;0;0;2;0; 26;112;548;12;0;0;0;CONVERT TO DECIMAL 27;124;0;0;0;3;0; 28;100;212;0;0;3;0;SET BINARY 29;102;548;12;0;0;0;STORE ADDRESS 30;106;548;12;1;0;0; 31;126;543;0;0;1;0; SHEET;446 PROCR;544;L/E B/E S/R 0;100;0;0;0;0;0; 1;102;547;14;1;0;0;W/L 2;100;547;22;1;2;0;-3/15 3;115;547;14;1;0;0;;TEST FOR L/E 4;115;547;18;1;0;0; 5;127;544;12;0;0;0;gYES 6;115;547;20;1;0;0;;TEST FOR B/E 7;127;544;12;0;0;0;gYES 8;118;0;2;1;0;0;;TEST ALL CHARACTERS 9;101;0;0;1;3;0; 10;127;544;3;1;1;0;gNO 11;126;544;0;0;1;0;gLEAVE S/R 12;114;547;14;1;0;0;CLEAR CHARACTER 13;101;0;91;1;3;0;SET INDICATOR 14;102;548;14;0;0;0; 15;124;544;8;1;0;0;g SHEET;447 PROCR;545;EDIT AND O/P S/R 0;100;0;0;0;0;0; 1;124;547;0;0;1;0; 2;126;0;0;1;0;0;TEST PRINTER ROUTE 3;124;545;8;1;0;0;gCLOSED;HALT 15/0/1 4;124;545;1;1;0;0;gENGAGED 5;124;545;10;1;0;0;D/B;HALT 15/0/3 6;100;0;3845;0;0;0;W/E;HALT 15/./5 7;124;545;11;1;0;0; 8;100;0;3841;0;0;0; 9;124;545;1;1;0;0; 10;100;0;3843;0;0;0; 11;128;551;2;1;2;0;*3t4 EDIT TO ANNEX;00007 12;124;0;0;0;3;0; 13;106;258;18;1;0;0;FUNCTION WORD 14;102;551;0;1;0;0;INSERT 15;124;547;0;0;3;0; 16;106;0;64;0;0;0;STORE PRESENT ASL 17;102;548;15;0;0;0; 18;125;0;0;1;0;0;*869;OR 24/1/0gSP PRINTER 19;106;545;35;0;0;0;*2.286t 20;124;547;0;0;3;0;STORE A SL IN 64+R 21;102;0;64;0;0;0; 22;106;545;36;0;0;0;START OF EDIT TABLE 23;124;545;35;0;3;0; 24;129;0;0;0;1;0;EDIT 25;124;545;29;1;0;0;*2.286t*2.t86t 26;106;545;36;0;0;0; 27;124;547;0;0;3;0; 28;102;0;64;0;0;0;*2.t86t 29;124;547;0;0;1;0; 30;119;0;0;0;0;0;OUTPUT 31;106;548;15;0;0;0; 32;124;547;0;0;3;0; 33;102;0;64;0;0;0;RESTORE ASL 34;126;545;0;0;1;0; 35;114;551;0;0;1;0;*2.1869 GP ANNEX START 36;114;551;0;0;1;0;SPECIAL ANNEX START SHEET;448 CONST;546;1;ALPHA CONSTANTS 0;(A)STORE; 2;PRINT; 4;OF ; 6;TAKEN; 8;ON AT; SHEET;449 CONST;547;1;W/L'S COUNTERS AND CONSTANTS 0;(D)0;TAG CHANGE/PRINTER ROUTE 2;0000000000;SIZE OF STORE COUNTER 4;;TAG 2/TAG 1 6;800000;SHORT WORD COUNTER 8;;W/L L/E B/E S/R 10;;(1)/ADDRESS IN DIV 12;1p000;W/L L/E B/E /b13-17 14;;W/L L/E B/E S/R 16;400000;BULK COPY 18;1.1.1.1.1.-;CONST FOR L/E B/E S/R 20;2020202020-;DITTO 22;3p-;DITTO 24;0000000000;*3et FIRST STORE SIZE 26;0800008000;*3et SECOND STORE SIZE 28;3p00000000;COLLATION CONST/SELECTED TAG 30;(D)pppppppppp; 32;7.0000007.; SHEET;450 CONST;548;1;W/L'S FOR WORDS 0;(D); 2;; 4;; 6;; 8;; 10;; 12;; 14;; SHEET;451 TABLE;549;1;MAIN EDIT TABLE 0;547;10;0;0;0;0;1;0;1;0;0;0;0; 2;547;10;0;0;0;0;4;1;1;3;0;0;0; 4;547;2;0;0;0;0;4;1;1;0;0;0;0; 6;548;1;0;0;0;0;2;1;3;1;0;0;0; 8;548;1;0;0;0;0;1;3;1;0;0;0;0; 10;548;1;0;0;0;0;1;4;1;0;0;0;0; 12;548;0;0;0;0;0;4;1;1;3;0;0;0; 14;548;3;0;0;0;0;2;1;3;1;0;0;0; 16;548;3;0;0;0;0;1;3;1;0;0;0;0; 18;548;3;0;0;0;0;1;4;1;0;0;0;0; 20;548;2;0;0;0;0;4;1;1;3;0;0;0; 22;548;5;0;0;0;0;2;1;3;1;0;0;0; 24;548;5;0;0;0;0;1;3;1;0;0;0;0; 26;548;5;0;0;0;0;1;4;1;0;0;0;0; 28;548;4;0;0;0;0;4;1;1;3;0;0;0; 30;548;7;0;0;0;0;2;1;3;1;0;0;0; 32;548;7;0;0;0;0;1;3;1;0;0;0;0; 34;548;7;0;0;0;0;1;4;1;0;0;0;0; 36;548;6;0;0;0;0;4;1;1;3;0;0;0; 38;0;0;0;0;0;0;5;0;3;4;2;0;0; 40;0;0;0;0;0;0;5;0;1;4;2;0;0; 42;0;0;0;0;0;0;5;0;1;4;2;0;0; 44;0;0;0;0;0;0;5;0;1;4;2;0;0; 46;548;8;0;0;2;0;5;0;2;0;0;0;0; 48;548;10;0;0;2;0;5;0;2;0;0;0;0; 50;547;4;0;0;0;0;1;4;2;0;0;0;0; 52;547;5;0;0;0;0;1;4;1;0;0;0;0; 54;548;14;0;0;2;0;1;4;1;0;0;0;0; 56;547;32;0;0;2;0;1;0;0;0;0;0;1; 58;547;2;0;0;0;0;4;1;8;0;0;0;0; 60;547;32;0;0;2;0;1;0;2;0;0;0;1; SHEET;452 TABLE;550;1;HEADING 0;546;0;0;0;2;0;5;0;14;0;0;0;0; 2;546;2;0;0;2;0;5;0;1;0;0;0;0; 4;546;4;0;0;2;0;2;0;1;0;0;0;0; 6;0;181;0;0;0;0;5;0;1;0;0;0;0;///// 8;0;182;0;0;0;0;2;3;3;1;0;0;0;///// 10;546;6;0;0;2;0;5;0;2;0;0;0;0; 12;546;8;0;0;2;0;2;0;1;0;0;0;0; 14;0;138;0;0;1;0;2;4;2;1;0;0;0;///// 16;0;138;0;0;1;0;2;6;1;1;0;0;0;///// 18;0;138;0;0;1;0;2;8;1;1;0;0;0;///// 20;546;8;0;0;2;0;3;2;0;0;0;0;0; 22;0;156;0;0;0;0;2;0;2;0;0;0;0;///// 24;0;156;0;0;0;0;2;2;1;0;0;0;0;///// 26;547;32;0;0;2;0;1;0;0;0;0;0;1; 28;0;0;0;0;1;0;0;1;8;0;0;0;0;///// BULK CLEAR MATRIX SHEET;453 PROCR;551;INITIAL SET UP ROUTINE(1) 0;106;558;4;0;0;0; 1;102;0;17;0;1;0;SET UP (17) 2;106;557;0;1;0;0;*3t2 3;102;0;134;1;1;0;*3t2 4;106;558;7;0;0;0;*3t1 5;102;0;1;0;1;0;SET UP OR CLEAR (1) 6;101;0;64;1;2;0;*3:t4pt SET UP FCC 7;102;233;32;0;1;0;*3:t4pt PARAMETERS 8;106;209;5;0;1;0; 9;124;551;11;1;0;0;*pp0*pp2 10;127;552;8;0;2;0;*pp2*57e 11;102;0;25;0;1;0;SET UP (25) 12;101;130;22;1;3;0; 13;101;0;128;1;2;0;FORM M/R SP CH START 14;102;107;7;0;1;0; 15;106;558;5;0;0;0; 16;105;231;0;0;1;0; 17;102;231;1;0;1;0; 18;101;535;0;1;3;0;TEST MASTER IN DIV 1 19;101;536;0;1;2;0; 20;127;552;0;0;2;0;*57e 21;106;558;5;0;0;0; 22;107;231;0;0;0;0; 23;106;558;0;1;0;0;SHIFT UP STORE TABLE 24;124;999;0;0;3;0; 25;128;231;2;0;0;0; 26;106;555;6;0;0;0; 27;102;555;5;0;0;0; SHEET;454 PROCR;552;INITIAL SET8UP(2) 0;106;233;24;0;1;0;*57t 1;124;999;0;0;3;0; 2;103;225;0;0;0;0; 3;124;999;0;0;3;0; 4;102;224;0;0;0;0; 5;101;0;7;1;3;0; 6;124;999;0;0;3;0; 7;102;224;1;0;0;0;*57t 8;106;209;8;0;1;0; 9;124;999;0;0;3;0; 10;124;233;24;0;3;0; 11;102;0;64;0;0;0; 12;106;557;2;0;0;0;*45t57t;SET UP 71 13;124;999;0;0;3;0;AS POTENTIALLY 14;124;233;24;0;3;0;AVAILABLE 15;102;0;71;0;0;0;*45t57t 16;106;209;9;0;1;0; 17;102;0;124;0;1;0; 18;101;228;0;1;3;0;STACK TAG 13 IN M/R ANNEXES 19;118;0;5;0;0;0; 20;101;226;0;1;1;0; 21;102;0;4;1;1;0; 22;101;0;13;1;3;0; 23;126;556;0;0;0;0; 24;101;0;15;1;3;0;STACK TAG 15 IN A.L.W.'S 25;123;102;82;1;1;0; 26;123;226;54;1;1;0; 27;123;227;54;1;1;0;*101 28;106;102;17;1;1;0;STORE M/R 29;118;0;4123;1;0;0;SERIAL NO 30;101;0;7;1;1;0;IN 181 31;118;0;4;1;0;0; 32;102;0;181;0;1;0; 33;106;102;19;1;1;0;MOD NO 34;118;0;4125;1;0;0;IN 182 35;102;0;182;0;1;0; SHEET;455 PROCR;553;INITIAL SET UP ROUTINE(3) 0;101;260;0;1;3;0;*25t*05t 1;118;0;5;0;0;0;STACK TAG 13 IN LIB CARD ANNEXE 2;101;259;0;1;1;0; 3;102;0;4;1;1;0; 4;101;0;13;1;3;0; 5;126;556;0;0;0;0; 6;106;558;6;0;0;0;SET UP LIB CARD ASL 7;102;0;119;0;1;0;*25t*05t 8;106;0;143;0;1;0;*412;SET UP CONSTANTS 9;102;483;2;0;1;0;;FOR MINI STORE PRINT 10;106;0;144;0;1;0; 11;102;483;4;0;1;0; 12;106;0;145;0;1;0; 13;102;483;5;0;1;0; 14;106;558;8;0;0;0; 15;102;0;140;0;1;0; SHEET;456 PROCR;554;ON LINE STORE DUMP SET UP 0;106;558;12;0;0;0;TEST STORE PRINT REQUIRED 1;127;555;0;0;0;0;gNO 2;106;209;3;0;1;0;SET TAG 15 3;102;0;9;0;1;0; 4;126;554;5;0;3;0; 5;115;554;6;0;1;0; 6;125;0;4096;1;1;0; 7;106;209;4;0;1;0; 8;102;0;9;0;1;0; 9;106;0;153;0;1;0;STORE DETAILS FOR PRINT 10;123;554;11;0;2;0;RESET TAG 14 11;100;0;0;0;0;0; 12;118;0;4124;1;0;0; 13;101;0;9;1;2;0;*86t 14;127;554;19;0;1;0;gGP PRINTER 15;106;545;18;0;0;0; 16;102;554;32;0;0;0; 17;106;558;11;0;0;0; 18;102;545;18;0;0;0;*86t 19;125;0;0;1;2;0; 20;118;0;1;1;0;0;FIRST STORE SIZE 21;118;0;8;0;0;0; 22;102;547;2;1;0;0;*3e1 23;102;547;24;1;0;0;*3e9 24;118;0;1;1;0;0; 25;118;0;8;0;0;0;*3et;SECOND STORE SIZE 26;107;547;26;1;0;0;*3et 27;125;0;0;1;2;0;STORE PRINTER 28;118;0;2;1;0;0;ROUTE 29;102;547;0;0;0;0; 30;101;551;0;1;3;0; 31;101;0;50;1;1;0; 32;101;0;384;1;1;0;*2.1869 33;104;558;5;0;0;0;SET UP STORE TABLE 34;102;231;2;0;1;0; 35;106;558;5;0;0;0; 36;104;558;5;0;0;0; 37;105;231;2;0;1;0; 38;102;231;3;0;1;0; 39;101;0;50;1;3;0;*2.286t 40;107;545;35;0;0;0;*2.286t SHEET;457 PROCR;555;INITIAL SET UP (4) 0;106;231;0;0;1;0;SET MR2 FOR CLEARING 1;102;558;2;0;0;0;REST OF DIVS 0 & 1 2;126;558;2;1;2;0; 3;124;999;0;0;3;0; 4;126;107;6;1;1;0;SET MR1 FOR MR SWITCH 5;124;999;0;0;3;0; 6;124;535;0;1;0;0;gCLEAR DIV 0 SHEET;458 PROCR;556;STACK TAG (A) SR 0;100;0;0;0;0;0; 1;124;999;0;0;3;0; 2;123;0;0;1;2;0; 3;125;0;2;0;2;0; 4;124;556;1;1;0;0; 5;126;556;0;0;1;0; 6;124;452;20;1;0;0;*pp0*pp1*343 (17) SHEET;459 CONST;557;1; 0;(D)+0+0+0+0+0; 2;pp7; SHEET;460 PROCR;558;ISU: INSTRUCTION CONSTANTS 0;100;231;4;0;0;0;SHIFT STORE TABLE 1;100;0;12;0;0;0; 2;100;0;0;0;0;0;CLEAR REST OF DIVS 0 & 1 3;100;0;8184;0;1;0; 4;124;454;0;1;0;0;*343 (17) 5;100;0;0;0;1;0;DIV 1 6;113;259;0;0;0;0;*259 7;124;458;0;1;0;0;*3t1;VA 8;124;483;0;1;0;0;*411;MINI STORE PRINT 9;106;244;2;0;0;0;*3t2 10;101;0;38;1;3;0;*3t2 11;124;545;26;1;0;0;*869 12;100;0;0;0;0;0; 13;100;0;1;0;0;0; SHEET;461 CONST;559;0;ASL'S CHS 0-7 0;(D): ;*pp8 1;7;M/T 2;7; 3;7; 4;pp7; 5;pp7; 6;pp7; 7;pp; 8;pp8;CHANNEL 1 9;pp8;M/T 10;pp8;START OF ANNEXE 11;8;FOR PASSES 1 AND 2 12;8; 13;8; 14;8; 15;pp8; 16;pppp;CHANNEL 2 17;pppp;GP OR STD PRINTER 18;pppp;T/W 19;pppp;P/T O/P 20;3;CARD O/P 21;3; 22;pppp; 23;pppp; 24;pp5;CHANNEL 3 25;5;P/T I/P 26;5; 27;5; 28;6;CARD I/P 29;pp; 30;6; 31;pp; 32;pp9;CHANNEL 4 33;9;GP OR SP PRINTER 34;9; 35;pppp; 36;pppp; 37;pppp; 38;pppp; 39;pppp; 40;pppp;CHANNEL 5 41;pppp;SP PRINTER 42;pppp; 43;pppp; 44;pppp; 45;pppp; 46;pppp; 47;pppp; 48;pppp;CHANNEL 6 49;pppp;TIMER 50;pppp;T/W 51;pppp;P/T O/P 52;pppp; 53;pppp; 54;pppp; 55;pppp;(T/A/M FOR LIB CARDS) 56;1;CHANNEL 7 57;1;P/T OR TIMER 58;pp;T/W 59;pp;T/A/M FOR PTS 60;pp;T/A/M FOR RTE 0 61;pp;T/A/M FOR PTS 62;pp;T/A/M FOR STORE DUMP 63;pp;T/A/M FOR CONTROL DATA SHEET;462 CONST;560;0;ASL'S CHS 16&17 0;(D)pppp; 1;pppp; 2;pppp; 3;pppp; 4;pppp; 5;pppp; 6;pppp; 7;pppp; 8;pppp;CHANNEL 17 9;pppp; 10;pppp; 11;pppp; 12;pppp; 13;pppp; 14;pppp; 15;pppp; 16;pppp;CHANNEL 18 17;pppp; 18;pppp; 19;pppp; 20;pppp; 21;pppp; 22;pppp; 23;pppp; 24;pppp;CHANNEL 19 25;pppp; 26;pppp; 27;pppp; 28;pppp; 29;pppp; 30;pppp; 31;pppp; 32;pppp;CHANNEL 20 33;pppp; 34;pppp; 35;pppp; 36;pppp; 37;pppp; 38;pppp; 39;pppp; 40;pppp;CHANNEL 21 41;pppp; 42;pppp; 43;pppp; 44;pppp; 45;pppp; 46;pppp; 47;pppp; END