SHEET;1;
PROGM;080;04;0;GENERATOR
ENTRY;166;3
0;D1;14;2;195
1;B1;15;2;75
2;A1;7;2;75
3;A2;8;0;75
4;A6;7;0;75
CHAPS;9;100;101;200;326;445;557;558;559;564
0;3;24;0;2;
1;4;50;0;2;
2;6;450;0;2;
3;17;50;0;2;
4;22;225;0;2;
5;19;330;0;2;
6;21;120;0;2;
7;94;50;0;2;
8;42;26;0;2;
9;40;26;0;2;
10;41;500;0;2;
11;44;5;0;2;
12;2;5;0;1;
13;18;1250;0;1;
14;25;120;0;1;
15;1;23;0;3;
16;28;23;0;3;
17;29;22;0;3;
18;66;12;0;4;
19;67;2;0;4;
20;61;60;0;4;
21;72;16;0;5;
22;53;0;0;3;
23;77;22;0;3;
24;70;0;0;3;
25;54;80;0;3;
26;55;25;0;3;
27;92;19;0;2;
28;23;24;0;2;
29;27;10;0;2;
30;10;195;1;2;
31;5;75;1;1;
32;7;75;1;2;
33;24;6;0;2;
34;8;75;1;1;
35;9;75;1;1;
36;11;10;0;5;
37;13;16;0;5;
38;16;20;0;5;
39;15;50;0;5;
40;26;540;0;5;
41;12;60;0;3;
42;93;225;0;3;PASS 1 OLD/NEW PROCR INDEX
43;97;330;0;3;
44;52;120;0;3;
45;20;150;0;4;PASS 2 100 ACTIVE SEQ CHANGES FORWA
46;91;516;0;9;IPS ANNEXE
47;14;0;0;4;DUMMY
SHEET;2
PROCR;100;CHAPTER ONE
NOTES;;;MAIN OVERLAY ORDER TO RECALL PASS 0
0;152;101;0;0;0;0;
1;C;445;0;0;0;0;
2;76;555;1;0;0;0;gENTER IPS
3;152;101;0;0;0;0;
4;C;101;0;0;0;0;
5;76;166;0;0;0;0;gPASS 0
SHEET;3
PROCR;101;CALL PASS 1
0;152;101;0;0;0;0;
1;C;200;0;0;0;0;
SHEET;4
PROCR;102;STORE REGISTER,SEARCH FOR FIRST BLOCK,TEST M/T FILE
NOTES;RADIX;;
0;10;;0;0;0;1;CD INDICATOR
1;5;153;2;1;0;0;
2;;27;9;0;0;0;
3;71;105;54;0;0;0;gOPEN A9
4;;27;8;0;0;0;
5;5;152;17;0;0;0;gW/L
6;100;999;0;0;3;0;BINARY;OPEN PRINTER
7;101;;19;1;3;0;
8;80;136;0;0;0;0;g
9;40;A1;0;0;0;1;MT IN
10;83;133;0;0;0;1;DON'T TEST UNTIL PROCR
11;60;;0;0;0;0;
12;54;41;0;0;0;1000;
13;80;190;0;0;0;0;gSET TO PASS1
14;;40;6;2;0;0;STORE OLD SER
15;5;155;2;1;0;0;
16;;40;4;2;0;0;
17;5;155;0;1;0;0;STORE PROG ID
SHEET;5
PROCR;103;FORM UP CONTROL BLOCK
NOTES;RADIX;;0
0;62;;0;0;0;0;
1;83;140;0;0;0;1;BEFORE ROUTES
2;5;150;16;1;0;0;CLEAR
3;54;153;8;0;0;6;
4;62;;0;0;0;0;
5;101;;15;1;3;0;OPEN B1
6;104;152;20;0;0;0;0=PT 1=CARDS
7;118;;5;0;1;0;
8;104;999;8;0;0;0;
9;100;152;22;1;2;0;
10;125;;4096;1;1;0;
11;124;999;0;0;3;0;
12;123;;160;0;2;0;gENTER MASTER
13;80;135;0;0;0;0;gREAD P/T S/R;READ NEXT BLOCK
14;;153;6;0;0;0;TEST IF 'LOCKOUT' BLOCK
15;12;;0;0;0;p;
16;71;103;20;0;0;0;Nog
17;;153;7;0;0;0;STORE LINE SERIAL
18;5;152;24;0;0;0;
19;80;135;0;0;0;0;g READ P/T S/R;READ NEXT BLOCK
20;;153;6;0;0;0;TEST TYPE 1;TEST IF CONTROL
21;12;;0;0;0;1;;BLOCK
22;71;170;4;0;0;0;g*03
23;35;;0;0;0;1100;
24;36;155;2;0;0;0;VERSION
25;70;103;28;0;0;0;gOK
26;12;;0;0;0;9900;
27;71;190;46;0;0;0;g*02;NOT BASIC
28;;155;2;0;0;0;
29;60;;0;0;0;0;
30;11;;0;0;0;1;
31;5;153;0;0;0;0;
32;62;;0;0;0;0;
33;;153;7;0;0;0;MACHINE NO
34;30;;0;0;0;2;
35;37;153;0;0;0;0;NEW SER
36;80;135;0;0;0;0;gREAD P/T S/R
SHEET;6
PROCR;104;AMEND CONTROL BLOCK IF NECESSARY
NOTES;RADIX;;
0;;153;6;0;0;0;TEST TYPE 2;TEST IF CONTROL
1;12;;0;0;0;2;;BLOCK NEEDS AMENDT
2;71;104;30;0;0;0;gNO;gNO
3;54;41;0;0;0;35;
4;;152;20;0;0;0;
5;71;104;27;0;0;0;gCARDS
6;51;5;0;0;0;0;
7;C;158;4;0;0;0;ALPHAgNUMERIC
8;91;154;2;0;11;0;0/0;SET MR FOR
9;91;154;2;0;12;0;;AMENDTS
10;101;;3;0;1;0;
11;125;;0;1;2;0;
12;36;41;1;0;11;0;
13;70;104;25;0;0;0;gNO MORE AMENDTS
14;101;;1;1;2;0;
15;118;;4127;1;0;0;
16;92;;0;0;12;0;
17;118;;1;1;0;0;
18;5;152;1;0;0;0;
19;100;152;2;0;2;0;
20;106;152;2;0;0;0;
21;124;152;1;0;1;0;
22;118;;0;1;3;0;
23;37;153;8;0;12;0;
24;94;104;9;0;11;1;gNEXT AMENDMENT
25;80;135;0;0;0;0;gREAD P/T S/R
26;76;104;0;0;0;0;gMORE AMDTS?
27;50;5;0;0;0;0;CARDS
28;C;159;4;0;0;0;
29;76;104;8;0;0;0;
30;83;118;0;0;0;1;SET SWITCH FOR FIRST REPLACEMENT
SHEET;7
PROCR;105;EDIT AND OUTPUT CONTROL BLOCK AND HEADING BLOCK
NOTES;RADIX;;0
0;52;42;2;0;0;0;HEADING LINE;PRINT HEADING L
1;C;156;0;0;0;0;
2;80;137;0;0;0;0;gPRINT S/R
3;80;143;0;0;0;0;gBLANK LINE
4;52;42;2;0;0;0;'CONTROL WORD'
5;C;156;22;0;0;0;
6;80;137;0;0;0;0;gPRINT S/R
7;62;;0;0;0;0;
8;90;;0;0;11;0;SET MRS FOR WORDS;BREAK CONTROL BLOCK
9;C;;0;0;0;16;
10;90;;0;0;12;8;SET MR FOR
11;C;;0;0;0;0;STORING O/P
12;;153;8;0;11;0;NEXT WORD
13;118;;3;0;3;0;
14;118;;4127;1;0;0;
15;102;152;1;0;0;0;STORE BITS 2-16
16;118;;1;1;3;0;PRINT BIT 1
17;70;105;20;0;0;0;
18;10;;0;0;0;10000;
19;76;105;36;0;0;0;
20;10;;0;0;0;.0000;
21;76;105;36;0;0;0;
22;;152;1;0;0;0;FORM NEXT
23;32;;0;0;0;2-;COLLATION ORDER
24;33;;0;0;0;3;
25;5;152;1;0;0;0;
26;32;;0;0;0;1;
27;33;;0;0;0;1;
28;5;154;44;0;0;0;
29;10;;0;0;0;…..;ZEROS
30;5;152;0;0;0;0;
31;124;154;44;0;1;0;
32;101;;0;0;1;0;FORMED ADDRESS
33;10;;0;0;0;11111;PACK 1'S ONTO QRTETS
34;37;152;0;0;0;0;WHICH CORRESPOND
35;;152;0;0;0;0;TO BITS WHICH ARE
36;5;42;0;2;12;0;1
37;94;105;22;0;12;2-;gNEXT 5
38;;153;60;1;0;0;BEW
39;5;42;10;1;0;0;
40;80;137;0;0;0;0;gPRINT S/R
41;94;105;10;0;11;1;gNEXT LINE
42;60;;0;0;0;0;
43;80;143;0;0;0;0;gBLANK LINE
44;52;42;2;0;0;0;EDIT HEADING
45;C;157;2;0;0;0;BLOCK
46;80;137;0;0;0;0;gPRINT
47;55;5;0;1;0;10;SAFE
48;C;44;0;1;0;0;
49;55;42;2;1;0;46;g'PT'
50;C;5;0;1;0;0;
51;124;106;0;0;2;0;
52;5;139;0;0;0;0;
53;76;170;0;0;0;0;BACK TO PASS 0
54;10;;0;0;0;1200000;OPEN A9
55;34;197;88;1;0;0;
56;1;999;7;0;0;0;
57;125;;4096;1;1;0;
58;124;999;0;0;3;0;
59;123;;160;0;2;0;gOPEN
60;10;;0;0;0;8000;WRITE HDG BLOCK
61;5;10;4;2;0;0;
62;155;;0;0;0;0;SERIAL
63;5;10;6;1;0;0;
64;10;;0;0;0;9002;
65;5;10;8;2;0;0;
66;;153;60;1;0;0;BEW
67;5;10;10;1;0;0;
68;10;;0;0;0;8;
69;34;999;12;0;0;0;
70;80;136;0;0;0;0;gA9
71;76;102;9;0;0;0;
SHEET;8
PROCR;106;UNPACK PROGRAMME HEADING BLOCKS
NOTES;RADIX;;0
0;80;134;0;0;0;0;READ BLOCK;FIND FIRST
1;;41;0;1;0;0;TEST PROGM BLOCK;FILE DETAIL
2;2;154;40;1;0;0;
3;71;106;0;0;0;0;
4;5;152;16;0;0;0;CLEAR STEP BACK L;OCATION
5;80;134;0;0;0;0;STEP FORWARD TO
6;80;134;0;0;0;0;FIRST FILE
7;;41;0;1;0;0;TEST CHAPS
8;2;154;22;1;0;0;
9;71;106;6;0;0;0;gNO
10;83;106;0;0;0;20;SW 2
11;76;107;1;0;0;0;gSTART GENERATING
SHEET;9
PROCR;107;BEGINNING OF MAIN LOOP,DEAL WITH NEW SECTION
NOTES;RADIX;;0
0;80;134;0;0;0;0;READ AND STORE M/T BLOCK
1;;41;0;1;0;0;TEST IF SECTION;TEST IF NEW
2;2;154;22;1;0;0;DESCRIPTION SHEET;SECTION AND SET
3;70;107;22;0;0;0;;SECTION TYPE
4;;152;24;0;0;0;
5;70;107;9;0;0;0;TEST LINE SERIAL STORED;NOg
6;2;41;0;2;0;0;TEST IF 'LOCKOUT' LINE
7;71;107;9;0;0;0;NOg
8;123;;0;0;3;0;
9;;41;4;1;0;0;TEST PROCR;SWITCH IF 50
10;2;154;24;1;0;0;
11;70;107;26;0;0;0;gYES
12;;41;4;1;0;0;TEST CONST
13;2;154;26;1;0;0;
14;70;107;25;0;0;0;gYES
15;;41;4;1;0;0;TEST TABLE
16;2;154;28;1;0;0;
17;70;107;24;0;0;0;gYES
18;;41;4;1;0;0;TEST END SIGN
19;2;154;38;1;0;0;
20;70;128;0;0;0;0;gYES END ROUTINE
21;76;108;0;0;0;0;gNOT A NEW SECTION
22;92;;0;0;11;0;SECTION DESCRIPTION
23;10;;0;0;0;1;
24;11;;0;0;0;1;TABLE
25;11;;0;0;0;1;CONST
26;11;;0;0;0;1;PROCR
27;84;107;0;0;0;0;SET SECTION TYPE SW SWITCH 5
28;;152;5;0;0;0;TEST DELETION;TEST DELETION
29;70;107;41;0;0;0;gNO;INDICATOR
30;10;;0;0;0;0;CLEAR INDICATOR
31;5;152;5;0;0;0;
32;85;106;0;0;0;0;SWITCH 2;PRINT FINAL LINE
33;C;107;41;0;0;0;gPROGRAMME HEADING;OF DELETION
34;C;107;35;0;0;0;gOTHER SECTIONS
35;;153;50;1;0;0;SERIAL NO
36;5;42;2;1;0;0;
37;;153;60;1;0;0;STORE B/E
38;5;42;4;1;0;0;
39;5;150;16;1;0;0;CLEAR
40;80;139;0;0;0;0;gO/P
41;80;134;0;0;0;0;READ M/T S/R
42;;40;10;1;0;0;TEST NOTES
43;2;154;30;1;0;0;;OF SECTION
44;71;107;46;0;0;0;gDEAL WITH NEXT
45;80;134;0;0;0;0;BLOCK
46;10;;0;0;0;0;
47;5;152;6;0;0;0;CLEAR DUMMY INDICATOR
48;83;106;0;0;0;2;SET SWITCH FOR ORDINARY SECTION
49;83;118;0;0;0;1;SET SWITCH FOR FIRST REPLACEMENT
50;76;107;1;0;0;0;
SHEET;10
PROCR;108;DEAL WITH CONTENTS OF SECTION,STORE DUMMIES
NOTES;RADIX;;0
0;;41;0;1;0;0;STORE SERIAL NO;STORE SERIAL NO
1;5;153;50;1;0;0;FOR DELETIONS
2;;152;6;0;0;0;;TEST IF THIS
3;70;109;0;0;0;0;gNO;ORDER IS STORED
4;55;41;0;1;0;42;STORE DUMMY;AS DUMMY
5;C;41;372;1;6;0;
6;94;109;0;0;6;42;gMORE DUMMIES TO COME
7;10;;0;0;0;0;CLEAR INDICATOR
8;5;152;6;0;0;0;
9;92;;0;0;6;0;CLEAR MR
SHEET;11
PROCR;109;SEARCH INDICATORS
NOTES;RADIX;;0
0;;41;26;1;0;0;;TEST IF ANY
1;32;;0;0;0;8-;;INDICATORS AT ALL
2;62;;0;0;0;0;
3;12;;0;0;0;5e;
4;60;;0;0;0;0;
5;71;111;0;0;0;0;
6;55;41;26;1;0;16;
7;C;41;44;1;0;0;
8;80;145;0;0;0;0;gREPLACE *'S BY N/E'S AND BREAK UP S/R
9;;152;5;0;0;0;TEST DELETION IND;TEST IF IN MIDDLE
10;71;109;14;0;0;0;gYES
11;80;112;0;0;0;0;gTEST ACTIVE S/R
12;70;111;0;0;0;0;gNO
13;76;114;0;0;0;0;gYES
14;80;146;0;0;0;0;gTEST FOR REQD;IND
15;76;107;0;0;0;0;gNOT END OF DELETION
SHEET;12
PROCR;110;DEAL WITH END OF DELETION
NOTES;RADIX;;0
0;10;;0;0;0;0;CLEAR DELETION;FINISH DELETION
1;5;152;5;0;0;0;INDICATOR
2;85;106;0;0;0;0;SWITCH 2;PRINT FINAL LINE
3;C;107;0;0;0;0;gPROGRAMME HEADING;OF DELETION
4;C;110;5;0;0;0;gOTHER SECTIONS
5;;41;0;1;0;0;
6;5;150;16;1;0;0;STORE SER
7;76;107;0;0;0;0;
SHEET;13
PROCR;111;OUTPUT LINE IF PHS
NOTES;RADIX;;0
0;83;118;0;0;0;1;
1;76;107;0;0;0;0;gNEXT BLOCK
SHEET;14
PROCR;112;SEARCH INDICATORS FOR AN ATIVE ONE
NOTES;RADIX;;0
0;81;112;0;0;0;0;
1;10;;0;0;0;2;;PREPARE FOR FIRST
2;3;152;7;0;0;0;INDICATOR NO;WORD
3;3;152;8;0;0;0;AMENDT ACTIVE INDIC
4;91;154;2;0;5;0;MR2,NEW IND WORDS
5;90;;0;0;13;0;NEXT;IND
6;C;;0;0;0;3;3 CHAR3;INDICATOR
7;91;154;2;0;4;0;MR4 FOR STORING
8;5;153;42;1;0;0;STORE 'A'
9;90;;0;0;12;0;CHARS;PREPARE FOR NEXT
10;C;;0;0;0;10;OF WORD;WORD
11;;41;322;1;5;0;
12;3;41;306;1;4;0;
13;70;112;31;0;0;0;
14;;153;42;1;0;0;RESTORE A
15;34;41;322;1;5;0;SELECT NEXT WORD TO B
16;32;;0;0;0;2;SHIFT NEXT CHAR TO A
17;70;112;23;0;0;0;gLAST CHAR OF IND
18;94;112;20;0;13;1;gNEXT CHAR
19;76;113;0;0;0;0;gNEXT 3 CHARACTERS
20;94;112;16;0;12;2;
21;94;112;22;0;4;2;gNEXT CHAR
22;94;112;8;0;5;2;gNEXT WORD
23;10;;0;0;0;0;CLEAR NEXT W/L
24;5;41;308;1;4;0;
25;;152;8;0;0;0;TEST LAST INDIC
26;71;112;31;0;0;0;
27;10;;0;0;0;2;
28;4;152;7;0;0;0;STEP INDIC NO
29;5;152;8;0;0;0;SET AMENDT INDIC
30;94;112;5;0;5;2;gNEXT INDICATOR
31;82;112;0;0;0;0;
SHEET;15
PROCR;113;SEARCH INDICATORS FOR AN ACTIVE ONE CONTINUED
NOTES;RADIX;;0DEAL WITH 3 DIGIT NUMBERS
0;100;153;42;1;0;0;STORE'A''B''C'
1;10;;0;0;0;0;
2;5;41;308;1;4;0;CLEAR INDIC LOCN
3;90;;0;0;13;0;
4;C;;0;0;0;3;
5;;152;8;0;0;0;
6;70;113;43;0;0;0;gINDIC ALREADY INACTIVE
7;;153;42;2;0;0;TEST IF SPECIAL
8;12;;0;0;0;p.p;
9;70;113;11;0;0;0;
10;72;122;0;0;0;0;gYES
11;;153;42;2;0;0;
12;32;;0;0;0;1-;
13;70;129;0;0;0;0;gERROR
14;5;153;42;0;0;0;STORE REASON
15;32;;0;0;0;1;TYPE
16;70;129;0;0;0;0;gERROR
17;5;152;11;0;0;0;STORE TYPE
18;106;153;42;0;0;0;
19;101;;1;1;2;0;
20;118;;4127;1;0;0;
21;102;152;9;0;0;0;
22;118;;1;1;0;0;
23;5;152;10;0;0;0;
24;34;152;2;0;0;0;
25;124;152;10;0;1;0;COLLATE OUT CONTROL
26;118;;0;1;3;0;BLOCK BIT WHICH
27;124;152;9;0;1;0;CORRESPONDS TO THE
28;115;153;8;0;0;0;AMENDT REASON
29;60;;0;0;0;0;
30;71;113;37;0;0;0;gACTIVE
31;;152;11;0;0;0;INACTIVE
32;12;;0;0;0;8;
33;70;129;0;0;0;0;gERROR
34;73;113;41;0;0;0;gYES
35;3;152;11;0;0;0;
36;76;113;43;0;0;0;AS ACTIVE
37;;152;11;0;0;0;
38;12;;0;0;0;8;
39;70;129;0;0;0;0;gERROR
40;73;113;43;0;0;0;gOK
41;10;;0;0;0;0;AS INACTIVE
42;5;152;8;0;0;0;SET INACTIVE IND
43;10;;0;0;0;0;CLEAR 'A'
44;5;153;42;1;0;0;
45;100;153;42;1;1;0;RESET 'A' 'B' 'C'
46;76;112;20;0;0;0;gNEXT 3 DIGITS
SHEET;16
PROCR;114;SWITCH BY AMENDMENT TYPE
NOTES;RADIX;;0
0;124;152;11;0;1;0;SWITCH BY AMENDT
1;76;114;1;0;0;0;TYPE
2;76;115;2;0;0;0;gDELETED ONE
3;76;115;0;0;0;0;gDELETE MORE THAN ONE
4;76;116;0;0;0;0;gREPLACE BY DUMMY
5;76;117;0;0;0;0;gREPLACE ITEM
6;76;129;0;0;0;0;gLITERAL;REPORT
7;76;116;0;0;0;0;gREPLACE REFERENCE
SHEET;17
PROCR;115;DELETE,TYPES 1 AND 2
NOTES;RADIX;;0
0;10;;0;0;0;1;SET DELETION
1;3;152;5;0;0;0;INDICATOR
2;101;;1;1;1;0;
3;102;152;11;0;0;0;SET DELETION TYPE
4;83;118;0;0;0;1;SET SWITCH 5 FOR FIRST REPLACEMENT
5;85;106;0;0;0;0;SWITCH 2
6;C;107;0;0;0;0;gPROGRAMME HEADING SHEET
7;C;115;8;0;0;0;gORDINARY SECTION
8;;41;0;1;0;0;STORE SERIAL NO
9;5;42;2;1;0;0;
10;;154;36;1;0;0;D SP SP SP SP'
11;5;42;4;1;0;0;
12;;153;60;1;0;0;STORE B/E
13;5;42;6;1;0;0;
14;80;140;0;0;0;0;gGENERAL OUTPUT S/R
15;76;107;0;0;0;0;
SHEET;18
PROCR;116;REPLACE BLOCK BY DUMMY TYPE 3
NOTES;RADIX;;0
0;;152;6;0;0;0;TEST IF DUMMIES BEING STORED
1;70;116;13;0;0;0;NO
2;0;152;5;0;0;0;DUMMY BEING DEALT WITH
3;71;107;0;0;0;0;gYES
4;;41;322;2;0;0;
5;30;;0;0;0;2-;
6;12;;0;0;0;pp0;
7;73;116;13;0;0;0;gNO
8;71;107;0;0;0;0;gYES
9;;41;324;2;0;0;
10;30;;0;0;0;2-;
11;12;;0;0;0;pp0;
12;72;107;0;0;0;0;gYES
13;85;107;0;0;0;0;SWITCH 2;SWITCH BY SECTION
14;C;116;19;0;0;0;gPROCR;TYPE
15;C;116;19;0;0;0;gCONST
16;C;116;19;0;0;0;gTABLE
17;C;129;0;0;0;0;gSECTION DESC
18;C;129;0;0;0;0;gPROG HEADING
19;90;;0;0;11;72;SET MR 11;SEARCH FOR DUMMY
20;C;;0;0;0;450;DUMMIES;WITH CORRECT
21;10;;0;0;0;1;SET UP INDICATOR
22;5;152;21;0;0;0;
23;55;41;326;1;11;26;STORE ANNOT;IND
24;C;41;44;1;0;0;
25;80;145;0;0;0;0;gBREAK UP NOTES S/R
26;80;146;0;0;0;0;gTEST FOR REQD IND
27;76;116;29;0;0;0;
28;76;116;31;0;0;0;gDUMMY FOUND
29;94;116;23;0;11;42;
30;76;130;0;0;0;0;gNO DUMMY
31;10;;0;0;0;0;CLEAR INDICATOR
32;5;152;21;0;0;0;
33;;152;11;0;0;0;
34;12;;0;0;0;6;TEST TYPE=3
35;71;116;48;0;0;0;gTYPE 6
36;85;107;0;0;0;0;SWITCH BY SECTION TYPE
37;C;116;40;0;0;0;gPROCR;TYPE 6 AMENDT
38;C;116;48;0;0;0;gCONST
39;C;116;43;0;0;0;gTABLE
40;;41;304;1;11;0;
41;5;41;4;1;0;0;PROCR
42;76;116;50;0;0;0;gOUTPUT REPLACE
43;;41;302;1;11;0;
44;5;41;2;1;0;0;TABLE ENTRY
45;;41;306;1;11;0;
46;5;41;6;1;0;0;
47;76;116;50;0;0;0;gOUTPUT REPLACE
48;55;41;302;1;11;40;
49;C;41;2;1;0;0;
50;85;107;0;0;0;0;;SWITCH BY SECTION
51;C;119;0;0;0;0;gPROCR;TYPE
52;C;120;0;0;0;0;gCONST
53;C;121;0;0;0;0;gTABLE
SHEET;19
PROCR;117;REPLACE ITEM TYPE 4
NOTES;RADIX;;0
0;124;152;7;0;1;0;;COLLECT REPLACEMENT
1;106;41;32;1;0;0;
2;85;107;0;0;0;0;SWITCH 5;SWITCH BY SECTION
3;C;117;8;0;0;0;PROCR;TYPE
4;C;117;10;0;0;0;CONST
5;C;117;15;0;0;0;TABLE
6;C;118;0;0;0;0;
7;C;111;0;0;0;0;
8;5;41;6;1;0;0;REPLACE ITEM;PROCR
9;76;119;0;0;0;0;gOUTPUT REPLACEMENT
10;5;41;6;1;0;0;REPLACE CONSTANT;CONST
11;;153;48;1;0;0;
12;5;41;8;1;0;0;
13;54;41;10;1;0;16;CLEAR REMAINDER OF
14;76;120;0;0;0;0;CONSTANTS SECTION
15;5;41;6;1;0;0;REPLACE ITEM;TABLE
16;76;121;0;0;0;0;
SHEET;20
PROCR;118;OUTPUT SECTION DESCRIPTION BLOCK REPLACE
NOTES;RADIX;;0
0;80;144;0;0;0;0;CLEAR TRANSIT AREA;PICK UP FIRST
1;53;42;6;0;0;0;CONDENSE FIRST PART;PART OF BLOCK
2;C;160;0;0;0;0;
3;55;41;26;1;0;16;STORE NOTES;STORE NOTES
4;C;42;28;1;0;0;
5;80;141;0;0;0;0;gPREPARE TO O/P REPLACEMENT
6;80;138;0;0;0;0;gOUTPUT ON P/T AND PRINTER
7;76;107;0;0;0;0;
SHEET;21
PROCR;119;OUTPUT PROCR BLOCK REPLACEMENT
NOTES;RADIX;;
0;80;144;0;0;0;0;CLEAR TRANSIT AREA
1;;41;8;1;0;0;BREAK UP DISC
2;32;;0;0;0;6-;AND MOD
3;5;41;8;1;0;0;
4;32;;0;0;0;6;
5;5;41;14;1;0;0;
6;53;42;6;0;0;0;CONDENSE ACTION
7;C;160;2;0;0;0;REF ITEM D M
8;;41;10;1;0;0;TRANSFER LITERAL
9;5;42;18;1;0;0;
10;;41;12;1;0;0;
11;5;42;20;1;0;0;
12;;153;48;1;0;0;TRANSFER N/E'S
13;3;42;22;1;0;0;
14;5;42;32;1;0;0;
15;55;41;26;1;0;8;NOTES
16;C;42;24;1;0;0;
17;55;41;34;1;0;8;COMMENTARY
18;C;42;34;1;0;0;
19;76;118;5;0;0;0;gOUTPUT
SHEET;22
PROCR;120;OUTPUT CONSTANT SECTION REPLACEMENT
NOTES;RADIX;;0
0;80;142;0;0;0;0;gOUTPUT CONSTANT S/R
1;76;107;0;0;0;0;gNEXT BLOCK
SHEET;23
PROCR;121;OUTPUT TABLE ENTRY REPLACEMENT
NOTES;RADIX;;0
0;80;144;0;0;0;0;CLEAR TRANSIT AREA
1;53;42;6;0;0;0;CONDENSE TABLE ENTRY
2;C;160;0;0;0;0;
3;52;42;16;0;0;0;EDIT TABLE ENTRY
4;C;161;0;0;0;0;
5;76;118;3;0;0;0;gOUTPUT
SHEET;24
PROCR;122;SPECIAL INDICATORS
NOTES;RADIX;;0
0;84;122;0;0;0;0;SWITCH 9
1;85;122;0;0;0;0;
2;C;123;0;0;0;0;gSTART STORING
3;C;115;2;0;0;0;gDELETE ONE
4;C;115;0;0;0;0;gDELETE MORE THAN ONE
5;C;124;0;0;0;0;gREPLACE BY ZOT
6;C;117;0;0;0;0;gREPLACE ITEM
7;C;129;0;0;0;0;LITERAL;REPORT
8;C;125;0;0;0;0;gSEQUENCE CHANGE
9;C;129;0;0;0;0;gERROR REPORT
10;C;126;0;0;0;0;gROUTES TABLE
11;C;128;0;0;0;0;gEND ROUTINE
SHEET;25
PROCR;123;START STORING
NOTES;RADIX;;0
0;55;41;0;1;0;42;STORE THIS ORDER
1;C;41;372;1;0;0;AS DUMMY
2;54;41;414;0;0;336;
3;90;;0;0;6;42;SET MR
4;C;;0;0;0;378;
5;10;;0;0;0;1;SET DUMMY INDICATOR
6;5;152;6;0;0;0;
7;76;113;42;0;0;0;gPROCESS NEXT INDICATOR
SHEET;26
PROCR;124;REPLACE BY ZOT
NOTES;RADIX;;0
0;85;107;0;0;0;0;SWITCH 5;SWITCH BY SECTION
1;C;124;6;0;0;0;PROCR;TYPE
2;C;124;10;0;0;0;CONST
3;C;124;12;0;0;0;TABLE
4;C;129;0;0;0;0;SECTION DESCRIPTION
5;C;129;0;0;0;0;PROG HEADING
6;10;;0;0;0;413030;STORE NEXT ACTION
7;5;41;2;1;0;0;
8;54;41;4;1;0;10;CLEAR ADDRESS ETC
9;76;119;0;0;0;0;
10;10;;0;0;0;0;CLEAR CONST
11;76;117;10;0;0;0;
12;54;41;2;1;0;16;CLEAR TABLE ENTRY
13;76;121;0;0;0;0;
SHEET;27
PROCR;125;REPLACE BY SEQUENCE CHANGE TO NEXT ORDER
NOTES;RADIX;;0
0;85;107;0;0;0;0;SWITCH 5;SWITCH BY
1;C;125;6;0;0;0;PROCR;SECTION TYPE
2;C;129;0;0;0;0;CONST
3;C;129;0;0;0;0;TABLE
4;C;129;0;0;0;0;SECTION DESCRIPTION
5;C;129;0;0;0;0;PROG HEADING
6;10;;0;0;0;124;ORDER
7;5;41;2;2;0;0;
8;10;;0;0;0;1000;DISC/MOD
9;5;41;8;2;0;0;
10;;41;0;2;0;0;PRODUCES SERIAL NO
11;11;;0;0;0;1;OF NEXT ORDER
12;32;;0;0;0;2-;
13;5;41;4;2;0;0;REF
14;32;;0;0;0;2;
15;5;41;6;2;0;0;ITEM
16;5;41;10;1;0;0;
17;5;41;12;1;0;0;
18;76;119;0;0;0;0;
SHEET;28
PROCR;126;SET UP I/P CONTROL DATA FOR ROUTES TABLE
NOTES;RADIX;;0
0;83;140;0;0;0;2;
1;;153;6;0;0;0;
2;12;;0;0;0;3;
3;71;128;0;0;0;0;
4;55;44;0;1;0;10;BACK SAFE
5;C;5;0;1;0;0;
6;54;41;100;1;0;150;CLEAR W/L'S
7;91;154;2;0;11;0;MR11 FOR UNPACKING;UNPACK TYPE
8;54;41;50;1;0;22;CLEAR W/L
9;;152;20;0;0;0;
10;70;126;14;0;0;0;PT
11;50;5;0;0;0;0;
12;C;159;26;0;0;0;
13;76;126;16;0;0;0;
14;51;5;0;0;0;0;UNPACK BLOCK
15;C;158;8;0;0;0;
16;55;41;51;0;0;8;STORE RTE TYPES
17;C;41;100;0;11;0;
18;94;126;19;0;11;8;STEP BACK S/R
19;80;135;0;0;0;0;gREAD PT
20;;153;6;0;0;0;TEST TYPE 4
21;12;;0;0;0;3;
22;70;126;8;0;0;0;gYES
SHEET;29
PROCR;127;PRODUCE AMENDTS TO RTES TABLE
NOTES;RADIX;;0
0;91;154;2;0;11;0;0:0
1;62;;0;0;0;0;
2;;41;4;1;0;0;TEST NEW CONST;TEST NEW SECT
3;2;154;26;1;0;0;SECTION
4;70;127;7;0;0;0;gYES
5;83;127;0;0;0;2;DIRECTIVE NOT NEEDED
6;76;127;9;0;0;0;g
7;80;134;0;0;0;0;gREAD AND STORE S/R;PREP FOR SECT
8;83;118;0;0;0;1;SWITCH FOR 1ST LINE;BEGN
9;;41;4;1;0;0;TEST END BLOCK;TEST END OF
10;2;154;38;1;0;0;;TABLE
11;70;128;0;0;0;0;
12;;41;100;0;11;0;
13;70;127;20;0;0;0;gPSEUDO ROUTE
14;12;;0;0;0;10;
15;70;127;21;0;0;0;gM/R ROUTE
16;73;127;18;0;0;0;gACTIVE ROUTE
17;11;;0;0;0;p.0;LATENT ROUTE
18;11;;0;0;0;10;
19;76;127;22;0;0;0;gSTORE IT
20;10;;0;0;0;pp00;
21;11;;0;0;0;pp;
22;5;153;44;0;0;0;STORE IT
23;;41;6;1;0;0;FIRST 3 CHARS;TEST DIRECTIVE
24;30;;0;0;0;4-;=(D)?;NEEDED
25;2;153;52;1;0;0;
26;71;127;30;0;0;0;gNOT NEEDED
27;;153;52;1;0;0;STORE (D)
28;5;41;6;1;0;0;
29;76;127;45;0;0;0;
30;;41;6;2;0;0;FORM UP AND;TEST REPLACEMEN
31;30;;0;0;0;5;RIGHT ALIGN FIRST;NEEDED
32;1;41;8;2;0;0;TWO WORDS OF
33;35;;0;0;0;0;CLEAR B
34;5;153;42;1;0;0;OLD RTE TYPE CONST
35;75;127;39;0;0;0;gFINISHED
36;;153;42;1;0;0;
37;32;;0;0;0;1-;
38;76;127;34;0;0;0;gTEST IF FINISHED
39;5;41;6;1;0;0;
40;;153;42;1;0;0;TEST NEW RTE TYPE
41;2;153;44;1;0;0;= OLD ONE
42;71;127;45;0;0;0;gNO
43;83;118;0;0;0;1;SET SWITCH FOR 1ST LINE
44;76;127;56;0;0;0;g
45;0;153;44;1;0;0;STORE NEW CONST
46;5;41;8;2;0;0;
47;;153;48;1;0;0;STORE N/E
48;5;41;10;1;0;0;
49;85;127;0;0;0;0;
50;C;127;52;0;0;0;gDIRECTIVE NEEDED
51;C;127;53;0;0;0;gNOT NEEDED
52;;153;52;1;0;0;STORE DIRECTIVE
53;5;41;4;1;0;0;
54;80;142;0;0;0;0;gOUTPUT CONSTANTS
55;83;118;0;0;0;2;SET SW FOR 2ND LINE
56;80;134;0;0;0;0;gREAD AND STORE S/R
57;94;127;1;0;11;1;gNEXT RTE
SHEET;30
PROCR;128;END ROUTINE
NOTES;RADIX;;0
0;;197;54;1;0;0;END
1;5;42;2;1;0;0;
2;;153;60;1;0;0;B/E WORD
3;5;42;4;1;0;0;
4;80;139;0;0;0;0;gO/P
SHEET;31
PROCR;129;REPORTS
NOTES;RADIX;;0
0;83;118;0;0;0;1;
1;;41;0;1;0;0;
2;5;155;14;1;0;0;
3;154;155;4;0;0;0;
4;76;131;0;0;0;0;
SHEET;32
PROCR;130;
0;;41;0;1;0;0;
1;5;155;24;1;0;0;
2;5;152;21;0;0;0;CLEAR INDICATOR
3;154;155;18;0;0;0;
SHEET;33
PROCR;131;
0;150;;0;0;0;13;
1;C;190;56;0;0;0;gUNLOAD
2;C;170;7;0;0;0;gRE ENTER
3;C;131;5;0;0;0;gCONTINUE,IGNORING ERRORS
4;C;107;0;0;0;0;gCONTINUE,REPORTING ERRORS
5;;120;1;0;0;0;24/1/0g107/2
6;3;130;0;0;0;0;
7;5;129;2;0;0;0;
8;76;107;0;0;0;0;
SHEET;34
PROCR;132;READ MT
0;81;132;0;0;0;0;
1;42;A1;0;0;0;0;READ BLOCK
2;C;7;0;0;0;0;
3;82;132;0;0;0;0;
SHEET;35
PROCR;133;ADDRESS NEXT RECORD
NOTES;RADIX;;0
0;81;133;0;0;0;0;;READ NEXT BLOCK
1;85;133;0;0;0;0;
2;C;133;10;0;0;0;gNOT YET
3;C;133;4;0;0;0;gYES,NOW
4;;150;18;1;0;0;
5;71;133;18;0;0;0;gMULTIRECORD
6;80;132;0;0;0;0;gREAD BLOCK
7;55;7;0;1;0;52;COPY TO SECTION 1
8;C;40;0;1;0;0;
9;82;133;0;0;0;0;
10;80;132;0;0;0;0;READ BLOCK
11;;7;12;1;0;0;
12;2;154;24;1;0;0;PROCR
13;71;133;7;0;0;0;gSTILL NOT YET
14;83;133;0;0;0;2;READY'
15;;7;4;2;0;0;
16;30;;0;0;0;5;
17;91;;0;0;7;0;BLOCK LENGTH AS END VALUE
18;54;41;0;0;0;52;
19;54;40;0;0;0;54;
20;55;7;6;1;7;0;
21;C;41;0;1;0;0;
22;C;7;6;2;7;0;
23;;7;12;1;7;0;
24;2;154;26;1;0;0;'CONST'
25;73;133;35;0;0;0;gNOT DIR
26;;41;4;1;0;0;SERIAL
27;5;40;6;1;0;0;
28;;41;6;1;0;0;DIR
29;5;40;10;1;0;0;
30;;41;8;1;0;0;SECN NO
31;5;40;16;1;0;0;
32;;41;14;2;0;0;
33;5;150;26;0;0;0;CONST TYPE(IF CONST)
34;76;133;47;0;0;0;gSTEP MR & RETURN
35;85;107;0;0;0;0;
36;C;133;39;0;0;0;gPROCR
37;C;133;42;0;0;0;gCONST
38;C;133;45;0;0;0;gTABLE
39;50;41;4;0;0;0;
40;C;163;0;0;0;0;
41;76;133;47;0;0;0;g
42;50;41;4;0;0;0;
43;C;165;0;0;0;0;
44;76;133;47;0;0;0;g
45;50;41;4;0;0;0;
46;C;164;0;0;0;0;
47;;7;6;2;7;0;
48;5;150;20;0;0;0;
49;97;150;20;0;7;0;
50;C;133;55;0;0;0;gLEAVE S/R
51;80;132;0;0;0;0;READ BLOCK
52;;7;4;2;0;0;
53;30;;0;0;0;5;
54;91;;0;0;7;0;
55;82;133;0;0;0;0;gLEAVE S/R
SHEET;36
PROCR;134;READ M/T AND STORE BLOCK S/R
NOTES;RADIX;0;
0;81;134;0;0;0;0;gREAD M/T S/R
1;80;133;0;0;0;0;COPY NEXT BLOCK
2;55;40;6;1;0;42;TO W/L
3;C;41;0;1;0;0;
4;;40;4;1;0;0;
5;30;;0;0;0;8-;
6;12;;0;0;0;5e;
7;71;134;10;0;0;0;
8;55;40;4;1;0;10;
9;C;41;0;1;0;0;
10;82;134;0;0;0;0;
SHEET;37
PROCR;135;READ P/T S/R
NOTES;RADIX;;0
0;81;135;0;0;0;0;;READ NEXT BLOCK
1;62;;0;0;0;0;READ BLOCK
2;100;999;14;0;2;0;
3;101;;5;1;3;0;
4;104;152;20;0;0;0;
5;118;;5;0;1;0;
6;104;999;8;0;0;0;
7;125;;4096;1;1;0;
8;124;999;0;0;3;0;
9;123;;160;0;2;0;gENTER MASTER
10;;152;20;0;0;0;
11;71;135;15;0;0;0;gCARDS
12;51;5;0;0;0;0;UNPACK TWO WORDS
13;C;158;0;0;0;0;
14;82;135;0;0;0;0;gLEAVE S/R
15;50;5;0;0;0;0;2 WORDS
16;C;159;0;0;0;0;
17;82;135;0;0;0;0;
SHEET;38
PROCR;136;DEAL WITH PRINTER
0;81;136;0;0;0;0;
1;30;;0;0;0;5;RT
2;1;999;7;0;0;0;
3;125;;4096;1;1;0;NON INT
4;124;999;0;0;3;0;
5;123;;160;0;2;0;gM/R
6;82;136;0;0;0;0;
SHEET;39
PROCR;137;OUTPUT ON PRINTER
NOTES;RADIX;;0
0;81;137;0;0;0;0;
1;100;153;54;1;0;0;
2;100;154;2;0;3;0;
3;;27;9;0;0;0;ON LINE?
4;70;137;9;0;0;0;gYES
5;55;42;0;1;0;50;
6;C;10;4;1;0;0;
7;10;;0;0;0;8;
8;76;137;17;0;0;0;
9;10;;0;0;0;0;FUNCTION WORD;OUTPUT ONE BLOCK
10;5;42;0;1;0;0;ZERO
11;;27;8;0;0;0;
12;12;;0;0;0;9;=9?
13;71;137;22;0;0;0;gNO
14;55;42;0;1;0;50;COPY TO TX AREA
15;C;10;0;1;0;0;
16;101;;9;1;3;0;RT 9
17;34;999;12;0;0;0;
18;80;136;0;0;0;0;g
19;100;153;54;1;1;0;RESET A,B,C
20;54;40;0;1;0;50;
21;82;137;0;0;0;0;gLEAVE S/R
22;10;;0;0;0;80000;
23;5;42;1;0;0;0;
24;124;42;0;0;2;0;SECTION START
25;124;999;13;1;2;0;SECN 10
26;129;;0;0;1;0;EDIT
27;101;;4;1;3;0;RT4
28;76;137;17;0;0;0;g
29;42;A1;0;0;0;0;DUMMY TO MAKE SECTION
30;C;10;0;0;0;0;10 A TX AREA
SHEET;40
PROCR;138;OUTPUT ON P/T AND PRINTER S/R
NOTES;RADIX;;0
0;81;138;0;0;0;0;
1;;147;93;0;0;0;SET SWITCH FOR CON CONSANTS
2;5;147;72;0;0;0;
3;;153;34;1;0;0;STORE B/E
4;5;42;46;1;0;0;
5;80;147;0;0;0;0;gGET RID OF SPACES S/R
6;80;140;0;0;0;0;gOUTPUT S/R
7;82;138;0;0;0;0;gLEAVE S/R
SHEET;41
PROCR;139;O/P S/R
0;81;139;0;0;0;0;
1;55;42;2;1;0;46;gPT IN
2;C;5;0;1;0;0;
3;80;137;0;0;0;0;gPRINT
4;76;193;4;0;0;0;
SHEET;42
PROCR;140;GENERAL OUTPUT S/R
NOTES;RADIX;;0
0;81;140;0;0;0;0;
1;85;140;0;0;0;0;
2;C;140;4;0;0;0;gREDUCE
3;C;140;28;0;0;0;gO/P
4;;42;4;1;0;0;
5;30;;0;0;0;8-;
6;12;;0;0;0;54;
7;70;140;35;0;0;0;g'D'
8;12;;0;0;0;2t;
9;70;140;31;0;0;0;g' '
10;;150;16;2;0;0;;'R'
11;70;140;26;0;0;0;gNOTHING THERE
12;;42;2;1;0;0;
13;5;150;22;1;0;0;PRESERVE
14;;42;4;1;0;0;
15;5;150;24;1;0;0;PRESERVE
16;;150;16;1;0;0;
17;5;42;2;1;0;0;SERIAL
18;;153;60;1;0;0;
19;5;42;4;1;0;0;B/E'S
20;80;139;0;0;0;0;gO/P
21;;150;22;1;0;0;
22;5;42;2;1;0;0;
23;;150;24;1;0;0;
24;5;42;4;1;0;0;
25;5;150;16;1;0;0;CLEAR IND
26;80;139;0;0;0;0;gO/P
27;82;140;0;0;0;0;;' '
28;;150;16;1;0;0;
29;71;140;12;0;0;0;
30;76;140;26;0;0;0;
31;;42;2;1;0;0;
32;5;150;16;1;0;0;SET THIS SERIAL
33;62;;0;0;0;0;
34;82;140;0;0;0;0;
35;;150;16;2;0;0;TEST SERIAL STORED 'D'
36;60;;0;0;0;0;
37;71;140;51;0;0;0;gYES DON'T O/P YET
38;106;150;29;1;0;0;TEST ADJACENT
39;105;42;3;1;0;0;
40;101;;1;1;1;0;
41;70;140;31;0;0;0;gYES
42;101;;1;1;1;0;
43;71;140;71;0;0;0;gNO
44;85;107;0;0;0;0;MAYBE?
45;C;140;71;0;0;0;gNO
46;C;140;48;0;0;0;gMAYBE
47;C;140;31;0;0;0;gYES
48;;150;26;0;0;0;CONST TYPE
49;70;140;71;0;0;0;gNO
50;76;140;31;0;0;0;gYES
51;2;42;2;2;0;0;
52;11;;0;0;0;1;
53;70;140;62;0;0;0;gADJ
54;11;;0;0;0;1;
55;71;140;76;0;0;0;
56;85;107;0;0;0;0;
57;C;140;76;0;0;0;
58;C;140;60;0;0;0;C;MAYBE
59;C;140;62;0;0;0;T;YES
60;;150;26;0;0;0;CONST TYPE
61;70;140;76;0;0;0;
62;;152;11;0;0;0;DELETION TYPE
63;12;;0;0;0;2;
64;71;140;31;0;0;0;
65;5;150;16;1;0;0;CLEAR IT
66;62;;0;0;0;0;
67;82;140;0;0;0;0;gLEAVE S/R
68;;42;2;1;0;0;
69;5;150;16;1;0;0;
70;82;140;0;0;0;0;
71;106;42;2;1;0;0;
72;102;150;28;1;0;0;
73;62;;0;0;0;0;
74;126;139;0;0;0;0;O/P
75;82;140;0;0;0;0;
76;106;42;2;1;0;0;
77;102;150;28;1;0;0;
78;62;;0;0;0;0;
79;76;140;12;0;0;0;
SHEET;43
PROCR;141;OUTPUT REPLACEMENT S/R
NOTES;RADIX;;0
0;81;141;0;0;0;0;
1;85;118;0;0;0;0;SWITCH 5
2;C;141;4;0;0;0;gFIRST LINE OF REPLACEMENT
3;C;141;10;0;0;0;gSECOND LINE
4;;41;0;1;0;0;
5;5;42;2;1;0;0;
6;83;118;0;0;0;2;SET SWITCH FOR SECOND LINE
7;;154;34;1;0;0;R(N/E) (SP) (SP) (SP)
8;5;42;4;1;0;0;
9;82;141;0;0;0;0;gLEAVE S/R
10;;153;48;1;0;0;(N/E)
11;76;141;8;0;0;0;gLEAVE S/R
SHEET;44
PROCR;142;OUTPUT CONSTANTS S/R
NOTES;RADIX;;0
0;81;142;0;0;0;0;
1;55;41;4;1;0;38;COPY CONSTANT AND NOTES
2;C;42;6;1;0;0;
3;5;42;2;1;0;0;CLEAR SERIAL NO LOCN
4;80;141;0;0;0;0;gOUTPUT REPLACEMENT S/R
5;;153;34;1;0;0;STORE B/E'S
6;5;42;46;1;0;0;
7;;147;91;0;0;0;SET SWITCH FOR CONSTANTS
8;5;147;72;0;0;0;
9;80;147;0;0;0;0;gGET RID OF SPACES S/R
10;80;140;0;0;0;0;gOUTPUT S/R
11;82;142;0;0;0;0;gLEAVE S/R
SHEET;45
PROCR;143;OUTPUT BLANK LINE S/R
NOTES;RADIX;;0
0;81;143;0;0;0;0;
1;;153;60;1;0;0;
2;5;42;2;1;0;0;
3;80;137;0;0;0;0;gOUTPUT ON PRINTER
4;82;143;0;0;0;0;gLEAVE S/R
SHEET;46
PROCR;144;BULK CLEAR TRANSIT AREA
NOTES;RADIX;;0
0;81;144;0;0;0;0;
1;54;42;0;1;0;50;CLEAR TX
2;82;144;0;0;0;0;gLEAVE S/R
SHEET;47
PROCR;145;
NOTES;RADIX;;0
0;81;145;0;0;0;0;
1;62;;0;0;0;0;
2;90;;0;0;13;0;
3;C;;0;0;0;16;WORDS OF ANNOTATION
4;35;;0;0;0;1100000000;
5;36;41;44;1;13;0;COLLATE NEXT OCTET IN NOTES WITH
6;70;145;28;0;0;0;gSPACE;N/E'S
7;5;153;38;1;0;0;TEST IF *
8;36;154;32;1;0;0;
9;2;153;38;1;0;0;
10;71;145;14;0;0;0;gNO
11;;153;40;1;0;0;REPLACE BY N/E
12;37;41;44;1;13;0;
13;76;145;21;0;0;0;
14;10;;0;0;0;0;SHIFT COLLATION
15;36;154;42;1;0;0;TEST CHAR IS
16;2;153;38;1;0;0;DECIMAL
17;72;145;21;0;0;0;gYES
18;;152;21;0;0;0;LOOKING FOR DUMMIES
19;70;111;0;0;0;0;gNO-IGNORE
20;76;116;29;0;0;0;gYES-DUMMY NOT FOUND
21;10;;0;0;0;0;CLEAR A
22;32;;0;0;0;2-;CONSTANT
23;75;145;5;0;0;0;gNEXT OCTET
24;94;145;4;0;13;2;gNEXT WORD
25;0;153;34;1;0;0;B/E'S
26;5;41;44;1;13;0;IN NEXT WORD
27;76;145;35;0;0;0;gUNPACK
28;;153;40;1;0;0;PACK IN N/E;PLACE B/E AT
29;37;41;44;1;13;0;;END
30;10;;0;0;0;0;CLEAR A
31;32;;0;0;0;2-;
32;;153;34;1;0;0;B/E'S
33;37;41;44;1;13;0;
34;5;41;46;1;13;0;
35;51;41;44;0;0;0;UNPACK VARIABLE;BREAK UP
36;C;158;6;0;0;0;
37;82;145;0;0;0;0;gLEAVE S/R
SHEET;48
PROCR;146;TEST REQUIRED INDICATOR IN THIS BLOCK
NOTES;RADIX;;0
0;81;146;0;0;0;0;
1;91;154;2;0;12;0;MODIFIER FOR WORD
2;10;;0;0;0;0;
3;5;152;14;0;0;0;
4;;41;322;1;12;0;OF NEW INDICATORS
5;70;146;9;0;0;0;gLAST INDICATOR;SEARCH AMONG WORDS
6;2;41;306;1;0;0;;OR NEW INDICATOR
7;70;146;10;0;0;0;gFOUND;FOR FIRST WORD OF
8;94;146;2;0;12;2;gNEXT WORD;STORED INDICATOR
9;82;146;0;0;0;0;gLEAVE S/R
10;96;;0;0;12;0;
11;1;152;14;0;0;0;
12;92;;0;0;15;0;
13;124;152;14;0;1;0;
14;;41;306;1;0;0;;EQUAL
15;70;146;22;0;0;0;gALL EQUAL
16;2;41;322;1;15;0;
17;71;146;8;0;0;0;gNEXT ONE NOT=
18;62;;0;0;0;0;STEP MODIFIER
19;10;;0;0;0;2;
20;4;152;14;0;0;0;
21;76;146;10;0;0;0;gTRY NEXT WORD
22;124;146;0;0;3;0;
23;124;;1;1;0;0;
SHEET;49
PROCR;147;GET RID OF UNNEC SPACES,SIG AND NON SIG S/R
NOTES;RADIX;;0
0;81;147;0;0;0;0;
1;62;;0;0;0;0;
2;;150;12;1;0;0;SET UP CONSTANTS
3;3;150;0;1;0;0;COLL CONST 1
4;3;150;2;1;0;0;COLL CONST 2
5;5;150;4;1;0;0;COLL CONST 3
6;124;42;2;0;2;0;
7;3;150;6;1;0;0;
8;3;150;8;1;0;0;
9;5;150;10;1;0;0;
10;;148;23;0;0;0;SET SWITCH 7=1
11;5;147;32;0;0;0;;COLLATE CHARACTER
12;34;150;0;1;0;0;COLLATION CONST 1;AND DETERMINE
13;124;150;6;0;3;0;
14;115;;0;1;0;0;
15;70;147;49;0;0;0;gSPACE;OR ORDINARY
16;5;150;14;1;0;0;;CHARACTER
17;124;150;6;0;3;0;
18;114;;0;1;0;0;
19;;150;14;2;0;0;TEST ZERO
20;70;147;49;0;0;0;
21;;150;14;1;0;0;SHIFT CHAR TO
22;32;;0;0;0;2-;Q1,2
23;71;147;22;0;0;0;
24;32;;0;0;0;2;
25;3;150;14;1;0;0;STORE CHARACTER
26;12;;0;0;0;3:;TEST IF N/E
27;70;148;0;0;0;0;gYES N/E
28;12;;0;0;0;40;;DEAL WITH
29;70;148;0;0;0;0;gYES N/E
30;12;;0;0;0;1;TEST B/E
31;70;148;26;0;0;0;gYES B/E
32;;150;4;1;0;0;SWITCH 7;1=SUPPRESS SPACES
33;5;150;2;1;0;0;SET MR2=MR3;2=RETAIN SPACES
34;;150;10;1;0;0;COLL CONST 2=COLL 3
35;5;150;8;1;0;0;
36;;148;20;0;0;0;SET SWITCH 7=2
37;5;147;32;0;0;0;
38;;148;25;0;0;0;SET SWITCH 8=2
39;5;147;20;0;0;0;
40;80;149;0;0;0;0;PACK UP
41;;150;4;1;0;0;SHIFT COLL CONST 3;STEP MRS AND
42;32;;0;0;0;2-;;SHIFT COLL CONSTS
43;3;150;4;1;0;0;
44;71;147;49;0;0;0;gNOT END
45;;150;12;1;0;0;RESET COLL CONST
46;5;150;4;1;0;0;
47;123;;2;0;0;0;STEP MR3
48;100;150;10;0;0;0;
49;;150;2;1;0;0;SHIFT COLL CONST 2
50;32;;0;0;0;2-;
51;3;150;2;1;0;0;
52;71;147;57;0;0;0;gNOT END
53;;150;12;1;0;0;RESET COLL CONST
54;5;150;2;1;0;0;
55;123;;2;0;0;0;STEP MR2
56;100;150;8;0;0;0;
57;;150;0;1;0;0;SHIFT COLL CONST 1
58;32;;0;0;0;2-;
59;3;150;0;1;0;0;
60;71;147;65;0;0;0;gNOT END
61;;150;12;1;0;0;RESET COLL CONST 1
62;5;150;0;1;0;0;
63;123;;2;0;0;0;STEP MR1
64;100;150;6;0;0;0;
65;10;;0;0;0;0;CLEAR A
66;76;147;12;0;0;0;gNEXT CHARACTER
67;;150;2;1;0;0;SWITCH 7 SETTING 2;DEAL WITH N/E
68;5;150;4;1;0;0;SET MR3=MR2
69;;150;8;1;0;0;COLL CONST 3=COLL CONST 2
70;5;150;10;1;0;0;
71;76;147;40;0;0;0;gPACK UP AND STEP MRS
72;;150;4;1;0;0;SWITCH 6
73;5;150;2;1;0;0;SET MR2=MR3
74;;150;10;1;0;0;COLL CONST 2=COLL CONST 3
75;5;150;8;1;0;0;
76;;147;93;0;0;0;SET SWITCH 7=1
77;5;147;32;0;0;0;
78;76;147;40;0;0;0;gPACK UP AND STEP MRS
79;;147;92;0;0;0;SET SWITCH 6=2;SWITCH 6 SETTING 1
80;5;147;72;0;0;0;
81;;150;4;1;0;0;
82;76;147;73;0;0;0;
83;;147;93;0;0;0;SET SWITCH 6=3;SWITCH 6 SETTING 2
84;5;147;72;0;0;0;
85;;150;2;1;0;0;SET MR3=MR2
86;5;150;4;1;0;0;COLL CONST 3=COLL CONST 2
87;;150;8;1;0;0;
88;5;150;10;1;0;0;
89;76;147;76;0;0;0;gPACK UP AND STEP MRS
90;76;147;67;0;0;0;SWITCH 7 SETTING 2;DUMMY SWITCH
91;76;147;79;0;0;0;SWITCH 6 SETTING 1;SETTINGS
92;76;147;83;0;0;0;SWITCH 6 SETTING 2
93;;150;4;1;0;0;SWITCH 6(7) SETTINGS 3(1)
94;76;149;12;0;0;0;
95;76;148;31;0;0;0;gLEAVE S/R
SHEET;50
PROCR;148;GET RID OF SPACES AND ZEROS CONT
0;;150;4;1;0;0;SWITCH 6
1;5;150;2;1;0;0;SET MR2=MR3
2;;148;24;0;0;0;SET SWITCH 8=1
3;5;147;20;0;0;0;
4;;150;10;1;0;0;COLL CONST 2=COLL
5;5;150;8;1;0;0;CONST 3
6;;148;23;0;0;0;SET SWITCH 7=1
7;5;147;32;0;0;0;
8;76;147;40;0;0;0;gPACK UP AND STEP MRS
9;;148;22;0;0;0;SET SWITCH 6=2;SWITCH 6 SETTING 1
10;5;148;0;0;0;0;
11;;150;4;1;0;0;
12;76;148;1;0;0;0;
13;;148;23;0;0;0;SET SWITCH 6=3;SWITCH 6 SETTING 2
14;5;148;0;0;0;0;
15;;150;2;1;0;0;SET MR3=MR2
16;5;150;4;1;0;0;COLL CONST3=COLL CONST 2
17;;150;8;1;0;0;
18;5;150;10;1;0;0;
19;76;148;6;0;0;0;gPACK UP AND STEP MRS
20;76;147;67;0;0;0;SWITCH 7 SETTING 2;DUMMY SWITCH
21;76;149;9;0;0;0;SWITCH 6 SETTING 1;SETTINGS
22;76;149;13;0;0;0;SWITCH 6 SETTING 2
23;;150;4;1;0;0;SWITCH 6(7) SETTINGS 3(1)
24;70;147;49;0;0;0;SWITCH 8 SETTING 1
25;76;147;21;0;0;0;SWITCH 8 SETTING 2
26;;150;4;1;0;0;SET MR2=MR3
27;5;150;2;1;0;0;COLL CONST 3=COLL CONST 2
28;;150;10;1;0;0;
29;5;150;8;1;0;0;
30;80;149;0;0;0;0;gPACK UP AND STORE S/R
31;32;;0;0;0;10-;
32;124;150;8;0;3;0;
33;114;;0;1;0;0;
34;32;;0;0;0;2-;
35;75;148;32;0;0;0;
36;;153;60;1;0;0;
37;124;150;8;0;3;0;
38;102;;2;1;0;0;
39;82;147;0;0;0;0;
SHEET;51
PROCR;149;PACK CHARACTER S/R
NOTES;RADIX;;0
0;81;149;0;0;0;0;
1;34;150;14;1;0;0;ALIGN CHARACTER
2;10;;0;0;0;pp;WITH COLL CONST 3
3;2;150;2;1;0;0;
4;70;149;8;0;0;0;gALIGNED
5;1;150;2;1;0;0;
6;32;;0;0;0;2;SHIFT CHARACTER 2
7;76;149;3;0;0;0;gTRY AGAIN
8;;150;2;1;0;0;
9;124;150;8;0;3;0;
10;114;;0;1;0;0;
11;82;149;0;0;0;0;gLEAVE S/R
12;;150;4;1;0;0;SET MR2=MR3
13;5;150;2;1;0;0;COLL CONST 3
14;;150;10;1;0;0;=COLL CONST 2
15;5;150;8;1;0;0;
16;80;149;0;0;0;0;gPACK UP AND STORE S/R
17;76;147;95;0;0;0;gLEAVE S/R
SHEET;52
CONST;150;1;S/R CONSTS
0;(D)0;COLLATION CONSTANTS
2;0;
4;0;
6;0;MRS
8;0;
10;0;
12;pp00000000;COLLATION CONST
14;0;
16;;END OF DELETION STORE
18;0;MULTI-RECORD IND STORE
20;0;RECORD LENGTH
22;;EXTRA LINE STORE
24;;
26;0;CONST TYPE
28;0;
SHEET;53
CONST;151;0;
SHEET;54
CONST;152;0;SHORT CONSTANTS OR W/L'S
0;(D)0;BEGINNING OF CONTROL BLOCK
1;0;MODIFIER FOR CD AMEND
2;1;COLLATION CONSTANT
3;10000;
4;1;PHS IND/
5;0;DELETION INDICATOR
6;0;DUMMIES INDICATOR
7;1;INDIC NO
8;1;AMENDT IND
9;0;REASON WORD
10;0;REASON BIT
11;1;TYPE
12;ppppp;CONST
13;1p;COLL CONST
14;0;TEST REQUIRED IN S/R
15;2;
16;0;STEP BACK IND
17;0;PRINTER ROUTE TYPE
18;;STEP LOCN
19;0;PRINTING?
20;0;
21;;LOOKING FOR DUMMIES INDICATOR
22;8004;USED IN OPEN B1 FILE
23;5241;DITTO
24;(D)0;'LOCKOUT' LINE SERIAL
25;0;INDEX IDENTIFIER
SHEET;55
CONST;153;1;LONG CONSTANTS AND W/L'S
0;(D)0;SERIAL NO PRODUCED
2;0;P/T OR NOT INDICATOR
4;0;MR SETTING FOR RTES
6;0;TYPE/SECOND WORD
8;0;STORAGE FOR CONTROL
10;0;
12;0;
14;0;WORD
16;0;
18;;
20;;
22;;
24;;
26;;
28;;
30;;
32;;
34;7.7.7.7.7.;B/E'S
36;1;
38;0;W/L FOR S/R ON *'S
40;7:7:7:7:7:;N/E'S
42;0;STORE FOR 'A' 'B' 'C'
44;0;DURING PROCEDURE
46;0;FOR PROCESSING INDIC
48;7:00000000;CONSTANT CONSTANT
50;0;DELETION STORE
52;7t547e;CONST
54;0;'A'
56;0;'B'
58;0;'C'
60;7.0000007.;
SHEET;56
CONST;154;1;ALPHA CONSTANTS
0;(A)PASSI;
2;     ;
4;AMEND;
6;MENTS;
8; TO P;
10;RODUC;
12;E  RD;
14;FROM ;
16;CONTR;
18;OL WO;
20;00000;
22;(A)CHAPS;
24;(A)PROCR;
26;(A)CONST;
28;(A)TABLE;
30;(A)NOTES;
32;*****;
34;(A)R(D)7:000000;
36;(A)D    ;
38;(A)END  ;
40;PROGM;
42;ppppp;
44;0;W/L
46;0;D STORE
48;(A)09000;
SHEET;57
CONST;155;1;REPORTS
0;(A);
2; ;PROG SERIAL
4;(A)08004;
6; INDI;
8;CATOR;
10; WRON;
12;G    ;
14;     ;SERIAL NO
16;(D)0000005.5.;
18;(A)08004;'NO DUMMY' REPORT
20; NO D;
22;UMMY ;
24;     ;SERIAL NO
26;(D)0000005.5.;
SHEET;58
TABLE;156;1;
NOTES;;;
0;154;4;0;0;2;0;5;0;0;0;0;0;0;AMENDMENTS
2;154;6;0;0;2;0;5;0;0;0;0;0;0;
4;154;8;0;0;2;0;5;0;0;0;0;0;0;TO
6;154;10;0;0;2;0;5;0;0;0;0;0;0;PRODUCE
8;154;12;0;0;2;0;2;0;0;0;0;0;0;
10;155;0;0;0;0;0;5;0;1;0;0;0;0;ID
12;153;0;0;0;0;0;5;0;1;4;0;0;0;SER
14;154;14;0;0;2;0;5;0;1;0;0;0;0;FROM
16;155;0;0;0;0;0;5;0;1;0;0;0;0;ID
18;155;2;0;0;0;0;5;0;1;4;0;0;0;SER
20;153;60;0;0;2;0;5;0;3;0;0;0;1;BEW
22;154;16;0;0;2;0;5;0;0;0;0;0;0;CONTROL
24;154;18;0;0;2;0;5;0;0;0;0;0;0;WORD
26;154;12;0;0;2;0;2;3;0;0;0;0;0;
28;153;60;0;0;2;0;5;0;3;0;0;0;1;BEW
SHEET;59
TABLE;157;1;
NOTES;;;
0;154;2;0;0;2;0;5;0;0;0;0;0;0;FUNCTION WORD
2;154;4;0;0;2;0;5;0;0;0;0;0;0;AMENDMENTS
4;153;40;0;0;2;0;1;1;0;0;0;0;0;N/E
6;155;0;0;0;0;0;3;0;0;0;0;0;0;SUITE NO
8;153;40;0;0;2;0;1;1;0;0;0;0;0;N/E
10;155;0;0;0;0;0;2;3;0;0;0;0;0;JOB NO
12;153;40;0;0;2;0;1;1;0;0;0;0;0;N/E
14;155;0;0;0;0;0;5;0;0;0;0;0;0;OLD SER NO
16;153;40;0;0;2;0;2;1;0;0;0;0;0;N/E N/E
18;152;15;0;0;0;0;1;4;0;0;0;0;0;2
20;153;40;0;0;2;0;1;1;0;0;0;0;0;N/E
22;153;0;0;0;0;0;3;0;0;0;0;0;0;NEW SER
24;153;60;0;0;2;0;5;0;0;0;0;0;1;B/E
SHEET;60
TABLE;158;4;UNPACK CONTROL DATA
NOTES;;;
0;153;6;0;0;0;0;0;0;0;0;0;0;0;TYPE
2;153;7;0;0;0;0;0;0;0;0;0;0;1;SECOND WORD
4;41;0;0;0;0;1;0;0;0;0;0;0;1;TYPE 2 P/T I/P
6;41;320;0;0;2;1;0;0;0;0;0;0;1;UNPACK STARRY NOTES
8;41;50;0;0;0;1;0;0;0;0;0;0;1;UNPACK TYPE 4
SHEET;61
TABLE;159;3;
0;153;6;0;0;0;0;5;0;0;0;0;0;0;
2;153;7;0;0;0;0;5;0;0;0;0;0;1;
4;41;0;0;0;0;0;5;0;0;0;0;0;0;
6;41;1;0;0;0;0;5;0;0;0;0;0;0;1
8;41;2;0;0;0;0;5;0;0;0;0;0;0;2
10;41;3;0;0;0;0;5;0;0;0;0;0;0;3
12;41;4;0;0;0;0;5;0;0;0;0;0;0;4
14;41;5;0;0;0;0;5;0;0;0;0;0;0;5
16;41;6;0;0;0;0;5;0;0;0;0;0;0;6
18;41;7;0;0;0;0;5;0;0;0;0;0;0;7
20;41;8;0;0;0;0;5;0;0;0;0;0;0;8
22;41;9;0;0;0;0;5;0;0;0;0;0;0;9
24;41;10;0;0;0;0;5;0;0;0;0;0;1;10
26;41;50;0;0;0;0;5;0;0;0;0;0;0;ROUTES
28;41;51;0;0;0;0;5;0;0;0;0;0;0;0
30;41;52;0;0;0;0;5;0;0;0;0;0;0;1
32;41;53;0;0;0;0;5;0;0;0;0;0;0;2
34;41;54;0;0;0;0;5;0;0;0;0;0;0;3
36;41;55;0;0;0;0;5;0;0;0;0;0;0;4
38;41;56;0;0;0;0;5;0;0;0;0;0;0;5
40;41;57;0;0;0;0;5;0;0;0;0;0;0;6
42;41;58;0;0;0;0;5;0;0;0;0;0;1;7
SHEET;62
TABLE;160;2;CONDENSE REPLACEMENTS
NOTES;;;
0;41;2;41;8;2;0;0;0;0;0;0;0;1;REPLACE SECT DESC
2;41;2;41;8;2;0;0;0;0;0;0;0;0;
4;41;14;0;0;2;0;0;0;0;0;0;0;1;REPLACE PROCR
SHEET;63
TABLE;161;1;EDIT TABLE ENTRY
NOTES;;;
0;41;10;0;0;2;0;2;0;0;0;0;0;0;S/L ALPHA
2;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
4;41;10;0;0;2;0;3;2;0;0;0;0;0;S/BE
6;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
8;41;12;0;0;2;0;2;0;0;0;0;0;0;NO
10;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
12;41;12;0;0;2;0;3;2;0;0;0;0;0;DISC
14;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
16;41;14;0;0;2;0;2;0;0;0;0;0;0;SPACES
18;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
20;41;14;0;0;2;0;3;2;0;0;0;0;0;ZERO
22;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
24;41;16;0;0;2;0;1;0;0;0;0;0;0;SIGN
26;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
28;41;16;0;0;2;0;2;1;0;0;0;0;0;STERLING
30;153;40;0;0;2;0;1;0;0;0;0;0;0;N/E
32;41;16;0;0;2;0;2;3;0;0;0;0;0;L/T/E
34;153;40;0;0;2;0;1;0;1;0;0;0;1;N/E
SHEET;64
TABLE;162;1;EDIT ROUTE TABLE
NOTES;;;
0;153;42;0;0;0;0;5;0;0;5;0;0;0;NEW RTE TYPE
2;153;48;0;0;0;0;5;0;0;0;0;0;1;SPACES
SHEET;65
TABLE;163;3;PROCEDURE ENTRIES
0;40;6;0;0;2;0;5;0;0;0;0;0;0;SERIAL
2;40;8;0;0;2;0;5;0;0;0;0;0;0;A
4;40;10;0;0;2;0;5;0;0;0;0;0;0;R
6;40;12;0;0;2;0;5;0;0;0;0;0;0;I
8;40;14;0;0;2;0;5;0;0;0;0;0;0;D,M
10;40;16;0;0;2;0;5;0;0;0;0;0;0;L
12;40;18;0;0;2;0;5;0;0;0;0;0;0;L
14;40;20;0;0;2;0;5;0;0;0;0;0;0;CLEO
16;40;22;0;0;2;0;5;0;0;0;0;0;0;PREV REF
18;40;48;0;0;2;0;5;0;0;0;0;0;0;PASS 1 REPORTS
20;40;32;0;0;2;0;5;0;0;0;0;0;0;NOTES
22;40;34;0;0;2;0;5;0;0;0;0;0;0;
24;40;36;0;0;2;0;5;0;0;0;0;0;0;
26;40;38;0;0;2;0;5;0;0;0;0;0;0;
28;40;40;0;0;2;0;5;0;0;0;0;0;0;COMMENTARY
30;40;42;0;0;2;0;5;0;0;0;0;0;0;
32;40;44;0;0;2;0;5;0;0;0;0;0;0;
34;40;46;0;0;2;0;5;0;0;0;0;0;1;
SHEET;66
TABLE;164;3;TABLE ENTRIES
0;40;6;0;0;2;0;5;0;0;0;0;0;0;SERIAL
2;40;8;0;0;2;0;5;0;0;0;0;0;0;A
4;40;10;0;0;2;0;5;0;0;0;0;0;0;R
6;40;12;0;0;2;0;5;0;0;0;0;0;0;I
8;40;14;0;0;2;0;5;0;0;0;0;0;0;D,M
10;40;16;0;0;2;0;5;0;0;0;0;0;0;R
12;40;18;0;0;2;0;5;0;0;0;0;0;0;1
14;40;20;0;0;2;0;5;0;0;0;0;0;0;R
16;40;22;0;0;2;0;5;0;0;0;0;0;0;1
18;40;48;0;0;2;0;5;0;0;0;0;0;0;S/L,S/BE
20;40;32;0;0;2;0;5;0;0;0;0;0;0;NO/DISC
22;40;34;0;0;2;0;5;0;0;0;0;0;0;SP/ZEROS
24;40;36;0;0;2;0;5;0;0;0;0;0;0;SGN/p/LTE
26;40;38;0;0;2;0;5;0;0;0;0;0;0;PASS 1 REPORTS
28;40;40;0;0;2;0;5;0;0;0;0;0;0;NOTES
30;40;42;0;0;2;0;5;0;0;0;0;0;0;
32;40;44;0;0;2;0;5;0;0;0;0;0;0;
34;40;46;0;0;2;0;5;0;0;0;0;0;1;
SHEET;67
TABLE;165;3;CONSTANT ENTRIES
0;40;6;0;0;2;0;5;0;0;0;0;0;0;SERIAL
2;40;8;0;0;2;0;5;0;0;0;0;0;0;END
4;40;12;0;0;2;0;5;0;0;0;0;0;0;CONSTANT
6;40;14;0;0;2;0;5;0;0;0;0;0;0;
8;40;16;0;0;2;0;5;0;0;0;0;0;0;
10;40;18;0;0;2;0;5;0;0;0;0;0;0;
12;40;20;0;0;2;0;5;0;0;0;0;0;0;
14;40;22;0;0;2;0;5;0;0;0;0;0;0;
16;40;24;0;0;2;0;5;0;0;0;0;0;0;
18;40;26;0;0;2;0;5;0;0;0;0;0;0;
20;40;28;0;0;2;0;5;0;0;0;0;0;0;
22;40;48;0;0;2;0;5;0;0;0;0;0;0;PASS 1 REPORTS
24;40;32;0;0;2;0;5;0;0;0;0;0;0;ANNOTATION
26;40;34;0;0;2;0;5;0;0;0;0;0;0;
28;40;36;0;0;2;0;5;0;0;0;0;0;0;
30;40;38;0;0;2;0;5;0;0;0;0;0;0;
32;40;40;0;0;2;0;5;0;0;0;0;0;0;
34;40;42;0;0;2;0;5;0;0;0;0;0;0;
36;40;44;0;0;2;0;5;0;0;0;0;0;0;
38;40;46;0;0;2;0;5;0;0;0;0;0;1;
SHEET;68
PROCR;166;STORE PRINTER AND I/P TYPE,ALLOCATE NEW DEVICE
0;62;;0;0;0;0;
1;125;;4096;1;1;0;
2;123;166;3;0;2;0;
3;100;;0;0;0;0;
4;5;197;40;1;0;0;ORIGINAL(A)
5;5;27;0;1;0;0;CLEAR WL'S
6;5;27;2;1;0;0;
7;5;27;4;1;0;0;
8;5;27;6;1;0;0;
9;5;27;11;0;0;0;
10;5;27;13;0;0;0;
11;118;;10;1;0;0;TEST IPS WANTED
12;105;154;48;1;0;0;
13;70;100;0;0;0;0;gYES
14;54;24;0;0;0;12;
15;54;92;0;0;0;38;
16;123;166;16;0;3;0;
17;30;;0;0;0;4;
18;35;;0;0;0;10000;
19;37;182;2;0;0;0;FORM LINKS
20;37;182;3;0;0;0;
21;37;182;4;0;0;0;
22;94;166;70;0;1;0;/////gREENTRY
23;124;999;5;0;3;0;
24;106;;34;0;0;0;D1
25;30;;0;0;0;4-;
26;5;27;8;1;0;0;INITIAL PRINTER TYPEgCLEAR 'OFFLINE
27;124;999;5;0;3;0;
28;106;;36;0;0;0;B1
29;30;;0;0;0;4-;
30;12;;0;0;0;5;
31;5;152;20;0;0;0;I/P SWITCH
32;10;;0;0;0;1;
33;5;27;10;0;0;0;INPUT TYPE
34;;197;40;2;0;0;
35;70;166;81;0;0;0;gTHINGS OK,EXIT
36;10;;0;0;0;7;RT7
37;80;167;0;0;0;0;
38;70;166;45;0;0;0;gOK
39;10;;0;0;0;8;RT8
40;80;167;0;0;0;0;
41;70;166;45;0;0;0;
42;10;;0;0;0;e;RT11
43;80;167;0;0;0;0;
44;71;168;0;0;0;0;gALARM*10
45;10;;0;0;0;1;
46;5;27;9;0;0;0;
47;96;;0;0;2;0;ALLOC ROUTE
48;12;;0;0;0;40;64
49;3;999;7;0;0;0;
50;31;;0;0;0;1;
51;32;;0;0;0;1-;
52;5;185;0;0;0;0;WL FOR CH
53;33;;0;0;0;3;
54;5;184;0;0;0;0;ROUTE
55;;185;0;0;0;0;CHANNEL
56;80;195;0;0;0;0;gDEC
57;5;197;40;0;0;0;
58;62;;0;0;0;0;
59;;27;9;0;0;0;
60;70;168;7;0;0;0;
61;124;999;5;0;3;0;SP CHAP START
62;124;;32;0;3;0;
63;124;;16;0;3;0;
64;10;;0;0;0;0;START OF REEL CTRS
65;1;999;7;0;0;0;
66;5;194;0;0;0;0;WL
67;124;194;0;0;3;0;
68;102;;0;0;0;0;CLEAR REEL CTR FOR ROUTE
69;76;168;7;0;0;0;
70;96;;0;0;1;0;
71;70;166;75;0;0;0;gPRINTER WANTED;REENTRY
72;;27;9;0;0;0;
73;71;166;81;0;0;0;gMT WANTED AND GOT,EXIT
74;76;166;36;0;0;0;gGET MT
75;;27;9;0;0;0;
76;70;166;81;0;0;0;gPRINTER WANTED AND GOT,EXIT
77;;27;8;0;0;0;INITIAL PRINTER TYPE
78;80;167;0;0;0;0;
79;71;168;0;0;0;0;gALARM*10
80;76;166;46;0;0;0;
81;126;182;2;0;3;0;gTO MAIN PATH
SHEET;69
PROCR;167;ALLOCATE ANOTHER DEVICE
0;81;167;0;0;0;0;
1;5;192;0;0;0;0;
2;90;;0;0;2;64;
3;C;;0;0;0;128;
4;;192;0;0;0;0;
5;124;999;0;0;3;0;
6;105;;0;0;2;0;
7;70;167;19;0;0;0;gMATCH,END
8;94;167;4;0;2;1;
9;;999;9;0;0;0;KNOWN MT ROUTE
10;12;;0;0;0;18;CH3/0
11;73;167;19;0;0;0;gSLOW CHANNEL,END WITHOUT MATCH
12;90;;0;0;2;192;
13;C;;0;0;0;240;
14;124;999;0;0;3;0;TRY FAST CHANNELS
15;106;;0;0;2;0;
16;2;192;0;0;0;0;
17;70;167;19;0;0;0;
18;94;167;14;0;2;1;
19;82;167;0;0;0;0;(A)NONZERO IF NO MATCH
SHEET;70
PROCR;168;ALARM IF CANT FIND REQUIRED DEVICE
0;126;182;3;0;3;0;
1;150;;0;0;0;10;;ALARM*10
2;C;190;56;0;0;0;gUNLOAD
3;C;168;5;0;0;0;gTRY AGAIN
4;C;169;31;0;0;0;gCONTINUE AS YOU ARE
5;;197;40;1;0;0;ORIGINAL(A)
6;76;166;0;0;0;0;
7;124;999;5;0;3;0;
8;106;;34;0;0;0;
9;32;;0;0;0;4-;
10;5;194;0;0;0;0;ROUTE TYPE
11;32;;0;0;0;2;
12;10;;0;0;0;0;(ALT ROUTE)
13;32;;0;0;0;2;
14;5;195;0;0;0;0;ROUTE
15;124;999;5;0;3;0;
16;124;;32;0;3;0;
17;124;;12;0;3;0;START OF ASSEMBLER TABLE
18;101;;0;1;3;0;
19;34;195;0;0;0;0;BITS4-8
20;36;197;86;0;0;0;8XCHANNEL
21;5;167;0;0;0;0;
SHEET;71
PROCR;169;START PASS 0-DEAL WITH INITIAL TRANSLATION
0;124;999;5;0;3;0;
1;124;;32;0;3;0;
2;106;;32;0;0;0;-64 IF FAST MACHINE ZERO OTHERWISE
3;107;169;20;0;0;0;
4;107;169;27;0;0;0;
5;124;167;0;0;3;0;
6;106;;0;0;0;0;LAST ROUTE ON CHANNEL
7;2;195;0;0;0;0;
8;71;169;11;0;0;0;gNOT THIS ONE
9;124;167;0;0;3;0;
10;102;;0;1;0;0;CLEAR DETAILS
11;124;195;0;0;3;0;
12;106;;64;0;0;0;OLD ASL
13;124;999;7;0;3;0;NEW ROUTE
14;102;;64;0;0;0;
15;;194;0;0;0;0;OLD ROUTE TYPE;LOAD NEW ROUTE
16;124;195;0;0;3;0;
17;102;;64;0;0;0;
18;;192;0;0;0;0;NEW ROUTE TYPE
19;30;;0;0;0;2;
20;11;;0;0;0;80;
21;30;;0;0;0;2;
22;1;999;7;0;0;0;NEW ROUTE
23;124;999;5;0;3;0;
24;102;;34;0;0;0;
25;;999;7;0;0;0;
26;30;;0;0;0;2;
27;11;;0;0;0;80;
28;124;999;5;0;3;0;
29;102;;35;0;0;0;
30;126;182;4;0;3;0;
31;52;3;0;0;0;0;
32;C;198;10;0;0;0;
33;154;3;0;0;0;0;
34;62;;0;0;0;0;NORMAL START HERE
35;54;3;0;1;0;2358;ALL SECNS PASS 0
36;76;102;0;0;0;0;gGET AMEND BLOCK
SHEET;72
PROCR;170;START OF AMENDMENT RUN
0;0;5;0;1;0;0;
1;3;197;42;1;0;0;AMDT IND
2;2;197;50;1;0;0;'AMEND'
3;70;170;11;0;0;0;
4;150;;0;0;0;3;;ALARM*03
5;C;190;56;0;0;0;gUNLOAD
6;C;170;7;0;0;0;gREENTER
7;;27;9;0;0;0;
8;11;;0;0;0;900000;
9;91;;0;0;1;0;(END VALUE NONZERO)
10;76;100;3;0;0;0;
11;80;196;0;0;0;0;UNPACK AND CHECK AMEND BLOCK
12;40;A6;0;0;0;0;
13;54;9;4;1;0;50;
14;91;;0;0;3;0;CLEAR R3
15;80;186;0;0;0;0;gWRITE 'AMEND'
16;;7;14;1;0;0;
17;2;153;60;1;0;0;BEW
18;71;170;22;0;0;0;gNOT ISSUE 2,3 OUTPUT
19;5;7;12;1;0;0;
20;5;7;14;1;0;0;
21;5;7;16;1;0;0;
22;;7;16;2;0;0;MULTIRECORD IND
23;3;27;1;0;0;0;
24;3;150;18;1;0;0;
25;71;170;27;0;0;0;
26;83;133;0;0;0;2;SINGLE-REC
27;;7;14;2;0;0;
28;5;27;2;0;0;0;
29;;7;12;2;0;0;
30;3;27;0;0;0;0;
31;70;170;4;0;0;0;g*03
SHEET;73
PROCR;171;DEAL WITH I/P TAPE EX ISSUE 6-AMEND RUN
0;90;;0;0;1;0;
1;C;;0;0;0;46;
2;80;132;0;0;0;0;READ A1g7
3;55;7;4;2;0;46;
4;C;3;0;0;1;0;INDEX 3/0-45
5;94;171;2;0;1;23;
6;;3;45;0;0;0;
7;80;195;0;0;0;0;gDEC
8;30;;0;0;0;2;
9;5;17;21;0;0;0;HIGHEST EFFECTIVE LINE SERIAL
10;62;;0;0;0;0;
11;;3;45;0;0;0;(HIGHEST B/FWD PROCR+1)IN BINARY
12;30;;0;0;0;5;
13;101;;100;1;1;0;CREATE B/FWD OLD-NEW PROCR INDEX
14;91;;0;0;1;0;
15;101;;100;1;3;0;
16;3;6;100-;0;1;0;STORE ONE-FOR-ONE
17;11;;0;0;0;1;
18;94;171;16;0;1;1;
19;;3;45;0;0;0;MAX B/FWD PROCR
20;5;94;45;0;0;0;=PROVIS MAX C/FWD PROCR
21;52;18;0;0;0;0;
22;C;198;0;0;0;0;
23;154;18;0;0;0;0;TYPE'AMEND' COMMENT
SHEET;74
PROCR;172;READ/WRITE MODS UP TO FIRST AMEND DIRECTIVE
0;80;183;0;0;0;0;gREAD/TEST PT
1;70;172;4;0;0;0;gYES
2;80;186;0;0;0;0;gWRITE
3;76;172;0;0;0;0;
4;10;;0;0;0;9999;
5;3;17;10;0;0;0;SET FOR SEQUENCE CHECKS
6;5;17;14;0;0;0;
7;76;173;5;0;0;0;
SHEET;75
PROCR;173;MAIN LOOP
0;80;193;0;0;0;0;gREAD
1;70;181;0;0;0;0;gPT END
2;80;187;0;0;0;0;gUNPACK
3;80;184;0;0;0;0;gSTORE SWITCH, TEST DIRECTIVE
4;71;179;0;0;0;0;gNOT A NEW DIRECTIVE
5;60;;0;0;0;0;
6;;17;10;0;0;0;CHECK SEQUENCE AT NEW DIRECTIVE
7;2;4;2;2;0;0;
8;73;173;13;0;0;0;gOK
9;71;180;0;0;0;0;gREJECT,READ/COPY TO NEXT DIRECTIVE
10;0;17;12;0;0;0;;SAME SERIAL
11;12;;0;0;0;3;
12;71;180;0;0;0;0;gPREVIOUS NOT'T',IGNORE THIS
13;;17;21;0;0;0;MAX B/FWD LINE SERIAL
14;2;4;2;2;0;0;THIS LINE SERIAL
15;72;173;20;0;0;0;gNORMAL?
16;10;;0;0;0;1;
17;5;17;16;1;0;0;SET'PASS 0 DOESNNT LIKE IT'
18;80;188;0;0;0;0;gWRITE A6
19;76;173;16;0;0;0;
20;70;173;16;0;0;0;
21;;4;2;2;0;0;
22;30;;0;0;0;2-;
23;80;194;0;0;0;0;BIN;TEST IF VALUE
24;5;195;0;0;0;0;;DIRECTIVE?
25;124;195;0;0;1;0;EQUIV OF CURRENT PROCR
26;;6;100-;0;0;0;
27;70;180;0;0;0;0;gREJECT,READ/COPY TO NEXT DIRECTIVE
28;85;184;0;0;0;0;
29;C;178;0;0;0;0;R
30;C;174;0;0;0;0;D
31;C;180;0;0;0;0;gREJECT
32;C;180;0;0;0;0;gREJECT
SHEET;76
PROCR;174;DEAL WITH 'DELETE' DIRECTIVE-PREP STAGE
0;80;185;0;0;0;0;gFIND 'PROCR 'LENGTH'
1;5;17;0;0;0;0;0=SHORT, 1=LONG
2;35;;0;0;0;11;
3;36;4;2;2;0;0;
4;12;;0;0;0;1;
5;70;174;10;0;0;0;gDELETION BEGINS AT'NOTES'
6;10;;0;0;0;0;
7;34;17;0;0;0;0;
8;36;4;2;2;0;0;LINE SERIAL
9;71;180;0;0;0;0;gUNACCEPTABLE MOD
10;0;4;2;2;0;0;
11;3;17;14;0;0;0;
12;30;;0;0;0;8;
13;70;174;17;0;0;0;gDELETING PROCR
14;;17;3;0;0;0;CTR OF ADJUST DETAILS
15;101;;900;1;2;0;
16;70;180;0;0;0;0;gLIST FULL,COPY TO NEXT DIRECTIVE
17;80;186;0;0;0;0;gWRITE
18;80;193;0;0;0;0;gREAD
19;70;175;0;0;0;0;gPT AT END, SINGLE LINE DELETE
20;80;187;0;0;0;0;gUNPACK
21;80;184;0;0;0;0;gTEST DIRECTIVE
22;71;176;0;0;0;0;gNO, HENCE MULTIPLE DELETE
SHEET;77
PROCR;175;DEAL WITH SINGLE LINE DELETION
0;0;17;14;0;0;0;
1;3;17;10;0;0;0;FOR SEQUENCE CHECKS
2;30;;0;0;0;8;
3;71;175;6;0;0;0;gNOT DELETING 'PROCR'
4;;17;14;0;0;0;
5;76;176;10;0;0;0;gJOIN UP WITH MULTIPLE DELETION
6;30;;0;0;0;8-;
7;12;;0;0;0;1;
8;70;175;24;0;0;0;gDELETING'NOTES'ONLY
9;10;;0;0;0;0;
10;2;17;0;0;0;0;
11;12;;0;0;0;1;
12;5;17;15;0;0;0;
13;;17;14;0;0;0;
14;32;;0;0;0;2-;
15;5;17;19;0;0;0;PROCR
16;;17;14;0;0;0;
17;2;17;15;0;0;0;-(NEGATIVE ADJUST DETAILS)
18;5;17;14;0;0;0;
19;;17;14;0;0;0;LINE SERIAL+ADJUST DETAIL
20;32;;0;0;0;2-;
21;2;17;19;0;0;0;
22;71;175;24;0;0;0;CARRY INTO NEXT PROCR;DON'T STORE
23;80;192;0;0;0;0;gSTORE SDJUSTMENT
24;0;5;0;1;0;0;
25;30;;0;0;0;4-;
26;30;;0;0;0;4;
27;2;197;54;1;0;0;'END'
28;70;181;0;0;0;0;gPT AT END
29;76;173;5;0;0;0;gTEST NEW DIRECTIVE IN SEQUENCE
SHEET;78
PROCR;176;DEAL WITH MULTIPLE DELETION
0;80;185;0;0;0;0;gFIND PROCR LENGTH
1;5;17;0;0;0;0;
2;34;17;0;0;0;0;
3;36;4;2;2;0;0;LINE SERIAL 'TO'
4;71;180;0;0;0;0;gREJECT AMENDMENT
5;0;17;14;0;0;0;'FROM'
6;2;4;2;2;0;0;'TO'
7;72;180;0;0;0;0;gREJECT,OUT OF SEQUENCE
8;;4;2;2;0;0;'TO'PROCR
9;3;17;10;0;0;0;FOR SEQUENCE CHECKS
10;32;;0;0;0;2-;
11;5;17;15;0;0;0;3-DIGIT'TO'
12;;17;14;0;0;0;'FROM'PROCR
13;32;;0;0;0;2-;'TO'PROCR
14;3;17;19;0;0;0;'3-DIGIT'FROM'
15;2;17;15;0;0;0;
16;71;180;0;0;0;0;
17;32;;0;0;0;2;
18;70;180;0;0;0;0;
19;0;17;14;0;0;0;
20;30;;0;0;0;8;
21;30;;0;0;0;8-;
22;12;;0;0;0;1;
23;70;180;0;0;0;0;gMULTIPLE DELETION BEGINS AT'NOTES',REJE
24;;17;14;0;0;0;'FROM'SERIAL
25;2;4;2;2;0;0;'TO'SERIAL
26;2;17;0;0;0;0;LENGTH
27;12;;0;0;0;1;
28;5;17;15;0;0;0;NEGATIVE ADJUST DETAIL
29;;17;14;0;0;0;
30;2;17;15;0;0;0;-(NEGATIVE ADJUST DETAIL)
31;5;17;14;0;0;0;
32;;17;14;0;0;0;LINE SERIAL+ADJUSTMENT
33;30;;0;0;0;2-;
34;2;17;19;0;0;0;PREVIOUS PROCR
35;71;176;37;0;0;0;gCARRY INTO PROCR,DON’T STORE
36;80;192;0;0;0;0;gSTORE ADJUSTMENT
37;80;186;0;0;0;0;gWRITE
38;76;173;0;0;0;0;gREAD NEXT BLOCK
SHEET;79
PROCR;177;DELETE MANY PROCEDURES
SHEET;80
PROCR;178;'R'DIRECTIVES AND'A'DIRECTIVES
0;35;;0;0;0;11;;DIRECTIVE LINE'R'
1;10;;0;0;0;0;
2;36;4;2;2;0;0;
3;70;180;0;0;0;0;
4;80;185;0;0;0;0;gFIND'LENGTH'
5;5;17;0;0;0;0;
6;35;;0;0;0;11;
7;36;4;2;2;0;0;LINE SERIAL
8;12;;0;0;0;1;
9;70;180;0;0;0;0;
10;10;;0;0;0;0;
11;34;17;0;0;0;0;
12;36;4;2;2;0;0;
13;71;180;0;0;0;0;gUNACCEPTABLE
14;;4;2;2;0;0;
15;3;17;14;0;0;0;
16;3;17;10;0;0;0;
17;32;;0;0;0;2-;
18;5;17;19;0;0;0;
19;80;186;0;0;0;0;WRITE
20;80;183;0;0;0;0;gREAD/TEST PT
21;70;173;5;0;0;0;gYES
SHEET;81
PROCR;179;DEAL WITH NON-DIRECTIVE LINE
0;85;184;0;0;0;0;
1;C;179;5;0;0;0;R
2;C;180;0;0;0;0;
3;C;180;0;0;0;0;
4;C;180;0;0;0;0;
5;60;;0;0;0;0;
6;;17;0;0;0;0;CURRENT LENGTH
7;11;;0;0;0;1;
8;4;17;10;0;0;0;STEP SEQ CTR
9;;17;10;0;0;0;
10;32;;0;0;0;2-;
11;2;17;19;0;0;0;PROCR OF R OR A-DIRECTIVE
12;71;179;23;0;0;0;gNOT STILL IN SAME PROCR
13;;4;6;1;0;0;
14;2;197;44;1;0;0;'PROCR'
15;70;180;0;0;0;0;
16;;4;6;1;0;0;
17;2;197;46;1;0;0;'TABLE
18;70;180;0;0;0;0;gUNACCEPTABLE
19;;4;6;1;0;0;
20;2;197;48;1;0;0;'CONST'
21;70;180;0;0;0;0;gUNACCEPTABLE
22;76;176;37;0;0;0;
23;10;;0;0;0;1-;
24;2;17;0;0;0;0;
25;4;17;10;0;0;0;STEP BACK SEQ CTR SO NEVER ALTERS
26;76;180;0;0;0;0;gREAD/COPY TO NEXT DIRECTIVE
SHEET;82
PROCR;180;DEAL WITH INSERTIONS
0;10;;0;0;0;1;SET IND'PASS 0 DOESN’T LIKE IT'
1;5;17;16;1;0;0;
2;80;188;0;0;0;0;READ/WRITE TO NEXT DIRECTIVE
3;76;173;5;0;0;0;
SHEET;83
PROCR;181;CONSTRUCT C/FWD PROCR LENGTH INDEX
0;62;;0;0;0;0;
1;101;;25;1;3;0;
2;104;152;20;0;0;0;
3;118;;5;0;1;0;
4;104;999;8;0;0;0;
5;125;;4096;1;1;0;
6;124;999;0;0;3;0;
7;123;;160;0;2;0;
8;55;3;0;0;0;45;COPY
9;C;94;0;0;0;0;
10;76;182;4;0;0;0;
SHEET;84
PROCR;182;END OF PASS 0
0;85;184;0;0;0;0;3 ORDER CONSTS
1;C;169;34;0;0;0;
2;C;168;1;0;0;0;
3;C;169;31;0;0;0;
4;90;;0;0;1;0;
5;C;;0;0;0;450;
6;90;;0;0;2;0;
7;C;;0;0;0;900;
8;10;;0;0;0;0;
9;35;;0;0;0;1111;
10;36;6;1;0;2;0;
11;31;;0;0;0;10;
12;36;6;0;0;2;0;
13;5;22;0;0;1;0;
14;94;;0;0;1;1;
15;94;182;10;0;2;2;
16;76;182;20;0;0;0;
17;62;;0;0;0;0;SET BIN
18;10;;0;0;0;1;
19;4;94;45;0;0;0;
20;80;186;0;0;0;0;gWRITE END SIGN
21;62;;0;0;0;0;
22;45;A6;0;0;0;0;
23;55;22;0;0;0;1110;
24;C;18;0;0;0;0;
25;55;22;1110;0;0;240;
26;C;25;0;0;0;0;
27;55;94;0;0;0;46;
28;C;18;1110;0;0;0;
29;90;;0;0;1;0;
30;C;;0;0;0;20;
31;80;143;0;0;0;0;gBLANKS
32;94;182;31;0;1;1;
33;91;;0;0;1;0;CLEAR R1
34;46;A1;10;0;0;1;RUN BACK TO START
35;C;152;25;0;0;0;OF PASI
36;76;101;0;0;0;0;gCALL PASS 1
SHEET;85
PROCR;183;READ,TEST NEXT PT BLOCK
0;81;183;0;0;0;0;
1;80;193;0;0;0;0;gREAD PT
2;70;181;0;0;0;0;g'END'
3;80;187;0;0;0;0;gUNPACK
4;80;184;0;0;0;0;gTEST DIRECTIVE
5;82;183;0;0;0;0;
SHEET;86
PROCR;184;TEST DIRECTIVE
0;81;184;0;0;0;0;
1;60;;0;0;0;0;
2;34;4;4;1;0;0;
3;10;;0;0;0;0;
4;32;;0;0;0;2;
5;12;;0;0;0;69;
6;70;184;16;0;0;0;gR
7;11;;0;0;0;15;
8;70;184;15;0;0;0;gD
9;12;;0;0;0;19;
10;70;184;14;0;0;0;gT
11;11;;0;0;0;22;
12;71;184;22;0;0;0;gNO DIRECTIVE
13;10;;0;0;0;1;A=4
14;11;;0;0;0;1;T=3
15;11;;0;0;0;1;D=2
16;11;;0;0;0;1;R=1
17;5;185;0;0;0;0;
18;86;184;0;0;0;0;
19;5;17;12;0;0;0;STORE PREVIOUS SETTING
20;84;184;0;0;0;0;
21;C;185;0;0;0;0;(A)ZERO DIRECTIVE FOUND
22;82;184;0;0;0;0;(A)NON-ZERO,NO DIRECTIVE FOUND
SHEET;87
PROCR;185;FIND 'LENGTH'
0;81;185;0;0;0;0;
1;;4;2;2;0;0;LINE SERIAL OF AMENDMENT
2;30;;0;0;0;2-;
3;80;194;0;0;0;0;CONVERT TO BIN
4;101;;100;1;2;0;
5;19;;0;0;0;14;DIVIDE BY 20
6;5;197;40;0;0;0;
7;32;;0;0;0;9;
8;5;197;41;0;0;0;
9;34;197;0;0;0;0;1
10;124;197;41;0;1;0;
11;33;;0;0;0;0;/////
12;124;197;40;0;1;0;
13;36;3;0;0;0;0;
14;70;185;16;0;0;0;gSHORT
15;10;;0;0;0;1;
16;60;;0;0;0;0;
17;82;185;0;0;0;0;(A)=ZERO OR ONE
SHEET;88
PROCR;186;WRITEgA6 FROM SEC 9
0;81;186;0;0;0;0;
1;80;189;0;0;0;0;REPLACE 'BE' BY 'LE'
2;;153;60;1;0;0;BEW
3;5;9;52;1;0;0;
4;;17;16;1;0;0;IND'PASS 0 DIDN'T LIKE IT' NON-ZERO
5;5;9;50;1;0;0;
6;43;A6;0;0;0;0;
7;C;9;0;0;0;0;
8;54;9;4;1;0;50;
9;5;17;16;1;0;0;CLEAR IND
10;82;186;0;0;0;0;
SHEET;89
PROCR;187;UNPACK POSSIBLE DIRECTIVE BLOCK
0;81;187;0;0;0;0;
1;10;;0;0;0;0;
2;5;4;4;1;0;0;WL FOR AMEND DIRECTIVE LETTER
3;5;4;16;1;0;0;
4;51;5;0;0;0;0;
5;C;199;0;0;0;0;
6;82;187;0;0;0;0;
SHEET;90
PROCR;188;O/P WHEN MOD NOT ACCEPTED
0;81;188;0;0;0;0;
1;80;186;0;0;0;0;gO/P TO A6
2;80;183;0;0;0;0;gREAD/TEST PT
3;71;188;1;0;0;0;gNOT YET
4;82;188;0;0;0;0;NEXT DIRECTIVE FOUNDg
SHEET;91
PROCR;189;REPLACE BE CHAR BY LE CHAR IN SEC 5
0;81;189;0;0;0;0;
1;90;;0;0;1;0;
2;C;;0;0;0;56;
3;90;;0;0;2;8;
4;C;;0;0;0;2-;
5;34;5;0;1;1;0;
6;10;;0;0;0;0;
7;32;;0;0;0;2;
8;12;;0;0;0;7.;
9;70;189;14;0;0;0;gBE FOUND
10;94;189;6;0;2;2-;gGET NEXT CHAR
11;;5;0;1;1;0;COPY TO O/P SECTION
12;5;9;4;1;1;0;
13;94;189;3;0;1;2;gGET NEXT WORD
14;96;;0;0;2;0;
15;5;190;0;0;0;0;
16;35;;0;0;0;11;
17;10;;0;0;0;5.;
18;124;190;0;0;1;0;
19;32;;0;0;0;0;/////
20;3;5;0;1;1;0;REPLACE BEW BY LE IN 1ST CHAR
21;5;9;4;1;1;0;
22;100;17;22;1;0;0;
23;62;;0;0;0;0;
24;96;;0;0;1;0;
25;11;;0;0;0;4;
26;30;;0;0;0;3;gQ4,5
27;5;9;48;2;0;0;
28;35;;0;0;0;11;COLUMN POSITION
29;36;190;0;0;0;0;
30;37;9;48;2;0;0;
31;100;17;26;0;3;0;
32;82;189;0;0;0;0;
SHEET;92
PROCR;190;GET TO START OF AMENDED PROGRAM
0;81;190;0;0;0;0;
1;80;132;0;0;0;0;READ A1g7
2;62;;0;0;0;0;
3;;7;4;1;0;0;
4;2;197;58;1;0;0;'FINIS'
5;70;190;46;0;0;0;gALARM*02
6;;7;8;2;0;0;
7;12;;0;0;0;ppppp;
8;71;190;1;0;0;0;
9;;7;10;1;0;0;
10;2;197;52;1;0;0;'PASS I'
11;70;190;37;0;0;0;
12;;7;6;1;0;0;
13;2;197;56;1;0;0;'INDEX';USE'INDEX'DATA TO
14;71;190;1;0;0;0;gNO;SEE IF PROGM ON TAPE
15;80;132;0;0;0;0;READ A1g7
16;90;;0;0;1;0;
17;C;;0;0;0;48;
18;;7;4;2;1;0;PROG ID
19;2;197;18;0;0;0;ppppp
20;71;190;24;0;0;0;gNOT END SIGN
21;;197;82;0;0;0;
22;70;190;1;0;0;0;gINTERCODE FOUND,READTO'PASSI'
23;76;190;46;0;0;0;gALARM*02
24;1;197;18;0;0;0;
25;12;;0;0;0;9002;GO EVEN FASTER MASTER ROUTINE
26;71;190;35;0;0;0;gNOT
27;;7;8;2;1;0;
28;70;190;32;0;0;0;gINTERCODE
29;;7;10;2;1;0;IDENTIFIER
30;84;645;0;0;0;0;
31;76;190;35;0;0;0;
32;5;197;82;0;0;0;SET'PROGRAM TAPE'
33;;7;10;2;1;0;STORE INDEX
34;5;152;25;0;0;0;IDENTIFIER
35;94;190;18;0;1;8;
36;76;190;15;0;0;0;gNEXT BLOCK
37;60;;0;0;0;0;SET DEC
38;;7;4;2;0;0;
39;12;;0;0;0;9002;;GEFM
40;71;190;1;0;0;0;gNO
41;10;;0;0;0;9002;;GEFM
42;5;40;4;2;0;0;
43;;7;6;2;0;0;
44;5;40;6;2;0;0;
45;82;190;0;0;0;0;MATCH FOUND
46;41;A1;0;0;0;1;
47;10;;0;0;0;1;
48;5;197;82;0;0;0;
49;84;645;0;0;0;0;CLEAR
50;150;;0;0;0;2;;ALARM  *02
51;C;190;56;0;0;0;gUNLOAD
52;C;190;54;0;0;0;gTRY NEW INPUT TAPE
53;C;170;7;0;0;0;gREENTER
54;80;191;0;0;0;0;gOPEN A1
55;76;190;1;0;0;0;gTRY AGAIN
56;151;;0;0;0;0;
SHEET;93
PROCR;191;OPEN A1
0;81;191;0;0;0;0;
1;40;A1;0;0;0;1;
2;82;191;0;0;0;0;
SHEET;94
PROCR;192;STORE ADJUST DETAIL
0;81;192;0;0;0;0;
1;;17;3;0;0;0;
2;101;;900;1;2;0;
3;72;192;26;0;0;0;gTOO MANY SPACES
4;10;;0;0;0;0;
5;35;;0;0;0;11;
6;36;17;14;0;0;0;
7;5;190;0;0;0;0;ITEM
8;;17;14;0;0;0;
9;30;;0;0;0;2-;
10;80;194;0;0;0;0;
11;5;193;0;0;0;0;BIN REF
12;124;193;0;0;1;0;
13;;6;100-;0;0;0;UPDATED REF
14;80;195;0;0;0;0;gTO DEC
15;30;;0;0;0;2;
16;1;190;0;0;0;0;
17;124;17;3;0;1;0;
18;5;19;0;0;0;0;LOCN OF ADJUSTMENT
19;0;17;15;0;0;0;
20;124;17;3;0;1;0;
21;5;19;1;0;0;0;QUANTITY
22;62;;0;0;0;0;
23;10;;0;0;0;2;
24;4;17;3;0;0;0;STEP CTR
25;60;;0;0;0;0;
26;82;192;0;0;0;0;
SHEET;95
PROCR;193;SR TO READ PT AND TEST END
0;81;193;0;0;0;0;
1;100;17;22;1;0;0;
2;62;;0;0;0;0;BIN
3;82;139;0;0;0;0;gFETCH
4;100;17;22;1;1;0;
5;0;5;0;1;0;0;
6;30;;0;0;0;4-;
7;30;;0;0;0;4;
8;2;197;54;1;0;0;'END  '
9;82;193;0;0;0;0;(A)=0 IF END
SHEET;96
PROCR;194;CONVERT TO BIN
0;81;194;0;0;0;0;
1;5;197;40;1;0;0;
2;62;;0;0;0;0;
3;124;197;20;0;2;0;
4;112;197;40;1;0;0;
5;82;194;0;0;0;0;
SHEET;97
PROCR;195;CONVERT TO DEC
0;81;195;0;0;0;0;
1;5;197;40;1;0;0;
2;60;;0;0;0;0;
3;124;197;0;0;2;0;
4;112;197;40;1;0;0;
5;82;195;0;0;0;0;
SHEET;98
PROCR;196;UNPACK AMEND HEADING, GET TO PROGM START
0;81;196;0;0;0;0;
1;51;5;0;0;0;0;
2;C;199;8;0;0;0;
3;;4;2;0;0;0;SUITE
4;30;;0;0;0;2;
5;1;4;3;0;0;0;JOB
6;3;4;2;0;0;0;
7;5;17;28;0;0;0;PROG ID
8;;4;4;0;0;0;PROG
9;5;17;29;0;0;0;
10;82;196;0;0;0;0;
SHEET;99
CONST;197;1;CONVERT TABLES
0;(D)1;BINgDEC
2;16;
4;256;
6;4096;
8;65536;
10;1048576;
12;16777216;
14;268435456;
16;4294967296;
18;pppppppppp;
20;1;DECgBIN
22;t;
24;64;
26;3.8;
28;2710;
30;186t0;
32;p4240;
34;989680;
36;5p5.100;
38;3e9t+t00;
40;0;WL(A)
42;(A)PROGM;
44;(A)PROCR;
46;(A)TABLE;
48;(A)CONST;
50;AMEND;
52;(A)PASSI;
54;(A)END  ;
56;(A)INDEX;
58;FINIS;
60;(D)0000005.5.;DOUBLE LINE END
62;(D)3pp;BITS1-10
64;(D)6p6p6p6p6p;
66;(A)INDEX;
68;ppppp;
70;2;
72;CHAIN;
74;FIEND;
76;08004;
78;ALLOC;
80;ATED ;
82;EXTRA;
84;ROUTE;
86;(D)p8;BITS 4-8
88;(D)0514908000;
SHEET;100
TABLE;198;1;TYPE'AMEND'COMMENT
0;197;76;0;0;2;0;5;0;0;0;0;0;0;'08000'
2;197;50;0;0;2;0;5;0;2;0;0;0;0;'AMEND'
4;4;2;0;0;0;0;5;0;2;0;0;0;0;PROG NO
6;4;4;0;0;0;0;5;0;1;4;0;0;0;SERIAL NO
8;197;60;0;0;2;0;2;3;3;0;0;0;1;DOUBLE LINE END
10;197;76;0;0;2;0;5;0;0;0;0;0;0;'08000'
12;197;78;0;0;2;0;5;0;1;0;0;0;0;'ALLOC'
14;197;80;0;0;2;0;5;0;0;0;0;0;0;'ATED'
16;197;82;0;0;2;0;5;0;0;0;0;0;0;'EXTRA'
18;197;84;0;0;2;0;5;0;1;0;0;0;0;'ROUTE'
20;197;40;0;0;0;0;2;3;2;1;0;0;0;CHANNEL
22;184;0;0;0;0;0;1;4;0;0;0;0;0;ROUTE
24;197;60;0;0;2;0;2;3;1;0;0;0;1;DOUBLE LE
SHEET;101
TABLE;199;3;UNPACK PT OR CARD INPUT
0;4;2;0;0;2;0;5;0;0;0;0;0;0;SER+AMEND DIRECTIVE
2;4;6;0;0;2;0;5;0;0;0;0;0;0;DIRECTIVE WORD
4;4;8;0;0;1;0;3;0;0;0;0;0;0;PROCR NUMBER
6;4;16;0;0;0;0;1;0;0;0;0;0;1;/////TYPE OR(ANNOTATION+TYPE)
8;4;6;0;0;2;0;5;0;0;0;0;0;0;'AMEND'
10;4;2;0;0;0;0;3;0;0;0;0;0;0;SUITE
12;4;3;0;0;0;0;2;0;0;0;0;0;0;JOB
14;4;4;0;0;0;0;5;0;0;0;0;0;1;SERIAL
16;4;2;0;0;2;0;5;0;0;0;0;0;0;SERIAL
18;4;4;0;0;2;0;5;0;0;0;0;0;0;DIRECTIVE LETTER
20;4;6;0;0;2;0;5;0;0;0;0;0;0;DIRECTIVE WORD
22;4;8;0;0;1;0;3;0;0;0;0;0;0;PROCR NUMBER
24;4;16;0;0;0;0;1;0;0;0;0;0;1;TYPE
SHEET;102
PROCR;200;START OF PASS1
NOTES;;;TEST DID THE COMPILER READ IN THE TRANSLATOR
0;152;200;2;0;0;0;CALL/ENTER PASS 2
1;C;326;4;0;0;0;(OVERLAY THE OLAY ORDER)
2;62;;0;0;0;0;
3;101;;512;0;1;0;Q10
4;33;;0;0;0;3;
5;10;;0;0;0;0;
6;37;312;6;1;0;0;CLEAR BIT 40
7;37;312;12;1;0;0;DO.
8;;325;4;0;0;0;
9;3;23;46;0;0;0;SET 'PRINT PASS 2'
10;5;325;1;0;0;0;
11;54;1;0;1;0;46;
12;54;72;0;1;0;738;ALL SECNS PASS 2
13;83;100;3;0;0;1;SET 'PRINT PASS 3'
14;5;27;6;0;0;0;CLEAR 'PT OMITTED'
15;84;403;0;0;0;0;
16;84;407;0;0;0;0;
17;5;27;4;0;0;0;
18;83;254;0;0;0;5;AMEND DIRECTIVE SWITCH
SHEET;103
PROCR;201;TEST INITIAL RUN
NOTES;RADIX;;
0;40;A6;0;0;0;1;
1;54;12;0;1;0;120;
2;10;;0;0;0;6700;
3;5;12;3;0;0;0;ERROR LETTER'P'
4;80;292;0;0;0;0;gREAD FIRST BLOCK
5;124;213;0;0;2;0;
6;80;325;0;0;0;0;gUNPACK BLOCK
7;60;;0;0;0;0;
8;10;;0;0;0;0;CLEAR A
9;5;1;16;1;0;0;CLEAR FOR INDS
10;5;1;18;1;0;0;
11;124;213;10;0;2;0;
12;80;325;0;0;0;0;gUNPACK 'AMEND' BLOCK AGAIN
13;10;;0;0;0;0;
14;34;1;16;0;0;0;PRINT INDS
15;36;317;0;0;0;0;BIT 2
16;5;23;46;0;0;0;
17;;1;20;1;0;0;
18;12;;0;0;0;7300000000;
19;71;201;22;0;0;0;
20;10;;0;0;0;2;
21;76;201;23;0;0;0;
22;10;;0;0;0;0;
23;5;27;12;0;0;0;0/2=PTS NO/YES
24;10;;0;0;0;2-;
25;36;319;0;0;0;0;BIT 1
26;84;100;3;0;0;0;SET AT 1 OR 2
27;0;1;17;0;0;0;CHANGE TO ISSUE?
28;5;227;0;0;0;0;SR LINK
29;0;1;4;0;0;0;SUITE
30;30;;0;0;0;2;
31;1;1;6;0;0;0;
32;5;12;0;0;0;0;
33;34;1;8;1;0;0;
34;80;320;0;0;0;0;RIGHT ALIGN;PROGRAM SERIAL
35;0;12;88;2;0;0;
36;5;12;1;0;0;0;
37;10;;0;0;0;1;SET'AMEND RUN'
38;3;92;30;0;0;0;
39;5;12;8;0;0;0;
SHEET;104
PROCR;202;
NOTES;RADIX;;
0;80;292;0;0;0;0;gREAD A6
1;54;1;0;0;0;46;
2;80;291;0;0;0;0;gREAD MT
3;0;7;6;1;0;0;
4;2;215;10;1;0;0;'PROGM'
5;71;202;2;0;0;0;gGET TO IT
6;50;7;4;0;0;0;
7;C;210;6;0;0;0;
8;55;7;20;1;0;30;COPY ANNOTATION
9;C;1;16;1;0;0;
10;60;;0;0;0;0;
11;10;;0;0;0;1;AUGMENT PROG SERIAL
12;35;;0;0;0;11;
13;36;1;8;2;0;0;
14;37;1;8;2;0;0;NO CARRY AFTER 99
SHEET;105
PROCR;203;OPEN O/P FILE, WRITE INDEX BLOX+'PASSI' BLOCK+'PROGM' BLOCK
NOTES;;;
0;54;8;4;0;0;46;
1;40;A2;0;0;0;0;OPEN FILE
2;32;;0;0;0;10;
3;84;212;0;0;0;0;SPOOL NUMBERgWL
4;80;289;0;0;0;0;
5;80;289;0;0;0;0;+2 BLANKS
6;55;318;28;1;0;10;
7;C;8;4;1;0;0;
8;80;289;0;0;0;0;
9;;1;4;0;0;0;SUITE
10;30;;0;0;0;2;
11;1;1;6;0;0;0;
12;3;12;32;0;0;0;WL=PROG IDENTITY
13;3;8;4;2;0;0;
14;3;8;12;2;0;0;
15;0;1;8;2;0;0;PROG SERIAL
16;5;12;1;0;0;0;WL;FOR REPORTS LAT
17;0;227;0;0;0;0;NEW ISSUE WL
18;70;203;22;0;0;0;gNO CHANGE
19;30;;0;0;0;2;
20;35;;0;0;0;11100;
21;37;12;1;0;0;0;REPLACE EXISTING ISSUE
22;52;1;8;0;0;0;
23;C;210;4;0;0;0;RESTORE TD 1/8 WITH SIG ZEROS
24;0;1;8;1;0;0;
25;3;8;6;1;0;0;
26;5;8;14;1;0;0;
27;10;;0;0;0;2;INTERCODE IDENTIFIER
28;5;8;10;2;0;0;
29;10;;0;0;0;3;MACHINE COSE IDENTIFIER
30;3;8;18;2;0;0;
31;10;;0;0;0;2;
32;1;27;12;0;0;0;0 OR 2
33;5;8;16;2;0;0;
34;;318;28;2;0;0;ppppp
35;5;8;20;2;0;0;
36;80;289;0;0;0;0;
37;;12;32;0;0;0;
38;5;8;4;2;0;0;PROG IDENTITY
39;;1;8;1;0;0;
40;5;8;6;1;0;0;PROG SERIAL
41;10;;0;0;0;ppppp;
42;5;8;8;2;0;0;
43;;215;18;1;0;0;'PASSI'
44;5;8;10;1;0;0;
45;155;;0;0;0;0;PROG SERIAL
46;3;8;12;1;0;0;'ISSUE 6'IND
47;5;8;16;2;0;0;SET'MULTI-RECORD'
48;80;289;0;0;0;0;
49;;18;1155;0;0;0;
50;5;318;21;0;0;0;
51;55;18;1110;0;0;23;1ST PROCR LENGTH BLOCK
52;C;8;4;2;0;0;
53;80;289;0;0;0;0;
54;55;18;1133;0;0;23;2ND PROCR LENGTH BLOCK
55;C;8;4;2;0;0;
56;80;289;0;0;0;0;
57;52;8;4;0;0;0;
58;C;210;6;0;0;0;
59;55;1;16;1;0;30;COPY ANNOTATION
60;C;8;20;1;0;0;
61;80;289;0;0;0;0;
62;0;316;3;0;0;0;ABS ADDRESS 18:2496
63;5;92;9;0;0;0;
64;60;;0;0;0;0;
SHEET;106
PROCR;204;DEAL WITH UNAMENDED ENTRY, FILES, CHAP STARTS
NOTES;;;
0;80;291;0;0;0;0;gREAD 'ENTRY' EX MT
1;10;;0;0;0;0;
2;5;7;46;1;0;0;CLEAR REPORT WORDS
3;5;7;48;1;0;0;
4;5;12;33;0;0;0;SET 'MT INPUT'
5;80;207;0;0;0;0;gWRITE
6;80;291;0;0;0;0;gREAD
7;55;7;8;2;0;30;
8;C;12;13;0;0;0;;MT 'CHAPS' UNAM
9;5;12;33;0;0;0;SET 'MT INPUT'
10;;12;13;0;0;0;NUMBER OF CARDS
11;80;248;0;0;0;0;gTO BIN
12;5;12;13;0;0;0;
13;55;12;14;0;0;14;
14;C;7;10;2;0;0;
15;55;7;4;1;0;34;COPY ANNEXES
16;C;8;4;1;0;0;
17;80;291;0;0;0;0;READ A1
SHEET;107
PROCR;205;PREPARE TO PROCESS SECTION DETAILS+DEAL WITH INITIAL TRANSLATION
NOTES;;;
0;10;;0;0;0;pppppppppp;
1;5;18;2498;1;0;0;LIST END SIGN
2;5;18;2496;1;0;0;CLEAR FIRST ENTRY
3;83;267;0;0;0;1;SAFETY SETTINGS
4;0;12;13;0;0;0;NO OF CHAPS
5;80;247;0;0;0;0;gTO DEC
6;5;215;6;0;0;0;
7;10;;0;0;0;7200;
8;5;12;3;0;0;0;ERROR LETTER S
9;10;;0;0;0;99;
10;5;92;3;0;0;0;FIRST PROCR-1
11;90;;0;0;4;0;
12;C;;0;0;0;14;TO STORE CHAPTER ENDS
13;62;;0;0;0;0;
14;91;12;12;0;3;0;C:0
15;11;;0;0;0;1;
16;3;92;10;0;3;0;STORE UNCORRECTED CHAP NUMBERS
17;94;205;15;0;3;1;
18;60;;0;0;0;0;
19;10;;0;0;0;1001;
20;5;12;9;0;0;0;SET FIRST SECTION SERIAL NUMBER
SHEET;108
PROCR;206;DEAL WITH UNAMENDED SECTION LINE
0;80;208;0;0;0;0;gTEST PT AT AMEND DIRECTIVE
1;80;209;0;0;0;0;gTEST MT=PROCR ETC
2;76;217;0;0;0;0;
SHEET;109
PROCR;207;
0;81;207;0;0;0;0;
1;43;A2;0;0;0;0;
2;C;7;0;0;0;0;
3;82;207;0;0;0;0;
SHEET;110
PROCR;208;TEST PT REPRESENTS AMENDMENT TO SECTION DESCRIPTION
0;81;208;0;0;0;0;
1;80;294;0;0;0;0;gTEST AMEND DIRECTIVE/END
2;70;208;6;0;0;0;gNO
3;10;;0;0;0;1;
4;5;12;45;0;0;0;
5;10;;0;0;0;1;
6;82;208;0;0;0;0;(A)=0 IF NOT DIRECTIVE
SHEET;111
PROCR;209;TEST MT AT START OF CODING
0;81;209;0;0;0;0;
1;;27;1;0;0;0;
2;70;209;6;0;0;0;gSINGLE-RECORD BLOCKS
3;;7;12;1;0;0;DIRECTIVE WORD
4;80;287;0;0;0;0;
5;82;209;0;0;0;0;
6;;7;10;1;0;0;
7;76;209;4;0;0;0;
SHEET;112
TABLE;210;1;UNPACK/EDIT PROG HEADING+FILES+CHAPS+SECTIONS
NOTES;;;
0;1;0;0;0;0;0;5;0;0;5;0;0;0;AMEND IND
2;1;2;0;0;2;0;5;0;0;0;0;0;1;'CHAPS'
4;12;1;0;0;0;0;5;0;0;4;0;0;1;FOR UPDATED SERIAL
6;1;0;0;0;0;0;5;0;0;5;0;0;0;
8;1;2;0;0;2;0;5;0;0;0;0;0;0;AMEND IND
10;1;4;0;0;0;0;5;0;0;5;0;0;0;
12;1;6;0;0;0;0;5;0;0;4;0;0;0;
14;1;8;0;0;2;0;5;0;0;0;0;0;0;SERIAL/CODER
16;1;10;0;0;1;0;10;0;0;10;0;0;0;(SPACER)
18;1;10;0;0;0;0;5;0;0;5;0;0;1;(SPACER)
SHEET;113
PROCR;211;ERROR REPORT SR
0;81;211;0;0;0;0;
1;5;12;4;0;0;0;
2;91;12;2;0;3;0;CTR
3;;318;6;1;0;0;'*'
4;1;12;4;0;0;0;REPORT NUMBER
5;1;12;3;0;0;0;REPORT LETTER
6;5;1;38;1;3;0;
7;12;;0;0;0;2;
8;4;12;2;0;0;0;REDUCE CTR
9;10;;0;0;0;0;
10;82;211;0;0;0;0;
SHEET;114
PROCR;212;REPLACE CODERS PROCR-ISSUE 6 O/P-ENTRY AND CHAPS
0;81;212;0;0;0;0;(12/119=DEC PROCR)
1;;12;119;0;0;0;
2;80;248;0;0;0;0;gBIN
3;33;;0;0;0;1-;
4;5;319;40;1;0;0;
5;91;319;40;0;1;0;
6;74;212;10;0;0;0;gEVEN
7;;18;50-;0;1;0;
8;31;;0;0;0;10-;
9;76;212;12;0;0;0;
10;34;318;18;0;0;0;BITS 1-10
11;36;18;50-;0;1;0;
12;80;247;0;0;0;0;gDEC
13;82;212;0;0;0;0;
SHEET;115
TABLE;213;3;
0;1;2;0;0;2;0;5;0;0;0;0;0;0;PROGM/ENTRY
2;1;4;0;0;1;0;3;0;0;0;0;0;0;SUITE NO/ENTRY PT
4;1;6;0;0;1;0;2;0;0;0;0;0;0;JOB/PRIORITY
6;1;8;0;0;2;0;5;0;0;0;0;0;0;SER,VERSION,BLANK/CODER
8;1;16;0;0;2;1;5;0;0;0;0;0;1;/////ANNOT/CHCKR
10;1;2;0;0;2;0;5;0;0;0;0;0;0;AMEND
12;1;4;0;0;1;0;3;0;0;0;0;0;0;SUITE
14;1;6;0;0;1;0;2;0;0;0;0;0;0;JOB
16;1;8;0;0;2;0;2;0;0;0;0;0;0;ISSUE/+SER/ISSUE
18;1;20;0;0;2;0;3;0;0;0;0;0;0;WORDS/SER
20;1;16;0;0;0;0;1;0;0;0;0;0;0;PRINT IND
22;1;17;0;0;0;0;3;0;0;0;0;0;0;ISSUE
24;1;18;0;0;2;0;1;0;0;0;0;0;1;PTS(CARDS)
SHEET;116
TABLE;214;3;UNPACK CHAPS BLOCK
NOTES;;;FROM CARDS
0;1;2;0;0;2;0;5;0;0;0;0;0;0;'CHAPS'
2;1;4;0;0;0;0;2;0;0;0;0;0;0;NO OF CHAPS
4;1;5;0;0;0;0;3;0;0;0;0;0;0;1-ST START
6;1;6;0;0;0;0;3;0;0;0;0;0;0;2-ND START
8;1;7;0;0;0;0;3;0;0;0;0;0;0;
10;1;8;0;0;0;0;3;0;0;0;0;0;0;
12;1;9;0;0;0;0;3;0;0;0;0;0;0;
14;1;10;0;0;0;0;3;0;0;0;0;0;0;
16;1;11;0;0;0;0;3;0;0;0;0;0;0;
18;1;12;0;0;0;0;3;0;0;0;0;0;0;
20;1;13;0;0;0;0;3;0;0;0;0;0;0;
22;1;14;0;0;0;0;3;0;0;0;0;0;0;10-TH START
24;1;15;0;0;0;0;3;0;0;0;0;0;0;
26;1;16;0;0;0;0;3;0;0;0;0;0;0;
28;1;17;0;0;0;0;3;0;0;0;0;0;0;
30;1;18;0;0;0;0;3;0;0;0;0;0;1;14-TH START
SHEET;117
CONST;215;1;FUNCTIONAL
0;(D)100099;UPPER/LOWER LIM SEC NUMBER
2;4096;DO LENGTH
4;1;DO TX AREA IND
6;0;DO CHAP NO
8;1p1p1p1p1p;
10;(A)PROGM;
12;ENTRY;
14;AMEND;
16;CHAPS;
18;PASSI;
20;STORE;
SHEET;118
CONST;216;1;DUMMY
0;(B)0;
2;;
4;;
6;;
8;;
SHEET;119
PROCR;217;MAIN LOOP-DEAL WITH INITIAL TRANSLATION
NOTES;RADIX;;
0;55;18;0;0;0;1110;
1;C;93;0;0;0;0;
2;55;25;0;0;0;240;
3;C;93;1110;0;0;0;
4;83;222;0;0;0;2;SAFETY SETTINGS
5;10;;0;0;0;1;
6;5;27;5;0;0;0;UNPACK SWITCH
7;0;92;30;0;0;0;
8;3;12;8;1;0;0;(CLEAR 12/9)
9;70;217;9;0;0;0;
10;59;7;6;0;8;0;SET I/P MR
11;C;7;4;2;0;0;
12;76;253;0;0;0;0;
SHEET;120
PROCR;218;START OF CHECK/EDIT/OUTPUT SR
NOTES;RADIX;;
0;81;218;0;0;0;0;
1;;12;38;0;0;0;STACKING DIRECTIVE?
2;70;222;0;0;0;0;NO
3;72;222;0;0;0;0;g'NOTES' BLOCK
4;;12;61;0;0;0;C-LINE MUST FOLLOW;SHOULD THIS
5;70;218;7;0;0;0;INDCATOR;BE A C-LINE
6;80;296;0;0;0;0;IGNORE THIS INSTRUCTION
7;;12;54;0;0;0;;EXCEPT FOR
8;12;;0;0;0;55;;ACTION 85,CLEAR
9;70;218;12;0;0;0;;C-LINE MAY
10;10;;0;0;0;0;;FOLLOW INDICATOR
11;5;12;60;1;0;0;
12;5;12;9;0;0;0;
13;5;12;43;0;0;0;CLEAR LINE INCREMENT FOR'SER'CHECKS
14;;27;5;0;0;0;
15;12;;0;0;0;4;
16;70;219;32;0;0;0;gVALUE(DIRECTIVE OR DATA)
17;;92;3;0;0;0;
18;11;;0;0;0;1;FORM TRANSLATORS PROCR
19;3;92;3;0;0;0;
20;3;12;0;0;0;0;
21;5;12;4;0;0;0;
SHEET;121
PROCR;219;TEST NEW CHAPTER
NOTES;RADIX;;
0;;1;8;2;0;0;
1;30;;0;0;0;2-;
2;3;1;14;0;0;0;B/FWD PROCR
3;2;92;3;0;0;0;
4;70;219;7;0;0;0;gOK PASS 0 HASN'T BOOBED
5;;318;38;1;0;0;'????R'
6;5;1;44;1;0;0;
7;52;1;8;0;0;0;EDIT NEW PROCR
8;C;306;0;0;0;0;
9;;1;14;0;0;0;OLD
10;2;12;4;0;0;0;NEW
11;70;219;13;0;0;0;gPROCR DOESN’T CHANGE
12;80;220;0;0;0;0;gSET'PRINT PROCR'
13;;92;3;0;0;0;
14;12;;0;0;0;100;
15;71;219;19;0;0;0;gNOT FIRST TIME THROUGH
16;0;12;0;0;0;0;FIRST CODERS PROCR
17;5;12;14;0;0;0;SET AS FIRST CHAP START
18;76;219;27;0;0;0;
19;;12;14;0;4;0;
20;2;12;0;0;0;0;
21;71;219;32;0;0;0;gTHIS PROCR IS NOT A CHAPTER START
22;;92;3;0;0;0;
23;12;;0;0;0;1;
24;80;248;0;0;0;0;gCHAP END IN BIN
25;30;;0;0;0;2;
26;4;92;9;0;4;0;STORE CHAP END POINT
27;62;;0;0;0;0;
28;10;;0;0;0;1;
29;4;92;0;0;0;0;STEP UNCORR CHAP IN BIN
30;60;;0;0;0;0;
31;94;;0;0;4;1;
32;83;222;0;0;0;1;SET CHECK SWITCH FOR DIRECTIVES
33;76;222;0;0;0;0;
SHEET;122
PROCR;220;SET IND IN SEC 23 IF PROCR TO BE PRINTED
0;81;220;0;0;0;0;
1;;92;3;0;0;0;CURRENT PROCR
2;80;248;0;0;0;0;gBIN
3;19;;0;0;0;14;
4;5;319;40;0;0;0;
5;32;;0;0;0;9;
6;5;319;41;0;0;0;REMAINDER
7;34;319;20;0;0;0;1
8;124;319;41;0;1;0;
9;33;;0;0;0;0;/////
10;;319;18;0;0;0;pX5
11;124;319;40;0;1;0;
12;37;23;5-;0;0;0;SET BIT
13;60;;0;0;0;0;
14;82;220;0;0;0;0;
SHEET;123
PROCR;221;CHECK FOR B/FWD ERROR REPORT
NOTES;;;
0;81;221;0;0;0;0;
1;;1;42;1;0;0;LAST 5 CHARS OF ANNOTATION
2;2;318;24;1;0;0;'?????'
3;70;221;10;0;0;0;
4;;1;42;1;0;0;
5;12;;0;0;0;5p5p5p5p5p;FIVE SQUARES
6;70;221;10;0;0;0;
7;;1;42;1;0;0;
8;2;318;22;1;0;0;'SHEET'
9;71;221;11;0;0;0;
10;5;1;42;1;0;0;CLEAR OUT REPORT
11;82;221;0;0;0;0;
SHEET;124
PROCR;222;SWITCH B
NOTES;RADIX;;
0;80;221;0;0;0;0;gDELETE B/FWD ERROR REPORTS
1;;12;33;0;0;0;
2;70;222;7;0;0;0;gEX MT
3;;92;30;0;0;0;
4;70;222;7;0;0;0;
5;80;220;0;0;0;0;gSET'PRINT PROCR'
6;10;;0;0;0;0;
7;85;222;0;0;0;0;
8;C;231;0;0;0;0;STACKING DIRECTIVE
9;C;236;0;0;0;0;INSTRUCTIONS
10;C;276;0;0;0;0;TABLES
11;C;260;0;0;0;0;CONSTANTS
12;85;173;0;0;0;0;
13;C;249;0;0;0;0;gLAST REF/ITEM CORRECT
14;C;222;15;0;0;0;gLAST REF/ITEM IGNORED
15;80;225;0;0;0;0;REPORT R
16;80;295;0;0;0;0;IGNORE THIS LINE
17;76;249;0;0;0;0;gEDIT AND O/P
SHEET;125
PROCR;223;ERROR REPORT OF D
NOTES;;;
0;81;223;0;0;0;0;
1;10;;0;0;0;54;D
2;80;229;0;0;0;0;
3;82;223;0;0;0;0;
SHEET;126
PROCR;224;ERROR REPORT OF M
NOTES;;;
0;81;224;0;0;0;0;
1;10;;0;0;0;64;M
2;80;229;0;0;0;0;
3;82;224;0;0;0;0;
SHEET;127
PROCR;225;ERROR REPORT OF R
NOTES;;;
0;81;225;0;0;0;0;
1;10;;0;0;0;69;
2;80;229;0;0;0;0;
3;82;225;0;0;0;0;
SHEET;128
PROCR;226;ERROR REPORT OF I
NOTES;;;
0;81;226;0;0;0;0;
1;10;;0;0;0;59;I
2;80;229;0;0;0;0;
3;82;226;0;0;0;0;
SHEET;129
PROCR;227;ERROR REPORT OF L
NOTES;;;
0;81;227;0;0;0;0;
1;10;;0;0;0;63;L
2;80;229;0;0;0;0;
3;82;227;0;0;0;0;
SHEET;130
PROCR;228;ERROR REPORT OF T
NOTES;;;
0;81;228;0;0;0;0;
1;10;;0;0;0;73;T
2;80;229;0;0;0;0;
3;82;228;0;0;0;0;
SHEET;131
PROCR;229;MAKE ERROR REPORT
NOTES;;;
0;81;229;0;0;0;0;
1;32;;0;0;0;10-;
2;;1;44;1;0;0;TEST REPORT ALREADY MADE
3;30;;0;0;0;2-;WITH '????'
4;12;;0;0;0;5:5:5:5:;
5;70;229;14;0;0;0;gYES,DON’T CORRUPT IT
6;10;;0;0;0;0;
7;32;;0;0;0;10;
8;124;12;115;1;2;0;
9;30;;0;0;0;0;/////
10;4;1;44;1;0;0;
11;10;;0;0;0;2;
12;1;12;115;0;0;0;
13;5;12;115;0;0;0;
14;82;229;0;0;0;0;
SHEET;132
PROCR;230;ADJUST SR-ISSUE 6 O/P
0;81;230;0;0;0;0;
1;90;;0;0;1;0;
2;C;;0;0;0;900;
3;10;;0;0;0;0;(12/58)=SERIAL TO BE ADJUSTED
4;5;12;46;0;0;0;CLEAR FOR TOTAL ADJUSTMENT
5;35;;0;0;0;11100;
6;36;12;58;0;0;0;
7;5;12;30;0;0;0;PROCR
8;36;97;0;0;1;0;
9;70;230;21;0;0;0;gEND
10;2;12;30;0;0;0;
11;73;230;19;0;0;0;gSEARCH
12;71;230;21;0;0;0;gEND
13;;97;0;0;1;0;
14;2;12;58;0;0;0;
15;70;230;17;0;0;0;
16;72;230;30;0;0;0;gNEXT ADJUST POINT IN PROCR IS LATER
17;;97;1;0;1;0;
18;4;12;46;0;0;0;
19;10;;0;0;0;0;
20;94;230;8;0;1;2;
21;35;;0;0;0;11;
22;;12;46;0;0;0;TOTAL ADJUSTMENT
23;36;12;58;0;0;0;
24;3;12;58;0;0;0;NEW ITEM
25;12;;0;0;0;100;
26;73;230;29;0;0;0;'????I'
27;;318;40;1;0;0;REPORT WRITTEN ITEM>99
28;5;1;44;1;0;0;
29;82;230;0;0;0;0;QUANTITY(+-)
30;1;97;1;0;1;0;gADDRESS DELETED
31;70;230;33;0;0;0;gNEXT IS INSERTION
32;72;230;21;0;0;0;'????DELTA'
33;;318;42;1;0;0;
34;5;1;44;1;0;0;
35;76;230;21;0;0;0;
SHEET;133
PROCR;231;DEAL WITH PROCR/TABLE/CONST
NOTES;RADIX;;
0;;1;6;1;0;0;;TEST PROCR
1;2;318;4;1;0;0;PROCR
2;71;231;5;0;0;0;NO
3;5;12;90;1;0;0;
4;76;249;0;0;0;0;FORM SERIAL NO.;AND OUTPUT
5;;1;6;1;0;0;;TEST TABLE
6;2;318;0;1;0;0;TABLE
7;71;232;3;0;0;0;NO
8;10;;0;0;0;100001;SET LONG/SHORT;USED TO
9;5;12;90;1;0;0;COUNTER;STEP ON SERIAL
10;34;1;16;1;0;0;TABLE TYPE
11;80;320;0;0;0;0;gRIGHT ALIGN
12;0;12;88;2;0;0;
13;73;231;18;0;0;0;TABLE TYPE IS;NEGATIVE
14;3;12;59;0;0;0;
15;70;231;18;0;0;0;
16;12;;0;0;0;5;
17;73;232;0;0;0;0;
18;83;278;6;0;0;5;TABLE TYPE IS OUT;OF RANGE
19;76;282;27;0;0;0;
SHEET;134
PROCR;232;
NOTES;RADIX;;
0;84;278;6;0;0;0;SET TABLE CHECKING
1;C;12;59;0;0;0;SWITCH ACCORDING TO TYPE
2;76;249;0;0;0;0;FORM SERIAL NO.;AND OUTPUT
3;;1;6;1;0;0;;TEST CONST
4;2;318;2;1;0;0;CONST
5;71;232;23;0;0;0;gNO
6;54;94;60;0;0;40;
7;34;317;1;0;0;0;BIT 17
8;36;1;16;2;0;0;
9;30;;0;0;0;4-;
10;3;12;90;0;0;0;LONG/SHORT IND
11;71;232;13;0;0;0;gLONG
12;10;;0;0;0;30;ALPHA ZERO
13;30;;0;0;0;3;
14;35;;0;0;0;11000;
15;37;1;17;0;0;0;SET ALPHA 0 OR 1
16;76;232;19;0;0;0;
17;10;;0;0;0;1;
18;03;12;90;0;0;0;
19;83;263;0;0;0;1;SAFETY VALUE
20;10;;0;0;0;4;SET CHECK SWITCH
21;84;222;0;0;0;0;
22;76;249;0;0;0;0;gO/P
23;76;233;0;0;0;0;NOTES
SHEET;135
PROCR;233;DEAL WITH NOTES
NOTES;RADIX;;
0;;12;91;0;0;0;
1;71;233;4;0;0;0;
2;10;;0;0;0;2;FOR INSTRUCTIONS
3;76;233;5;0;0;0;
4;10;;0;0;0;3;FOR TABLE ENTRIES
5;84;222;0;0;0;0;SET CHECK SWITCH
6;2;12;38;0;0;0;DIRECTIVE IND FOR THIS LINE
7;73;249;0;0;0;0;gIS'NOTES'(IE>0)
8;10;;0;0;0;2;
9;5;12;9;0;0;0;SET THIS LINE SERIAL
10;76;222;1;0;0;0;gTO CHECK SWITCH
SHEET;136
PROCR;234;REPLACE AND ADJUST B/FWD ADDRESSES IN TABLE ENTRIES AND INSTRUCTI
NOTES;RADIX;;
0;81;234;0;0;0;0;
1;34;1;8;1;0;0;REF
2;80;320;0;0;0;0;gRIGHT ALIGN
3;0;12;88;2;0;0;
4;3;12;4;0;0;0;
5;12;;0;0;0;100;
6;73;234;23;0;0;0;gSECTION
7;12;;0;0;0;899;
8;72;234;23;0;0;0;gNOT REPLACEABLE (INCLUDES 999)
9;;1;10;1;0;0;
10;5;294;0;0;0;0;'PREVIOUS'ITEM
11;80;235;0;0;0;0;gCALC C/FWD ADDRESS
12;;12;88;2;0;0;;TEST IMPLICIT
13;2;12;4;0;0;0;;AMENDMENT
14;71;234;18;0;0;0;gCHANGE TO REF
15;;1;10;1;0;0;
16;2;294;0;0;0;0;
17;70;234;19;0;0;0;gNO CHANGE TO ITEM
18;80;220;0;0;0;0;gSET'PRINT PROCEDURE'
19;;12;88;2;0;0;
20;5;12;4;0;0;0;NEW REF
21;52;1;8;0;0;0;REPLACE REF-WITH ZEROS
22;C;306;0;0;0;0;
23;82;234;0;0;0;0;
SHEET;137
PROCR;235;REPLACE AND ADJUST ADDRESS
NOTES;;;
0;81;235;0;0;0;0;
1;;12;88;2;0;0;REPLACE PROCR(NEW STYLE)
2;3;12;118;0;0;0;
3;3;12;119;0;0;0;
4;30;;0;0;0;2;
5;1;1;10;0;0;0;
6;5;12;58;0;0;0;
7;;1;10;1;0;0;
8;73;235;12;0;0;0;gDONT ADJUST NEG ITEMS
9;80;230;0;0;0;0;gADJUST SR(NEW STYLE)
10;;12;58;0;0;0;NEW ITEM
11;5;1;10;0;0;0;
12;82;235;0;0;0;0;
SHEET;138
PROCR;236;BEGIN CHECKS ON ACTION OR C-LINE
NOTES;RADIX;;
0;80;234;0;0;0;0;gDEAL WITH ADDRESS OF INSTRUCTION
1;;12;4;0;0;0;NEW REF
2;12;;0;0;0;100;
3;73;236;8;0;0;0;
4;12;;0;0;0;899;
5;72;236;8;0;0;0;
6;;12;118;0;0;0;PREVIOUS PROCR
7;5;1;22;0;0;0;
8;;12;61;0;0;0;
9;70;236;11;0;0;0;
10;80;296;0;0;0;0;
11;34;1;6;1;0;0;
12;80;320;0;0;0;0;RIGHT ALIGN ACTION
13;00;12;88;2;0;0;
14;73;237;0;0;0;0;gNEGATIVE ACTION
15;12;;0;0;0;100;
16;73;237;0;0;0;0;gREJECT
17;12;;0;0;0;30;
18;72;237;0;0;0;0;
19;0;12;88;2;0;0;
20;80;248;0;0;0;0;gTO BIN
21;3;12;54;0;0;0;BINARY ACTION
22;30;;0;0;0;3;
23;101;316;0;0;0;0;
24;32;;0;0;0;10;ABS BIN ADDRESSgA
25;3;12;55;0;0;0;LOCN TO SELECT C-LINE CHECK CONSTAN
26;124;12;55;1;2;0;
27;100;;0;0;2;0;CHECK CONST
28;10;;0;0;0;0;
29;36;317;2;0;0;0;Q1-3
30;71;237;4;0;0;0;gACTION EXISTS
SHEET;139
PROCR;237;
NOTES;RADIX;;
0;10;;0;0;0;5100000000;
1;5;1;44;1;0;0;NONEXISTENT ACTION=ERROR OF A
2;80;295;0;0;0;0;
3;76;249;0;0;0;0;
4;30;;0;0;0;2-;
5;10;;0;0;0;0;LOSE 'LIT SWITCH'
6;36;317;3;0;0;0;BITS 5-7
7;30;;0;0;0;1-;
8;84;240;0;0;0;0;'REF/ITEM'SWITCH BY Q2
9;36;317;5;0;0;0;BIT 4
10;5;12;61;0;0;0;IND THAT C-LINE ESSENTIAL
11;36;317;6;0;0;0;BIT 8
12;5;12;60;0;0;0;IND THAT C-LINE IS POSSIBLE
13;5;12;59;0;0;0;CLEAR THIS
SHEET;140
PROCR;238;
NOTES;RADIX;;
0;60;;0;0;0;0;
1;;1;10;0;0;0;MODULUS OF ITEM
2;12;;0;0;0;8192;
3;72;238;6;0;0;0;gREPORT
4;;1;11;0;0;0;
5;70;238;7;0;0;0;gOK
6;80;226;0;0;0;0;gREPORT I
7;;1;12;1;0;0;DISC
8;70;238;12;0;0;0;gOK
9;12;;0;0;0;1;
10;70;238;12;0;0;0;gOK
11;80;223;0;0;0;0;gREPORT D
12;0;1;14;1;0;0;MOD
13;70;240;0;0;0;0;gOK
14;12;;0;0;0;4;
15;73;240;0;0;0;0;gOK
16;80;224;0;0;0;0;gREPORT M
17;76;240;0;0;0;0;gTO CHECK R,I,L
SHEET;141
PROCR;239;TEST D IS ZERO
NOTES;RADIX;;
0;81;239;0;0;0;0;
1;;1;12;1;0;0;
2;70;239;4;0;0;0;
3;80;223;0;0;0;0;REPORT D
4;82;239;0;0;0;0;
SHEET;142
PROCR;240;
NOTES;RADIX;;
0;85;240;0;0;0;0;
1;C;241;0;0;0;0;gR ZERO, PROCR, SECTION OR '1000+'
SHEET;143
PROCR;241;SWITCH = 1
NOTES;RADIX;B;R ZERO, OR A SECTION
0;;12;4;0;0;0;
1;73;241;16;0;0;0;gIGNORE R
2;71;241;11;0;0;0;gOK
3;;1;14;0;0;0;MOD DIGITS
4;71;241;18;0;0;0;gOK
5;0;1;10;1;0;0;ITEM
6;73;241;16;0;0;0;IG
7;71;241;18;0;0;0;gOK
8;0;12;54;0;0;0;ACTION
9;70;241;16;0;0;0;gIGNORE R
10;76;241;18;0;0;0;gOK
11;70;242;0;0;0;0;OK
12;12;;0;0;0;100;
13;73;241;16;0;0;0;IG
14;12;;0;0;0;900;
15;73;241;18;0;0;0;gOK
16;80;295;0;0;0;0;gIGNORE
17;80;225;0;0;0;0;gREPORT R
18;76;242;0;0;0;0;CHECK L
19;80;277;0;0;0;0;gCHECK REF
SHEET;144
PROCR;242;SWITCH FOR LITERALS
NOTES;RADIX;;CHECK L IS NOT > 10 QUARTETS
0;0;1;18;1;0;0;
1;70;244;0;0;0;0;
SHEET;145
PROCR;243;MAKE REPORTS ON L
NOTES;RADIX;;SWITCH=2
0;80;295;0;0;0;0;gIGNORE
1;80;227;0;0;0;0;gREPORT L
SHEET;146
PROCR;244;TEST FP/MG USED, STORE MR>3 DETAILS
NOTES;RADIX;;MOD REGISTERS 1-3
0;62;;0;0;0;0;
SHEET;147
PROCR;245;MACHINE CODE SEQUENCE CHANGES
NOTES;RADIX;;
0;0;12;54;0;0;0;BIN ACTION
1;12;;0;0;0;7p;
2;70;246;0;0;0;0;gACTION 127/D/M
3;11;;0;0;0;3;
4;71;249;0;0;0;0;gNOT 124/D/M
5;;1;12;0;0;0;
6;12;;0;0;0;1;
7;71;249;0;0;0;0;gNOT 124/1/M
8;;1;14;0;0;0;
9;71;249;0;0;0;0;gNOT 124/1/0
10;76;246;0;0;0;0;
11;60;;0;0;0;0;;ACTION 94
12;0;1;16;1;0;0;L
13;71;245;15;0;0;0;
14;80;227;0;0;0;0;gREPORT L
15;0;1;8;1;0;0;
16;71;246;0;0;0;0;gCOUNT AS SEQ CHANGE
17;0;1;10;0;0;0;
18;70;249;0;0;0;0;YES
19;80;226;0;0;0;0;gREPORT I
20;76;249;0;0;0;0;
SHEET;148
PROCR;246;TEST IF SEQUENCE CHANGE IS FORWARD OR BACK
NOTES;RADIX;;
0;0;12;4;0;0;0;DEC REF
1;12;;0;0;0;999;
2;72;249;0;0;0;0;
3;0;92;3;0;0;0;(CURRENT LINE SERIAL)
4;30;;0;0;0;2;
5;1;12;9;0;0;0;SEQ CHANGE SOURCE
6;3;12;118;0;0;0;SOURCE
7;2;1;8;2;0;0;L-ALIGNED REF
8;2;1;10;0;0;0;ITEM
9;73;249;0;0;0;0;gSOURCE<DEST, SEQ CHANGE FWD
10;;1;8;2;0;0;
11;70;249;0;0;0;0;gSC TO ABS ADDRESS,DON’T STORE
12;1;1;10;0;0;0;
13;73;249;0;0;0;0;gSKIP
14;5;12;119;0;0;0;DESTINATION
15;0;12;118;1;0;0;
16;62;;0;0;0;0;
17;124;92;9;1;2;0;ABS START OF LIST(18:2496 INITIALLY
18;101;;0;1;0;0;TABLE LOOKUP
19;32;;0;0;0;10;
20;91;;0;0;1;0;STORE LOCN OF FIRST GREATER
21;2;92;9;0;0;0;
22;30;;0;0;0;5;SHIFT QTTY TO BE MOVED
23;1;92;9;0;0;0;START
24;5;12;88;1;0;0;WL=BULK COPY TABLE ENTRY
25;0;92;9;0;0;0;CURRENT LIST START
26;2;316;4;0;0;0;ABS ADDRESS 18:0
27;70;249;0;0;0;0;gLIST FULL, DON’T STORE
28;10;;0;0;0;2-;
29;4;92;9;0;0;0;ADJUST FOR NEW START
30;;12;88;1;0;0;
31;124;92;9;1;2;0;
32;128;;0;1;1;0;BULK COPY UP ONE WORD
33;94;;0;0;1;2-;ADJUST
34;;12;118;1;0;0;NEW SEQ CH BACK
35;5;;0;1;1;0;PLACE IN LIST
36;76;249;0;0;0;0;
SHEET;149
PROCR;247;CONVERT (A) TO DEC
NOTES;;;
0;81;247;0;0;0;0;
1;5;319;40;1;0;0;
2;60;;0;0;0;0;SET DEC
3;124;319;0;0;2;0;
4;112;319;40;1;0;0;
5;82;247;0;0;0;0;
SHEET;150
PROCR;248;CONVERT (A) TO BINARY
NOTES;;;
0;81;248;0;0;0;0;
1;5;319;40;1;0;0;
2;62;;0;0;0;0;SET BIN
3;124;319;20;0;2;0;
4;112;319;40;1;0;0;
5;82;248;0;0;0;0;
SHEET;151
PROCR;249;FORM SERIAL NUMBER
NOTES;RADIX;;
0;00;12;85;0;0;0;TEST IF TO IGNORE
1;70;249;3;0;0;0;THIS BLOCK
2;80;295;0;0;0;0;YES - IGNORE
3;60;;0;0;0;0;
4;;92;3;0;0;0;TRANSLATOR'S PROCR
5;30;;0;0;0;2;
6;5;12;88;0;0;0;
7;86;222;0;0;0;0;
8;;12;9;0;0;0;LINE SERIAL IN PROCR
9;12;;0;0;0;100;;NO LINE SERIAL>99
10;73;249;22;0;0;0;gOK
11;86;222;0;0;0;0;
12;12;;0;0;0;2;
13;70;249;18;0;0;0;gINSTRUCTIONS,IGNORE
14;35;;0;0;0;111111;TABLE ENTRIES,CONST='SER'
15;10;;0;0;0;725569;
16;37;1;44;1;0;0;
17;76;249;19;0;0;0;
18;80;295;0;0;0;0;gIGNORE
19;10;;0;0;0;99;
20;2;12;90;0;0;0;(0=SHORT,1=LONG)
21;76;249;23;0;0;0;gSET 98 OR 99
22;;12;9;0;0;0;
23;4;12;88;0;0;0;
24;52;1;2;0;0;0;EDIT SERIAL
25;C;306;4;0;0;0;
SHEET;152
PROCR;250;AUGMENT INSTRUCTION COUNTER
NOTES;RADIX;;
0;10;;0;0;0;0;
1;85;222;0;0;0;0;
2;C;250;7;0;0;0;g'PROCR/TABLE'
3;C;251;11;0;0;0;gINSTRUCTIONS/'NOTES'
4;C;251;0;0;0;0;gTABLE ENTRY/'NOTES'
5;C;251;5;0;0;0;gCONSTANT/'CONST'
6;C;250;7;0;0;0;
7;0;12;9;0;0;0;SERIAL THIS LINE WITHIN SECTION
8;71;250;14;0;0;0;gNOTES BLOCK
9;;318;20;0;0;0;SW 27/5 LAST TIME THRU
10;12;;0;0;0;3;
11;71;250;14;0;0;0;gLAST TIME WASN’T FOR CONSTANTS
12;10;;0;0;0;1;
13;5;29;6;1;0;0;CONSTS END SIGN
14;10;;0;0;0;0;
15;76;251;11;0;0;0;
SHEET;153
PROCR;251;AUGMENT INSTRUCTION COUNTER
NOTES;RADIX;;
0;;12;9;0;0;0;
1;12;;0;0;0;1;
2;70;251;11;0;0;0;
3;10;;0;0;0;2;
4;76;251;12;0;0;0;
5;;12;9;0;0;0;
6;71;251;10;0;0;0;gNOT'CONST'BLOCK
7;10;;0;0;0;1;(SO AS TO STEP BY 2 EVENTUALLY)
8;4;12;9;0;0;0;gTEST IF LAST SECTION WAS CONSTANTS
9;76;250;9;0;0;0;
10;00;12;90;0;0;0;
11;11;;0;0;0;1;
12;4;12;9;0;0;0;
13;0;12;33;0;0;0;
14;70;251;18;0;0;0;gBLOCK EX MT
15;0;12;1;0;0;0;
16;30;;0;0;0;2;
17;5;1;0;1;0;0;AMEND IND
18;5;92;34;1;0;0;CLEAR
SHEET;154
PROCR;252;EDIT
0;62;;0;0;0;0;
1;;317;9;0;0;0;INDICATOR
2;70;252;5;0;0;0;gFIRST RECORD
3;80;288;0;0;0;0;
4;76;252;6;0;0;0;
5;80;289;0;0;0;0;gWRITE LAST SECTION
6;;12;38;0;0;0;
7;71;252;28;0;0;0;gDIRECTIVE
8;;27;5;0;0;0;SWITCH
9;12;;0;0;0;4;
10;70;252;23;0;0;0;gVALUES
11;124;27;5;0;1;0;
12;;305;4;0;0;0;
13;128;29;2;1;2;0;EDIT PROCR,TABLE,CONST.
14;;318;46;1;0;0;
15;124;27;5;0;1;0;
16;124;305;0;0;1;0;
17;128;29;0;1;1;0;COPY ANNOTATION
18;;1;44;1;0;0;
19;124;27;5;0;1;0;
20;124;305;0;0;1;0;
21;5;29;2-;1;0;0;COPY REPORTS PASS 1
22;76;252;46;0;0;0;
23;55;1;11;0;0;16;VALUES
24;C;29;10;2;0;0;
25;52;29;6;0;0;0;REF+ITEM
26;C;315;0;0;0;0;
27;76;252;46;0;0;0;
28;52;29;2;0;0;0;DIRECTIVES
29;C;307;14;0;0;0;
30;10;;0;0;0;0;
31;5;318;20;0;0;0;
32;;27;5;0;0;0;
33;12;;0;0;0;1;
34;71;252;41;0;0;0;gNOT PROCR
35;;12;38;0;0;0;
36;73;252;41;0;0;0;gNOT NOTES OF PROCR
37;;1;8;1;0;0;
38;5;29;12;1;0;0;COPY'RADIX'
39;5;29;8;1;0;0;CLEAR
40;76;252;43;0;0;0;
41;;1;44;1;0;0;PASS 1 REPORTS
42;5;29;12;1;0;0;
43;55;1;16;1;0;28;BULK COPY ANNOTATION
44;C;29;14;1;0;0;
45;76;252;48;0;0;0;
46;;27;5;0;0;0;
47;5;318;20;0;0;0;
48;10;;0;0;0;1;
49;5;317;9;0;0;0;SET INDICATOR
50;60;;0;0;0;0;
51;10;;0;0;0;0;
52;5;12;115;0;0;0;ERROR REPORT SHIFT CONTROL
53;0;23;47;0;0;0;
54;35;;0;0;0;1111;
55;37;29;2;1;0;0;
56;10;;0;0;0;0;
57;5;23;47;0;0;0;'IMPLICITLY AMENDED'
58;82;218;0;0;0;0;
SHEET;155
PROCR;253;START OF UPDATING LOOP-DEAL WITH UNAMENDED MT OR PT AT END
0;80;294;0;0;0;0;gTEST PT AT DIRECTIVE/END
1;70;254;0;0;0;0;gNO
2;0;12;45;0;0;0;
3;71;253;12;0;0;0;gPT AT END
4;;27;1;0;0;0;
5;70;253;8;0;0;0;gSINGLE-RECORD BLOCKS
6;;;4;2;8;0;(ABS MR)
7;76;253;9;0;0;0;
8;0;7;6;2;0;0;MT SERIAL
9;2;9;4;2;0;0;A6 SERIAL
10;70;254;0;0;0;0;gMT AMENDED
11;72;255;0;0;0;0;gMT>PT,REPORT
12;80;299;0;0;0;0;gTEST MT=END
13;10;;0;0;0;0;SET 'MT INPUT'
14;5;12;33;0;0;0;
15;80;303;0;0;0;0;gTEST MT=PROCR
16;80;284;0;0;0;0;gUNPACK
17;80;218;0;0;0;0;gCHECK/EDIT/OUTPUT
18;80;302;0;0;0;0;gGET NEXT RECORD
19;76;253;2;0;0;0;
SHEET;156
PROCR;254;SWITCH FOR AMENDMENTS
NOTES;RADIX;;
0;85;254;0;0;0;0;
1;C;256;0;0;0;0;gREPLACE
2;C;257;0;0;0;0;gDELETE
3;C;255;0;0;0;0;OMIT PT;T
4;C;255;0;0;0;0;;A
SHEET;157
PROCR;255;DEAL WITH OUT-OF-SEQUENCE DIRECTIVE
NOTES;RADIX;;
0;;1;4;1;0;0;AMENDMENT;MODS ARE
1;124;318;20;0;1;0;
2;124;305;8;0;1;0;
3;5;29;0;1;0;0;REPORT WORD
4;34;1;2;1;0;0;SERIAL
5;80;259;0;0;0;0;;PUT ERROR REPORT
6;10;;0;0;0;1:5:;'??';OF 5-DIGIT
7;3;27;6;0;0;0;SET 'PT OMITTED'
8;35;;0;0;0;1111;;SERIAL AND
9;124;318;20;0;1;0;
10;124;305;8;0;1;0;
11;37;29;0;1;0;0;REPORT WORD
12;80;292;0;0;0;0;INPUT ON PAPER
13;80;294;0;0;0;0;FIND DIRECTIVE
14;70;255;12;0;0;0;gREAD/IGNORE PT TO NEXT DIRECTIVE
15;76;253;2;0;0;0;gMAKE THIS AMENDMENT
SHEET;158
PROCR;256;REPLACE
NOTES;RADIX;;
0;;9;50;2;0;0;'PASS 0' IND
1;71;256;32;0;0;0;gREJECT
2;;27;5;0;0;0;'UNPACK' SWITCH
3;5;296;0;0;0;0;WL
4;80;303;0;0;0;0;gTEST MT=PROCR
5;0;12;38;0;0;0;
6;5;227;0;0;0;0;WL
7;80;293;0;0;0;0;gTEST PT=STACK DIRECTIVE
8;0;12;38;0;0;0;IS REPLACING BLOCK STACK DIR, OR NO
9;2;227;0;0;0;0;ARE BOTH BLOCKS SIMILAR?
10;71;256;27;0;0;0;gNO,ILLEGAL?
11;10;;0;0;0;1;SET AS PT INPUT
12;5;12;33;0;0;0;
13;80;283;0;0;0;0;gUNPACK PT
14;80;299;0;0;0;0;gDONT REPLACE END SIGN
15;0;12;38;0;0;0;
16;72;256;23;0;0;0;gNOT PT DIRECTIVE
17;;27;1;0;0;0;
18;70;256;21;0;0;0;g1 RECORD PER BLOCK
19;;;14;1;8;0;
20;76;256;22;0;0;0;
21;0;7;16;1;0;0;
22;5;1;8;1;0;0;TRANSFER MT PROCR NUMBER
23;80;302;0;0;0;0;gGET NEXT A1 RECORD
24;80;218;0;0;0;0;gCHECK/EDIT/OUTPUT
25;80;292;0;0;0;0;gREAD PT
26;76;253;0;0;0;0;
27;0;12;38;0;0;0;PT DIRECTIVE
28;1;227;0;0;0;0;MT DIRECTIVE
29;72;256;11;0;0;0;gNEITHER IS STACK DIRECTIVE,ALLOW REPLAC
30;;296;0;0;0;0;
31;5;27;5;0;0;0;RESTORE SWITCH
32;10;;0;0;0;69;'R'
33;76;257;34;0;0;0;gREPORT
SHEET;159
PROCR;257;DELETION LOOP
NOTES;RADIX;;
0;80;299;0;0;0;0;gEND SIGN ON MT?
1;;9;4;1;0;0;
2;5;1;0;1;0;0;STORE SERIAL
3;;9;50;2;0;0;'PASS 0' IND
4;71;257;33;0;0;0;gREPORT
5;80;292;0;0;0;0;gREAD PT
6;80;294;0;0;0;0;gTEST DIRECTIVE
7;71;257;44;0;0;0;gYES(SINGLE-LINE DELETE)
8;;9;50;2;0;0;PASS 0 IND
9;71;257;33;0;0;0;gMOD REJECTED
10;;27;1;0;0;0;
11;70;257;14;0;0;0;g1 RECORD/BLOCK
12;;;4;2;8;0;
13;76;257;15;0;0;0;
14;;7;6;2;0;0;MT SERIAL
15;30;;0;0;0;8;
16;70;257;18;0;0;0;gDIRECTIVE DELETED
17;80;220;0;0;0;0;gSET'PRINT PROCEDURE'
18;80;302;0;0;0;0;
19;80;299;0;0;0;0;gGET NEXT RECORD
20;;27;1;0;0;0;gTEST END
21;70;257;24;0;0;0;
22;;;4;2;8;0;
23;76;257;25;0;0;0;
24;;7;6;2;0;0;MT SERIAL
25;2;1;2;2;0;0;PT SERIAL
26;71;257;32;0;0;0;
27;80;302;0;0;0;0;gGET NEXT MT RECORD
28;80;292;0;0;0;0;gREAD PT(NEXT DIRECTIVE)
29;80;294;0;0;0;0;gTEST DIRECTIVE
30;71;253;2;0;0;0;gYES
31;76;257;33;0;0;0;gREJECT
32;73;257;18;0;0;0;gLOOP
33;10;;0;0;0;54;'D';REPORT
34;30;;0;0;0;8;
35;124;318;20;0;1;0;
36;124;305;8;0;1;0;
37;5;29;0;1;0;0;REPORT WORD
38;;27;1;0;0;0;
39;70;257;42;0;0;0;g1 RECORD/BLOCK
40;34;;4;1;8;0;
41;76;255;5;0;0;0;
42;34;7;6;1;0;0;SERIAL BEING DELETED
43;76;255;5;0;0;0;gREPORT
44;;27;1;0;0;0;
45;70;257;48;0;0;0;
46;;;4;2;8;0;
47;76;257;49;0;0;0;
48;;7;6;2;0;0;
49;30;;0;0;0;8;
50;70;257;52;0;0;0;
51;80;220;0;0;0;0;
52;80;302;0;0;0;0;gGET RECORD AFTER DELETING ONE
53;;27;1;0;0;0;
54;70;257;57;0;0;0;
55;;;4;2;8;0;
56;76;257;58;0;0;0;
57;;7;6;2;0;0;
58;2;1;0;2;0;0;PT SERIAL FOR DELETION
59;70;257;52;0;0;0;gDELETE ALL BLOCKS THIS SERIAL
60;76;253;0;0;0;0;
SHEET;160
PROCR;258;ENTRY TO 'UNPACK 'SR TO AVOID CLEARING SEC 1
0;81;258;0;0;0;0;
1;0;258;0;0;0;0;
2;5;284;0;0;0;0;PLANT LINK
3;76;284;2;0;0;0;AVOID BULK CLEAR
SHEET;161
PROCR;259;STORE ERROR REPORT FOR OUT-OF-SEQUENCE MODS
0;81;259;0;0;0;0;(B)=REPORT WORD
1;124;318;20;0;1;0;
2;124;305;0;0;1;0;
3;;29;15;0;0;0;LAST 2h CHARS ANNOTATION
4;2;318;25;0;0;0;
5;70;259;12;0;0;0;gLINE IGNORED,DON’T OVERWRITE WORD
6;10;;0;0;0;0;CLEAR SIGN BIT A
7;32;;0;0;0;10;
8;124;318;20;0;1;0;
9;124;305;0;0;1;0;
10;5;29;14;1;0;0;LAST 5 CHARS ANNOTATION
11;82;259;0;0;0;0;
12;32;;0;0;0;10;
13;124;318;20;0;1;0;
14;124;305;0;0;1;0;
15;5;29;12;1;0;0;
16;82;259;0;0;0;0;
SHEET;162
PROCR;260;CONSTANTS ROUTINE
NOTES;RADIX;;
0;5;12;69;0;0;0;
1;5;12;66;1;0;0;CLEAR INDICATOR
2;5;12;70;0;0;0;
3;84;495;0;0;0;0;CLEAR WL=SWITCH
4;91;12;66;0;2;0;CLEAR R2
5;90;;0;0;3;0;
6;C;;0;0;0;5;
7;90;;0;0;1;0;
8;C;;0;0;0;18;
9;54;94;0;0;0;60;CLEAR UNPACK AREA
10;62;;0;0;0;0;
11;34;1;6;1;0;0;FIRST WORD
12;;12;33;0;0;0;NON ZERO IF EX PT
13;5;12;70;0;0;0;SET 'NE FOUND' IND
14;76;261;1;0;0;0;
15;80;295;0;0;0;0;gIGNORE CONST
SHEET;163
PROCR;261;
NOTES;RADIX;;
0;80;274;0;0;0;0;gGET NEXT CHAR
1;32;;0;0;0;2;
2;3;12;88;1;0;0;
3;12;;0;0;0;7:;
4;70;261;10;0;0;0;gNE
5;12;;0;0;0;1;
6;70;265;0;0;0;0;gBE,STORE NE AND END
7;;12;70;0;0;0;
8;71;261;0;0;0;0;gNO, DON’T STORE CHAR
9;76;261;15;0;0;0;gSTORE AND PROCESS
10;;12;70;0;0;0;'NE FOUND' IND
11;70;265;0;0;0;0;gYES, STORE NE AND END
12;5;12;70;0;0;0;
13;5;12;70;0;0;0;CLEAR
14;76;261;0;0;0;0;gGNC
15;;12;88;0;0;0;
16;5;94;0;0;2;0;STORE THIS CHAR
SHEET;164
PROCR;262;
NOTES;RADIX;;
0;96;;0;0;2;0;
1;94;262;2;0;2;1;
2;71;262;19;0;0;0;gNOT FIRST CHAR IN LINE
3;;12;88;0;0;0;THIS CHAR
4;12;;0;0;0;7t;
5;70;262;21;0;0;0;g'('
6;83;263;8;0;0;5;IGNORE'('
7;05;94;60;0;0;0;
8;0;94;61;0;0;0;SF CTR IN DIRECTIVE LINE
9;70;262;17;0;0;0;gWRONG
10;84;267;0;0;0;0;SET CHECK SWITCH
11;C;94;62;0;0;0;
12;0;94;62;0;0;0;SWITCH FOR FIRST SUBFIELD
13;12;;0;0;0;5;
14;71;262;19;0;0;0;gNOT REL ADDRESS
15;83;495;0;0;0;1;SET WL=1
16;76;262;19;0;0;0;
17;83;263;8;0;0;1;
18;80;263;8;0;0;0;gIGNORE UNDIRECTED CONST
19;;12;88;0;0;0;gCLEAR OUT ALL DETAILS
20;76;263;8;0;0;0;gSET SWITCH AT 2
21;80;263;8;0;0;0;
22;76;263;18;0;0;0;CLEAR DETAILS
SHEET;165
PROCR;263;
NOTES;RADIX;;
0;81;263;8;0;0;0;
1;5;94;60;1;0;0;
2;5;94;62;1;0;0;
3;5;94;64;1;0;0;
4;5;94;66;1;0;0;
5;5;94;68;1;0;0;
6;5;94;70;1;0;0;
7;82;263;8;0;0;0;
8;85;263;8;0;0;0;
9;C;260;15;0;0;0;gIGNORE
10;C;263;38;0;0;0;gPREVIOUS WAS'C' DIRECTIVE LETTER EXPECT
11;C;264;37;0;0;0;g')' EXPECTED
12;C;263;14;0;0;0;g',' FORBIDDEN, '(' ALLOWED
13;C;263;20;0;0;0;g'('FORBIDDEN ','ALLOWED
14;12;;0;0;0;7+;COMMA
15;70;262;17;0;0;0;gIGNORE
16;11;;0;0;0;2;
17;71;264;0;0;0;0;gCHECK CHAR
18;83;263;8;0;0;2;SET TO EXPECT DIRECTIVE LETTER
19;76;261;0;0;0;0;gGET NEXT CHAR
20;12;;0;0;0;7+;
21;71;263;35;0;0;0;gNOT COMMA
22;10;;0;0;0;2;
23;4;94;60;0;0;0;
24;124;94;60;0;0;0;SF CTR IN NON-DIRECTIVE LINE
25;;94;62;0;0;0;SF DETAILS
26;70;262;17;0;0;0;gIGNORE
27;84;267;0;0;0;0;
28;86;267;0;0;0;0;
29;12;;0;0;0;5;
30;71;261;0;0;0;0;gNOT REL ADDRESS
31;96;;0;0;2;0;
32;11;;0;0;0;1;
33;84;495;0;0;0;0;WL=LOCN OF SEOND CHAR
34;76;261;0;0;0;0;gGET NEXT CHAR
35;11;;0;0;0;2;
36;71;264;0;0;0;0;gNOT'(' CHECK CHAR
37;76;260;15;0;0;0;gIGNORE,GET NEXT CHAR
38;12;;0;0;0;51;
39;70;263;57;0;0;0;gA
40;12;;0;0;0;1;
41;70;263;55;0;0;0;gB
42;12;;0;0;0;1;
43;70;263;50;0;0;0;gC
44;12;;0;0;0;1;
45;70;263;56;0;0;0;gD
46;12;;0;0;0;13;
47;70;263;54;0;0;0;gP
48;12;;0;0;0;2;
49;71;262;17;0;0;0;gIGNORE, NOT R
50;96;;0;0;2;0;
51;11;;0;0;0;2;
52;84;495;0;0;0;0;WL=LOCN OF SEOND CHAR
53;10;;0;0;0;1;RANDC
54;11;;0;0;0;1;R
55;11;;0;0;0;1;B
56;11;;0;0;0;1;D
57;11;;0;0;0;1;A
58;84;267;0;0;0;0;SET CHECKING SWITCH
59;83;263;8;0;0;3;SET TO EXPECT ')'
60;76;261;0;0;0;0;gGET NEST CHAR
SHEET;166
PROCR;264;
NOTES;RADIX;;
0;85;267;0;0;0;0;CHECK SWITCH
1;C;261;0;0;0;0;gA,GNC
2;C;264;6;0;0;0;gD
3;C;264;15;0;0;0;gB
4;C;264;19;0;0;0;gP
5;C;264;24;0;0;0;gR
6;0;12;88;0;0;0;;DECIMAL
7;30;;0;0;0;1-;CONTROL
8;12;;0;0;0;2;
9;70;264;12;0;0;0;gREPORT *
10;12;;0;0;0;3;
11;73;261;0;0;0;0;gOK
12;10;;0;0;0;5e;*
13;5;1;44;1;0;0;
14;76;261;0;0;0;0;
15;0;12;88;2;0;0;BASIC;BINARY
16;12;;0;0;0;t;
17;72;264;12;0;0;0;gREPORT
18;76;264;6;0;0;0;gCHECK CONTROL
19;0;12;88;2;0;0;BASIC;PATTERN
20;70;264;6;0;0;0;gOK
21;12;;0;0;0;1;
22;70;264;6;0;0;0;gOK
23;76;264;12;0;0;0;gREPORT
24;;12;88;0;0;0;CAHR;RELATIVE ADDRESS
25;12;;0;0;0;4:;
26;71;264;31;0;0;0;gNOT COLON
27;0;12;66;0;0;0;
28;5;12;67;0;0;0;12/67=REF,12/66=ITEM
29;5;12;66;0;0;0;
30;76;264;6;0;0;0;gCHECK CONTROL
31;0;12;66;0;0;0;
32;30;;0;0;0;1;
33;1;12;88;2;0;0;ASSEMBLER REF/ITEM
34;5;12;66;0;0;0;
35;83;263;8;0;0;5;INHIBIT ANOTHER DIRECTIVE
36;76;264;15;0;0;0;gCHECK AS BINARY
37;12;;0;0;0;7e;
38;70;264;46;0;0;0;gIS ')'
39;0;94;2-;0;2;0;
40;12;;0;0;0;52;B
41;70;264;15;0;0;0;LAST CHAR WAS 'B'gCHECK THIS
42;0;94;3-;0;2;0;
43;12;;0;0;0;52;B
44;70;264;15;0;0;0;ONE BEFORE WAS 'B'gCHECK THIS
45;76;262;17;0;0;0;NEITHER WAS 'B'gIGNORE
46;86;267;0;0;0;0;CHECK SWITCH
47;124;94;61;0;0;0;CTR IN DIRECTIVE LINE
48;5;94;62;0;0;0;
49;10;;0;0;0;2;
50;4;94;61;0;0;0;
51;83;263;8;0;0;4;'COMMA FORBIDDEN'
52;76;261;0;0;0;0;gGNC
SHEET;167
PROCR;265;TIDY UP AND REASSEMBLE CONST
NOTES;RADIX;;
0;10;;0;0;0;7:;
1;5;94;0;0;2;0;STORE END SIGN
2;86;263;8;0;0;0;DIRECTIVE SWITCH
3;12;;0;0;0;4;
4;72;265;6;0;0;0;gOK SWITCH SETTINGS
5;80;295;0;0;0;0;gIGNORE THIS CONST
6;;94;60;0;0;0;COMMASX2
7;70;265;12;0;0;0;gOK
8;11;;0;0;0;2;
9;2;94;61;0;0;0;DIRECTIVE CTR
10;70;265;12;0;0;0;gOK
11;80;295;0;0;0;0;gIGNORE THIS CONST
12;;94;61;0;0;0;DIRECTIVE CTR
13;12;;0;0;0;+;
14;73;265;16;0;0;0;gOK, NOT MORE THAN 5
15;80;295;0;0;0;0;gIGNORE
16;96;;0;0;2;0;
17;5;12;70;0;0;0;TOT NO OF CHARS
18;91;;0;0;2;0;CLEAR BOTH
19;91;;0;0;3;0;
20;86;495;0;0;0;0;
21;70;265;42;0;0;0;gNO REL ADDRESS IN CONST
22;91;;0;0;1;0;
23;0;12;67;0;0;0;REF
24;12;;0;0;0;100;
25;73;265;42;0;0;0;gSECTION
26;12;;0;0;0;899;
27;72;265;42;0;0;0;gEX RANGE
28;0;12;67;0;0;0;
29;62;;0;0;0;0;
30;32;;0;0;0;2-;REPLACE 3-DIGIT NUMBER
31;5;94;1-;0;1;0;(FIRST DIGIT ALWAYS NONZERO)
32;32;;0;0;0;1;
33;71;265;35;0;0;0;
34;10;;0;0;0;30;
35;5;94;0;0;1;0;
36;32;;0;0;0;1;
37;71;265;39;0;0;0;
38;10;;0;0;0;30;
39;5;94;1;0;1;0;
40;54;1;6;0;0;18;
41;76;265;78;0;0;0;gASSEMBLE
42;0;12;33;0;0;0;
43;70;266;15;0;0;0;gMT
44;54;1;6;0;0;18;CLEAR 1/6'-1/22'=EDIT AREA
45;87;27;10;0;0;0;
46;C;265;78;0;0;0;gPT
47;C;265;48;0;0;0;gCARDS
48;;94;61;0;0;0;DIRECTIVE CTR
49;12;;0;0;0;4;
50;72;265;67;0;0;0;gMIXED CONST
51;86;267;0;0;0;0;
52;12;;0;0;0;1;
53;71;265;67;0;0;0;gNOT ALPHA
54;;94;0;0;0;0;FIRST CHAR
55;12;;0;0;0;7t;
56;70;265;58;0;0;0;g'('
57;10;;0;0;0;3-;
58;11;;0;0;0;3;
59;17;12;90;0;0;3;LONG/SHORT CTR
60;11;;0;0;0;1.00002;END VALUE 30
61;3;12;70;0;0;0;NEW CONSTANTS LENGTH
62;91;;0;0;1;0;
63;10;;0;0;0;7:;
64;5;94;0;0;1;0;
65;94;265;64;0;1;1;gCLEAR REST OF CONSTANT
66;76;265;78;0;0;0;
67;90;;0;0;1;28;
68;C;;0;0;0;0;
69;;94;0;0;1;0;
70;71;265;72;0;0;0;gFIRST NONZERO CHAR FROM END
71;94;265;69;0;1;1-;
72;10;;0;0;0;7:;
73;5;94;1;0;1;0;SET NEW CONST END
74;5;94;29;0;0;0;CLEAR OLD END
75;96;;0;0;1;0;
76;11;;0;0;0;1;
77;5;12;70;0;0;0;NEW NUMBER OF CHARS
78;;94;0;0;2;0;
SHEET;168
PROCR;266;
NOTES;RADIX;;
0;30;;0;0;0;2;
1;1;94;1;0;2;0;
2;30;;0;0;0;2;
3;1;94;2;0;2;0;
4;30;;0;0;0;2;
5;1;94;3;0;2;0;
6;30;;0;0;0;2;
7;1;94;4;0;2;0;
8;5;1;6;1;3;0;STORE NEXT WORD OF CONST
9;125;;2;0;3;0;
10;125;;5;0;2;0;
11;96;;0;0;2;0;
12;12;;0;0;0;1;
13;2;12;70;0;0;0;NO OF CHARS
14;73;265;78;0;0;0;gCYCLE FOR MULTIPLE OF 5
15;;1;42;1;0;0;
16;2;318;24;1;0;0;
17;71;266;20;0;0;0;gOK
18;80;263;8;0;0;0;CLEAR ALL DETAILS
19;76;249;0;0;0;0;
20;0;94;61;0;0;0;SF CTR IN DIRECTIVE LINE
21;12;;0;0;0;4;
22;72;249;0;0;0;0;gCONST IS MIXED OR CONTAINS (E)
23;90;;0;0;1;0;CLEAR MODIFIER
24;C;;0;0;0;0;/////
25;;94;0;0;1;0;NEXT CHAR
26;12;;0;0;0;7t;
27;71;267;0;0;0;0;gNOT'('
28;0;94;1;0;1;0;CHAR AFTER'('
29;94;;0;0;1;1;
30;12;;0;0;0;7e;)'
31;71;266;28;0;0;0;
32;94;;0;0;1;1;TO SELECT CHAR AFTER DIRECTIVE
SHEET;169
PROCR;267;CONSTANTS SWITCH
NOTES;RADIX;;
0;85;267;0;0;0;0;
1;C;268;0;0;0;0;
2;C;269;0;0;0;0;
3;C;270;0;0;0;0;
4;C;272;0;0;0;0;
5;C;267;6;0;0;0;gRELATIVE ADDRESS
6;;12;67;0;0;0;REF(DEC)
7;12;;0;0;0;1000;
8;72;267;11;0;0;0;gREPORT R
9;11;;0;0;0;p67;1000-99 BIN RADIX
10;72;267;13;0;0;0;gREF IS A PROCR
11;80;225;0;0;0;0;gREPORT R
12;76;249;0;0;0;0;
13;;12;66;0;0;0;ITEM
14;12;;0;0;0;99;
15;72;245;19;0;0;0;gREPORT I
16;76;249;0;0;0;0;gOK
SHEET;170
PROCR;268;CHECK ALPHA CONSTANTS
NOTES;RADIX;;
0;00;12;90;0;0;0;LONG/SHORT CONST INDICATOR
1;70;268;3;0;0;0;
2;10;;0;0;0;3;
3;11;;0;0;0;2;
4;98;;0;0;1;0;+MODIFIER=DIRECTIVE LENGTH
5;2;12;70;0;0;0;TOT CHARS IN CONST+1 (INDIRECTIVE)
6;72;249;0;0;0;0;gOK
7;76;273;0;0;0;0;gREPORT*
SHEET;171
PROCR;269;CHECK DECIMAL CONSTANTS
NOTES;RADIX;;
0;00;12;90;0;0;0;LONG/SHORT CONST INDICATOR
1;70;269;3;0;0;0;gSHORT
2;10;;0;0;0;5;
3;11;;0;0;0;5;
4;5;12;67;0;0;0;
5;124;12;70;0;0;0;CHARS IN CONST
6;;94;1-;0;0;0;FINAL BEFORE NE
7;12;;0;0;0;10;
8;70;269;11;0;0;0;gALLOW FOR SIGN
9;0;12;67;0;0;0;
10;76;268;4;0;0;0;gCHECK
11;0;12;67;0;0;0;
12;11;;0;0;0;1;
13;76;268;4;0;0;0;gCHECK
SHEET;172
PROCR;270;BINARY NUMBERS
NOTES;RADIX;;
0;90;;0;0;2;0;
1;C;;0;0;0;11;
2;;94;0;0;1;0;NEXT CHAR
3;12;;0;0;0;7:;
4;70;271;0;0;0;0;gNUMBER END
5;11;;0;0;0;6:;
6;70;271;0;0;0;0;gMINUS SIGN
7;11;;0;0;0;10;
8;5;12;10;1;0;0;STORE CHAR
9;0;12;66;1;0;0;
10;30;;0;0;0;1;
11;1;12;10;2;0;0;BASIC QTT
12;5;12;66;1;0;0;ASSEMBLE CONST QTT BY QTT
13;94;270;14;0;1;1;
14;94;270;2;0;2;1;
15;76;273;0;0;0;0;gREPORT TOO MANY CHARS
SHEET;173
PROCR;271;
NOTES;RADIX;;
0;00;12;90;0;0;0;LONG/SHORT CONST IND
1;71;249;0;0;0;0;
2;;12;66;1;0;0;
3;12;;0;0;0;1048576;
4;72;273;0;0;0;0;
5;76;249;0;0;0;0;
SHEET;174
PROCR;272;BINARY PATTERN
NOTES;RADIX;;
0;00;12;90;0;0;0;LONG/SHORT CONST IND
1;70;272;3;0;0;0;
2;10;;0;0;0;14;
3;11;;0;0;0;14;
4;76;269;4;0;0;0;gCHECK LENGTH VIA DEC
SHEET;175
PROCR;273;ERROR REPORT
NOTES;RADIX;;
0;10;;0;0;0;5e;*
1;5;1;44;1;0;0;
2;76;249;0;0;0;0;
SHEET;176
PROCR;274;GET NEXT CHAR OF CONSTANT(IE NEXT WORD)
NOTES;RADIX;;
0;81;274;0;0;0;0;
1;10;;0;0;0;0;
2;94;274;11;0;3;1;gHAVE NOT EXHAUSTED 5-CHAR WORD
3;94;274;8;0;1;2;STEP FOR NEXT WORD,IF PRESENT
4;80;295;0;0;0;0;gIGNORE, MORE THAN 45 CHAR
5;10;;0;0;0;7:;
6;32;;0;0;0;2-;
7;82;274;0;0;0;0;
8;90;;0;0;3;0;R3 COUNTS A 5-CHAR WORD
9;C;;0;0;0;5;
10;34;1;6;1;1;0;NEXT WORD OF CONSTANT
11;82;274;0;0;0;0;
SHEET;177
PROCR;275;ALTERNATIVE ENTRY TO UPDATE ADDRESS
0;81;275;0;0;0;0;
1;5;12;88;2;0;0;
2;0;275;0;0;0;0;
3;3;274;0;0;0;0;SET NONZERO='NOT P'
4;5;234;0;0;0;0;
5;76;234;3;0;0;0;gENTER
SHEET;178
PROCR;276;TABLES
NOTES;RADIX;;
0;05;12;3;0;0;0;CLEAR ERROR WL
1;90;;0;0;2;0;
2;C;;0;0;0;8;
3;0;1;22;0;2;0;ITEM
4;05;1;10;0;0;0;
5;00;1;20;1;2;0;REF(NUM)
6;80;275;0;0;0;0;gUPDATE ADDRESS
7;00;1;10;0;0;0;NEW ITEM
8;05;1;22;0;2;0;
9;00;12;4;0;0;0;NEW REF
10;5;1;20;0;2;0;
11;80;277;0;0;0;0;CHECK REF
12;;1;19;0;0;0;DISC
13;70;276;19;0;0;0;g
14;10;;0;0;0;1;1
15;32;;0;0;0;10-;gB
16;36;1;10;0;0;0;ITEM
17;70;276;19;0;0;0;gEVEN
18;80;226;0;0;0;0;gREPORT I
19;94;276;3;0;2;4;
20;76;278;0;0;0;0;
SHEET;179
PROCR;277;SR TO CHECK TABLE ADDRESSES AND VALUE ADDRESSES
NOTES;RADIX;;
0;81;277;0;0;0;0;
1;83;173;0;0;0;1;
2;;12;4;0;0;0;REF TO BE CHECKED
3;70;277;12;0;0;0;OK
4;12;;0;0;0;100;
5;72;277;10;0;0;0;gNOT SECTION
6;80;225;0;0;0;0;gREPORT R
7;80;295;0;0;0;0;gIGNORE
8;83;173;0;0;0;2;IGNORE ANY MORE 'VALTHIS REF FOR
9;76;277;12;0;0;0;
10;12;;0;0;0;900;
11;72;277;6;0;0;0;gREF>999,IGNORE
12;82;277;0;0;0;0;
SHEET;180
PROCR;278;TABLE SWITCH
NOTES;RADIX;;
0;0;1;19;0;0;0;DISC
1;73;282;16;0;0;0;gREPORT T5
2;12;;0;0;0;3;
3;72;282;16;0;0;0;
4;0;1;20;0;0;0;FIRST REF
5;70;282;22;0;0;0;gREPORT T1
6;85;278;6;0;0;0;
7;C;279;0;0;0;0;
8;C;281;0;0;0;0;
9;C;279;8;0;0;0;gTYPE 3
10;C;281;0;0;0;0;
11;C;249;0;0;0;0;
SHEET;181
PROCR;279;TYPES 1 AND 3
NOTES;RADIX;;EDIT AND UNPACK FIXED
0;;1;12;0;0;0;NO OF CHARS
1;1;1;14;0;0;0;SPACES
2;4;12;5;0;0;0;TOTAL FOR TABLE
3;;1;16;0;0;0;SIGN
4;12;;0;0;0;2;
5;71;279;8;0;0;0;gNOT SEPARATE CHARACTER
6;10;;0;0;0;1;
7;4;12;5;0;0;0;STEP TOTAL
8;;1;24;0;0;0;SECOND REF
9;34;1;26;0;0;0;SECOND ITEM
10;75;282;20;0;0;0;gREPORT T3
11;;1;11;0;0;0;
12;71;282;14;0;0;0;g'UNPACK TO BE' IS SET
13;0;1;19;0;0;0;DISC
14;12;;0;0;0;1;
15;70;279;17;0;0;0;
16;10;;0;0;0;5-;
17;11;;0;0;0;10;
18;2;1;12;0;0;0;CHARS
19;2;1;13;0;0;0;DISCARDS
20;73;282;12;0;0;0;gIN CONSISTENT WITH SOURCE LENGTH
21;1;1;12;0;0;0;
22;1;1;13;0;0;0;
23;2;1;15;0;0;0;ZEROS
24;73;282;6;0;0;0;gMORE ZEROS THAN SOURCE
SHEET;182
PROCR;280;
NOTES;RADIX;;
0;;1;14;0;0;0;
1;12;;0;0;0;16;
2;72;282;8;0;0;0;gTOO MANY SPACES
3;0;1;12;0;0;0;CHARS
4;70;282;12;0;0;0;gREPORT'T7'
5;0;1;19;0;0;0;DISC
6;12;;0;0;0;2;
7;71;280;10;0;0;0;gNOT ALPHA
8;0;1;15;0;0;0;ZEROS
9;71;282;6;0;0;0;gREPORT'T10'
10;;1;17;0;0;0;STERLING INDICTOR
11;71;280;15;0;0;0;
12;2;12;63;0;0;0;STERLING CTR
13;70;280;22;0;0;0;gOK
14;76;280;36;0;0;0;gREPORT 'T12'
15;12;;0;0;0;1;
16;71;282;2;0;0;0;
17;;12;63;0;0;0;
18;12;;0;0;0;2;
19;70;280;21;0;0;0;
20;11;;0;0;0;3;
21;5;12;63;0;0;0;
22;;1;18;0;0;0;LAST TABLE ENTRY IND
23;3;12;6;0;0;0;COPY TO WL
24;70;249;0;0;0;0;
25;12;;0;0;0;1;
26;71;282;0;0;0;0;g'T13' IF LTE WRONG
27;;12;5;0;0;0;CHARACTERS EDITED
28;1;12;5;0;0;0;
29;30;;0;0;0;9;
30;70;280;33;0;0;0;gMULT OF 5
31;10;;0;0;0;727464;'SUM'
32;5;1;44;1;0;0;
33;5;12;5;0;0;0;CLEAR CTR AT EACH LTE
34;2;12;63;0;0;0;STERLING INDICATORAS NOT
35;70;249;0;0;0;0;OCCURRED IN 3;CONSECUTIVE LINES
36;4;12;63;0;0;0;CLEAR COUNTER
37;76;282;2;0;0;0;ERROR REPORT;T12
SHEET;183
PROCR;281;CHECK TABLES
NOTES;RADIX;;TYPES 2 AND 4
0;;1;11;0;0;0;'SINGLE/BE'
1;70;281;6;0;0;0;
2;12;;0;0;0;1;
3;71;282;14;0;0;0;
4;;1;18;0;0;0;'LAST TABLE ENTRY'
5;70;282;0;0;0;0;
6;;1;12;0;0;0;NO OF CHARS
7;71;282;12;0;0;0;
8;;1;13;0;0;0;DISCARDS
9;71;282;10;0;0;0;
10;;1;14;0;0;0;SPACES
11;71;282;8;0;0;0;
12;;1;15;0;0;0;ZEROS
13;71;282;6;0;0;0;
14;;1;16;0;0;0;SIGN
15;70;281;18;0;0;0;
16;12;;0;0;0;2;
17;71;282;4;0;0;0;
18;;1;17;0;0;0;STERLING IND
19;71;282;2;0;0;0;
20;76;249;0;0;0;0;
SHEET;184
PROCR;282;MAKE REPORT'T*'
NOTES;RADIX;;
0;10;;0;0;0;1;T13
1;5;12;3;0;0;0;
2;10;;0;0;0;1;T12
3;4;12;3;0;0;0;
4;10;;0;0;0;1;T11
5;4;12;3;0;0;0;
6;10;;0;0;0;1;T10
7;4;12;3;0;0;0;
8;10;;0;0;0;1;T9
9;4;12;3;0;0;0;
10;10;;0;0;0;1;T8
11;4;12;3;0;0;0;
12;10;;0;0;0;1;T7
13;4;12;3;0;0;0;
14;10;;0;0;0;1;T6
15;4;12;3;0;0;0;
16;10;;0;0;0;1;T5
17;4;12;3;0;0;0;
18;10;;0;0;0;1;T4
19;4;12;3;0;0;0;
20;10;;0;0;0;2;T3
21;4;12;3;0;0;0;
22;10;;0;0;0;1;T1
23;1;12;3;0;0;0;
24;5;12;88;0;0;0;
25;52;1;44;0;0;0;
26;C;306;4;0;0;0;
27;10;;0;0;0;730000;
28;4;1;44;1;0;0;
29;76;249;0;0;0;0;
SHEET;185
PROCR;283;UNPACK PAPER TAPE PART ONE-DIRECTIVES
NOTES;RADIX;;
0;81;283;0;0;0;0;
1;54;1;0;1;0;46;
2;;12;38;0;0;0;
3;70;285;0;0;0;0;gNOT A DIRECTIVE
4;87;27;10;0;0;0;
5;C;283;7;0;0;0;P/T
6;C;283;29;0;0;0;CARDS
7;00;92;30;0;0;0;AMEND RUN?
8;70;283;11;0;0;0;gNO
9;124;311;0;0;2;0;
10;76;283;12;0;0;0;
11;124;311;2;0;2;0;
12;80;325;0;0;0;0;UNPACK P/T S/DIR
13;0;27;5;0;0;0;
14;12;;0;0;0;2;
15;71;283;26;0;0;0;gNOT TABLE
16;00;12;38;0;0;0;
17;73;283;26;0;0;0;gNOT 'NOTES' OF TABLE
18;10;;0;0;0;0;S/DIR WAS 'NOTES' OF TABLE
19;05;1;8;1;0;0;& MUST BE UNPACKED DIFFERENTLY
20;00;92;30;0;0;0;
21;70;283;24;0;0;0;gINITIAL TRANSLATION
22;124;311;8;0;2;0;
23;76;283;25;0;0;0;
24;124;311;10;0;2;0;
25;80;325;0;0;0;0;UNPACK CORRECTLY
26;10;;0;0;0;0;
27;5;1;44;1;0;0;CLEAR ERROR WL
28;82;283;0;0;0;0;
29;50;9;8;0;0;0;UNPACK S/DIR FROM CARD
30;C;311;2;0;0;0;
31;55;9;18;1;0;16;
32;C;1;18;1;0;0;
33;00;1;8;1;0;0;
34;30;;0;0;0;4;LEFT ALIGN SECTION NO
35;05;1;8;1;0;0;
36;00;12;38;0;0;0;
37;73;283;26;0;0;0;NOT 'NOTES'
38;;27;5;0;0;0;
39;12;;0;0;0;1;
40;71;283;26;0;0;0;gNOT 'PROCR', LEAVE SR
41;00;1;18;1;0;0;S/DIR WAS ''NOTES'' OF PROCR
42;05;1;8;1;0;0;MOVE ''RADIX''
43;55;9;20;1;0;16;COPY WORDS
44;C;1;18;1;0;0;
45;82;283;0;0;0;0;
SHEET;186
PROCR;284;UNPACK OFF MAGNETIC TAPE-ONE RECORD PER BLOCK
NOTES;RADIX;;
0;81;284;0;0;0;0;
1;54;1;6;1;0;40;
2;;27;1;0;0;0;
3;71;304;0;0;0;0;gMULTI-RECORD BLOCKS
4;;12;38;0;0;0;
5;70;284;19;0;0;0;gNOT DIRECTIVE
6;50;7;4;0;0;0;
7;C;307;0;0;0;0;
8;;12;86;0;0;0;
9;70;284;16;0;0;0;
10;;27;5;0;0;0;
11;12;;0;0;0;1;
12;70;284;44;0;0;0;g'PROCR'
13;0;7;20;1;0;0;
14;5;1;16;1;0;0;COPY TABLE OR CONST TYPE
15;76;284;44;0;0;0;
16;55;7;20;1;0;30;
17;C;1;16;1;0;0;
18;76;284;43;0;0;0;
19;87;27;5;0;0;0;
20;C;284;29;0;0;0;g'PROCR'
21;C;284;32;0;0;0;g'TABLE'
22;C;284;35;0;0;0;g'CONST'
23;C;284;24;0;0;0;'VALUE'=4
24;55;7;8;2;0;36;R,I+VALUES
25;C;1;9;0;0;0;
26;55;7;44;2;0;6;ANNOTATION
27;C;1;40;2;0;0;
28;82;284;0;0;0;0;
29;50;7;4;0;0;0;INSTRUCTIONS
30;C;308;0;0;0;0;
31;76;284;39;0;0;0;
32;50;7;4;0;0;0;
33;C;309;0;0;0;0;UNPACK TABLE ENTRIES
34;76;284;39;0;0;0;
35;55;7;12;1;0;18;CONSTANTS
36;C;1;6;1;0;0;
37;;7;4;2;0;0;AMEND IND
38;5;1;0;1;0;0;
39;;12;86;0;0;0;
40;71;284;44;0;0;0;
41;55;7;32;1;0;18;
42;C;1;28;1;0;0;
43;5;1;44;1;0;0;CLEAR ERROR;INDICATOR
44;82;284;0;0;0;0;
SHEET;187
PROCR;285;UNPACK PAPER TAPE PART TWO
NOTES;RADIX;;
0;87;27;5;0;0;0;
1;C;286;0;0;0;0;g'PROCR'
2;C;286;5;0;0;0;g'TABLE'
3;C;286;8;0;0;0;g'CONST'
4;C;283;26;0;0;0;'VALUE'(DUMMY)
SHEET;188
PROCR;286;UNPACK PAPER TAPE PART THREE
NOTES;RADIX;;
0;124;312;0;0;2;0;
1;80;325;0;0;0;0;gINSTRUCTIONS
2;10;;0;0;0;0;
3;5;1;20;1;0;0;CLEAR'CLEO'WORD
4;76;283;26;0;0;0;
5;124;313;0;0;2;0;
6;80;325;0;0;0;0;gTABLE ENTRIES
7;76;283;26;0;0;0;
8;124;314;0;0;2;0;
9;80;325;0;0;0;0;gCONSTANTS
10;50;9;4;0;0;0;
11;C;310;6;0;0;0;
12;76;283;26;0;0;0;
SHEET;189
PROCR;287;TEST WORD IN ACCUMULATOR
NOTES;RADIX;;IS A STACKING WORD
0;81;287;0;0;0;0;
1;2;318;2;1;0;0;'CONST'
2;73;287;33;0;0;0;gNOT DIRECTIVE
3;70;287;26;0;0;0;
4;1;318;2;1;0;0;
5;02;318;10;1;0;0;'NOTES'
6;71;287;12;0;0;0;gNO
7;;27;5;0;0;0;
8;12;;0;0;0;3;
9;70;287;33;0;0;0;gNOTES FOLLOWING 'CONST'-NOT DIRECTIVE
10;10;;0;0;0;10;SET (12/38)>0
11;76;287;31;0;0;0;
12;01;318;10;1;0;0;'NOTES'
13;02;318;4;1;0;0;'PROCR'
14;70;287;28;0;0;0;gYES
15;73;287;33;0;0;0;gNOT A DIRECTIVE
16;01;318;4;1;0;0;'PROCR'
17;02;318;0;1;0;0;'TABLE'
18;70;287;27;0;0;0;gYES
19;73;287;33;0;0;0;gNOT A DIRECTIVE
20;01;318;0;1;0;0;'TABLE'
21;02;318;26;1;0;0;'VALUE'
22;71;287;33;0;0;0;gHENCE NOT A DIRECTIVE
23;;12;33;0;0;0;
24;71;287;33;0;0;0;
25;10;;0;0;0;1;gPT IN,'VALUE' ISNT A DIRECTIVE
26;11;;0;0;0;1;
27;11;;0;0;0;1;(CONST)
28;11;;0;0;0;1;(TABLE)
29;5;27;5;0;0;0;(PROCR)
30;12;;0;0;0;10;
31;05;12;38;0;0;0;SET<0 IF PROCR/TABLE/CONST/VALUE
32;82;287;0;0;0;0;
33;10;;0;0;0;0;
34;05;12;38;0;0;0;
35;82;287;0;0;0;0;
SHEET;190
PROCR;288;SQUASH NEXT RECORD IN SEC 29,COPY TO 8,WRITE 8 IF FULL
NOTES;RADIX;;
0;81;288;0;0;0;0;
1;;12;110;0;0;0;CARD SER ERROR
2;70;288;9;0;0;0;gNO ERROR
3;;12;111;0;0;0;
4;70;288;8;0;0;0;
5;124;318;20;0;1;0;
6;124;305;8;0;1;0;
7;5;29;0;1;0;0;WRONG SERIAL TO ERROR REPORT WORD
8;5;12;110;0;0;0;
9;90;;0;0;1;44;
10;C;;0;0;0;2;
11;;29;2-;1;1;0;LAST WORD
12;71;288;14;0;0;0;gNON-ZERO
13;94;288;11;0;1;2-;
14;96;;0;0;1;0;CONTENTS OF MODIFIER
15;3;29;0;2;0;0;REC LENGTH
16;10;;0;0;0;90;TOTAL ROOM SEC 8
17;2;317;10;0;0;0;
18;2;29;0;2;0;0;CURRENT RECORD LENGTH
19;72;288;28;0;0;0;g+VE OR ZERO
20;;317;10;0;0;0;
21;3;8;4;2;0;0;BLOCK LENGTH
22;91;317;10;0;1;0;
23;;318;8;1;0;0;BE WORD
24;5;8;6;1;1;0;
25;80;290;0;0;0;0;gWRITE
26;54;8;4;1;0;46;
27;5;317;10;0;0;0;CLEAR
28;10;;0;0;0;6;
29;5;12;2;0;0;0;
30;91;317;10;0;1;0;
31;55;29;0;1;0;0;COPY TO SEC 8
32;C;8;6;1;1;0;
33;C;29;0;2;0;0;
34;;29;0;2;0;0;
35;4;317;10;0;0;0;STEP QTTY IN BLOCK TO DATE
36;54;29;0;1;0;44;CLEAR SEC 29
37;82;288;0;0;0;0;
SHEET;191
PROCR;289;
0;81;289;0;0;0;0;
1;0;318;8;1;0;0;
2;5;8;50;1;0;0;BEW
3;80;290;0;0;0;0;
4;54;8;4;1;0;46;
5;82;289;0;0;0;0;
SHEET;192
PROCR;290;
0;81;290;0;0;0;0;
1;43;A2;0;0;0;0;
2;C;8;0;0;0;0;
3;82;290;0;0;0;0;
SHEET;193
PROCR;291;READ B/FWD MT FILE
0;81;291;0;0;0;0;
1;42;A1;0;0;0;0;
2;C;7;0;0;0;0;
3;82;291;0;0;0;0;
SHEET;194
PROCR;292;INPUT OFF PAPER TAPE
NOTES;RADIX;;
0;81;292;0;0;0;0;
1;80;301;0;0;0;0;gREAD A6
2;;9;4;1;0;0;
3;2;318;44;1;0;0;'TRAMD'
4;70;292;17;0;0;0;gDONT INSERT BE
5;34;9;48;2;0;0;
6;10;;0;0;0;0;
7;32;;0;0;0;7;
8;5;319;40;1;0;0;WORD CTR
9;91;319;40;0;1;0;
10;32;;0;0;0;3;
11;5;288;0;0;0;0;COL POSNgWL
12;35;;0;0;0;11;
13;10;;0;0;0;7.;
14;124;288;0;0;1;0;
15;32;;0;0;0;0;/////
16;37;9;0;1;1;0;
17;82;292;0;0;0;0;
SHEET;195
PROCR;293;TEST AMENDMENT IS A STACKING DIRECTIVE
NOTES;RADIX;;
0;81;293;0;0;0;0;
1;54;1;0;1;0;8;
2;124;311;0;0;2;0;
3;80;325;0;0;0;0;
4;;1;6;1;0;0;
5;80;287;0;0;0;0;gTEST DIRECTIVE
6;82;293;0;0;0;0;
SHEET;196
PROCR;294;TEST FOR MOD END SIGN
NOTES;RADIX;;OR DIRECTIVE
0;81;294;2;0;0;0;
1;;9;4;1;0;0;
2;30;;0;0;0;4-;
3;30;;0;0;0;4;
4;2;318;12;1;0;0;'END  '
5;70;294;9;0;0;0;
6;;9;4;1;0;0;
7;2;318;44;1;0;0;'TRAMD'
8;71;294;11;0;0;0;
9;10;;0;0;0;100000;
10;76;294;32;0;0;0;
11;10;;0;0;0;0;CLEAR LOCATION;TO WHICH
12;5;1;4;1;0;0;AMENDMENT DIRECTIVE;IS UNPACKED
13;124;311;8;0;2;0;
14;80;325;0;0;0;0;gUNPACK AMEND LETTER
15;34;1;4;1;0;0;
16;10;;0;0;0;0;
17;32;;0;0;0;2;
18;12;;0;0;0;69;
19;70;294;29;0;0;0;
20;11;;0;0;0;15;
21;70;294;28;0;0;0;
22;12;;0;0;0;19;
23;70;294;27;0;0;0;
24;11;;0;0;0;22;
25;71;294;34;0;0;0;
26;10;;0;0;0;1;
27;11;;0;0;0;1;
28;11;;0;0;0;1;
29;11;;0;0;0;1;
30;84;254;0;0;0;0;
31;10;;0;0;0;1;
32;3;12;44;1;0;0;
33;82;294;0;0;0;0;
34;10;;0;0;0;0;
35;76;294;32;0;0;0;
SHEET;197
PROCR;295;IGNORE THIS INSTRUCTION
NOTES;RADIX;;
0;81;295;0;0;0;0;
1;;318;24;1;0;0;
2;5;1;42;1;0;0;
3;82;295;0;0;0;0;
SHEET;198
PROCR;296;IGNORE PREVIOUS INSTRUCTION
NOTES;RADIX;;
0;81;296;0;0;0;0;
1;;318;24;1;0;0;
2;124;318;20;0;1;0;
3;124;305;0;0;1;0;
4;5;29;14;1;0;0;
5;82;296;0;0;0;0;
SHEET;199
PROCR;297;+ANNOTATION IF CARD
NOTES;RADIX;;
0;81;297;0;0;0;0;
1;10;;0;0;0;p;
2;82;297;0;0;0;0;
SHEET;200
PROCR;298;BULK COPY ANNOTATION
NOTES;RADIX;;
0;81;298;0;0;0;0;
1;55;9;18;1;0;16;
2;C;1;28;1;0;0;
3;82;298;0;0;0;0;
SHEET;201
PROCR;299;TEST END SIGN ON MAG TAPE
NOTES;RADIX;;
0;81;299;0;0;0;0;
1;;27;1;0;0;0;
2;70;299;5;0;0;0;g1 RECORD PER BLOCK
3;;;6;1;8;0;
4;76;299;6;0;0;0;
5;00;7;10;1;0;0;
6;2;318;12;1;0;0;
7;70;321;0;0;0;0;
8;82;299;0;0;0;0;
SHEET;202
PROCR;300;LEFT ALIGN SUB-ROUTINE
NOTES;RADIX;;
0;81;300;0;0;0;0;DATA IN B
1;10;;0;0;0;0;
2;74;300;6;0;0;0;ZERO NUMBER?
3;32;;0;0;0;2;
4;70;300;3;0;0;0;
5;32;;0;0;0;8;LEFT ALIGN IN A
6;82;300;0;0;0;0;
SHEET;203
PROCR;301;
0;81;301;0;0;0;0;
1;42;A6;0;0;0;0;
2;C;9;0;0;0;0;
3;82;301;0;0;0;0;
SHEET;204
PROCR;302;STEP MR,TEST END OF BLOCK
0;81;302;0;0;0;0;
1;;27;1;0;0;0;
2;70;302;11;0;0;0;g1 RECORD PER BLOCK
3;;;0;2;8;0;CURRENT RECORD LENGTH
4;5;291;0;0;0;0;WL
5;97;291;0;0;8;0;
6;C;302;10;0;0;0;gBLOCK NOT EMPTY
7;80;291;0;0;0;0;gREAD A1
8;59;7;6;0;8;0;
9;C;7;4;2;0;0;
10;82;302;0;0;0;0;
11;80;291;0;0;0;0;gREAD A1
12;82;302;0;0;0;0;
SHEET;205
PROCR;303;TEST MT=STACK DIRECTIVE
0;81;303;0;0;0;0;
1;;27;1;0;0;0;
2;70;303;6;0;0;0;
3;;;6;1;8;0;
4;80;287;0;0;0;0;
5;82;303;0;0;0;0;
6;;7;10;1;0;0;
7;76;303;4;0;0;0;
SHEET;206
PROCR;304;UNPACK MT-MULTIRECORD BLOCKS
0;62;;0;0;0;0;
1;54;28;0;1;0;46;
2;;12;38;0;0;0;
3;70;304;30;0;0;0;gNOT DIRECTIVE
4;;;0;2;8;0;
5;30;;0;0;0;5;
6;98;;0;0;8;0;
7;128;28;0;1;1;0;COPY DIRECTIVE+LENGTH WORD
8;50;28;2;0;0;0;UNPACK
9;C;307;14;0;0;0;
10;;27;5;0;0;0;
11;12;;0;0;0;1;
12;71;304;17;0;0;0;gNOT'PROCR'
13;;12;38;0;0;0;
14;73;304;17;0;0;0;gNOT NOTES OF PROCR
15;;28;12;1;0;0;
16;5;1;8;1;0;0;COPY'RADIX'
17;;12;86;0;0;0;
18;70;304;27;0;0;0;gNOT'REPLACE ANNOTATION'
19;;27;5;0;0;0;
20;12;;0;0;0;1;
21;71;304;24;0;0;0;gNOT'PROCR'
22;;12;38;0;0;0;
23;73;304;45;0;0;0;gNOT NOTES OF PROCR
24;;28;14;1;0;0;CONST/TABLE TYPE OR RADIX LETTER
25;5;1;16;1;0;0;
26;76;304;45;0;0;0;
27;55;28;14;1;0;26;ANNOTATION ETC EVEN IF ABSENT
28;C;1;16;1;0;0;
29;76;304;45;0;0;0;
30;;27;5;0;0;0;
31;12;;0;0;0;4;
32;70;304;59;0;0;0;gVALUES
33;;;0;2;8;0;
34;3;319;40;0;0;0;LENGTH
35;124;27;5;0;1;0;
36;2;305;0;0;0;0;(MAX DATA LENGTH+2)
37;72;304;47;0;0;0;gRECORD HAS ANNOTATION
38;;319;40;0;0;0;
39;30;;0;0;0;5;
40;98;;0;0;8;0;DATA START
41;128;28;0;1;1;0;COPY RECORD
42;124;27;5;0;1;0;
43;;305;4;0;0;0;
44;128;28;2;0;2;0;UNPACKgSEC1
45;60;;0;0;0;0;
46;82;284;0;0;0;0;
47;5;319;41;0;0;0;ANNOTATION LENGTH;ANNOTATED DATA
48;;12;86;0;0;0;
49;71;304;56;0;0;0;gJUST HERE TO UNPACK NUMBERS
50;;319;41;0;0;0;
51;30;;0;0;0;5;
52;98;;0;0;8;0;
53;124;27;5;0;1;0;
54;1;305;0;0;0;0;DATA LENGTH+2
55;128;1;28;1;1;0;COPY ANNOTATION
56;124;27;5;0;1;0;
57;;305;0;0;0;0;
58;76;304;39;0;0;0;gUNPACK NUMBERS
59;;;0;2;8;0;LENGTH;VALUES
60;12;;0;0;0;6;
61;30;;0;0;0;5;
62;98;;0;0;8;0;START
63;11;;0;0;0;7;
64;128;1;9;1;0;0;ALPHAgNUM
65;76;304;45;0;0;0;gEXIT
SHEET;207
CONST;305;0;FOR UNPACKING MULTIRECORD MT
0;(B)24;DIRECTIVES-ANNOTATION
1;24;ORDER LENGTH+2
2;24;TABLE
3;28;CONSTANT
4;28;VALUES
5;(C)308:0;
6;309:0;
7;310:0;DIRECTIVES-PASS 1 REPORTS
8;(B)12;ORDERS
9;22;TABLE
10;22;CONST
11;26;VALUE
12;42;
SHEET;208
TABLE;306;1;'INDEX LINE'
NOTES;;;
0;12;4;0;0;0;0;3;2;0;2;0;0;0;TO REPLACE CODERS REF
2;92;8;0;0;0;0;2;0;0;2;0;0;1;
4;12;88;0;0;0;0;5;0;0;5;0;0;1;
6;12;88;0;0;2;0;5;0;0;0;0;0;0;'SHEET'
8;12;88;0;0;2;0;5;0;0;0;0;0;1;SHEET NUMBER
SHEET;209
TABLE;307;1;
NOTES;;;
0;1;0;0;0;0;0;5;0;0;5;0;0;0;AMEND IND
2;1;2;0;0;2;0;5;0;0;0;0;0;0;'PROCR/TABLE/CONST'ETC
4;92;35;0;0;0;0;5;0;0;5;0;0;0;
6;1;6;0;0;2;0;5;0;0;0;0;0;0;TYPE
8;92;34;0;0;1;0;10;0;0;10;0;0;0;
10;1;8;0;0;2;0;5;0;0;0;0;0;0;NEW PROCR NUMBER
12;1;14;0;0;0;0;5;0;0;4;0;0;1;PREVIOUS PROCR NUMBER
14;1;0;0;0;0;0;5;0;0;5;0;0;0;AMEND IND-----MULTIREC BLOX
16;1;2;0;0;2;0;5;0;0;0;0;0;0;LINE SERAL
18;1;6;0;0;2;0;5;0;0;0;0;0;0;'PROCR'ETC
20;1;8;0;0;2;0;5;0;0;0;0;0;0;CURRENT PROCR
22;1;14;0;0;0;0;5;0;0;5;0;0;1;PREVIOUS PROCR
SHEET;210
TABLE;308;3;EDIT INSTRUCTIONS
NOTES;;;
0;1;0;0;0;0;0;5;0;0;5;0;0;0;AMEND IND
2;1;2;0;0;2;0;5;0;0;0;0;0;0;LINE SERAL
4;1;6;0;0;2;0;5;0;0;0;0;0;0;ACTION
6;1;8;0;0;2;0;5;0;0;0;0;0;0;REF
8;1;10;0;0;1;0;5;5;0;5;1;0;0;ITEM +/-
10;1;12;0;0;0;0;2;3;0;2;0;0;0;DISC
12;1;14;0;0;0;0;3;2;0;3;0;0;0;MODIFIER
14;1;16;0;0;1;0;10;0;0;10;1;0;0;LITERAL +/-
16;1;20;0;0;2;0;5;0;0;0;0;0;0;'CLEO'PARA WORD
18;1;22;0;0;0;0;5;0;0;5;0;0;1;PREVIOUS PROCR NO
SHEET;211
TABLE;309;1;EDIT TABLE ENTRIES
NOTES;;;
0;1;0;0;0;0;0;5;0;0;5;0;0;0;AMEND IND
2;1;2;0;0;2;0;5;0;0;0;0;0;0;
4;1;20;0;0;0;0;5;0;0;5;0;0;0;FIRST REF
6;1;22;0;0;0;0;5;0;0;5;0;0;0;FIRST ITEM
8;1;24;0;0;0;0;5;0;0;5;0;0;0;SECOND REF
10;1;26;0;0;0;0;5;0;0;5;0;0;0;SECOND ITEM
12;1;19;0;0;0;0;2;3;0;2;0;0;0;DISC
14;1;11;0;0;0;0;3;2;0;3;0;0;0;SINGLE/TO BE
16;1;12;0;0;0;0;2;3;0;2;0;0;0;NO
18;1;13;0;0;0;0;3;2;0;3;0;0;0;DISCARDED
20;1;14;0;0;0;0;2;3;0;2;0;0;0;SPACES
22;1;15;0;0;0;0;3;2;0;3;0;0;0;ZEROS
24;1;16;0;0;0;0;1;4;0;1;0;0;0;SIGN
26;1;17;0;0;0;0;2;3;0;2;0;0;0;STERLING
28;1;18;0;0;0;0;2;3;0;2;0;0;1;LAST TABLE ENTRY
SHEET;212
TABLE;310;3;UNPACK CONSTANT AND EDIT
NOTES;;;
0;1;0;0;0;0;0;5;0;0;5;0;0;0;AMEND IND
2;1;2;0;0;2;0;5;0;0;0;0;0;0;
4;92;34;0;0;0;0;5;0;0;5;0;0;0;ZERO WORD
6;1;6;0;0;2;0;5;0;0;0;0;0;0;CONSTANT UNPACKED
8;1;8;0;0;2;0;5;0;0;0;0;0;0;FIXED FIELD TO
10;1;10;0;0;2;0;5;0;0;0;0;0;0;1/6' ONWARDS
12;1;12;0;0;2;0;5;0;0;0;0;0;0;
14;1;14;0;0;2;0;5;0;0;0;0;0;0;
16;1;16;0;0;2;0;5;0;0;0;0;0;0;
18;1;18;0;0;2;0;5;0;0;0;0;0;0;
20;1;20;0;0;2;0;5;0;0;0;0;0;0;
22;1;22;0;0;2;0;5;0;0;0;0;0;1;
SHEET;213
TABLE;311;3;UNPACK STACKING DIRECTIVE
NOTES;;;FROM CARDS OR PAPER TAPE
0;1;2;0;0;2;0;5;0;0;0;0;0;0;SER+AMEND DIR?
2;1;6;0;0;2;0;5;0;0;0;0;0;0;DIRECTIVE
4;1;8;0;0;2;0;3;0;0;0;0;0;0;SECTION NO
6;1;16;0;0;2;1;5;0;0;0;0;0;1;/////TYPE OR ANNOTATION+TYPE
8;1;2;0;0;2;0;5;0;0;0;0;0;0;SER NO +AMEND DIR?
10;1;6;0;0;2;0;5;0;0;0;0;0;0;''NOTES'' OF TABLE
12;1;16;0;0;2;0;5;0;0;0;0;0;1;ANNOTATION
SHEET;214
TABLE;312;3;UNPACK TABLE ENTRIES
NOTES;;;FROM P/T OR CARDS
0;1;2;0;0;2;0;6;0;0;0;0;0;0;/////SER+AMEND LETTER
2;1;6;0;0;2;0;3;0;0;0;0;0;0;ACTION
4;1;8;0;0;2;0;3;0;0;0;0;0;0;REF
6;1;10;0;0;1;0;5;0;0;0;1;0;0;ITEM
8;1;12;0;0;0;0;1;0;0;0;0;0;0;DIRECTIVE
10;1;14;0;0;0;0;2;0;0;0;0;0;0;M
12;1;16;0;0;1;0;10;0;0;0;1;0;0;LITERAL
14;1;28;0;0;2;0;5;0;0;0;0;0;0;NOTES FROM P/T -RUBBISH FROM CARD
16;1;36;0;0;2;0;5;0;0;0;0;0;1;COMMENTARY FROM P/T
SHEET;215
TABLE;313;3;UNPACK TABLE ENTRIES
NOTES;;;FROM P/T OR CARDS
0;1;2;0;0;2;0;6;0;0;0;0;0;0;/////SER+AMEND LETTER
2;1;20;0;0;0;0;3;0;0;0;0;0;0;FIRST REF
4;1;22;0;0;0;0;5;0;0;0;0;0;0;FIRST ITEM
6;1;24;0;0;0;0;3;0;0;0;0;0;0;SECOND REF
8;1;26;0;0;0;0;5;0;0;0;0;0;0;SECOND ITEM
10;1;19;0;0;0;0;1;0;0;0;0;0;0;DISC
12;1;11;0;0;0;0;1;0;0;0;0;0;0;SINGLE TO BE
14;1;12;0;0;0;0;2;0;0;0;0;0;0;NO OF CHARS
16;1;13;0;0;0;0;2;0;0;0;0;0;0;DISCARDS
18;1;14;0;0;0;0;2;0;0;0;0;0;0;SPACES
20;1;15;0;0;0;0;2;0;0;0;0;0;0;ZEROS
22;1;16;0;0;0;0;1;0;0;0;0;0;0;SIGN
24;1;17;0;0;0;0;1;0;0;0;0;0;0;p
26;1;18;0;0;0;0;1;0;0;0;0;0;0;LTE
28;1;28;0;0;2;0;5;0;0;0;0;0;1;P/T ANNOTATION-SPACES IF CARD
SHEET;216
TABLE;314;3;UNPACKCONSTANT (FIRST STAGE)
NOTES;;;FROM P/T OR CARDS
0;1;2;0;0;2;0;6;0;0;0;0;0;0;/////SER+AMEND LETTER
2;1;6;0;0;2;0;5;0;0;0;0;0;0;CONSTANT (OR FIRST 5 CHS OF CONST)
4;1;28;0;0;2;0;5;0;0;0;0;0;1;
SHEET;217
TABLE;315;1;EDIT ALL BUT TRIAL DATA
NOTES;;;
0;1;9;0;0;0;0;5;0;0;4;0;0;0;
2;1;10;0;0;0;0;5;0;0;4;1;0;1;
SHEET;218
CONST;316;0;CHECKING CONSTANTS FOR INSTRUCTIONS
0;(D)83e91;
1;00e11;
2;pp000;
3;(R)18:2496;FOR SEQUENCE CHANGES
4;(R)18:0;
5;(R)93:0;
6;(R)14:0;
7;(D)0;ZERO IF RT9 PRINTER
SHEET;219
CONST;317;0;MISC
0;(D)2;
1;10000;BIT 17
2;ppp;Q1-3
3;70;BITS 5-7
4;7;BITS 1-3
5;8;BIT 4
6;80;BIT 8
7;p00;Q3
8;4;BIT3
9;0;FIRST RECORD INDICATOR
10;0;ACC.RECORD LENGTH
SHEET;220
CONST;318;1;ALPHA CONSTANTS
0;(A)TABLE;
2;CONST;
4;PROCR;
6;*    ;
8;(D)7.0000007.;BLOCK END WORD
10;(A)NOTES;
12;END  ;
14;DUMPS;
16;FILES;
18;(D)pp+00003pp;BITS 1-10 AND 31-40
20;0;EVEN=WL FOR EDIT SWITCH,ODD=C/FWD HIGHES
22;(A)SHEET;
24;(D)5:5:5:5:5:;'?????'
26;(A)VALUE;
28;(D)6p6p6p6p6p;
30;(A)INDEX;
32;ppppp;
34;2;
36;CHAIN;
38;????R;
40;????I;
42;????*;
44;(A)TRAMD;
46;(B20)16(D)0(C)1:28;BULK COPY
48;(A)FINIS;
SHEET;221
CONST;319;1;CONVERT TABLES
0;(D)1;BINgDEC
2;16;
4;256;
6;4096;
8;65536;
10;1048576;
12;16777216;
14;268435456;
16;4294967296;
18;pppppppppp;
20;1;DECgBIN
22;t;
24;64;
26;3.8;
28;2710;
30;186t0;
32;p4240;
34;989680;
36;5p5.100;
38;3e9t+t00;(A)WL
40;0;BITS 1-6
42;3p;
44;(A)CHAPT;
46;PREND;
SHEET;222
PROCR;320;RIGHT ALIGN A WORD
NOTES;RADIX;;PLACED IN B
0;81;320;0;0;0;0;
1;10;;0;0;0;0;
2;5;12;88;1;0;0;
3;1;12;88;1;0;0;
4;32;;0;0;0;2;LEAVE A CLEAR
5;5;12;88;1;0;0;
6;75;320;3;0;0;0;AND PUT WORD
7;;12;88;1;0;0;
8;82;320;0;0;0;0;IN 12/88'
SHEET;223
PROCR;321;END ROUTINE
NOTES;RADIX;;
0;60;;0;0;0;0;
1;10;;0;0;0;1;
2;4;92;3;0;0;0;STEP PROCR
3;62;;0;0;0;0;
4;;318;20;0;0;0;DIRECTIVE FOR LAST BLOCK DELETED
5;12;;0;0;0;3;
6;71;321;9;0;0;0;gWASNT A CONSTANT
7;10;;0;0;0;1;
8;5;29;6;0;0;0;
9;80;288;0;0;0;0;gO/P FINAL DATA BLOCK
10;0;92;3;0;0;0;
11;30;;0;0;0;2;
12;5;12;88;0;0;0;
13;52;29;4;0;0;0;
14;C;306;4;0;0;0;
15;;9;4;1;0;0;
16;30;;0;0;0;4-;
17;30;;0;0;0;4;
18;2;318;12;1;0;0;
19;70;321;25;0;0;0;gEND WITHOUT TD
20;10;;0;0;0;5p5p5p5p5p;5 SQUARES
21;3;27;6;0;0;0;'PT OMITTED'
22;5;29;12;1;0;0;
23;80;301;0;0;0;0;gREAD PT
24;76;321;15;0;0;0;gTEST NEXT BLOCK
25;;318;48;1;0;0;'FINIS'
26;5;9;4;1;0;0;
27;;318;12;1;0;0;
28;5;29;6;1;0;0;'END'
29;80;288;0;0;0;0;gWRITE INTERCODE END SIGN
30;80;324;0;0;0;0;
31;90;;0;0;1;1;
32;C;;0;0;0;100;
33;90;;0;0;2;0;
34;C;;0;0;0;200;
35;96;;0;0;1;0;
36;80;247;0;0;0;0;gTO DEC
37;62;;0;0;0;0;
38;32;;0;0;0;1-;DIVIDE BY 10
39;92;;0;0;3;0;TENS DIGIT
40;32;;0;0;0;1;
41;5;247;0;0;0;0;WL
42;10;;0;0;0;1;
43;124;247;0;0;1;0;
44;31;;0;0;0;0;/////BIT PATTERN OF UNITS DIGIT
45;3;247;0;0;0;0;
46;33;;0;0;0;30-;REL TO BIT 10 OF B
47;36;12;72;0;3;0;12/72-81=SECTION BIT PATTERNS
48;70;321;63;0;0;0;
49;96;;0;0;3;0;CLEAR B
50;35;;0;0;0;0;HALVE
51;33;;0;0;0;1-;
52;92;;0;0;3;0;gWAS ODD
53;75;321;56;0;0;0;
54;34;247;0;0;0;0;
55;76;321;58;0;0;0;
56;34;247;0;0;0;0;
57;33;;0;0;0;10;
58;36;12;100;0;3;0;12/100-104='TX AREA USED'INDS
59;71;321;63;0;0;0;gNOT PSEUDO-TX AREA
60;96;;0;0;1;0;
61;5;92;34;0;2;0;STORE SECTION NUMBER
62;94;;0;0;2;1;
63;94;321;35;0;1;1;gNEXT SECTION
SHEET;224
PROCR;322;CALC CHAPS INITIALLY
0;10;;0;0;0;ppp00;
1;3;23;47;0;0;0;(TO PRINT HEADING)
2;124;92;0;0;0;0;
3;4;92;9;0;0;0;'LAST PROCR'IN FINAL CHAP
4;91;12;12;0;3;0;0:TWICE UNCORR CHAPS
5;;92;10;0;3;0;
6;30;;0;0;0;9;
7;30;;0;0;0;9-;ISOLATE Q1=CORR CHAP
8;2;92;29;0;0;0;(ZERO INITIALLY)
9;73;322;11;0;0;0;
10;4;92;29;0;0;0;UPDATE
11;94;322;5;0;3;1;
12;10;;0;0;0;1;
13;4;92;29;0;0;0;FORM CHAPS INITIALLY
14;;92;9;0;0;0;
15;5;92;8;0;0;0;STORE SC CTR
16;;92;29;0;0;0;
17;5;92;9;0;0;0;SPEC CHAP+'UNCORR CHAR 0'EQUIVALENT
SHEET;225
PROCR;323;READ/COPY TRIAL DATA
NOTES;RADIX;;
0;80;289;0;0;0;0;
1;80;289;0;0;0;0;gWRITE 2 BLANKS
2;;318;28;1;0;0;
3;5;8;4;1;0;0;5 ALIGNMENT MARKS
4;10;;0;0;0;6;
5;5;8;10;0;0;0;
6;80;289;0;0;0;0;gWRITE ALIGN BLOCK FOR PASS 3
7;;318;30;1;0;0;'INDEX'
8;5;8;4;1;0;0;
9;80;289;0;0;0;0;gWRITE
10;90;;0;0;1;0;;WRITE CURRENT
11;C;;0;0;0;1110;;PROCR INDEX
12;90;;0;0;2;0;;+ADJUST DETAILS
13;C;;0;0;0;48;;+UNIQUE REFS
14;;93;0;0;1;0;;UNCONDITIONALLY
15;5;8;4;2;2;0;
16;94;323;22;0;2;2;
17;;318;8;1;0;0;BEW
18;5;8;52;1;0;0;
19;80;290;0;0;0;0;gWRITE
20;90;;0;0;2;0;
21;C;;0;0;0;48;
22;94;323;14;0;1;1;
23;80;290;0;0;0;0;gLAST BLOCK
24;80;289;0;0;0;0;
25;80;289;0;0;0;0;g2 BLANKS
26;0;9;4;1;0;0;
27;2;318;48;1;0;0;'FINIS'
28;70;323;34;0;0;0;gYES
29;55;9;4;1;0;50;
30;C;8;4;1;0;0;
31;80;289;0;0;0;0;gWRITE
32;80;301;0;0;0;0;gREAD
33;76;323;26;0;0;0;
34;45;A2;0;0;0;0;
35;45;A6;0;0;0;1;
36;0;12;12;1;0;0;COPY DATA FOR PASS 2 PREP STAGE
37;5;94;0;1;0;0;
38;5;27;3;0;0;0;
39;41;A1;0;0;0;1;
40;76;200;0;0;0;0;gCALL PASS 2
SHEET;226
PROCR;324;
0;81;324;0;0;0;0;
1;;324;0;0;0;0;
2;5;288;0;0;0;0;
3;76;288;20;0;0;0;
SHEET;227
PROCR;325;UNPACK SECTION 9 SUBROUTINE
NOTES;RADIX;;
0;81;325;0;0;0;0;
1;124;999;0;1;2;0;(FORMED)
2;128;;4;0;3;0;
3;82;325;0;0;0;0;
4;;9;0;0;0;0;DUMMY FOR PARAMETER
5;128;;4;0;2;0;
SHEET;228
PROCR;326;START OF PASS 2
NOTES;RADIX;B;DEAL WITH SECTIONS USED ONLY FOR GP OUTPUT
0;152;200;2;0;0;0;CALL/ENTER PASS 3
1;C;445;2;0;0;0;
2;;999;16;1;0;0;COPY SEC 7 PARASgPTS WL'S
3;5;999;30;1;0;0;
4;54;5;0;0;0;50;
5;52;5;2;0;0;0;
6;C;335;34;0;0;0;EDIT 'INDEX' LINE
SHEET;229
PROCR;327;CALC LENGTHS OF SWITCH PROCR IN EACH CORRECTED CHAPTER
NOTES;RADIX;B;AND MOVE THE SC BACK LIST
0;54;72;3;0;0;14;
1;10;;0;0;0;1;
2;5;61;4;0;0;0;CTR INCREMENT
3;10;;0;0;0;8;
4;5;61;3;0;0;0;BIT SHIFT CONTROL
5;91;94;0;0;3;0;UNCORR CHAP CTR
6;10;;0;0;0;1;
7;32;;0;0;0;10-;
8;36;72;3;0;3;0;
9;4;72;3;0;3;0;ROUND UP CTRS
10;94;327;6;0;3;1;
11;10;;0;0;0;2;;SEQ CHANGE LIST
12;4;92;8;0;0;0;
13;1;437;72;0;0;0;ABS ADDRESS 18:2496
14;2;92;8;0;0;0;
15;3;337;0;0;0;0;QTTY TO COPY
16;70;327;21;0;0;0;gNONE
17;30;;0;0;0;5;
18;1;92;8;0;0;0;START
19;124;436;13;1;2;0;ABS ADDRESS 18/0
20;128;;0;1;1;0;
21;;436;13;0;0;0;
22;1;337;0;0;0;0;QTTY
23;5;92;8;0;0;0;NEW LIST END
SHEET;230
PROCR;328;OPEN FILES CLEAR W/LS
NOTES;RADIX;B;PREP STAGE
0;40;A2;0;0;0;1;*****DON’T MOVE*****
1;0;27;9;0;0;0;
2;71;328;11;0;0;0;gNOT PRINT
3;;27;8;0;0;0;PRINTER TYPE
4;11;;0;0;0;t;
5;30;;0;0;0;5;
6;1;999;7;0;0;0;ROUTE
7;125;;4096;1;1;0;
8;124;999;0;0;3;0;
9;123;;160;0;2;0;gOPEN PRINTER OR MT A9
10;62;;0;0;0;0;
11;54;61;0;0;0;120;
12;54;94;0;0;0;100;
13;54;66;0;0;0;34;66+49
14;10;;0;0;0;1;
15;4;92;0;0;0;0;NO OF CHAPS
16;101;;998;1;3;0;
17;1;92;0;0;0;0;(CHAPS CODED)+1
18;3;61;5;0;0;0;LONG CONSTS PROCR
19;11;;0;0;0;1;
20;3;61;6;0;0;0;SHORT CONSTS PROCR
21;11;;0;0;0;1;
22;5;61;7;0;0;0;TSL PROCR
23;10;;0;0;0;800000;
24;1;27;9;0;0;0;
25;91;;0;0;1;0;SET FOR RE-ENTRY
SHEET;231
PROCR;329;I/P 1ST BLOCK, UNPACK, PRINT
NOTES;RADIX;B;PREP STAGE
0;80;432;0;0;0;0;gREAD
1;;8;6;1;0;0;
2;2;336;0;1;0;0;'PROGM'
3;70;329;14;0;0;0;gOK
4;;8;4;1;0;0;
5;12;;0;0;0;5659650000;'FIN  '
6;71;329;0;0;0;0;gKEEP READING
7;150;;0;0;0;4;
8;C;329;7;0;0;0;(DUMMY)
9;C;329;11;0;0;0;RUN BACK AND RETURN TO PASS 1
10;C;329;13;0;0;0;gUNLOAD
11;45;A2;0;0;0;1;REWIND O/P TAPE
12;76;100;3;0;0;0;gENTER PASS 1
13;151;;0;0;0;0;;UNLOAD
14;50;8;4;0;0;0;
15;C;334;0;0;0;0;
16;52;8;2;0;0;0;
17;C;334;0;0;0;0;
18;;66;4;1;0;0;SUITE NO
19;30;;0;0;0;2;
20;1;66;6;2;0;0;JOB NO
21;5;61;112;0;0;0;PROG ID
22;00;66;8;1;0;0;
23;5;72;0;1;0;0;ALPHA SERIAL NUMBER
24;;27;9;0;0;0;
25;70;329;26;0;0;0;gPRINTING
26;80;333;0;0;0;0;gWRITE/PRINT'PROGM'
27;40;A6;0;0;0;0;
28;52;9;4;0;0;0;EDIT FIRST HEADING
29;C;334;10;0;0;0;BLOCK
30;80;407;0;0;0;0;OP
31;;435;18;0;0;0;'ppppp'
32;5;9;4;2;0;0;
33;;436;0;1;0;0;BEW
34;5;9;6;1;0;0;
35;80;407;0;0;0;0;gDUMMY 'INDEX'DATA
36;52;9;4;0;0;0;PROG & SERIAL FOR PASS 3
37;C;334;18;0;0;0;
38;5;9;16;1;0;0;
39;80;407;0;0;0;0;gSHORT RUBBISH BLOCK
40;80;432;0;0;0;0;I/P
41;50;8;4;0;0;0;
42;C;334;0;0;0;0;
43;;66;4;1;0;0;PROCR OF ENTRY
44;80;430;0;0;0;0;gCONVERT
45;5;72;2;0;0;0;
46;52;8;2;0;0;0;
47;C;334;0;0;0;0;
48;80;333;0;0;0;0;PRINT'ENTRY'
49;52;9;4;0;0;0;EDIT SECOND BLOCK
50;C;334;26;0;0;0;
51;80;407;0;0;0;0;gO/P
SHEET;232
PROCR;330;DEAL WITH FILE IDS
NOTES;RADIX;B;
0;17;92;7;0;0;10;SPACE OCCUPIED BY CONVERT TABLES
1;101;;204;1;1;0;FOR ALLOCATOR
2;5;61;100;0;0;0;SP CHAP SPACE CTR
3;10;;0;0;0;0;2R=0
4;31;;0;0;0;1-;
5;1;92;29;0;0;0;EXTRA CHAP NO
6;1;92;29;0;0;0;
7;3;61;40;0;0;0;LAST ROUTE PARAMETER
8;5;61;39;0;0;0;PARA CTR
9;10;;0;0;0;0;2R=0
10;91;;0;0;2;0;
11;90;;0;0;1;0;O/P M.R.
12;C;;0;0;0;48;
13;80;432;0;0;0;0;I/P
SHEET;233
PROCR;331;O/P REMAINING FILE IDS, CHAP START POINTS
NOTES;RADIX;B;PREP
0;96;;0;0;1;0;
1;70;331;5;0;0;0;
2;;436;0;1;0;0;BEW
3;5;9;4;1;1;0;
4;80;407;0;0;0;0;O/P
5;50;8;4;0;0;0;
6;C;335;0;0;0;0;UNPACK 'CHAPS'
7;54;70;0;1;0;100;CLEAR FOR SECTION DETAILS
8;80;405;0;0;0;0;gBLANK LINE
9;52;8;2;0;0;0;
10;C;335;0;0;0;0;
11;80;333;0;0;0;0;PRINT'CHAPS'
12;80;432;0;0;0;0;gREAD MT
SHEET;234
PROCR;332;PRINT CHAPS I/P & TEST S/D
NOTES;RADIX;B;PREP STAGE
0;80;423;0;0;0;0;gPRINT'INDEX'EX SEC 5
1;80;423;0;0;0;0;gPRINT BLANK LINE
2;76;339;0;0;0;0;PROCR ETC ON MT
SHEET;235
PROCR;333;
0;81;333;0;0;0;0;
1;55;8;0;1;0;52;
2;C;7;0;1;0;0;
3;35;;0;0;0;1111;
4;37;7;2;0;0;0;PRINT
5;80;403;0;0;0;0;
6;82;333;0;0;0;0;
SHEET;236
TABLE;334;1;PROGM, ENTRY, O/P HDNG, SECTIONS FILES
NOTES;;;
0;66;0;0;0;2;0;5;0;0;0;0;0;0;AMEND IND
2;66;2;0;0;2;0;5;0;11;0;0;0;0;PROGM/ENTRY
4;66;4;0;0;1;0;5;5;1;2;0;0;0;SUITE/PROCR
6;66;6;0;0;2;0;5;0;2;0;0;0;0;JOB/PRIORITY
8;66;8;0;0;2;0;5;0;1;0;0;0;1;SERIAL/CODER
10;336;8;0;0;2;0;5;0;0;0;0;0;0;ALIGN MARKS
12;336;6;0;0;2;0;5;0;0;0;0;0;0;'INDEX'
14;435;18;0;0;0;0;5;0;0;0;0;0;0;
16;336;11;0;0;0;0;1;3;4;0;0;0;0;'4'
18;66;4;0;0;1;0;3;7;0;0;0;0;0;PROG SUITE
20;66;6;0;0;2;0;2;3;0;0;0;0;0;PROG ID
22;66;8;0;0;2;0;5;0;0;0;0;0;0;PROG SERIAL
24;436;0;0;0;2;0;5;0;0;0;0;0;1;BEW
26;92;5;0;0;0;0;5;0;0;4;0;0;0;FP IND
28;92;4;0;0;0;0;5;0;0;4;0;0;0;MG
30;66;6;0;0;2;0;5;0;0;0;0;0;0;PRIORITY
32;92;0;0;0;0;0;5;0;0;4;0;0;0;CHAPS+1
34;92;29;0;0;0;0;5;0;0;4;0;0;0;CHAPS INITIALLY
36;436;0;0;0;2;0;5;0;0;0;0;0;1;BEW
38;66;10;0;0;2;0;5;0;0;0;0;0;0;AMEND IND
40;66;0;0;0;2;0;5;0;5;0;0;0;0;SERIAL
42;66;2;0;0;1;0;5;5;4;4;0;0;0;SEC NO
44;66;4;0;0;1;0;5;5;3;4;0;0;0;LENGTH
46;66;6;0;0;1;0;5;5;0;4;0;0;0;TX AREA IND
48;66;8;0;0;1;0;5;5;3;4;0;0;1;CHAP
50;66;0;0;0;2;0;5;0;0;0;0;0;0;AMEND IND== FILES
52;66;2;0;0;2;0;5;0;15;0;0;0;0;FILE ID
54;66;4;0;0;1;0;5;5;1;4;0;0;0;ROUTE TYPE
56;66;6;0;0;1;0;5;5;2;4;0;0;0;RETN PERIOD
58;66;8;0;0;1;0;5;5;2;4;0;0;0;MBS
60;66;10;0;0;1;0;5;5;0;4;0;0;1;ALT ROUTE
62;66;2;0;0;2;0;5;0;0;0;0;0;0;FILE ID == FILES
64;66;4;0;0;1;0;5;5;0;4;0;0;0;ROUTE TYPE
66;66;6;0;0;1;0;5;5;0;4;0;0;0;RETN PERIOD
68;66;8;0;0;1;0;5;5;0;4;0;0;0;MBS
70;61;0;0;0;0;0;5;0;0;4;0;0;0;START LOCN
72;66;10;0;0;1;0;5;5;0;4;0;0;1;ALT ROUTE
SHEET;237
TABLE;335;1;CHAPS LINE
NOTES;;;
0;66;0;0;0;2;0;5;0;0;0;0;0;0;AMEND IND
2;66;2;0;0;2;0;5;0;1;0;0;0;0;'CHAPS'
4;66;4;0;0;0;0;5;0;0;4;0;0;0;NUMBER OF CHAPS
6;66;6;0;0;0;0;5;0;1;4;0;0;0;1
8;66;7;0;0;0;0;5;0;1;5;0;0;0;2
10;66;8;0;0;0;0;5;0;1;5;0;0;0;3
12;66;9;0;0;0;0;5;0;1;5;0;0;0;4
14;66;10;0;0;0;0;5;0;1;5;0;0;0;5
16;66;11;0;0;0;0;5;0;1;5;0;0;0;6
18;66;12;0;0;0;0;5;0;1;5;0;0;0;7
20;66;13;0;0;0;0;5;0;1;5;0;0;0;8
22;66;14;0;0;0;0;5;0;1;5;0;0;0;9
24;66;15;0;0;0;0;5;0;1;5;0;0;0;10
26;66;16;0;0;0;0;5;0;1;5;0;0;0;11
28;66;17;0;0;0;0;5;0;1;5;0;0;0;12
30;66;18;0;0;0;0;5;0;1;5;0;0;0;13
32;66;19;0;0;0;0;5;0;1;5;0;0;1;14-TH START
34;336;6;0;0;2;0;5;0;6;0;0;0;0;'INDEX'
36;92;29;0;0;0;0;1;4;4;0;0;0;0;CHAPS INITIALLY
38;92;10;0;0;0;0;1;4;5;1;0;0;0;CORRECTED CHAPTER NUMBERS
40;92;11;0;0;0;0;1;4;5;1;0;0;0;
42;92;12;0;0;0;0;1;4;5;1;0;0;0;
44;92;13;0;0;0;0;1;4;5;1;0;0;0;
46;92;14;0;0;0;0;1;4;5;1;0;0;0;
48;92;15;0;0;0;0;1;4;5;1;0;0;0;
50;92;16;0;0;0;0;1;4;5;1;0;0;0;
52;92;17;0;0;0;0;1;4;5;1;0;0;0;
54;92;18;0;0;0;0;1;4;5;1;0;0;0;
56;92;19;0;0;0;0;1;4;5;1;0;0;0;
58;92;20;0;0;0;0;1;4;5;1;0;0;0;
60;92;21;0;0;0;0;1;4;5;1;0;0;0;
62;92;22;0;0;0;0;1;4;5;1;0;0;0;
64;92;23;0;0;0;0;1;4;5;1;0;0;1;LAST ENTRY
SHEET;238
CONST;336;1;FOR PASS 2 PREP STAGE
0;(A)PROGM;
2;ENTRY;
4;CHAPS;
6;INDEX;
8;(D)6p6p6p6p6p;
10;0514908000;08000 FILE A9
SHEET;239
PROCR;337;DUMMIES FOR SEC 61 DESCRIPTION
NOTES;;;
0;;61;0;0;0;0;ACTION WL/ENTRY POINT
1;;61;1;0;0;0;NON-ARITH IND
SHEET;240
PROCR;338;
0;81;338;0;0;0;0;
1;0;338;0;0;0;0;
2;5;401;0;0;0;0;
3;76;401;6;0;0;0;
SHEET;241
PROCR;339;FORM PARA CTR ETC
NOTES;RADIX;B;PREP STAGE
0;80;338;0;0;0;0;
1;80;354;0;0;0;0;gEDIT FIRST DIRECTIVE
2;10;;0;0;0;0;
3;5;437;97;0;0;0;
4;;61;39;0;0;0;
5;11;;0;0;0;1;FORM
6;3;61;41;0;0;0;MOD GROUP PARAMETER
7;11;;0;0;0;4;
8;5;61;39;0;0;0;TOTAL NO OF PARAMETER
9;0;92;8;0;0;0;LIST END
10;30;;0;0;0;5;
11;1;436;13;0;0;0;ABS ADDRESS 18:0
12;91;;0;0;1;0;
13;;436;12;0;0;0;ABS ADDRESS 18:2499
14;5;61;118;0;0;0;LOCN CTR SC'S FWD
15;;436;2;1;0;0;0:144
16;5;61;44;1;0;0;O/P MOD CTR
17;10;;0;0;0;1;
18;5;61;111;0;0;0;UNCORRECTED CHAP NO.
19;10;;0;0;0;41;
20;5;61;26;1;0;0;TYPE
21;5;61;28;1;0;0;SECTION NO.
22;80;409;0;0;0;0;O/P TYPE S/R;THIS CLEARS D67 INIT
23;10;;0;0;0;1;
24;5;61;42;1;0;0;
25;5;61;109;0;0;0;CLEAR STERLING CTR
26;05;67;0;0;0;0;67/0 NOT CLEARED BY O/P TYPE S/R
SHEET;242
PROCR;340;O/P PARAS
NOTES;RADIX;B;CHAP START ROUTINE
0;;61;39;0;0;0;PARA CTR
1;30;;0;0;0;5;
2;5;61;0;1;0;0;
3;91;61;0;1;3;0;M/R 3 AT W/L
4;95;;0;0;3;0;
5;5;67;2;0;0;0;
6;80;411;0;0;0;0;O/P
7;94;340;4;0;3;1;
8;10;;0;0;0;3;
9;4;61;5;0;0;0;LONG PROCR
10;4;61;6;0;0;0;SHORT PROCR
11;4;61;7;0;0;0;TSL PROCR
12;10;;0;0;0;0;
13;35;;0;0;0;1;
14;124;61;111;0;0;0;UNCORRECTED CHAP NO
15;36;92;9;0;0;0;CORRECTED CHAP NUMBER
16;3;61;51;0;0;0;
17;1;61;51;0;0;0;
18;5;61;3;0;0;0;2C
19;;61;5;0;0;0;
20;30;;0;0;0;2;
21;1;61;3;0;0;0;
22;5;61;4;0;0;0;LN:2C
23;10;;0;0;0;.0000.;14:14
24;5;61;12;1;0;0;LN CTR
25;5;61;14;1;0;0;SN CTR
26;;436;14;1;0;0;180:180
27;5;61;16;1;0;0;TSL CTR
28;5;61;10;1;0;0;
29;80;411;0;0;0;0;O/P ZERO COMPARTMENTFOR LINK
30;80;369;0;0;0;0;gO/P 25/1/1 4096+24/0/3 0
31;10;;0;0;0;700;7 IN Q3
32;5;67;1;0;0;0;SET'MR ENTRY' IND
33;0;437;58;0;0;0;23/0/2 0
34;80;350;0;0;0;0;gO/P
35;80;411;0;0;0;0;O/P TWO ZERO COMPARTMENTS
36;80;411;0;0;0;0;
37;;438;13;0;0;0;26/0/1/6-
38;80;398;0;0;0;0;gO/P INT SC
SHEET;243
PROCR;341;SECTION START ROUTINE
NOTES;RADIX;B;
0;62;;0;0;0;0;
1;;;6;1;12;0;
2;2;434;6;1;0;0;PROCR
3;71;341;7;0;0;0;
4;10;;0;0;0;1;
5;5;61;42;0;0;0;
6;76;343;2;0;0;0;
7;80;346;0;0;0;0;ROUND UP SPACE CTR
8;;;14;2;12;0;CONST OR TABLE TYPE
9;30;;0;0;0;4-;
10;5;61;47;0;0;0;
11;;;6;1;12;0;
12;2;434;2;1;0;0;TABLE
13;71;342;3;0;0;0;=
SHEET;244
PROCR;342;SECTION START ROUTINE
NOTES;RADIX;B;
0;10;;0;0;0;2;
1;5;61;42;0;0;0;
2;76;343;1;0;0;0;
3;10;;0;0;0;2;AMOUNT TO AUGMENT;SPACE CTR ON O/P
4;5;61;42;0;0;0;
SHEET;245
PROCR;343;SECTION START ROUTINE
NOTES;RADIX;B;
0;10;;0;0;0;1;'CONST'
1;11;;0;0;0;1;TABLE
2;11;;0;0;0;1;PROCR
3;3;61;26;2;0;0;
4;84;345;0;0;0;0;
5;;7;12;2;0;0;NEW PROCR NO
SHEET;246
PROCR;344;SECTION START ROUTINE
NOTES;RADIX;B;
0;80;430;0;0;0;0;gCONVERT
1;3;61;28;2;0;0;
2;3;61;10;0;0;0;CURRENT PROCR
3;2;72;2;0;0;0;ENTRY PROCR
4;71;344;7;0;0;0;gNO
5;;61;43;0;0;0;
6;5;27;5;0;0;0;ENTRY LOCN
7;0;61;43;0;0;0;
8;5;61;11;0;0;0;STORE PROCR START ADDRESS
9;80;347;0;0;0;0;gSET'PRINT PROCEDURE'IND
10;80;409;0;0;0;0;O/P TYPE
11;10;;0;0;0;80;TRACK 8
12;5;61;46;0;0;0;HEAD OF FORM
13;80;423;0;0;0;0;gSECOND PRINT SR
14;80;402;0;0;0;0;gPRINT
15;80;351;0;0;0;0;BULK CLEAR SEC 7
16;76;353;0;0;0;0;
SHEET;247
PROCR;345;SWITCH A
NOTES;RADIX;B;
0;85;345;0;0;0;0;
1;C;360;0;0;0;0;INST
2;C;391;0;0;0;0;TABLE
3;C;370;0;0;0;0;CONST
4;C;353;0;0;0;0;DUMMY
5;C;353;0;0;0;0;' '
6;C;353;0;0;0;0;' '
7;C;352;6;0;0;0;
SHEET;248
PROCR;346;SUBROUTINE 1
NOTES;RADIX;B;ROUND OFF TO MULT OF 2
0;81;346;0;0;0;0;
1;10;;0;0;0;0;
2;34;436;4;0;0;0;1
3;36;61;43;0;0;0;SPACE CTR
4;70;346;9;0;0;0;
5;5;61;42;0;0;0;
6;5;67;0;1;0;0;
7;5;67;2;1;0;0;
8;80;411;0;0;0;0;gO/P ZERO LOCATION
9;82;346;0;0;0;0;
SHEET;249
PROCR;347;EXTRACT'PRINT PROCEDURE'IND FROM ARRAY IN SEC 23
0;81;347;0;0;0;0;
1;19;61;10;0;0;14;PROCR/20
2;5;348;0;0;0;0;
3;32;;0;0;0;9;
4;5;352;0;0;0;0;WL
5;34;435;20;0;0;0;1
6;124;352;0;0;1;0;
7;33;;0;0;0;0;/////
8;124;348;0;0;1;0;
9;36;23;5-;0;0;0;
10;5;23;47;0;0;0;NON-ZERO TO PRINT WHOLE PROCR
11;82;347;0;0;0;0;
SHEET;250
PROCR;348;O/P WITH ZERO REF, PARA=2C
NOTES;;;
0;81;348;0;0;0;0;(A)=INSTRUCTION
1;5;67;3;0;0;0;
2;;61;3;0;0;0;2C
3;5;67;2;0;0;0;
4;80;411;0;0;0;0;
5;82;348;0;0;0;0;
SHEET;251
PROCR;349;O/P ARITH INSTRUCTION
NOTES;;;
0;81;349;0;0;0;0;
1;5;61;0;0;0;0;
2;5;61;1;0;0;0;
3;80;429;0;0;0;0;gCOMPLEX O/P
4;82;349;0;0;0;0;
SHEET;252
PROCR;350;
NOTES;;;
0;81;350;0;0;0;0;
1;5;67;3;0;0;0;
2;80;411;0;0;0;0;O/P
3;82;350;0;0;0;0;
SHEET;253
PROCR;351;
0;81;351;0;0;0;0;
1;54;7;2;1;0;48;BULK CLEAR SEC 7
2;82;351;0;0;0;0;
SHEET;254
PROCR;352;LN:2C SUBROUTINE
NOTES;;;
0;81;352;0;0;0;0;(A)=INSTRUCTION
1;5;67;3;0;0;0;
2;0;61;4;0;0;0;LN:2C FOR FIRST LN PROCR
3;5;67;2;0;0;0;IN CHAP
4;80;411;0;0;0;0;gO/P
5;82;352;0;0;0;0;
6;80;352;0;0;0;0;(THEN GET NEXT BLOCK)
SHEET;255
PROCR;353;GET NEXT BLOCK
NOTES;RADIX;B;
0;80;401;0;0;0;0;gREAD
1;;;6;1;12;0;
2;2;434;4;1;0;0;'CONST'
3;73;345;0;0;0;0;gNOT A DIRECTIVE
4;80;354;0;0;0;0;EDIT DIRECTIVES
5;;;6;1;12;0;
6;2;434;4;1;0;0;'CONST'
7;70;355;0;0;0;0;
8;1;434;4;1;0;0;
9;2;434;2;1;0;0;TABLE
10;70;355;0;0;0;0;
11;1;434;2;1;0;0;
12;2;434;6;1;0;0;'PROCR'
13;70;355;0;0;0;0;
14;1;434;6;1;0;0;
15;2;434;10;1;0;0;END(SPACE)(SPACE)
16;71;353;20;0;0;0;
17;10;;0;0;0;1;
18;5;61;48;0;0;0;
19;76;355;11;0;0;0;
20;1;434;10;1;0;0;
21;2;434;8;1;0;0;'NOTES'
22;71;345;0;0;0;0;
23;80;402;0;0;0;0;gPRINT 'NOTES' LINE
24;80;351;0;0;0;0;BULK CLEAR SEC 7
25;76;353;0;0;0;0;
SHEET;256
PROCR;354;EDIT DIRECTIVES
0;81;354;0;0;0;0;
1;80;351;0;0;0;0;BULK CLEAR SEC 7
2;;77;2;1;0;0;AMEND IND
3;5;7;2;1;0;0;
4;;77;4;1;0;0;LINE SERIAL
5;5;7;6;1;0;0;
6;;77;6;1;0;0;'PROCR/TABLE/CONST/NOTES/VALUE/END'
7;5;7;10;1;0;0;
8;;77;8;1;0;0;PROCR NO
9;30;;0;0;0;4-;
10;5;7;12;1;0;0;
11;;77;10;1;0;0;OLD PROCR NO
12;5;7;16;1;0;0;
13;;77;6;1;0;0;
14;2;434;8;1;0;0;'NOTES'
15;71;354;19;0;0;0;gNO
16;;77;12;1;0;0;'RADIX'
17;5;7;16;1;0;0;
18;76;354;21;0;0;0;
19;;77;12;1;0;0;PASS 1 REPORTS
20;5;7;48;1;0;0;
21;;77;6;1;0;0;
22;2;434;6;1;0;0;'PROCR'
23;70;354;27;0;0;0;gYES
24;;77;14;1;0;0;TABLE/CONST TYPE/RADIX LETTER
25;5;7;20;1;0;0;
26;76;354;29;0;0;0;
27;;77;14;1;0;0;FIRST 5 CHARS ANNOTATION
28;5;7;20;1;0;0;
29;55;77;16;1;0;26;COPY ANNOTATION
30;C;7;22;1;0;0;
31;82;354;0;0;0;0;
SHEET;257
PROCR;355;TEST NEW CHAP
NOTES;RADIX;B;
0;0;7;12;2;0;0;NEW PROCR
1;5;61;35;0;0;0;
2;124;61;111;0;0;0;THIS CHAP UCORR
3;;92;9;0;0;0;LAST PROCR THIS CHAP
4;30;;0;0;0;2-;
5;80;431;0;0;0;0;gCONVERT TO DEC
6;2;61;35;0;0;0;
7;72;341;0;0;0;0;NOT NEW CHAP
8;11;;0;0;0;1;TEST THIS PROCEDURE SAFETY
9;71;341;0;0;0;0;ONE GREATER THAN PREDEVICE
10;62;;0;0;0;0;
11;80;346;0;0;0;0;gROUND UP SPACE CTR
12;80;356;0;0;0;0;gROUND UP FORMED SECTIONS
13;80;357;0;0;0;0;gO/P FORMED SECTIONS
14;76;358;0;0;0;0;
SHEET;258
PROCR;356;ROUND UP SECTION CTRS
NOTES;RADIX;B;SUBROUTINE
0;81;356;0;0;0;0;
1;90;;0;0;2;0;
2;C;;0;0;0;6;
3;0;61;13;0;2;0;END VALUE
4;31;;0;0;0;2;
5;32;;0;0;0;1-;(DIVIDE BY 4)
6;38;;0;0;0;4;ROUND UP TO MULTIPLE OF 4
7;31;;0;0;0;2;
8;5;61;13;0;2;0;
9;94;356;3;0;2;2;
10;82;356;0;0;0;0;
SHEET;259
PROCR;357;O/P FORMED SECTIONS
NOTES;RADIX;B;SUBROUTINE
0;81;357;0;0;0;0;
1;10;;0;0;0;600000;
2;5;61;0;1;0;0;
3;5;61;12;0;0;0;
4;5;61;2;0;0;0;
5;91;61;2;0;3;0;
6;;436;5;0;3;0;TYPE NO
7;5;61;26;1;0;0;
8;;61;5;0;3;0;
9;5;61;28;2;0;0;PROCR NUMBER
10;80;409;0;0;0;0;O/P TYPE
11;;436;8;0;3;0;
12;5;61;42;0;0;0;NO OF LOCNS TO STEP ON LCN CTR ON O
13;124;61;0;0;0;0;
14;;61;12;1;0;0;SECT COUNTER
15;5;61;30;1;0;0;
16;10;;0;0;0;1;
17;4;61;2;0;0;0;
18;123;;2;0;0;0;
19;C;61;0;0;0;0;
20;76;357;5;0;0;0;
21;82;357;0;0;0;0;
SHEET;260
PROCR;358;DEAL WITH TRANS VACANT SECS
NOTES;RADIX;B;CHAP END ROUTINE
0;10;;0;0;0;1;TYPE 1
1;5;61;26;2;0;0;
2;101;;1001;1;3;0;CALC SWITCH PROCR
3;1;61;111;0;0;0;THIS CHAP UNCORRECTED
4;5;61;28;2;0;0;61/43=CHAP LENGTH
5;80;409;0;0;0;0;gO/P 'TYPE'
6;;61;43;0;0;0;CHAP LENGTH
7;124;61;111;0;1;0;UNCORR CHAP
8;5;72;17;0;0;0;STORE 72/18-31
9;;434;22;1;0;0;'TYPE.'
10;5;61;26;1;0;0;
11;5;61;28;1;0;0;
12;80;410;0;0;0;0;ALPHA O/P S/R
13;10;;0;0;0;1;
14;1;61;111;0;0;0;
15;3;61;111;0;0;0;
16;;61;48;0;0;0;
17;70;339;19;0;0;0;
18;76;359;1;0;0;0;
SHEET;261
PROCR;359;PROG END ROUTINE
NOTES;RADIX;B;
0;76;359;7;0;0;0;THIS AN ORDER CONSTANT
1;80;413;0;0;0;0;gO/P REMAINING DETS S/R
2;0;437;4;0;0;0;ALL THE p'S
3;5;66;2;1;0;0;SET AS BLOCK SERIAL
4;;359;0;0;0;0;
5;5;419;0;0;0;0;PLANT AN END SIGN
6;76;415;21;0;0;0;gI/P C-LINE SR
7;10;;0;0;0;1;
8;5;23;47;0;0;0;ALWAYS PRINT END SIGN
9;80;423;0;0;0;0;gBLANK LINE
10;80;403;0;0;0;0;gPRINT END SIGN
11;;72;2;0;0;0;ENTRY POINT
12;5;61;35;0;0;0;
13;80;396;0;0;0;0;
14;5;92;8;0;0;0;CHAP OF ENTRY
15;;27;5;0;0;0;ENTRY LOCN
16;5;92;6;0;0;0;
17;0;434;28;1;0;0;'TYPEp'
18;05;9;4;1;0;0;
19;;436;0;1;0;0;
20;05;9;6;1;0;0;BEW
21;80;407;0;0;0;0;gO/P
22;80;432;0;0;0;0;gREAD A2
23;;8;4;1;0;0;
24;12;;0;0;0;5659655972;'FINIS'
25;70;359;30;0;0;0;gEND
26;55;8;4;1;0;50;
27;C;9;4;1;0;0;
28;80;407;0;0;0;0;gWRITE A6
29;76;359;22;0;0;0;
30;55;70;0;1;0;100;COPY DETAILS FOR PASS 3
31;C;9;0;1;0;0;
32;45;A6;0;0;0;0;REWIND O/P FILE
33;76;326;0;0;0;0;gCALL PASS 3
SHEET;262
PROCR;360;INST ROUTINE
NOTES;RADIX;B;NOTES AND CONTINUATION OF SWITCH INTO NEXT PROCEDURE
0;10;;0;0;0;1;
1;5;61;99;0;0;0;NON I/P IND
2;80;415;0;0;0;0;-I/P C-LINE S/R
3;;66;2;1;0;0;LINE SERIAL
4;5;67;0;1;0;0;
5;5;61;2;0;0;0;CLEAR MOD DIGITS;FOR M&P.
6;5;61;25;0;0;0;SET BINARY INDICATOR
7;0;61;110;0;0;0;GROUP+1
8;70;353;0;0;0;0;G.N.B;TEST GROUP OUT
9;73;353;0;0;0;0;G.N.B;OF RANGE
10;12;;0;0;0;11;
11;72;353;0;0;0;0;G.N.B
12;84;361;0;0;0;0;SWITCH B (GROUP)
13;C;61;110;0;0;0;
14;84;411;0;0;0;0;VARIANT SWITCH
15;C;61;50;0;0;0;VARIANT +1
SHEET;263
PROCR;361;SWITCH B
NOTES;RADIX;B;
0;10;;0;0;0;0;
1;85;361;0;0;0;0;
2;C;352;6;0;0;0;
3;C;352;6;0;0;0;
4;C;352;6;0;0;0;
5;C;352;6;0;0;0;
6;C;352;6;0;0;0;
7;C;352;6;0;0;0;
8;C;352;6;0;0;0;
9;C;352;6;0;0;0;
10;C;352;6;0;0;0;
11;C;352;6;0;0;0;
12;C;366;3;0;0;0;10
13;C;366;2;0;0;0;11
14;C;366;1;0;0;0;12
15;C;366;0;0;0;0;13
16;C;352;6;0;0;0;
17;C;352;6;0;0;0;
SHEET;264
PROCR;362;S.C. S/R
NOTES;RADIX;B;
0;81;362;0;0;0;0;REF
1;0;66;6;1;0;0;REF
2;70;364;7;0;0;0;
3;12;;0;0;0;3.7;999
4;72;364;7;0;0;0;gSKIP
5;;66;8;1;0;0;ITEM
6;71;362;11;0;0;0;gNOT TO PROCR START
7;;61;10;0;0;0;THIS PROCR
8;2;66;6;0;0;0;REF
9;72;363;28;0;0;0;gSC BACK TO PROCR START
10;76;362;21;0;0;0;gSC FORWARD
11;95;;0;0;1;0;CURRENT HEAD OF'SC BACK' LIST
12;30;;0;0;0;5;
13;1;436;13;0;0;0;ABS ADDRESS 18/0
14;91;;0;0;2;0;R2=(A)
15;94;362;17;0;2;0;/////
16;76;362;21;0;0;0;gNO DESTS REPLACED YET
17;;66;2;0;0;0;THIS ORDER
18;2;;1;0;2;0;INTERCODE DEST
19;70;364;0;0;0;0;gMATCH FOUND
20;94;362;17;0;2;2;gTRY NEXT
21;0;66;6;1;0;0;;ASSUME SEQ CH F
22;80;431;0;0;0;0;gREF TO DEC
23;30;;0;0;0;2;
24;5;61;18;0;0;0;
25;0;66;8;1;0;0;
26;80;431;0;0;0;0;gITEM TO DEC
27;11;;0;0;0;2;ADD 2 TO ITEM
28;4;61;18;0;0;0;
29;62;;0;0;0;0;SET BINARY
30;0;61;117;0;0;0;CTR OF SEC 20 LENGTH
31;91;;0;0;2;0;ZERO END VALUE
32;70;363;7;0;0;0;gEMPTY
33;12;;0;0;0;12+;300
34;73;362;36;0;0;0;gOK
35;82;362;0;0;0;0;gEXIT, DON’T SET S'C IND
36;0;20;3-;0;2;0;NEXT DEST(LAST IN LIST FIRST)
37;2;61;18;0;0;0;
38;73;363;7;0;0;0;gFITS NOW
SHEET;265
PROCR;363;S.C. S/R
NOTES;RADIX;;
0;0;20;3-;0;2;0;MOVE LIST DOWN 1 ITEM
1;5;20;0;0;2;0;
2;0;20;2-;0;2;0;
3;5;20;1;0;2;0;
4;0;20;1-;0;2;0;
5;5;20;2;0;2;0;
6;94;362;36;0;2;3-;gNEXT
7;0;61;18;0;0;0;DEST OF NEWCOMER
8;5;20;0;0;2;0;
9;;66;2;1;0;0;SOURCE
10;5;20;1;0;2;0;
11;;66;8;1;0;0;
12;3;20;2;0;2;0;
13;70;363;26;0;0;0;gDEST IS A PROCR START
14;10;;0;0;0;1;
15;5;67;1;0;0;0;SET 'SEQ CH' IND
16;0;438;17;0;0;0;FLIPFLOP 1/10
17;30;;0;0;0;4;TO Q5
18;1;61;118;0;0;0;ABS LOCN IN SEC 18(18:2499 INITIALL
19;5;20;2;0;2;0;
20;10;;0;0;0;t;
21;2;438;17;0;0;0;
22;3;438;17;0;0;0;REVERSE
23;71;363;26;0;0;0;gNEXT TIME IS TOP 10 BITS OF SAME LOCN
24;12;;0;0;0;1;
25;4;61;118;0;0;0;REDUCE ABS ADDRESS
26;10;;0;0;0;3;
27;4;61;117;0;0;0;STEP CTR OF ACTIVE SC'S
28;82;362;0;0;0;0;
SHEET;266
PROCR;364;SC S/R: MATCH FOUND IN SC BACK LIST
NOTES;RADIX;B;
0;34;;0;0;2;0;PROCR+ITEM
1;33;;0;0;0;30;
2;5;66;6;1;0;0;REF(BITS 11-20)
3;33;;0;0;0;10;
4;5;66;8;1;0;0;ITEM(BITS 1-10)
5;96;;0;0;2;0;
6;80;365;0;0;0;0;gCONTRACT LIST
7;82;362;0;0;0;0;
SHEET;267
PROCR;365;CONTRACT THE SC BACK LIST BY 1 WORD
NOTES;;;
0;81;365;0;0;0;0;
1;5;61;114;0;0;0;WORD TO BE OVERWRITTEN
2;95;;0;0;1;0;
3;5;61;18;1;0;0;START/END OF LIST (ABS)
4;;61;19;0;0;0;
5;2;61;114;0;0;0;
6;70;365;16;0;0;0;gNONE TO BE MOVED
7;30;;0;0;0;5;
8;1;61;114;0;0;0;
9;11;;0;0;0;2;FORM SOURCE IN A
10;124;61;114;0;3;0;
11;128;;0;1;1;0;COPY UP BY 1 WORD
12;12;;0;0;0;2;
13;4;61;18;0;0;0;
14;4;61;19;0;0;0;ADJUST R1 FOR NEW LIST POSITION
15;91;61;18;0;1;0;
16;82;365;0;0;0;0;
SHEET;268
PROCR;366;M/C ACTIONS
NOTES;RADIX;B;CALCULATE PARAMETER, TEST 24/1/0 OR 27/D/M
0;10;;0;0;0;t;GROUP 13
1;11;;0;0;0;t;12
2;11;;0;0;0;t;11
3;12;;0;0;0;1;10
4;1;61;50;0;0;0;V+1
5;3;61;0;0;0;0;ACTION
6;12;;0;0;0;17;23
7;70;368;0;0;0;0;gACTION 23
8;12;;0;0;0;9;
9;72;352;6;0;0;0;
10;;66;6;0;0;0;REF;PARA 0 OR 2C
11;70;366;18;0;0;0;
12;3;61;35;0;0;0;
13;80;396;0;0;0;0;DET CHAP
14;31;;0;0;0;1;FORM 2C'
15;76;366;18;0;0;0;gSTORE PARA
16;;61;51;0;0;0;
17;1;61;51;0;0;0;
18;5;61;34;0;0;0;PARA W/L
19;0;66;10;0;0;0;DISC
20;12;;0;0;0;2;
21;71;366;25;0;0;0;gTAKE YOUR CHANCE
22;10;;0;0;0;1;
23;3;66;10;0;0;0;
24;4;66;8;1;0;0;ADJUST ITEM
25;;61;0;0;0;0;ACTION
26;3;362;0;0;0;0;
27;31;;0;0;0;1;
28;34;435;0;0;0;0;BIT 1
29;36;66;10;0;0;0;DISC
30;31;;0;0;0;2;
31;34;436;16;0;0;0;BITS 1+2
32;36;66;12;0;0;0;MOD DIGITS
33;31;;0;0;0;1;
34;30;;0;0;0;3;
35;3;61;0;0;0;0;COMBINED A/D/M
36;30;;0;0;0;5-;
37;70;366;45;0;0;0;gPOSITIVE ACTION
38;;61;0;0;0;0;
39;71;366;42;0;0;0;gNOT'0-'
40;10;;0;0;0;2;
41;5;67;1;0;0;0;SET IND
42;10;;0;0;0;0;
43;2;61;0;0;0;0;
44;5;61;0;0;0;0;NEGATE ACTION
45;5;66;10;1;0;0;
46;5;66;12;1;0;0;
47;;61;0;0;0;0;
48;2;437;44;0;0;0;24/1/0
49;70;367;0;0;0;0;gIS A SEQ CHANGE
50;;362;0;0;0;0;
51;12;;0;0;0;1e;TEST FOR 27/D/M
52;71;367;1;0;0;0;
SHEET;269
PROCR;367;M/C ACTIONS
NOTES;RADIX;B;
0;80;362;0;0;0;0;-S.C. S/R
1;80;424;0;0;0;0;-NEG NO S/R
2;80;425;0;0;0;0;- STACK
3;80;411;0;0;0;0;O/P
4;76;353;0;0;0;0;GNB
SHEET;270
PROCR;368;ACTION 123/0/0
NOTES;RADIX;B;
0;;66;12;0;0;0;MOD
1;34;66;10;0;0;0;DISC
2;75;366;10;0;0;0;
3;5;61;34;0;0;0;SET PARA ZERO
4;00;437;59;0;0;0;23/0/0
5;5;61;0;0;0;0;
6;80;425;0;0;0;0;-STACK
7;80;411;0;0;0;0;-O/P
8;80;414;0;0;0;0;I/P INSTRUCTION
9;;66;6;0;0;0;
10;70;368;17;0;0;0;-ABS ADD
11;5;61;35;0;0;0;
12;80;396;0;0;0;0;-DET CHAP
13;3;61;34;0;0;0;
14;1;61;34;0;0;0;
15;70;368;17;0;0;0;gDON'T MAKE A PARA 1-
16;12;;0;0;0;1;
17;5;61;34;0;0;0;
18;5;61;0;0;0;0;
19;76;367;1;0;0;0;
SHEET;271
PROCR;369;SET NON-INTERRUPTIBLE S/R
NOTES;RADIX;B;GROUPS 4 AND 15 BEFORE ENTER MASTER
0;81;369;0;0;0;0;
1;;437;71;0;0;0;25/1/1/4096
2;80;350;0;0;0;0;gO/P
3;80;399;0;0;0;0;gO/P 24/0/3 0
4;82;369;0;0;0;0;
SHEET;272
PROCR;370;CONSTANTS
NOTES;RADIX;B;
0;54;61;55;0;0;14;CLEAR W/LS
1;80;379;0;0;0;0;-PREP S/R
2;80;380;0;0;0;0;-GET NEXT CHAR S/R
3;10;;0;0;0;0;
SHEET;273
PROCR;371;CONSTANTS
NOTES;RADIX;B;
0;80;380;0;0;0;0;-GET NEXT CHAR
1;10;;0;0;0;1;
2;5;61;30;0;0;0;DEFN LINE IND
3;5;61;98;1;0;0;
4;91;61;60;0;2;0;
5;;61;24;0;0;0;THIS CHARACTER
6;12;;0;0;0;51;A
7;70;372;4;0;0;0;
8;12;;0;0;0;1;B
9;70;372;1;0;0;0;
10;12;;0;0;0;1;gNOT 'C'
11;71;371;14;0;0;0;16
12;10;;0;0;0;10;gSET AS SUBFIELD LENGTH
13;76;371;19;0;0;0;
14;12;;0;0;0;1;
15;70;372;2;0;0;0;
16;12;;0;0;0;13;P
17;70;372;3;0;0;0;
18;10;;0;0;0;p;HENCE'R'
19;5;61;55;0;2;0;SUBFIELD LENGTH
SHEET;274
PROCR;372;CONSTANTS
NOTES;RADIX;B;
0;10;;0;0;0;1;R,C=5
1;11;;0;0;0;1;B=4
2;11;;0;0;0;1;D=3
3;11;;0;0;0;1;P=2
4;11;;0;0;0;1;A=1
5;3;61;62;0;2;0;SWITCH SETTING
6;84;374;0;0;0;0;
7;80;380;0;0;0;0;GET NEXT CHAR
8;12;;0;0;0;7e;)
9;70;373;0;0;0;0;
10;00;61;98;1;0;0;COLLECT * IN'(B)' DIRECTIVE
11;30;;0;0;0;2;
12;1;61;24;0;0;0;THIS CHAR
13;05;61;98;1;0;0;
14;76;372;7;0;0;0;LOOP UNTIL')'FOUND
SHEET;275
PROCR;373;CONSTANTS
NOTES;RADIX;B;
0;32;;0;0;0;10;PRESERVE B DURING CONVERT
1;5;61;96;1;0;0;
2;;61;98;2;0;0;
3;80;430;0;0;0;0;CONVERT NO OF BITS FOR BIN CONSTANT
4;73;373;6;0;0;0;gSAFETY DEVICE
5;4;61;55;0;2;0;AUG SHIFT CONTROL
6;34;61;96;1;0;0;RESTORE B
7;10;;0;0;0;0;
SHEET;276
PROCR;374;CONSTANTS MAIN LOOP
NOTES;RADIX;B;
0;80;380;0;0;0;0;GET NEXT CHAR
1;12;;0;0;0;7t;(
2;70;374;13;0;0;0;gYES
3;12;;0;0;0;2;,
4;70;376;0;0;0;0;
5;12;;0;0;0;1;NE
6;70;377;0;0;0;0;gEND OF CONSTANT
7;85;374;0;0;0;0;
8;C;383;0;0;0;0;ALPHA
9;C;384;0;0;0;0;P
10;C;385;0;0;0;0;D
11;C;387;0;0;0;0;B
12;C;389;0;0;0;0;R
13;10;;0;0;0;1;
14;5;61;61;0;0;0;MIXED CONST IND
15;80;375;0;0;0;0;gSHIFT UP PREVIOUS SUBFIELD
16;76;370;3;0;0;0;gGET NEXT CHAR
SHEET;277
PROCR;375;CONSTANTS S/R
NOTES;RADIX;B;ADD THIS SUBFIELD TO PREVIOUS ONES
0;81;375;0;0;0;0;
1;0;61;26;1;0;0;CONSTANT TO DATE
2;124;61;60;0;0;0;SUBFIELD CTR
3;124;61;55;0;0;0;LENGTH OF SUBFIELD
4;31;;0;0;0;0;/////
5;1;61;28;1;0;0;VALUE OF CURRENT SUBCONST
6;5;61;26;1;0;0;
7;5;61;28;1;0;0;
8;10;;0;0;0;1;
9;4;61;60;0;0;0;STEP SF COUNTER
10;82;375;0;0;0;0;
SHEET;278
PROCR;376;, ROUTINE
NOTES;RADIX;B;
0;80;380;0;0;0;0;gGET NEXT CHAR AFTER COMMA
1;80;375;0;0;0;0;gADD IN SUBCONST PRECEDING COMMA
2;91;61;60;0;2;0;
3;84;374;0;0;0;0;
4;C;61;62;0;2;0;NEXT SUBFIELD TYPE
5;;61;24;0;0;0;NEXT CHAR AFTER COMMA
6;76;374;1;0;0;0;
SHEET;279
PROCR;377;PREPARE FOR O/P
NOTES;RADIX;B;CONSTANTS
0;80;375;0;0;0;0;gADD IN FINAL SUBCONST
1;;61;32;0;0;0;NEG IND
2;70;377;11;0;0;0;gCONSTANT IS POSITIVE
3;;61;47;0;0;0;CONST TYPE
4;70;377;9;0;0;0;SHORT CONST
5;10;;0;0;0;0;
6;2;61;26;1;0;0;
7;5;61;26;1;0;0;
8;76;377;11;0;0;0;COMPLEMENT CONST LONG OR SHORT
9;2;61;26;0;0;0;
10;5;61;26;0;0;0;
11;;;6;2;12;0;
12;5;61;31;0;0;0;SET END IND
13;80;403;0;0;0;0;gPRINT
14;80;378;0;0;0;0;gCONST O/P SR
15;;61;31;0;0;0;END IND
16;71;353;0;0;0;0;gYES,GNB
17;80;401;0;0;0;0;-I/P
18;80;379;0;0;0;0;-PREP S/R
19;10;;0;0;0;0;CLEAR A FOR GET NEXTCHARACTER S/R
20;80;380;0;0;0;0;-GET NEXT CHAR
21;12;;0;0;0;7t;(
22;70;377;27;0;0;0;gTHIS IS A DIRECTIVE LINE
23;;61;61;0;0;0;
24;71;376;2;0;0;0;-THIS IS A MIXED CONSTANT
25;;61;24;0;0;0;NEXT CHARACTER
26;76;374;1;0;0;0;-
27;5;61;55;0;0;0;
28;5;61;56;1;0;0;
29;5;61;58;1;0;0;
30;76;371;0;0;0;0;gGET DIRECTIVE LETTER
SHEET;280
PROCR;378;O/P S/R
NOTES;RADIX;B;CONSTANTS
0;81;378;0;0;0;0;
1;;61;27;0;0;0;MOST SIG HALF LONG CONST
2;5;67;3;0;0;0;
3;;61;26;0;0;0;LEAST SIG HALF
4;124;61;68;0;0;0;0 OR 2
5;5;67;1;0;0;0;
6;;61;47;0;0;0;CONST TYPE
7;71;378;14;0;0;0;-LONG NO CONST
8;;61;31;0;0;0;NONZERO IF FINAL CONST IN SECTION
9;71;378;14;0;0;0;-
10;10;;0;0;0;2;
11;2;61;68;0;0;0;
12;3;61;68;0;0;0;
13;71;378;21;0;0;0;gFIRST TIME THRU
14;;61;26;1;0;0;;SET B8 OF PARAM
15;72;378;20;0;0;0;;IF NEGATIVE LN CONST
16;;61;27;0;0;0;;WITH MOST SIGNI
17;71;378;20;0;0;0;gMOST SIG HALF IS NOT MINUS ZERO
18;10;;0;0;0;80;B8
19;4;67;2;0;0;0;PARAMETER
20;80;411;0;0;0;0;O/P
21;82;378;0;0;0;0;END
SHEET;281
PROCR;379;CONSTANTS PREP S/R
NOTES;RADIX;B;
0;81;379;0;0;0;0;
1;54;61;26;0;0;8;CLEAR W/L'S
2;;77;2;1;0;0;AMEND IND
3;5;7;2;1;0;0;
4;;77;4;1;0;0;LINE SERIAL
5;5;7;6;1;0;0;
6;55;77;8;1;0;18;COPY CONSTANTS
7;C;7;12;1;0;0;
8;;77;26;1;0;0;PASS 1 REPORTS
9;5;7;48;1;0;0;
10;55;77;28;1;0;16;COPY ANNOTATION
11;C;7;32;1;0;0;
12;0;61;68;0;0;0;O/P IND
13;71;379;15;0;0;0;gSECOND HALF OF SHORT CONST
14;5;67;0;0;0;0;CLEAR THIS
15;;7;46;1;0;0;
16;2;434;26;1;0;0;IGNORE TRANSLATION IND
17;70;377;11;0;0;0;gYES,GO TO PRINT
18;90;;0;0;3;0;
19;C;;0;0;0;10;
20;34;77;8;1;0;0;FIRST WORD OF CONSTANT
21;10;;0;0;0;2;
22;5;61;38;0;0;0;SET WORD CTR
23;5;61;60;0;0;0;S/F MOD
24;82;379;0;0;0;0;
SHEET;282
PROCR;380;GET NEXT CHAR S/R
NOTES;RADIX;B;
0;81;380;0;0;0;0;
1;32;;0;0;0;2;
2;5;61;24;1;0;0;THIS CHAR W/L
3;94;380;10;0;3;2;
4;124;61;38;0;0;0;
5;34;77;8;1;0;0;NEXT WORD
6;10;;0;0;0;2;
7;4;61;38;0;0;0;
8;90;;0;0;3;0;
9;C;;0;0;0;10;
10;;61;24;1;0;0;
11;82;380;0;0;0;0;
SHEET;283
PROCR;381;TEST (,NE S/R
NOTES;RADIX;B;CONSTANTS
0;81;381;0;0;0;0;
1;12;;0;0;0;7t;(
2;70;381;6;0;0;0;
3;12;;0;0;0;2;,
4;70;381;6;0;0;0;
5;12;;0;0;0;1;NE
6;82;381;0;0;0;0;
SHEET;284
PROCR;382;PUT THIS CHAR INTO O/P WORD S/R
NOTES;RADIX;B;
0;81;382;0;0;0;0;
1;;61;28;1;0;0;
2;30;;0;0;0;1;
3;1;61;24;2;0;0;NEXT CHAR(BASIC ONLY)
4;5;61;28;1;0;0;
5;82;382;0;0;0;0;
SHEET;285
PROCR;383;ALPHA CONSTANTS
NOTES;RADIX;B;
0;;61;30;0;0;0;DEFN LINE IND
1;70;383;5;0;0;0;gNO
2;10;;0;0;0;8;
3;124;61;60;0;0;0;SF CTR
4;4;61;55;0;0;0;AUG SF LENGTH BY 8 FOR EACH ALPHA C
5;;61;28;1;0;0;
6;30;;0;0;0;2;
7;1;61;24;0;0;0;
8;5;61;28;1;0;0;ADD IN THIS CHAR TO SUBCONST
9;76;374;0;0;0;0;
SHEET;286
PROCR;384;BINAY PATTERNS
NOTES;RADIX;B;
0;0;61;24;0;0;0;THIS CHARACTER
1;12;;0;0;0;10;MINUS SIGN
2;70;384;13;0;0;0;
3;0;61;30;0;0;0;
4;70;384;8;0;0;0;gNOT DEFINITION LINE
5;10;;0;0;0;1;
6;124;61;60;0;0;0;SF MOD
7;4;61;55;0;0;0;AUG SF LENGTH BY 1 BIT PER CHAR
8;;61;28;1;0;0;
9;1;61;28;1;0;0;
10;1;61;24;2;0;0;
11;5;61;28;1;0;0;ADD THIS BIT INTO SUBCONST
12;76;373;7;0;0;0;
13;0;61;60;0;0;0;TEST FIRST SUBFIELD
14;71;373;7;0;0;0;
15;10;;0;0;0;1;
16;5;61;32;0;0;0;NEG INDICATOR
17;76;373;7;0;0;0;
SHEET;287
PROCR;385;DECIMAL CONSTS (-VE)
NOTES;RADIX;B;
0;;61;24;0;0;0;
1;12;;0;0;0;10;NEG SIGN
2;71;386;0;0;0;0;
3;;61;60;0;0;0;S/F MOD
4;71;385;8;0;0;0;NOT FIRST MOD
5;10;;0;0;0;1;
6;5;61;32;0;0;0;NEG IND
7;76;374;0;0;0;0;
8;10;;0;0;0;1;BIT 1
9;124;61;60;0;0;0;SF MOD
10;124;61;55;0;0;0;SF LENGTH
11;31;;0;0;0;0;/////
12;60;;0;0;0;0;
13;2;61;28;1;0;0;FORM N BIT
14;5;61;28;1;0;0;DEC COMPT
15;62;;0;0;0;0;
16;76;374;0;0;0;0;
SHEET;288
PROCR;386;DECIMAL CONSTANTS (+VE)
NOTES;RADIX;B;
0;;61;30;0;0;0;
1;70;386;5;0;0;0;gNOT DIRECTIVE LINE
2;10;;0;0;0;4;
3;124;61;60;0;0;0;SF MOD
4;4;61;55;0;0;0;AUG SF LENGTH BY 4 BITS PER CHAR
5;80;382;0;0;0;0;gADD THIS CHAR TO O/P WORD
6;76;374;0;0;0;0;
SHEET;289
PROCR;387;BINARY NO CONSTANTS
NOTES;RADIX;B;
0;;61;24;0;0;0;
1;12;;0;0;0;10;-SIGN
2;71;387;6;0;0;0;
3;10;;0;0;0;1;
4;5;61;33;0;0;0;
5;76;387;7;0;0;0;
6;80;382;0;0;0;0;-THIS CHAP SET UP O/P
7;80;380;0;0;0;0;-GET NEXT CHAT
8;80;381;0;0;0;0;-TEST S/R
9;71;387;0;0;0;0;
10;32;;0;0;0;10;
11;5;61;34;1;0;0;PRESERVE B
12;;61;28;1;0;0;DEC VALUE OD CONST
13;80;430;0;0;0;0;CONVERT
14;5;61;28;1;0;0;
15;34;61;34;1;0;0;RESTORE B
16;;61;33;0;0;0;NEG IND FOR BIN CONSTS
17;70;388;3;0;0;0;gNOT NEGATIVE
18;;61;60;0;0;0;S/F MOD
19;70;388;0;0;0;0;gFIRST S/F
20;10;;0;0;0;1;
21;124;61;60;0;0;0;S/F MOD
22;124;61;55;0;0;0;S/F LENGTH=N
23;31;;0;0;0;0;/////
24;2;61;28;1;0;0;FORM N-BIT COMPT
25;5;61;28;1;0;0;
26;76;388;2;0;0;0;
SHEET;290
PROCR;388;BINARY NO CONSTANTS
NOTES;RADIX;;
0;10;;0;0;0;1;
1;5;61;32;0;0;0;NEG IND
2;5;61;33;0;0;0;BIN NO NEG IND
3;;61;24;0;0;0;
4;76;374;1;0;0;0;-
SHEET;291
PROCR;389;RELATIVE ADDRESS CONSTS
NOTES;RADIX;;
0;;61;24;0;0;0;
1;12;;0;0;0;4:;
2;70;390;0;0;0;0;gCOLON
3;11;;0;0;0;4:;
4;80;381;0;0;0;0;-TEST S/R
5;70;390;22;0;0;0;
6;80;382;0;0;0;0;-THIS CHAR SET UP O/P
7;80;380;0;0;0;0;-GET NEXT CHAR
8;76;389;0;0;0;0;
SHEET;292
PROCR;390;RELATIVE ADDRESS CONSTS
NOTES;RADIX;B;
0;32;;0;0;0;10;
1;5;61;98;1;0;0;STORE REGISTER B
2;;61;28;1;0;0;
3;80;430;0;0;0;0;CONVERT
4;5;61;35;0;0;0;
5;91;61;68;0;2;0;
6;80;396;0;0;0;0;-DET CHAP S/R
7;3;67;0;0;2;0;PARA
8;70;390;11;0;0;0;ABS ADD
9;12;;0;0;0;1;=2C+1
10;4;67;0;0;2;0;
11;;61;35;0;0;0;REF
12;30;;0;0;0;2;
13;4;67;0;0;2;0;
14;10;;0;0;0;0;
15;5;61;28;1;0;0;CLEAR FOR ITEM
16;34;61;98;1;0;0;
17;80;380;0;0;0;0;gGET NEXT CHAR
18;80;381;0;0;0;0;gTEST S/R
19;70;390;24;0;0;0;
20;80;382;0;0;0;0;gTHIS CHAR SET UP O/P
21;76;390;17;0;0;0;
22;91;61;68;0;2;0;
23;5;67;0;0;2;0;
24;32;;0;0;0;10;
25;5;61;34;1;0;0;STORE 2
26;;61;28;1;0;0;
27;80;430;0;0;0;0;CONVERT ITEM
28;5;61;28;1;0;0;
29;34;61;34;1;0;0;REPLACE B
30;76;388;3;0;0;0;-
SHEET;293
PROCR;391;TABLE ENTRIES
NOTES;RADIX;B;
0;50;77;2;0;0;0;
1;C;441;0;0;0;0;
2;52;7;2;0;0;0;EDIT TABLES
3;C;441;0;0;0;0;
4;;77;22;1;0;0;PASS 1 REPORTS
5;5;7;48;1;0;0;
6;55;77;24;1;0;16;COPY ANNOTATION
7;C;7;32;1;0;0;
8;80;403;0;0;0;0;PRINT
SHEET;294
PROCR;392;TABLE ENTRIES
NOTES;RADIX;B;
0;90;;0;0;2;0;
1;C;;0;0;0;20;
2;;66;3;0;2;0;
3;80;430;0;0;0;0;CONVERT
4;5;66;3;0;2;0;
5;94;392;2;0;2;1;
6;90;;0;0;2;0;
7;C;;0;0;0;4;
8;;66;16;0;2;0;
9;101;;100;1;2;0;
10;73;392;15;0;0;0;gSECTION
11;101;;899;1;2;0;
12;72;392;15;0;0;0;g999
13;10;;0;0;0;2-;
14;4;66;17;0;2;0;REDUCE ITEM FOR CALCS
15;94;392;8;0;2;2;
16;10;;0;0;0;0;
17;34;61;47;0;0;0;TYPE
18;36;436;4;0;0;0;BIT 1
19;71;392;26;0;0;0;NOT TYPES 2 OR 4
20;0;66;19;0;0;0;SECOND ITEM
21;71;392;25;0;0;0;g'LAST ITEM'GIVEN
22;0;66;17;0;0;0;FIRST ITEM
23;71;392;25;0;0;0;
24;00;437;6;0;0;0;SOMETHING IN Q5
25;5;67;2;0;0;0;
26;0;66;16;0;0;0;FIRST REF
27;5;61;35;0;0;0;REF
28;80;396;0;0;0;0;DET CHAP
SHEET;295
PROCR;393;TABLE ENTRIES
NOTES;RADIX;B;
0;3;67;0;0;0;0;;FORM PARA 2C-1
1;70;393;4;0;0;0;ABS ADD
2;12;;0;0;0;1;
3;4;67;0;0;0;0;
4;;61;35;0;0;0;REF
5;30;;0;0;0;2;
6;4;67;0;0;0;0;
7;0;66;3;0;0;0;SHORT/LONG/ALPHA
8;70;393;13;0;0;0;
9;12;;0;0;0;1;
10;70;393;12;0;0;0;
11;;437;47;0;0;0;B17
12;1;437;11;0;0;0;B18
13;5;67;3;0;0;0;
14;;66;13;0;0;0;SIGN
15;70;394;0;0;0;0;
16;12;;0;0;0;2;
17;70;393;19;0;0;0;
18;;437;49;0;0;0;B20
19;1;437;7;0;0;0;
20;4;67;3;0;0;0;
SHEET;296
PROCR;394;TABLE ENTRIES
NOTES;RADIX;B;
0;0;66;4;0;0;0;SINGLE/BE
1;70;394;4;0;0;0;
2;;437;49;0;0;0;B20
3;4;67;3;0;0;0;
4;;66;12;0;0;0;ZEROS
5;30;;0;0;0;1;
6;1;66;10;0;0;0;DISC
7;30;;0;0;0;1;
8;1;66;11;0;0;0;SPACES
9;30;;0;0;0;1;
10;1;66;5;0;0;0;NO OF CHARS
11;4;67;3;0;0;0;
12;;66;15;0;0;0;LTE
13;70;395;2;0;0;0;
14;10;;0;0;0;0;
15;2;67;3;0;0;0;
16;70;395;0;0;0;0;
17;5;67;3;0;0;0;
18;76;395;2;0;0;0;
SHEET;297
PROCR;395;TABLE ENTRIES
NOTES;RADIX;B;
0;10;;0;0;0;80;B8;SET B8 OF PARAM
1;4;67;0;0;0;0;;IF LTE AND 67/3
2;0;66;17;0;0;0;FIRST ITEM
3;5;67;1;0;0;0;
4;;66;14;0;0;0;STERLING INDICATOR
5;70;395;14;0;0;0;;SET BIT 17
6;4;61;109;0;0;0;;ON 2ND TIME TWR
7;0;61;109;0;0;0;;AND THERE AFTER
8;12;;0;0;0;2;;EVERY THIRD TIME
9;71;395;14;0;0;0;;THRU IE FOR SHILLING
10;12;;0;0;0;1;
11;5;61;109;0;0;0;SET CTR=1-
12;;437;47;0;0;0;B17
13;4;67;1;0;0;0;
14;0;66;15;0;0;0;LTE IND
15;80;411;0;0;0;0;O/P
16;76;353;0;0;0;0;GNB
17;5;61;109;0;0;0;
18;5;61;109;0;0;0;CLEAR STERLING CTR
19;80;411;0;0;0;0;O/P
20;76;353;0;0;0;0;GNB
SHEET;298
PROCR;396;DETERMINE CHAP S/R
NOTES;RADIX;B;
0;81;396;0;0;0;0;
1;;61;35;0;0;0;REF
2;70;396;16;0;0;0;ABS ADD
3;12;;0;0;0;64;100
4;72;397;0;0;0;0;
5;35;;0;0;0;1;Q1
6;10;;0;0;0;0;
7;124;61;35;0;0;0;
8;36;70;0;0;0;0;SECT DETS
9;5;61;18;0;0;0;
10;34;437;49;0;0;0;B20
11;124;61;35;0;0;0;
12;36;70;0;0;0;0;SECT DETS
13;35;;0;0;0;1;
14;124;61;18;0;0;0;UNCORRECTED CHAP
15;36;92;9;0;0;0;CORRECTED CHAP IN Q1
16;82;396;0;0;0;0;
SHEET;299
PROCR;397;DET CHAP S/R
NOTES;RADIX;B;
0;12;;0;0;0;383;899;REF999
1;73;397;6;0;0;0;
2;71;397;8;0;0;0;gREF >999, CHEAT
3;5;61;35;0;0;0;SET REF ZERO
4;;61;51;0;0;0;THIS CHAP
5;82;396;0;0;0;0;
6;11;;0;0;0;3.7;999
7;30;;0;0;0;2;PROCR IN Q3-5
8;101;92;10;0;0;0;BIN LAST PROCRS IN CHAP
9;32;;0;0;0;10;
10;2;437;0;0;0;0;ABS ADDRESS 92/9
11;5;61;18;0;0;0;UNCORR C NO
12;76;396;13;0;0;0;
SHEET;300
PROCR;398;SR FOR INTERNAL SC'S TO MAKE REL TO PROCR STARTS
NOTES;;;
0;81;398;0;0;0;0;
1;73;398;5;0;0;0;gNEGATIVE ACTION
2;1;61;43;0;0;0;
3;2;61;11;0;0;0;START OF CURRENT PROCR
4;76;398;7;0;0;0;
5;2;61;43;0;0;0;
6;1;61;11;0;0;0;
7;5;67;3;0;0;0;
8;0;61;10;0;0;0;CURRENT PROCR(IN THIS CHAPTER)
9;30;;0;0;0;2;
10;1;61;3;0;0;0;2C
11;5;67;2;0;0;0;PARA
12;80;411;0;0;0;0;gO/P
13;82;398;0;0;0;0;
SHEET;301
PROCR;399;OUTPUT 24/0/3 BY 0 OR 24/0/3 BY OTHER CHAP 15-BIT START
NOTES;;;
0;81;399;0;0;0;0;
1;70;399;6;0;0;0;g24/0/3 BY 0
2;5;67;3;0;0;0;
3;10;;0;0;0;1;
4;2;67;3;0;0;0;
5;2;67;3;0;0;0;
6;1;438;0;0;0;0;24/0/3
7;80;348;0;0;0;0;gO/P
8;82;399;0;0;0;0;
SHEET;302
PROCR;400;OUTPUT 24/0/3 BY 0
NOTES;RADIX;B;
0;81;400;0;0;0;0;
1;10;;0;0;0;0;
2;80;399;0;0;0;0;
3;82;400;0;0;0;0;
SHEET;303
PROCR;401;I/P SR
NOTES;RADIX;B;
0;81;401;0;0;0;0;
1;;;0;2;12;0;CURRENT RECORD LENGTH
2;5;430;0;0;0;0;
3;97;430;0;0;12;0;
4;C;401;6;0;0;0;
5;80;432;0;0;0;0;gREAD
6;10;;0;0;0;0;
7;35;;0;0;0;1111;
8;36;;2;1;12;0;'AMENDED IMPLICITY'IND
9;5;437;97;0;0;0;
10;37;;2;1;12;0;CLEAR 2 CHARS
11;54;77;0;1;0;44;BULK CLEAR
12;55;;0;1;12;0;BULK COPY
13;C;77;0;1;0;0;
14;C;;0;2;12;0;
15;82;401;0;0;0;0;
SHEET;304
PROCR;402;PRINT LINE AND RE-SITE AMEND IND
NOTES;;;
0;81;402;0;0;0;0;
1;;8;4;1;0;0;
2;5;8;2;1;0;0;
3;5;8;4;1;0;0;
4;80;403;0;0;0;0;gPRINT
5;82;402;0;0;0;0;
SHEET;305
PROCR;403;PRINT FROM SEC 5 OR 7 SR-TX AREA PARAS SET UP IN ADVANCE
NOTES;RADIX;B;
0;81;403;0;0;0;0;
1;0;436;0;1;0;0;BEW
2;5;7;50;1;0;0;
3;;7;46;1;0;0;
4;80;408;0;0;0;0;gREPORT IF TOP 4 CHARS='?'
5;70;403;19;0;0;0;gYES
6;;7;48;1;0;0;
7;70;403;21;0;0;0;gNO ERRORS
8;80;408;0;0;0;0;gTEST FOR REPORT
9;70;403;19;0;0;0;gDISASTROUS ERROR
10;;7;32;1;0;0;FIRST 5 CHARS ANNOTATION
11;12;;0;0;0;7171717171;'/////'
12;71;403;16;0;0;0;
13;35;;0;0;0;111111;Q1-6
14;37;7;48;1;0;0;
15;76;403;21;0;0;0;gDONT COUNT
16;86;407;0;0;0;0;
17;11;;0;0;0;1;STEP CTR OF OTHER ERRORS
18;84;407;0;0;0;0;
19;10;;0;0;0;1;(PRINT REPORTED LINES)
20;5;437;97;0;0;0;
21;0;23;46;1;0;0;'PRINT PROCR'+'PRINT ALL'INDS
22;71;403;28;0;0;0;gPRINT
23;0;437;97;0;0;0;'IMPLICITLY AMENDED'
24;70;403;33;0;0;0;gDONT PRINT
25;0;438;18;0;0;0;LAST RECORD PRINTED?
26;71;403;28;0;0;0;gYES
27;80;405;0;0;0;0;gBLANK LINE
28;0;61;46;0;0;0;HEAD OF FORM,OR ZERO
29;5;7;0;2;0;0;
30;80;406;0;0;0;0;gPRINT LINE
31;10;;0;0;0;1;
32;3;61;46;0;0;0;SET FOR NEXT TIME
33;5;438;18;0;0;0;SET/CLEAR IND
34;82;403;0;0;0;0;
SHEET;306
PROCR;404;STORE LINE SERIAL FOR DIS ERRORS
0;100;;0;0;0;0;
1;124;435;44;0;1;0;
2;102;24;0;0;0;0;
3;123;;1;0;0;0;
4;100;435;44;0;0;0;
5;126;404;0;0;1;0;
6;106;404;5;0;0;0;
7;102;404;1;0;0;0;
8;126;404;0;0;1;0;
SHEET;307
PROCR;405;PRINT BLANK LINE UNCONDITIONALLY
0;81;405;0;0;0;0;
1;;999;16;1;0;0;COPY SEC 7 PARAS
2;5;435;40;1;0;0;
3;0;999;8;0;0;0;PT ROUTE
4;5;999;16;0;0;0;
5;2;999;8;0;0;0;
6;12;;0;0;0;40;65
7;5;999;17;0;0;0;CREATE R,-(64+R)
8;5;7;0;1;0;0;
9;0;436;0;1;0;0;BEW
10;5;7;2;1;0;0;
11;80;406;0;0;0;0;gPRINT EX SEC 7
12;0;435;40;1;0;0;
13;5;999;16;1;0;0;RESTORE SEC 7 PARAS
14;82;405;0;0;0;0;
SHEET;308
PROCR;406;PRINT SEC 7(OR SEC 5,OR PT ANNEX)
0;81;406;0;0;0;0;
1;;27;9;0;0;0;
2;70;406;7;0;0;0;gPRINTER
3;55;7;0;1;0;54;
4;C;10;4;1;0;0;
5;80;433;0;0;0;0;gO/Pg
6;82;406;0;0;0;0;
7;;27;8;0;0;0;PRINTER TYPE
8;12;;0;0;0;9;
9;70;406;26;0;0;0;gSPECIAL
10;;437;49;0;0;0;BIT20
11;5;7;1;0;0;0;
12;54;10;0;1;0;384;(GP ANNEX)
13;124;999;17;1;2;0;SEC 7
14;124;;0;0;2;0;
15;124;999;13;1;2;0;SEC 10
16;129;;0;0;1;0;
17;10;;0;0;0;4;
18;30;;0;0;0;5;
19;1;999;7;0;0;0;ROUTE
20;34;999;12;0;0;0;
21;125;;4096;1;1;0;
22;124;999;0;0;3;0;
23;123;;160;0;2;0;
24;62;;0;0;0;0;
25;82;406;0;0;0;0;
26;55;7;0;1;0;54;COPY ANNEXES
27;C;10;0;1;0;0;
28;10;;0;0;0;9;
29;76;406;18;0;0;0;
SHEET;309
PROCR;407;OUTPUT 9gA6
NOTES;RADIX;B;
0;81;407;0;0;0;0;
1;43;A6;0;0;0;0;
2;C;9;0;0;0;0;
3;82;407;0;0;0;0;
SHEET;310
PROCR;408;TEST FOR DISASTROUS ERROR CONDITION IN PRINTER ANNEX
NOTES;;;
0;81;408;0;0;0;0;
1;30;;0;0;0;2-;
2;30;;0;0;0;2;
3;11;;0;0;0;5:;
4;2;434;26;1;0;0;'?????'
5;71;408;12;0;0;0;gNOT DISASTROUS
6;86;403;0;0;0;0;STEP DISASTER CTR
7;11;;0;0;0;1;
8;84;403;0;0;0;0;(CLEARS A)
9;;7;6;2;0;0;
10;80;404;0;0;0;0;
11;10;;0;0;0;0;
12;82;408;0;0;0;0;
SHEET;311
PROCR;409;O/P TYPE SR
NOTES;RADIX;B;
0;81;409;0;0;0;0;
1;91;61;44;0;2;0;
2;;61;26;1;0;0;TYPE NO ALPHA
3;1;434;16;1;0;0;TYPE(SPACE)
4;05;9;4;1;2;0;
5;;61;28;1;0;0;
6;05;9;6;1;2;0;
7;;61;43;0;0;0;SPACE CTR
8;05;9;8;2;2;0;
9;5;9;10;1;2;0;CLEAR
10;76;412;0;0;0;0;
SHEET;312
PROCR;410;ALPHA OUTPUT SR
NOTES;RADIX;B;
0;81;410;0;0;0;0;
1;91;61;44;0;2;0;
2;;61;26;1;0;0;
3;05;9;4;1;2;0;
4;;61;28;1;0;0;
5;05;9;6;1;2;0;
6;;67;2;0;0;0;
7;05;9;8;2;2;0;
8;;67;3;0;0;0;
9;05;9;10;2;2;0;
10;;410;0;0;0;0;O/P ALPHA S/R LINK
11;76;411;13;0;0;0;
SHEET;313
PROCR;411;O/P SR
NOTES;RADIX;B;
0;81;411;0;0;0;0;
1;;61;42;0;0;0;
2;4;61;43;0;0;0;AUGMENT LOCATION COUNTER
3;91;61;44;0;2;0;
4;;67;0;0;0;0;SERIAL NO FOR INST;RUCTIONS
5;05;9;4;2;2;0;
6;;67;1;0;0;0;SC INDICATOR FOR INSIONS
7;05;9;6;2;2;0;
8;;67;2;0;0;0;PARAMETER
9;05;9;8;2;2;0;
10;;67;3;0;0;0;
11;05;9;10;2;2;0;
12;;411;0;0;0;0;LINK
13;5;409;0;0;0;0;O/P TYPE S/R LINK
SHEET;314
PROCR;412;O/P SR
NOTES;RADIX;B;
0;94;412;6;0;2;8;
1;;436;0;1;0;0;BE WORD
2;05;9;4;1;2;0;
3;80;407;0;0;0;0;PREP STAGE OP
4;90;;0;0;2;0;
5;C;;0;0;0;144;
6;95;;0;0;2;0;
7;5;61;44;1;0;0;
8;5;67;1;0;0;0;CLEAR S67
9;5;67;2;1;0;0;
10;82;409;0;0;0;0;-
SHEET;315
PROCR;413;OP REMAINING DETAILS SR
NOTES;RADIX;B;
0;81;413;0;0;0;0;
1;00;61;44;0;0;0;
2;70;413;7;0;0;0;NOTHING TO O/P
3;91;61;44;0;2;0;OP CTR
4;00;413;0;0;0;0;LINK
5;05;409;0;0;0;0;O/P TYPE S/R LINK
6;76;412;1;0;0;0;
7;82;413;0;0;0;0;
SHEET;316
PROCR;414;I/P INSTRUCTION S/R
NOTES;RADIX;B;
0;81;414;0;0;0;0;
1;80;401;0;0;0;0;-I/P
2;10;;0;0;0;1;
3;5;61;99;0;0;0;NON I/P IND
4;80;415;0;0;0;0;-I/P C-LINE S/R
5;82;414;0;0;0;0;
SHEET;317
PROCR;415;I/P C-LINE S/R
NOTES;RADIX;B;
0;81;415;0;0;0;0;
1;;61;99;0;0;0;NON I/P IND
2;71;415;8;0;0;0;
3;80;427;0;0;0;0;SUSPEND
4;80;401;0;0;0;0;INPUT
5;;;6;1;12;0;
6;2;434;24;1;0;0;C, , , , ,
7;71;353;1;0;0;0;-G.N.B.
8;50;77;2;0;0;0;
9;C;440;0;0;0;0;
10;52;7;2;0;0;0;EDIT INSTRUCTIONS
11;C;440;0;0;0;0;
12;;77;20;1;0;0;PREVIOUS PROCR NO
13;5;7;28;1;0;0;
14;;77;22;1;0;0;PASS 1 REPORTS
15;5;7;48;1;0;0;
16;55;77;24;1;0;16;COPY ANNOTATION
17;C;7;32;1;0;0;
18;0;66;4;1;0;0;ACTION ALPHA
19;2;434;24;1;0;0;
20;70;419;0;0;0;0;gTHIS IS A C-LINE
21;10;;0;0;0;0;
22;5;61;20;1;0;0;
23;94;415;25;0;1;0;/////
24;76;418;0;0;0;0;gNO UNMATCHED SEQ CHS BACK
25;;;1;0;1;0;(R1 ABS) SC BACK DEST
26;02;66;2;1;0;0;SERIAL THIS ORDER
27;70;417;0;0;0;0;gTHIS IS A DESTINATION
28;72;418;0;0;0;0;gNOW TRY SEQ CH FWD LIST
29;;434;26;1;0;0;?????
30;5;61;20;1;0;0;
31;80;416;0;0;0;0;gSTORE 'ADDRESS'=CURRENT SPACE CTR
32;80;422;0;0;0;0;PRINT ENTRY POINT S/PRINT WRONG ENTRY PO
33;76;415;21;0;0;0;
SHEET;318
PROCR;416;
NOTES;;;
0;81;416;0;0;0;0;
1;;;0;0;1;0;SOURCE OF SC BACK
2;3;61;0;0;0;0;
3;5;;1;0;1;0;OVERWRITE DEST
4;0;61;20;1;0;0;
5;71;416;13;0;0;0;gIGNORED
6;35;;0;0;0;11;
7;36;66;2;0;0;0;
8;12;;0;0;0;2;
9;71;416;13;0;0;0;gNOT TO PROCR START
10;96;;0;0;1;0;
11;80;365;0;0;0;0;gCONTRACT SC BACK LIST
12;76;416;18;0;0;0;gSTEP R1
13;0;61;10;0;0;0;CURRENT PROCR
14;31;;0;0;0;10;
15;1;61;43;0;0;0;SPACE CTR
16;2;61;11;0;0;0;PROCR START
17;5;;0;0;1;0;STORE PROCR+ADDRESS IN PROCR
18;94;416;19;0;1;2;STEP
19;82;416;0;0;0;0;
SHEET;319
PROCR;417;I/P C-LINE S/R
NOTES;RADIX;B;STORE ABS DEST FOR MATCHES SC'S BACK
0;80;416;0;0;0;0;gSTORE ADDRESS
1;0;0;1;0;1;0;(R1 IS ABS) NEXT DEST
2;2;66;2;0;0;0;THIS SERIAL
3;71;418;39;0;0;0;gNONE,TRY SC FWD LIST
4;80;422;0;0;0;0;
5;76;417;0;0;0;0;gTHERE MAY BE MORE
SHEET;320
PROCR;418;I/P C-LINE S/R
NOTES;RADIX;B;TRY MATCH WITH SEQ CHS FWD
0;0;61;117;0;0;0;CTR OF SEC 20 LENGTH
1;70;419;0;0;0;0;gEMPTY
2;0;20;0;0;0;0;SMALLEST DEST OF SC FWD
3;70;419;0;0;0;0;gLIST EMPTY,SKIP TO END
4;2;66;2;1;0;0;THIS SERIAL
5;70;418;9;0;0;0;gIS DEST OF SEQ CH FWD
6;72;419;0;0;0;0;gEARLIER THAN EARLIEST DEST
7;00;434;26;1;0;0;
8;5;61;20;1;0;0;;SEQ CHS FORWARD
9;;20;2;0;0;0;
10;30;;0;0;0;6;
11;30;;0;0;0;1-;
12;70;418;15;0;0;0;gSC TO PROCR START
13;99;;0;1;1;0;
14;72;418;15;0;0;0;gOK
15;0;20;1;0;0;0;
16;5;61;0;0;0;0;
17;0;20;2;0;0;0;
18;70;418;28;0;0;0;gSC TO PROGR START
19;30;;0;0;0;4-;
20;5;416;0;0;0;0;FLIPFLOP
21;0;61;43;0;0;0;SPACE CTR
22;2;61;11;0;0;0;CURRENT PROCR START
23;34;436;22;0;0;0;BITS 1-10
24;124;416;0;0;1;0;0 OR 10
25;33;;0;0;0;0;/////
26;124;20;2;0;3;0;ABS LOCN Q1-4
27;114;;0;0;0;0;PACK NEXT ENTRYgSEC 18
28;0;61;117;0;0;0;
29;12;;0;0;0;3;
30;3;61;117;0;0;0;REDUCE NO OF SC'S IN TRANSIT
31;71;418;34;0;0;0;gLIST NOT EMPTY
32;5;20;0;0;0;0;
33;76;418;37;0;0;0;gTEST IF LAST SC WAS WRONG
34;124;20;3;0;2;0;
35;1;61;116;1;0;0;LENGTH IN 61/117
36;128;20;0;0;0;0;IP 3 LOCNS
37;;61;20;1;0;0;
38;71;415;32;0;0;0;gWAS A WRONG ENTRY POINT
39;;20;0;0;0;0;NEXT SC FWD DEST;LOOK FOR MORE E
40;2;66;2;0;0;0;
41;71;418;44;0;0;0;gNO MORE ENTRIES HERE
42;80;422;0;0;0;0;
43;76;418;9;0;0;0;gMOVE LIST UP,TRY AGAIN
44;52;7;2;0;0;0;EDIT ENTRY POINT
45;C;443;6;0;0;0;
SHEET;321
PROCR;419;I/P C LINE S/R
NOTES;RADIX;B;
0;10;;0;0;0;0;
1;34;66;6;1;0;0;REF
2;80;426;0;0;0;0;RT ALIGN S/R
3;5;66;6;1;0;0;
4;5;66;16;0;0;0;CLEAR INDICATOR
5;35;;0;0;0;1;QUARTET ONE.
6;36;66;8;1;0;0;ITEM
7;12;;0;0;0;+;+
8;71;420;0;0;0;0;gNOT 'ITEM+'
9;10;;0;0;0;1;
10;5;66;16;0;0;0;;IF IT IS SET
11;;66;8;1;0;0;;INDICATOR
12;30;;0;0;0;1-;;AND REMOVE +
13;72;419;15;0;0;0;
14;11;;0;0;0;1;TO MAKE COMPLEMENT;CORRECT
15;5;66;8;1;0;0;
SHEET;322
PROCR;420;I/P C-LINE S/R
NOTES;RADIX;B;
0;;77;38;1;0;0;IGNORE'IND
1;2;434;26;1;0;0;
2;3;61;98;1;0;0;
3;70;420;4;0;0;0;
4;80;403;0;0;0;0;PRINT
5;;66;6;2;0;0;DEC REF
6;12;;0;0;0;100;
7;73;420;14;0;0;0;gSECTION
8;12;;0;0;0;899;
9;72;420;14;0;0;0;g999 OR 1000+
10;60;;0;0;0;0;
11;10;;0;0;0;2-;
12;4;66;8;1;0;0;REDUCE ITEM
13;62;;0;0;0;0;
14;;66;4;1;0;0;
15;2;434;24;1;0;0;C, , , , ,
16;70;421;4;0;0;0;
17;34;66;4;1;0;0;
18;80;426;0;0;0;0;RT ALIGN S/R
19;5;66;4;1;0;0;
20;;66;4;2;0;0;ACTION
21;32;;0;0;0;1-;
22;5;61;110;0;0;0;GROUP
23;32;;0;0;0;1;
24;11;;0;0;0;1;
25;5;61;50;0;0;0;VARIANT +1
SHEET;323
PROCR;421;I/P C-LINE S/R
NOTES;RADIX;B;
0;0;61;110;0;0;0;
1;80;430;0;0;0;0;CONVERT
2;11;;0;0;0;1;
3;5;61;110;0;0;0;GROUP+1
4;;61;98;1;0;0;W/L
5;71;421;8;0;0;0;
6;5;61;110;0;0;0;CLEAR GROUP WHEN'IGNORE'IND SET
7;76;353;0;0;0;0;gGNB
8;124;435;20;0;2;0;
9;112;66;8;1;0;0;
10;5;66;8;1;0;0;ITEM TO BIN
11;124;435;20;0;2;0;
12;112;66;12;1;0;0;
13;5;66;12;1;0;0;MOD DIGITS TO BIN
14;124;435;20;0;2;0;
15;112;66;7;1;0;0;
16;5;66;6;1;0;0;REF TO BIN
17;5;61;99;0;0;0;NON I/P IND
18;82;415;0;0;0;0;
SHEET;324
PROCR;422;PRINT SEQ CHANGE ENTRY POINT ON SEPARATE LINE
NOTES;RADIX;B;
0;81;422;0;0;0;0;
1;0;61;20;1;0;0;
2;71;422;5;0;0;0;gPRINT REPORTED SC
3;0;23;46;1;0;0;'PRINT UNCONDITIONALLY' INDS
4;70;422;10;0;0;0;gDONT PRINT SEPARATE SC
5;52;5;2;0;0;0;
6;C;443;0;0;0;0;
7;0;61;20;1;0;0;?????'OR ZERO
8;5;5;46;1;0;0;
9;80;423;0;0;0;0;
10;82;422;0;0;0;0;
SHEET;325
PROCR;423;SECOND PRINT S/R
NOTES;RADIX;B;
0;81;423;0;0;0;0;
1;00;436;0;1;0;0;BEW
2;5;5;50;1;0;0;
3;0;999;14;1;0;0;SEC 5 PARAS
4;5;999;16;1;0;0;CORRUPT SEC 7 PARAS
5;80;403;0;0;0;0;gPRINT SR(WHICH WILL USE SEC 5)
6;0;999;30;1;0;0;
7;5;999;16;1;0;0;RESTORE SEC 7 PARAS EX WL
8;54;5;2;1;0;48;
9;82;423;0;0;0;0;
SHEET;326
PROCR;424;NEG NO S/R
NOTES;RADIX;B;
0;81;424;0;0;0;0;
1;10;;0;0;0;0;
2;2;66;8;1;0;0;ITEM
3;70;424;15;0;0;0;DO NOT SET INDICATORFOR ZERO ITEM
4;73;424;15;0;0;0;
5;5;66;8;1;0;0;
6;10;;0;0;0;80;B8
7;4;61;34;0;0;0;PARA W/L
8;;66;10;1;0;0;;DEAL WITH
9;12;;0;0;0;2;;DISC 2
10;71;424;15;0;0;0;;FOR -VE ITEM
11;12;;0;0;0;1;
12;4;66;8;1;0;0;
13;10;;0;0;0;1;
14;5;66;10;1;0;0;
15;82;424;0;0;0;0;
SHEET;327
PROCR;425;STACK S/R
NOTES;RADIX;B;
0;81;425;0;0;0;0;
1;0;61;0;0;0;0;ACTION
2;5;67;3;0;0;0;
3;;66;6;1;0;0;REF
4;30;;0;0;0;2;
5;1;61;34;0;0;0;PARAM
6;5;67;2;0;0;0;
7;;66;10;1;0;0;
8;70;425;14;0;0;0;GDISC 0
9;12;;0;0;0;2;
10;71;425;13;0;0;0;gNOT DISC 2
11;10;;0;0;0;1;STEP ITEM
12;4;66;8;1;0;0;
13;;437;27;0;0;0;B16
14;124;66;12;0;1;0;MOD DIGITS
15;1;437;23;0;0;0;BITS IN B14 POSN
16;1;66;8;0;0;0;ITEM
17;35;;0;0;0;1111;
18;36;67;3;0;0;0;
19;37;67;3;0;0;0;PACK WITH ACTION
20;10;;0;0;0;0;CLEAR A
21;82;425;0;0;0;0;
SHEET;328
PROCR;426;RT ALIGN S/R
NOTES;RADIX;B;
0;81;426;0;0;0;0;
1;10;;0;0;0;0;
2;05;61;18;1;0;0;
3;00;61;18;1;0;0;
4;32;;0;0;0;2;
5;05;61;18;1;0;0;
6;75;426;3;0;0;0;
7;00;61;18;1;0;0;
8;82;426;0;0;0;0;
SHEET;329
PROCR;427;SUSPEND S/R
NOTES;RADIX;B;
0;81;427;0;0;0;0;
1;55;66;6;1;0;8;
2;C;61;26;1;0;0;
3;;66;16;0;0;0;ITEM + IND
4;5;66;17;0;0;0;ITEM + IND (STORE)
5;82;427;0;0;0;0;
SHEET;330
PROCR;428;REPLACE S/R
NOTES;RADIX;B;
0;81;428;0;0;0;0;
1;55;61;26;1;0;8;
2;C;66;6;1;0;0;
3;;66;17;0;0;0;ITEM + IND (STORE)
4;5;66;16;0;0;0;ITEM + IND
5;82;428;0;0;0;0;
SHEET;331
PROCR;429;OP INST S/R
NOTES;RADIX;B;
0;81;429;0;0;0;0;
1;;66;12;1;0;0;MOD DIGITS
2;5;61;2;0;0;0;
3;80;497;0;0;0;0;gMOD AND PARAMETER
4;;61;2;0;0;0;
5;5;66;12;1;0;0;
6;0;66;8;1;0;0;
7;72;429;9;0;0;0;gNOT NEGATIVE ITEM
8;80;424;0;0;0;0;NEG NO
9;80;425;0;0;0;0;STACK
10;80;411;0;0;0;0;OP
11;82;429;0;0;0;0;
SHEET;332
PROCR;430;CONVERT (A) TO BINARY
NOTES;RADIX;;
0;81;430;0;0;0;0;
1;5;435;40;1;0;0;
2;62;;0;0;0;0;
3;124;435;20;0;2;0;
4;112;435;40;1;0;0;
5;82;430;0;0;0;0;
SHEET;333
PROCR;431;CONVERT (A) TO DECIMAL
NOTES;;;
0;81;431;0;0;0;0;
1;5;435;40;1;0;0;
2;60;;0;0;0;0;
3;124;435;0;0;2;0;
4;112;435;40;1;0;0;
5;82;431;0;0;0;0;
SHEET;334
PROCR;432;A2g8
0;81;432;0;0;0;0;
1;42;A2;0;0;0;0;
2;C;8;0;0;0;0;
3;59;8;6;0;12;0;
4;C;8;4;2;0;0;
5;82;432;0;0;0;0;
SHEET;335
PROCR;433;O/PgA9
0;81;433;0;0;0;0;
1;10;;0;0;0;800000;
2;34;999;12;0;0;0;
3;125;;4096;1;1;0;
4;1;999;7;0;0;0;D1/A9
5;124;999;0;0;3;0;
6;123;;160;0;2;0;
7;82;433;0;0;0;0;
SHEET;336
CONST;434;1;ALPHA CONSTANTS
0;(A)VALUE;
2;TABLE;
4;CONST;
6;PROCR;
8;(A)NOTES;
10;END  ;END
12;DUMPS;
14;FILES;
16;TYPE ;
18;FIEND;
20;g    ;
22;TYPE.;
24;C    ;
26;?????;
28;TYPEp;
30;(B)1;CONVERT LITERALS OF 35 ACTION
32;2;
34;4;
36;8;
38;16;
40;32;
42;64;
44;128;
46;256;
48;512;
SHEET;337
CONST;435;1;CONVERT TABLES
0;(D)1;BINgDEC
2;16;
4;256;
6;4096;
8;65536;
10;1048576;
12;16777216;
14;268435456;
16;4294967296;
18;pppppppppp;
20;1;DECgBIN
22;t;
24;64;
26;3.8;
28;2710;
30;186t0;
32;p4240;
34;989680;
36;5p5.100;
38;3e9t+t00;
40;0;(A)WL
42;0;'CLEO'PARA WORD
44;+00000;
SHEET;338
CONST;436;0;DECIMAL CONSTANTS
0;(D)7.;B.E.
1;7.000;WORD
2;0;0:48  MR SETTING
3;90;MR NOW 0:144
4;1;FUNCTION WORDS
5;45;TYPES IN ALPHA
6;45;
7;44;
8;4;
9;4;
10;2;
11;0;
12;(R)18:2499;FOR SEQUENCE CHANGES
13;18:0;
14;(B)180;FOR TSL STORAGE
15;180;
16;(D)3;
17;7ppp0;B5-19
18;1ppp;B1-13
19;66666;DEC RADIX
20;66.64;ST RADIX
21;66666;DEC RADIX
22;3pp;BITS 1-10
23;01000;BIT 13
24;3p;BITS 1-6
SHEET;339
CONST;437;0;INSTRUCTIONS
0;(R)92:9;
1;(D)08006;10/1/0/6
2;+8006;12/1/0/6
3;7;
4;ppppp;THIS ISN'T A DUMMY
5;ppppp;
6;(D)60000;6
7;40000;4 B19
8;50000;5
9;30000;3
10;70000;7
11;20000;2      B18
12;90000;9
13;t0000;10
14;e0000;11
15;:0000;13
16;20001-;18/1/1/0/1
17;8+000-;24/1/2
18;80000-;24/0/0
19;0t000;0/1/1
20;1.000;0/1/3
21;1t000;1/1/1
22;1+000;1/1/2
23;0;0/0/0
24;02000;0/0/1 B14
25;04000;0/0/2 B15
26;06000;0/0/3 B14
27;08000;0/1/0 B16
28;28000;2/1/0
29;38000;3/1/0
30;22000-;18/0/1
31;26000-;18/0/3
32;2t000-;18/1/1
33;2.000-;18/1/3
34;12000;1/0/1
35;p0000;15
36;.0000;14
37;14000;1/0/2
38;e0000-;27/0/0
39;e2000-;27/0/1
40;e4000-;27/0/2
41;e6000-;27/0/3
42;e8000-;27/1/0
43;et000-;27/1/1
44;88000-;24/1/0
45;t0000-;26/0/0
46;t2000-;26/0/1
47;10000;1/0/0 B17
48;2t00t-;18/1/1/0/10
49;80000;8/0/0 B20
50;88000;8/1/0
51;1.001;1/1/3/0/1
52;48000;4/1/0
53;2t005-;18/1/1/0/5
54;t8000-;26/1/0
55;68000;6/1/0
56;+0000;12
57;90000-;25/0/0
58;74000-;23/0/2
59;70000-;23/0/0
60;2e016-;18/1/1/0/10  (18/1/11/4096+22)
61;t4000-;26/0/2
62;2e017-;18/1/1/0/9- (18/1/1/4094+23
63;+0000-;28/0/0
64;84000-;24/0/2
65;:2000-;29/0/1
66;+4000-;28/0/2
67;+6000-;28/0/3
68;++000-;28/1/2
69;+.000-;28/1/3
70;2e01e-;18/1/1/0/5-
71;9e000-;
72;(R)18:2496;FOR SEQUENCE CHANGES
73;(D)1;
74;p0000-;31/0/0
75;p8000-;31/1/0
76;.8000-;30/1/0
77;.0008-;30/0/0/8
78;.0000-;30/0/0
79;p0008-;31/0/0/8
80;40000-;20/0/0
81;48000-;20/1/0
82;58000-;21/1/0
83;40008-;20/0/0/8
84;50000-;21/0/0
85;60000-;22/0/0
86;.0004-;30/0/0 4
87;p8004-;31/1/0 4
88;68000-;22/1/0
89;407+;BITS 3-7+15
90;400;PARA 152
91;6808t;6/1/0 138
92;500;PARA 154
93;0409+;0/0/2/156
94;200;PARA 150
95;300;PARA 151
96;t6000-;26/0/3 0
97;;INDICATOR FOR PRINTING CURRENT BLOCK
SHEET;340
CONST;438;0;MORE ACTIONS
0;(D)86000-;24/0/3
1;82000-;24/0/1
2;28006;2/1/06
3;38006;3/1/06
4;e8002-;27/1/02
5;1t002;1/1/12
6;22005-;18/0/15
7;06004;0/0/34
8;20001;2/0/01
9;88001-;24/1/01
10;e4002-;27/0/22
11;88007-;24/1/07
12;t5ppe-;26/0/35-
13;t1ppt-;26/0/16-
14;20006;2/0/06
15;86006-;24/0/36
16;74002-;23/0/22
17;0;THIS IS A 0/10 FLIPFLOP USED FOR SC'S FW
18;0;SERIAL LAST MT BLOCK PRINTED IMPLICITLY
19;8+006-;24/1/2 6
20;1t00t;1/1/1 10
21;30002;3/0/0 2
22;1t014;1/1/1 20
23;04002;0/0/2 2
24;88005-;24/1/0 5
25;:6000-;29/0/3 0
26;8000-;16/1/0 0
SHEET;341
TABLE;439;1;TRIAL DATA HEADING BLOCK 'FILES'
NOTES;;;
SHEET;342
TABLE;440;1;INSTRUCTIONS
NOTES;;;
0;66;0;0;0;2;0;5;0;0;0;0;0;0;AM IND
2;66;2;0;0;1;0;5;5;5;0;0;0;0;S. NO
4;66;4;0;0;2;0;5;0;4;0;0;0;0;ACTION
6;66;6;0;0;2;0;5;0;3;0;0;0;0;REF
8;66;8;0;0;1;0;5;5;0;4;2;0;0;ITEM
10;66;10;0;0;1;0;2;8;1;1;0;0;0;DISC
12;66;12;0;0;1;0;3;7;0;2;0;0;0;MOD
14;66;14;0;0;1;0;10;0;5;9;2;0;0;LITERAL
16;435;42;0;0;2;0;5;0;0;0;0;0;1;'CLEO'PARA WORD
SHEET;343
TABLE;441;1;TABLES
NOTES;;;
0;66;0;0;0;2;0;5;0;0;0;0;0;0;AM IND
2;66;2;0;0;0;0;5;0;5;0;0;0;0;S NO
4;66;16;0;0;0;0;5;0;1;4;0;0;0;FIRST REF
6;66;17;0;0;0;0;5;0;1;4;0;0;0;FIRST ITEM
8;66;18;0;0;0;0;5;0;1;4;0;0;0;SECOND REF
10;66;19;0;0;0;0;5;0;1;4;0;0;0;SECOND ITEM
12;66;3;0;0;0;0;2;3;1;1;0;0;0;S/L/ALPHA
14;66;4;0;0;0;0;3;2;0;2;0;0;0;SINGLE/BE
16;66;5;0;0;0;0;2;3;2;1;0;0;0;NO OF CHARS
18;66;10;0;0;0;0;3;2;1;2;0;0;0;DISC
20;66;11;0;0;0;0;2;3;2;1;0;0;0;SPACES
22;66;12;0;0;0;0;3;2;1;2;0;0;0;ZEROS
24;66;13;0;0;0;0;1;4;2;0;0;0;0;SIGN
26;66;14;0;0;0;0;2;3;1;1;0;0;0;STERLING
28;66;15;0;0;0;0;2;3;1;1;0;0;1;L.T.E.
SHEET;344
TABLE;442;1;VALUE
NOTES;;;
0;67;3;0;0;0;0;5;0;1;4;1;0;0;VALUE
2;67;2;0;0;0;0;4;1;0;3;0;0;1;PARA
SHEET;345
TABLE;443;1;
NOTES;;;ENTRY PT  ADJUSTMENTPM POINTS
0;61;20;0;0;2;0;3;2;0;0;0;0;0;??? OR ZERO
2;61;0;0;0;0;0;5;0;1;0;0;0;0;ENTRY POINT
4;434;20;0;0;2;0;1;0;0;0;0;0;1;'+'
6;66;0;0;0;2;0;3;0;0;0;0;0;0;AMEND IND
8;61;0;0;0;0;0;5;0;1;0;0;0;0;ENTRY PT
10;434;20;0;0;2;0;1;0;0;0;0;0;1;g
SHEET;346
CONST;444;1;DUMMY FOR INSERTING M/C MODS
SHEET;347
PROCR;445;START OF PASS 3
NOTES;RADIX;;PREP STAGE
0;152;200;2;0;0;0;;CALL PASS 4
1;C;557;0;0;0;0;COPY SECTION DETAILS
2;55;9;0;1;0;100;
3;C;15;0;1;0;0;INPUT EX PASS 2
4;40;A6;0;0;0;1;
5;54;16;0;0;0;40;CLEAR PRINTER ANNEX
6;54;5;0;0;0;50;CLEAR DETAILS
7;10;;0;0;0;0;OF SECTION 0
8;5;94;0;0;0;0;
9;55;72;3;0;0;14;
10;C;16;5;0;0;0;
11;54;72;3;0;0;14;
12;90;;0;0;3;0;
13;C;;0;0;0;0;/////
14;;92;0;0;0;0;CHAPTERS CODED +1
15;30;;0;0;0;5;
16;11;;0;0;0;1;
17;91;;0;0;1;0;
18;10;;0;0;0;0;
19;35;;0;0;0;1;
20;36;92;9;0;1;0;
21;5;16;2;0;0;0;CORRECTED CHAP
22;96;;0;0;1;0;
23;5;16;1;0;0;0;UNCORR CHAP
24;10;;0;0;0;10;BIT 5
25;32;;0;0;0;10-;
26;36;92;9;0;1;0;UNIQUENESS IND Q2
27;32;;0;0;0;2-;(CLEAR A)
28;75;445;31;0;0;0;gCHAP NOT UNIQUE
29;124;16;2;0;1;0;CORR CHAP
30;;16;4;0;0;0;SW SEC LENGTH
31;1;72;18;0;3;0;CHAP LENGTH(CODING ONLY)
32;5;16;3;0;0;0;START OF FIRST SEC IN UNCORR CHAP
33;5;16;4;0;0;0;CLEAR FOR TOT LENGTHS ALL SECS IN C 
SHEET;348
PROCR;446;UPDATE SEC INDEX, SWITCH PROCR STARTS
NOTES;;;
0;80;447;0;0;0;0;gDEAL WITH SECTIONS,ANNEXES
1;;16;3;0;0;0;UNCORR CHAP LENGTH
2;1;16;4;0;0;0;
3;124;16;2;0;1;0;CORR CHAP
4;2;72;2;0;0;0;
5;73;446;8;0;0;0;
6;124;16;2;0;1;0;
7;4;72;2;0;0;0;FORM MAX CORR CHAP LENGTH
8;94;446;9;0;3;1;
9;94;445;18;0;1;1;gNEXT UNCORR CHAP
10;91;92;28;0;1;0;COUNT CORR CHAPS
11;90;;0;0;2;0;
12;C;;0;0;0;0;/////
13;10;;0;0;0;10;BIT 5
14;32;;0;0;0;10-;
15;36;92;10;0;1;0;
16;70;446;21;0;0;0;gCHAR IS UNIQUE
17;0;72;3;0;1;0;
18;5;72;18;0;2;0;SWITCH PROCR START=END OF SECTIONS
19;0;16;5;0;1;0;
20;4;72;3;0;1;0;UPDATE CHAPTER LENGTH.
21;94;446;22;0;2;1;
22;94;446;13;0;1;1;gNEXT CHAP
23;0;61;100;0;0;0;BASIC SPECIAL CHAP LENGTH
24;5;16;3;0;0;0;
25;5;16;1;0;0;0;ZERO UNCORR CHAP
26;0;92;29;0;0;0;
27;5;16;2;0;0;0;CORR CHAP=SPEC CHAP
28;5;16;4;0;0;0;CLEAR SUBTOTAL
29;80;447;0;0;0;0;gDEAL WITH SPECIAL CHAP
30;0;16;3;0;0;0;
31;1;16;4;0;0;0;FORM SPECIAL CHAP LENGTH
32;5;72;2;0;1;0;
33;101;;220;1;3;0;FIRST CHAP MIN LENGTH=220
34;2;72;3;0;0;0;
35;73;446;37;0;0;0;gOK
36;4;72;3;0;0;0;
37;54;16;0;0;0;40;CLEAR WL'S
38;0;92;29;0;0;0;
39;12;;0;0;0;7;
40;73;446;42;0;0;0;gOK
41;10;;0;0;0;0;
42;11;;0;0;0;7;MAX VALUE=7
43;5;92;29;0;0;0;SPECIAL CHAP NUMBER
44;80;461;0;0;0;0;READ ALIGN BLOCK A6 NORMAL RUN, PREP STA
45;80;461;0;0;0;0;READ SECOND INDEX BLOCK
46;80;461;0;0;0;0;READ PROG DETAILS BLOCK
47;00;9;4;2;0;0;PROG ID
48;5;16;2;0;0;0;
49;00;9;6;2;0;0;PROG SERIAL
50;5;16;3;0;0;0;
51;54;13;0;0;0;14;
52;46;A2;10;0;0;1;BACK TO ALIGN BLOCK
53;C;;0;0;0;6;
54;48;A2;0;0;0;0;(STEP SO AS TO OVERWRITE IT)
55;C;;0;0;0;1;
56;;468;58;1;0;0;ALIGN MARKS
57;5;8;4;1;0;0;
58;;469;2;1;0;0;'INDEX'
59;5;8;6;1;0;0;
60;;468;58;2;0;0;
61;5;8;8;2;0;0;
62;10;;0;0;0;3;INDEX IDENTIFIER
63;5;8;10;1;0;0;
64;80;464;0;0;0;0;gWRITE
65;80;448;0;0;0;0;gWRITE DETAILS
66;76;449;0;0;0;0;
SHEET;349
PROCR;447;PLACE SECTIONS AND ANNEXES IN UNCORRECTED CHAPTER SR
0;81;447;0;0;0;0;
1;82;447;0;0;0;0;
SHEET;350
PROCR;448;SR TO WRITE'INDEX'DATA
NOTES;;;
0;81;448;0;0;0;0;
1;;16;2;0;0;0;PROG ID
2;3;8;4;2;0;0;
3;5;8;12;2;0;0;
4;0;16;3;0;0;0;PROG SERIAL
5;3;8;6;2;0;0;
6;5;8;14;2;0;0;
7;10;;0;0;0;2;
8;5;8;10;2;0;0;PASS 1 IDENTIFIER
9;10;;0;0;0;3;
10;3;8;18;2;0;0;IDENTIFIER
11;10;;0;0;0;2;
12;1;27;12;0;0;0;0/2=PTS NO/YES
13;5;8;16;2;0;0;PASS IND
14;;468;58;2;0;0;ppppp
15;5;8;20;2;0;0;
16;80;464;0;0;0;0;gWRITE ON A2
17;82;448;0;0;0;0;
SHEET;351
PROCR;449;HEADING BLOCK
NOTES;RADIX;B;PREP STAGE
0;54;5;0;1;0;50;
1;90;;0;0;1;0;
2;C;;0;0;0;10;
3;80;463;0;0;0;0;gPRINT SPACERS
4;94;449;3;0;1;1;
5;5;464;0;0;0;0;NO OF FILES;NON
6;5;463;0;0;0;0;NO OF TX AREAS
7;10;;0;0;0;80;HEAD OF FORM
8;5;472;7;0;0;0;
9;52;5;0;0;0;0;EDIT FIRST LINE
10;C;478;0;0;0;0;
11;80;463;0;0;0;0;gPRINT
12;80;463;0;0;0;0;gSPACER
13;0;468;58;2;0;0;
14;5;8;4;2;0;0;
15;10;;0;0;0;55;
16;5;8;6;2;0;0;
17;;16;2;0;0;0;PROG ID
18;5;8;8;2;0;0;
19;;16;3;0;0;0;PROG SERIAL
20;5;8;10;2;0;0;
21;0;468;68;1;0;0;'PASS3'
22;5;8;12;1;0;0;
23;80;464;0;0;0;0;gWRITE
24;80;461;0;0;0;0;gREAD
25;55;9;4;1;0;10;
26;C;11;0;1;0;0;
27;5;11;12;2;0;0;T
28;5;11;10;2;0;0;R
29;5;11;14;2;0;0;NO OF DISCS
SHEET;352
PROCR;450;OUTPUT SECOND HEADING BLOCK
NOTES;RADIX;B;PREP STAGE
0;55;11;0;1;0;16;
1;C;8;4;1;0;0;
2;5;92;28;0;0;0;CLEAR
3;;92;6;0;0;0;2ND HEADING BLOCK
4;5;8;20;2;0;0;
5;;92;8;0;0;0;CHAPTER
6;5;8;22;2;0;0;
7;91;92;28;0;2;0;
8;90;;0;0;1;0;
9;C;;0;0;0;14;
10;0;72;3;0;2;0;CHAP LENGTH
11;71;450;14;0;0;0;
12;;468;90;1;0;0;100,000 INBIN
13;3;72;3;0;2;0;SET RIDICULOUS LENGTH
14;5;8;24;2;1;0;
15;10;;0;0;0;20;BIT 6
16;32;;0;0;0;10-;
17;36;92;10;0;2;0;
18;70;450;22;0;0;0;gNORMAL
19;10;;0;0;0;0;
20;2;8;24;2;1;0;
21;5;8;24;2;1;0;SET IND THAT IN ANOTHER STORE
22;94;;0;0;1;2;
23;94;450;10;0;2;1;
24;0;16;2;0;0;0;
25;5;8;38;2;0;0;PROG ID
26;0;16;3;0;0;0;
27;5;8;40;2;0;0;PROG SERIAL
28;10;;0;0;0;5163636653;'ALLOC'
29;5;8;42;1;0;0;
30;80;464;0;0;0;0;gWRITE
SHEET;353
PROCR;451;SECOND HEADING LINE
NOTES;RADIX;B;PREP. STAGE
0;91;478;0;0;1;0;
1;91;478;2;0;2;0;
2;95;;0;0;1;0;
3;5;478;0;1;0;0;
4;95;;0;0;2;0;
5;5;478;2;1;0;0;
6;90;;0;0;2;0;SET MOD REGISTER
7;C;;0;0;0;4;
8;;11;0;2;2;0;SELECT DETAIL
9;70;451;12;0;0;0;OUT IF ZERO
10;;468;2;1;0;0;ELSE SELECT
11;76;451;13;0;0;0;YES
12;;468;4;1;0;0;SELECT NO
13;5;13;0;1;2;0;STORE YES OR NO
14;94;451;8;0;2;2;REPEAT
15;0;92;6;0;0;0;
16;80;465;0;0;0;0;TO DEC
17;5;92;6;0;0;0;
18;62;;0;0;0;0;RESET BINARY
19;52;5;2;0;0;0;
20;C;477;0;0;0;0;EDIT AND OUTPUT
21;80;463;0;0;0;0;gPRINT FP, MOD GP, ENTRY ETC
22;80;463;0;0;0;0;gSPACER
23;;11;8;2;0;0;
24;5;13;2;1;0;0;
SHEET;354
PROCR;452;THIRD HEADING LINE
NOTES;RADIX;B;PREP STAGE
0;;11;10;2;0;0;STORE
1;5;16;8;0;0;0;NO. OF FILES
2;0;11;8;2;0;0;NUMBER OF CHAPTERS INITIALLY
3;5;16;9;0;0;0;NO. OF CHAPTERS
4;54;13;0;0;0;14;CLEAR WL'S
5;;92;28;1;0;0;
6;12;;0;0;0;100000;
7;91;;0;0;2;0;
8;;72;3;0;2;0;
9;80;465;0;0;0;0;TO DEC
10;5;13;0;0;2;0;STORE CHAPTER LENGTHS
11;62;;0;0;0;0;
12;;72;3;0;2;0;
13;12;;0;0;0;2001;8193 INBIN
14;73;452;17;0;0;0;gOK
15;10;;0;0;0;1;
16;3;13;10;0;0;0;
17;94;452;8;0;2;1;
18;10;;0;0;0;506;
19;3;470;2;0;0;0;
20;5;13;0;0;2;0;STD LENGTH 506
21;;13;10;0;0;0;
22;70;452;31;0;0;0;gOK
23;86;403;0;0;0;0;CTR DISASTROUS ERRORS
24;11;;0;0;0;1;
25;84;403;0;0;0;0;AUGMENT
26;10;;0;0;0;5:5:5:5:5:;'?????'
27;90;;0;0;2;0;
28;C;;0;0;0;10;
29;3;5;40;1;2;0;25 QUESTION MARKS
30;94;452;29;0;2;2;
31;52;5;2;0;0;0;EDIT AND OUTPUT
32;C;476;0;0;0;0;
33;80;463;0;0;0;0;PRINT
34;80;463;0;0;0;0;SPACER
35;52;5;2;0;0;0;
36;C;475;0;0;0;0;EDIT FILE DETAILS HEADING
37;80;463;0;0;0;0;PRINT
38;54;13;0;0;0;31;
SHEET;355
PROCR;453;FILE DETAILS FOR PRINT-OUT
NOTES;RADIX;B;PREP STAGE
0;52;5;2;0;0;0;EDIT HEADINGS&OUTPUT
1;C;479;12;0;0;0;HEADING BLOCK
2;80;463;0;0;0;0;PRINT TX AREA HEADING
SHEET;356
PROCR;454;PRINT SECTION START POINTS
NOTES;RADIX;;
0;;468;60;1;0;0;'SEC'
1;05;5;2;1;0;0;
2;;468;62;1;0;0;'TION.'
3;05;5;4;1;0;0;
4;0;468;82;1;0;0;
5;05;5;6;1;0;0;
6;80;463;0;0;0;0;gPRINT
7;80;463;0;0;0;0;PRINT LAST LINE
8;76;457;0;0;0;0;gPRINT SWITCHES
SHEET;357
PROCR;455;PRINT LOCNS OF MOD REGISTERS 4-20
NOTES;;;
0;52;5;2;0;0;0;
1;C;480;6;0;0;0;
2;80;463;0;0;0;0;gPRINT HEADING
3;80;463;0;0;0;0;gPRINT LAST LINE
4;90;;0;0;12;2499;
5;C;;0;0;0;0;
6;90;;0;0;5;0;
7;C;;0;0;0;40;
8;91;;0;0;1;0;CLEAR R1
9;76;483;0;0;0;0;PASS 4
SHEET;358
PROCR;456;PRINT LOCATIONS OF ITEM+ COUNTERS
NOTES;;;
0;52;5;2;0;0;0;
1;C;480;10;0;0;0;
2;80;463;0;0;0;0;gPRINT HEADING
3;76;455;0;0;0;0;gNONE
SHEET;359
PROCR;457;
NOTES;;;PRINT LOCATION OF SWITCHES
0;52;5;2;0;0;0;
1;C;480;14;0;0;0;
2;80;463;0;0;0;0;gPRINT HEADING
3;80;463;0;0;0;0;gPRINT LAST LINE
4;76;456;0;0;0;0;gPRINT ITEM+
SHEET;360
PROCR;458;
NOTES;RADIX;;EDIT AND OUTPUT DETAIL FOR TRANSLATOR'S WORKING SECTIONS
0;81;458;0;0;0;0;
1;0;468;0;0;0;0;
2;80;465;0;0;0;0;TO DEC
3;5;468;0;0;0;0;
4;0;468;1;0;0;0;
5;80;465;0;0;0;0;
6;5;468;1;0;0;0;
7;0;468;2;0;0;0;
8;80;465;0;0;0;0;
9;5;468;2;0;0;0;
10;62;;0;0;0;0;BIN
11;52;5;2;0;1;0;
12;C;480;18;0;0;0;
13;94;458;17;0;1;6;gLINE NOT FULL
14;80;463;0;0;0;0;gPRINT
15;90;;0;0;1;0;
16;C;;0;0;0;48;
17;82;458;0;0;0;0;
SHEET;361
PROCR;459;READ A2
NOTES;;;READ A2
0;81;459;0;0;0;0;
1;42;A2;0;0;0;0;
2;C;8;0;0;0;0;
3;82;459;0;0;0;0;
SHEET;362
PROCR;460;INPUT OFF PASS 2
NOTES;RADIX;B;SUB ROUTINE
0;81;460;0;0;0;0;
1;94;460;5;0;2;8;STANDARD INCREMENT
2;80;461;0;0;0;0;READ A6gSEC 9
3;90;;0;0;2;0;
4;C;;0;0;0;144;
5;82;460;0;0;0;0;
SHEET;363
PROCR;461;INPUT
NOTES;RADIX;B;SUB ROUTINE
0;81;461;0;0;0;0;
1;42;A6;0;0;0;0;
2;C;9;0;0;0;0;
3;82;461;0;0;0;0;
SHEET;364
PROCR;462;WRITE ON WORKING TAPE
NOTES;;;
0;81;462;0;0;0;0;
1;55;8;4;1;0;50;COPY ANNEXES
2;C;9;4;1;0;0;
3;0;468;54;1;0;0;BEW
4;5;9;52;1;0;0;
5;43;A6;0;0;0;0;
6;C;9;0;0;0;0;
7;54;9;0;0;0;52;
8;82;462;0;0;0;0;
SHEET;365
PROCR;463;PRINT
NOTES;RADIX;B;SUB ROUTINE
0;81;463;0;0;0;0;
1;62;;0;0;0;0;
2;;468;54;1;0;0;
3;05;5;50;1;0;0;BEW
4;;472;7;0;0;0;HEAD OF FORM OR TRAC1
5;05;5;0;1;0;0;FUNCTION WORD
6;10;;0;0;0;1;
7;5;472;7;0;0;0;
8;;27;9;0;0;0;
9;70;463;14;0;0;0;gPRINTER
10;55;5;0;1;0;54;
11;C;10;4;1;0;0;
12;80;467;0;0;0;0;gWRITE ON A9
13;76;463;37;0;0;0;
14;;27;8;0;0;0;PRINTER TYPE
15;12;;0;0;0;9;
16;70;463;33;0;0;0;gSPECIAL
17;10;;0;0;0;80000;
18;5;5;1;0;0;0;BIT 40
19;54;10;0;1;0;384;
20;124;999;15;1;2;0;SEC 5
21;124;;0;0;2;0;
22;124;999;13;1;2;0;SEC 10
23;129;;0;0;1;0;
24;10;;0;0;0;4;
25;30;;0;0;0;5;
26;1;999;7;0;0;0;ROUTE
27;34;999;12;0;0;0;
28;125;;4096;1;1;0;
29;124;999;0;0;3;0;
30;123;;160;0;2;0;
31;62;;0;0;0;0;
32;76;463;37;0;0;0;
33;55;5;0;1;0;54;
34;C;10;0;1;0;0;
35;10;;0;0;0;9;
36;76;463;25;0;0;0;
37;54;5;0;0;0;50;
38;5;16;1;0;0;0;CLEAR INDICATOR
39;82;463;0;0;0;0;
SHEET;366
PROCR;464;OUTPUT ON A2
NOTES;RADIX;B;SUB ROUTINE
0;81;464;0;0;0;0;
1;;468;54;1;0;0;BEW
2;5;8;52;1;0;0;
3;43;A2;0;0;0;0;OUTPUT
4;C;8;0;0;0;0;
5;54;8;0;0;0;52;CLEAR
6;82;464;0;0;0;0;
SHEET;367
PROCR;465;CONVERT (A) TO DECIMAL
NOTES;;;
0;81;465;0;0;0;0;
1;5;470;2;1;0;0;
2;60;;0;0;0;0;
3;124;471;20;0;2;0;
4;112;470;2;1;0;0;
5;82;465;0;0;0;0;
SHEET;368
PROCR;466;CONVERT (A) TO BIN
NOTES;;;
0;81;466;0;0;0;0;
1;5;470;2;1;0;0;
2;62;;0;0;0;0;
3;124;471;0;0;2;0;
4;112;470;2;1;0;0;
5;82;466;0;0;0;0;
SHEET;369
PROCR;467;O/PgA9
0;81;467;0;0;0;0;
1;10;;0;0;0;800000;
2;34;999;12;0;0;0;SEC 10
3;125;;4096;1;1;0;
4;1;999;7;0;0;0;D1/A9
5;124;999;0;0;3;0;
6;123;;160;0;2;0;
7;82;467;0;0;0;0;
SHEET;370
CONST;468;1;
0;(A)F.PT.;
2;YES;
4;NO;
6;MOD.;
8;GP.;
10;PRIOR;
12;ITY;
14;FIRST;
16;LOCN.;
18;CHAPT;
20;TYPEp;
22;FILES;
24;TRAN.;
26;AREAS;
28;ALT.R;
30;OUTES;
32;PROGR;
34;AMME;
36;SERIA;
38;ID.;
40;RTE.;
42;TYPE;
44;ST.OF;
46;BLOCK;
48;SIZE;
50;SIT;
52;PREND;
54;(D)7.0000007.;
56;(A)= CH/;
58;(D)6p6p6p6p6p;
60;(A)SEC;
62;TION.;
64;PROC;
66;EDURE;
68;PASS3;
70;(A)MR'S ;
72;4-20 ;
74;ITEM+;
76; CTRS;
78;SWITC;
80;HES  ;
82;(A)START;
84;NOTES;
86;SPOOL;
88;ENTRY;
90;(B)100000;100,000
SHEET;371
CONST;469;1;
0;(D)5.5.;
2;(A)INDEX;
4;CHAIN;
6;(D)7ppp0003pp;BITS 5-19+1-10
8;(A)08000;
10;PTS I;
12;NCLUD;
14;ED   ;
SHEET;372
CONST;470;1;CONVERT TABLE
0;(D)1;BINgDEC
2;0;(A) WL
SHEET;373
CONST;471;1;COMPILER'S CONVERT TABLES
0;(D)1;DECgBIN
2;t;
4;64;
6;3.8;
8;2710;
10;186t0;
12;p4240;
14;989680;
16;5p5.100;
18;3e9t+t00;
20;1;BINgDEC
22;16;
24;256;
26;4096;
28;65536;
30;1048576;
32;16777216;
34;268435456;
36;4294967296;
38;pppppppppp;
SHEET;374
CONST;472;0;
0;(D)7;
1;80000;
2;0;THIS IS A 0/1 FLIPFLOP FOR SC'S FWD
3;3p;BITS 1-6
4;p0000;p IN Q5
5;7p;
6;80;HEAD OF FORM
7;0;IND FOR HEAD OF FORM
SHEET;375
TABLE;473;1;TRIAL DATA HEADING+T/W COMMENT
NOTES;;;
SHEET;376
TABLE;474;1;PRINT HEADING DATA
NOTES;;;
0;468;18;0;0;2;0;4;0;1;0;0;0;0;CHAPS
2;468;36;0;0;2;0;1;0;0;0;0;0;0;
4;11;8;0;0;2;0;1;4;2;0;0;0;0;NO OF CHAPS INITIALLY
6;468;22;0;0;2;0;5;0;3;0;0;0;0;FILES
8;11;10;0;0;0;0;2;3;2;1;0;0;0;NO OF FILES
10;468;24;0;0;2;0;5;0;7;0;0;0;0;TRAN AREAS
12;468;26;0;0;2;0;5;0;2;0;0;0;0;XX
14;11;12;0;0;0;0;2;3;2;1;0;0;0;
16;468;54;0;0;2;0;5;0;6;0;0;0;1;
18;13;4;0;0;0;0;5;0;0;0;0;0;0;
20;13;3;0;0;0;0;5;0;0;0;0;0;0;
22;13;0;0;0;0;0;5;0;0;0;0;0;0;
24;13;2;0;0;0;0;5;0;0;0;0;0;1;
SHEET;377
TABLE;475;1;PRINT
NOTES;;;G LINE
0;468;22;0;0;2;0;4;0;1;0;0;0;0;
2;468;38;0;0;2;0;3;2;2;0;0;0;0;FILE 10.
4;468;40;0;0;2;0;4;1;6;0;0;0;0;
6;468;42;0;0;2;0;4;1;2;0;0;0;0;RTE. TYPE
8;468;82;0;0;2;0;5;0;6;0;0;0;0;
10;468;16;0;0;2;0;5;0;2;0;0;0;0;START LOCN.
12;468;28;0;0;2;0;5;0;6;0;0;0;0;
14;468;30;0;0;2;0;5;0;0;0;0;0;0;ALT ROUTES
16;468;46;0;0;2;0;5;0;4;0;0;0;0;
18;468;48;0;0;2;0;5;0;1;0;0;0;0;'BLOCK SIZE'
20;468;18;0;0;2;0;5;0;10;0;0;0;1;CHAPT
SHEET;378
TABLE;476;1;PRINT HEADING DATA
NOTES;4TH;;
0;468;48;0;0;2;0;5;0;3;0;0;0;0;LGTH. OF CHAPS
2;468;44;0;0;2;0;2;3;2;0;0;0;0;
4;468;18;0;0;2;0;4;0;2;0;0;0;0;
6;468;36;0;0;2;0;1;0;0;0;0;0;0;
8;13;0;0;0;0;0;5;0;2;4;2;0;0;
10;13;1;0;0;0;0;5;0;2;4;2;0;0;
12;13;2;0;0;0;0;5;0;2;4;2;0;0;
14;13;3;0;0;0;0;5;0;2;4;2;0;0;
16;13;4;0;0;0;0;5;0;2;4;2;0;0;
18;13;5;0;0;0;0;5;0;2;4;2;0;0;
20;13;6;0;0;0;0;5;0;2;4;2;0;1;
22;13;0;0;0;0;0;5;0;0;0;0;0;0;TX AREA DETAILS MT
24;13;2;0;0;2;0;5;0;0;0;0;0;0;
26;13;4;0;0;2;0;5;0;0;0;0;0;1;
SHEET;379
TABLE;477;1;PRINT HEADING DATA
NOTES;SEC;;
0;468;0;0;0;2;0;5;0;4;0;0;0;0;F.PT.
2;13;0;0;0;2;0;3;2;2;0;0;0;0;XXX
4;468;6;0;0;2;0;4;1;7;0;0;0;0;
6;468;8;0;0;2;0;3;2;2;0;0;0;0;MOD. GP.
8;13;2;0;0;2;0;3;2;2;0;0;0;0;XXX
10;468;10;0;0;2;0;5;0;7;0;0;0;0;
12;468;12;0;0;2;0;3;2;0;0;0;0;0;PRIORITY
14;11;4;0;0;2;0;1;4;2;0;0;0;0;X
16;468;88;0;0;2;0;5;0;7;0;0;0;0;'ENTRY'
18;468;56;0;0;2;0;4;0;0;0;0;0;0;'= CH'
20;92;8;0;0;0;0;1;4;0;0;0;0;0;CHAP NUMBER
22;468;56;0;0;2;0;1;4;0;0;0;0;0;'/'
24;92;6;0;0;0;0;4;1;0;3;0;0;1;LOCN IN CHAP
SHEET;380
TABLE;478;1;PRINT FIRST HEADING LINE
NOTES;;;
0;472;6;0;0;0;0;5;0;0;4;0;0;0;CALL HEAD OF FORM
2;468;32;0;0;2;0;5;0;1;0;0;0;0;
4;468;34;0;0;2;0;4;1;0;0;0;0;0;
6;16;2;0;0;0;0;5;0;3;0;0;0;0;PROG IDENTITY
8;468;36;0;0;2;0;5;0;3;0;0;0;0;'SERIA-
10;468;16;0;0;2;0;1;0;0;0;0;0;0;'-L'
12;16;3;0;0;0;0;5;0;3;4;0;0;0;PROG SERIAL
14;468;18;0;0;2;0;4;0;15;0;0;0;0;'CHAP-'
16;468;36;0;0;2;0;1;0;0;0;0;0;0;-S'
18;92;29;0;0;0;0;1;4;2;0;0;0;0;NUMBER OF CHAPS
20;468;22;0;0;2;0;5;0;3;0;0;0;0;'FILES'
22;464;0;0;0;0;0;1;4;2;0;0;0;0;NUMBER OF FILES
24;468;24;0;0;2;0;5;0;6;0;0;0;0;'TRAN'
26;468;26;0;0;2;0;5;0;2;0;0;0;0;'AREAS'
28;463;0;0;0;0;0;1;4;2;0;0;0;1;NUMBER OF TX AREAS
SHEET;381
TABLE;479;1;PRINT
NOTES;FIL;;
0;11;0;0;0;2;0;5;0;6;0;0;0;0;FILE ID
2;468;0;0;0;0;0;4;0;12;3;0;0;0;ROUTE TYPE
4;13;6;0;0;0;0;4;1;13;3;0;0;0;START LOCATION
6;13;8;0;0;2;0;3;2;11;0;0;0;0;ALT ROUTE
8;13;4;0;0;0;0;4;1;12;3;0;0;0;LENGTH
10;13;2;0;0;0;0;4;1;12;3;0;0;1;'CHAPT'
12;468;24;0;0;2;0;5;0;1;0;0;0;0;
14;468;26;0;0;2;0;5;0;2;0;0;0;0;
16;468;82;0;0;2;0;5;0;2;0;0;0;0;
18;468;16;0;0;2;0;5;0;2;0;0;0;0;
20;468;18;0;0;2;0;5;0;7;0;0;0;0;
22;468;48;0;0;2;0;5;0;6;0;0;0;1;LGTH
24;468;0;0;0;0;0;5;0;5;5;0;0;0;SEC NO
26;13;0;0;0;0;0;4;1;11;3;0;0;0;START
28;466;0;0;0;0;0;1;4;13;0;0;0;0;CHAPTER
30;13;4;0;0;0;0;4;1;7;3;0;0;1;LENGTH
32;11;0;0;0;2;0;5;0;0;0;0;0;0;SENTINEL MARK
34;11;2;0;0;2;0;5;0;0;0;0;0;0;SENTINEL TYPE
36;11;4;0;0;2;0;5;0;0;0;0;0;0;PROG ID NO
38;11;6;0;0;2;0;5;0;0;0;0;0;1;SERIAL NO
SHEET;382
TABLE;480;1;
NOTES;;;
0;468;0;0;0;0;0;2;3;3;1;0;0;0;SEC NO
2;468;56;0;0;2;0;1;0;0;0;0;0;0;'='
4;468;1;0;0;0;0;4;1;0;3;0;0;1;SECTION START
6;468;70;0;0;2;0;5;0;0;0;0;0;0;MR'S 4-20
8;468;72;0;0;2;0;5;0;0;0;0;0;1;
10;468;74;0;0;2;0;5;0;0;0;0;0;0;ITEM+COUNTERS
12;468;76;0;0;2;0;5;0;0;0;0;0;1;
14;468;78;0;0;2;0;5;0;0;0;0;0;0;SWITCHES
16;468;80;0;0;2;0;5;0;0;0;0;0;1;
18;468;2;0;0;0;0;5;0;0;4;0;0;0;SW/MR/SEC
20;468;56;0;0;2;0;4;0;0;0;0;0;0;'=CH'
22;468;0;0;0;0;0;1;4;0;0;0;0;0;CHAP NO
24;468;56;0;0;2;0;1;4;0;0;0;0;0;'/'
26;468;1;0;0;0;0;4;1;0;3;0;0;1;POSITION
SHEET;383
TABLE;481;3;
NOTES;;;G BLOCK
0;16;16;0;0;0;0;5;0;0;0;0;0;0;
2;472;0;0;0;0;0;5;0;0;0;0;0;0;
4;16;2;0;0;0;0;5;0;0;0;0;0;0;
6;16;3;0;0;0;0;5;0;0;0;0;0;0;SERIAL
8;468;18;0;0;2;0;5;0;0;0;0;0;1;'CHAPT'
10;468;18;0;0;2;0;5;0;0;0;0;0;0;
12;16;16;0;0;0;0;5;0;3;4;0;0;1;
14;11;0;0;0;2;0;5;0;0;0;0;0;0;FILE IDENTITY
16;11;2;0;0;2;0;4;0;1;0;0;0;0;ROUTE TYPE
18;11;8;0;0;2;0;5;0;0;0;0;0;0;START LOCATION
20;11;4;0;0;2;0;5;0;0;0;0;0;0;TWICE CHAP
22;11;6;0;0;2;0;5;0;0;0;0;0;0;MAX BLOCK LENGTH
24;11;10;0;0;2;0;5;0;0;0;0;0;1;ALT ROUTE
SHEET;384
CONST;482;1;CONSTANTS
0;(D)0;
2;(A)p    ;
4;0;CHUNK START/ORDER
6;0;A
8;0;B
10;0;C
12;0;A
14;0;B
16;0;C
SHEET;385
PROCR;483;START OF PASS 4=READ/STORE PROCR START INDEX
0;52;5;0;0;0;0;TYPE'PROG OUT'
1;C;530;12;0;0;0;
2;154;5;0;0;0;0;
3;54;5;0;1;0;50;
4;54;26;0;1;0;1080;
5;90;;0;0;8;0;
6;C;;0;0;0;48;FOR PROCR STARTS
7;90;;0;0;2;0;
8;C;;0;0;0;144;
9;80;517;0;0;0;0;READ A6gSEC 9
10;55;9;4;2;0;8;
11;C;11;0;2;0;0;
12;5;18;0;0;0;0;CLEAR CTR
13;;11;0;1;0;0;
14;32;;0;0;0;2-;TEST TYPE AS EXPECTED
15;2;525;6;1;0;0;
16;70;483;23;0;0;0;gOK
17;10;;0;0;0;900000;
18;1;27;9;0;0;0;
19;91;;0;0;1;0;FOR REENTRY
20;150;;0;0;0;8;;ALARM 8
21;C;100;3;0;0;0;RE-ENTER PASS 0
22;C;483;7;0;0;0;gREAD NEXT BLOCK
23;;9;0;2;0;0;
24;5;511;0;0;0;0;CURRENT BLOCK SERIAL WL
25;90;;0;0;2;0;
26;C;;0;0;0;144;
27;;9;4;1;2;0;
28;32;;0;0;0;2-;
29;2;525;6;1;0;0;'TYPE'
30;71;483;45;0;0;0;gSTEP R2
31;32;;0;0;0;2;
32;12;;0;0;0;46;
33;70;483;45;0;0;0;g6=C-PROCR
34;12;;0;0;0;1;g7=VALUES
35;70;483;45;0;0;0;gTYPE 1-5
36;73;483;40;0;0;0;
37;12;;0;0;0;8;gEND OF PROGM
38;70;483;48;0;0;0;
39;76;483;45;0;0;0;
40;;9;6;2;2;0;
41;5;26;0;0;0;0;
42;;9;8;2;2;0;START
43;124;26;0;0;1;0;
44;5;26;0;0;0;0;
45;94;483;27;0;2;8;
46;80;517;0;0;0;0;gREAD
47;76;483;25;0;0;0;
48;46;A6;4;0;0;1;;REALIGN
49;C;;0;0;0;ppppp;
50;80;517;0;0;0;0;gREAD
51;;9;0;2;0;0;
52;2;511;0;0;0;0;
53;71;483;50;0;0;0;gGET TO REQUIRED BLOCK
54;55;94;0;1;0;100;SECTION START ADDRESSES
55;C;26;0;1;0;0;
56;101;;204;1;3;0;
57;5;26;1000;0;0;0;CONVERT TABLE START
58;124;92;29;0;1;0;
59;;26;1001;0;0;0;
60;124;92;29;0;1;0;
61;5;72;17;0;0;0;(TO PRESERVE IT IN COPY)
62;55;72;18;0;0;0;SWITCH PROCR STARTS
63;C;26;1002;0;0;0;
64;C;92;29;0;0;0;(CHAPS INITIALLY)
65;124;92;29;0;1;0;
66;;72;2;0;0;0;SPECIAL CHAP LENGTH
67;5;26;1001;0;0;0;SET START OF PRINT SR
68;5;27;7;0;0;0;CLEAR
SHEET;386
PROCR;484;SET UP BLOCKS FOR PTS
0;;16;2;0;0;0;PROG ID
1;5;8;6;2;0;0;
2;;16;3;0;0;0;PROG SERIAL
3;5;8;8;2;0;0;
4;;526;10;1;0;0;'FIEND'
5;5;8;4;1;0;0;
6;80;521;0;0;0;0;WRITE'FIEND'BLOCK
7;80;521;0;0;0;0;WRITE FINAL BLOCK
SHEET;387
PROCR;485;CHAPTER HEADING BLOCK-THE FIRST ONE
0;90;;0;0;1;0;
1;C;;0;0;0;48;
2;10;;0;0;0;1;
3;5;16;16;0;0;0;
4;52;8;4;0;0;0;
5;C;532;0;0;0;0;
6;80;521;0;0;0;0;WRITE CHAP HEADING BLOCK
7;52;5;2;0;0;0;
8;C;532;10;0;0;0;
9;10;;0;0;0;2;
10;3;16;16;0;0;0;
11;80;519;0;0;0;0;gPRINT CHAP HEADING
12;90;;0;0;2;0;
13;C;;0;0;0;144;
14;76;486;1;0;0;0;gDEAL WITH FIRST'TYPE'BLOCK
SHEET;388
PROCR;486;ENTRY POINT
NOTES;RADIX;B;MAIN LOOP
0;80;516;0;0;0;0;gGET NEXT ITEM
1;80;522;0;0;0;0;
2;;11;0;1;0;0;
3;32;;0;0;0;2-;
4;2;525;6;1;0;0;'TYPE'
5;71;495;0;0;0;0;gSWITCH, NOT A 'TYPE' UNIT
6;32;;0;0;0;2;
7;12;;0;0;0;48;
8;72;489;0;0;0;0;(MUST BE 14=CHAP END)
9;11;;0;0;0;8;
10;84;495;0;0;0;0;
11;00;11;4;2;0;0;
12;05;16;23;0;0;0;SPACE CTR FOR USE WITH VALUES
13;;11;2;2;0;0;
14;80;523;0;0;0;0;TO DEC
15;3;16;17;0;0;0;
16;5;527;4;0;0;0;STORE CURRENT PROCR
17;62;;0;0;0;0;RESET BINARY
SHEET;389
PROCR;487;PRINT HEADING FOR INSTRUCTIONS
NOTES;RADIX;B;MAIN LOOP
0;85;100;3;0;0;0;
1;C;487;21;0;0;0;gPRINT
2;C;487;3;0;0;0;gDONT PRINT
3;0;11;2;2;0;0;PROCR
4;70;486;0;0;0;0;gDONT PRINT
5;0;11;4;2;0;0;PROCR START
6;80;523;0;0;0;0;TO DEC
7;62;;0;0;0;0;
8;5;16;36;0;0;0;PROCR START
9;52;5;2;0;8;0;
10;C;532;14;0;0;0;
11;86;495;0;0;0;0;TYPE
12;12;;0;0;0;6;
13;71;487;16;0;0;0;
14;10;;0;0;0;537354;'CTD'
15;5;5;2;1;8;0;
16;94;486;0;0;8;4;
17;80;519;0;0;0;0;gPRINT
18;90;;0;0;8;0;
19;C;;0;0;0;48;
20;76;486;0;0;0;0;
21;95;;0;0;5;0;
22;5;525;36;1;0;0;
23;0;16;1;0;0;0;LINE PRINTED?
24;70;487;26;0;0;0;gYES
25;80;511;0;0;0;0;gO/P LINE
26;91;525;36;0;5;0;RESET R5
27;5;16;37;0;0;0;CLEAR SUBCTR
28;86;495;0;0;0;0;TEST TYPE 1
29;12;;0;0;0;1;
30;71;488;0;0;0;0;IF NOT GO TO 728
31;0;525;26;1;0;0;SET UP'PROCEDURE'
32;34;525;28;1;0;0;
33;76;488;13;0;0;0;
SHEET;390
PROCR;488;PRINT OTHER HEADINGS
NOTES;RADIX;B;MAIN LOOP
0;12;;0;0;0;5;
1;71;488;5;0;0;0;gNOT TYPE 6
2;10;;0;0;0;5366657354;'CONTD'
3;5;5;2;1;0;0;
4;76;488;16;0;0;0;gPRINT
5;12;;0;0;0;1;
6;71;488;11;0;0;0;gNOT TYPE 7
7;90;;0;0;8;0;(FOR SPECIAL PRINTING)
8;C;;0;0;0;40;
9;10;;0;0;0;7551637455;'VALUE'
10;76;488;3;0;0;0;
11;0;525;30;1;0;0;
12;34;525;32;1;0;0;
13;100;16;18;1;0;0;
14;52;5;2;0;0;0;
15;C;532;40;0;0;0;HEADING BLOCK
16;80;519;0;0;0;0;
17;76;486;0;0;0;0;
SHEET;391
PROCR;489;CHAPTER END
NOTES;RADIX;B;MAIN LOOP
0;80;516;0;0;0;0;GET NEXT ITEM
1;80;522;0;0;0;0;
2;;11;0;1;0;0;
3;2;525;18;1;0;0;BEW
4;70;516;2;0;0;0;gREAD BLOCK,SR LINK STILL SET
5;;11;0;1;0;0;
6;30;;0;0;0;2-;
7;2;525;6;1;0;0;'TYPE'
8;71;489;0;0;0;0;gLOOP
9;;529;8;0;0;0;p IN Q5
10;5;8;4;2;1;0;=PARAMETER
11;5;8;6;1;1;0;
12;80;521;0;0;0;0;gWRITE
13;90;;0;0;1;0;
14;C;;0;0;0;48;
15;0;16;1;0;0;0;
16;70;490;0;0;0;0;
17;80;511;0;0;0;0;gO/P LINE
SHEET;392
PROCR;490;NEW CHAPTER HEADING
NOTES;RADIX;B;MAIN LOOP
0;10;;0;0;0;0;
1;5;16;28;0;0;0;
2;5;16;37;0;0;0;CLEAR SERIAL SUB-CTR
3;52;8;4;0;0;0;EDIT
4;C;532;0;0;0;0;
5;0;16;16;0;0;0;
6;80;524;0;0;0;0;gTO BIN
7;5;8;4;2;0;0;BIN CHAP NUMBER ON MT
8;85;100;3;0;0;0;
9;C;490;14;0;0;0;gPRINT
10;C;490;11;0;0;0;gDONT PRINT
11;80;519;0;0;0;0;gPRINT PROCR START LINE
12;90;;0;0;8;0;
13;C;;0;0;0;48;
14;52;5;2;0;0;0;
15;C;532;10;0;0;0;
16;90;;0;0;5;0;
17;C;;0;0;0;40;
18;60;;0;0;0;0;
19;10;;0;0;0;1;
20;4;16;16;0;0;0;
21;62;;0;0;0;0;
22;;16;16;0;0;0;
23;12;;0;0;0;1;
24;2;92;29;0;0;0;
25;71;490;33;0;0;0;
26;55;526;0;1;0;6;
27;C;5;10;1;0;0;
28;101;;202;1;3;0;
29;5;16;28;0;0;0;
30;80;519;0;0;0;0;
31;80;521;0;0;0;0;
32;76;491;0;0;0;0;
33;;11;0;1;0;0;
34;2;525;2;1;0;0;
35;90;;0;0;1;0;
36;C;;0;0;0;0;/////
37;70;490;43;0;0;0;
38;90;;0;0;1;0;
39;C;;0;0;0;48;
40;80;519;0;0;0;0;
41;80;521;0;0;0;0;
42;76;486;2;0;0;0;
43;;27;7;0;0;0;
44;70;490;69;0;0;0;
45;30;;0;0;0;5;
46;91;;0;0;3;0;
47;54;5;2;1;0;46;
48;80;519;0;0;0;0;
49;80;519;0;0;0;0;
50;80;519;0;0;0;0;
51;10;;0;0;0;6955560000;
52;5;5;4;1;0;0;
53;10;;0;0;0;6769665369;
54;5;5;6;1;0;0;
55;80;519;0;0;0;0;
56;;18;3;0;3;0;
57;80;523;0;0;0;0;
58;5;523;0;0;0;0;
59;;18;2;0;3;0;
60;5;519;0;0;0;0;
61;62;;0;0;0;0;
62;52;5;4;0;0;0;
63;C;530;8;0;0;0;
64;80;519;0;0;0;0;
65;94;490;56;0;3;2;
66;80;519;0;0;0;0;
67;80;519;0;0;0;0;
68;80;519;0;0;0;0;
69;55;26;0;1;0;1000;
70;C;18;1000;1;0;0;
71;76;535;0;0;0;0;
SHEET;393
PROCR;491;
0;10;;0;0;0;p00;
1;5;13;0;2;0;0;
2;101;;202;1;3;0;
3;5;13;2;2;0;0;
4;80;513;0;0;0;0;
5;10;;0;0;0;14;
6;92;;0;0;5;0;
7;10;;0;0;0;0;
8;5;13;0;2;0;0;
9;5;13;2;2;0;0;
10;80;510;0;0;0;0;
11;80;510;0;0;0;0;O/P LOCNS 202 203 BLANK
12;76;489;9;0;0;0;
SHEET;394
PROCR;492;WRITE PTS BLOCK TO A2
0;81;492;0;0;0;0;
1;5;8;4;2;2;0;
2;94;492;6;0;2;2;
3;80;521;0;0;0;0;WRITEgA2
4;90;;0;0;2;0;
5;C;;0;0;0;48;
6;82;492;0;0;0;0;
SHEET;395
PROCR;493;READ/STORE NEXT'FIEND'ITEM
0;81;493;0;0;0;0;
1;94;493;6;0;2;2;
2;80;494;0;0;0;0;READ A1g7
3;80;504;0;0;0;0;COPY 7g8gA2
4;90;;0;0;2;0;
5;C;;0;0;0;48;
6;;7;4;2;2;0;
7;82;493;0;0;0;0;READ A1g7
SHEET;396
PROCR;494;READ A1g7
0;81;494;0;0;0;0;
1;42;A1;0;0;0;0;
2;C;7;0;0;0;0;
3;82;494;0;0;0;0;
SHEET;397
PROCR;495;'TYPE'SWITCH
NOTES;RADIX;B;MAIN LOOP
0;85;495;0;0;0;0;
1;C;496;0;0;0;0;INSTRUCTIONS
2;C;502;0;0;0;0;TABLE ENTRIES
3;C;506;0;0;0;0;PROGRAMME CONSTS
4;C;506;0;0;0;0;TABLE STARTS
5;C;507;0;0;0;0;FORMED CONST
6;C;496;0;0;0;0;6=C-PROCR
7;C;508;0;0;0;0;7=VALUES
SHEET;398
PROCR;496;TEST FOR SEQUENCE CHANGE
NOTES;RADIX;B;INSTRUCTIONS
0;;11;4;2;0;0;
1;32;;0;0;0;2-;
2;5;16;18;0;0;0;REF
3;33;;0;0;0;1;
4;5;16;24;0;0;0;NEG ITEM IND
5;33;;0;0;0;7;
6;5;13;0;2;0;0;PARA
7;34;11;6;2;0;0;ADM+ITEM
8;;11;2;2;0;0;TEST FOR SEQUENCE CHANGE
9;70;497;0;0;0;0;gNOT SEQ CHANGE OR MR ENTRY
10;12;;0;0;0;1;
11;70;499;0;0;0;0;gIS SEQ CHANGE
12;12;;0;0;0;1;
13;71;496;25;0;0;0;gNOT ACTION 16/0/0
14;36;529;1;0;0;0;BITS 1-13
15;5;16;19;0;0;0;MODULUS OF ITEM
16;34;16;24;0;0;0;
17;74;496;20;0;0;0;gPOSITIVE ITEM
18;1;16;19;0;0;0;
19;76;496;21;0;0;0;
20;2;16;19;0;0;0;
21;124;16;18;0;1;0;REF
22;2;26;0;0;0;0;
23;5;13;2;2;0;0;
24;76;498;10;0;0;0;gO/P
25;0;11;2;2;0;0;
26;5;13;0;2;0;0;COPY IND AS PARA
SHEET;399
PROCR;497;INSTRUCTIONS
NOTES;RADIX;B;INSTRUCTIONS
0;36;529;1;0;0;0;BITS 1-13
1;5;16;19;0;0;0;MODULUS OF ITEM
2;;11;6;2;0;0;
3;5;13;2;2;0;0;
4;34;16;24;0;0;0;
5;74;497;8;0;0;0;gNOT NEGATIVE ITEM
6;2;16;19;0;0;0;
7;5;16;19;0;0;0;(SET SIGN)
8;;16;19;0;0;0;
9;124;16;18;0;1;0;
10;1;26;0;0;0;0;PROCR START
11;73;498;0;0;0;0;gREPORT
12;34;529;1;0;0;0;BITS 1-13
13;37;13;2;2;0;0;
14;76;498;10;0;0;0;
SHEET;400
PROCR;498;REPORT ACTION WITH NEGATIVE ITEM
NOTES;RADIX;B;ACTION DETAILS
0;10;;0;0;0;78000-;23/1/0 ACTION FOR LOCKOUT
1;5;13;2;2;0;0;
2;5;13;0;2;0;0;
3;91;27;7;0;3;0;QTR
4;;16;18;0;0;0;THIS REF
5;30;;0;0;0;5;
6;1;527;4;0;0;0;CURRENT PROCR
7;5;18;2;1;3;0;
8;10;;0;0;0;2;
9;4;27;7;0;0;0;STEP CTR
10;80;513;0;0;0;0;EDIT+WRITE INSTRUCTION
11;85;100;3;0;0;0;
12;C;500;0;0;0;0;gPRINT
13;C;486;0;0;0;0;gDONT PRINT
SHEET;401
PROCR;499;SEQUENCE CHANGES
NOTES;RADIX;B;INSTRUCTIONS
0;0;529;13;0;0;0;FLIPFLOP
1;70;499;5;0;0;0;gBOTTOM 10 BITS
2;0;18;0;0;12;0;
3;31;;0;0;0;10-;
4;76;499;7;0;0;0;
5;34;529;12;0;0;0;BITS 1-10
6;36;18;0;0;12;0;
7;124;16;18;0;1;0;ITEM WITHIN PROCR IN A
8;1;26;0;0;0;0;
9;5;16;18;0;0;0;=SEQ CHANGE ADDRESS
10;34;11;6;2;0;0;
11;36;529;2;0;0;0;BITS 14-20+SIGN
12;73;499;15;0;0;0;
13;1;16;18;0;0;0;
14;76;499;16;0;0;0;
15;2;16;18;0;0;0;
16;5;13;2;2;0;0;
17;10;;0;0;0;1;
18;2;529;13;0;0;0;
19;3;529;13;0;0;0;REVERSE FLIPFLOP
20;71;498;10;0;0;0;gNOW ADDRESSES TOP 10 BITS
21;94;;0;0;12;1-;
22;76;498;10;0;0;0;gSAFETY
SHEET;402
PROCR;500;DECODE INSTRUCTION FOR PRINTING
NOTES;RADIX;B;INSTRUCTIONS
0;34;13;2;2;0;0;(A IS CLEAR)
1;32;;0;0;0;6;
2;5;16;21;0;0;0;ACTION
3;33;;0;0;0;1;
4;5;16;25;0;0;0;DISC
5;33;;0;0;0;2;
6;5;16;26;0;0;0;MOD
7;33;;0;0;0;13;
8;5;16;24;0;0;0;ADDRESS
9;0;13;2;2;0;0;
10;72;501;0;0;0;0;gPOSITIVE ACTION
11;10;;0;0;0;10;16
12;4;16;21;0;0;0;
SHEET;403
PROCR;501;CONVERT FOR PRINT
NOTES;RADIX;B;INSTRUCTIONS
0;0;13;0;2;0;0;PARA
1;80;523;0;0;0;0;gCONVERT TO DEC
2;5;13;4;0;0;0;
3;0;16;24;0;0;0;ADDRESS
4;80;523;0;0;0;0;TO DEC
5;5;13;2;1;0;0;
6;0;16;21;0;0;0;ACTION
7;80;523;0;0;0;0;TO DEC
8;5;13;0;1;0;0;
9;62;;0;0;0;0;RESET BINARY;BINARY
10;52;5;4;0;5;0;
11;C;533;0;0;0;0;
12;10;;0;0;0;1;
13;4;16;37;0;0;0;AUG SUBCTR
14;5;16;1;0;0;0;
15;94;486;0;0;5;10;
16;80;511;0;0;0;0;gO/P LINE
17;76;486;0;0;0;0;
SHEET;404
PROCR;502;FORM ADDRESS
NOTES;RADIX;B;TABLE ENTRIES
0;;11;0;2;0;0;
1;32;;0;0;0;2-;SELECT REFERENCE
2;5;16;18;0;0;0;
3;33;;0;0;0;1;
4;5;16;21;0;0;0;NEG ITEM IND
5;33;;0;0;0;7;
6;3;13;0;2;0;0;
7;5;13;4;2;0;0;PARAMETER
SHEET;405
PROCR;503;DEAL WITH 2ND ITEM FOR CONDENSE
NOTES;RADIX;B;TABLE ENTRIES
0;;11;6;1;0;0;
1;5;13;6;1;0;0;STORE Q'S AND I'S
2;;11;4;2;0;0;
3;70;503;24;0;0;0;gNOT CONDENSE/UNPACK TABLE
4;124;16;18;0;1;0;REF
5;0;26;0;0;0;0;
6;35;;0;0;0;1111;
7;36;11;4;2;0;0;(POSITIVE) ITEM
8;5;16;22;0;0;0;PROVISIONAL ADDRESS
9;0;13;6;2;0;0;Q+1
10;72;503;13;0;0;0;gNORMAL
11;2;16;22;0;0;0;
12;76;503;14;0;0;0;
13;1;16;22;0;0;0;
14;5;13;6;2;0;0;SET SECOND ADDRESS+LTE
15;34;16;21;0;0;0;'-0'IND
16;74;503;25;0;0;0;gNO,CALC FIRST ADDRESS
17;2;13;6;2;0;0;
18;70;503;22;0;0;0;gSET'-0'PARA,CALC FIRST ADDRESS
19;5;13;6;2;0;0;(SET SIGN BIT)
20;5;16;21;0;0;0;
21;76;503;25;0;0;0;
22;5;16;21;0;0;0;CLEAR THIS
23;0;529;6;0;0;0;p IN Q4 (MINUS ZERO)
24;5;13;4;2;0;0;CLEAR PARA;FIXED FIELD
25;124;16;18;0;1;0;REF
26;0;26;0;0;0;0;
27;1;11;2;2;0;0;FIRST ITEM (ALWAYS>0)
28;5;13;2;2;0;0;
29;0;16;21;0;0;0;'-0'IND
30;70;503;33;0;0;0;gNO
31;0;529;6;0;0;0;p IN Q4
32;5;13;4;2;0;0;SET SECOND PARA
33;80;513;0;0;0;0;gO/P MT
34;0;13;0;2;0;0;PARA
35;80;523;0;0;0;0;TO DEC
36;5;16;22;0;0;0;
37;34;13;2;2;0;0;
38;32;;0;0;0;6;DELETE B17
39;10;;0;0;0;0;(STARLING INDICATOR)
40;32;;0;0;0;4;
41;80;523;0;0;0;0;TO DEC
42;5;16;30;0;0;0;
43;62;;0;0;0;0;RESET BINARY
44;35;;0;0;0;10000;Q5
45;36;13;2;2;0;0;STERLING IND
46;4;16;22;0;0;0;STORE WITH PARA
47;;13;4;1;0;0;SET UP SECOND HALF OF
48;5;13;0;1;0;0;DETAILS FOR
49;;13;6;1;0;0;OUTPUT
50;5;13;2;1;0;0;
51;80;513;0;0;0;0;gO/P SECOND HALF
52;76;505;0;0;0;0;
SHEET;406
PROCR;504;WRITE SEC 7gA2
0;81;504;0;0;0;0;
1;55;7;4;1;0;50;
2;C;8;4;1;0;0;
3;80;521;0;0;0;0;gWRITE 9gA2
4;82;504;0;0;0;0;
SHEET;407
PROCR;505;
NOTES;RADIX;;
0;35;;0;0;0;1111;Q1-4 OF INDS/QTTS
1;85;100;3;0;0;0;
2;C;505;4;0;0;0;gPRINT
3;C;486;0;0;0;0;gDONT PRINT
4;36;13;2;2;0;0;
5;80;523;0;0;0;0;TO DEC
6;62;;0;0;0;0;ITEM FOR
7;5;525;36;0;0;0;CONDENSE
8;5;13;22;0;0;0;CLEAR'LAST TE'IND
9;;13;2;2;0;0;QTTS+INDS
10;73;505;14;0;0;0;g LAST TE
11;;13;0;2;0;0;SECOND PARA
12;30;;0;0;0;3-;TEST Q 4 NON-ZERO
13;70;505;16;0;0;0;g NOT LTE IND
14;10;;0;0;0;1;
15;5;13;22;0;0;0;SET LTE IND
16;90;;0;0;3;0;
17;C;;0;0;0;5;
18;34;13;2;2;0;0;QTTS
19;32;;0;0;0;6;
20;5;13;0;0;3;0;
21;32;;0;0;0;1;
22;94;505;20;0;3;1;STORE Q5-1 IN 13/0-4
23;90;;0;0;3;0;
24;C;;0;0;0;5;
25;00;13;0;0;3;0;
26;80;523;0;0;0;0;TO DECIMAL
27;05;13;0;0;3;0;
28;94;505;25;0;3;1;
29;62;;0;0;0;0;
30;52;5;4;0;5;0;
31;C;532;20;0;0;0;
32;10;;0;0;0;2;
33;4;16;37;0;0;0;AUG SUBCTR
34;5;16;1;0;0;0;
35;94;486;0;0;5;20;
36;80;511;0;0;0;0;gO/P LINE
37;76;486;0;0;0;0;
SHEET;408
PROCR;506;DEAL WITH PROGRAMME CONSTANTS AND FORMED TSL'S
NOTES;RADIX;B;
0;90;;0;0;4;0;
1;C;;0;0;0;8;
2;;11;0;2;4;0;
3;32;;0;0;0;2-;
4;5;16;18;0;0;0;REF
5;32;;0;0;0;2;
6;5;13;0;2;0;0;PARA
7;34;529;9;0;0;0;BIT 8
8;36;13;0;2;0;0;
9;70;506;12;0;0;0;gNOT MINUS ZERO
10;;529;6;0;0;0;p IN Q4
11;5;13;0;2;0;0;
12;0;11;2;2;4;0;
13;72;506;17;0;0;0;gPOSITIVE ITEM
14;124;16;18;0;1;0;
15;2;26;0;0;0;0;PROCR START
16;76;506;19;0;0;0;
17;124;16;18;0;1;0;
18;1;26;0;0;0;0;
19;5;13;2;2;0;0;
20;80;513;0;0;0;0;gO/P
21;0;13;2;2;0;0;CONST
22;5;13;4;0;4;0;;STORE FOR PRINT
23;0;13;0;2;0;0;PARA
24;5;13;6;0;4;0;
25;94;506;2;0;4;4;
26;85;100;3;0;0;0;
27;C;506;29;0;0;0;gPRINT
28;C;486;0;0;0;0;gDONT PRINT
29;52;5;4;0;5;0;
30;C;531;4;0;0;0;
31;76;505;32;0;0;0;gVIA TABLE ENTRIES
SHEET;409
PROCR;507;DEAL WITH TRANSLATOR'S FORMED LONG/SHORT CONSTS
NOTES;RADIX;B;FORMED CONSTANTS
0;90;;0;0;4;0;4 CONSTANTS PER ITEM
1;C;;0;0;0;8;
2;10;;0;0;0;0;CLEAR PARA
3;5;13;0;2;0;0;
4;0;11;0;1;4;0;
5;5;13;2;1;0;0;
6;80;513;0;0;0;0;
7;94;507;4;0;4;2;
8;85;100;3;0;0;0;
9;C;507;11;0;0;0;gPRINT
10;C;486;0;0;0;0;gDONT PRINT
11;90;;0;0;4;0;
12;C;;0;0;0;8;
13;0;11;0;2;4;0;
14;5;13;4;0;0;0;
15;5;13;6;0;0;0;
16;80;509;0;0;0;0;
17;94;507;13;0;4;2;
18;76;486;0;0;0;0;
SHEET;410
PROCR;508;VALUES
NOTES;RADIX;B;
0;;11;0;1;0;0;
1;2;525;22;1;0;0;'NOTES'
2;71;508;30;0;0;0;gNOT NEW REF/ITEM
3;;11;4;2;0;0;REF
4;5;16;18;0;0;0;
5;;11;6;2;0;0;ITEM
6;124;16;18;0;0;0;
7;1;26;0;0;0;0;
8;02;16;23;0;0;0;CURRENT VALUE OF STACKER
9;03;13;2;2;0;0;gDELTA
10;04;16;23;0;0;0;gNEW VALUE OF STACKER
11;10;;0;0;0;p00;
12;5;13;0;2;0;0;PARA FOR DELTA
13;80;513;0;0;0;0;WRITE
14;85;100;3;0;0;0;
15;C;508;17;0;0;0;gPRINT
16;C;486;0;0;0;0;gDONT PRINT
17;0;13;0;2;0;0;PARA
18;5;13;6;0;0;0;
19;0;13;2;2;0;0;VALUE
20;5;13;4;0;0;0;
21;10;;0;0;0;1;
22;5;16;1;0;0;0;SET PRINT IND
23;52;5;4;0;8;0;
24;C;531;0;0;0;0;
25;94;486;0;0;8;10;
26;80;519;0;0;0;0;gPRINT
27;90;;0;0;8;0;
28;C;;0;0;0;40;
29;76;486;0;0;0;0;
30;10;;0;0;0;1;
31;04;16;23;0;0;0;AUGMENT LOCN COUNTER
32;00;11;6;2;0;0;
33;5;13;2;2;0;0;VALUE
34;;11;4;2;0;0;PARA FOR VALUE
35;76;508;12;0;0;0;
SHEET;411
PROCR;509;PRINT CONVERT TABLES+TRANSLATOR'S CONSTS
0;81;509;0;0;0;0;
1;10;;0;0;0;1;
2;4;16;37;0;0;0;
3;5;16;1;0;0;0;
4;52;5;4;0;5;0;
5;C;531;0;0;0;0;
6;94;509;8;0;5;10;
7;80;511;0;0;0;0;gO/P LINE
8;82;509;0;0;0;0;
SHEET;412
PROCR;510;
0;81;510;0;0;0;0;
1;80;513;0;0;0;0;gWRITE
2;;13;2;2;0;0;
3;5;13;4;0;0;0;
4;5;13;6;0;0;0;
5;85;100;3;0;0;0;
6;C;510;8;0;0;0;gPRINT
7;C;510;9;0;0;0;gDONT PRINT
8;80;509;0;0;0;0;gPRINT
9;82;510;0;0;0;0;
SHEET;413
PROCR;511;PRINT LINE WHEN FULL,STEP SERIAL
NOTES;RADIX;B;SUB ROUTINE
0;81;511;0;0;0;0;
1;0;16;28;0;0;0;SERIAL AT START OF LINE
2;80;523;0;0;0;0;gTO DEC
3;5;525;38;0;0;0;WL
4;52;5;2;0;0;0;EDIT SERIAL
5;C;532;50;0;0;0;
6;80;519;0;0;0;0;gPRINT
7;62;;0;0;0;0;
8;0;16;37;0;0;0;INCREMENT THIS LINE
9;4;16;28;0;0;0;UPDATE FOR NEXT
10;10;;0;0;0;0;
11;5;16;37;0;0;0;
12;90;;0;0;5;0;
13;C;;0;0;0;40;
14;82;511;0;0;0;0;
SHEET;414
CONST;512;1;CONSTANTS
0;(D);
2;(A)p    ;
4;(D)0;CHUNK START/ORDER
6;0;A
8;0;B
10;0;C
12;0;A
14;0;B
16;0;C
SHEET;415
PROCR;513;GENERAL MAG - TAPE EDIT & OUTPUT
NOTES;RADIX;B;SUB ROUTINE
0;81;513;0;0;0;0;
1;0;13;0;1;0;0;QUICKER THAN EDIT
2;5;8;4;1;1;0;
3;0;13;2;1;0;0;
4;5;8;6;1;1;0;
5;94;513;9;0;1;4;
6;80;521;0;0;0;0;gWRITE BLOCK
7;90;;0;0;1;0;
8;C;;0;0;0;48;
9;82;513;0;0;0;0;
SHEET;416
PROCR;514;READ A2
NOTES;;;
0;81;514;0;0;0;0;
1;42;A2;0;0;0;0;
2;C;8;0;0;0;0;
3;82;514;0;0;0;0;
SHEET;417
PROCR;515;CLOSE OUTPUT FILES
NOTES;RADIX;;
0;81;515;0;0;0;0;
1;80;514;0;0;0;0;
2;0;8;4;1;0;0;
3;12;;0;0;0;5659655972;'FINIF'
4;71;515;1;0;0;0;
5;41;A2;0;0;0;1;CLOSE I/P
6;82;515;0;0;0;0;
SHEET;418
PROCR;516;INPUT OFF PASS 2
NOTES;RADIX;B;SUB ROUTINE
0;81;516;0;0;0;0;
1;94;516;5;0;2;8;STANDARD INCREMENT
2;80;517;0;0;0;0;READ A6gSEC 9
3;90;;0;0;2;0;
4;C;;0;0;0;144;
5;82;516;0;0;0;0;
SHEET;419
PROCR;517;INPUT
NOTES;RADIX;B;SUB ROUTINE
0;81;517;0;0;0;0;
1;42;A6;0;0;0;0;
2;C;9;0;0;0;0;
3;82;517;0;0;0;0;
SHEET;420
PROCR;518;WRITE ON WORKING TAPE
NOTES;;;
0;81;518;0;0;0;0;
1;55;8;4;1;0;50;COPY ANNEXES
2;C;9;4;1;0;0;
3;0;525;18;1;0;0;BEW
4;5;9;52;1;0;0;
5;43;A6;0;0;0;0;
6;C;9;0;0;0;0;
7;54;9;0;0;0;52;
8;82;518;0;0;0;0;
SHEET;421
PROCR;519;PRINT
NOTES;RADIX;B;SUB ROUTINE
0;81;519;0;0;0;0;
1;62;;0;0;0;0;
2;;525;18;1;0;0;
3;05;5;50;1;0;0;BEW
4;10;;0;0;0;1;ALWAYS TRACK 1
5;05;5;0;1;0;0;FUNCTION WORD
6;;27;9;0;0;0;
7;70;519;12;0;0;0;gPRINTER
8;55;5;0;1;0;54;
9;C;10;4;1;0;0;
10;80;520;0;0;0;0;gO/P
11;76;519;35;0;0;0;
12;;27;8;0;0;0;PRINTER TYPE
13;12;;0;0;0;9;
14;70;519;31;0;0;0;gSPECIAL
15;10;;0;0;0;80000;
16;5;5;1;0;0;0;BIT 40
17;54;10;0;1;0;384;
18;124;999;15;1;2;0;SEC 5
19;124;;0;0;2;0;
20;124;999;13;1;2;0;SEC 10
21;129;;0;0;1;0;
22;10;;0;0;0;4;
23;30;;0;0;0;5;
24;1;999;7;0;0;0;ROUTE
25;34;999;12;0;0;0;
26;125;;4096;1;1;0;
27;124;999;0;0;3;0;
28;123;;160;0;2;0;
29;62;;0;0;0;0;
30;76;519;35;0;0;0;
31;55;5;0;1;0;54;
32;C;10;0;1;0;0;
33;10;;0;0;0;9;
34;76;519;23;0;0;0;
35;54;5;0;0;0;50;
36;5;16;1;0;0;0;CLEAR INDICATOR
37;82;519;0;0;0;0;
SHEET;422
PROCR;520;O/PgA9
0;81;520;0;0;0;0;
1;10;;0;0;0;800000;
2;34;999;12;0;0;0;SEC 10
3;125;;4096;1;1;0;
4;1;999;7;0;0;0;D1/A9
5;124;999;0;0;3;0;
6;123;;160;0;2;0;
7;82;520;0;0;0;0;
SHEET;423
PROCR;521;OUTPUT ON A2
NOTES;RADIX;B;SUB ROUTINE
0;81;521;0;0;0;0;
1;;525;18;1;0;0;BEW
2;5;8;52;1;0;0;
3;43;A2;0;0;0;0;OUTPUT
4;C;8;0;0;0;0;
5;54;8;0;0;0;52;CLEAR
6;82;521;0;0;0;0;
SHEET;424
PROCR;522;
0;81;522;0;0;0;0;
1;50;9;4;0;2;0;
2;C;531;12;0;0;0;UNPACK NEXT ITEM
3;82;522;0;0;0;0;
SHEET;425
PROCR;523;CONVERT (A) TO DECIMAL
NOTES;;;
0;81;523;0;0;0;0;
1;5;527;2;1;0;0;
2;60;;0;0;0;0;
3;124;528;20;0;2;0;
4;112;527;2;1;0;0;
5;82;523;0;0;0;0;
SHEET;426
PROCR;524;CONVERT (A) TO BIN
NOTES;;;
0;81;524;0;0;0;0;
1;5;527;2;1;0;0;
2;62;;0;0;0;0;
3;124;528;0;0;2;0;
4;112;527;2;1;0;0;
5;82;524;0;0;0;0;
SHEET;427
CONST;525;1;
0;(A)CHAPT;
2;TYPEp;
4;FILES;
6;TYPE;
8;ST.OF;
10;BLOCK;
12;SIZE;
14;SIT;
16;PREND;
18;(D)7.0000007.;
20;(A)START;
22;NOTES;
24;SPOOL;
26;(A)PROC;
28;EDURE;
30;SEC;
32;TION ;
34;(D)6p6p6p6p6p;
36;0;
38;0;
40;0;
42;(A)ON/=;
SHEET;428
CONST;526;1;
0;(A)EXTRA;
2; CHAP;
4;TER  ;
6;(D)7ppp0003pp;BITS 1-10+25-39
8;5.5.;
10;(A)FIEND;
12;(A)INDEX;
14;CHAIN;
16;08004;
18;PROG;
20;OUT;
22;(D)5.5.;
SHEET;429
CONST;527;1;CONVERT TABLE
0;(D)1;BINgDEC
2;0;(A) WL
4;0;CURRENT PROCR
SHEET;430
CONST;528;1;COMPILER'S CONVERT TABLES
0;(D)1;DECgBIN
2;t;
4;64;
6;3.8;
8;2710;
10;186t0;
12;p4240;
14;989680;
16;5p5.100;
18;3e9t+t00;
20;1;BINgDEC
22;16;
24;256;
26;4096;
28;65536;
30;1048576;
32;16777216;
34;268435456;
36;4294967296;
38;pppppppppp;
SHEET;431
CONST;529;0;
0;(D)7;
1;1ppp;
2;p.000-;
3;7p;
4;8000;
5;6000;
6;p000;
7;80000;
8;p0000;
9;80;
10;p0000-;
11;p;
12;3pp;BITS 1-10
13;0;THIS IS A FLIPFLOP FOR SC'S FWD
14;3p;BITS 1-6
SHEET;432
TABLE;530;1;PRINT HEADING DATA
NOTES;;;
0;13;4;0;0;0;0;5;0;0;0;0;0;0;
2;13;3;0;0;0;0;5;0;0;0;0;0;0;
4;13;0;0;0;0;0;5;0;0;0;0;0;0;
6;13;2;0;0;0;0;5;0;0;0;0;0;1;
8;523;0;0;0;0;0;3;2;0;2;0;0;0;REF----ACTIONS WITH NEGATIVE ADDRESSES
10;519;0;0;0;0;0;5;0;2;4;0;0;1;PROCR
12;526;16;0;0;2;0;5;0;0;0;0;0;0;'08000'
14;526;18;0;0;2;0;4;1;1;0;0;0;0;'PROG'
16;526;20;0;0;2;0;3;2;1;0;0;0;0;'OUT'
18;16;2;0;0;0;0;5;0;2;0;0;0;0;PROGM
20;16;3;0;0;0;0;5;0;2;4;0;0;0;SERIAL
22;526;22;0;0;2;0;2;3;0;0;0;0;1;DOUBLE LE
SHEET;433
TABLE;531;1;
NOTES;;;
0;13;4;0;0;0;0;5;0;7;4;2;0;0;
2;13;6;0;0;0;0;5;0;2;4;0;0;1;
4;13;4;0;0;0;0;5;0;7;4;2;0;0;CONST
6;13;6;0;0;0;0;5;0;2;4;0;0;0;PARA
8;13;8;0;0;0;0;5;0;12;4;2;0;0;CONST
10;13;10;0;0;0;0;5;0;2;4;0;0;1;
12;11;0;0;0;2;0;5;0;0;0;0;0;0;
14;11;2;0;0;2;0;5;0;0;0;0;0;0;
16;11;4;0;0;2;0;5;0;0;0;0;0;0;
18;11;6;0;0;2;0;5;0;0;0;0;0;1;
SHEET;434
TABLE;532;3;
NOTES;;;G BLOCK
0;16;16;0;0;0;0;5;0;0;0;0;0;0;
2;529;0;0;0;0;0;5;0;0;0;0;0;0;
4;16;2;0;0;0;0;5;0;0;0;0;0;0;
6;16;3;0;0;0;0;5;0;0;0;0;0;0;SERIAL
8;525;0;0;0;2;0;5;0;0;0;0;0;1;'CHAPT'
10;525;0;0;0;2;0;5;0;0;0;0;0;0;
12;16;16;0;0;0;0;5;0;3;4;0;0;1;
14;16;17;0;0;0;0;4;1;1;3;0;0;0;PROCR NUMBER
16;525;42;0;0;2;0;1;4;0;0;0;0;0;'='
18;16;36;0;0;0;0;4;1;0;3;0;0;1;PROCR START
20;16;22;0;0;0;0;1;0;4;0;0;0;0;p IND
22;16;30;0;0;0;0;4;1;3;3;0;0;0;FIRST ADDRESS
24;16;22;0;0;0;0;2;3;2;1;0;0;0;PARA
26;525;36;0;0;0;0;5;0;4;4;0;0;0;SECOND ADDRESS
28;13;0;0;0;0;0;2;3;2;1;0;0;0;Q5
30;13;1;0;0;0;0;2;3;1;1;0;0;0;Q4
32;13;2;0;0;0;0;2;3;1;1;0;0;0;Q3
34;13;3;0;0;0;0;2;3;1;1;0;0;0;Q2
36;13;4;0;0;0;0;2;3;1;1;0;0;0;Q1
38;13;22;0;0;0;0;1;4;3;0;0;0;1;LTE
40;16;18;0;0;2;0;5;0;0;0;0;0;0;
42;16;20;0;0;2;0;5;0;0;0;0;0;0;
44;16;17;0;0;0;0;4;1;1;3;0;0;1;PROCR NUMBER
46;13;0;0;0;2;0;5;0;0;0;0;0;0;
48;13;2;0;0;2;0;5;0;0;0;0;0;1;
50;525;38;0;0;0;0;5;0;0;4;0;0;1;
SHEET;435
TABLE;533;1;EDIT INSTRUCTION FOR PRINT
NOTES;;;
0;13;0;0;0;0;0;2;3;6;1;0;0;0;A
2;16;25;0;0;0;0;1;4;2;0;0;0;0;D
4;16;26;0;0;0;0;1;4;2;0;0;0;0;M
6;13;2;0;0;0;0;4;1;2;3;0;0;0;ADDR
8;13;4;0;0;0;0;4;1;1;3;0;0;1;PARAMETER
SHEET;436
PROCR;534;START OF PASS 5
0;152;200;2;0;0;0;DUMMY
1;C;557;0;0;0;0;
2;85;403;0;0;0;0;
3;C;534;0;0;0;0;
4;85;407;0;0;0;0;
5;C;534;0;0;0;0;
6;85;212;0;0;0;0;
7;C;534;0;0;0;0;
8;85;645;0;0;0;0;
9;C;534;0;0;0;0;
10;85;411;0;0;0;0;
11;C;534;0;0;0;0;
12;43;A1;0;0;0;0;SET UP SEC 5
13;C;5;0;0;0;0;
SHEET;437
PROCR;535;08005 INSERTED BEFORE HERE-FINAL ROUTINES
0;54;8;4;1;0;48;
1;10;;0;0;0;55;
2;5;8;4;1;0;0;
3;80;538;0;0;0;0;gWRITE'E'BLOCK
4;;546;0;1;0;0;'PREND'
5;5;8;4;1;0;0;
6;;16;2;0;0;0;PROG ID
7;5;8;6;2;0;0;
8;80;538;0;0;0;0;gWRITE'PREND'
9;;546;10;1;0;0;'INDEX'
10;5;8;6;1;0;0;
11;;546;16;2;0;0;'ppppp'
12;5;8;8;2;0;0;
13;10;;0;0;0;4;
14;5;8;10;1;0;0;
15;;546;16;1;0;0;ALINMENT MARKS
16;5;8;4;1;0;0;
17;80;538;0;0;0;0;gWRITE
18;;16;2;0;0;0;PROG IDENTITY
19;3;8;4;2;0;0;
20;5;8;12;2;0;0;
21;;16;3;0;0;0;PROG SERIAL
22;3;8;6;2;0;0;
23;5;8;14;2;0;0;
24;10;;0;0;0;2;
25;5;8;10;2;0;0;
26;10;;0;0;0;3;
27;3;8;18;2;0;0;
28;10;;0;0;0;2;
29;1;27;12;0;0;0;0/2=PTS NO/YES
30;5;8;16;2;0;0;
31;;546;16;2;0;0;'ppppp'
32;5;8;20;2;0;0;
33;80;538;0;0;0;0;gWRITE'INDEX'DATA
34;45;A6;0;0;0;1;
35;54;5;0;1;0;48;
36;90;;0;0;1;0;
37;C;;0;0;0;5;
38;80;540;0;0;0;0;gPRINT 5 BLANKS
39;94;535;38;0;1;1;
40;55;546;68;1;0;22;HEADINGS
41;C;5;10;1;0;0;
42;80;540;0;0;0;0;gPRINT
SHEET;438
PROCR;536;PRINT FINAL LINE, TEST FOR PASS 3 COPY
0;90;;0;0;1;0;
1;C;;0;0;0;13;
2;;27;6;0;0;0;'PT OMITTED'
3;70;536;6;0;0;0;gNO
4;;546;64;1;0;0;'YES'
5;76;536;7;0;0;0;
6;;546;66;1;0;0;'NO'
7;5;5;12;1;0;0;
8;80;553;0;0;0;0;PRINT
9;94;;0;0;1;4;
10;10;;0;0;0;0;
11;5;546;46;0;0;0;
12;86;403;0;0;0;0;SERIOUS ERRORS CTR
13;80;551;0;0;0;0;CONVERT
14;80;554;0;0;0;0;EDIT
15;52;5;18;0;0;0;
16;C;549;36;0;0;0;
17;80;553;0;0;0;0;PRINT
18;94;;0;0;1;4;
19;10;;0;0;0;0;
20;5;546;46;0;0;0;
21;86;407;0;0;0;0;OTHER ERRORS CTR
22;80;551;0;0;0;0;CONVERT
23;80;554;0;0;0;0;EDIT
24;80;553;0;0;0;0;PRINT
25;62;;0;0;0;0;
26;80;540;0;0;0;0;gMORE BLANK LINES
27;94;536;26;0;1;1;
28;155;;0;0;0;0;TRANSLATOR SERIAL
29;5;546;30;1;0;0;
30;55;546;18;1;0;14;
31;C;5;6;1;0;0;
32;153;;0;0;0;0;DATE
33;5;546;30;1;0;0;
34;86;212;0;0;0;0;A2 SPOOL NO
35;5;546;12;0;0;0;
36;52;5;20;0;0;0;
37;C;549;0;0;0;0;
38;80;540;0;0;0;0;PRINT 'MADE BY'
39;55;546;90;1;0;8;
40;C;5;20;1;0;0;
41;80;540;0;0;0;0;PRINT 'ISSUE'
42;;27;9;0;0;0;
43;70;536;46;0;0;0;gCLOSE PRINTER
44;10;;0;0;0;1+00000;CLOSE A9
45;76;536;49;0;0;0;
46;;27;8;0;0;0;PRINTER TYPE
47;11;;0;0;0;14;
48;30;;0;0;0;5;
49;1;999;7;0;0;0;
50;125;;4096;1;1;0;
51;124;999;0;0;3;0;
52;123;;160;0;2;0;CLOSE PRINTER
53;62;;0;0;0;0;
54;46;A2;10;0;0;0;RUN BACK TO SECOND'INDEX'BLOCK
55;C;;0;0;0;3;
56;10;;0;0;0;1;
57;5;546;50;0;0;0;SET IND
58;5;546;50;0;0;0;CLEAR IND
59;40;A6;0;0;0;0;
60;100;546;44;1;0;0;SPOOL NUMBERg66
61;52;9;4;0;0;0;
62;C;549;16;0;0;0;
63;154;9;4;0;0;0;TYPE COMMENT
64;80;541;0;0;0;0;gWRITE BLANKS
65;80;541;0;0;0;0;gWRITE 2 BLANK BLOCKSgA6
66;80;542;0;0;0;0;READ A2
67;10;;0;0;0;2;
68;5;8;10;2;0;0;
69;;546;2;1;0;0;'CHAIN'
70;5;8;12;1;0;0;
71;80;541;0;0;0;0;gA6
SHEET;439
PROCR;537;ALARM 6 OR 7
0;80;542;0;0;0;0;A2g
1;10;;0;0;0;2;
2;1;27;12;0;0;0;0/2=PTS NO/YES
3;5;8;8;2;0;0;
4;10;;0;0;0;ppppp;
5;5;8;12;2;0;0;
6;80;541;0;0;0;0;gA6
7;80;542;0;0;0;0;A2g
8;0;8;6;1;0;0;
9;2;546;10;1;0;0;'INDEX'
10;70;537;13;0;0;0;gYES
11;80;541;0;0;0;0;gWRITE
12;76;537;7;0;0;0;
13;80;541;0;0;0;0;gWRITE 'INDEX'
14;80;542;0;0;0;0;gREAD
15;10;;0;0;0;2;
16;1;27;12;0;0;0;0/2=PTS NO/YES
17;5;8;8;2;0;0;
18;10;;0;0;0;ppppp;
19;5;8;12;2;0;0;
20;80;541;0;0;0;0;gWRITE
21;41;A6;0;0;0;0;
22;46;A2;10;0;0;1;RUN BACK TO SECOND 'INDEX' BLOCK
23;C;;0;0;0;3;
24;90;;0;0;1;0;CLEAR R1
25;C;;0;0;0;0;/////
26;10;;0;0;0;6;
27;5;546;12;0;0;0;
28;0;27;9;0;0;0;
29;70;537;36;0;0;0;gON-LINE PRINT
30;86;403;0;0;0;0;'DISASTROUS'
31;11;;0;0;0;0;
32;71;537;38;0;0;0;
33;0;27;6;0;0;0;'PT OMITTED'
34;11;;0;0;0;0;
35;71;537;38;0;0;0;
36;;27;7;0;0;0;
37;70;537;40;0;0;0;gNO CATASTROPHES
38;10;;0;0;0;7;
39;5;546;12;0;0;0;
40;150;546;12;0;0;0;ALARM 6 OR 7
41;C;537;49;0;0;0;gEND
42;C;537;51;0;0;0;gCLOSE FILES,REENTER TO PRINT
43;C;555;0;0;0;0;ENTER PIPS
44;C;537;45;0;0;0;gRE ENTER OFF LINE
45;80;550;0;0;0;0;
46;90;;0;0;1;2;
47;C;;0;0;0;48;
48;76;100;3;0;0;0;gPASS 0
49;80;550;0;0;0;0;
50;151;;0;0;0;0;
51;80;550;0;0;0;0;
52;90;;0;0;1;0;
53;C;;0;0;0;48;
54;76;100;3;0;0;0;CALL START OF GENERATOR
SHEET;440
PROCR;538;WRITEgA2
0;81;538;0;0;0;0;
1;;546;14;1;0;0;BEW
2;5;8;52;1;0;0;
3;43;A2;0;0;0;0;
4;C;8;0;0;0;0;
5;54;8;0;1;0;52;CLEAR
6;82;538;0;0;0;0;
SHEET;441
PROCR;539;OPEN & CLOSE A6
0;81;539;0;0;0;0;
1;40;A6;0;0;0;1;
2;41;A6;0;0;0;1;
3;82;539;0;0;0;0;
SHEET;442
PROCR;540;PRINT SR
0;81;540;0;0;0;0;
1;62;;0;0;0;0;
2;;546;14;1;0;0;BEW
3;5;5;50;1;0;0;
4;;546;50;0;0;0;HEAD OF FORM OR TRACK 1
5;5;5;0;2;0;0;
6;10;;0;0;0;1;
7;5;546;50;0;0;0;
8;;27;9;0;0;0;
9;70;540;14;0;0;0;gPRINTER
10;55;5;0;1;0;54;
11;C;10;4;1;0;0;
12;80;552;0;0;0;0;O/PgA9
13;76;540;37;0;0;0;
14;;27;8;0;0;0;PRINTER TYPE
15;12;;0;0;0;9;
16;70;540;33;0;0;0;gSPECIAL PRINTER
17;10;;0;0;0;80000;
18;5;5;1;0;0;0;
19;54;10;0;1;0;384;
20;124;999;15;1;2;0;
21;124;;0;0;2;0;
22;124;999;13;1;2;0;
23;129;;0;0;1;0;
24;10;;0;0;0;4;
25;30;;0;0;0;5;
26;1;999;7;0;0;0;
27;34;999;12;0;0;0;
28;125;;4096;1;1;0;
29;124;999;0;0;3;0;
30;123;;160;0;2;0;
31;62;;0;0;0;0;
32;76;540;37;0;0;0;
33;55;5;0;1;0;54;
34;C;10;0;1;0;0;
35;10;;0;0;0;9;
36;76;540;25;0;0;0;
37;54;5;0;1;0;50;
38;82;540;0;0;0;0;
SHEET;443
PROCR;541;WRITE ON A6
0;81;541;0;0;0;0;
1;55;8;4;1;0;50;
2;C;9;4;1;0;0;
3;;546;14;1;0;0;BEW
4;5;9;52;1;0;0;
5;43;A6;0;0;0;0;
6;C;9;0;0;0;0;
7;54;9;0;1;0;52;
8;82;541;0;0;0;0;
SHEET;444
PROCR;542;READ A2
0;81;542;0;0;0;0;
1;42;A2;0;0;0;0;
2;C;8;0;0;0;0;
3;82;542;0;0;0;0;
SHEET;445
PROCR;543;DELETE GUARD WORDS
0;81;543;0;0;0;0;
1;124;999;5;0;3;0;
2;126;;20;1;2;0;
3;80;544;0;0;0;0;
4;124;999;5;0;3;0;
5;126;;22;1;2;0;
6;80;544;0;0;0;0;
7;124;999;5;0;3;0;
8;126;;24;1;2;0;
9;125;;204;0;2;0;
10;80;544;0;0;0;0;
11;90;;0;0;1;0;
12;C;;0;0;0;0;/////
13;126;543;0;0;3;0;
SHEET;446
PROCR;544;STACK TAG SR
0;81;544;0;0;0;0;
1;123;547;0;0;3;0;PROG TAG
2;124;999;0;0;3;0;
3;123;;0;1;2;0;
4;94;544;2;0;2;2;
5;82;544;0;0;0;0;
SHEET;447
PROCR;545;WRITE SEC8gA6
0;81;545;0;0;0;0;
1;55;8;4;1;0;50;
2;C;9;4;1;0;0;
3;;546;14;1;0;0;BEW
4;5;9;52;1;0;0;
5;54;8;4;1;0;50;
6;43;A6;0;0;0;0;
7;C;9;0;0;0;0;
8;82;545;0;0;0;0;
SHEET;448
CONST;546;1;
0;(A)PREND;
2;CHAIN;
4;FINIS;
6;CHAPT;
8;ALLOC;
10;INDEX;
12;(A)0;
14;(D)7.0000007.;
16;6p6p6p6p6p;
18;(A)MADE ;
20;BY 08;
22;004 I;
24;SSUE ;
26;5  SE;
28;RIAL ;
30;40000;
32;/;
34;SPOOL;
36;08004;
38;MAKES;
40;COPY ;
42;PASS3;
44;0;WL'S
46;0;WL'S
48;0;WL'S
50;0;IND
52;(A)PT OM;
54;ITTED;
56;DISAS;
58;TROUS;
60;OTHER;
62;S    ;
64;YES;
66;NO;
68;   IN;
70;TERCO;
72;DE   ;
74;;
76;SERIA;
78;L NUM;
80;BERS ;
82;OF IN;
84;TERCO;
86;DE RE;
88;PORTS;
90;(D)7t(A)0800;
92;(A)0 ISS;
94;(A)UE 8(D)7e;
96;(D)7.0000007.;
SHEET;449
CONST;547;1;COMPILER'S CONVERT TABLES
0;(D)1;
2;t;
4;64;
6;3.8;
8;2710;
10;18600;
12;p4240;
14;989680;
16;5p5.100;
18;3e9t+t00;
20;1;BINgDEC
22;16;
24;256;
26;4096;
28;65536;
30;1048576;
32;16777216;
34;268435456;
36;4294967296;
38;pppppppppp;
40;1;STERLINGgBIN
42;+;
44;78;
46;p0;
48;960;
50;5:+0;
52;3t980;
54;249p00;
56;16.3600;
58;.4.1+00;
60;1;BINgSTERLING
62;14;
64;1014;
66;17014;
68;273014;
70;4369014;
72;69905014;
74;1118481014;
76;pppppppppp;
78;pppppppppp;
80;1400000;20/0
SHEET;450
PROCR;548;SET TAG 15
0;81;548;0;0;0;0;
1;10;;0;0;0;p0000;
2;4;548;0;0;0;0;
3;126;548;0;0;3;0;
SHEET;451
TABLE;549;1;
0;525;42;0;0;2;0;2;1;1;0;0;0;0;
2;546;30;0;0;1;0;2;4;1;2;0;0;0;DAY
4;546;32;0;0;2;0;1;4;0;0;0;0;0;'/'
6;546;30;0;0;0;0;2;1;0;2;0;0;0;MONTH
8;546;32;0;0;2;0;1;4;0;0;0;0;0;'/'
10;546;30;0;0;0;0;2;3;0;2;0;0;0;YEAR
12;546;34;0;0;2;0;5;0;2;0;0;0;0;'SPOOL'
14;546;12;0;0;0;0;5;0;1;5;0;0;1;NUMBER
16;546;36;0;0;2;0;5;0;2;0;0;0;0;'08000'
18;546;38;0;0;2;0;5;0;1;0;0;0;0;MAKES
20;546;42;0;0;2;0;5;0;1;0;0;0;0;PASS3
22;546;40;0;0;2;0;5;0;1;0;0;0;0;'COPY'
24;525;42;0;0;2;0;2;1;0;0;0;0;0;
26;546;46;0;0;0;0;5;0;1;5;0;0;0;SPOOL NUMBER
28;526;22;0;0;2;0;2;3;0;0;0;0;1;
30;556;0;0;0;0;0;3;2;0;2;0;0;0;REF----ACTIONS WITH NEG ADDRESS
32;545;0;0;0;0;0;5;0;2;4;0;0;1;
34;546;44;0;0;0;0;4;1;1;3;0;0;1;PROCR
36;24;0;0;0;0;0;5;0;4;5;0;0;0;REPORTS
38;24;1;0;0;0;0;5;0;1;5;0;0;0;DIS ERRORS
40;24;2;0;0;0;0;5;0;1;5;0;0;0;
42;24;3;0;0;0;0;5;0;1;5;0;0;0;
44;24;4;0;0;0;0;5;0;1;5;0;0;0;
46;24;5;0;0;0;0;5;0;1;5;0;0;0;
48;24;6;0;0;0;0;5;0;1;5;0;0;0;
50;24;7;0;0;0;0;5;0;1;5;0;0;0;
52;24;8;0;0;0;0;5;0;1;5;0;0;0;
54;24;9;0;0;0;0;5;0;1;5;0;0;0;
56;24;10;0;0;0;0;5;0;1;5;0;0;0;
58;24;11;0;0;0;0;5;0;1;5;0;0;1;
SHEET;452
PROCR;550;CLOSE I/P FILE
0;81;550;0;0;0;0;
1;41;A2;0;0;0;1;
2;82;550;0;0;0;0;
SHEET;453
PROCR;551;CONVERT TO DEC
0;81;551;0;0;0;0;
1;5;550;0;0;0;0;
2;60;;0;0;0;0;
3;124;547;20;0;2;0;
4;112;550;0;0;0;0;
5;82;551;0;0;0;0;
SHEET;454
PROCR;552;O/PgA9
0;81;552;0;0;0;0;
1;10;;0;0;0;800000;
2;34;999;12;0;0;0;SEC 10
3;125;;4096;1;1;0;
4;1;999;7;0;0;0;D1/A9
5;124;999;0;0;3;0;
6;123;;160;0;2;0;
7;82;552;0;0;0;0;
SHEET;455
PROCR;553;
0;81;553;0;0;0;0;
1;;546;52;1;1;0;
2;5;5;6;1;0;0;
3;;546;54;1;1;0;
4;5;5;8;1;0;0;
5;80;540;0;0;0;0;PRINT
6;82;553;0;0;0;0;
SHEET;456
PROCR;554;EDIT NUMBER OF REPORTS
0;81;554;0;0;0;0;
1;5;546;44;0;0;0;
2;52;5;12;0;0;0;
3;C;549;34;0;0;0;
4;82;554;0;0;0;0;
SHEET;457
PROCR;555;PASS 6=REMAINDER OF PTS
0;80;550;0;0;0;0;
1;80;548;0;0;0;0;SET TAG 15 S/R
2;90;;0;0;1;0;
3;C;;0;0;0;10;
4;10;;0;0;0;.;
5;124;999;5;0;3;0;
6;124;;67;0;3;0;
7;123;;0;1;0;0;SET TAG 15g14
8;10;;0;0;0;2;
9;4;999;5;0;0;0;
10;94;555;4;0;1;1;
11;10;;0;0;0;.;
12;124;999;5;0;3;0;
13;123;;106;1;0;0;126 OF SP CHAP
14;152;100;0;0;0;0;
15;C;559;0;0;0;0;
16;76;559;0;0;0;0;
17;152;101;0;0;0;0;DUMMY
18;C;558;0;0;0;0;
SHEET;458
PROCR;556;WRITE8gA2
0;81;556;0;0;0;0;
1;10;;0;0;0;7.0000007.;
2;5;8;52;1;0;0;
3;43;A2;0;0;0;0;
4;C;8;0;0;0;0;
5;54;8;4;1;0;50;
6;82;556;0;0;0;0;
SHEET;459
PROCR;557;
SHEET;460
PROCR;558;
SHEET;461
PROCR;559;INITIAL ENTRY:FIND TW
0;62;;0;0;0;0;
1;125;;4096;1;1;0;SET NON-INT
2;123;559;3;0;2;0;
3;123;559;3;0;2;0;SET KEY 14
4;123;999;0;0;3;0;
5;101;;1;1;2;0;
6;71;562;4;0;0;0;gYES
7;126;;10;1;0;0;TEST TW ON 1/2
8;76;559;14;0;0;0;gNO
9;76;559;12;0;0;0;gYES
10;76;559;12;0;0;0;gYES
11;76;559;12;0;0;0;gYES
12;10;;0;0;0;t;
13;76;559;61;0;0;0;g
14;126;;11;1;0;0;TEST TW ON 1/3
15;76;559;21;0;0;0;gNO
16;76;559;19;0;0;0;gYES
17;76;559;19;0;0;0;gYES
18;76;559;19;0;0;0;gYES
19;10;;0;0;0;e;
20;76;559;61;0;0;0;g
21;126;;18;1;0;0;TEST TW ON 2/2
22;GO;559;28;0;0;0;gNO
23;GO;559;26;0;0;0;gYES
24;GO;559;26;0;0;0;gYES
25;GO;559;26;0;0;0;gYES
26;10;;0;0;0;12;
27;GO;559;61;0;0;0;gYES
28;126;;34;1;0;0;TEST TW ON 4/2
29;76;559;35;0;0;0;gNO
30;76;559;33;0;0;0;gYES
31;76;559;33;0;0;0;gYES
32;76;559;33;0;0;0;gYES
33;10;;0;0;0;22;
34;76;559;61;0;0;0;gYES
35;126;;42;1;0;0;TEST TW ON 5/2
36;76;559;42;0;0;0;gNO
37;76;559;40;0;0;0;gYES
38;76;559;40;0;0;0;gYES
39;76;559;40;0;0;0;gYES
40;10;;0;0;0;2t;
41;76;559;61;0;0;0;gYES
42;126;;50;1;0;0;TEST TW ON 6/2
43;76;559;49;0;0;0;gNO
44;76;559;47;0;0;0;gYES
45;76;559;47;0;0;0;gYES
46;76;559;47;0;0;0;gYES
47;10;;0;0;0;32;
48;76;559;61;0;0;0;gYES
49;126;;58;1;0;0;TEST TW ON 7/2
50;GO;562;2;0;0;0;gNO
51;GO;559;54;0;0;0;
52;GO;559;54;0;0;0;
53;GO;559;54;0;0;0;
54;126;;63;1;0;0;
55;GO;559;60;0;0;0;gYES
56;GO;562;2;0;0;0;gNO
57;GO;562;2;0;0;0;gNO
58;GO;562;2;0;0;0;gNO
59;GO;562;2;0;0;0;gNO
60;10;;0;0;0;3t;
61;5;559;1;0;0;0;STORE TW ROUTE
SHEET;462
PROCR;560;INITIAL ENTRY:OVERLAY
0;;562;1;0;0;0;
1;124;999;0;0;3;0;STORE START OF IPS IN SP CH
2;101;91;1030;1;2;0;
3;124;999;0;0;3;0;
4;124;;3;0;3;0;
5;103;;22;0;0;0;
6;103;999;3;0;0;0;IN 15 BIT PARAMETER FORM
7;101;701;0;1;1;0;
8;5;559;0;0;0;0;FORM ENTRY LINK
9;124;999;3;0;1;0;
10;101;;0;1;3;0;
11;102;999;4;0;0;0;IN 13 BIT PARAMETER FORM
12;124;999;0;0;2;0;
13;11;;0;0;0;1600000;
14;124;999;3;0;3;0;
15;128;;0;0;0;0;
16;152;101;0;0;0;0;
17;C;564;0;0;0;0;
SHEET;463
PROCR;561;INITIAL ENTRY:ENTER IPS
0;125;;4096;1;1;0;SET NON-INT
1;123;561;2;0;2;0;SET KEY 14
2;100;;0;0;0;0;
3;124;999;0;0;3;0;
4;124;;2;0;3;0;TEST MASTER STILL TYPING
5;124;;6;0;3;0;
6;106;;2;0;0;0;
7;105;561;20;0;0;0;
8;104;559;1;0;0;0;
9;127;561;18;0;0;0;gYES
10;101;;248;1;3;0;
11;118;;4118;1;0;0;p8 IN B
12;124;999;5;0;3;0;
13;124;;32;0;3;0;
14;115;;24;0;0;0;COLLATE OUT TAPE ROUTE
15;118;;4118;1;0;0;AND SHIFT INTO B
16;106;559;1;0;0;0;TWRT
17;82;559;0;0;0;0;g
18;125;;4096;1;0;0;
19;GO;561;0;0;0;0;g
20;126;;0;1;0;0;
SHEET;464
PROCR;562;INITIAL ENTRY:TW CLOSED
0;100;;4096;0;1;0;MIDDLE OF DIV 1
1;100;;8190;0;1;0;END OF DIV 1
2;154;563;0;0;0;0;
3;GO;559;0;0;0;0;g
4;154;563;8;0;0;0;
5;151;;0;0;0;0;
SHEET;465
CONST;563;1;
0;(D)6p(A)TYPE;TW CLOSED
2;(A)WRITE;
4;R CLO;
6;(A)SED(D)5.5.;
8;(D)6p(A)DO N;
10;(A)OT TI;
12;MESHA;
14;RE 09;
16;(A)000(D)5.5.;
SHEET;466
CONST;564;0;FUTURE INSTALLATION
0;(D);TYPEWRITER
1;0;CONTROL DATA
2;0;MODS
3;0;STORE SIZE
4;0;CLOCK
5;0;TIMER
6;0;LOCKOUT
7;0;FIRST MT ROUTE
8;0;SECOND STORE SIZE
SHEET;467
CONST;565;0;PRESENT INSTALLATION
0;(D);TYPEWRITER
1;18;CONTROL DATA
2;19;MODS
3;0;STORE SIZE
4;0;CLOCK
5;0;TIMER
6;0;LOCKOUT
7;0;FIRST MT ROUTE
8;0;SECOND STORE SIZE
9;0;TAPE START ROUTE
10;0;S/F INDICATOR
11;0;END INDICATOR
SHEET;468
CONST;566;1;SIPS:MISCELLANEA
0;(D);BLOCK COUNTER
2;66666;BIN&DEC
4;.000;DIV 0
6;400000000;2 DIV/0
8;0;LOAD CHAPT 1(MASTER)
10;2000;LOAD CHAPT 2(ISU)
12;3+0000000;LOAD IPS
SHEET;469
PROCR;567;SIPS:INSTRUCTION CONSTANTS
0;100;91;325;0;1;0;BULK COPY
1;100;;704;0;0;0;
2;100;91;5;0;1;0;BULK COPY
3;100;;1024;0;0;0;
4;114;91;0;0;1;0;ASL
5;102;;1;0;0;0;BULK CLEAR
6;126;;30;0;1;0;INTERRUPTION
SHEET;470
PROCR;568;SET KEY 15 SR
0;100;;0;0;0;0;
1;125;;4096;1;1;0;SET NON-INT
2;124;568;4;0;2;0;
3;102;;30;0;1;0;
4;126;568;5;0;3;0;SET KEY 15
5;115;568;6;0;1;0;
6;125;;4096;1;1;0;SET NON-INT
7;126;568;0;0;1;0;
SHEET;471
PROCR;569;STEP BLOCK COUNTER SR
0;81;569;0;0;0;0;
1;100;566;2;0;3;0;
2;101;;3;0;1;0;
3;101;;1;1;3;0;
4;115;566;1;1;0;0;
5;100;566;3;0;3;0;
6;114;999;3;1;0;0;
7;101;;15;0;1;0;
8;106;999;2;1;0;0;
9;114;566;0;1;0;0;
10;82;569;0;0;0;0;
SHEET;472
PROCR;570;SIPS:READ&TEST ROUTE SR
0;100;;0;0;0;0;
1;124;565;9;0;3;0;
2;119;;0;0;1;0;READ
3;80;569;0;0;0;0;gSTEP BLOCK COUNTER
4;124;565;9;0;3;0;
5;126;;0;1;0;0;;TEST ROUTE
6;100;;259;0;0;0;HALT 103;C
7;124;570;4;1;0;0;g;E
8;124;570;16;1;0;0;gHALT 105;D
9;124;570;10;1;0;0;;W
10;124;565;9;0;3;0;;A
11;124;;64;0;3;0;
12;106;;1;1;0;0;TEST CORRECT BLOCK
13;105;566;1;1;0;0;
14;71;570;21;0;0;0;gNO:HALT 10.
15;82;570;0;0;0;0;
16;100;;261;0;0;0;
17;124;565;9;0;3;0;
18;119;;0;1;2;0;UNLOAD MT
19;100;;261;0;0;0;
20;124;570;19;1;0;0;
21;100;;270;0;0;0;
22;124;565;9;0;3;0;
23;119;;0;1;2;0;UNLOAD MT
24;100;;270;0;0;0;
25;124;570;24;1;0;0;
SHEET;473
PROCR;571;SIPS:INITIAL SR
0;100;;0;0;0;0;
1;125;;8191;1;1;0;CLEAR I1-I13
2;125;;127;1;0;0;SET I1-7
3;100;566;3;0;3;0;BINARY
4;124;566;3;1;1;0;MGO
5;126;566;4;1;1;0;MR1 FOR DIVO
6;106;567;6;0;0;0;
7;102;;9;0;1;0;SET UP (9)
8;80;568;0;0;0;0;gSET KEY 15
SHEET;474
PROCR;572;SIPS=STACK TAGS SR
0;126;566;6;1;2;0;SET MR2 AT 2 DIVS/0
1;106;566;4;0;0;0;
2;107;;4;0;1;0;
3;107;;5;0;1;0;
4;101;;14;1;3;0;STACK TAG 14 IN DIVS 0&1
5;123;;0;1;2;0;
6;125;;2;0;2;0;
7;124;572;5;1;0;0;
8;125;;0;1;2;0;TEST LEO 326
9;102;;1;0;1;0;
10;106;567;4;1;0;0;
11;128;999;0;0;0;0;
12;106;;1;0;1;0;
13;103;565;10;0;0;0;
14;127;572;18;0;0;0;gYES
15;125;;0;1;2;0;STACK TAG 0 IN 0&32 OF DIV 0
16;123;;0;1;1;0;
17;123;;32;1;1;0;
18;101;;15;1;3;0;STACK TAG 15 IN ANNEXE LIMIT WORD
19;123;91;1030;1;0;0;
20;123;;140;1;1;0;STACK TAG 15 IN 140-153 IN DIV 0
21;123;;142;1;1;0;
22;123;;144;1;1;0;
23;123;;146;1;1;0;
24;123;;148;1;1;0;
25;123;;150;1;1;0;
26;123;;152;1;1;0;
27;82;571;0;0;0;0;
SHEET;475
PROCR;573;SIPS:LOAD STORE SR
0;100;577;0;0;1;0;
1;80;570;0;0;0;0;gREAD & TEST ROUTE
2;106;567;2;1;0;0;
3;124;566;3;0;3;0;COPY NEXT 512
4;124;;4;0;3;0;
5;128;;0;1;0;0;
6;106;;129;0;1;0;RESTORE MT CHANNEL
7;102;565;9;0;0;0;
8;125;;512;0;2;0;TEST END
9;76;573;1;0;0;0;gNO
10;82;573;0;0;0;0;
SHEET;476
PROCR;574;SIPS:ENTRY FROM PIPS
0;126;571;0;0;0;0;gINITIAL SR
1;106;;129;0;1;0;STORE MT CHANNEL
2;102;565;9;0;0;0;
3;106;564;8;0;0;0;STORE STORE SIZE
4;118;;4127;0;0;0;
5;104;564;3;0;0;0;
6;102;;153;0;1;0;
7;101;;3;0;1;0;SET UP RT NO IN ISP
8;106;564;1;0;0;0;
9;114;;144;0;1;0;
10;114;;145;0;1;0;
11;101;;64;1;1;0;
12;114;;143;0;1;0;
SHEET;477
PROCR;575;SISP:PREPARE TO READ
0;124;565;9;0;3;0;SET UP BLOCK COUNTER
1;124;;64;0;3;0;
2;106;;0;1;0;0;
3;102;566;0;1;0;0;
4;106;567;4;0;0;0;SET UP ASL
5;124;565;9;0;3;0;
6;102;;64;0;0;0;
7;126;566;8;1;2;0;SET MR2 FOR CHAPT 1
SHEET;478
PROCR;576;SIPS:LOAD STORE
0;126;570;0;0;0;0;gREAD&TEST ROUTE
1;106;567;0;1;0;0;
2;124;566;3;0;3;0;
3;128;;160;1;0;0;COPY TO 160-511
4;125;;512;0;2;0;
5;106;567;4;0;0;0;RESET ASL
6;124;565;9;0;3;0;
7;102;;64;0;0;0;
8;80;573;0;0;0;0;gLOAD STORE
9;126;566;10;1;2;0;SET MR2 FROM CHAPT 2
10;80;573;0;0;0;0;gLOAD STORE
11;126;566;12;1;2;0;SET MRZ FOR IPS
12;80;573;0;0;0;0;gLOAD STORE
SHEET;479
PROCR;577;SIPS-:RESTORE STORE
0;106;723;0;1;0;0;COPY INSTALLATION DETAILS TABLE
1;128;565;0;0;0;0;
2;106;722;0;1;0;0;SET ALL SWITCHES AT 0
3;128;703;0;0;0;0;
4;102;;1;0;1;0;TEST LEO 326/360
5;106;567;4;1;0;0;
6;128;999;0;0;0;0;
7;106;;1;0;1;0;
8;103;565;10;0;0;0;
9;70;577;14;0;0;0;gYES
10;106;706;4;0;0;0;SET UP COUNTING CONSTANTS
11;102;706;1;0;0;0;
12;106;706;6;0;0;0;
13;76;577;17;0;0;0;
14;106;706;5;0;0;0;
15;102;706;1;0;0;0;
16;106;706;7;0;0;0;
17;102;706;3;0;0;0;
SHEET;480
PROCR;578;SIPS-:SET UP TYPEWRITER ROUTE
0;125;;4095;1;2;0;TEST TW ROUTE TO BE CHANGED
1;101;;3072;1;2;0;
2;127;578;11;0;1;0;gNO
3;125;;4095;1;1;0;CLEAR I1-12
4;125;;4095;1;2;0;TEST TW ROUTE STACKED
5;127;578;4;0;0;0;gNO
6;125;;4032;1;2;0;
7;127;578;3;0;1;0;gNO
8;125;;63;1;2;0;STORE NEW TW ROUTE
9;103;564;0;0;0;0;
10;102;565;0;0;0;0;
11;125;;4032;1;1;0;CLEAR I7-12
12;125;;127;1;0;0;SET I1-7
13;106;565;0;0;0;0;
14;101;;46;1;2;0;SET ST1=1 FOR PT OP AS TW
15;127;578;21;0;2;0;SET POS FOR G P ASS
16;101;;32;1;1;0;SET NEG FOR PT ASS
17;127;578;20;0;2;0;
18;101;;1;1;3;0;
19;124;578;21;1;0;0;
20;101;;38;1;2;0;
21;102;703;18;0;0;0;OR ST1=2 FOR CP AS TW
22;106;702;0;0;0;0;
23;124;565;0;0;3;0;SET UP TW ASL
24;102;;64;0;0;0;
25;102;;154;1;1;0;CLEAR TW ANNEXE
26;106;702;3;0;0;0;SET UP TW ASL
27;103;;1;0;1;0;RETURN LINKS
28;103;;17;0;1;0;
29;102;;25;0;1;0;
30;124;699;4;0;2;0;
31;102;;31;0;1;0;
32;106;703;19;0;0;0;;SWITCH SX1
33;70;579;0;0;0;0;gNORMAL;0
34;80;648;0;0;0;0;gUNLOAD TAPE START;1
35;76;586;24;0;0;0;gINITIAL ENTRY
SHEET;481
PROCR;579;CHECK INTERRUPTION
0;106;703;5;0;0;0;TEST LOG FREE;SWITCH SL1
1;70;579;3;0;0;0;gYES;0
2;80;681;0;0;0;0;gLOG;1
3;106;702;9;0;0;0;RETURN LINK
4;102;;30;0;1;0;
5;125;;4096;1;0;0;SET INT
6;106;703;18;0;0;0;;SWITCH ST1
7;71;579;10;0;0;0;;1
8;106;716;18;1;0;0;;2
9;76;579;11;0;0;0;
10;106;716;16;1;0;0;
11;102;;154;1;1;0;
12;124;565;0;0;3;0;
13;119;;0;0;0;0;
14;126;566;6;1;3;0;
15;125;;1;0;3;0;
16;76;579;15;0;0;0;
17;80;676;0;0;0;0;gREQ TW
18;124;713;34;0;2;0;
19;80;688;0;0;0;0;gCOPY COMMENT
20;76;579;2;0;0;0;g
21;80;568;0;0;0;0;gSET KEY I5
22;80;677;0;0;0;0;gREQ TW
23;106;716;14;1;0;0;
24;124;718;0;0;3;0;
25;102;;0;1;0;0;
SHEET;482
PROCR;580;CHECK CLOCK
0;106;565;4;0;0;0;TEST MC HAS CLOCK
1;70;580;12;0;0;0;gNO
2;80;694;0;0;0;0;gARRANGE TO TYPE SHORTLY
3;106;;156;0;1;0;TEST CLOCK ON
4;71;580;10;0;0;0;gYES
5;126;695;0;0;0;0;gTEST TIME TO TYPE
6;124;580;3;1;0;0;g
7;124;713;10;0;2;0;
8;126;688;0;0;0;0;gCOPY COMMENT
9;124;580;5;1;0;0;g
10;106;724;10;1;0;0;
11;76;580;13;0;0;0;
12;106;724;12;1;0;0;
13;103;724;0;1;0;0;AMEND EDIT TIME TABLES
14;102;724;6;1;0;0;
SHEET;483
PROCR;581;CHECK TIMER
0;106;565;5;0;0;0;TEST MC HAS TIMER
1;127;582;0;0;0;0;gNO
2;126;693;0;0;0;0;gARRANGE TO TYPE
3;106;;157;0;1;0;TEST TIMER ON
4;127;582;0;0;1;0;gYES
5;126;695;0;0;0;0;gTEST TIME TO TYPE
6;124;581;3;1;0;0;g
7;124;715;18;0;2;0;
8;126;688;0;0;0;0;gCOPY COMMENT
9;124;581;5;1;0;0;g
SHEET;484
PROCR;582;CHECK UNASSIGNED ACTION
0;106;565;10;0;0;0;TEST 326
1;71;583;0;0;0;0;gNO
2;80;693;0;0;0;0;gARRANGE TO TYPE
3;124;582;11;0;2;0;RETURN LINK
4;102;;31;0;1;0;
5;100;566;3;0;1;0;TEST UA WORKING
6;126;695;0;0;0;0;NOgTEST TIME TO TYPE
7;124;582;5;1;0;0;g
8;124;715;24;0;2;0;
9;126;688;0;0;0;0;gCOPY COMMENT
10;124;582;6;1;0;0;g
11;126;568;0;0;0;0;gSET KEY 15
SHEET;485
PROCR;583;CHECK LOCKOUT
0;106;565;6;0;0;0;TEST MC HAS LOCKOUT
1;127;584;0;0;0;0;gNO
2;126;693;0;0;0;0;gARRANGE TO TYPE
3;124;583;14;0;2;0;RETURN LINK
4;102;;31;0;1;0;
5;102;;6;1;1;0;
6;126;583;7;0;2;0;SET KEY 14
7;100;;0;0;0;0;
8;115;91;1031;1;3;0;TEST LOCKOUT ON
9;80;695;0;0;0;0;NOgTEST TIME TO TYPE
10;76;583;6;0;0;0;gNO
11;124;714;16;0;2;0;
12;126;688;0;0;0;0;gCOPY COMMENT
13;124;583;9;1;0;0;g
14;126;568;0;0;0;0;gSET KEY 15
SHEET;486
PROCR;584;CHECK OVERFLOW
0;126;693;0;0;0;0;gARRANGE TO TYPE
1;124;584;11;0;2;0;RETURN LINK
2;102;;31;0;1;0;
3;100;708;0;0;3;0;SET UNARY
4;101;;1;1;1;0;TEST OVERFLOW
5;62;;0;0;0;0;
6;80;695;0;0;0;0;gTEST TIME TO TYPE
7;76;584;1;0;0;0;gNO
8;124;715;0;0;2;0;
9;126;688;0;0;0;0;gCOPY COMMENT
10;124;584;6;1;0;0;g
11;62;;0;0;0;0;
12;126;568;0;0;0;0;gSET KEY 15
13;124;699;4;0;2;0;
14;102;;31;0;1;0;
SHEET;487
PROCR;585;ALARM 77 (1)
0;125;;2047;1;1;0;CLEAR I1-11
1;125;;128;1;0;0;SET I8
2;126;675;0;0;0;0;gREQ TW
3;102;;156;1;1;0;
4;124;716;10;0;2;0;;*77
5;126;688;0;0;0;0;gCOPY COMMENT
6;124;726;0;0;2;0;
7;124;718;0;0;3;0;EDIT RESET
8;128;;4;1;2;0;
SHEET;488
PROCR;586;ALARM 77 (2)
0;125;;15;1;2;0;TEST OPTION STACKED
1;127;586;3;0;1;0;gYES
2;126;681;0;0;0;0;gLOG
3;103;587;6;0;0;0;
4;103;587;16;0;0;0;
5;118;;1;0;0;0;
6;103;714;49;0;0;0;SET UP 'OPT'
7;103;714;53;0;0;0;& 'OREJ'
8;125;;1919;1;2;0;
9;125;;2047;1;1;0;CLEAR I1-11
10;101;;5;1;2;0;TEST OPTION IN RANGE
11;127;587;0;0;3;0;gYES
12;101;;11;1;2;0;
13;127;586;19;0;2;0;gREJECT
14;101;;2;1;1;0;
15;127;587;0;0;2;0;gOPT14,15
16;101;;5;1;3;0;
17;102;587;6;0;0;0;
18;124;587;0;1;0;0;
19;125;;128;1;0;0;SET I8
20;126;676;0;0;0;0;gREQ TW
21;124;714;50;0;2;0;;0 REJ
22;126;688;0;0;0;0;g
23;124;586;2;1;0;0;
24;101;;1;1;3;0;
25;102;703;2;0;0;0;
26;125;;127;1;0;0;
27;76;588;0;0;0;0;SET UP ASL'S
SHEET;489
PROCR;587;ALARM 77 (3)
0;126;675;0;0;0;0;gREQ TW
1;124;714;46;0;2;0;;OPT
2;126;688;0;0;0;0;gCOPY COMMENT
3;125;;0;1;2;0;
4;124;587;6;0;1;0;
5;124;587;6;1;0;0;
6;100;;0;0;0;0;
7;76;625;0;0;0;0;gOP 1
8;76;586;26;0;0;0;gOPT 2
9;76;625;1;0;0;0;gOP 3
10;76;586;24;0;0;0;gOPT 4
11;106;587;16;0;0;0;
12;101;;4;1;2;0;MACHINE NUMBER
13;102;;180;0;1;0;
14;76;585;0;0;0;0;gREOFFER OPTIONS
15;100;;0;0;0;0;
16;100;;0;0;0;0;
17;101;;492;1;3;0;
18;107;;19;0;0;0;
19;124;;0;1;0;0;
20;124;625;0;0;2;0;OPT 14
21;127;587;23;0;1;0;OPT 15
22;124;586;26;0;2;0;
23;100;587;26;0;2;0;
24;114;587;19;0;0;0;PACK IN ADDRESS
25;76;587;17;0;0;0;
26;100;;8191;0;0;0;
SHEET;490
PROCR;588;SET UP ASLS
0;106;565;9;0;0;0;SET UP MT ROUTES
1;101;;1;1;1;0;
2;103;704;3;0;0;0;
3;101;;1;1;1;0;
4;103;704;4;0;0;0;
5;101;;1;1;1;0;
6;102;704;5;0;0;0;
7;106;567;4;0;0;0;SET UP ASLS
8;124;704;3;0;3;0;
9;103;;64;0;0;0;
10;124;704;4;0;3;0;
11;103;;64;0;0;0;
12;124;704;5;0;3;0;
13;103;;64;0;0;0;
14;124;565;1;0;3;0;
15;103;;64;0;0;0;
16;124;565;2;0;3;0;
17;102;;64;0;0;0;
SHEET;491
PROCR;589;CD:DETERMINE TYPE
0;106;565;1;0;0;0;SET UP CD RT
1;80;643;0;0;0;0;
2;102;91;0;1;0;0;
3;126;644;0;0;0;0;gTEST ROUTE
4;125;;0;1;0;0;IDB
5;126;651;0;0;0;0;gREAD CD
6;106;703;19;0;0;0;;SWITCH SX1
7;71;589;11;0;0;0;g>>>>>;1
8;106;91;0;1;0;0;TEST %%%%%
9;105;716;34;1;0;0;
10;127;593;0;0;0;0;gYES
11;106;91;0;1;0;0;TEST >>>>>
12;105;716;12;1;0;0;
13;127;590;0;0;0;0;gYES
14;80;642;0;0;0;0;gREMOVE NES&BES
15;106;91;0;1;0;0;
16;102;714;40;1;0;0;
17;124;714;40;0;2;0;;NOT CD
18;126;688;0;0;0;0;gCOPY COMMENT
19;80;650;0;0;0;0;gSET ROUTE TO MANUAL
20;76;589;3;0;0;0;g
SHEET;492
PROCR;590;CD:CHANGE INSTALLATION DETAILS(1)
0;102;703;19;0;0;0;SET SX1 AT 0
1;106;722;2;1;0;0;CLEAR
2;128;710;0;0;0;0;
3;124;725;0;0;2;0;UNPACK
4;128;91;0;0;3;0;
5;126;705;0;1;2;0;SET MR2 AT 3/0
6;125;;0;1;2;0;
7;100;709;0;0;2;0;
8;115;710;0;0;2;0;TEST RT IN BINARY
9;127;592;0;0;1;0;gNO:REJECT
10;124;711;14;0;2;0;
11;112;710;0;0;2;0;CONVERT RT OCTgBIN
12;102;564;0;0;2;0;
13;125;;1;0;2;0;STEP MR2
14;124;590;7;1;0;0;
15;106;710;3;0;0;0;TEST NO OF DIVS REASONABLE
16;127;592;0;0;0;0;gNO
17;101;;9;1;2;0;
18;127;592;0;0;2;0;gNO
19;106;710;8;0;0;0;TEST SECOND STORE
20;70;590;26;0;0;0;gNO
21;101;;5;1;2;0;TEST NO OF DIVS REASONABLE
22;72;592;0;0;0;0;gNO
23;106;710;3;0;0;0;
24;101;;5;1;2;0;
25;72;592;0;0;0;0;gNO
26;106;710;3;0;0;0;CONVERT NO OF DIVS
27;118;;3;0;0;0;
28;118;;1;0;3;0;
29;102;564;3;0;0;0;
30;106;710;8;0;0;0;CONVERT NO OF 2ND STORE DIVS
31;118;;3;0;0;0;
32;118;;1;0;3;0;
33;102;564;8;0;0;0;
SHEET;493
PROCR;591;CD:CHANGE INSTALLATION DETAILS(2)
0;126;705;2;1;2;0;SET MR2 AT 4/0
1;106;710;4;0;2;0;STORE THE REST
2;127;591;4;0;0;0;
3;101;;1;1;3;0;
4;102;564;4;0;2;0;
5;125;;1;0;2;0;
6;124;591;1;1;0;0;
7;126;675;0;0;0;0;gREQ TW
8;124;728;0;0;2;0;;>>>>>
9;124;718;0;0;3;0;
10;128;;2;1;2;0;
11;124;589;19;1;0;0;g
SHEET;494
PROCR;592;CD:REJ
0;126;675;0;0;0;0;gREQ TW
1;106;709;4;0;2;0;SET UP T C M OR S
2;102;713;6;0;0;0;
3;124;713;4;0;2;0;;CD REJ
4;103;703;19;0;0;0;SET SX1 AT 1
5;76;589;18;0;0;0;g
SHEET;495
PROCR;593;CD:FIRST TWO BLOCKS
0;106;91;3;1;0;0;gTEST DATE REASONABLE
1;126;689;0;0;0;0;gNO
2;124;589;19;1;0;0;gREAD CD
3;126;651;0;0;0;0;
4;106;91;4;1;0;0;
5;118;;4120;0;0;0;
6;101;;126;1;2;0;
7;71;593;9;0;0;0;
8;102;91;4;1;0;0;
9;106;91;1;1;0;0;TEST CORR PROGM
10;70;593;21;0;0;0;gNO
11;105;704;0;0;0;0;
12;71;593;19;0;0;0;gNO
13;106;91;3;1;0;0;TESTS CORR SERIAL
14;105;704;1;0;0;0;
15;71;593;19;0;0;0;gNO
16;106;91;5;1;0;0;TEST CORR INTERIM
17;105;704;2;0;0;0;
18;127;594;0;0;0;0;gYES
19;106;91;5;1;0;0;TEST ZERO INTERIM
20;70;593;28;0;0;0;gYES
21;80;675;0;0;0;0;gREQ TW
22;124;715;8;0;2;0;;PROG REJ
23;80;688;0;0;0;0;gCOPY COMMENT
24;124;726;8;0;2;0;
25;124;718;0;0;3;0;
26;128;;6;1;2;0;EDIT REST
27;76;589;19;0;0;0;g
28;101;;1;1;3;0;
29;102;703;4;0;0;0;SET S11 AT 1
30;106;723;4;1;0;0;
31;128;704;0;1;0;0;
SHEET;496
PROCR;594;CD:THIRD BLOCK
0;126;651;0;0;0;0;gREAD CD
1;106;723;2;1;0;0;
2;128;703;11;1;0;0;SET SM1 AT 0 OR 1
3;126;705;4;1;2;0;SET MR2 AT 5/0
4;106;703;11;0;2;0;
5;105;709;1;0;0;0;
6;70;594;10;0;0;0;g
7;125;;1;0;2;0;
8;76;594;4;0;0;0;g
9;76;595;0;0;0;0;
10;103;703;11;0;2;0;
11;125;;1;0;2;0;
12;76;594;10;0;0;0;g
SHEET;497
PROCR;595;CD:LAST TWO BLOCKS
0;80;651;0;0;0;0;gREAD CD
1;106;91;0;1;0;0;TEST'TOTAL'
2;105;716;36;1;0;0;
3;127;595;8;0;0;0;gYES
4;106;91;1;1;0;0;
5;102;703;0;0;0;0;SET SC1 & SC2
6;106;91;3;1;0;0;
7;124;595;13;1;0;0;g
8;101;;1;1;3;0;
9;102;703;3;0;0;0;SET SC4 AT 1
10;106;91;3;1;0;0;
11;102;703;0;0;0;0;SET SC1 & SC2
12;106;91;5;1;0;0;
13;103;703;1;0;0;0;
14;105;709;1;0;0;0;
15;127;595;17;0;1;0;REMOVE BLOCK END
16;102;703;1;0;0;0;
17;106;703;0;0;0;0;
18;105;709;1;0;0;0;
19;71;595;21;0;0;0;
20;102;703;0;1;0;0;
21;80;651;0;0;0;0;gREAD CD
22;106;716;21;0;0;0;
23;102;91;3;0;0;0;
24;124;725;4;0;2;0;SET END INDICATOR
25;128;91;0;0;3;0;
26;80;650;0;0;0;0;gSET ROUTE TO MANUAL
27;106;703;2;1;0;0;;SWITCHES SC3 & SC4
28;127;596;0;0;1;0;gDONT UNLOAD;1
29;126;648;0;0;0;0;gUNLOAD TAPE START;0
SHEET;498
PROCR;596;IC: OPEN FILE
0;106;703;4;0;0;0;;SWITCH SI1
1;127;605;0;0;0;0;gDONT UNLOAD IC;0
2;106;704;3;0;0;0;SET UP RT NO;1
3;80;643;0;0;0;0;
4;106;;175;0;1;0;STORE 5 FIGURE DATE
5;102;710;13;0;0;0;
6;126;652;0;0;0;0;gOPEN FILE
7;106;91;7;1;0;0;SPOOL NO
8;102;91;1003;0;0;0;
9;126;655;0;0;0;0;gREAD MT
10;106;91;15;1;0;0;
11;103;710;1;0;0;0;
12;118;;4126;0;0;0;
13;101;;128;1;2;0;
14;127;596;19;0;1;0;gNO
15;106;91;6;1;0;0;
16;118;;4126;0;0;0;
17;101;;81;1;2;0;
18;70;596;25;0;0;0;gYES
19;80;675;0;0;0;0;gREQ TW
20;124;729;0;0;2;0;;HDG
21;124;718;0;0;3;0;
22;128;;2;1;2;0;EDIT COMMENT
23;126;649;0;0;0;0;gUNLOAD
24;124;596;6;1;0;0;g
25;80;673;0;0;0;0;gLIPHIP
SHEET;499
PROCR;597;IC:SEARCH INDEX
0;126;655;0;0;0;0;gREAD MT
1;106;91;6;1;0;0;
2;105;716;38;1;0;0;
3;127;597;0;0;1;0;gNO
4;126;655;0;0;0;0;gREAD MT
5;126;705;8;1;2;0;SET MR2 AT 48/0
6;106;91;5;1;2;0;TEST ppppp
7;105;708;0;0;0;0;
8;127;597;13;0;1;0;gNO
9;126;675;0;0;0;0;gREQ TW
10;124;715;12;0;2;0;;TAPE REJ
11;126;688;0;0;0;0;gCOPY COMMENT
12;124;596;23;1;0;0;g
13;106;91;5;1;2;0;TEST REQPROGM
14;105;704;0;0;0;0;
15;127;597;21;0;1;0;gNO
16;106;91;7;1;2;0;TEST REQ SERIAL
17;105;704;1;0;0;0;
18;127;597;21;0;1;0;gNO
19;106;91;9;1;2;0;TEST PASS 3
20;127;598;0;0;1;0;gYES
21;125;;8;0;2;0;STEP MR2
22;124;597;6;1;0;0;g
23;124;597;4;1;0;0;gEND OF BLOCK
SHEET;500
PROCR;598;
0;126;655;0;0;0;0;gREAD MT
1;106;91;5;1;0;0;TEST SENT 5 OR 55
2;105;708;0;0;0;0;
3;127;598;8;0;1;0;gNO
4;101;;1;0;1;0;
5;115;91;6;0;0;0;
6;101;;5;1;2;0;
7;127;598;16;0;0;0;gYES
8;106;91;10;1;0;0;TEST'PASSI'
9;105;716;40;1;0;0;
10;71;598;0;0;0;0;gNO
11;80;653;0;0;0;0;gRUNONSTEPON
12;80;654;0;0;0;0;gREAD MT
13;106;91;1;1;0;0;SET UP BLOCK NO
14;102;566;0;0;0;0;
15;76;598;1;0;0;0;g
16;106;91;9;1;0;0;TEST REQ PROGM
17;105;704;0;0;0;0;
18;127;598;11;0;1;0;gNO
19;106;91;11;1;0;0;TEST REQ SERIAL
20;105;704;1;0;0;0;
21;127;598;11;0;1;0;gNO
SHEET;501
PROCR;599;IC:LOCATE CHAPTER DETAILS BLOCK
0;126;655;0;0;0;0;gREAD MT
1;106;91;42;1;0;0;TEST'ALLOC'BLOCK
2;105;716;42;1;0;0;
3;127;600;0;0;0;0;gYES
4;106;91;5;1;0;0;TEST YE OLDE FASHIONED SENTINEL S1XE
5;105;708;0;0;0;0;
6;127;599;0;0;1;0;gNAY
7;106;91;7;1;0;0;
8;101;;6;1;2;0;
9;127;599;0;0;0;0;gNAY
10;126;655;0;0;0;0;gREAD MT
SHEET;502
PROCR;600;IC:STORE CHAPTER DETAILS
0;126;705;2;1;2;0;SET MR2 AT 4/0
1;106;736;50;0;0;0;
2;102;712;3;0;0;0;
3;102;712;4;0;0;0;
4;106;91;25;1;0;0;SET UP CHAP 1 SIZE
5;104;712;1;0;0;0;
6;102;712;6;0;0;0;
7;100;709;14;0;2;0;
8;115;712;6;0;0;0;
9;101;;512;1;1;0;
10;102;566;9;0;0;0;
11;106;712;6;0;0;0;TEST CHAPT 1 IN DIV 1
12;105;736;50;0;0;0;
13;73;601;0;0;0;0;gNO
14;107;712;3;0;0;0;ADJUST PARAMETERS
15;102;712;4;0;0;0;
16;106;566;10;0;0;0;
17;102;566;9;0;0;0;
SHEET;503
PROCR;601;IC:LOCATE CHAPTER START
0;126;655;0;0;0;0;gREAD MT
1;106;91;7;1;0;0;TEST'CHAPT'BLOCK
2;101;;7;1;2;0;
3;127;601;0;0;1;0;gNO
4;106;91;12;1;0;0;
5;105;716;44;1;0;0;
6;127;601;0;0;1;0;gNO
SHEET;504
PROCR;602;IC: STACK INSTRUCTIONS(1)
0;106;712;1;0;2;0;SET UP CHAPTER START
1;102;712;6;0;0;0;
2;126;705;8;1;3;0;SET MR3 AT 48/0
3;126;655;0;0;0;0;gREAD MT
4;106;712;6;0;0;0;
5;101;;160;1;2;0;TEST ADDRESS LESS THAN 160
6;127;604;0;0;3;0;gYES
7;106;565;9;0;0;0;TEST
8;101;;128;1;2;0;CHANNEL 16?
9;127;602;15;0;3;0;gNO
10;106;712;6;0;0;0;
11;101;;192;1;2;0;ASL'S?
12;127;602;15;0;3;0;gNO
13;101;;4;1;2;0;
14;127;604;0;0;3;0;gYES
15;106;91;5;1;3;0;
16;105;709;2;0;0;0;TEST END OF CHAPTER
17;127;604;10;0;0;0;gYES
18;104;709;3;0;0;0;TEST MINUS ZERO
19;127;603;0;0;1;0;gNO
20;106;723;6;1;0;0;STACK MINUS ZERO
21;124;712;6;0;3;0;
22;128;;0;1;0;0;
23;124;604;0;1;0;0;g
SHEET;505
PROCR;603;IC: STACK INSTRUCTIONS (2)
0;101;;1;0;1;0;STORE Q1 OF PARAMETER
1;125;;0;1;2;0;
2;115;91;4;1;3;0;
3;102;91;4;1;3;0;
4;106;91;7;1;3;0;TEST INSTRUCTION NEGATIVE
5;127;603;11;0;3;0;gYES
6;124;566;3;0;3;0;ADD PARAMETER
7;124;;6;0;1;0;
8;124;91;4;0;1;0;
9;104;712;0;0;0;0;
10;124;603;15;1;0;0;g
11;124;566;3;0;3;0;SUBTRACT PARAMETER
12;124;;6;0;1;0;
13;124;91;4;0;1;0;
14;105;712;0;0;0;0;
15;124;712;6;0;3;0;
16;102;;0;0;0;0;STACK INSTRUCTION
SHEET;506
PROCR;604;IC: STACK INSTRUCTIONS (3)
0;123;;1;0;0;0;STEP ADDRESS
1;100;712;6;0;0;0;TEST MASTER TOO LARGE
2;76;604;7;0;0;0;gNO
3;80;675;0;0;0;0;gREQ TW
4;124;714;24;0;2;0;;MTL
5;80;688;0;0;0;0;gCOPY COMMENT
6;76;699;4;0;0;0;gABANDON
7;125;;4;0;3;0;TEST END OF BLOCK(STEP MR3)
8;124;602;4;1;0;0;gNO
9;124;602;2;1;0;0;gYES
10;125;;2;0;2;0;TEST ALL CHAPTERS LOADED(STEP MR2)
11;124;601;0;1;0;0;gNO
12;126;649;0;0;0;0;gUNLOAD
13;106;710;13;0;0;0;RESTORE 5 FIGURE DATE
14;102;;175;0;1;0;
15;100;709;14;0;2;0;SET UP CHAPT 2 SIZE
16;115;712;6;0;0;0;
17;101;;512;1;1;0;
18;102;566;11;0;0;0;
SHEET;507
PROCR;605;COPY: OPEN FILE
0;124;730;14;0;2;0;STORE TAPE NOS FOR COMMENT
1;128;710;14;1;2;0;
2;106;703;0;0;0;0;;SWITCH SC1
3;127;606;0;0;0;0;gDON'T COPY;0
4;106;704;4;0;0;0;SET UP RT NO;1
5;80;643;0;0;0;0;
6;102;703;4;0;0;0;SET SI1 AT 0
7;126;652;0;0;0;0;gOPEN FILE
8;106;91;7;1;0;0;
9;70;605;39;0;0;0;gREJECT ZERO SPOOL
10;103;566;5;0;0;0;
11;105;703;0;0;0;0;TEST SPECIFIED TAPE
12;70;605;49;0;0;0;gYES
13;106;91;7;1;0;0;
14;105;703;1;0;0;0;
15;70;605;47;0;0;0;gYES
16;106;703;0;0;0;0;
17;104;709;16;0;0;0;
18;127;605;22;0;1;0;
19;106;91;7;1;0;0;
20;102;703;0;0;0;0;
21;76;605;27;0;0;0;
22;106;703;1;0;0;0;
23;104;709;16;0;0;0;
24;127;605;39;0;1;0;
25;106;91;7;1;0;0;
26;102;703;1;0;0;0;
27;106;710;15;1;0;0;
28;105;709;16;0;0;0;
29;127;605;33;0;1;0;
30;106;91;6;1;0;0;
31;102;710;14;1;0;0;
32;76;605;8;0;0;0;
33;106;710;17;1;0;0;
34;105;709;16;0;0;0;
35;127;605;8;0;1;0;
36;106;91;6;1;0;0;
37;102;710;16;1;0;0;
38;76;605;8;0;0;0;
39;80;675;0;0;0;0;gREQ TW
40;124;715;30;0;2;0;;WRONG TAPE
41;126;688;0;0;0;0;gCOPY COMMENT
42;124;730;0;0;2;0;
43;124;718;0;0;3;0;
44;128;;6;1;2;0;EDIT REST
45;126;649;0;0;0;0;gUNLOAD
46;124;605;7;1;0;0;
47;106;703;0;0;0;0;
48;102;703;1;0;0;0;
49;80;675;0;0;0;0;gREQ TW
50;155;;0;0;0;0;
51;102;91;1000;1;0;0;
52;124;733;0;0;2;0;;LOP
53;124;718;0;0;3;0;
54;128;;2;1;2;0;EDIT COMMENT
55;80;700;0;0;0;0;gCOUNT 500MS
56;124;707;0;0;3;0;
57;119;;0;1;1;0;REWIND
SHEET;508
PROCR;606;MODS: READ&UNPACK
0;106;703;11;0;0;0;;SWITCH SM1
1;127;619;0;0;0;0;gDON'T MOD;0
2;106;565;2;0;0;0;SET UP RTE;1
3;80;643;0;0;0;0;
4;101;;1;1;3;0;
5;60;;0;0;0;0;
6;107;704;2;0;0;0;AUGMENT INTERIM
7;62;;0;0;0;0;
8;126;705;4;1;2;0;SET MR2 AT 5/0
9;125;;0;1;2;0;
10;102;703;16;0;0;0;SET SM2 AT 0
11;126;644;0;0;0;0;gTEST ROUTE
12;125;;0;1;0;0;IDS
13;124;707;0;0;3;0;
14;119;;0;0;1;0;READ
15;106;722;2;1;0;0;
16;128;710;0;0;0;0;
17;126;644;0;0;0;0;gTEST ROUTE
18;124;610;18;1;0;0;gDB
19;124;725;2;0;2;0;
20;128;91;0;0;3;0;UNPACK
21;106;710;6;1;0;0;TEST BLOCK TOO BIG
22;100;710;8;1;2;0;
23;127;609;0;1;0;0;gNO
24;101;;18;1;3;0;YES: MOD REJ G
SHEET;509
PROCR;607;MODS: REJECTION THEREOF(1)
0;102;714;34;0;0;0;
1;126;675;0;0;0;0;gREQ TW
2;124;714;32;0;2;0;;MOD REJ
3;126;688;0;0;0;0;gCOPY COMMENT
4;126;705;6;1;3;0;SET MR3 AT 8/0
5;101;;1792;0;1;0;
6;115;91;0;1;3;0;
7;115;716;0;1;0;0;TEST FOR BE
8;127;608;2;0;0;0;gYES
9;115;716;4;1;0;0;TEST FOR NE
10;127;607;13;0;1;0;gNO
11;106;716;6;1;0;0;REPLACE BY/
12;114;91;0;1;3;0;
13;125;;0;1;2;0;TEST END OF WORD
14;118;;4126;1;0;0;
15;127;607;6;1;1;0;gNO
16;125;;2;0;3;0;TEST END OF BLOCK
17;124;607;5;1;0;0;gNO
SHEET;510
PROCR;608;MODS: REJECTION THEREOF(2)
0;125;;4098;0;3;0;
1;124;608;4;1;0;0;g
2;106;716;8;1;0;0;REPLACE BY ?
3;114;91;0;1;3;0;
4;106;713;8;1;0;0;SET UP LES
5;102;91;2;1;3;0;
6;106;723;28;1;0;0;COPY MOD
7;124;718;0;0;3;0;
8;128;;8;1;1;0;
9;80;650;0;0;0;0;gSET ROUTE TO MANUAL
10;106;703;16;0;0;0;;SWITCH SM2
11;73;699;4;0;0;0;gABANDON;2,3
12;76;606;9;0;0;0;g;0,1
SHEET;511
PROCR;609;MODS: DETERMINE DIRECTIVE
0;106;710;5;0;0;0;
1;127;612;0;0;0;0;g0
2;101;;152;1;1;0;
3;127;618;0;0;0;0;g-98
4;101;;304;1;2;0;
5;127;611;0;0;0;0;g98
6;101;;1;1;2;0;
7;127;611;0;0;0;0;g99
8;101;;136;1;1;0;
9;127;610;0;0;0;0;g11
10;101;;5149;1;3;0;
11;124;607;0;1;0;0;gMOD REJ D?
SHEET;512
PROCR;610;MODS: 11 DIRECTIVE
0;106;703;16;0;0;0;;SWITCH SM2
1;127;610;4;0;0;0;g;0
2;101;;257;1;3;0;;1,2,3
3;124;607;0;1;0;0;gMOD REJ 11
4;106;710;4;0;0;0;
5;105;703;11;0;2;0;TEST SPECIFIED MOD ID
6;127;610;10;0;1;0;gNO: WRONG
7;101;;1;1;3;0;
8;102;703;16;0;0;0;SET SM2 AT 1
9;124;606;13;1;0;0;gNEXT BLOCK
10;126;675;0;0;0;0;gREQ TW
11;124;715;34;0;2;0;;WRONG MODS
12;126;688;0;0;0;0;gCOPY COMMENT
13;106;703;11;0;2;0;
14;102;710;5;0;0;0;
15;124;731;0;0;2;0;
16;124;718;0;0;3;0;
17;128;;6;1;2;0;EDIT REST
18;80;650;0;0;0;0;gSET ROUTE TO MANUAL
19;76;606;9;0;0;0;gNEXT BLOCK
SHEET;513
PROCR;611;MODS: 98&99 DIRECTIVES
0;106;703;16;0;0;0;;SWITCH SM2
1;127;611;4;0;1;0;g;1,2,3
2;101;;5136;1;3;0;;0
3;124;607;0;1;0;0;gMOD REJ D-
4;106;710;4;0;0;0;TEST ADDRESS NEGATIVE
5;127;611;20;0;3;0;gYES: MOD REJ AD
6;100;566;2;0;3;0;
7;105;710;4;0;0;0;TEST ADDRESS IN DECIMAL
8;100;566;3;0;3;0;
9;127;611;20;0;1;0;gNO: MOD REJ AD
10;124;711;0;0;2;0;CONVERT ADDRESS TO BINARY
11;112;710;4;0;0;0;
12;103;708;3;0;0;0;
13;103;708;5;0;0;0;
14;105;566;7;0;0;0;TEST ADDRESS IN RANGE
15;72;611;20;0;0;0;gNO:MOD REJ AD
16;106;710;5;0;0;0;
17;101;;154;1;2;0;
18;102;703;16;0;0;0;SET SM2 AT 2 OR 3
19;76;606;13;0;0;0;g
20;101;;4372;1;3;0;
21;124;607;0;1;0;0;gNO: MOD REJ AD
SHEET;514
PROCR;612;MODS: CONSTANT
0;106;703;16;0;0;0;;SWITCH SM2
1;127;612;4;0;3;0;
2;101;;48;1;3;0;
3;124;607;0;1;0;0;gMOD REJ 0;0,1
4;101;;1;1;1;0;
5;127;613;0;0;1;0;g;2
6;106;710;0;1;0;0;TEST IF CODED;3
7;100;710;2;1;2;0;AS CONSTANT
8;127;612;11;0;0;0;gYES
9;101;;19;1;3;0;
10;124;607;0;1;0;0;gNO: MOD REJ C
11;106;723;8;1;0;0;
12;124;708;5;0;3;0;STACK CONSTANT
13;128;;0;0;0;0;
14;123;;1;0;0;0;STEP ADDRESS
15;100;708;5;0;0;0;
16;124;606;13;1;0;0;gNEXT BLOCK
SHEET;515
PROCR;613;MODS: INSTRUCTION(1)
0;106;710;0;0;0;0;TEST ACTION NEGATIVE
1;127;613;11;0;3;0;gYES: MOD REJ A
2;100;566;2;0;3;0;
3;105;710;0;0;0;0;TEST ACTION IN DECIMAL
4;100;566;3;0;3;0;
5;127;613;11;0;1;0;gNO MOD REJ A
6;124;711;0;0;2;0;CONVERT ACTION TO BINARY
7;112;710;0;0;0;0;
8;103;710;0;0;0;0;
9;101;;32;1;2;0;TEST ACTION IN RANGE
10;127;614;0;0;3;0;gYES
11;101;;17;1;3;0;
12;124;607;0;1;0;0;gNO MOD REJ A
SHEET;516
PROCR;614;MODS: INSTRUCTION(2)
0;106;710;1;0;0;0;TEST DISCRIMINANT IN RANGE
1;127;614;6;0;0;0;gYES
2;101;;1;1;2;0;
3;127;614;6;0;0;0;gYES
4;101;;20;1;3;0;
5;124;607;0;1;0;0;gNO: MOD REJ D
6;106;710;2;0;0;0;TEST MIDIFIER IN RANGE
7;127;614;10;0;3;0;gNO MOD REJ M
8;101;;4;1;2;0;
9;127;615;0;0;3;0;gYES
10;101;;36;1;3;0;
11;124;607;0;1;0;0;gNO: MOD REJ M
SHEET;517
PROCR;615;MODS: INSTRUCTION(3)
0;106;710;4;0;0;0;TEST ITEM NEGATIVE
1;127;615;6;0;3;0;gYES: MOD REJ I
2;60;;0;0;0;0;
3;105;710;4;0;0;0;TEST ADDRESS IN DECIMAL
4;62;;0;0;0;0;
5;127;615;8;0;0;0;gYES
6;101;;25;1;3;0;
7;124;607;0;1;0;0;gNO: MOD REG I.
8;124;711;0;0;2;0;CONVERT TO BINARY
9;112;710;4;0;0;0;
10;102;710;4;0;0;0;
11;106;710;3;0;0;0;TEST REFERENCE ZERO
12;127;616;0;0;0;0;gYES
13;101;;1;1;2;0;TEST REFERENCE ONE
14;127;615;17;0;0;0;gYES
15;101;;41;1;3;0;
16;124;607;0;1;0;0;gNO: MOD REG R
17;106;708;3;0;0;0;AUGMENT ITEM
18;107;710;4;0;0;0;
SHEET;518
PROCR;616;MODS: INSTRUCTION(4)
0;106;710;4;0;0;0;TEST ITEM IN RANGE
1;105;566;7;0;0;0;
2;127;616;5;0;3;0;gYES
3;101;;6441;1;3;0;
4;124;607;0;1;0;0;gNO:REJ IR
5;106;710;4;0;0;0;TEST ITEM IN DIV 1
6;105;736;50;0;0;0;
7;127;616;9;0;3;0;gNO
8;102;710;4;0;0;0;
9;106;710;0;0;0;0;FORM INSTRUCTION
10;118;;1;0;3;0;
11;104;710;1;0;0;0;
12;118;;2;0;3;0;
13;104;710;2;0;0;0;
14;118;;1;0;3;0;
15;118;;3;0;0;0;
16;104;710;4;0;0;0;
17;102;710;12;0;0;0;
SHEET;519
PROCR;617;MODS: INSTRUCTION(5)
0;106;710;0;0;0;0;
1;101;;16;1;2;0;TEST MINUS ZERO
2;127;617;9;0;1;0;gNO
3;106;710;12;0;0;0;
4;127;617;10;0;1;0-;gNO
5;106;723;6;1;0;0;STACK MINUS ZERO
6;124;708;5;0;3;0;
7;128;;0;1;0;0;
8;76;612;14;0;0;0;gNEXT BLOCK
9;73;617;13;0;0;0;gPOSITIVE INSTRUCTION
10;125;;0;1;2;0;
11;105;710;12;0;0;0;NEGATE INSTRUCTION
12;102;710;12;0;0;0;
13;106;710;12;0;0;0;STACK INSTRUCTION
14;124;708;5;0;3;0;
15;102;;0;0;0;0;
16;124;612;14;1;0;0;gNEXT BLOCK
SHEET;520
PROCR;618;MODS: -98 DIRECTIVE
0;106;703;16;0;0;0;;SWITCH SM2
1;127;618;4;0;1;0;;1,2,3
2;101;;4112;1;3;0;;0
3;124;607;0;1;0;0;gMOD REJ--
4;125;;0;1;2;0;
5;102;703;16;0;0;0;SET SM2 AT 0
6;80;650;0;0;0;0;gSET ROUTE TO MANUAL
7;106;703;12;0;2;0;TEST ALL MOD SETS READ
8;127;618;11;0;0;0;gYES
9;125;;1;0;2;0;
10;124;606;9;1;0;0;gNO
11;126;675;0;0;0;0;gREQ TW
12;124;714;38;0;2;0;;MODS
13;126;688;0;0;0;0;gCOPY COMMENT
14;124;731;10;0;2;0;
15;124;718;0;0;3;0;
16;128;;4;1;2;0;EDIT REST
17;102;703;11;0;0;0;SET SM1 AT 0
18;126;705;12;1;2;0;
19;124;718;0;0;3;0;MINIMISE
20;106;;0;1;2;0;LENGTH OF
21;71;619;0;0;0;0;COMMENT
22;106;715;6;1;0;0;
23;124;718;0;0;3;0;
24;102;;0;1;2;0;
25;125;;4098;0;2;0;
26;76;618;19;0;0;0;
SHEET;521
PROCR;619;COPY: PIPS
0;106;703;0;0;0;0;;SWITCH SC1
1;70;621;13;0;0;0;gDON'T COPY;0
2;106;704;4;0;0;0;SET UP RT NO;1
3;80;643;0;0;0;0;
4;126;705;0;1;3;0;SET MR3 AT 3/0
5;106;722;6;1;0;0;CLEAR ANNEXE
6;128;91;0;0;0;0;
7;106;564;7;0;0;0;SET UP MT CH
8;70;619;10;0;0;0;
9;101;;128;1;3;0;
10;102;739;3;1;0;0;
11;106;723;12;1;0;0;COPY PIPS & ISP
12;128;91;0;1;1;0;
13;106;723;14;1;0;0;
14;128;91;17;0;1;0;
15;106;723;16;1;0;0;
16;128;91;35;0;1;0;
17;106;723;18;1;0;0;
18;128;91;283;0;1;0;
19;106;723;20;1;0;0;
20;128;91;256;1;1;0;
21;106;723;22;1;0;0;
22;128;91;321;0;1;0;
23;106;716;20;1;0;0;BE WD
24;103;91;1028;1;0;0;
25;103;91;420;1;0;0;
26;102;91;336;1;0;0;
27;126;644;0;0;0;0;gTEST ROUTE
28;125;;0;1;0;0;IDB
29;126;659;0;0;0;0;gWRITE
30;126;659;0;0;0;0;gWRITE
SHEET;522
PROCR;620;COPY: SIPS
0;106;716;26;1;0;0;
1;102;566;0;1;0;0;
2;124;999;0;0;2;0;COPY SIPS TO ANNEXE
3;104;723;24;1;0;0;
4;128;91;5;0;1;0;
5;106;737;0;1;0;0;BLOCK NO
6;103;566;0;1;0;0;
7;102;91;0;1;0;0;
8;102;91;2;1;0;0;
9;126;566;8;1;2;0;SET MR2 FOR CHAPT 1
10;80;658;0;0;0;0;gDUMP STORE
11;126;566;10;1;2;0;SET MR2 FOR CHAPT 2
12;80;658;0;0;0;0;gDUMP STORE
13;126;566;12;1;2;0;SET MR2 FOR IPS
14;80;658;0;0;0;0;gDUMP STORE
15;80;659;0;0;0;0;gWRITE
SHEET;523
PROCR;621;COPY: SENTINELS
0;125;;0;1;2;0;
1;126;663;0;0;0;0;gOPEN OUTPUT FILE
2;106;703;3;0;0;0;;SWITCH SC4
3;71;622;0;0;0;0;gWHOLE TAPE;1
4;80;667;0;0;0;0;gCLOSE OUTPUT FILE;0
5;106;703;1;0;0;0;;SWITCH SC2
6;127;621;16;0;1;0;gANOTHER TAPE;1
7;126;675;0;0;0;0;gREQ TW;0
8;124;715;16;0;2;0;;TAPES
9;126;688;0;0;0;0;gCOPY COMMENT
10;124;730;4;0;2;0;
11;124;718;0;0;3;0;
12;128;;4;1;2;0;EDIT REST
13;106;565;11;0;0;0;TEST MASTER TO BE ENTERED
14;70;626;0;0;0;0;gYES
15;76;641;0;0;0;0;gNO
16;106;703;1;0;0;0;
17;102;703;0;0;0;0;
18;102;703;1;0;0;0;SET SC2 AT 0
19;106;704;5;0;0;0;SET UP RT NO
20;103;704;4;0;0;0;
21;124;605;5;1;0;0;gNEXT TAPE
SHEET;524
PROCR;622;COPY:TOTAL TAPE(0)
0;106;565;9;0;0;0;SET UP RT NO
1;80;643;0;0;0;0;
2;80;652;0;0;0;0;gOPEN IP FILE
3;106;91;7;1;0;0;SPOOL
4;102;91;1003;0;0;0;
5;80;655;0;0;0;0;gREAD MT
6;106;91;15;1;0;0;PROGM
7;102;710;1;0;0;0;
8;80;673;0;0;0;0;gLIPHIP
9;106;704;4;0;0;0;SET UP RT NO
10;103;703;16;0;0;0;SET SM2' AT 1
11;80;643;0;0;0;0;
12;126;661;0;0;0;0;gWRITE MT
13;106;566;5;0;0;0;SPOOL
14;102;91;1003;0;0;0;
15;106;91;17;1;0;0;AUGMENT ASL
16;124;707;0;0;3;0;
17;107;;64;0;0;0;TEST HIGH
18;71;622;21;0;0;0;gYES
19;106;716;50;1;0;0;;LOP
20;76;622;22;0;0;0;
21;106;716;52;1;0;0;;HOP
22;80;674;0;0;0;0;gHIPHOPLIPLOP
SHEET;525
PROCR;623;COPY: TOTAL TAPE(1)
0;106;565;9;0;0;0;SET UP RT NO
1;80;643;0;0;0;0;
2;126;655;0;0;0;0;gREAD MT
3;106;704;4;0;0;0;SET UP RT NO
4;80;643;0;0;0;0;
5;126;661;0;0;0;0;gWRITE MT
6;106;703;4;0;0;0;;SWITCH SI1
7;70;623;0;0;0;0;gMORE;0
8;126;669;0;0;0;0;gWRITE END BLOCK;1
SHEET;526
PROCR;624;COPY: TOTAL TAPE(2)
0;106;703;1;0;0;0;;SWITCH SC2
1;127;624;9;0;0;0;g;0
2;126;700;0;0;0;0;gCOUNT 500MS;1
3;124;565;9;0;3;0;
4;119;;0;1;1;0;REWIND IP
5;106;567;4;0;0;0;
6;124;565;9;0;3;0;RESTORE ASL
7;102;;64;0;0;0;
8;124;621;16;1;0;0;g
9;106;703;2;0;0;0;;SWITCH SC3
10;127;624;15;0;0;0;g;0
11;126;700;0;0;0;0;gCOUNT 500MS;1
12;124;565;9;0;3;0;
13;119;;0;1;1;0;REWIND IP
14;76;621;7;0;0;0;g
15;80;648;0;0;0;0;gUNLOAD IP
16;76;621;7;0;0;0;g
SHEET;527
PROCR;625;DATE FROM INDICATORS
0;126;648;0;0;0;0;gUNLOAD TAPE START
1;106;702;8;0;0;0;
2;103;702;7;0;0;0;
3;103;702;6;0;0;0;
4;102;702;5;0;0;0;
5;80;694;0;0;0;0;gARRANGE TO TYPE SHORTLY
6;125;;2047;1;2;0;TEST DATE STACCKED
7;71;625;13;0;0;0;gYES
8;80;695;0;0;0;0;gTEST TIME TO TYPE
9;76;625;6;0;0;0;gNO
10;124;713;16;0;2;0;;DATE PLEASE
11;80;688;0;0;0;0;gCOPY COMMENT
12;76;625;6;0;0;0;g
13;118;;2;0;0;0;
14;104;708;2;0;0;0;
15;125;;2047;1;1;0;CLEAR I1-11
16;80;689;0;0;0;0;gTEST DATE REASONABLE
17;76;625;5;0;0;0;gNO
18;125;;127;1;0;0;SET I1-7
SHEET;528
PROCR;626;ISU:COMMENT
0;106;722;14;1;0;0;COPY ALLOCATOR
1;104;;164;0;1;0;PARAMETER TABLE
2;128;91;2;0;0;0;TO ANNEXE
3;101;;16;0;1;0;
4;115;704;1;0;0;0;
5;118;;4125;0;0;0;
6;71;626;8;0;0;0;
7;101;;768;1;3;0;
8;118;;1;0;0;0;
9;102;714;2;0;0;0;
10;106;714;0;1;0;0;;ISSUE X MASTER
11;124;91;20;0;3;0;
12;102;;8190;1;1;0;
13;124;714;2;0;2;0;
14;104;722;16;1;0;0;(16)
15;124;91;20;0;3;0;
16;128;;0;1;1;0;COPY COMMENT
17;124;726;22;0;2;0;
18;124;91;20;0;3;0;
19;128;;14;1;2;0;EDIT REST
SHEET;529
PROCR;627;ISU:PREPARE REST OF STORE
0;106;565;3;0;0;0;
1;105;736;50;0;0;0;
2;102;705;11;0;0;0;
3;124;627;8;0;2;0;
4;76;680;16;0;0;0;gLOG
5;126;705;10;1;2;0;
6;124;639;0;0;2;0;
7;102;;31;0;1;0;
8;101;;14;1;3;0;STACK TAG 14
9;123;;0;1;2;0;IN DIV 1 COMPT 8190
10;125;;2;0;2;0;ONWARDS
11;76;627;9;0;0;0;
12;106;565;8;0;0;0;SECOND STORE REQUIRED
13;70;627;18;0;0;0;gNO
14;106;91;33;0;0;0;IS IT IN MASTER
15;71;627;18;0;0;0;gYES
16;102;565;8;0;0;0;
17;124;639;12;1;0;0;gWRONG STORE COMMENT
18;124;699;4;0;2;0;
19;102;;31;0;1;0;
20;124;627;25;0;2;0;
21;76;680;16;0;0;0;gLOG
22;126;705;10;1;2;0;
23;125;;0;1;2;0;CLEAR DIV 1 COMPT 8190
24;102;;0;1;2;0;ONWARDS
25;125;;2;0;2;0;
26;76;627;24;0;0;0;
SHEET;530
PROCR;628;ISU:PREPARE SECOND STORE
0;106;565;8;0;0;0;TEST SEC0ND STORE
1;70;629;0;0;0;0;gNO
2;104;705;16;0;0;0;
3;102;705;17;0;0;0;
4;126;705;16;1;2;0;
5;124;639;12;0;2;0;
6;102;;31;0;1;0;
7;101;;14;1;3;0;
8;123;;0;1;2;0;STACK TAG 14
9;125;;2;0;2;0;IN SECOND STORE
10;76;628;8;0;0;0;
11;124;699;4;0;2;0;
12;102;;31;0;1;0;
13;126;705;16;1;2;0;
14;125;;0;1;2;0;
15;102;;0;1;2;0;CLEAR SECOND STORE
16;125;;2;0;2;0;
17;76;628;15;0;0;0;
SHEET;531
PROCR;629;ISU:SET UP FLOATING POINT
0;124;629;5;0;2;0;
1;76;680;16;0;0;0;gLOG
2;106;722;2;1;0;0;
3;124;566;3;0;3;0;
4;128;;128;0;0;0;
5;106;716;23;0;0;0;
6;102;;135;0;1;0;
7;106;709;13;0;0;0;
8;102;;137;0;1;0;
9;106;565;10;0;0;0;TEST 326
10;71;630;0;0;0;0;gNO
11;106;716;24;1;0;0;
12;102;;134;1;1;0;
SHEET;532
PROCR;630;ISU:CHANNEL 0-7 ASLS
0;106;722;12;1;0;0;
1;104;;162;0;1;0;COPY ASLS FROM CH 0-7
2;124;566;3;0;3;0;
3;128;;64;0;0;0;
4;106;702;0;0;0;0;RESET TW ASL
5;124;565;0;0;3;0;
6;102;;64;0;0;0;
SHEET;533
PROCR;631;ISU:CHANNEL 16&17 ASLS
0;106;565;9;0;0;0;
1;101;;128;1;2;0;TEST FAST CHANNEL
2;72;631;5;0;0;0;gYES
3;125;;0;1;2;0;
4;76;631;10;0;0;0;gNO
5;106;722;10;1;0;0;
6;104;;162;0;1;0;COPY ASLS FOR CH 16-17
7;124;566;3;0;3;0;
8;128;;192;0;0;0;
9;101;;64;1;2;0;
10;102;91;34;0;0;0;APT:FAST CHS
11;106;709;17;0;0;0;;SWITCH SX1
12;71;632;0;0;0;0;;1
13;106;565;4;0;0;0;STORE CLOCK IND;0
14;102;91;27;0;0;0;IN APT
SHEET;534
PROCR;632;ISU:PRINTER DETAILS
0;101;;0;1;3;0;
1;102;;4;1;1;0;CLEAR MR2
2;101;;1;0;1;0;
3;124;566;3;0;3;0;
4;115;;64;0;2;0;
5;101;;4;1;2;0;TEST ROUTE TYPE 4
6;70;632;12;0;0;0;gYES
7;101;;5;1;2;0;TEST ROUTE TYPE 9
8;70;632;12;0;0;0;gYES
9;125;;1;0;2;0;STEP MR2
10;125;;0;1;2;0;
11;76;632;3;0;0;0;g
12;124;566;3;0;3;0;
13;115;;64;0;2;0;
14;118;;4;0;0;0;
15;104;;4;0;1;0;
16;101;;19;0;1;0;
17;114;;153;0;1;0;SET UP PR RT&TYPE IN(153)
SHEET;535
PROCR;633;ISU:ALLOCATION CHANNEL
0;106;565;9;0;0;0;
1;102;91;26;0;0;0;APT:ALLOC CHAPT
2;101;;255;1;3;0;SET PTS/STORE DUMP ASL AT'pp'
3;124;565;9;0;3;0;
4;102;;71;0;0;0;
SHEET;536
PROCR;634;ISU:CD RTS
0;100;709;15;0;2;0;
1;115;565;1;0;0;0;
2;103;710;11;0;0;0;
3;103;;188;0;1;0;8*CH
4;101;;4;1;1;0;
5;102;;189;0;1;0;(8*CH)+4
6;106;565;1;0;0;0;STORE MIN CD RT
7;102;;186;0;1;0;
8;101;;1;0;1;0;
9;124;710;11;0;3;0;
10;115;;70;0;0;0;
11;101;;6;1;2;0;
12;70;634;15;0;0;0;
13;101;;3;1;3;0;
14;76;634;16;0;0;0;
15;101;;6;1;3;0;
16;104;710;11;0;0;0;
17;102;;187;0;1;0;MAX RT
SHEET;537
PROCR;635;ISU: STORE
0;106;91;32;0;0;0;
1;103;;6;0;1;0;FORM FIRST
2;101;;20;1;1;0;STORE TABLE
3;80;640;0;0;0;0;g
4;106;565;8;0;0;0;TEST SECOND STORE
5;71;636;0;0;0;0;gYES
6;102;91;33;0;0;0;APT:SECOND STORE
7;76;637;0;0;0;0;gNO
SHEET;538
PROCR;636;ISU:SECOND STORE
0;124;91;33;0;3;0;
1;106;;0;0;0;0;
2;104;565;8;0;0;0;
3;102;565;3;0;0;0;
4;106;91;33;0;0;0;
5;103;;6;0;1;0;FORM SECOND
6;101;;12;1;1;0;STORE TABLE
7;80;640;0;0;0;0;g
SHEET;539
PROCR;637;ISU:FINISH TYPING
0;124;91;2;0;2;0;COPY ALLOCATOR
1;104;722;14;1;0;0;PARAMETER TABLE
2;124;91;5;0;3;0;BACK TO WHERE
3;128;;0;0;0;0;IT BELONGS
4;101;;1;1;3;0;SET SL4=1
5;102;703;10;0;0;0;
6;80;680;0;0;0;0;gLOG
SHEET;540
PROCR;638;ISU:ENTER MASTER
0;106;;160;0;1;0;
1;102;639;0;0;0;0;
2;102;;0;0;1;0;
3;102;;160;0;1;0;
4;102;;162;0;1;0;
5;102;;164;0;1;0;CLEAR WLS
6;106;722;4;1;0;0;
7;124;999;0;0;3;0;
8;128;;4;0;0;0;CLEAR 4-63
9;106;702;2;0;0;0;SET UP(9)
10;102;;9;0;1;0;
11;106;704;1;0;0;0;STORE MASTER
12;102;;181;0;1;0;SERIAL NUMBER
13;106;704;2;0;0;0;AND
14;102;;182;0;1;0;MOD NUMBER
15;106;565;0;0;0;0;
16;103;;190;0;1;0;TW RT
17;125;;4095;1;2;0;
18;101;;127;1;2;0;
19;125;;4095;1;1;0;CLEAR I1-11
SHEET;541
PROCR;639;ISU: ADJUST STORE SIZE
0;80;568;0;0;0;0;gSET KEY 14
1;101;;8;0;1;0;
2;106;;4;0;1;0;
3;114;705;11;0;0;0;
4;104;736;50;0;0;0;
5;114;;153;0;1;0;
6;114;565;3;0;0;0;
7;80;675;0;0;0;0;gREQ TW
8;124;715;38;0;2;0;;WRONG STORE
9;80;688;0;0;0;0;gCOPY COMMENT
10;102;565;8;0;0;0;
11;76;627;18;0;0;0;
12;80;568;0;0;0;0;gSET KEY 15
13;101;;4;0;1;0;CANCEL SECOND STORE
14;114;;153;0;1;0;
15;76;639;7;0;0;0;
SHEET;542
PROCR;640;ISU:FORM STORE TABLE SR
0;81;640;0;0;0;0;
1;102;;7;0;1;0;
2;124;999;0;0;3;0;
3;106;;0;0;3;0;
4;105;565;3;0;0;0;
5;70;640;9;0;0;0;
6;125;;2;0;3;0;
7;76;640;2;0;0;0;
8;76;640;14;0;0;0;
9;106;708;0;1;0;0;
10;124;999;0;0;3;0;
11;103;;0;1;3;0;
12;125;;2;0;3;0;
13;76;640;10;0;0;0;
14;82;640;0;0;0;0;
SHEET;543
PROCR;641;DON'T ENTER MASTER
0;80;675;0;0;0;0;gREG TW
1;124;726;22;0;2;0;;END
2;124;718;0;0;3;0;
3;128;;4;1;2;0;
4;106;716;54;1;0;0;
5;124;718;0;0;3;0;
6;102;;2;1;0;0;
7;125;;0;1;2;0;CLEAR SOME SWITCHES
8;102;703;2;1;0;0;
9;102;703;4;0;0;0;
10;102;703;16;0;0;0;
11;102;703;19;0;0;0;
12;76;585;0;0;0;0;gALARM 77
SHEET;544
PROCR;642;REMOVE NES&BES SR
0;81;642;0;0;0;0;
1;125;;0;1;2;0;
2;101;;1792;0;1;0;
3;115;91;0;1;0;0;
4;115;716;0;1;0;0;TST FOR BE
5;71;642;8;0;0;0;gNO
6;106;716;8;1;0;0;REPLACE BABY?
7;76;642;11;0;0;0;
8;115;716;4;1;0;0;TEST FOR NE
9;71;642;12;0;0;0;gNO
10;106;716;6;1;0;0;REPLACE BY,
11;114;91;0;1;0;0;
12;125;;0;1;2;0;TEST END OF WORD
13;118;;4126;1;0;0;
14;75;642;3;0;0;0;gNO
15;80;675;0;0;0;0;gREG TW
16;82;642;0;0;0;0;
SHEET;545
PROCR;643;CONVER ROUTE NO BINgOCT SR
0;100;;0;0;0;0;
1;103;707;0;0;0;0;STORE RT NO
2;118;;4127;1;0;0;
3;118;;1;1;3;0;
4;118;;1;0;3;0;
5;118;;3;1;3;0;
6;103;707;1;0;0;0;
7;101;;256;1;2;0;HIGH DENSITY?
8;127;643;11;0;3;0;gNO
9;101;;352;1;1;0;
10;102;707;1;0;0;0;
11;126;643;0;0;1;0;
SHEET;546
PROCR;644;TEST ROUTE SR
0;100;;0;0;0;0;
1;106;707;0;0;0;0;
2;101;;3;0;1;0;
3;114;644;5;0;0;0;
4;126;693;0;0;0;0;gARRANGE TO TYPE
5;126;;0;1;0;0;;TEST ROUTE
6;124;645;0;1;0;0;g;C
7;126;681;0;0;0;0;gLOG;E
8;124;646;0;1;0;0;g;D
9;124;647;0;1;0;0;g;W
10;124;644;0;0;3;0;;A
11;124;;1;1;0;0;g
SHEET;547
PROCR;645;ROUTE CLOSED
0;126;695;0;0;0;0;gTEST TIME TO TYPE
1;124;644;5;1;0;0;gNO
2;124;727;0;0;2;0;;RC
3;124;718;0;0;3;0;
4;128;;2;1;2;0;
5;124;644;7;1;0;0;g
SHEET;548
PROCR;646;DOUBTFUL BLOCK
0;106;91;0;1;0;0;TEST PURE FBMW
1;104;716;2;1;0;0;
2;70;646;7;0;0;0;gYES
3;80;642;0;0;0;0;gREMOVE NES&BES
4;124;727;6;0;2;0;;DB
5;124;718;0;0;3;0;
6;128;;2;1;2;0;
7;126;644;0;0;1;0;g
SHEET;549
PROCR;647;WARNING OF END
0;80;675;0;0;0;0;gREQ TW
1;124;727;16;0;2;0;;WE
2;124;718;0;0;3;0;
3;128;;2;1;2;0;
4;124;644;10;1;0;0;g
SHEET;550
PROCR;648;UNLOAD TAPE START TAPE SR
0;100;;0;0;0;0;
1;124;565;9;0;3;0;TEST ROUTE
2;126;;0;1;0;0;
3;124;648;10;1;0;0;C gDON'T UNLOAD
4;124;648;1;1;0;0;E
5;124;648;7;1;0;0;D
6;124;648;7;1;0;0;W
7;126;700;0;0;0;0;A COUNT 500 MS
8;124;565;9;0;3;0;UNLOAD
9;119;;0;1;2;0;
10;126;648;0;0;1;0;
SHEET;551
PROCR;649;UNLOAD SR
0;100;;0;0;0;0;
1;126;700;0;0;0;0;gCOUNT 500 MS
2;124;707;0;0;3;0;
3;119;;0;1;2;0;UNLOAD
4;126;649;0;0;1;0;
SHEET;552
PROCR;650;SET ROUTE TO MANUAL SR
0;81;650;0;0;0;0;
1;124;707;0;0;3;0;
2;119;;0;1;3;0;SET ROUTE TO MANUAL
3;82;650;0;0;0;0;
SHEET;553
PROCR;651;READ CD SR
0;100;;0;0;0;0;
1;124;565;1;0;3;0;
2;119;;0;0;1;0;READ
3;126;644;0;0;0;0;gTEST ROUTE
4;124;589;19;1;0;0;gDB
5;126;651;0;0;1;0;
SHEET;554
PROCR;652;OPEN FILE SR
0;100;;0;0;0;0;
1;126;644;0;0;0;0;gTEST ROUTE
2;125;;0;1;0;0;IDB
3;126;653;0;0;0;0;gRUNONSTEPON
4;101;;5;1;3;0;
5;102;566;0;0;0;0;SET BLOCK COUNTER=5
6;126;655;0;0;0;0;gREAD MT
7;126;652;0;0;1;0;
SHEET;555
PROCR;653;RUNONSTEPON SR
0;100;;0;0;0;0;
1;124;707;0;0;3;0;
2;119;;0;0;3;0;RUN ON
3;126;644;0;0;0;0;gTEST ROUTE
4;125;;0;1;0;0;IDB
5;126;672;0;0;0;0;gSTEP ON
6;126;653;0;0;1;0;
SHEET;556
PROCR;654;READ MT SANS AF SR
0;81;654;0;0;0;0;
1;125;;0;1;2;0;
2;102;706;8;0;0;0;SET MR AT 10/0
3;124;707;0;0;3;0;
4;119;;0;0;1;0;READ
5;80;644;0;0;0;0;gTEST ROUTE
6;76;654;9;0;0;0;gD/B
7;124;566;3;1;1;0;MG0
8;82;654;0;0;0;0;g
9;80;657;0;0;0;0;gTEST FOR FBM
10;76;654;3;0;0;0;gYES
11;123;;1;0;0;0;
12;100;706;8;0;0;0;
13;76;656;29;0;0;0;g
14;76;699;4;0;0;0;gABANDON
SHEET;557
PROCR;655;READ MT AVEC AF SR
0;81;655;0;0;0;0;
1;125;;0;1;2;0;
2;102;703;17;0;0;0;SET SR1 AT 0
3;102;706;10;0;0;0;SET MR AT 100/0
4;60;;0;0;0;0;
5;101;;1;1;3;0;STEP BLOCK COUNTER
6;107;566;0;0;0;0;
7;62;;0;0;0;0;
8;80;654;0;0;0;0;gREAD
9;60;;0;0;0;0;DECIMAL
10;106;91;1;1;0;0;TEST CORRECT BLOCK
11;105;566;0;0;0;0;
12;62;;0;0;0;0;BINARY
13;71;655;15;0;0;0;gNO
14;82;655;0;0;0;0;g
15;60;;0;0;0;0;DECIMAL
16;101;;1;1;1;0;;TEST REWRITTEN BLOCK
17;62;;0;0;0;0;BINARY
18;70;655;8;0;0;0;
SHEET;558
PROCR;656;READ MT SR(AF)
0;126;657;0;0;0;0;gTEST FOR FBW
1;124;655;8;1;0;0;gYES
2;106;91;1;1;0;0;
3;105;717;11;1;0;0;TEST SENTINEL 2 OR 3
4;118;;4126;0;0;0;
5;71;656;11;0;0;0;gNO
6;106;703;4;0;0;0;;SWITCH SI1
7;71;597;9;0;0;0;gTAPE REJ;1
8;106;91;5;1;0;0;
9;103;703;4;0;0;0;SET SI1 AT 1
10;76;655;11;0;0;0;g
11;80;699;0;0;0;0;
12;106;703;17;0;0;0;;SWITCH SRI
13;127;656;20;0;1;0;;1
14;101;;1;1;3;0;;0
15;102;703;17;0;0;0;SET SRI AT 1
16;80;642;0;0;0;0;gREMOVE NES & BES
17;124;729;8;0;2;0;;SER
18;124;718;0;0;3;0;
19;128;;2;1;2;0;
20;106;91;1;1;0;0;TEST EXP>ACT
21;105;566;0;0;0;0;
22;73;655;8;0;0;0;gYES
23;80;700;0;0;0;0;gCOUNT SOOMS
24;80;671;0;0;0;0;gSTEP BACK
25;80;699;0;0;0;0;
26;80;671;0;0;0;0;gSTEP BACK
27;80;699;0;0;0;0;
28;80;671;0;0;0;0;gSTEP BACK
29;80;670;0;0;0;0;gSTEP BACK 3 ON 2
30;76;654;3;0;0;0;g
SHEET;559
PROCR;657;TEST FOR FBM SR
0;100;;0;0;0;0;
1;101;;1792;0;1;0;
2;125;;0;1;2;0;
3;115;91;0;1;0;0;TEST SQUARE
4;115;716;2;1;0;0;
5;127;657;11;0;0;0;gYES
6;125;;0;1;2;0;
7;118;;4126;1;0;0;
8;75;657;2;0;0;0;gNEXT CHA
9;124;657;0;0;3;0;
10;124;;1;1;0;0;gNO
11;126;657;0;0;1;0;gYES
SHEET;560
PROCR;658;DUMP STORE SR
0;81;658;0;0;0;0;
1;80;659;0;0;0;0;gWRITE
2;106;566;0;1;0;0;BLOCK NO
3;102;91;0;1;0;0;
4;106;;4;0;1;0;COPY STORE TO ANNEXE
5;104;723;24;1;0;0;
6;128;91;5;0;1;0;
7;125;;512;0;2;0;TEST END
8;76;658;1;0;0;0;gNO
9;82;658;0;0;0;0;gYES
SHEET;561
PROCR;659;WRITE STORE DUMP SR
0;100;;0;0;0;0;
1;124;707;0;0;3;0;WRITE
2;119;;0;0;0;0;
3;80;569;0;0;0;0;gSTEP BLOCK COUNTER
4;126;644;0;0;0;0;gTEST ROUTE
5;124;660;0;1;0;0;gDB
6;126;659;0;0;1;0;
SHEET;562
PROCR;660;WRITE STORE DUMP SR(DB)
0;125;;1;0;3;0;TEST THIRD ATTEMPT
1;124;660;16;1;0;0;gNO
2;106;710;15;1;0;0;
3;105;566;5;0;0;0;REPLACE SPOOL NO
4;127;660;8;0;1;0;BY ?????
5;106;716;8;1;0;0;
6;102;710;14;1;0;0;
7;124;660;10;1;0;0;
8;106;716;8;1;0;0;
9;102;710;16;1;0;0;
10;101;;2;1;3;0;
11;80;663;0;0;0;0;gOPEN FILE
12;80;667;0;0;0;0;gCLOSE OP FILE
13;106;703;3;0;0;0;;SWITCH SC4
14;127;621;5;0;0;0;g;0
15;124;624;0;1;0;0;g;1
16;126;700;0;0;0;0;gCOUNT 500MS
17;124;707;0;0;3;0;
18;119;;0;1;1;0;REWIND
19;80;644;0;0;0;0;gTEST ROUTE
20;125;;0;1;0;0;IDB
21;80;700;0;0;0;0;gCOUNT 500MS
22;76;619;5;0;0;0;g
SHEET;563
PROCR;661;WRITE MT SR
0;100;;0;0;0;0;
1;125;;0;1;2;0;
2;102;706;8;0;0;0;SET MR AT 10/0
3;102;706;10;0;0;0;SET MR AT 100/0
4;124;707;0;0;3;0;
5;119;;0;0;0;0;WRITE
6;106;91;1;1;0;0;STORE BLOCK NO
7;102;566;1;0;0;0;
8;80;644;0;0;0;0;gTEST ROUTE
9;76;662;0;0;0;0;gDB
10;82;661;0;0;0;0;g
SHEET;564
PROCR;662;WRITE MT SR(DB)
0;123;;1;0;0;0;
1;100;706;8;0;0;0;
2;76;662;4;0;0;0;g
3;76;699;4;0;0;0;gABANDON
4;126;670;0;0;0;0;gSTEP BACK 3 ON 2
5;106;566;1;0;0;0;
6;105;91;1;1;0;0;TEST PREVIOUS BLOCK
7;101;;1;1;2;0;
8;127;662;18;0;1;0;gNO
9;106;716;2;1;0;0;SET UP FBM
10;102;91;0;1;0;0;
11;124;707;0;0;3;0;
12;119;;0;0;0;0;WRITE
13;126;644;0;0;0;0;gTEST ROUTE
14;125;;0;1;0;0;IDB
15;106;566;1;0;0;0;RESTORE BLOCK NO
16;102;91;1;1;0;0;
17;76;661;4;0;0;0;g
18;80;699;0;0;0;0;
19;72;662;27;0;0;0;gEXP>ACT
20;80;700;0;0;0;0;gCOUNT 500MS
21;80;671;0;0;0;0;gSTEP BACK
22;80;699;0;0;0;0;
23;80;671;0;0;0;0;gSTEP BACK
24;80;699;0;0;0;0;
25;80;671;0;0;0;0;gSTEP BACK
26;76;662;4;0;0;0;g
27;80;672;0;0;0;0;gSTEP ON
28;76;662;5;0;0;0;g
SHEET;565
PROCR;663;OPEN OUTPUT FILE SR(1)
0;100;;0;0;0;0;
1;102;703;19;0;0;0;SET SX1 AT 0 OR 1
2;101;;1;1;3;0;BLOCK NO
3;102;91;1;1;0;0;
4;102;91;2;1;0;0;
5;106;717;0;1;0;0;50001
6;102;91;4;1;0;0;
7;106;566;5;0;0;0;SPOOL NO
8;102;91;7;1;0;0;
9;106;716;20;1;0;0;BE WD
10;102;91;8;1;0;0;
11;80;661;0;0;0;0;gWRITE (BLOCK 1)
12;106;703;19;0;0;0;;SWITCH SX1
13;71;665;0;0;0;0;;1
SHEET;566
PROCR;664;WRITE SPECIAL BLOCK
0;106;716;2;1;0;0;FBM;O
1;102;91;1000;1;0;0;
2;102;91;1002;1;0;0;
3;106;723;30;1;0;0;
4;128;91;1004;1;1;0;
5;124;726;16;0;2;0;
6;128;91;1014;1;2;0;
7;106;717;2;1;0;0;
8;102;91;1022;1;0;0;
9;155;;0;0;0;0;
10;102;91;1024;1;0;0;
11;106;;175;0;1;0;
12;102;91;1027;1;0;0;
13;106;702;4;0;0;0;
14;124;707;0;0;3;0;SPECIAL ASL
15;102;;64;0;0;0;
16;126;661;0;0;0;0;gWRITE
17;106;567;4;0;0;0;
18;124;707;0;0;3;0;RESTORE ASL
19;102;;64;0;0;0;
SHEET;567
PROCR;665;OPEN OUITPUT FIEL (SR(2)
0;80;666;0;0;0;0;gAUGMENT BLOCK NOS
1;80;661;0;0;0;0;gWRITE(BLOCK 2)
2;80;666;0;0;0;0;gAUGMENT BLOCK NOS
3;80;661;0;0;0;0;gWRITE(BLOCK 3)
4;80;666;0;0;0;0;gAUGMENT BLOCK NOS
5;106;717;6;1;0;0;AM WD
6;102;91;6;1;0;0;
7;80;661;0;0;0;0;gWRITE(BLOCK 4)
8;80;666;0;0;0;0;gAUGMENT BLOCK NOS
9;80;661;0;0;0;0;gWRITE(BLOCK 5)
10;80;666;0;0;0;0;gAUGMENT BLOCK NOS
11;106;566;5;0;0;0;SPOOL NO
12;102;91;7;1;0;0;
13;126;661;0;0;0;0;gWRITE (BLOCK 6)
14;126;663;0;0;1;0;
SHEET;568
PROCR;666;AUGMENT BLOCK NOS SR
0;81;666;0;0;0;0;
1;101;;1;1;3;0;
2;107;91;0;0;0;0;
3;107;91;4;0;0;0;
4;82;666;0;0;0;0;g
SHEET;569
PROCR;667;CLOSE OUTPUT FILE SR (1)
0;100;;0;0;0;0;
1;101;;1;1;3;0;AUGMENT BLOCK NO
2;107;91;0;0;0;0;
3;106;717;8;1;0;0;
4;102;91;4;1;0;0;
5;101;;7453;1;3;0;FILE
6;102;91;6;1;0;0;
7;155;;0;0;0;0;SERIAL
8;102;91;8;1;0;0;
9;101;;1;1;3;0;REEL
10;102;91;10;1;0;0;
11;106;;175;0;1;0;DATE
12;102;91;13;1;0;0;
13;106;717;2;1;0;0;PROGM
14;102;91;14;1;0;0;
15;102;91;16;1;0;0;
16;106;716;20;1;0;0;BE WD
17;102;91;18;1;0;0;
18;126;661;0;0;0;0;gWRITE (BLOCK 7)
SHEET;570
PROCR;668;CLOSE OUTPUT FILE SR (2)
0;101;;1;1;3;0;AUGMENT BLOCK NO
1;107;91;0;0;0;0;
2;106;717;6;1;0;0;AM WD
3;102;91;2;1;0;0;
4;106;717;4;1;0;0;FINIS
5;102;91;4;1;0;0;
6;106;716;20;1;0;0;BE WD
7;102;91;6;1;0;0;
8;126;661;0;0;0;0;gWRITE(BLOCK 8)
9;106;717;10;1;0;0;SENT 3
10;102;91;0;1;0;0;
11;101;;9;1;3;0;BLOCK NO
12;102;91;4;1;0;0;
13;126;661;0;0;0;0;gWRITE (BLOCK 9)
14;126;669;0;0;0;0;gWRITE END BLOCK
15;126;667;0;0;1;0;g
SHEET;571
PROCR;669;WRITE END BLOCK SR
0;100;;0;0;0;0;
1;106;717;12;1;0;0;(END)
2;103;91;0;1;0;0;
3;102;91;2;1;0;0;
4;124;707;0;0;3;0;
5;119;;0;0;0;0;WRITE
6;80;644;0;0;0;0;gTEST ROUTE
7;76;669;4;0;0;0;gDB
8;80;649;0;0;0;0;gUNLOAD
9;82;669;0;0;0;0;g
SHEET;572
PROCR;670;STEP BACK 3 ON 2 SR
0;100;;0;0;0;0;
1;126;700;0;0;0;0;gCOUNT 500 MS
2;126;671;0;0;0;0;gSTEP BACK
3;126;671;0;0;0;0;gSTEP BACK
4;126;671;0;0;0;0;gSTEP BACK
5;126;700;0;0;0;0;gCOUNT 500 MS
6;126;672;0;0;0;0;gSTEP ON
7;126;672;0;0;0;0;gSTEP ON
8;126;670;0;0;1;0;
SHEET;573
PROCR;671;STEP BACK SR
0;100;;0;0;0;0;
1;124;707;0;0;3;0;
2;119;;0;1;0;0;STEP BACK
3;126;644;0;0;0;0;gTEST ROUTE
4;125;;0;1;0;0;IDB
5;126;671;0;0;1;0;
SHEET;574
PROCR;672;STEP ON SR
0;100;;0;0;0;0;
1;124;707;0;0;3;0;
2;119;;0;1;3;0;STEP ON
3;126;644;0;0;0;0;gTEST ROUTE
4;125;;0;1;0;0;IDB
5;126;672;0;0;1;0;
SHEET;575
PROCR;673;HIPLIP SR
0;81;673;0;0;0;0;
1;106;91;17;1;0;0;AUGMENT ASL
2;124;707;0;0;3;0;
3;107;;64;0;0;0;
4;106;703;16;0;0;0;;SWITCH SM2'
5;71;673;14;0;0;0;gNO COMMENT;1
6;106;91;9;1;0;0;RUN
7;102;91;1002;0;0;0;
8;106;91;17;1;0;0;TEST HIGH
9;71;673;12;0;0;0;gYES
10;106;716;46;1;0;0;;LIP
11;76;673;13;0;0;0;
12;106;716;48;1;0;0;;HIP
13;80;674;0;0;0;0;gHIPHOPLIPLOP;0
14;82;673;0;0;0;0;g
SHEET;576
PROCR;674;HIPHOPLIPLOP SR
0;81;674;0;0;0;0;
1;102;91;1000;1;0;0;
2;80;675;0;0;0;0;gREQ TW
3;124;732;0;0;2;0;
4;124;718;0;0;3;0;
5;128;;2;1;2;0;EDIT COMMENT
6;82;674;0;0;0;0;g
SHEET;577
PROCR;675;BLACK COMMENT SR
0;100;;0;0;0;0;
1;126;677;0;0;0;0;gREQ TW
2;124;724;0;0;2;0;EDIT TIME
3;124;718;0;0;3;0;
4;128;;0;1;2;0;
5;126;675;0;0;1;0;
SHEET;578
PROCR;676;RED COMMENT SR
0;100;;0;0;0;0;
1;126;677;0;0;0;0;gREQ TW
2;124;724;4;0;2;0;EDIT TIME
3;124;718;0;0;3;0;
4;128;;0;1;2;0;
5;126;676;0;0;1;0;
SHEET;579
PROCR;677;REQUEST TW SR(1)
0;100;;0;0;0;0;
1;106;703;9;0;0;0;;SWITCH SL3
2;70;677;4;0;0;0;gUNSATURATED;0
3;80;680;0;0;0;0;gLOG;1
4;106;703;5;0;0;0;TEST ANY REQS SET;SWITCH SL1
5;127;678;0;0;1;0;gYES;1
6;124;719;2;0;2;0;;0
7;103;703;5;0;0;0;SET REQ(SL1=1)
8;103;718;0;0;0;0;
9;102;718;1;0;0;0;
10;102;718;2;0;0;0;SET IND MR AT 10/0
11;126;677;0;0;1;0;g
SHEET;580
PROCR;678;REQUEST TW SR(2)
0;106;703;6;0;0;0;TEST TWO REQS SET
1;127;679;0;0;1;0;gYES
2;106;703;5;0;0;0;
3;101;;20;1;1;0;SET REQ 1
4;103;703;6;0;0;0;
5;103;718;0;0;0;0;
6;105;702;1;0;0;0;
7;127;677;11;0;1;0;g
8;124;719;2;0;2;0;
9;124;678;4;1;0;0;g
SHEET;581
PROCR;679;REQUEST TW SR(3)
0;101;;20;1;1;0;SET REQ 2
1;103;703;7;0;0;0;
2;103;718;0;0;0;0;
3;103;703;9;0;0;0;SET SL3=1
4;105;702;1;0;0;0;
5;127;677;11;0;1;0;g
6;124;719;2;0;2;0;
7;124;679;1;1;0;0;g
SHEET;582
PROCR;680;LOG:SPECIAL ENTRY
0;81;680;0;0;0;0;
1;124;680;6;0;2;0;
2;76;680;16;0;0;0;gLOG
3;124;680;14;0;2;0;
4;102;;30;0;1;0;
5;125;;4096;1;0;0;
6;101;;4000;1;3;0;
7;100;723;9;0;2;0;
8;111;723;9;0;0;0;
9;71;680;7;0;0;0;
10;101;;8191;1;2;0;
11;104;723;9;0;0;0;
12;70;680;6;0;0;0;
13;76;680;11;0;0;0;
14;80;568;0;0;0;0;gSET KEY 15
15;106;680;0;0;0;0;
16;102;681;0;0;0;0;
17;76;681;1;0;0;0;g
SHEET;583
PROCR;681;LOG:SEARCH QUEUE
0;100;;0;0;0;0;
1;106;703;5;0;0;0;;SWITCH SL1
2;127;683;0;0;1;0;gTYPING;1
3;106;703;6;0;0;0;TEST REQ SET;0
4;127;682;0;0;1;0;gYES
5;106;703;10;0;0;0;;SWITCH SL4
6;73;696;0;0;0;0;gABANDON;2
7;71;638;0;0;0;0;gENTER MASTER;1
8;125;;0;1;2;0;;0
9;101;;3;1;2;0;STEP LINK BY-3
10;107;681;0;0;0;0;
11;126;681;0;0;1;0;g
12;125;;2048;1;0;0;SET I12
13;124;681;8;1;0;0;g
SHEET;584
PROCR;682;LOG:RESET REQUESTS
0;106;703;6;0;0;0;SET SL1=1
1;103;703;5;0;0;0;RESET REQUESTS
2;102;718;1;0;0;0;
3;106;703;7;0;0;0;
4;102;703;6;0;0;0;
5;102;703;7;0;0;0;
6;102;718;2;0;0;0;SET IND MR AT 10/0
SHEET;585
PROCR;683;LOG:TEST ROUTE
0;125;;2048;1;1;0;CLEAR I12
1;124;565;0;0;3;0;
2;126;;0;1;0;0;;TEST ROUTE
3;124;681;12;1;0;0;g;C
4;124;681;8;1;0;0;g;E
5;124;687;0;1;0;0;g;D
6;124;683;7;1;0;0;;W
7;106;703;8;0;0;0;;A SWITCH SL2
8;127;684;0;0;0;0;gNORMAL;  0
9;125;;0;1;2;0;END OF COMMENT;  1
10;103;703;5;0;0;0;SET SL1=0
11;102;703;8;1;0;0;SET SL2=SL3=0
12;124;681;3;1;0;0;g
SHEET;586
PROCR;684;LOG:OUTPUT(PT OP AS)
0;106;703;18;0;0;0;;SWITCH ST1
1;127;685;0;0;3;0;gGP;2
2;124;718;1;0;3;0;PT OP;1
3;106;;0;1;0;0;
4;102;;154;1;1;0;NEXT WORD IN 154'
5;124;565;0;0;3;0;
6;119;;0;0;0;0;TYPE
7;124;686;0;1;0;0;g
SHEET;587
PROCR;685;LOG:OUTPUT(GP OP AS)
0;100;718;4;1;2;0;SET B33-38 OF B
1;124;718;1;0;3;0;
2;106;;0;1;0;0;
3;124;718;2;0;3;0;
4;118;;0;0;0;0;
5;114;;154;1;1;0;NEXT CHA IN 154':B33-38
6;124;565;0;0;3;0;
7;119;;0;0;0;0;TYPE
8;123;;2;0;0;0;
9;100;718;2;0;0;0;TEST END OF WORD
10;124;683;1;1;0;0;gNO
11;125;;0;1;2;0;RESET IND MR
12;102;718;2;0;0;0;
SHEET;588
PROCR;686;LOG:END
0;101;;15;0;1;0;TEST END OF COMMENT
1;124;718;1;0;3;0;
2;115;;0;0;0;0;
3;105;713;8;0;0;0;
4;127;686;7;0;1;0;gNO
5;101;;1;1;3;0;
6;102;703;8;0;0;0;SET SL2 AT 1
7;101;;2;1;3;0;
8;107;718;1;0;0;0;STEP WORD COUNTER
9;124;683;1;1;0;0;g
SHEET;589
PROCR;687;LOG: DOUBTFUL BLOCK
0;106;703;5;0;0;0;ARRANGE TO RE-TYPE
1;101;;2;1;2;0;PRECEDED BY 'LDB'
2;102;718;1;0;0;0;
3;102;;154;1;1;0;TYPE NOTHING
4;124;565;0;0;3;0;
5;119;;0;0;0;0;
6;124;683;1;1;0;0;g
SHEET;590
PROCR;688;COPY FIXED COMMENT
0;100;;0;0;0;0;
1;104;722;8;1;0;0;
2;124;718;0;0;3;0;
3;128;;2;1;1;0;
4;126;688;0;0;1;0;
SHEET;591
PROCR;689;DATE SR(1)
0;100;;0;0;0;0;
1;103;;138;0;1;0;
2;102;;175;0;1;0;STORE DATE
3;100;566;2;0;3;0;
4;101;;3;0;1;0;
5;115;;175;0;1;0;
6;105;708;2;0;0;0;TEST THIS YEAR
7;127;690;0;0;0;0;gYES
8;101;;1;1;2;0;TEST NEXT YEAR
9;70;689;12;0;0;0;gYES
10;101;;256;1;1;0;
11;71;692;0;0;0;0;gNO:REJECT
12;106;;175;0;1;0;
13;114;708;2;0;0;0;
14;80;675;0;0;0;0;gREQ TW
15;124;713;26;0;2;0;;HNY
16;80;688;0;0;0;0;gCOPY COMMENT
SHEET;592
PROCR;690;DATE SR(2)
0;101;;4;0;1;0;CONVERT MONTH
1;125;;0;1;2;0;
2;115;;175;0;1;0;
3;101;;12;0;1;0;
4;114;;138;0;1;0;
5;100;566;3;0;3;0;
6;101;;4;0;1;0;
7;125;;0;1;2;0;
8;115;;175;0;1;0;
9;118;;4126;0;0;0;
10;103;708;3;0;0;0;STORE MONTH & TEST IN RANGE
11;127;692;0;0;0;0;gNO:REJECT
12;101;;13;1;2;0;
13;127;692;0;0;2;0;
SHEET;593
PROCR;691;DATE SR(3)
0;100;705;1;0;2;0;TEST LEAP YEAR
1;125;;0;1;2;0;
2;115;;175;0;1;0;
3;127;691;6;0;0;0;gYES
4;101;;41;1;3;0;29
5;124;691;7;1;0;0;gNO
6;101;;48;1;3;0;30
7;102;708;5;0;0;0;ADJUST FEBRUARY
8;101;;24;0;1;0;
9;115;;175;0;1;0;TEST DAY IN RANGE
10;70;692;0;0;0;0;gNO:REJECT
11;118;;1;1;0;0;
12;114;;138;1;1;0;
13;118;;4124;0;0;0;
14;100;566;2;0;3;0;
15;124;708;3;0;1;0;
16;105;708;3;0;0;0;
17;127;692;0;0;2;0;gNO:REJECT
18;100;566;3;0;3;0;
19;101;;8;0;1;0;
20;125;;0;1;2;0;
21;115;;175;0;1;0;
22;118;;4125;0;0;0;
23;101;;10;1;2;0;
24;72;692;0;0;0;0;gNO:REJECT
25;124;689;0;0;3;0;
26;124;;1;1;0;0;g
SHEET;594
PROCR;692;REJECT ABSURD DATE
0;62;;0;0;0;0;
1;80;675;0;0;0;0;gREQ TW
2;124;713;22;0;2;0;;DATE REJ
3;126;688;0;0;0;0;gCOPY COMMENT
4;126;689;0;0;1;0;g
SHEET;595
PROCR;693;ARRANGE TO TYPE FIRST TIME SR
0;100;;0;0;0;0;
1;106;706;1;0;0;0;
2;101;;1;1;2;0;
3;102;706;0;0;0;0;
4;126;693;0;0;1;0;
SHEET;596
PROCR;694;ARRANGE TO TYPE SHORTLY SR
0;81;694;0;0;0;0;
1;106;706;1;0;0;0;
2;118;;4127;0;0;0;
3;102;706;0;0;0;0;
4;106;706;1;0;0;0;
5;105;706;0;0;0;0;
6;102;706;0;0;0;0;
7;82;694;0;0;0;0;
SHEET;597
PROCR;695;TEST TIME TO TYPE SR(1)
0;100;;0;0;0;0;
1;123;;1;0;0;0;
2;100;706;0;0;0;0;
3;76;696;0;0;0;0;gNO
4;125;;0;1;2;0;
5;102;706;0;0;0;0;
6;126;676;0;0;0;0;gREQ TW
7;124;695;0;0;3;0;
8;124;;1;1;0;0;gYES
SHEET;598
PROCR;696;TEST TIME TO TYPE SR(2)
0;124;696;6;0;2;0;
1;102;;30;0;1;0;
2;124;696;2;1;1;0;
3;100;709;8;1;1;0;
4;126;696;5;0;3;0;
5;115;698;0;0;1;0;
6;100;709;8;1;0;0;
7;124;566;3;1;1;0;
8;125;;0;1;2;0;
9;101;;1;1;2;0;
10;107;706;0;0;0;0;
11;106;;8;0;1;0;
12;102;696;5;0;0;0;
13;80;568;0;0;0;0;gSET KEY 15
14;106;695;0;0;0;0;
15;101;;3;1;1;0;
16;76;680;16;0;0;0;gLOG
SHEET;599
CONST;697;0;
SHEET;600
PROCR;698;TEST TIME SR(3)
0;125;;0;1;2;0;
1;100;705;1;0;2;0;
2;115;696;5;0;0;0;
3;102;698;18;0;0;0;
4;125;;4096;1;1;0;
5;124;566;3;1;1;0;
6;124;698;18;0;1;0;
7;106;702;5;0;0;0;
8;76;696;12;0;0;0;
9;101;;2000;1;3;0;
10;100;723;9;0;2;0;
11;111;723;9;0;0;0;
12;71;698;10;0;0;0;
13;76;698;1;0;0;0;
14;126;705;14;1;1;0;
15;125;;1;0;1;0;
16;76;698;15;0;0;0;
17;76;698;0;0;0;0;
18;100;;0;0;0;0;
19;125;;0;1;2;0;
20;101;;4096;1;2;0;
21;104;723;9;0;0;0;
22;70;698;1;0;0;0;
23;76;698;21;0;0;0;
24;101;;500;1;3;0;
25;118;;4119;1;0;0;
26;113;711;0;0;0;0;
27;101;;1;1;2;0;
28;72;698;25;0;0;0;
29;76;698;0;0;0;0;
SHEET;601
PROCR;699;ABANDON
0;81;699;0;0;0;0;
1;123;;1;0;0;0;
2;100;706;10;0;0;0;
3;82;699;0;0;0;0;
4;80;676;0;0;0;0;gREQ TW
5;124;713;0;0;2;0;;ABANDON
6;80;688;0;0;0;0;gCOPY COMMENT
7;106;567;6;0;0;0;
8;102;703;10;0;0;0;SET SL4 AT 2
9;80;681;0;0;0;0;gLOG
SHEET;602
PROCR;700;COUNT 500MS SR
0;100;;0;0;0;0;
1;125;;0;1;2;0;
2;102;706;2;0;0;0;
3;123;;1;0;0;0;
4;100;706;2;0;0;0;
5;126;681;0;0;0;0;gLOG
6;126;700;0;0;1;0;
SHEET;603
PROCR;701;INITIAL ENTRY
0;102;565;0;0;0;0;STORE TW RT
1;32;;0;0;0;10;STORE TAPE ROUTE
2;5;565;9;0;0;0;
3;80;571;0;0;0;0;gINITIAL SR
4;125;;0;1;2;0;
5;101;;4;0;1;0;
6;115;;153;0;1;0;
7;118;;1;1;0;0;
8;102;565;8;0;0;0;SECOND STORE SIZE
9;115;;153;0;1;0;
10;102;565;3;0;0;0;FIRST STORE SIZE
11;106;;186;0;1;0;
12;101;;28;1;2;0;TEST P/T
13;127;701;18;0;3;0;gYES
14;106;;186;0;1;0;CARDS
15;103;565;1;0;0;0;STORE CD ROUTE
16;101;;2;1;1;0;
17;102;565;2;0;0;0;STORE MODS ROUTE
18;125;;0;1;2;0;
19;101;;3;0;1;0;
20;115;;175;0;1;0;
21;102;708;2;0;0;0;STORE YEAR
22;124;999;0;0;2;0;STORE ISP START
23;100;709;14;0;2;0;
24;114;566;12;0;0;0;
25;103;709;17;0;0;0;STORE SX1
26;102;703;19;0;0;0;SET SX1 AT 1
27;76;577;4;0;0;0;g
SHEET;604
PROCR;702;INSTRUCTION CONSTANTS
0;114;;154;0;0;0;TW ASL
1;100;722;2;0;1;0;LAST TW REQ
2;126;;2;0;1;0;FOR(9)
3;126;;31;0;1;0;CHECK HARDWARE
4;114;91;1000;0;1;0;SPECIAL ASL
5;115;698;9;0;1;0;
6;115;698;14;0;1;0;
7;115;698;19;0;1;0;
8;115;698;24;0;1;0;
9;115;579;21;0;1;0;INTERRUPTION
SHEET;605
CONST;703;0;SWITCH SETTINGS
0;(D);SC1: WRITE NEW COPY
1;0;SC2: WRITE NEW COPIES
2;0;SC3: UNLOAD RT 0
3;0;COPY WHOLE TAPE
4;0;SI1: LOAD INTERCODE
5;0;SL1: LOG REQ 1
6;0;     LOG REQ 2
7;0;     LOG REQ 3
8;0;SL2: END OF COMMENT
9;0;SL3: LOG SATURATION
10;0;SL4: END & ABANDON
11;0;SM1: MOD 1
12;0;     MOD 2
13;0;     MOD 3
14;0;     MOD 4
15;0;     MOD 5
16;0;SM2: LAST DIRECTIVE
17;0;SR1:'SER'COMMENT
18;0;ST1:TYPEWRITER TYPE
19;0;SX1: INITIAL ENTRY
SHEET;606
CONST;704;0;MASTER IDENTITY & MT ROUTES
0;(D);PROGRAMME
1;0;SERIAL
2;0;INTERIM
3;0;INTERCODE ROUTE
4;0;FIRST COPY ROUTE
5;0;SECOND COPY ROUTE
SHEET;607
CONST;705;1;MOD REGS
0;(D)300000;3/0
2;400000;4/0
4;500000;5/0
6;800000;8/0
8;3000000;48/0
10;1pp.;
12;40000.;4/14
14;100000000;4096/0
16;6000;
SHEET;608
CONST;706;0;COUNTING
0;(D)0;3 MIN
1;0;3 MIN
2;0;h SEC
3;0;h SEC
4;100;3 MIN III
5;400;3 MIN 326
6;400;hSEC III
7;1000;h SEC 326
8;0;
9;t;10/0
10;0;
11;64;100/0
SHEET;609
CONST;707;0;TEST ROUTE
0;(D)0;ROUTE IN BINARY
1;0;ROUTE IN OCTARY
2;0;FIRST WORD
3;0;OF BLOCK
SHEET;610
CONST;708;0;BRIC-A-BRAC
0;(D)ppppp;
1;ppppp;
2;(D)68;YEAR
3;0;MONTH
4;32;J
5;0;F
6;32;M
7;31;A
8;32;M
9;31;J
10;32;J
11;32;A
12;31;S
13;32;O
14;31;N
15;32;D
SHEET;611
CONST;709;0;MORE THEREOF
0;(D)ppp88;OCT COL CONST
1;.0000;BE
2;p0000;CHAPTER END SIGN
3;.1000;MINUS ZERO
4;73;CD REJ T
5;53;CD REJ C
6;64;CD REJ M
7;72;CD REJ S
8;0;A
9;0;
10;0;B
11;0;
12;0;C
13;8000;FL PT
14;p.00;COL CONST
15;38;COL CONST
16;3.1.4;
17;0;STORE FOR SX1
SHEET;612
CONST;710;1;WLS
0;(D);CD(OCT)/TW(OCT)
2;0;DIV/MODS(OCT)
4;0;TIMER/CLOCK
6;0;MT CH/LOUT
8;0;   /2ND STORE
10;0;CD(BIN)/TW(BIN)
12;0;   /MODS(BIN)
14;0;COPY TAPE 1
16;0;COPY TAPE 2
SHEET;613
CONST;711;1;MISCELLANY
0;(D)1;DECgBIN
2;t;CONVERSION TABLE
4;64;
6;3.8;
8;2710;
10;1;BINgOCT
12;20;CONVERSION TABLE
14;1;OCTgBIN
16;8;CONVERSION TABLE
SHEET;614
PROCR;712;INTERCODE PARAMETERS
0;100;;0;0;0;0;
1;100;;142;0;0;0;1 1
2;100;;142;0;0;0;2 1
3;100;;0;0;1;0;3 2
4;100;;0;0;0;0;4 2
5;100;;0;0;0;0;
6;100;;0;0;0;0;MR
7;100;999;0;0;1;0;MR
SHEET;615
CONST;713;1;COMMENTS (1)
0;(A)ABAND;
2;(A)ON (D)5.5.;
4;(A)CD  R;
6;EJ   ;
8;(D)5.5.;
10;(A)CLOCK;
12;PLEA;
14;(A)SE (D)5.5.;
16;(A)DATE ;
18;PLEAS;
20;(A)E  (D)5.5.;
22;(A)DATE ;
24;(A)REJ(D)5.5.;
26;(A)HAPPY;
28;NEW;
30;YEA;
32;(A)R  (D)5.5.;
34;(A)INTER;
36;RUPT ;
38;PLEAS;
40;(A)E  (D)5.5.;
SHEET;616
CONST;714;1;COMMENTS(2)
0;(D)005.(A)ISS;
2;(A)UE   ;
4;(A) GO E;
6;VEN F;
8;ASTER;
10;MAST;
12;ER RO;
14;UTINE;
16;LOCKO;
18;UT PL;
20;EASE ;
22;(D)5.5.;
24;(A)MASTE;
26;R TOO;
28; LARG;
30;(A)E  (D)5.5.;
32;(A)MOD R;
34;EJ   ;
36; ;
38;MODS ;
40;;
42;NOT ;
44;(A)CD (D)5.5.;
46;(A)OPT  ;
48;(D)5.5.;
50;(A)O REJ;
52;(D)5.5.;
SHEET;617
CONST;715;1;COMMENTS (3)
0;(A)OVERF;
2;LOW P;
4;LEASE;
6;(D)5.5.;
8;(A)PROG ;
10;REJ  ;
12;(A)TAPE ;
14;(A)REJ(D)5.5.;
16;(A)TAPES;
18;TIMER;
20;PLEA;
22;(A)SE (D)5.5.;
24;(A)U A P;
26;LEASE;
28;(D)5.5.;
30;(A)WRONG;
32;TAPE;
34;WRONG;
36;MODS;
38;WRONG;
40; STOR;
42;E SIZ;
44;(A)E  (D)5.5.;
SHEET;618
CONST;716;1;ODDMENTS
0;(D)7.7.7.7.7.-;
2;5p5p5p5p5p-;
4;0101010101;
6;7+7+7+7+7+;
8;(A)?????;
10;*  77;
12;>>>>>;
14;(D)5.5.5.5.5.;
16;000000001.;
18;1.00000000;
20;7.0000007.;
22;1000000000;
24;+0+0+0+0+0;
26;5p5p5p0041;,
28;(A)DBHDG;
30;(A)SERC(D)7:;
32;(A)WE  /;
34;%%%%%;
36;TOTAL;
38;INDEX;
40;PASSI;
42;ALLOC;
44;CHAPT;
46;LIP;
48;HIP;
50;LOP;
52;HOP;
54;END  ;
SHEET;619
CONST;717;1;SENTINELS
0;(A)5   1;
2;09000;
4;FINIS;
6;(D)6p6p6p6p6p;
8;5.00000047;
10;4p4p4p4p43;
12;7t5565547e;
14;(A)TAPE ;
16;START;
18;MAST;
20;ER RO;
22;UTINE;
SHEET;620
CONST;718;0;LOG WLS
0;(D)0;ANNEXE TO EDIT TO
1;0;WORD TO TYPE FROM
2;0;IND MR
3;t;IND MR
4;0;COL
5;3p000;CONST
SHEET;621
CONST;719;1;TW TA 1
0;(D)5.(A)LDB(D)5.;
2;0;
4;0;
6;0;
8;0;
10;0;
12;0;
14;0;
16;0;
18;0;
SHEET;622
CONST;720;1;TW TA 2
0;(D)5.(A)LDB(D)5.;
2;0;
4;0;
6;0;
8;0;
10;0;
12;0;
14;0;
16;0;
18;0;
SHEET;623
CONST;721;1;TW TA 3
0;(D)5.(A)LDB(D)5.;
2;0;
4;0;
6;0;
8;0;
10;0;
12;0;
14;0;
16;0;
18;0;
SHEET;624
CONST;722;1;BULK CLEARS
0;(D)2001400000;20
2;2000t00000;10
4;2003+00000;60
6;2040400000;1028
8;t00000;
10;3000040;
12;4000000;
14;2200000;
16;(D)1000000;
SHEET;625
TABLE;723;1;BULK COPIES
0;564;0;0;0;0;0;9;0;0;0;0;0;0;///// INSTALLATION DETAILS
2;91;1;0;0;0;0;10;0;0;0;0;0;0;/////MOD IDS
4;91;1;0;0;0;0;6;0;0;0;0;0;0;/////MASTER IDS
6;716;23;0;0;0;0;2;0;0;0;0;0;0;///// MINUS ZERO
8;710;4;0;0;0;0;1;0;0;0;0;0;0;///// CONSTANT
10;91;0;0;0;0;0;8;0;0;0;0;0;0;/////MOD BLOCK
12;734;0;0;0;0;0;0;0;1;0;0;0;0;///// PIPS(1)
14;735;0;0;0;0;0;7;0;0;0;0;0;0;///// PIPS(2)
16;736;0;0;0;0;0;7;0;3;0;0;0;0;///// PIPS(3)&(4)
18;738;0;0;0;0;0;13;0;0;0;0;0;0;///// SP
20;739;0;0;0;0;0;8;0;0;0;0;0;0;///// PIPS(5)
22;740;0;0;0;0;0;5;0;0;0;0;0;0;///// PIPS(6)
24;0;0;0;0;0;0;0;2;0;0;0;0;0;///// STORE DUMP
26;704;0;0;0;0;0;3;0;0;0;0;0;0;///// SOURCE BLOCK
28;91;0;0;0;0;0;10;0;0;0;0;0;0;/////MOD REJ
30;717;14;0;0;0;0;10;0;0;0;0;0;0;///// SPECIAL BLOCK
SHEET;626
TABLE;724;1;EDIT TIME
0;566;3;0;0;0;0;3;0;0;3;0;0;0;
2;716;30;0;0;2;0;1;4;1;0;0;0;1;/////TAB
4;717;6;0;0;2;0;1;0;0;0;0;0;0;RED
6;566;3;0;0;0;0;3;0;0;3;0;0;0;
8;716;30;0;0;2;0;1;4;0;0;0;0;0;/////TAB
10;0;156;0;0;0;0;2;2;1;0;0;0;0;///// WITH CLOCK
12;566;3;0;0;0;0;3;0;0;3;0;0;0;///// WITHOUT CLOCK
SHEET;627
TABLE;725;4;UNPACK CD
0;710;0;0;0;2;0;0;0;0;0;0;0;0;>>>>
2;710;0;0;0;0;1;0;0;0;0;0;0;1;MODS
4;565;11;0;0;0;0;0;0;0;0;0;0;1;CD BLOCK FIVE
SHEET;628
TABLE;726;1;*77/PROG REJ
0;704;0;0;0;0;0;5;0;3;0;0;0;0;PROGRAMME
2;704;1;0;0;0;0;5;0;1;0;0;0;0;SERIAL
4;704;2;0;0;0;0;2;3;1;2;0;0;0;INTERIM
6;713;8;0;0;2;0;2;3;1;0;0;0;1;///// LELE
8;91;0;0;0;2;0;5;0;0;0;0;0;0;PROGRAM
10;91;2;0;0;2;0;5;0;1;0;0;0;0;SERIAL
12;91;4;0;0;2;0;5;0;1;0;0;0;0;INTERIM
14;713;8;0;0;2;0;2;3;1;0;0;0;1;LELE
16;704;0;0;0;0;0;5;0;5;0;0;0;0;PROGRAMME
18;704;1;0;0;0;0;5;0;0;0;0;0;0;SERIAL
20;704;2;0;0;0;0;5;0;0;4;0;0;1;INTERIM
22;704;0;0;0;0;0;5;0;3;0;0;0;0;PROGRAMME
24;704;1;0;0;0;0;5;0;1;0;0;0;0;SERIAL
26;704;2;0;0;0;0;2;3;1;2;0;0;0;INTERIM
28;713;8;0;0;2;0;1;3;0;0;0;0;0;LE
30;713;8;0;0;2;0;2;3;0;0;0;0;1;LELE
SHEET;629
TABLE;727;1;RC/DB/WE
0;716;30;0;0;2;0;2;2;0;0;0;0;0;RC
2;707;1;0;0;0;0;3;2;1;1;0;0;0;RT
4;713;8;0;0;2;0;2;3;2;0;0;0;1;LELE
6;716;28;0;0;2;0;2;0;0;0;0;0;0;DB
8;707;1;0;0;0;0;3;2;1;1;0;0;0;RT
10;716;30;0;0;2;0;1;4;1;0;0;0;0;TAB
12;91;0;0;0;2;0;5;0;0;0;0;0;0;BLOCK
14;713;8;0;0;2;0;2;3;0;0;0;0;1;LELE
16;716;32;0;0;2;0;2;0;0;0;0;0;0;WE
18;707;1;0;0;0;0;3;2;1;1;0;0;0;RT
20;713;8;0;0;2;0;2;3;2;0;0;0;1;LELE
SHEET;630
TABLE;728;1;>>>>>
0;716;12;0;0;2;0;5;0;0;0;0;0;0;>>>>>
2;710;0;0;0;0;0;2;3;1;0;0;0;0;TW
4;710;1;0;0;0;0;2;3;1;0;0;0;0;CD
6;710;2;0;0;0;0;2;3;1;0;0;0;0;MODS
8;710;3;0;0;0;0;1;4;1;0;0;0;0;DIVS
10;564;4;0;0;0;0;1;4;1;0;0;0;0;CLOCK
12;564;5;0;0;0;0;1;4;1;0;0;0;0;TIMER
14;564;6;0;0;0;0;1;4;1;0;0;0;0;LOUT
16;564;7;0;0;0;0;1;4;1;0;0;0;0;MT
18;710;8;0;0;0;0;1;4;1;0;0;0;0;2ND STORE
20;713;8;0;0;2;0;2;3;2;0;0;0;1;LELE
SHEET;631
TABLE;729;1;HDG/SER
0;716;28;0;0;2;0;3;2;0;0;0;0;0;HDG
2;710;1;0;0;0;0;5;0;2;0;0;0;0;PROGM
4;91;6;0;0;2;0;2;3;1;0;0;0;0;FILE
6;713;8;0;0;2;0;2;3;0;0;0;0;1;LELE
8;716;30;0;0;2;0;3;0;0;0;0;0;0;SER
10;707;1;0;0;0;0;3;2;0;1;0;0;0;RT
12;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
14;566;0;0;0;0;0;5;0;0;4;0;0;0;EXP BLOCK
16;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
18;91;0;0;0;2;0;5;0;0;0;0;0;0;ACT BLOCK
20;713;8;0;0;2;0;2;3;0;0;0;0;1;LE LE
SHEET;632
TABLE;730;1;WRONG TAPE/TAPES
0;566;5;0;0;0;0;5;0;3;4;0;0;0;TAPE NO
2;713;8;0;0;2;0;2;3;0;0;0;0;1;LELE
4;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
6;710;14;0;0;2;0;5;0;0;0;0;0;0;TAPE NO
8;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
10;710;16;0;0;2;0;5;0;0;0;0;0;0;TAPE NO
12;713;8;0;0;2;0;2;3;1;0;0;0;1;LELE
14;703;0;0;0;0;0;5;0;0;5;0;0;0;TAPE NO
16;703;1;0;0;0;0;5;0;0;5;0;0;1;TAPE NO
SHEET;633
TABLE;731;1;WRONG MODS/MODS
0;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
2;710;5;0;0;0;0;5;0;0;4;0;0;0;MOD EXPECTED
4;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
6;710;4;0;0;0;0;5;0;0;4;0;0;0;MOD FOUNT
8;713;8;0;0;2;0;2;3;1;0;0;0;1;LELE
10;703;11;0;0;0;0;5;0;1;5;0;0;0;MOD 1
12;703;12;0;0;0;0;5;0;1;5;0;0;0;MOD 2
14;703;13;0;0;0;0;5;0;1;5;0;0;0;MOD 3
16;703;14;0;0;0;0;5;0;1;5;0;0;0;MOD 4
18;703;15;0;0;0;0;5;0;1;5;0;0;0;MOD 5
20;713;8;0;0;2;0;2;3;3;0;0;0;1;LELE
SHEET;634
TABLE;732;1;HIPHOPLIPLOP
0;91;1000;0;0;2;0;3;2;0;0;0;0;0;
2;707;1;0;0;0;0;3;2;0;1;0;0;0;RT
4;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
6;710;1;0;0;0;0;5;0;0;0;0;0;0;PTOGM
8;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
10;91;1002;0;0;0;0;5;0;0;0;0;0;0;RUN
12;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
14;91;1003;0;0;0;0;5;0;0;4;0;0;0;SPOOL
16;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
18;91;6;0;0;2;0;2;3;0;0;0;0;0;FILE
20;716;32;0;0;2;0;1;4;0;0;0;0;0;/
22;91;10;0;0;2;0;2;3;0;0;0;0;0;REEL
24;713;8;0;0;2;0;2;3;3;0;0;0;1;LELE
SHEET;635
TABLE;733;1;LOP
0;716;50;0;0;2;0;3;2;0;0;0;0;0;LOP
2;707;1;0;0;0;0;3;2;0;1;0;0;0;RT
4;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
6;717;2;0;0;2;0;5;0;0;0;0;0;0;9000
8;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
10;91;1000;0;0;2;0;5;0;0;0;0;0;0;SERIAL
12;716;30;0;0;2;0;1;4;0;0;0;0;0;TAB
14;566;5;0;0;0;0;5;0;0;4;0;0;0;SPOOOL
16;713;8;0;0;2;0;2;3;4;0;0;0;1;LELE
SHEET;636
PROCR;734;PRIMARY INPUT SEQUENCES(1)
0;100;;256;0;2;0;(h8 1 );OR 24/1/0g16
1;105;;1152;1;0;0;
2;100;;256;0;2;0;(& 1 )
3;102;;0;0;0;0;
4;100;;256;0;2;0;(& 1 )
5;102;;0;0;0;0;
6;100;;256;0;2;0;(& 1 )
7;102;;0;0;0;0;
8;100;;256;0;2;0;(& 1 )
9;102;;0;0;0;0;
10;100;;256;0;2;0;(Q--1 )
11;106;;257;1;0;0;;28/1/0g16
12;102;;16;0;0;0;(Q-2 -)
13;106;;260;1;0;0;;( &  &)
14;103;;0;0;0;0;(8-T  )
15;104;;263;1;0;0;;1
SHEET;637
PROCR;735;PRIMARY INPUT SEQUENCES (2)
0;106;;28;0;0;0;(16);CONVERT
1;102;;327;0;0;0;(18);FROM
2;102;;2;1;0;0;(20);LOAD
3;102;;4;0;0;0;(22);STORE
4;101;;141;1;3;0;(24);(1)
5;102;;5;0;0;0;(26)
6;124;;320;1;0;0;(28)
SHEET;638
PROCR;736;PRIMARY INPUT SEQUENCES(3)
0;106;;65;0;0;0;(17);SET UP ASLS FOR
1;103;;64;0;0;0;!(18);0/0
2;103;;72;0;0;0;(19);1/0
3;103;;192;0;0;0;(20);16/0
4;103;;200;0;0;0;(21);!17/0
5;124;;129;0;1;0;(22)
6;126;;0;1;0;0;(23);TEST ROUTE
7;124;;34;1;0;0;(24)gCLOSED
8;124;;28;1;0;0;(24)gOPEN
9;124;;28;1;0;0;(26)gOPEN
10;124;;28;1;0;0;(27)gOPEN
11;106;;66;0;0;0;(28);TEST FIRST ROUTE
12;127;;42;0;2;0;(29)gYES;TESTED OPEN
13;101;;8;1;3;0;(30)AUGMENT ROUTE
14;124;;41;1;0;0;(31)BY 8
15;100;;0;0;0;0;(32)
16;100;;0;0;0;0;(33)
17;101;;0;1;3;0;(34)ARRANGE TO TEST
18;105;;66;0;0;0;(35)NEXT CHANNEL
19;103;;66;0;0;0;(36)
20;107;;23;0;0;0;(37)
21;127;;22;0;3;0;(38);TEST BOTH CHANNELS
22;100;;259;0;0;0;(39)YES, HALT 1/0/3;CLOSED
23;124;;22;1;0;0;(40)gRETEST
24;107;;129;0;0;0;(41)
25;124;;129;0;1;0;(42)READ
26;119;;0;0;1;0;(43)
27;124;;129;0;1;0;(44);TEST ROUTE
28;126;;0;1;0;0;(45)
29;100;;259;0;0;0;(46)HALT 103;C
30;124;;44;1;0;0;(47)g;E
31;100;;261;0;0;0;(48)HALT 105;D
32;125;;0;1;0;0;(49);W
33;106;;256;1;0;0;(50);TEST NEXT BLOCK
34;105;;68;1;0;0;(51);CORRECT
35;127;;58;0;1;0;(52)gNO
36;106;;62;1;0;0;(53)UNPACK BLOCK
37;124;;67;0;1;0;(54)
38;128;999;0;1;0;0;(55)
39;124;;67;0;1;0;(56)
40;124;574;0;1;0;0;(57)gSIPS
41;106;;256;1;0;0;(58);TEST NEXT BLOCK
42;105;;70;1;0;0;(59);SAME AS THIS ONE
43;127;;42;0;0;0;(60)gYES
44;100;;270;0;0;0;(61)NO HALT 1/0/.
45;100;;261;0;0;0;(62)BULK COPY
46;100;;1024;0;0;0;(63)TABLE
47;100;;0;0;0;0;(64)
48;115;;256;0;0;0;(65)ASL
49;100;;8;0;0;0;(66)TEST ROUTE COUNTER
50;100;;0;0;1;0;(67)DIV ONE
SHEET;639
CONST;737;1;PRIMARY INPUT SEQUENCES(4)
0;(D)5p5p5p0042;(68)SECOND BLOCK
2;(A)H8 1 ;(70)FIRST BLOCK
SHEET;640
PROCR;738;INDEPENDENT STORE PRINT
0;125;;4096;1;1;0;(141)SET NON-INT
1;101;;8158;1;3;0;(142)SET UP ASL
2;102;;64;0;0;0;(143)
3;119;;0;0;1;0;(144)READ
4;126;;0;1;0;0;(145)TEST ROUTE
5;100;;769;0;0;0;(146)RC HALT 3/0/1
6;124;;145;1;0;0;(147)EN
7;100;;8159;0;0;0;(148)DB HALT 1/p/:/p
8;100;;32;0;0;0;(149)
9;106;;148;1;0;0;(150)UNPACK FIRST BLOCK
10;128;;8191;1;0;0;(151)
11;124;;8191;1;0;0;(152)gFIRST INSTRUCTION
12;100;;0;0;0;0;(153)PR RT TYPE/STORE SIZE/PR RT
SHEET;641
CONST;739;1;PRIMARY INPUT SEQUENCES(5)
0;(A)'8 1 ;(256)28/1/0g16
2; ;(258)g(129)FIRST MT ROUTE
4; 8  &;(260)BULK COPY TABLE
6;1;(262)                     ''
SHEET;642
PROCR;740;PRIMARY INPUT SEQUENCES(6)
0;106;;34;0;1;0;(320);CONVERT
1;102;;17;0;2;0;(322);FROM
2;125;;2;0;1;0;(324);LOAD
3;125;;1;0;2;0;(326);STORE)
4;124;;17;1;0;0;(328)g;(2)
-2;END;;;;;;
END