*COMDECK  SMOCDEF 
 SMOCDEF  CTEXT  SMOCDEF - SMACRO OPCODE VALUE DEFINITION MACROS
**        SMOCDEF - DECK TO BE CALLED PRIOR TO CALLING *SMACROS* TO 
*         ESTABLISH THE OPCODE VALUES OF THE HOST DEFINED *SMACROS*.
*         FOR A MACRO NAME *N* IT DEFINES THE OPCDOE VALUE OF THE 
*         NAME AS M$N . 
  
          MACRO  SMACRO,N 
 M$N      =      .Z 
 .Z       SET    .Z+1 
          ENDM
  
          NOREF  .Z 
 .Z       SET    128
  
          ECHO   1,Z=(BTW,ETW,ARI,ACI,MIC,ASV,ELSE.,ENDIF.,SET.,DCSS,___
,USE.,QUAL.,CON.,BSS.,BSSZ.,ENDS) 
 Z        OPSYN  NIL
          ECHO   1,Z=(LT,EQ,GT,LE,NE,GE)
 IF.Z     OPSYN  NIL
  
          ENDX
