Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.comt8ad +++| CTEXT COMT8AD - *ASCII8* CODE TO DISPLAY CODE.
00002 M00S00002.comt8ad +++| IF -DEF,QUAL$,1
00003 M00S00003.comt8ad +++| QUAL COMT8AD
00004 M00S00004.comt8ad +++| SPACE 4,10
00005 M00S00005.comt8ad +++| BASE O
| Line S00006 Modification History |
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00006 M01S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
| Line S00001 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00007 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00008 M00S00007.comt8ad +++| 8AD SPACE 4,10
00009 M00S00008.comt8ad +++|** T8AD - *ASCII8* CODE TO DISPLAY CODE.
00010 M00S00009.comt8ad +++|* D. R. HILGREN. 79/01/15.
00011 M00S00010.comt8ad +++| SPACE 4,10
00012 M00S00011.comt8ad +++|** COMT8AD IS A TABLE TO ALLOW TRANSLATION OF
00013 M00S00012.comt8ad +++|* 12-BIT ASCII CODE TO DISPLAY CODE.
00014 M00S00013.comt8ad +++|*
00015 M00S00014.comt8ad +++|* THE 12-BIT ASCII CODE 140B, CODES THAT ARE
00016 M00S00015.comt8ad +++|* LESS THAN 040B, AND CODES THAT ARE GREATER THAN 172B HAVE
00017 M00S00016.comt8ad +++|* NO DISPLAY CODE EQUIVALENT. IT IS UP TO THE CALLING
00018 M00S00017.comt8ad +++|* PROGRAM TO PROCESS SUCH CODES.
00019 M00S00018.comt8ad +++| SPACE 4,10
00020 M00S00019.comt8ad +++| T8AD BSS 0
00021 M00S00020.comt8ad +++| LOC 0
00022 M00S00021.comt8ad +++|
00023 M00S00022.comt8ad +++| CON 1R 040
00024 M00S00023.comt8ad +++| CON 1R! 041
00025 M00S00024.comt8ad +++| CON 1R" 042
00026 M00S00025.comt8ad +++| CON 1R# 043
00027 M00S00026.comt8ad +++| CON 1R$ 044
00028 M00S00027.comt8ad +++| CON 63 045 (PERCENT)
00029 M00S00028.comt8ad +++| CON 1R& 046
00030 M00S00029.comt8ad +++| CON 1R' 047
00031 M00S00030.comt8ad +++| CON 1R( 050
00032 M00S00031.comt8ad +++| CON 1R) 051
00033 M00S00032.comt8ad +++| CON 1R* 052
00034 M00S00033.comt8ad +++| CON 1R+ 053
00035 M00S00034.comt8ad +++| CON 1R, 054
00036 M00S00035.comt8ad +++| CON 1R- 055
00037 M00S00036.comt8ad +++| CON 1R. 056
00038 M00S00037.comt8ad +++| CON 1R/ 057
00039 M00S00038.comt8ad +++| CON 1R0 060
00040 M00S00039.comt8ad +++| CON 1R1 061
00041 M00S00040.comt8ad +++| CON 1R2 062
00042 M00S00041.comt8ad +++| CON 1R3 063
00043 M00S00042.comt8ad +++| CON 1R4 064
00044 M00S00043.comt8ad +++| CON 1R5 065
00045 M00S00044.comt8ad +++| CON 1R6 066
00046 M00S00045.comt8ad +++| CON 1R7 067
00047 M00S00046.comt8ad +++| CON 1R8 070
00048 M00S00047.comt8ad +++| CON 1R9 071
00049 M00S00048.comt8ad +++| CON 00 072 (COLON)
00050 M00S00049.comt8ad +++| CON 1R; 073
00051 M00S00050.comt8ad +++| CON 1R< 074
00052 M00S00051.comt8ad +++| CON 1R= 075
00053 M00S00052.comt8ad +++| CON 1R> 076
00054 M00S00053.comt8ad +++| CON 1R? 077
00055 M00S00054.comt8ad +++| CON 1R; 100
00056 M00S00055.comt8ad +++| CON 1RA 101, 141
00057 M00S00056.comt8ad +++| CON 1RB 102, 142
00058 M00S00057.comt8ad +++| CON 1RC 103, 143
00059 M00S00058.comt8ad +++| CON 1RD 104, 144
00060 M00S00059.comt8ad +++| CON 1RE 105, 145
00061 M00S00060.comt8ad +++| CON 1RF 106, 146
00062 M00S00061.comt8ad +++| CON 1RG 107, 147
00063 M00S00062.comt8ad +++| CON 1RH 110, 150
00064 M00S00063.comt8ad +++| CON 1RI 111, 151
00065 M00S00064.comt8ad +++| CON 1RJ 112, 152
00066 M00S00065.comt8ad +++| CON 1RK 113, 153
00067 M00S00066.comt8ad +++| CON 1RL 114, 154
00068 M00S00067.comt8ad +++| CON 1RM 115, 155
00069 M00S00068.comt8ad +++| CON 1RN 116, 156
00070 M00S00069.comt8ad +++| CON 1RO 117, 157
00071 M00S00070.comt8ad +++| CON 1RP 120, 160
00072 M00S00071.comt8ad +++| CON 1RQ 121, 161
00073 M00S00072.comt8ad +++| CON 1RR 122, 162
00074 M00S00073.comt8ad +++| CON 1RS 123, 163
00075 M00S00074.comt8ad +++| CON 1RT 124, 164
00076 M00S00075.comt8ad +++| CON 1RU 125, 165
00077 M00S00076.comt8ad +++| CON 1RV 126, 166
00078 M00S00077.comt8ad +++| CON 1RW 127, 167
00079 M00S00078.comt8ad +++| CON 1RX 130, 170
00080 M00S00079.comt8ad +++| CON 1RY 131, 171
00081 M00S00080.comt8ad +++| CON 1RZ 132, 172
00082 M00S00081.comt8ad +++| CON 1R[ 133
00083 M00S00082.comt8ad +++| CON 1R\ 134
00084 M00S00083.comt8ad +++| CON 1R] 135
00085 M00S00084.comt8ad +++| CON 1R; 136
00086 M00S00085.comt8ad +++| CON 65 137 (CONCATENATION OR UNDERLINE)
00087 M00S00086.comt8ad +++|
00088 M00S00087.comt8ad +++|
00089 M00S00088.comt8ad +++| LOC *O
00090 M00S00089.comt8ad +++| BASE *
00091 M00S00090.comt8ad +++|
00092 M00S00091.comt8ad +++| QUAL$ IF -DEF,QUAL$
00093 M00S00092.comt8ad +++| QUAL *
00094 M00S00093.comt8ad +++| T8AD EQU /COMT8AD/T8AD
00095 M00S00094.comt8ad +++| QUAL$ ENDIF
00096 M00S00095.comt8ad +++| ENDX