The text read off it
[90.05 sample-program listing, PDF p.212]
Compiler listing page, Appendix 90.05 (PDF p.212).
DATE 10/18/61 TIME 2.45 ACCOUNT ID. CT PUBLICATIONS PAGE 21
01324 0500 00 1 00016 10000 +4 CLA 1)BONDENOMINATION,1
01325 0074 00 4 00264 10010 +5 TSX SYS)180,4
01326 0 00000 0 00074 10001 +6 PZE 3)BONDENOMINATION,,0
01327 0020 00 0 00413 10010 +7 TRA SYS)267,0,0
01330 000003000001 10000 +8 OCT 000003000001
01331 0774 00 1 00005 10000 +9 AXT 5,1
01332 4500 00 0 00070 10001 +10 CAL 5)EMPLOYEE.NUMBER
01333 0560 00 1 00000 10000 +11 LDQ 1)EMPLOYEE.NUMBER,1
01334 4773 00 0 00000 10000 +12 RQL 0
01335 0771 00 0 00036 10000 +13 ARS 30
01336 4763 00 0 00036 10000 +14 LGL 30
01337 0602 00 0 00070 10001 +15 SLW 5)EMPLOYEE.NUMBER
01340 4763 00 0 00006 10000 +16 LGL 6
01341 0560 00 0 00071 10001 +17 LDQ 5)EMPLOYEE.NUMBER+1
01342 4773 00 0 00006 10000 +18 RQL 6
01343 4763 00 0 00036 10000 +19 LGL 30
01344 0602 00 0 00071 10001 +20 SLW 5)EMPLOYEE.NUMBER+1
01345 0441 00 0 01766 10001 +21 LDI CP)+58
01346 0604 00 0 00205 10010 +22 STI SYS)133
01347 4500 00 0 01667 10001 +23 CAL BL)2
01350 0361 00 0 01764 10001 +24 ACL CP)+56
01351 0602 00 0 00204 10010 +25 SLW SYS)132
01352 0074 00 4 00266 10010 +26 TSX SYS)182,4
01353 1 00017 1 00357 10010 +27 TXI SYS)239,1,15
01354 0441 00 0 01767 10001 +28 LDI CP)+59
01355 0604 00 0 00204 10010 +29 STI SYS)132
01356 0074 00 4 00266 10010 +30 TSX SYS)182,4
01357 1 00001 1 00414 10010 +31 TXI SYS)268,1,1
01360 1 00005 1 00415 10010 +32 TXI SYS)269,1,5
01361 1 00005 1 00423 10010 +33 TXI SYS)275,1,5
01362 0601 00 0 01643 10001 +34 STO 3.RS)1
01363 0500 00 0 00123 10001 +35 CLA 2)BONDPURCHASES
01364 0400 00 0 01643 10001 +36 ADD 3.RS)1
01365 0601 00 0 00123 10001 +37 STO 2)BONDPURCHASES
01366 0441 00 0 01763 10001 +38 LDI CP)+55
01367 0604 00 0 00205 10010 +39 STI SYS)133
01370 0441 00 0 01767 10001 +40 LDI CP)+59
01371 0604 00 0 00204 10010 +41 STI SYS)132
01372 0074 00 4 00266 10010 +42 TSX SYS)182,4
01373 1 00004 1 00276 10010 +43 TXI SYS)190,1,4
01374 000005000004 10000 +44 OCT 000005000004
01375 1 00002 1 00326 10010 +45 TXI SYS)214,1,2
01376 1 00005 1 00306 10010 +46 TXI SYS)198,1,5
01377 1 00007 1 00342 10010 +47 TXI SYS)226,1,7
01400 0074 00 4 00011 10010 +48 TSX IOC)9,4
01401 0 00000 0 04006 10010 +49 PZE BONDORDERFILE,,0
01402 7 00006 0 00070 10001 +50 IOST BONDORDER,,6
01403 0020 60 0 01262 10001 BOND.END TRA* BOND.ROUTINE
01404 0774 00 0 00000 10000 SEARCH AXT 0
01405 0535 00 1 01667 10001 +1 LAC BL)2,1
01406 7 00000 1 00446 10010 +2 TXL SYS)294,1,0
01407 0500 00 1 00004 10000 +3 CLA 1)RATE,1
01410 0535 00 2 01671 10001 +4 LAC PI)1,2
01411 7 00000 2 00446 10010 +5 TXL SYS)294,2,0
01412 0340 00 2 00000 10000 +6 CAS 0,2