PARAMETER (MAXM=50,MAXMT=500) COMMON / GRAF$MACROS / MTEXT(MAXMT), MNAME(MAXM), MSTART(MAXM), $ MEND(MAXM), MCOMMENT(MAXM), NMACRO, NTEXT CHARACTER *132 MTEXT, MCOMMENT CHARACTER *20 MNAME C C --- MAXM = MAXIMUM NUMBER OF MACROS C --- MAXMT = MAXIMUM LINES OF MACRO CODE FOR ALL MACROS C --- MTEXT = CODE OF MACROS C --- MNAME = NAMES OF MACROS (ALPHABETIZED) C --- MSTART = LOCATION IN "MTEXT" CONTAINING FIRST LINE OF THIS MACRO C --- MEND = LOCATION IN "MTEXT" CONTAINING LAST LINE OF THIS MACRO C --- MCOMMENT = SHORT DESCRIPTION OF THIS MACRO C --- NMACRO = NUMBER OF MACROS CURRENTLY DEFINED C --- NTEXT = NUMBER OF LINES OF CODE CURRENTLY DEFINED C