ASMB,R,Q,C
*     NAME:   STR.. 
*     SOURCE: 92070-18144 
*     RELOC:  92070-1X144 
*     PGMR:   HLC 
* 
* 
*  **************************************************************** 
*  * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1979.  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 STR..,0  92070-1X144  REV.1941  791022  
      ENT $ALCS,$EX14,$RTNS,$STRN 
      ENT $SBLN,$.STR 
*     ENT $$STR     MUST NOT BE DEFINED 
* 
      EXT $A,$B,$EXEX 
* 
* 
$EX14 CLA,INA 
      STA $A,I
      CLB 
      STB $B,I
      JMP $EXEX 
* 
* 
* 
* 
$STRN EQU * 
$SBLN NOP 
* 
* 
$ALCS EQU * 
$RTNS EQU * 
      NOP 
      CLB 
      CCA 
      JMP *-3,I 
* 
$.STR DEC -1        DUMMY MODULE
* 
      END 
                        