The text read off it
[90.05 sample-program listing, PDF p.205]
Sample-program compilation listing — printer output page 14 of 16 (labels GN)070–GN)071, COMPUTE.PAY) (PDF p.205).
DATE 10/18/61 TIME 2.45 ACCOUNT ID. CT PUBLICATIONS PAGE 14
00530 4763 00 0 00022 10000 +1 LGL 18
00531 4320 00 0 01732 10001 +2 ANA CP)+30
00532 0602 00 0 01621 10001 +3 SLW RS)0
00533 0535 00 1 01670 10001 +4 LAC BL)3,1
00534 7 00000 1 00446 10010 +5 TXL SYS)294,1,0
00535 4500 00 1 00000 10000 +6 CAL 2)DEPARTMENT,1
00536 4320 00 0 01732 10001 +7 ANA CP)+30
00537 4340 00 0 01621 10001 +8 LAS RS)0
00540 0020 00 0 00542 10001 +9 TRA *+2
00541 0020 00 0 00546 10001 +10 TRA GN)070
00542 0774 00 7 00545 10001 +11 AXT *+3,7
00543 0634 00 4 01473 10001 +12 SXA DEPARTMENT.END,4
00544 0020 00 0 01474 10001 +13 TRA DEPARTMENT.END+1
00545 0020 00 0 00547 10001 +14 TRA GN)071
00546 0020 00 0 00563 10001 GN)070 TRA COMPUTE.PAY
00547 0441 00 0 01744 10001 GN)071 LDI CP)+40
00550 0604 00 0 00205 10010 +1 STI SYS)133
00551 0074 00 4 00266 10010 +2 TSX SYS)182,4
00552 1 00066 1 00364 10010 +3 TXI SYS)244,1,54
00553 4500 00 0 01714 10001 +4 CAL CP)+16
00554 0320 00 0 00047 10001 +5 ANS CURRENT.DEPT
00555 0535 00 1 01670 10001 +6 LAC BL)3,1
00556 7 00000 1 00446 10010 +7 TXL SYS)294,1,0
00557 4500 00 1 00000 10000 +8 CAL 2)DEPARTMENT,1
00560 0771 00 0 00022 10000 +9 ARS 18
00561 4320 00 0 01715 10001 +10 ANA CP)+17
00562 4602 00 0 00047 10001 +11 ORS CURRENT.DEPT
00563 0535 00 1 01670 10001 COMPUTE.PAY LAC BL)3,1
00564 7 00000 1 00446 10010 +1 TXL SYS)294,1,0
00565 4500 00 1 00001 10000 +2 CAL 2)DATE,1
00566 0535 00 2 01667 10001 +3 LAC BL)2,2
00567 7 00000 2 00446 10010 +4 TXL SYS)294,2,0
00570 0602 00 2 00005 10000 +5 SLW 1)DATE,2
00571 4500 00 0 01670 10001 +6 CAL BL)3
00572 0361 00 0 01760 10001 +7 ACL CP)+52
00573 0602 00 0 00204 10010 +8 SLW SYS)132
00574 0074 00 4 00266 10010 +9 TSX SYS)182,4
00575 1 00003 1 00270 10010 +10 TXI SYS)184,1,3
00576 0601 00 0 00110 10001 +11 STO 3)HOURS
00577 0441 00 0 01761 10001 +12 LDI CP)+53
00600 0604 00 0 00205 10010 +13 STI SYS)133
00601 4500 00 0 01670 10001 +14 CAL BL)3
00602 0361 00 0 01760 10001 +15 ACL CP)+52
00603 0602 00 0 00204 10010 +16 SLW SYS)132
00604 0074 00 4 00266 10010 +17 TSX SYS)182,4
00605 1 00004 1 00271 10010 +18 TXI SYS)185,1,4
00606 000004000003 10000 +19 OCT 000004000003
00607 1 00002 1 00324 10010 +20 TXI SYS)212,1,2
00610 1 00003 1 00301 10010 +21 TXI SYS)193,1,3
00611 1 00005 1 00341 10010 +22 TXI SYS)225,1,5
00612 0500 00 0 00110 10001 +23 CLA 3)HOURS
00613 0340 00 0 01701 10001 +24 CAS CP)+5
00614 0020 00 0 00617 10001 +25 TRA *+3
00615 0020 00 0 00637 10001 +26 TRA GN)072
00616 0020 00 0 00637 10001 +27 TRA GN)072