ASMB,R,L,C,Q
*     NAME:   $CMND 
*     SOURCE: 92067-18457 
*     RELOC:  92067-16261 
*     PGMR:   G.L.M 
* 
*  ***************************************************************
*  * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1978.  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 $CMND,0 92067-16261 REV.1940 790729 
      ENT $CMND 
* 
* 
$CMND DEF EINDX     DEFINE THE ADDRESS OF HIGHEST CAPABILITY
      DEF BEGIN     DEFINE BEGINNING OF TABLE 
      DEF END       DEFINE END OF TABLE 
* 
L60   DEC -60       LEVEL 60
L60A  DEF BEGIN     DEFINE START OF THIS CAPABILITY 
* 
L50   DEC -50 
L50A  DEF L.50
* 
L30   DEC -30 
L30A  DEF L.30
* 
L10   DEC -10 
L10A  DEF L.10
* 
L00   NOP 
L00A  DEF L.00
* 
EINDX EQU *-2 
* 
* 
* 
      ORG $CMND 
      BSS L10A-L30A 
      BSS L30A-L50A 
      BSS L50A-L60A 
      ORR 
* 
      SKP 
L.60  EQU * 
BEGIN ASC 1,QU
      OCT 0 
      ASC 1,DN
      OCT 0 
      ASC 1,LU
      OCT 0 
      ASC 1,EQ
      OCT 0 
      ASC 1,TO
      OCT 0 
      ASC 1,BL
      OCT 0 
      ASC 1,TM
      OCT 0 
      ASC 1,OF
      OCT 0 
      ASC 1,BR
      OCT 0 
      ASC 1,GO
      OCT 0 
      ASC 1,SS
      OCT 0 
* 
L.50  ASC 1,IT
      OCT 0 
      ASC 1,L3       ABILITY TO ADD AN ENTRY IN SST -- SL CMND
      OCT 0 
      ASC 1,AS
      OCT 0 
      ASC 1,UR
      OCT 0 
      ASC 1,ON
      OCT 0 
      ASC 1,PR
      OCT 0 
* 
L.30  ASC 1,RU
      OCT 0 
      ASC 1,OF
      OCT 40000 
      ASC 1,SS
      OCT 40000 
      ASC 1,GO
      OCT 40000 
      ASC 1,RT
      OCT 0 
      ASC 1,SZ
      OCT 0 
      ASC 1,L2      LEVEL 2 SL CMND -- SPOOL AN LU
      OCT 0 
* 
L.10  ASC 1,FL
      OCT 0 
      ASC 1,RS
      OCT 0 
      ASC 1,QU
      OCT 100000
      ASC 1,BL
      OCT 100000
      ASC 1,ST
      OCT 0 
      ASC 1,BR
      OCT 40000 
      ASC 1,EQ
      OCT 100001
      ASC 1,SL
      OCT 0 
      ASC 1,TO
      OCT 100001
      ASC 1,TE
      OCT 0 
      ASC 1,WH
      OCT 0 
      ASC 1,TI
      OCT 0 
      ASC 1,UP
      OCT 0 
      ASC 1,EN
      OCT 0 
* 
L.00  ASC 1,OP
      OCT 0 
      ASC 1,HE
      OCT 0 
* 
END   EQU *-2 
      END $CMND 
                                                