ASMB,R,L
*     NAME  : ONMTM 
*     SOURCE: 92064-18145 
*     RELOC:  92064-16032 
*     PROGMR: E.J.W.  
* 
*  **************************************************************** 
*  * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1976.  ALL RIGHTS      * 
*  * RESERVED.  NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED,       * 
*  * REPRODUCED OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITHOUT * 
*  * THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY.        * 
*  **************************************************************** 
* 
* 
      NAM ONMTM,3,90  92064-16032  REV.1650  761020 
* 
*     RU,ONMTM,LU 
* 
      EXT EXEC
A     EQU 0 
B     EQU 1 
* 
ONMTM NOP 
      LDA B,I       GET LU
      IOR ENABL 
      STA CONWD 
* 
      JSB EXEC      SEND CONTROL REQUEST TO ENABLE
       DEF *+3
       DEF D3 
       DEF CONWD
* 
      JSB EXEC      END 
       DEF *+2
       DEF D6 
* 
D3    DEC 3 
D6    DEC 6 
ENABL OCT 2000
CONWD NOP 
* 
      END ONMTM 
                        