! PR:I_FLAG.GRAPHIC ! List input parameters for INPUT FLAG !---------------------------------------------------------------------- define character b*4 n*4 sic\let b "" ! 4 is underline, 7 reverse video but both sic\let n "" ! are mapped to same attribute on dumb VT100 sic\if (flag) then sic\say " FLAG will FLAG data in UV Table " 'b''name'.uvt'n' sic\else sic\say " FLAG will UNFLAG data in UV Table " 'b''name'.uvt'n' sic\endif sic\say " from " 'b''date_start' at 'ut_start''n' sic\say " to " 'b''date_end' at 'ut_end''n' sic\say " " sic\say "- The input file is given by variable NAME, extension is .UVT" sic\say "_ Variables DATE_START,UT_START, DATE_END, UT_END, FLAG, BASELINE," sic\say " FIRST, LAST are used as input parameters:" sic\say " BASELINE [" 'b''baseline''n' "]" sic\say " FIRST [" 'b''first''n' "] LAST [" 'b''last''n' "]" sic\say " "