source: SH_SHM/branches/2011.2/source/img/animatrix.uil @ 364

Revision 16, 7.9 KB checked in by marcus, 14 years ago (diff)

r1 | svn | 2007-12-13 11:10:29 +0100 (Do, 13 Dez 2007) | 2 lines

Initial import
Line 
1
2! file animatrix.uil
3!      =============
4!
5! version 2, 1-Nov-97
6!
7! widget structure of module animatrix.c
8! K. Stammler, 31-Oct-97
9
10
11module animatrix
12    version = 'v1.0'
13    names = case_sensitive
14
15procedure
16        call_create_widget( integer );
17        call_activate( integer );
18        call_expose( integer );
19
20value
21
22! texts
23        k_menutitle_file_text    : 'File';
24        k_entry_quit_text        : 'Quit';
25        k_entry_readnext_text    : 'Read Next';
26        k_entry_readprev_text    : 'Read Prev';
27        k_entry_readloop_text    : 'Read Loop';
28        k_entry_plot_text        : 'Plot';
29        k_entry_plot_log_text    : 'Plot Log';
30        k_entry_plot_p2_text     : 'Pow ++';
31        k_entry_plot_p4_text     : 'Pow --';
32        k_entry_radial_grid_text : 'Rad Grid';
33        k_entry_colors_green_red_text   : 'G-R';
34        k_entry_colors_blue_red_text    : 'B-R';
35        k_entry_colors_black_white_text : 'B-W';
36        k_entry_colors_blue_yellow_text : 'B-Y';
37
38! widget numbers
39        w_draw                   : 2;
40        w_menu_main              : 5;
41        w_entry_quit             : 51;
42        w_entry_plot             : 52;
43        w_entry_plot_log         : 53;
44        w_entry_plot_p2          : 54;
45        w_entry_plot_p4          : 55;
46        w_entry_radial_grid      : 56;
47        w_entry_colors_green_red   : 57;
48        w_entry_colors_blue_red    : 58;
49        w_entry_colors_black_white : 59;
50        w_entry_colors_blue_yellow : 60;
51        w_entry_readnext         : 61;
52        w_entry_readprev         : 62;
53        w_entry_readloop         : 63;
54
55! accelerators
56        k_acc_quit               : "<Key>q";
57        k_acct_quit              : "q";
58        k_acc_readnext           : "<Key>n";
59        k_acct_readnext          : "n";
60        k_acc_readprev           : "<Key>b";
61        k_acct_readprev          : "b";
62        k_acc_readloop           : "<Key>f";
63        k_acct_readloop          : "f";
64        k_acc_plot               : "<Key>p";
65        k_acct_plot              : "p";
66        k_acc_plot_log           : "<Key>l";
67        k_acct_plot_log          : "l";
68        k_acc_plot_p2            : "<Key>u";
69        k_acct_plot_p2           : "u";
70        k_acc_plot_p4            : "<Key>d";
71        k_acct_plot_p4           : "d";
72        k_acc_radial_grid        : "<Key>r";
73        k_acct_radial_grid       : "r";
74        k_acc_colors_green_red   : "<Key>1";
75        k_acct_colors_green_red  : "1";
76        k_acc_colors_blue_red    : "<Key>2";
77        k_acct_colors_blue_red   : "2";
78        k_acc_colors_black_white : "<Key>3";
79        k_acct_colors_black_white: "3";
80        k_acc_colors_blue_yellow : "<Key>4";
81        k_acct_colors_blue_yellow: "4";
82
83! fonts
84   k_menu_font         :
85      font('-ADOBE-Courier-Bold-R-Normal--14-140-75-75-M-90-ISO8859-1');
86
87object
88        main_window: XmMainWindow {
89                arguments {
90!                       XmNx = 100;
91!                       XmNy = 100;
92                        XmNwidth = 910;
93                        XmNheight = 642;
94                };
95                controls {
96                        XmMenuBar        menu_main;
97                        XmDrawingArea    drawing_area;
98                };
99        };
100
101object
102        drawing_area: XmDrawingArea {
103                arguments {
104                        XmNx = 0;
105                        XmNy = 32;
106                        XmNwidth = 910;
107                        XmNheight = 610;
108                        XmNbackground = color( 'white', background );
109                        XmNforeground = color( 'black', foreground );
110                };
111                callbacks {
112                        MrmNcreateCallback = procedure call_create_widget(w_draw);
113                        XmNexposeCallback = procedure call_expose(w_draw);
114      };
115   };
116
117object
118        menu_main: XmMenuBar {
119                arguments {
120                        XmNorientation = XmHORIZONTAL;
121                        XmNspacing     = 15;  /* Pixels between items in menu */
122                };
123                controls {
124                        XmCascadeButton menutitle_file;
125                };
126                callbacks {
127                        MrmNcreateCallback =
128                                procedure call_create_widget(w_menu_main);
129                };
130        };
131
132object
133        menutitle_file: XmCascadeButton {
134                arguments {
135                        XmNlabelString = k_menutitle_file_text;
136                        XmNfontList = k_menu_font;
137                };
138                controls {
139                        XmPulldownMenu menu_file;
140                };
141        };
142
143object
144        menu_file: XmPulldownMenu {
145                controls {
146                        XmPushButton entry_readnext;
147                        XmPushButton entry_readprev;
148                        XmPushButton entry_readloop;
149                        XmPushButton entry_plot;
150                        XmPushButton entry_plot_log;
151                        XmPushButton entry_plot_p2;
152                        XmPushButton entry_plot_p4;
153                        XmPushButton entry_radial_grid;
154                        XmPushButton entry_colors_green_red;
155                        XmPushButton entry_colors_blue_red;
156                        XmPushButton entry_colors_black_white;
157                        XmPushButton entry_colors_blue_yellow;
158                        XmPushButton entry_quit;
159                };
160        };
161
162object
163        entry_quit: XmPushButton {
164                arguments {
165                        XmNlabelString = k_entry_quit_text;
166                        XmNaccelerator = k_acc_quit;
167                        XmNacceleratorText = k_acct_quit;
168                        XmNfontList = k_menu_font;
169                };
170                callbacks {
171                        XmNactivateCallback = procedure call_activate(w_entry_quit);
172                };
173        };
174
175object
176        entry_readnext: XmPushButton {
177                arguments {
178                        XmNlabelString = k_entry_readnext_text;
179                        XmNaccelerator = k_acc_readnext;
180                        XmNacceleratorText = k_acct_readnext;
181                        XmNfontList = k_menu_font;
182                };
183                callbacks {
184                        XmNactivateCallback = procedure call_activate(w_entry_readnext);
185                };
186        };
187
188object
189        entry_readprev: XmPushButton {
190                arguments {
191                        XmNlabelString = k_entry_readprev_text;
192                        XmNaccelerator = k_acc_readprev;
193                        XmNacceleratorText = k_acct_readprev;
194                        XmNfontList = k_menu_font;
195                };
196                callbacks {
197                        XmNactivateCallback = procedure call_activate(w_entry_readprev);
198                };
199        };
200
201object
202        entry_readloop: XmPushButton {
203                arguments {
204                        XmNlabelString = k_entry_readloop_text;
205                        XmNaccelerator = k_acc_readloop;
206                        XmNacceleratorText = k_acct_readloop;
207                        XmNfontList = k_menu_font;
208                };
209                callbacks {
210                        XmNactivateCallback = procedure call_activate(w_entry_readloop);
211                };
212        };
213
214object
215        entry_plot: XmPushButton {
216                arguments {
217                        XmNlabelString = k_entry_plot_text;
218                        XmNaccelerator = k_acc_plot;
219                        XmNacceleratorText = k_acct_plot;
220                        XmNfontList = k_menu_font;
221                };
222                callbacks {
223                        XmNactivateCallback = procedure call_activate(w_entry_plot);
224                };
225        };
226
227object
228        entry_plot_log: XmPushButton {
229                arguments {
230                        XmNlabelString = k_entry_plot_log_text;
231                        XmNaccelerator = k_acc_plot_log;
232                        XmNacceleratorText = k_acct_plot_log;
233                        XmNfontList = k_menu_font;
234                };
235                callbacks {
236                        XmNactivateCallback = procedure call_activate(w_entry_plot_log);
237                };
238        };
239
240object
241        entry_plot_p2: XmPushButton {
242                arguments {
243                        XmNlabelString = k_entry_plot_p2_text;
244                        XmNaccelerator = k_acc_plot_p2;
245                        XmNacceleratorText = k_acct_plot_p2;
246                        XmNfontList = k_menu_font;
247                };
248                callbacks {
249                        XmNactivateCallback = procedure call_activate(w_entry_plot_p2);
250                };
251        };
252
253object
254        entry_plot_p4: XmPushButton {
255                arguments {
256                        XmNlabelString = k_entry_plot_p4_text;
257                        XmNaccelerator = k_acc_plot_p4;
258                        XmNacceleratorText = k_acct_plot_p4;
259                        XmNfontList = k_menu_font;
260                };
261                callbacks {
262                        XmNactivateCallback = procedure call_activate(w_entry_plot_p4);
263                };
264        };
265
266object
267        entry_radial_grid: XmPushButton {
268                arguments {
269                        XmNlabelString = k_entry_radial_grid_text;
270                        XmNaccelerator = k_acc_radial_grid;
271                        XmNacceleratorText = k_acct_radial_grid;
272                        XmNfontList = k_menu_font;
273                };
274                callbacks {
275                        XmNactivateCallback = procedure call_activate(w_entry_radial_grid);
276                };
277        };
278
279object
280        entry_colors_green_red: XmPushButton {
281                arguments {
282                        XmNlabelString = k_entry_colors_green_red_text;
283                        XmNaccelerator = k_acc_colors_green_red;
284                        XmNacceleratorText = k_acct_colors_green_red;
285                        XmNfontList = k_menu_font;
286                };
287                callbacks {
288                        XmNactivateCallback =
289                                procedure call_activate(w_entry_colors_green_red);
290                };
291        };
292
293object
294        entry_colors_blue_red: XmPushButton {
295                arguments {
296                        XmNlabelString = k_entry_colors_blue_red_text;
297                        XmNaccelerator = k_acc_colors_blue_red;
298                        XmNacceleratorText = k_acct_colors_blue_red;
299                        XmNfontList = k_menu_font;
300                };
301                callbacks {
302                        XmNactivateCallback =
303                                procedure call_activate(w_entry_colors_blue_red);
304                };
305        };
306
307object
308        entry_colors_black_white: XmPushButton {
309                arguments {
310                        XmNlabelString = k_entry_colors_black_white_text;
311                        XmNaccelerator = k_acc_colors_black_white;
312                        XmNacceleratorText = k_acct_colors_black_white;
313                        XmNfontList = k_menu_font;
314                };
315                callbacks {
316                        XmNactivateCallback =
317                                procedure call_activate(w_entry_colors_black_white);
318                };
319        };
320
321object
322        entry_colors_blue_yellow: XmPushButton {
323                arguments {
324                        XmNlabelString = k_entry_colors_blue_yellow_text;
325                        XmNaccelerator = k_acc_colors_blue_yellow;
326                        XmNacceleratorText = k_acct_colors_blue_yellow;
327                        XmNfontList = k_menu_font;
328                };
329                callbacks {
330                        XmNactivateCallback =
331                                procedure call_activate(w_entry_colors_blue_yellow);
332                };
333        };
334
335end module;
Note: See TracBrowser for help on using the repository browser.