,008015,036040B036                 1001 LOAD TEST                       0001B 0A
,008015,022029L030T99LT99T98      LOAD 1400 POS. WITH BLANKS            0001B 02
,008015,022029L030T99LT99T98 G    LOAD 1400 POS. WITH G                 0001B 03
,008015,022029L030Z99LZ99Z98      LOAD 2000 POS. WITH BLANKS            0001B 04
,008015,022029L030Z99LZ99Z98 G    LOAD 2000 POS. WITH G                 0001B 05
,008015,022029L030I99LI99I98      LOAD 4000 POS. WITH BLANKS            0001B 06
,008015,022029L030I99LI99I98 G    LOAD 4000 POS. WITH G                 0001B 07
,008015,036040B036                 1001 MOVE TEST                       0002B 0A
,008015,022029,036040M040T99MT99T98.0221        MOVE 1   1399 THRU 040  0002B 02
,008015,022029,036040M040T99MT99T98.0222        MOVE 2   1399 THRU 040  0002B 03
,008015,022029,036040M040T99MT99T98.0224        MOVE 4   1399 THRU 040  0002B 04
,008015,022029,036040M040T99MT99T98.0228        MOVE 8   1399 THRU 040  0002B 05
,008015,022029,036040M040T99MT99T98.022A        MOVE A   1399 THRU 040  0002B 06
,008015,022029,036040M040T99MT99T98.022B        MOVE B   1399 THRU 040  0002B 07
,008015,022029,036040M040T99MT99T98.022D        MOVE D   1399 THRU 040  0002B 08
,008015,022029,036040M040T99MT99T98.022G        MOVE G   1399 THRU 040  0002B 09
,0080121001                                     SENSE SWITCHES          0003B 0A
,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 0003B 02
,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 0003B 03
L057S4510012,049L0772772/2772</40/60</80L/892702/2702413    CARD 1 OF 3 0003B 04
,019026,033,040044,051051/340001       TITLE PRINT ROUTINE  CARD 2 OF 3 0003B 05
,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/333080          CARD 3 OF 3 0003B 06
L0313961001B399S551             USE WHEN TESTS ARE RUN FROM TAPE        0003B 07
L0314041001BS88                   ,,                                    0003B 08
L0314181001.                    STOP TO SET SW. ON WHEN RUN FROM TAPE   0003B 09
L0314191001/332                 START TEST                              0003B 10
L0314231001/                                                            0003B 11
L0314241001BS00S521             BR TO TITLE PRINT ROUTINE IF 1 IN S52   0003B 12
L0314321001D436603              MOVE 6 INTO LOC 603 & 608 FOR 1ST OPER. 0003B 13
L0314391001D436608                ,,                                    0003B 14
L0314461001L?20220              LOAD NINES IN -COUNTERS SHOULD BE- FIELD0003B 15
L0314531001L?60250              LOAD ZEROS IN -COUNTERS ARE- FIELD      0003B 16
L0314601001,234237              SET WORD MARKS IN ALL COUNTERS          0003B 17
L0314671001,240243                ,,                                    0003B 18
L0314741001,246249                ,,                                    0003B 19
L0314811001B471B                B ON TO ADD                             0003B 20
L0314861001B478                                                         0003B 21
L0314901001A/09235              ADD 1 TO B CTR                          0003B 22
L0314971001B487C                C ON TO ADD                             0003B 23
L0315021001B494                                                         0003B 24
L0315061001A/09238              ADD 1 TO C CTR                          0003B 25
L0315131001B503D                D ON TO ADD                             0003B 26
L0315181001B510                                                         0003B 27
L0315221001A/09241              ADD 1 TO D CTR                          0003B 28
L0315291001B519E                E ON TO ADD                             0003B 29
L0315341001B526                                                         0003B 30
L0315381001A/09244              ADD 1 TO E CTR                          0003B 31
L0315451001B535F                F ON TO ADD                             0003B 32
L0315501001B542                                                         0003B 33
L0315541001A/09247              ADD 1 TO F CTR                          0003B 34
L0315611001B551G                G ON TO ADD                             0003B 35
L0315661001B558                                                         0003B 36
L0315701001A/09250              ADD 1 TO G CTR                          0003B 37
L0315771001A/09232              ADD 1 TO CYCLE CTR                      0003B 38
L0315841001C202232              TEST FOR 99 IN CYCLE CTR                0003B 39
L0315911001B462/                BR TO REPEAT IF NOT 99                  0003B 40
L0315961001<237240              CLEAR WORD MARKS FROM COUNTERS          0003B 41
L0316031001<243246                ,,                                    0003B 42
L0316101001<249                   ,,                                    0003B 43
L0316141001C220250              TEST FOR ERROR IN CTRS- ERROR IF UNEQ   0003B 44
L0316211001B650/                CHANGED TO B850/ FOR SECOND OPERATION   0003B 45
L0316261001B673                 CHANGED TO B873 FOR SECOND OPERATION    0003B 46
L0316691001L/14285              ERROR PRINT ROUTINE WITH SWITCHES ON    0003B 47
L0316761001B669S521               ,,                                    0003B 48
L0316841001.696                   ,,                                    0003B 49
L03168810012696                   ,,                                    0003B 50
L0316921001L/19285              CORRECT PRINT ROUTINE WITH SWITCHES ON  0003B 51
L0316991001B692S521               ,,                                    0003B 52
L0317071001B696                   ,,                                    0003B 53
L03171110012696                   ,,                                    0003B 54
L0317151001.700                 STOP TO SET ALL SWITCHES OFF OR CHANGE  0003B 55
L0317151001.700                 .700 TO B413 TO REPEAT ON OPERATION     0003B 56
L0317191001L?40220              LOAD 99 AND 12 ZEROS IN CTRS SH BE FIELD0003B 57
L0317261001D858603              MOVE 8 INTO LOC 603 & 608 FOR 2ND OPER. 0003B 58
L0317331001D858608                ,,                                    0003B 59
L0317401001B434                 BRANCH TO EXECUTE SECOND OPERATION      0003B 60
L0318691001L/14285              ERROR PRINT ROUTINE WITH SWITCHES OFF   0003B 61
L0318761001B869S521               ,,                                    0003B 62
L0318841001.896                   ,,                                    0003B 63
L03188810012896                   ,,                                    0003B 64
L0318921001L/19285              CORRECT PRINT ROUTINE WITH SWITCHES OFF 0003B 65
L0318991001B892S521               ,,                                    0003B 66
L0319071001B896                   ,,                                    0003B 67
L03191110012896                   ,,                                    0003B 68
L0319151001.900                 STOP TO SET SW.FOR NEXT TEST OR CHANGE  0003B 69
L0319151001.900                 .900 TO B700 TO REPEAT OFF OPERATION    0003B 70
L0319191001B348                 BRANCH TO READ NEXT RECORD              0003B 71
L031?20100199 99 99 99 99 99 99 CYCLE,B,C,D,E,F&G CTRS AFTER ON OPER.   0003B 72
L031?40100199 00 00 00 00 00 00 CYCLE,B,C,D,E,F&G CTRS AFTER OFF OPER.  0003B 73
L031?60100100 00 00 00 00 00 00 CONSTANTS TO SET CTRS TO ZERO           0003B 74
L031/2810011                    CONSTANT TO INCREMENT CYCLE COUNTERS    0003B 75
L031/291001ERROR                CONSTANTS                               0003B 76
L031/341001                       ,,                                    0003B 77
L031/391001COUNTERS SHOULD BE     ,,                                    0003B 78
L031/591001          COUNTERS A   ,,                                    0003B 79
L031/791001RE                     ,,                                    0003B 80
L031/991001                       ,,                                    0003B 81
,019027,031,038042B031T98|B400L046352BW04BS88   SENSE SWITCHES          0003B 82