ASMB,R,L,C
      HED (FMGR) C.TAB: COMMAND TABLE 
*     NAME:   C.TAB 
*     SOURCE: 92071-18012 
*     RELOC:  92071-16012 
*     PGMR:   G.A.A.
*     MOD:    E.D.B.
* 
*  ***************************************************************
*  * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1980.  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 C.TAB,7 92071-1X012 REV.2041 800611 
* 
      ENT C.TAB 
      SUP 
      SKP 
* 
*     DESCRIPTION 
* 
*     THIS IS THE COMMAND DISPATCH TABLE FOR THE FMGR PROGRAM.
*     IT CONSISTS OF A LIST OF COMMAND ENTRIES, AND ENDS WITH 
*     A -1.  EACH COMMAND ENTRY USES TWO WORDS. 
* 
*     THE FIRST WORD CONTAINS THE TWO CHARACTER COMMAND NAME
*     WITH THE SIGN BIT SET IF THE COMMAND NEED NOT CONFORM 
*     TO NAMR CONVENTIONS.
*     THE SECOND WORD CONTAINS THE COMMAND ADDRESS. 
*     IT CONTAINS THE ASCII SEGMENT SUFFIX IN THE LOW BYTE OF THE WORD, 
*     AND THE ROUTINE NUMBER WITHIN THAT SEGMENT IN THE HIGH BYTE.
* 
*     THERE ARE A MAXIMUM OF 10 SEGMENTS, AND A MAXIMUM OF 15 ROUTINES
*     PER SEGMENT.
      SKP 
* 
*     SEGMENT NAME SUFFIXES AND ROUTINE NUMBERS DEFINITION
* 
*     R = ROUTINE NUMBER WITHIN SEGMENT 
*     S = ASCII VALUE FOR SEGMENT NAME SUFFIX 
* 
R0    EQU 0 
R1    EQU 1 
R2    EQU 2 
R3    EQU 3 
R4    EQU 4 
R5    EQU 5 
R6    EQU 6 
R7    EQU 7 
R8    EQU 8 
R9    EQU 9 
R10   EQU 10
* 
S0    EQU 30000B
S1    EQU 30400B
S2    EQU 31000B
S3    EQU 31400B
S4    EQU 32000B
S5    EQU 32400B
S6    EQU 33000B
S7    EQU 33400B
S8    EQU 34000B
S9    EQU 34400B
      SKP 
C.TAB EQU *         FMGR COMMAND TABLE
* 
*     SEGMENT 0 
* 
      ASC 1,CR
      ABS S0+R0 
      ASC 1,DU
      ABS S0+R1 
      ASC 1,ST
      ABS S0+R2 
      ASC 1,PK
      ABS S0+R3 
* 
*     SEGMENT 1 
* 
*                                   PAR.. IS ROUTINE 0
*                                   IN.ER IS ROUTINE 1
*                                   COMM  IS ROUTINE 2
      ASC 1,TR
      ABS S1+R3 
      NOP           ASSUME TRANSFER COMMAND 
      ABS S1+R3 
      ASC 1,SE
      ABS S1+R4 
      ASC 1,??
      ABS S1+R5 
      ASC 1,EX
      ABS S1+R6 
      OCT 142102    "DB" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 151523    "SS" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 143517    "GO" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 147506    "OF" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 141122    "BR" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 150123    "PS" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 150122    "PR" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 142123    "DS" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 152520    "UP" WITH SIGN BIT SET
      ABS S1+R7 
      OCT 142116    "DN" WITH SIGN BIT SET
      ABS S1+R7 
* 
*     SEGMENT 2 
* 
*                                   IN.IT IS ROUTINE 0
      ASC 1,DC
      ABS S2+R1 
      ASC 1,IN
      ABS S2+R2 
      ASC 1,MC
      ABS S2+R3 
      ASC 1,PU
      ABS S2+R4 
* 
*     SEGMENT 3 
* 
      ASC 1,CL
      ABS S3+R0 
      ASC 1,DL
      ABS S3+R1 
      ASC 1,LI
      ABS S3+R2 
      SKP 
* 
*     SEGMENT 4 
* 
      ASC 1,CO
      ABS S4+R0 
* 
*     SEGMENT 5 
* 
      ASC 1,CA
      ABS S5+R0 
      OCT 142120    "DP" WITH SIGN BIT SET
      ABS S5+R1 
      ASC 1,IF
      ABS S5+R2 
      ASC 1,LL
      ABS S5+R3 
      ASC 1,LO
      ABS S5+R4 
      OCT 150101    "PA" WITH SIGN BIT SET
      ABS S5+R5 
      ASC 1,RN
      ABS S5+R6 
      ASC 1,RP
      ABS S5+R7 
      OCT 151125    "RU" WITH SIGN BIT SET
      ABS S5+R8 
      ASC 1,SV
      ABS S5+R9 
      OCT 154121    "XQ" WITH SIGN BIT SET
      ABS S5+R10
* 
*     SEGMENT 6 
* 
      ASC 1,BL
      ABS S6+R0 
      ASC 1,CN
      ABS S6+R1 
      ASC 1,IO
      ABS S6+R2 
      ASC 1,IT
      ABS S6+R3 
      ASC 1,LA
      ABS S6+R4 
      ASC 1,ON
      ABS S6+R5 
      ASC 1,PL
      ABS S6+R6 
      ASC 1,TM
      ABS S6+R7 
      ASC 1,TO
      ABS S6+R8 
* 
*     END OF COMMAND LIST 
* 
      OCT 177777    ASSUME IMPLICIT RUN 
      ABS S5+R8 
* 
END   EQU * 
* 
      END 
                                                                                                                                          