          CTEXT  COMPIOU - IOU INSTRUCTION DEFINITIONS.                  R123_OS        1
          BASE   O                                                       R123_OS        2
 COMPIOU  SPACE  4,10                                                    R123_OS        3
***       COMPIOU - IOU INSTRUCTION DEFINITIONS.                         R123_OS        4
*         B. R. HANSON       79/08/03.                                   R123_OS        5
          SPACE  4,10                                                    R123_OS        6
***              COMPIOU DEFINES THOSE INSTRUCTIONS THAT EITHER ARE      R123_OS        7
*         UNIQUE TO THE C174-2XX IOU OR NEED SPECIAL SUPPORT TO BE       R123_OS        8
*         USED FROM THE A170 NOS OPERATING SYSTEM.  TO USE THE           R123_OS        9
*         SIXTEEN BIT INSTRUCTIONS LIKE *LDDL* THE COMMON DECK           R123_OS       10
*         *COMPMCH* IS NEEDED TO DEFINE THE ROUTINE *MLI* - MAKE         R123_OS       11
*         LONG INSTRUCTIONS.                                             R123_OS       12
          SPACE  4                                                       R123_OS       13
**        BIT16 - ENTER FOLLOWING INSTRUCTION INTO TABLE OF              R123_OS       14
*                16 BIT INSTRUCTIONS.                                    R123_OS       15
*                                                                        R123_OS       16
          PURGMAC BIT16                                                  R123_OS       17
                                                                         R123_OS       18
 BIT16    MACRO  ADDR                                                    R123_OS       19
          LOCAL  X                                                       R123_OS       20
          QUAL                                                           R123_OS       21
 X        EQU    ADDR *                                                  R123_OS       22
          QUAL   *                                                       R123_OS       23
 A170     RMT                                                            R123_OS       24
          CON    X                                                       R123_OS       25
 A170     RMT                                                            R123_OS       26
          ENDM                                                           R123_OS       27
          SPACE  4                                                       R123_OS       28
**        D16A - DEFINE SINGLE OPERAND 16 BIT INSTRUCIIONS.              R123_OS       29
*                                                                        R123_OS       30
                                                                         R123_OS       31
          PURGMAC D16A                                                   R123_OS       32
                                                                         R123_OS       33
 D16A     MACRO  LIST                                                    R123_OS       34
          IRP    LIST                                                    R123_OS       35
          PURGMAC ;AL                                                    R123_OS       36
 ;AL      MACRO  A                                                       R123_OS       37
          LIST   A                                                       R123_OS       38
          BIT16  *-1                                                     R123_OS       39
 ;AL      ENDM                                                           R123_OS       40
          IRP                                                            R123_OS       41
          ENDM                                                           R123_OS       42
          SPACE  4                                                       R123_OS       43
**        D16AB - DEFINE DOUBLE OPERAND 16 BIT INSTRUCTIONS.             R123_OS       44
*                                                                        R123_OS       45
                                                                         R123_OS       46
          PURGMAC D16AB                                                  R123_OS       47
                                                                         R123_OS       48
 D16AB    MACRO  LIST                                                    R123_OS       49
          IRP    LIST                                                    R123_OS       50
          PURGMAC ;AL                                                    R123_OS       51
 ;AL      MACRO  A,B                                                     R123_OS       52
          LIST   A,B                                                     R123_OS       53
          BIT16  *-2                                                     R123_OS       54
 ;AL      ENDM                                                           R123_OS       55
          IRP                                                            R123_OS       56
          ENDM                                                           R123_OS       57
          SPACE  4                                                       R123_OS       58
**        DEFINE SINGLE OPERAND 16 BIT INSTRUCTIONS.                     R123_OS       59
                                                                         R123_OS       60
                                                                         R123_OS       61
          D16A   (LDD,STD,LDI,STI,ADD,SBD,ADI,SBI,LMD,LMI)               R123_OS       62
          D16A   (RAD,AOD,SOD,RAI,CRD,CWD)                               R123_OS       63
          SPACE  4                                                       R123_OS       64
**        DEFINE DOUBLE OPERAND 16 BIT INSTRUCTIONS.                     R123_OS       65
                                                                         R123_OS       66
          D16AB  (LDM,STM,ADM,SBM,RAM,AOM,SOM,LMM,CRM,CWM)               R123_OS       67
          SPACE  4                                                       R123_OS       68
          PURGMAC D16A,D16AB                                             R123_OS       69
          SPACE  4                                                       R123_OS       70
**        LPDL - LOGICAL PRODUCT DIRECT.                                 R123_OS       71
*                                                                        R123_OS       72
                                                                         R123_OS       73
                                                                         R123_OS       74
 LPDL.    PPOP   4,2200                                                  R123_OS       75
                                                                         R123_OS       76
          PURGMAC LPDL                                                   R123_OS       77
 LPDL     MACRO  D                                                       R123_OS       78
          BIT16                                                          R123_OS       79
          LPDL.  D                                                       R123_OS       80
          ENDM                                                           R123_OS       81
          SPACE  4                                                       R123_OS       82
**        LPIL - LOGICAL PRODUCT INDIRECT.                               R123_OS       83
*                                                                        R123_OS       84
                                                                         R123_OS       85
                                                                         R123_OS       86
 LPIL.    PPOP   4,2300                                                  R123_OS       87
                                                                         R123_OS       88
          PURGMAC LPIL                                                   R123_OS       89
 LPIL     MACRO  A                                                       R123_OS       90
          BIT16                                                          R123_OS       91
          LPIL.  A                                                       R123_OS       92
          ENDM                                                           R123_OS       93
          SPACE  4                                                       R123_OS       94
**        LPML - LOGICAL PRODUCT LONG.                                   R123_OS       95
*                                                                        R123_OS       96
                                                                         R123_OS       97
                                                                         R123_OS       98
 LPML.    PPOP   5,2400                                                  R123_OS       99
                                                                         R123_OS      100
          PURGMAC LPML                                                   R123_OS      101
 LPML     MACRO  A,B                                                     R123_OS      102
          LPML.  A,B                                                     R123_OS      103
          BIT16  *-2                                                     R123_OS      104
          ENDM                                                           R123_OS      105
          SPACE  4                                                       R123_OS      106
**        RDSL - CENTRAL READ AND SET LOCK.                              R123_OS      107
*                                                                        R123_OS      108
                                                                         R123_OS      109
 RDSL.    PPOP   4,000                                                   R123_OS      110
                                                                         R123_OS      111
                                                                         R123_OS      112
          PURGMAC RDSL                                                   R123_OS      113
 RDSL     MACRO  A                                                       R123_OS      114
          BIT16                                                          R123_OS      115
          RDSL.  A                                                       R123_OS      116
          ENDM                                                           R123_OS      117
          SPACE  4                                                       R123_OS      118
**        RDCL - CENTRAL READ AND CLEAR LOCK.                            R123_OS      119
*                                                                        R123_OS      120
                                                                         R123_OS      121
                                                                         R123_OS      122
 RDCL.    PPOP   4,0100                                                  R123_OS      123
                                                                         R123_OS      124
          PURGMAC RDCL                                                   R123_OS      125
 RDCL     MACRO  A                                                       R123_OS      126
          BIT16                                                          R123_OS      127
          RDCL.  A                                                       R123_OS      128
          ENDM                                                           R123_OS      129
          SPACE  4                                                       R123_OS      130
**        FSJM - JUMP TO M IF CHANNEL C FLAG SET.                        R123_OS      131
*                                                                        R123_OS      132
                                                                         R123_OS      133
                                                                         R123_OS      134
          PURGMAC FSJM                                                   R123_OS      135
 FSJM     MACRO  M,C                                                     R123_OS      136
          BIT16                                                          R123_OS      137
          AJM    M,C                                                     R123_OS      138
          ENDM                                                           R123_OS      139
          SPACE  4                                                       R123_OS      140
**        FCJM - JUMP TO M IF CHANNEL C FLAG CLEAR.                      R123_OS      141
*                                                                        R123_OS      142
                                                                         R123_OS      143
                                                                         R123_OS      144
          PURGMAC FCJM                                                   R123_OS      145
 FCJM     MACRO  M,C                                                     R123_OS      146
          BIT16                                                          R123_OS      147
          IJM    M,C                                                     R123_OS      148
          ENDM                                                           R123_OS      149
          SPACE  4                                                       R123_OS      150
**        IAPM - INPUT WORDS TO M FROM CHANNEL C PACKED.                 R123_OS      151
*                                                                        R123_OS      152
                                                                         R123_OS      153
                                                                         R123_OS      154
          PURGMAC IAPM                                                   R123_OS      155
 IAPM     MACRO  M,C                                                     R123_OS      156
          BIT16                                                          R123_OS      157
          IAM    M,C                                                     R123_OS      158
          ENDM                                                           R123_OS      159
          SPACE  4                                                       R123_OS      160
**        OAPM - OUTPUT WORDS FROM M TO CHANNEL C PACKED.                R123_OS      161
*                                                                        R123_OS      162
                                                                         R123_OS      163
                                                                         R123_OS      164
          PURGMAC OAPM                                                   R123_OS      165
 OAPM     MACRO  M,C                                                     R123_OS      166
          BIT16                                                          R123_OS      167
          OAM    M,C                                                     R123_OS      168
          ENDM                                                           R123_OS      169
          SPACE  4                                                       R123_OS      170
**        INPN - INTERRUPT PROCESSOR.                                    R123_OS      171
*                                                                        R123_OS      172
                                                                         R123_OS      173
                                                                         R123_OS      174
 INPN.    PPOP   4,2600                                                  R123_OS      175
                                                                         R123_OS      176
          PURGMAC INPN                                                   R123_OS      177
 INPN     MACRO  D                                                       R123_OS      178
          BIT16                                                          R123_OS      179
          INPN.  D                                                       R123_OS      180
          ENDM                                                           R123_OS      181
          SPACE  4                                                       R123_OS      182
**        LIST16 - CREATE TABLE OF 16 BIT INSTRUCTION ADDRESSES.         R123_OS      183
*                                                                        R123_OS      184
                                                                         R123_OS      185
                                                                         R123_OS      186
          PURGMAC LIST16                                                 R123_OS      187
 LIST16   MACRO                                                          R123_OS      188
 A170     HERE                                                           R123_OS      189
          CON    0                                                       R123_OS      190
          ENDM                                                           R123_OS      191
          SPACE  4                                                       R123_OS      192
          BASE   *                                                       R123_OS      193
          ENDX                                                           R123_OS      194
