ui_menu.c

seismic software,very useful

/*
user interface: menu setup and callbacks
*/
#include <Xm/FileSB.h>
#include <Xm/MainW.h>
#include <Xm/SelectioB.h>
#include <stdio.h>
#include "main.h"
#include "ui.h"
#include "axis.h"
#include "data.h"
#include "map.h"
#include "render.h"
#include "view.h"
#include "region.h"
#include "pick.h"
#include "pik.h"
#include "movie.h"
#include "color.h"
#include "colorbar.h"

extern UI ui;
extern Message message;

/* setup menus; install callbacks */

/* fetch list of menu item widgets */
#define	CS	XmStringCreateSimple
#define LIST(menu)	XtVaGetValues (ui->menu,XmNchildren,&list,NULL)
/* install callback in push button menu item */
#define PBCALLBACK(item,callback)	{\
	extern callback();\
	XtAddCallback (list[item],XmNactivateCallback,(XtCallbackProc)callback,NULL);}
/* install callback in toggle menu item */
#define TGCALLBACK(item,callback)	{\
	extern callback();\
	XtAddCallback (list[item],XmNvalueChangedCallback,(XtCallbackProc)callback,NULL);}
UIMenuInit (parent)
Widget parent;
	{
	int i, j, ibar=0;
	WidgetList list;
	extern UIStyleChoice();
	extern UISizeChoice();
	extern UIColorChoice();
	extern UIOverlayChoice();
	extern UIMarkChoice();
	extern UIBackgroundChoice();
	extern UIStatusChoice();
	extern UINeighborhoodChoice();
	extern UIHelpChoice();
	int *cb[3];

	/* menubar */
	if (!ui) return;
	ui->menuBar = XmVaCreateSimpleMenuBar (parent, "menubar",
		XmVaCASCADEBUTTON, CS("Misc"), NULL,
		XmVaCASCADEBUTTON, CS("Style"), NULL,
		XmVaCASCADEBUTTON, CS("Orient"), NULL,
		XmVaCASCADEBUTTON, CS("Size"), NULL,
		XmVaCASCADEBUTTON, CS("Movie"), NULL,
		XmVaCASCADEBUTTON, CS("Color"), NULL,
		XmVaCASCADEBUTTON, CS("Pick"), NULL,
		XmVaCASCADEBUTTON, CS("EditVol"), NULL,
		XmVaCASCADEBUTTON, CS("Sections"), NULL,
		XmVaCASCADEBUTTON, CS("Status"), NULL,
		XmVaCASCADEBUTTON, CS("Help"), NULL,
		NULL);
	/* main drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"main",ibar++,NULL,
		XmVaPUSHBUTTON, CS("Redraw"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Fix Picking"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Write vgrid file (floats) ..."), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Write vgrid file (bytes) ..."), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Write parameter restart file ..."), NULL, NULL, NULL,
/*		XmVaCASCADEBUTTON, CS("Debug"), NULL,*/
/*		XmVaSEPARATOR,*/
		XmVaPUSHBUTTON, CS("Quit"), NULL, NULL, NULL,
		NULL);
	LIST (menu);
	PBCALLBACK (0,ViewDrawAll);
	PBCALLBACK (1,UIWakeup);
	PBCALLBACK (2,UIDumpFloats);
	PBCALLBACK (3,UIDumpBytes);
	PBCALLBACK (4,UISavePar);
	PBCALLBACK (5,UIQuit);
	/* debug pull right menu */
/*
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"debug",4,NULL,
		XmVaTITLE, CS("ARRAY->FILE DUMPS:"),
		XmVaPUSHBUTTON, CS("Down Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Across Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Deep Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Render Color Map"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Render Image"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Color Table"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Sub-volume Picks"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (1,UIDownDump);
	PBCALLBACK (2,UIAcrossDump);
	PBCALLBACK (3,UIDeepDump);
	PBCALLBACK (4,RenderMapDump);
	PBCALLBACK (5,RenderImageDump);
	PBCALLBACK (6,ColorTableDump);
	PBCALLBACK (7,RegionDump);
	PBCALLBACK (8,UIWakeup);
	/* view drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"view",ibar++,(XtCallbackProc)UIStyleChoice,
		XmVaRADIOBUTTON, CS("Front Face"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Side Face"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Top Face"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Three Faces"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Array ..."), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Cube"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Fence ..."), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Transparent Cube ..."), NULL, NULL, NULL,
		XmNradioAlwaysOne, True,
		XmNradioBehavior, True,
		NULL);
	LIST (menu);
	XtVaSetValues (list[VIEW_CUBE],XmNset,True,NULL);
	/* orientation drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"orient",ibar++,NULL,
		XmVaPUSHBUTTON, CS("Swap Side & Top Faces; Transpose"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Swap Front & Side Faces"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Swap Top & Front Faces"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Swap Deep & 4th Axes"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Swap Across & 4th Axes"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Swap Down & 4th Axes"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Flip Down Direction"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Flip Across Direction"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Flip Deep Direction"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Move Frames to Middle"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Move Frames to Corner"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaPUSHBUTTON, CS("Initial Orientation"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Adjust Labels ..."), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaTITLE, CS("4th AXIS IS n4= AND HIDDEN"),
		NULL);
	LIST (menu);
	PBCALLBACK (0,UISwapSideTop);
	PBCALLBACK (1,UISwapFrontSide);
	PBCALLBACK (2,UISwapTopFront);
	PBCALLBACK (5,UISwapFrontExtra);
	PBCALLBACK (4,UISwapSideExtra);
	PBCALLBACK (3,UISwapTopExtra);
	PBCALLBACK (6,UIFlipDown);
	PBCALLBACK (7,UIFlipAcross);
	PBCALLBACK (8,UIFlipDeep);
	PBCALLBACK (9,ViewFramesMiddle);
	PBCALLBACK (10,ViewFramesOrigin);
	PBCALLBACK (11,UIOrient0);
	PBCALLBACK (12,UILabelRaise);
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"size",ibar++,(XtCallbackProc)UISizeChoice,
		XmVaRADIOBUTTON, CS("Even Cube"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("True Proportions"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Sample Per Pixel"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaTOGGLEBUTTON, CS("Interpolate"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Fine Control ..."), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Initial Size"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaTITLE, CS("LEFT MOUSE BOX ZOOMS"),
		XmVaTITLE, CS("+ 'h' ONLY HORZ"),
		XmVaTITLE, CS("+ 'v' ONLY VERT"),
		NULL);
	/* save interpolation state widget */
	LIST (menu);
	ui->shape_stretch = list[0];
	ui->shape_true = list[1];
	ui->shape_pixel = list[2];
	/* set shape toggle value */
	XtVaSetValues (list[0],XmNset,True,NULL);
	XtVaSetValues (list[4],XmNset,False,NULL);
	TGCALLBACK (3,UIInterpolateToggle);
	PBCALLBACK (4,UISyzeRaise);
	PBCALLBACK (5,UISize0);
	/* movie drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"movie",ibar++,NULL,
		XmVaPUSHBUTTON, CS("Movie to Boundaries"), NULL, NULL, NULL,
		XmVaTOGGLEBUTTON, CS("High Speed"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaTITLE, CS ("MIDDLE MOUSE CLICK XFRAMES"),
		XmVaTITLE, CS ("MIDDLE MOUSE DRAG MOVIE BOUNDS"),
		XmNradioAlwaysOne, True,
		NULL);
	LIST (menu);
	PBCALLBACK (0,ViewMovieFullBounds);
	TGCALLBACK (1,MovieToggleCache);
	XtVaSetValues (list[1],XmNset,False,NULL);
	/* color drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"color",ibar++,(XtCallbackProc)UIColorChoice,
		XmVaRADIOBUTTON, CS("Gray"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Straw"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Flag"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Tiger"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Blue"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Rainbow"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("AVO"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaCASCADEBUTTON, CS("Overlay"), NULL,
		XmVaCASCADEBUTTON, CS("Mark"), NULL,
		XmVaCASCADEBUTTON, CS("Background"), NULL,
/*		XmVaSEPARATOR,*/
		XmVaPUSHBUTTON, CS("Flip Polarity"), NULL, NULL, NULL,
		XmNradioBehavior, True,
		XmNradioAlwaysOne, True,
		NULL);
	LIST (menu);
	PBCALLBACK (10,RenderTogglePolarity);
	XtVaSetValues (list[0],XmNset,True,NULL);
	/* overlay color pull right menu */
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"overlay",7,(XtCallbackProc)UIOverlayChoice,
		XmVaRADIOBUTTON, CS("Red"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Green"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("White"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Black"), NULL, NULL, NULL,
		XmNradioBehavior, True,
		XmNradioAlwaysOne, True,
		NULL);
	LIST (menu1);
	XtVaSetValues (list[COLOR_OVERLAY],XmNset,True,NULL);
	/* background color pull right menu */
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"background",9,(XtCallbackProc)UIBackgroundChoice,
		XmVaRADIOBUTTON, CS("Redish"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Greenish"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Light Gray"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Dark Gray"), NULL, NULL, NULL,
		XmNradioBehavior, True,
		XmNradioAlwaysOne, True,
		NULL);
	LIST (menu1);
	XtVaSetValues (list[COLOR_BACKGROUND],XmNset,True,NULL);
	/* mark color pull right menu */
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"mark",8,(XtCallbackProc)UIMarkChoice,
		XmVaRADIOBUTTON, CS("Red"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Green"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("White"), NULL, NULL, NULL,
		XmVaRADIOBUTTON, CS("Black"), NULL, NULL, NULL,
		XmNradioBehavior, True,
		XmNradioAlwaysOne, True,
		NULL);
	LIST (menu1);
	XtVaSetValues (list[COLOR_MARK],XmNset,True,NULL);
	/* pick pulldown menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"picks",ibar++,NULL,
		XmVaPUSHBUTTON, CS("Show/Hide picks"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Fix Picking"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Write to file"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Read from file"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Increase range"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Decrease range"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Increase draw size"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Decrease draw size"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaTITLE, CS("RIGHT MOUSE MAKES PICK"),
		XmVaTITLE, CS("+ 'a' KEY ADDS POINT"),
		XmVaTITLE, CS("+ 'm' KEY MOVES NEAREST POINT"),
		XmVaTITLE, CS("+ 'd' KEY DELETES NEAREST POINT"),
		XmVaTITLE, CS("+ 'q' or '?' KEY INQUIRES NEAREST POINT"),
		XmVaTITLE, CS("+ 's' KEY SELECTS SMOOTH REGION"),
		NULL);
	LIST (menu);
	PBCALLBACK (0,ViewTogglePick);
	PBCALLBACK (1,UIWakeup);
	PBCALLBACK (2,UIPikWrite);
	PBCALLBACK (3,UIPikRead);
	PBCALLBACK (4,PikIncreaseRange);
	PBCALLBACK (5,PikDecreaseRange);
	PBCALLBACK (6,PikIncreaseSize);
	PBCALLBACK (7,PikDecreaseSize);
	/* edit drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"edit",ibar++,NULL,
		XmVaPUSHBUTTON, CS("Clear Blob Pick"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Fill Blob With Edge Value"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Undo Blob Fill"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Interpolate Current Cube Edge Values Across Cube"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Undo Cube Edge Interpolation"), NULL, NULL, NULL,
/*		XmVaSEPARATOR,*/
		XmVaTITLE, CS("'s' KEY + RIGHT MOUSE DRAG PICKS SUBVOL"),
		XmVaTITLE, CS("SET SMOOTH VALUE FROM COLORBAR"),
		NULL);
	LIST (menu);
	PBCALLBACK (0,UIPickClear);
	PBCALLBACK (1,UISubvolumeSmooth);
	PBCALLBACK (2,UISmoothUndo);
	PBCALLBACK (3,UIEditGrade);
	PBCALLBACK (4,UIGradeUndo);
	/* status drop down menu */
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"sections",ibar++,NULL,
		XmVaCASCADEBUTTON, CS("On screen wiggle plot"), NULL,
		XmVaCASCADEBUTTON, CS("On screen contour plot"), NULL,
		XmVaCASCADEBUTTON, CS("On screen profile graph"), NULL,
		XmVaCASCADEBUTTON, CS("Print wiggle plot"), NULL,
		XmVaCASCADEBUTTON, CS("Print contour plot"), NULL,
		XmVaCASCADEBUTTON, CS("Print profile graph"), NULL,
		XmVaCASCADEBUTTON, CS("Save section in file"), NULL,
		XmVaCASCADEBUTTON, CS("Save profile in file"), NULL,
/*		XmVaSEPARATOR,*/
		XmVaTITLE, CS("CROSS HAIRS SET PLANES & PROFILES"),
		NULL);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"wiggle",0,NULL,
		XmVaPUSHBUTTON, CS("Front"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Side"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Top"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,PlotFrontWiggle);
	PBCALLBACK (1,PlotSideWiggle);
	PBCALLBACK (2,PlotTopWiggle);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"contour",1,NULL,
		XmVaPUSHBUTTON, CS("Front"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Side"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Top"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,PlotFrontContour);
	PBCALLBACK (1,PlotSideContour);
	PBCALLBACK (2,PlotTopContour);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"profile",2,NULL,
		XmVaPUSHBUTTON, CS("Down"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Across"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Deep"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,PlotDownProfile);
	PBCALLBACK (1,PlotAcrossProfile);
	PBCALLBACK (2,PlotDeepProfile);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"prwiggle",3,NULL,
		XmVaPUSHBUTTON, CS("Front"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Side"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Top"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,PrintFrontWiggle);
	PBCALLBACK (1,PrintSideWiggle);
	PBCALLBACK (2,PrintTopWiggle);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"prcontour",4,NULL,
		XmVaPUSHBUTTON, CS("Front"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Side"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Top"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,PrintFrontContour);
	PBCALLBACK (1,PrintSideContour);
	PBCALLBACK (2,PrintTopContour);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"prprofile",5,NULL,
		XmVaPUSHBUTTON, CS("Down"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Across"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Deep"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,PrintDownProfile);
	PBCALLBACK (1,PrintAcrossProfile);
	PBCALLBACK (2,PrintDeepProfile);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"savecontour",6,NULL,
		XmVaPUSHBUTTON, CS("Front"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Side"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Top"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,UISaveFront);
	PBCALLBACK (1,UISaveSide);
	PBCALLBACK (2,UISaveTop);
	ui->menu1 = XmVaCreateSimplePulldownMenu (ui->menu,"prprofile",7,NULL,
		XmVaPUSHBUTTON, CS("Down"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Across"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Deep"), NULL, NULL, NULL,
		NULL);
	LIST (menu1);
	PBCALLBACK (0,UISaveDown);
	PBCALLBACK (1,UISaveAcross);
	PBCALLBACK (2,UISaveDeep);
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"status",ibar++,(XtCallbackProc)UIStatusChoice,
		XmVaPUSHBUTTON, CS("Dataset"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Values"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Axis0"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Axis1"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Axis2"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Axis3"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Axis4"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Data Axis5"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Style"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Down Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Across Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Deep Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("4D Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("5D Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Color Axis"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Color"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Render"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Graphics"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Mouse Buttons"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Movie"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Picks"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Pick List"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Piks"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Edit"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Frame List"), NULL, NULL, NULL,
		NULL);
	ui->menu = XmVaCreateSimplePulldownMenu (ui->menuBar,"help",ibar++,(XtCallbackProc)UIHelpChoice,
		XmVaTITLE, CS("MORE'D TO TERMINAL WINDOW"),
		XmVaPUSHBUTTON, CS("Command Line Args"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("File Formats"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Display Windows"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Mouse Usage"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Main Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Style Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Orient Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Size Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Movie Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Color Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Pick Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Edit Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Section Functions"), NULL, NULL, NULL,
		XmVaPUSHBUTTON, CS("Status Functions"), NULL, NULL, NULL,
		NULL);
	XtManageChild (ui->menuBar);
	}

/* view choice callback */
UIStyleChoice (widget,item)
Widget widget;
int item;
	{
	extern View view;

	/* set array parameters according to view */