1
! UIMX ascii 2.0 key: 8610
3
*lincat_list.class: topLevelShell
4
*lincat_list.parent: NO_PARENT
5
*lincat_list.static: true
6
*lincat_list.gbldecl: #include <stdio.h>\
7
#include <ExternResources.h>
8
*lincat_list.ispecdecl:
9
*lincat_list.funcdecl: swidget create_lincat_list()\
11
*lincat_list.funcname: create_lincat_list
12
*lincat_list.funcdef: "swidget", "<create_lincat_list>(%)"
14
*lincat_list.fcode: return(rtrn);\
17
*lincat_list.name: lincat_list
20
*lincat_list.width: 199
21
*lincat_list.height: 355
22
*lincat_list.iconName: "Wavelength selection"
23
*lincat_list.keyboardFocusPolicy: "pointer"
24
*lincat_list.background: "AntiqueWhite"
25
*lincat_list.geometry: "+100+100"
28
*form9.parent: lincat_list
31
*form9.resizePolicy: "resize_none"
32
*form9.unitType: "pixels"
37
*form9.background: ApplicBackground
39
*scrolledWindow2.class: scrolledWindow
40
*scrolledWindow2.parent: form9
41
*scrolledWindow2.static: true
42
*scrolledWindow2.name: scrolledWindow2
43
*scrolledWindow2.scrollingPolicy: "application_defined"
46
*scrolledWindow2.visualPolicy: "variable"
47
*scrolledWindow2.scrollBarDisplayPolicy: "static"
48
*scrolledWindow2.shadowThickness: 0
49
*scrolledWindow2.scrollBarPlacement: "bottom_left"
50
*scrolledWindow2.background: ListBackground
51
*scrolledWindow2.height: 350
52
*scrolledWindow2.rightAttachment: "attach_form"
53
*scrolledWindow2.rightOffset: 2
54
*scrolledWindow2.leftAttachment: "attach_form"
55
*scrolledWindow2.leftOffset: 2
56
*scrolledWindow2.width: 160
58
*sl_lincat_list.class: scrolledList
59
*sl_lincat_list.parent: scrolledWindow2
60
*sl_lincat_list.static: true
61
*sl_lincat_list.name: sl_lincat_list
62
*sl_lincat_list.width: 238
63
*sl_lincat_list.height: 352
64
*sl_lincat_list.scrollBarDisplayPolicy: "static"
65
*sl_lincat_list.listSizePolicy: "variable"
66
*sl_lincat_list.background: TextBackground
67
*sl_lincat_list.fontList: SmallFont
68
*sl_lincat_list.visibleItemCount: 21
69
*sl_lincat_list.browseSelectionCallback: {\
70
#include <spec_comm.h>\
74
XmListCallbackStruct *cbs;\
75
extern char Plotmode[];\
77
cbs = (XmListCallbackStruct *)UxCallbackArg;\
79
XmStringGetLtoR(cbs->item, XmSTRING_DEFAULT_CHARSET, &choice);\
81
if ( XmToggleButtonGetState(UxGetWidget(UxFindSwidget("tg_twodopt"))) )\
82
sprintf(command, "%s%s ? 2D", C_PLOT_DISTOR, choice); /* 2-D */\
84
sprintf(command, "%s%s", C_PLOT_DISTOR, choice); /* RBR */\
86
AppendDialogText(command);\
87
strcpy(Plotmode, C_PLOT_DISTOR);\
90
UxPopdownInterface(UxFindSwidget("lincat_list"));\
93
*sl_lincat_list.foreground: ListForeground