User Tools

Site Tools


cdc:nos2.source:opl.opl871:common:comtda8

Common COMTDA8

1 Modification

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.comtda8 +++|          CTEXT  COMTDA8 - DISPLAY CODE TO *ASCII8* CODE.
00002  M01S00002.comtda8 +++|          SPACE  4,10
00003  M01S00003.comtda8 +++|          BASE   O
Line S00004 Modification History
M01 (Added by) comtda8
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00004  M02S00004.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1979.
00005  M01S00001.281l803 +++|*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00006  M01S00005.comtda8 +++| DA8      SPACE  4,10
00007  M01S00006.comtda8 +++|*         TDA8 - DISPLAY CODE TO *ASCII8* CODE.
00008  M01S00007.comtda8 +++|*         D. R. HILGREN.     79/01/15.
00009  M01S00008.comtda8 +++|          SPACE  4,10
00010  M01S00009.comtda8 +++|**        TABLE FORMAT.
00011  M01S00010.comtda8 +++|*
00012  M01S00011.comtda8 +++|*
00013  M01S00012.comtda8 +++|*         FOR CP CODE -
00014  M01S00013.comtda8 +++|*
00015  M01S00014.comtda8 +++|*T,       1/ E ,41/ 0 ,1/ I ,5/ 0 ,12/ ASCII8
Figure

0111216171829 ASCII8 0 I 0 305859 0 E

00016  M01S00015.comtda8 +++|*
00017  M01S00016.comtda8 +++|*
00018  M01S00017.comtda8 +++|*         FOR PP CODE -
00019  M01S00018.comtda8 +++|*
00020  M01S00019.comtda8 +++|*T,       12/ ASCII8
Figure

011 ASCII8

00021  M01S00020.comtda8 +++|*
00022  M01S00021.comtda8 +++|*
00023  M01S00022.comtda8 +++|*         E = 1, IF ESCAPE CODED CHARACTER (IF SO,
00024  M01S00023.comtda8 +++|*                ASCII8 = FWA OF ESCAPE CODE PART OF TABLE).
00025  M01S00024.comtda8 +++|*         I = 1, IF CODE IS AN ILLEGAL CODE.  SUCH A CODE IS
00026  M01S00025.comtda8 +++|*                CONVERTED TO AN *ASCII8* NULL.
00027  M01S00026.comtda8 +++|*         ASCII8 = 12-BIT ASCII CODE.
00028  M01S00027.comtda8 +++|          SPACE  4,10
00029  M01S00028.comtda8 +++| TDA8     BSS    0
00030  M01S00029.comtda8 +++|          LOC    0
00031  M01S00030.comtda8 +++|
00032  M01S00031.comtda8 +++|          CODE   A
00033  M01S00032.comtda8 +++|
00034  M01S00033.comtda8 +++|          CON    72          00    COLON
00035  M01S00034.comtda8 +++|          CON    1RA+40B     01    UPPER CASE A
00036  M01S00035.comtda8 +++|          CON    1RB+40B     02    UPPER CASE B
00037  M01S00036.comtda8 +++|          CON    1RC+40B     03    UPPER CASE C
00038  M01S00037.comtda8 +++|          CON    1RD+40B     04    UPPER CASE D
00039  M01S00038.comtda8 +++|          CON    1RE+40B     05    UPPER CASE E
00040  M01S00039.comtda8 +++|          CON    1RF+40B     06    UPPER CASE F
00041  M01S00040.comtda8 +++|          CON    1RG+40B     07    UPPER CASE G
00042  M01S00041.comtda8 +++|*
00043  M01S00042.comtda8 +++|          CON    1RH+40B     10    UPPER CASE H
00044  M01S00043.comtda8 +++|          CON    1RI+40B     11    UPPER CASE I
00045  M01S00044.comtda8 +++|          CON    1RJ+40B     12    UPPER CASE J
00046  M01S00045.comtda8 +++|          CON    1RK+40B     13    UPPER CASE K
00047  M01S00046.comtda8 +++|          CON    1RL+40B     14    UPPER CASE L
00048  M01S00047.comtda8 +++|          CON    1RM+40B     15    UPPER CASE M
00049  M01S00048.comtda8 +++|          CON    1RN+40B     16    UPPER CASE N
00050  M01S00049.comtda8 +++|          CON    1RO+40B     17    UPPER CASE O
00051  M01S00050.comtda8 +++|*
00052  M01S00051.comtda8 +++|          CON    1RP+40B     20    UPPER CASE P
00053  M01S00052.comtda8 +++|          CON    1RQ+40B     21    UPPER CASE Q
00054  M01S00053.comtda8 +++|          CON    1RR+40B     22    UPPER CASE R
00055  M01S00054.comtda8 +++|          CON    1RS+40B     23    UPPER CASE S
00056  M01S00055.comtda8 +++|          CON    1RT+40B     24    UPPER CASE T
00057  M01S00056.comtda8 +++|          CON    1RU+40B     25    UPPER CASE U
00058  M01S00057.comtda8 +++|          CON    1RV+40B     26    UPPER CASE V
00059  M01S00058.comtda8 +++|          CON    1RW+40B     27    UPPER CASE W
00060  M01S00059.comtda8 +++|*
00061  M01S00060.comtda8 +++|          CON    1RX+40B     30    UPPER CASE X
00062  M01S00061.comtda8 +++|          CON    1RY+40B     31    UPPER CASE Y
00063  M01S00062.comtda8 +++|          CON    1RZ+40B     32    UPPER CASE Z
00064  M01S00063.comtda8 +++|          CON    1R0+40B     33    0
00065  M01S00064.comtda8 +++|          CON    1R1+40B     34    1
00066  M01S00065.comtda8 +++|          CON    1R2+40B     35    2
00067  M01S00066.comtda8 +++|          CON    1R3+40B     36    3
00068  M01S00067.comtda8 +++|          CON    1R4+40B     37    4
00069  M01S00068.comtda8 +++|*
00070  M01S00069.comtda8 +++|          CON    1R5+40B     40    5
00071  M01S00070.comtda8 +++|          CON    1R6+40B     41    6
00072  M01S00071.comtda8 +++|          CON    1R7+40B     42    7
00073  M01S00072.comtda8 +++|          CON    1R8+40B     43    8
00074  M01S00073.comtda8 +++|          CON    1R9+40B     44    9
00075  M01S00074.comtda8 +++|          CON    1R++40B     45    PLUS
00076  M01S00075.comtda8 +++|          CON    1R-+40B     46    MINUS (HYPHEN)
00077  M01S00076.comtda8 +++|          CON    1R*+40B     47    ASTERISK
00078  M01S00077.comtda8 +++|*
00079  M01S00078.comtda8 +++|          CON    1R/+40B     50    SLASH (DIVISION)
00080  M01S00079.comtda8 +++|          CON    1R(+40B     51    OPEN PARENTHESIS
00081  M01S00080.comtda8 +++|          CON    1R)+40B     52    CLOSED PARENTHESIS
00082  M01S00081.comtda8 +++|          CON    1R$+40B     53    DOLLAR SIGN
00083  M01S00082.comtda8 +++|          CON    1R=+40B     54    EQUAL SIGN
00084  M01S00083.comtda8 +++|          CON    1R +40B     55    SPACE
00085  M01S00084.comtda8 +++|          CON    1R,+40B     56    COMMA
00086  M01S00085.comtda8 +++|          CON    1R.+40B     57    PERIOD (DECIMAL POINT)
00087  M01S00086.comtda8 +++|*
00088  M01S00087.comtda8 +++|          CON    1R#+40B     60    POUND SIGN
00089  M01S00088.comtda8 +++|          CON    1R[+40B     61    OPEN BRACKET
00090  M01S00089.comtda8 +++|          CON    1R]+40B     62    CLOSED BRACKET
00091  M01S00090.comtda8 +++|          CON    45          63    PERCENT
00092  M01S00091.comtda8 +++|          CON    1R"+40B     64    QUOTE
00093  M01S00092.comtda8 +++|          CON    137         65    CONCANTENATION (UNDERLINE)
00094  M01S00093.comtda8 +++|          CON    1R!+40B     66    EXCLAMATION
00095  M01S00094.comtda8 +++|          CON    1R&+40B     67    AMPERSAND
00096  M01S00095.comtda8 +++|*
00097  M01S00096.comtda8 +++|          CON    1R'+40B     70    APOSTROPHE
00098  M01S00097.comtda8 +++|          CON    1R?+40B     71    QUESTION MARK
00099  M01S00098.comtda8 +++|          CON    1R<+40B     72    LESS THAN
00100  M01S00099.comtda8 +++|          CON    1R>+40B     73    GREATER THAN
00101  M01S00100.comtda8 +++|          IFPP   2
00102  M01S00101.comtda8 +++|          CON    1R;40B     74    AT
00103  M01S00102.comtda8 +++|          IFCP   1
00104  M01S00103.comtda8 +++|          VFD    1/1,51B/0,22B/T.ESC74
00105  M01S00104.comtda8 +++|          CON    1R\+40B     75    BACK SLASH
00106  M01S00105.comtda8 +++|          IFPP   2
00107  M01S00106.comtda8 +++|          CON    1R;40B     76    CIRCUMFLEX
00108  M01S00107.comtda8 +++|          IFCP   1
00109  M01S00108.comtda8 +++|          VFD    1/1,51B/0,22B/T.ESC76
00110  M01S00109.comtda8 +++|          CON    1R;+40B     77    SEMICOLON
00111  M01S00110.comtda8 +++|
00112  M01S00111.comtda8 +++|          IFCP
00113  M01S00112.comtda8 +++|
00114  M01S00113.comtda8 +++|          BASE   D
00115  M01S00114.comtda8 +++|
00116  M01S00115.comtda8 +++|*         TABLE FOR ESCAPE CODE 74B.
00117  M01S00116.comtda8 +++|
00118  M01S00117.comtda8 +++| T.ESC74  BSS    0
00119  M01S00118.comtda8 +++|          VFD    42/0,1/1,17/4000B  7400    NULL
00120  M01S00119.comtda8 +++|          VFD    60/100B            7401    AT
00121  M01S00120.comtda8 +++|          VFD    60/136B            7402    CIRCUMFLEX (UP ARROW)
00122  M01S00121.comtda8 +++|          VFD    60/045B            7403    PERCENT
00123  M01S00122.comtda8 +++|          VFD    60/072B            7404    COLON
00124  M01S00123.comtda8 +++|          VFD    42/0,1/1,17/4000B  7405    NULL
00125  M01S00124.comtda8 +++|          VFD    42/0,1/1,17/4000B  7406    NULL
00126  M01S00125.comtda8 +++|          VFD    60/140B            7407    GRAVE
00127  M01S00126.comtda8 +++|*
00128  M01S00127.comtda8 +++|          DUP    56,1
00129  M01S00128.comtda8 +++|          VFD    42/0,1/1,17/4000B  7477    NULL
00130  M01S00129.comtda8 +++|
00131  M01S00130.comtda8 +++|*         TABLE FOR ESCAPE CODE 76B.
00132  M01S00131.comtda8 +++|
00133  M01S00132.comtda8 +++| T.ESC76  BSS    0
00134  M01S00133.comtda8 +++|          VFD    42/0,1/1,17/4000B  7600    NULL
00135  M01S00134.comtda8 +++|          VFD    60/141B     7601    LOWER CASE A
00136  M01S00135.comtda8 +++|          VFD    60/142B     7602    LOWER CASE B
00137  M01S00136.comtda8 +++|          VFD    60/143B     7603    LOWER CASE C
00138  M01S00137.comtda8 +++|          VFD    60/144B     7604    LOWER CASE D
00139  M01S00138.comtda8 +++|          VFD    60/145B     7605    LOWER CASE E
00140  M01S00139.comtda8 +++|          VFD    60/146B     7606    LOWER CASE F
00141  M01S00140.comtda8 +++|          VFD    60/147B     7607    LOWER CASE G
00142  M01S00141.comtda8 +++|*
00143  M01S00142.comtda8 +++|          VFD    60/150B     7610    LOWER CASE H
00144  M01S00143.comtda8 +++|          VFD    60/151B     7611    LOWER CASE I
00145  M01S00144.comtda8 +++|          VFD    60/152B     7612    LOWER CASE J
00146  M01S00145.comtda8 +++|          VFD    60/153B     7613    LOWER CASE K
00147  M01S00146.comtda8 +++|          VFD    60/154B     7614    LOWER CASE L
00148  M01S00147.comtda8 +++|          VFD    60/155B     7615    LOWER CASE M
00149  M01S00148.comtda8 +++|          VFD    60/156B     7616    LOWER CASE N
00150  M01S00149.comtda8 +++|          VFD    60/157B     7617    LOWER CASE O
00151  M01S00150.comtda8 +++|*
00152  M01S00151.comtda8 +++|          VFD    60/160B     7620    LOWER CASE P
00153  M01S00152.comtda8 +++|          VFD    60/161B     7621    LOWER CASE Q
00154  M01S00153.comtda8 +++|          VFD    60/162B     7622    LOWER CASE R
00155  M01S00154.comtda8 +++|          VFD    60/163B     7623    LOWER CASE S
00156  M01S00155.comtda8 +++|          VFD    60/164B     7624    LOWER CASE T
00157  M01S00156.comtda8 +++|          VFD    60/165B     7625    LOWER CASE U
00158  M01S00157.comtda8 +++|          VFD    60/166B     7626    LOWER CASE V
00159  M01S00158.comtda8 +++|          VFD    60/167B     7627    LOWER CASE W
00160  M01S00159.comtda8 +++|*
00161  M01S00160.comtda8 +++|          VFD    60/170B     7630    LOWER CASE X
00162  M01S00161.comtda8 +++|          VFD    60/171B     7631    LOWER CASE Y
00163  M01S00162.comtda8 +++|          VFD    60/172B     7632    LOWER CASE Z
00164  M01S00163.comtda8 +++|          VFD    60/173B     7633    LEFT BRACE
00165  M01S00164.comtda8 +++|          VFD    60/174B     7634    VERTICAL BAR
00166  M01S00165.comtda8 +++|          VFD    60/175B     7635    RIGHT BRACE
00167  M01S00166.comtda8 +++|          VFD    60/176B     7636    TILDE
00168  M01S00167.comtda8 +++|          VFD    60/177B     7637    DEL (DELETE)
00169  M01S00168.comtda8 +++|*
00170  M01S00169.comtda8 +++|          VFD    42/0,1/0,17/4000B  7640    NUL  (NULL)
00171  M01S00170.comtda8 +++|          VFD    60/001B     7641    SOH  (START OF HEADING)
00172  M01S00171.comtda8 +++|          VFD    60/002B     7642    STX  (START OF TEXT)
00173  M01S00172.comtda8 +++|          VFD    60/003B     7643    ETX  (END OF TEXT)
00174  M01S00173.comtda8 +++|          VFD    60/004B     7644    EOT  (END OF TRANSMISSION)
00175  M01S00174.comtda8 +++|          VFD    60/005B     7645    ENQ  (ENQUIRY)
00176  M01S00175.comtda8 +++|          VFD    60/006B     7646    ACK  (ACKNOWLEDGE)
00177  M01S00176.comtda8 +++|          VFD    60/007B     7647    BEL  (BELL)
00178  M01S00177.comtda8 +++|*
00179  M01S00178.comtda8 +++|          VFD    60/010B     7650    BS  (BACKSPACE)
00180  M01S00179.comtda8 +++|          VFD    60/011B     7651    HT  (HORIZONTAL TAB)
00181  M01S00180.comtda8 +++|          VFD    60/012B     7652    LF  (LINE FEED)
00182  M01S00181.comtda8 +++|          VFD    60/013B     7653    VT  (VERTICAL TAB)
00183  M01S00182.comtda8 +++|          VFD    60/014B     7654    FF  (FORM FEED)
00184  M01S00183.comtda8 +++|          VFD    60/015B     7655    CR  (CARRIAGE RETURN)
00185  M01S00184.comtda8 +++|          VFD    60/016B     7656    SO  (SHIFT OUT)
00186  M01S00185.comtda8 +++|          VFD    60/017B     7657    SI  (SHIFT IN)
00187  M01S00186.comtda8 +++|*
00188  M01S00187.comtda8 +++|          VFD    60/020B     7660    DLE  (DATA LINK ESCAPE)
00189  M01S00188.comtda8 +++|          VFD    60/021B     7661    DC1  (DEVICE CONTROL 1 (X-ON))
00190  M01S00189.comtda8 +++|          VFD    60/022B     7662    DC2  (DEVICE CONTROL 2)
00191  M01S00190.comtda8 +++|          VFD    60/023B     7663    DC3  (DEVICE CONTROL 3 (X-OFF))
00192  M01S00191.comtda8 +++|          VFD    60/024B     7664    DC4  (DEVICE CONTROL 4 (STOP))
00193  M01S00192.comtda8 +++|          VFD    60/025B     7665    NAK  (NEGATIVE ACKNOWLEDGE)
00194  M01S00193.comtda8 +++|          VFD    60/026B     7666    SYN  (SYNCHRONOUS IDLE)
00195  M01S00194.comtda8 +++|          VFD    60/027B     7667    ETB  (END OF TRANSMISSION BLOCK)
00196  M01S00195.comtda8 +++|*
00197  M01S00196.comtda8 +++|          VFD    60/030B     7670    CAN  (CANCEL)
00198  M01S00197.comtda8 +++|          VFD    60/031B     7671    EM  (END OF MEDIUM)
00199  M01S00198.comtda8 +++|          VFD    60/032B     7672    SUB  (SUBSTITUTE)
00200  M01S00199.comtda8 +++|          VFD    60/033B     7673    ESC  (ESCAPE)
00201  M01S00200.comtda8 +++|          VFD    60/034B     7674    FS  (FILE SEPARATOR)
00202  M01S00201.comtda8 +++|          VFD    60/035B     7675    GS  (GROUP SEPARATOR)
00203  M01S00202.comtda8 +++|          VFD    60/036B     7676    RS
00204  M01S00203.comtda8 +++|          VFD    60/037B     7677    US  (UNIT SEPARATOR)
00205  M01S00204.comtda8 +++|
00206  M01S00205.comtda8 +++|          BASE   *
00207  M01S00206.comtda8 +++|          ENDIF
00208  M01S00207.comtda8 +++|
00209  M01S00208.comtda8 +++|          CODE   *
00210  M01S00209.comtda8 +++|          LOC    *O
00211  M01S00210.comtda8 +++|          BASE   *
00212  M01S00211.comtda8 +++|          ENDX
cdc/nos2.source/opl.opl871/common/comtda8.txt ยท Last modified: by 127.0.0.1