C$TF

* PAGE 1

0001 * 0002 * 0003 SUBR C$TF TEST FRAME 0004 * 0005 * 0006 CF5 H316 AND DDP-516 0007 REL RELOCATABLE 0008 * 0009 * 0010 00000 0 000000 C$TF DAC ** RETURN ADDRESS 0011 00001 0 35 00031 LDX =-9 SET INDEX 0012 00002 0 03 00030 ANA ='177 CONVERT TO FORCED EIGHT 0013 00003 0 05 00027 ERA ='200 0014 * 0015 00004 1 11 00027 LOOP CAS TABL+9,1 TABLE 0016 00005 100000 SKP 0017 00006 0 01 00011 JMP EXIT EXIT 0018 00007 0 12 00000 IRS 0 INDEX 0019 00010 0 01 00004 JMP LOOP LOOP 0020 * 0021 00011 0 13 00000 EXIT IMA C$TF RETURN ADDRESS 0022 00012 0 06 00000 ADD 0 INDEX 0023 00013 0 07 00031 SUB =-9 0024 00014 0 13 00000 IMA C$TF RETURN ADDRESS 0025 00015 -0 01 00000 JMP* C$TF RETURN 0026 * 0027 * 0028 * CONSTANTS 0029 * 0030 * CHARACTER TABLE 0031 00016 000200 TABL OCT 200 BLANK TAPE 0032 00017 000201 OCT 201 START OF OBJECT BLOCK 0033 00020 000203 OCT 203 END OF TEXT 0034 00021 000212 OCT 212 LINEFEED 0035 00022 000215 OCT 215 CARRIAGE RETURN 0036 00023 000223 OCT 223 DC3 0037 00024 000334 OCT 334 TAB 0038 00025 000337 OCT 337 BACK-ARROW 0039 00026 000377 OCT 377 DEL 0040 * 0041 * LITERALS 0042 00027 000200 FIN LITERALS 00030 000177 00031 177767 0043 * 0044 * 0045 END END OF C$TF 17.MAR.70 P.J.VYSE C$TF 000000 EXIT 000011 LOOP 000004 TABL 000016
* PAGE 2

0000 WARNING OR ERROR FLAGS DAP-16 MOD 2 REV. C 01-26-71