.TITLE CMTAB .IDENT /M03X/ ; RUNOFF COMMAND TABLE ; ; AUTHOR: D. N. CUTLER 15-FEB-76 ; ; MODIFIED BY ; ; C. H. SPALDING, UNIMATION, APR. '82 ; ; MODIFICATIONS ; ; SIG02 - REARRANGE TABLE FOR PROPER LOOKUP ORDER ; CHS04 - ADD "ALTERNATING HEADER" COMMANDS ; CHS12 - ADD "EVEN" AND "ODD" COMMANDS ; CHS13 - ADD "NO FLAGS" ENTRY (MISSING FOR SOME REASON) ; CHS14 - ADD "ALTERNATING TITLE" COMMANDS ; CHS17 - IGNORE WHITE SPACE IN COMMAND NAMES/REDUCE COMMAND TABLE ; CHS19 - ADD "AUTOSUBTITLE" COMMAND ; CHS20 - ADD OPTIONAL-TEXT COMMANDS (ADDED TXTF FLAG) ; CHS23 - ADD "RIGHT JUSTIFY" COMMAND ; CHS31 - ADDED "NOTF" (31A) AND "FOTF" (31B) TO SEVERAL COMMANDS ; CHS32 - ALLOW "PARAGRAPH" IN FOOTNOTES ; CHS35 - ALLOW RELATIVE ARGUMENTS FOR "TAB STOPS" ; CHS39 - ADD "LAYOUT" COMMAND ; CHS40 - EXPAND "HEADER" COMMAND ; CHS43 - ADD "QUOTE CHARACTER" COMMAND ; CHS46 - CHANGE "ALTERNATING HEADER" TO "ALTERNATE" COMMAND ; CHS47 - ALLOW CONSECUTIVE SUBPAGES ; CHS48 - HAVE "NUMBER" TAKE RELATIVE PAGE NUMBER ; CHS51A- ADD "ENTRY" COMMAND ; CHS51B- ADD "FLAGS SUBINDEX" & "NO FLAGS SUBINDEX" COMMANDS ; CHS54B- ADD "FOOTNOTE LINE" COMMAND ; CHS56 - ADD "PAGE NAME" COMMAND ; ; EQUATED SYMBOLS ; ; COMMAND FLAG BYTE DEFINITIONS ; NOTF=1 ;NOTE PROCESSING ACTIVE FOTF=2 ;ALLOWED WHEN FOOTNOTE ACTIVE? (1 = NO) RELF=4 ;RELATIVE NUMBER CONVERSION (1=YES) TXTF=10 ;COMMAND TAKES TEXT ARG (USED BY "OPTION") ;CHS20 FPGF=20 ;FLUSH PENDING PAGE (1=YES) ENDF=40 ;CORRESPONDS TO END FLAG IN TRAILING BYTE BRKF=100 ;CORRESPONDS TO BREAK FLAG IN TRAILING BYTE ; ; LOCAL MACRO DEFINITIONS ; ; GENERATE COMMAND TABLE ENTRY ; .MACRO CM EP,NAM,FLAGS .PSECT STRING,GBL,D $$$=. .ASCII ^NAM^ .PSECT DSPTCH,GBL,D .WORD EP,$$$ .ENDM ; ; COMMAND TABLE ; ; NOTE: Command names with the same first word (e.g., PAGE ;CHS ; and PAGE SIZE) must be arranged with the short name ;CHS ; LAST in this table. Otherwise the long name will ;CHS ; never be found by the command scanner. ;CHS .PSECT DSPTCH,GBL,D CMTAB:: CM APNDX,,BRKF!FOTF!NOTF!TXTF CM APNDX,,BRKF!FOTF!NOTF!TXTF CM AUTOP, CM AUTOP, CM NAUTO, CM NAUTO, CM CENTER,,BRKF!FPGF!RELF!TXTF CM CENTER,
,BRKF!FPGF!RELF!TXTF CM CENTER,,BRKF!FPGF!RELF!TXTF .IF NZ RTJUST ;CHS23 CM RJUST,,FPGF!RELF!TXTF ;DON'T USE "BRKF" ON ;CHS23 CM RJUST,,FPGF!RELF!TXTF ; THIS COMMAND! ;CHS23 .ENDC ; NZ RTJUST ;CHS23 CM CHPTR,,BRKF!FOTF!NOTF!TXTF CM CHPTR,,BRKF!FOTF!NOTF!TXTF CM COMNT,,TXTF CM FTITL,,FOTF!NOTF!TXTF ;CHS31A CM FTITL,,FOTF!NOTF!TXTF ;CHS31A CM HEADR,,BRKF!FOTF!FPGF!NOTF!TXTF CM HEADR,
,BRKF!FOTF!FPGF!NOTF!TXTF CM HEADP,,RELF!FOTF ;CHS40 CM HEADP,
,RELF!FOTF ;CHS40 CM NHEAD,,FOTF CM NHEAD,,FOTF .IF NZ ALTSHF ;CHS46 CM AHEAD,,RELF!FOTF ;CHS46 CM AHEAD,,RELF!FOTF ;CHS46 CM NAHEAD,,FOTF ;CHS46 CM NAHEAD,,FOTF ;CHS46 .IFF ;CHS46 .IF NZ ALTHDR ;CHS04 CM AHEAD,,FOTF ;CHS04 CM AHEAD,,FOTF ;CHS04 CM NAHEAD,,FOTF ;CHS04 CM NAHEAD,,FOTF ;CHS04 .ENDC ; NZ ALTHDR ;CHS04 .ENDC ; -NZ ALTSHF ;CHS46 .IF NZ ALTTIT ;CHS14 CM ATITL,,FOTF ;CHS14 CM ATITL,,FOTF ;CHS14 CM NATITL,,FOTF ;CHS14 CM NATITL,,FOTF ;CHS14 .ENDC ; NZ ALTTIT ;CHS14 CM INDENT,,BRKF!TXTF CM INDENT,,BRKF!TXTF .IF NZ QTCHAR ;CHS43 CM QTCH, ;CHS43 CM QTCH, ;CHS43 .ENDC ; NZ QTCHAR ;CHS43 CM UPCAS, CM UPCAS, CM LWCAS, CM LWCAS, CM BREAK,
,BRKF CM BREAK,,BRKF .IIF NZ LAYOUT, CM LYOUT,,BRKF!FOTF!RELF ;CHS39 .IF NZ PAGNAM ;CHS56 CM SETPN,,FOTF ;CHS56 CM SETPN,,FOTF ;CHS56 .ENDC ; NZ PAGNAM ;CHS56 CM SETPG,,BRKF!FOTF!RELF CM SETPG,,BRKF!FOTF!RELF CM SETPG,,BRKF!FOTF!RELF CM CPAGE,,BRKF!FOTF ;SIG02 CM CPAGE,,BRKF!FOTF ;SIG02 CM TPAGE,,BRKF!FOTF .IF NZ SBPFIX ;CHS47 CM ENDSBP,,BRKF!FOTF .IFF ;CHS47 CM CPAGE,,BRKF!FOTF .ENDC ; -NZ SBPFIX ;CHS47 .IF NZ EVNODD ;CHS12 CM EPAGE,,BRKF!FOTF!TXTF ;CHS12 CM OPAGE,,BRKF!FOTF!TXTF ;CHS12 .ENDC ; NZ EVNODD ;CHS12 CM SETTL,,FOTF!TXTF CM SETTL,,FOTF!TXTF CM SETSTL,<ST>,FOTF!TXTF CM SETSTL,<SUBTTL>,FOTF!TXTF CM SETSTL,<SUBTITLE>,FOTF!TXTF .IF NZ ATOSUB ;CHS19 CM ASUBT,<AS>,FOTF!RELF ;CHS19 CM ASUBT,<AUTOSUBTITLE>,FOTF!RELF ;CHS19 .ENDC ; NZ ATOSUB ;CHS19 CM SETRM,<RM>,BRKF!RELF CM SETRM,<RIGHT MARGIN>,BRKF!RELF CM SETLM,<LM>,BRKF!RELF CM SETLM,<LEFT MARGIN>,BRKF!RELF .IF NZ PARFN ;CHS32 CM PARAG,<P>,BRKF ;CHS32 CM PARAG,<PARAGRAPH>,BRKF ;CHS32 .IFF ;CHS32 CM PARAG,<P>,BRKF!FOTF ;CHS32 CM PARAG,<PARAGRAPH>,BRKF!FOTF ;CHS32 .ENDC ; -NZ PARFN ;CHS32 CM SSP,<SP>,BRKF CM SSP,<SPACING>,BRKF CM SKIPL,<S>,BRKF CM SKIPL,<SK>,BRKF CM SKIPL,<SKIP>,BRKF CM LINSKP,<B>,BRKF CM LINSKP,<BLANK>,BRKF CM JUSTN,<J>,BRKF CM JUSTN,<JUSTIFY>,BRKF CM JUSOF,<NJ>,BRKF CM JUSOF,<NO JUSTIFY>,BRKF .IF NZ RELTAB ;CHS35C CM SETTAB,<TS>,FOTF!RELF ;CHS35C CM SETTAB,<TAB STOPS>,FOTF!RELF ;CHS35C .IFF ;CHS35C CM SETTAB,<TS>,FOTF CM SETTAB,<TAB STOPS>,FOTF .ENDC ; -NZ RELTAB ;CHS35C CM FILLN,<F>,BRKF CM FILLN,<FILL>,BRKF CM FILOF,<NF>,BRKF CM FILOF,<NO FILL>,BRKF CM TSTPG,<TP>,BRKF!FOTF CM TSTPG,<TEST PAGE>,BRKF!FOTF CM FIGUR,<FG>,BRKF!FOTF!FPGF CM FIGUR,<FIGURE>,BRKF!FOTF!FPGF CM INDEX,<X>,FPGF!TXTF CM INDEX,<INDEX>,FPGF!TXTF .IF NZ XENTRY ;CHS51 CM ENTRY,<Y>,FPGF!TXTF ;CHS51 CM ENTRY,<ENTRY>,FPGF!TXTF ;CHS51 .ENDC ; NZ XENTRY ;CHS51 CM PERSP,<PR> CM PERSP,<PERIOD> CM NPERS,<NPR> CM NPERS,<NO PERIOD> CM DOINX,<DX>,BRKF!FOTF!NOTF!FPGF!TXTF ;CHS31A CM DOINX,<DO INDEX>,BRKF!FOTF!NOTF!FPGF!TXTF ;CHS31A CM PINDX,<PX>,BRKF!FOTF!NOTF!FPGF ;CHS31A CM PINDX,<PRINT INDEX>,BRKF!FOTF!NOTF!FPGF ;CHS31A .IF NZ AUTOFN ;CHS54B CM FOOTL,<FNL>,FOTF ;CHS54B CM FOOTL,<FOOTNOTE LINE>,FOTF ;CHS54B .ENDC ; NZ AUTOFN ;CHS54B CM FOOTN,<FN>,FOTF CM FOOTN,<FOOTNOTE>,FOTF CM NAPDX,<NUMBER APPENDIX>,FOTF ;CHS31B CM NCHPT,<NUMBER CHAPTER>,FOTF ;CHS31B .IF NZ NUMREL ;CHS48B CM NUMON,<NM>,FOTF!RELF ;CHS48B CM NUMON,<NUMBER>,FOTF!RELF ;CHS48B .IFF ;CHS48B CM NUMON,<NM>,FOTF ;CHS31B CM NUMON,<NUMBER>,FOTF ;CHS31B .ENDC ; -NZ NUMREL ;CHS48B CM NUMOF,<NNM>,FOTF ;CHS31B CM NUMOF,<NO NUMBER>,FOTF ;CHS31B CM LITRL,<LIT>,BRKF CM LITRL,<LITERAL>,BRKF ELCMD:: CM ELTRL,<ELI>,BRKF!ENDF CM ELTRL,<END LITERAL>,BRKF!ENDF CM NOTE,<NT>,BRKF!FPGF!NOTF!TXTF CM NOTE,<NOTE>,BRKF!FPGF!NOTF!TXTF ENOTE:: CM ENOTC,<EN>,BRKF!ENDF CM ENOTC,<END NOTE>,BRKF!ENDF CM STAND,<SD>,BRKF!FOTF!RELF CM STAND,<STANDARD>,BRKF!FOTF!RELF CM LSTEL,<LE>,BRKF!TXTF CM LSTEL,<LIST ELEMENT>,BRKF!TXTF CM LISTC,<LS>,BRKF ;SIG02 CM LISTC,<LIST>,BRKF ;SIG02 ELSTC:: CM ELIST,<ELS>,BRKF!ENDF CM ELIST,<END LIST>,BRKF!ENDF .IF NZ OPTTXT ;CHS20 CM INCLUD,<IN> ;CHS20 CM INCLUD,<INCLUDE> ;CHS20 CM EXCLUD,<EX> ;CHS20 CM EXCLUD,<EXCLUDE> ;CHS20 CM OPTION,<OPT> ;CHS20 CM OPTION,<OPTION> ;CHS20 ELSEC:: CM ELSE,<ELSE> ;CHS20 EOPTC:: CM ENDOPT,<ENDO> ;CHS20 CM ENDOPT,<END OPTION> ;CHS20 .ENDC ; NZ OPTTXT ;CHS20 CM DSCFL,<NFC> CM DSCFL,<NO FLAGS CAPITALIZE> CM DSHFL,<NFH> CM DSHFL,<NO FLAGS HYPHENATE> .IF NZ SUBIDX ;CHS51B CM DSSFL,<NFS> ;CHS51B CM DSSFL,<NO FLAGS SUBINDEX> ;CHS51B .ENDC ; NZ SUBIDX ;CHS51B CM DSAFL,<NFL> CM DSAFL,<NO FLAGS> ;CHS13 CM ENCFL,<FL CAPITALIZE> CM ENCFL,<FLAGS CAPITALIZE> CM ENHFL,<FL HYPHENATE> CM ENHFL,<FLAGS HYPHENATE> .IF NZ SUBIDX ;CHS51B CM ENSFL,<FL SUBINDEX> ;CHS51B CM ENSFL,<FLAGS SUBINDEX> ;CHS51B .ENDC ; NZ SUBIDX ;CHS51B CM HYPHN,<HY>,BRKF CM HYPHN,<HYPHENATION>,BRKF CM NHYPH,<NHY>,BRKF CM NHYPH,<NO HYPHENATION>,BRKF .PSECT DSPTCH,GBL,D ECTAB:: .PSECT .END