pro help_figs
;
;
;
n = 10
menu = strarr(n)
menu(0) = 'FIG_SXT_AREA        4 and 6 panel plots of SXT effective area'
menu(1) = 'FIG_SXT_RATIOS      SXT signal ratio of 3 pairs of filters'
menu(2) = 'FIG_SXT_RESP        SXT signal as a function of temperature for each filter'
menu(3) = 'CCD_MAP             A figure showing the SXT CCD pixel coordinate systems'
menu(4) = 'HELP_ROLL           Figures showing the S/C roll and SXT offset conventions'
menu(5) = 'TIME_LINE           Shows the relative times between PST,PDT,UT,JST, and BST'
menu(9) = 'EXIT'
;
qdone = 0
while (not qdone) do begin
    imenu = wmenu_sel(menu, /one)
    case imenu of
	0: fig_sxt_area
	1: fig_sxt_ratios
	2: fig_sxt_resp
	3: ccd_map
	4: help_roll
	5: time_line
	9: qdone = 1
	else:
    endcase
end
;
end