The text read off it
[90.05 sample-program listing, PDF p.211]
Compiler listing page, Appendix 90.05 (PDF p.211).
DATE 10/18/61 TIME 2.45 ACCOUNT ID. CT PUBLICATIONS PAGE 20
01235 0765 00 0 00043 10000 +13 LRS 35
01236 0221 00 0 01733 10001 +14 DVP CP)+31
01237 4600 00 0 00106 10001 +15 STQ 4)WHT
01240 0057 00 777777 10000 +16 RIR 777777
01241 0560 00 0 01674 10001 +17 LDQ CP)+0
01242 0200 00 0 01733 10001 +18 MPY CP)+31
01243 0131 00 0 00000 10000 +19 XCA
01244 0340 00 0 00106 10001 +20 CAS 4)WHT
01245 0020 00 0 01250 10001 +21 TRA *+3
01246 0020 00 0 01250 10001 +22 TRA *+2
01247 0055 00 000001 10000 +23 SIR 000001
01250 0754 00 0 00000 10000 +24 PXA 0,0
01251 0054 00 000001 10000 +25 RFT 000001
01252 0500 00 0 01675 10001 +26 CLA CP)+1
01253 0131 00 0 00000 10000 +27 XCA
01254 0200 00 0 00106 10001 +28 MPY 4)WHT
01255 4600 00 0 00106 10001 +29 STQ 4)WHT
01256 0500 00 1 00013 10000 +30 CLA 1)WHT,1
01257 0400 00 0 00106 10001 +31 ADD 4)WHT
01260 0601 00 1 00013 10000 +32 STO 1)WHT,1
01261 0020 60 0 01220 10001 GN)078 TRA* WITHOLDING.TAX.ROUTINE
01262 0774 00 0 00000 10000 BOND.ROUTINE AXT 0
01263 0535 00 1 01667 10001 +1 LAC BL)2,1
01264 7 00000 1 00446 10010 +2 TXL SYS)294,1,0
01265 0500 00 1 00015 10000 +3 CLA BONDACCUMULATION,1
01266 0400 00 1 00014 10000 +4 ADD 1)BONDEDUCTION,1
01267 0601 00 1 00015 10000 +5 STO BONDACCUMULATION,1
01270 0500 00 0 00117 10001 +6 CLA 4)BONDEDUCTION
01271 0400 00 1 00014 10000 +7 ADD 1)BONDEDUCTION,1
01272 0601 00 0 00117 10001 +8 STO 4)BONDEDUCTION
01273 0500 00 1 00014 10000 +9 CLA 1)BONDEDUCTION,1
01274 0074 00 4 00264 10010 +10 TSX SYS)180,4
01275 0 00000 0 00034 10001 +11 PZE 2)BONDEDUCTION,,0
01276 1 00004 1 00413 10010 +12 TXI SYS)267,1,4
01277 000004000003 10000 +13 OCT 000004000003
01300 0774 00 1 00006 10000 +14 AXT 6,1
01301 0535 00 1 01667 10001 +15 LAC BL)2,1
01302 7 00000 1 00446 10010 +16 TXL SYS)294,1,0
01303 0500 00 1 00016 10000 +17 CLA 1)BONDENOMINATION,1
01304 0340 00 1 00015 10000 +18 CAS BONDACCUMULATION,1
01305 0020 00 0 01313 10001 +19 TRA GN)079
01306 0020 00 0 01307 10001 +20 TRA *+1
01307 0500 00 1 00015 10000 +21 CLA BONDACCUMULATION,1
01310 0402 00 1 00016 10000 +22 SUB 1)BONDENOMINATION,1
01311 0601 00 1 00015 10000 +23 STO BONDACCUMULATION,1
01312 0020 00 0 01320 10001 +24 TRA GN)080
01313 0441 00 0 01763 10001 GN)079 LDI CP)+55
01314 0604 00 0 00205 10010 +1 STI SYS)133
01315 0074 00 4 00266 10010 +2 TSX SYS)182,4
01316 1 00010 1 00363 10010 +3 TXI SYS)243,1,8
01317 0020 00 0 01403 10001 +4 TRA BOND.END
01320 0535 00 1 01667 10001 GN)080 LAC BL)2,1
01321 7 00000 1 00446 10010 +1 TXL SYS)294,1,0
01322 4500 00 1 00005 10000 +2 CAL 1)DATE,1
01323 0602 00 0 00075 10001 +3 SLW 5)DATE