add "#ifdef macintosh" for carbon target
[btb/d2x.git] / main / newmenu.c
1 /* $Id: newmenu.c,v 1.27 2004-08-01 13:01:39 schaffner Exp $ */
2 /*
3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
13 */
14
15 /*
16  *
17  * Routines for menus.
18  *
19  * Old Log:
20  * Revision 1.26  1996/04/14  21:07:35  allender
21  * some change for update
22  *
23  * Revision 1.25  1995/10/31  10:19:25  allender
24  * shareware stuff
25  *
26  * Revision 1.24  1995/10/27  11:09:04  allender
27  * always cd to descent dir before any menu processing --
28  * sanity check because of way mac does volume mounting and
29  * other file stuff
30  *
31  * Revision 1.23  1995/10/24  18:11:19  allender
32  * do_appl_quit saves and restores background -- don't
33  * do any special processing.  fixed newmenu_do3 to pass width
34  * and height to ...do_4
35  *
36  * Revision 1.22  1995/10/21  23:26:25  allender
37  * can't do cmd-q in multiplayer games
38  *
39  * Revision 1.21  1995/10/21  22:53:25  allender
40  * menus need to be 8 byte multiple wide -- printscreen stuff
41  *
42  * Revision 1.20  1995/10/20  00:50:15  allender
43  * redbook stuff and make esc leave menu always
44  *
45  * Revision 1.19  1995/10/17  13:14:52  allender
46  * mouse support for other menus now operational -- dragging
47  * mouse will also move sliders
48  *
49  * Revision 1.18  1995/10/12  17:35:19  allender
50  * mouse support for pilot and demos
51  *
52  * Revision 1.17  1995/10/11  12:17:47  allender
53  * removed event loop processing
54  *
55  * Revision 1.16  1995/10/10  11:51:29  allender
56  * align menus to 8 byte boundry
57  *
58  * Revision 1.15  1995/10/05  14:09:36  allender
59  * lowered starting x location on menus to fixup network
60  * status screen chopping off characters
61  *
62  * Revision 1.14  1995/09/24  10:52:27  allender
63  * made close boxes work
64  * maybe some other minor stuff?
65  *
66  * Revision 1.13  1995/09/15  09:02:04  allender
67  * started putting mouse support in listboxes
68  *
69  * Revision 1.12  1995/09/13  08:50:14  allender
70  * close box in this rev?  Worked on getting list box better
71  * looking
72  *
73  * Revision 1.11  1995/09/01  10:52:37  allender
74  * fixed up list boxes
75  *
76  * Revision 1.10  1995/08/24  16:23:08  allender
77  * mouse support for most menus
78  *
79  * Revision 1.9  1995/08/08  13:46:56  allender
80  * added macsys header file
81  *
82  * Revision 1.8  1995/08/01  16:03:54  allender
83  * added file list with Desalvo's directory stuff
84  *
85  * Revision 1.7  1995/07/26  17:03:37  allender
86  * show then hide cursor during newmenu operations -- not quite
87  * right yet
88  *
89  * Revision 1.6  1995/07/17  08:56:26  allender
90  * fixed up menus to look better with new high res fonts
91  *
92  * Revision 1.5  1995/07/12  10:35:52  allender
93  * removed old debug thing
94  *
95  * Revision 1.4  1995/06/23  10:23:21  allender
96  * menus should work in any resolution now
97  *
98  * Revision 1.3  1995/06/20  09:11:19  allender
99  * changed menu system to support 640x480 instead of 320x200
100  *
101  * Revision 1.2  1995/06/13  13:07:30  allender
102  * added special key to move 320x200 window to upper left corner of screen
103  *
104  * Revision 1.1  1995/05/16  15:29:13  allender
105  * Initial revision
106  *
107  * Revision 2.8  1995/05/26  16:16:28  john
108  * Split SATURN into define's for requiring cd, using cd, etc.
109  * Also started adding all the Rockwell stuff.
110  *
111  * Revision 2.7  1995/04/23  14:54:17  john
112  * Fixed bug with background breaking in first menu.
113  *
114  * Revision 2.6  1995/03/21  14:38:46  john
115  * Ifdef'd out the NETWORK code.
116  *
117  * Revision 2.5  1995/03/15  14:33:29  john
118  * Added code to force the Descent CD-rom in the drive.
119  *
120  * Revision 2.4  1995/03/14  18:24:28  john
121  * Force Destination Saturn to use CD-ROM drive.
122  *
123  * Revision 2.3  1995/03/14  16:22:23  john
124  * Added cdrom alternate directory stuff.
125  *
126  * Revision 2.2  1995/03/06  18:30:51  john
127  * Fixed bug with newmenu trashing editor font.
128  *
129  * Revision 2.1  1995/03/06  15:23:17  john
130  * New screen techniques.
131  *
132  * Revision 2.0  1995/02/27  11:27:55  john
133  * New version 2.0, which has no anonymous unions, builds with
134  * Watcom 10.0, and doesn't require parsing BITMAPS.TBL.
135  *
136  * Revision 1.129  1995/02/11  16:19:56  john
137  * Added code to make the default mission be the one last played.
138  *
139  * Revision 1.128  1995/02/02  19:41:33  john
140  * Added 10 save game slots.
141  *
142  * Revision 1.127  1995/02/01  18:13:52  john
143  * Fixed some constants.
144  *
145  * Revision 1.126  1995/02/01  18:04:01  yuan
146  * Added 50 characters to list.
147  *
148  * Revision 1.125  1995/02/01  13:39:35  john
149  * Made menu text that changes not overwrite.
150  *
151  * Revision 1.124  1995/01/31  10:47:57  john
152  * Added menu that you can specify the width of the menu.
153  *
154  * Revision 1.123  1995/01/28  17:18:12  john
155  * Added file list box.
156  *
157  * Revision 1.122  1995/01/27  17:15:55  john
158  * Made prev comment actually work.
159  *
160  * Revision 1.121  1995/01/27  16:49:03  john
161  * *** empty log message ***
162  *
163  * Revision 1.120  1995/01/27  16:46:40  john
164  * Made so that input_menu only clears text if -empty-.
165  *
166  * Revision 1.119  1995/01/27  15:25:04  john
167  * Delete saved game when deleteing a pilot file.
168  *
169  * Revision 1.118  1995/01/25  16:36:09  john
170  * Made so that when you hit enter during
171  * game save, -empty- goes away.
172  *
173  * Revision 1.117  1995/01/24  16:59:30  john
174  * took out mono debugging text.
175  *
176  * Revision 1.116  1995/01/24  16:23:16  john
177  * Fixed some bugs with listboxes.
178  *
179  * Revision 1.115  1995/01/23  23:47:36  matt
180  * Made keypad enter work in menus
181  *
182  * Revision 1.114  1995/01/23  19:29:59  john
183  * Added scrolling listbox menus.
184  *
185  * Revision 1.113  1995/01/19  12:33:34  john
186  * Made keys jump to sliders, etc in menus.
187  *
188  * Revision 1.112  1995/01/15  14:33:08  rob
189  * Fixed problem with nested nm_messageboxes.
190  *
191  * Revision 1.111  1995/01/03  17:33:40  john
192  * Made scrolling textbox. Used it for scores cool saying.
193  *
194  * Revision 1.110  1994/12/28  10:42:58  john
195  * More VFX tweaking.
196  *
197  * Revision 1.109  1994/12/28  10:26:39  john
198  * Fixed some VFX problems.
199  *
200  * Revision 1.108  1994/12/15  23:18:10  john
201  * Added fix so that VFX mode doesn't hang.
202  *
203  * Revision 1.107  1994/12/15  12:19:55  john
204  * Made menu use clipped bitblt functions.
205  *
206  * Revision 1.106  1994/12/09  00:41:30  mike
207  * fix hang in automap print screen
208  *
209  * Revision 1.105  1994/12/08  10:01:34  john
210  * Changed the way the player callsign stuff works.
211  *
212  * Revision 1.104  1994/12/04  15:34:30  john
213  * Fixed bug with newmenu not restoring font properly.
214  *
215  * Revision 1.103  1994/12/03  17:47:09  john
216  * Fixed bug that didn't free filename mem when not .plr files found.
217  *
218  * Revision 1.102  1994/12/03  15:06:15  john
219  * If no pilot exists, bring up box asking for name.
220  *
221  * Revision 1.101  1994/12/03  11:04:02  john
222  * Changed newmenu code a bit to fix bug with bogus
223  * backgrounds occcasionally.
224  *
225  * Revision 1.100  1994/12/01  20:15:48  yuan
226  * Localization.
227  *
228  * Revision 1.99  1994/12/01  10:33:28  john
229  * Fixed bug with large menu backgrounds not drawing correctly.
230  *
231  * Revision 1.98  1994/12/01  02:41:56  john
232  * Fixed warnining.
233  *
234  * Revision 1.97  1994/11/30  22:52:43  john
235  * Fixed bug in code that made the backgrounds behind menus.
236  *
237  * Revision 1.96  1994/11/30  19:47:42  john
238  * Added a check for out o' memory when mallocing background.
239  *
240  * Revision 1.95  1994/11/30  19:39:10  john
241  * ..
242  *
243  * Revision 1.94  1994/11/30  19:38:27  john
244  * fixed bug with previous.
245  *
246  * Revision 1.93  1994/11/30  19:36:47  john
247  * Made Gravis Ultrasound work again.  Made the scores blink
248  * at a constant rate.  Revamped the newmenu background storage,
249  * which hopefully fixed some bugs.  Made menus in ame not pause
250  * sound, except for the pause key.               ^== Game!
251  *
252  * Revision 1.92  1994/11/30  18:06:05  matt
253  * When player types space in callsign, comes up as underscore
254  *
255  * Revision 1.91  1994/11/30  12:28:22  adam
256  * added PCX support
257  *
258  * Revision 1.90  1994/11/30  12:10:59  adam
259  * added support for PCX titles/brief screens
260  *
261  * Revision 1.89  1994/11/29  00:59:12  allender
262  * change newmenu_get_filename so demo files can be deleted too
263  *
264  * Revision 1.88  1994/11/27  21:16:18  allender
265  * made some return values in newmenu_get_filename 0 instead of -1
266  *
267  * Revision 1.87  1994/11/27  16:58:17  matt
268  * Made printscreen work all the time (not just when no ndebug) and made it
269  * work when getting a filename.
270  *
271  * Revision 1.86  1994/11/27  16:47:51  john
272  * Made the call to fade in palette only happen if it needs to be, just
273  * because I thought it might reduce code paging with vm in menus.
274  *
275  * Revision 1.85  1994/11/26  15:30:16  matt
276  * Allow escape out of change pilot menu
277  *
278  * Revision 1.84  1994/11/26  14:17:26  matt
279  * Player can now only enter valid chars for his name
280  *
281  * Revision 1.83  1994/11/23  14:13:17  allender
282  * if no demo files, displays less "techy" message
283  *
284  * Revision 1.82  1994/11/21  11:55:52  john
285  * Fixed some sound pausing in menus bugs.
286  *
287  * Revision 1.81  1994/11/19  15:14:58  mike
288  * remove unused code and data
289  *
290  * Revision 1.80  1994/11/18  23:37:54  john
291  * Changed some shorts to ints.
292  *
293  * Revision 1.79  1994/11/15  09:29:21  john
294  * Made it so that pressing a letter when selecting players moves to
295  * a matching choice.
296  *
297  * Revision 1.78  1994/11/14  17:12:28  adam
298  * *** empty log message ***
299  *
300  * Revision 1.77  1994/11/14  16:58:31  rob
301  * Tried to fix a problem with save demo dialog.
302  *
303  * Revision 1.76  1994/11/14  16:13:46  matt
304  * Fixed handling of players with DOS device names
305  *
306  * Revision 1.75  1994/11/13  18:12:53  matt
307  * Fixed handling of filenames that are the same as DOS devices
308  *
309  * Revision 1.74  1994/11/13  17:20:44  john
310  * Fixed text a bit.
311  *
312  * Revision 1.73  1994/11/13  17:18:22  john
313  * Changed wording of new pilot.
314  *
315  * Revision 1.72  1994/11/13  17:14:21  john
316  * Fixed bug with player list box.
317  *
318  * Revision 1.71  1994/11/13  17:12:48  john
319  * Fixed broken demo file list.
320  *
321  * Revision 1.70  1994/11/13  17:04:49  john
322  * Made the callsign entry be a list box and gave the ability
323  * to delete players.
324  *
325  * Revision 1.69  1994/11/13  15:38:03  john
326  * Added critical error handler to game.  Took out -editor command line
327  * option because it didn't work anymore and wasn't worth fixing.  Made scores
328  * not use MINER enviroment variable on release version, and made scores
329  * not print an error if there is no descent.hi.
330  *
331  * Revision 1.68  1994/11/11  18:17:03  rob
332  * Made multi_menu_poll return a value to exit menus.
333  *
334  * Revision 1.67  1994/11/11  11:07:06  rob
335  * Added include of multi.h
336  *
337  * Revision 1.66  1994/11/10  20:25:16  rob
338  * John's stuff to make network menus work.
339  *
340  * Revision 1.65  1994/11/08  14:51:39  john
341  * Added nm_messagebox1, (like the original, only you can pass a function).
342  *
343  * Revision 1.64  1994/11/08  08:30:39  john
344  * Fixed bug with centering titles.
345  *
346  * Revision 1.63  1994/11/08  08:27:00  john
347  * Made titles and subtitles center.
348  *
349  * Revision 1.62  1994/11/07  09:40:48  john
350  * Neatend file list box some.
351  *
352  * Revision 1.61  1994/11/05  17:22:41  john
353  * Fixed lots of sequencing problems with newdemo stuff.
354  *
355  * Revision 1.60  1994/11/05  15:04:08  john
356  * Added non-popup menu for the main menu, so that scores and credits don't have to save
357  * the background.
358  *
359  * Revision 1.59  1994/11/05  14:03:52  john
360  * Fixed fade transitions between all screens by making gr_palette_fade_in and out keep
361  * track of whether the palette is faded in or not.  Then, wherever the code needs to fade out,
362  * it just calls gr_palette_fade_out and it will fade out if it isn't already.  The same with fade_in.
363  * This eliminates the need for all the flags like Menu_fade_out, game_fade_in palette, etc.
364  *
365  * Revision 1.58  1994/11/04  20:11:50  john
366  * Neatening up palette stuff with demos.
367  *
368  * Revision 1.57  1994/11/04  13:49:24  allender
369  * fixed newmenu_get_filename to work with less than 10 files
370  *
371  * Revision 1.56  1994/11/03  19:37:44  john
372  * Added scrolling file list box
373  *
374  * Revision 1.55  1994/10/31  18:16:42  john
375  * Made Pad arrows work with menus.
376  *
377  * Revision 1.54  1994/10/28  14:54:25  john
378  * Added forward dec. for newmenu_close.
379  * .\
380  *
381  * Revision 1.53  1994/10/28  14:53:00  john
382  * Fixed hideous bug that would bomb if you called newmenu_draw_background
383  * before any menus were ever displayed.
384  *
385  * Revision 1.52  1994/10/24  19:56:53  john
386  * Made the new user setup prompt for config options.
387  *
388  * Revision 1.51  1994/10/24  15:15:49  john
389  * Made Esc exit nm_messagebox's,
390  * ,
391  *
392  * Revision 1.50  1994/10/21  15:20:20  john
393  * Made PrtScr do screen dump, not F2.
394  *
395  * Revision 1.49  1994/10/18  12:33:38  john
396  * Only used copy the item text into the saved_text field
397  * if it is an inputbox or inputbox_menu.
398  *
399  * Revision 1.48  1994/10/17  11:04:01  john
400  * Made backtab work also.
401  *
402  * Revision 1.47  1994/10/17  10:47:49  john
403  * MAde Tab work like down arrow.
404  *
405  * Revision 1.46  1994/10/17  10:45:10  john
406  * Made the player able to abort death by pressing any button or key.
407  *
408  * Revision 1.45  1994/10/13  21:52:02  john
409  * Made it so that if a messagebox has 1 choice, then
410  * Esc will return -1.
411  *
412  * Revision 1.44  1994/10/13  11:35:38  john
413  * Made Thrustmaster FCS Hat work.  Put a background behind the
414  * keyboard configure.  Took out turn_sensitivity.  Changed sound/config
415  * menu to new menu. Made F6 be calibrate joystick.
416  *
417  * Revision 1.43  1994/10/11  17:18:52  john
418  * Fixed bug with sliders always starting at -1.
419  *
420  * Revision 1.42  1994/10/11  17:08:29  john
421  * Added sliders for volume controls.
422  *
423  * Revision 1.41  1994/10/06  16:04:40  john
424  * Made text items color differently than others. Adam
425  * is gonna make a diff colored font for these.
426  *
427  * Revision 1.40  1994/10/06  15:08:23  rob
428  * Allowed any negative key value to abort the menu and return.
429  *
430  * Revision 1.39  1994/10/04  10:26:06  matt
431  * Changed fade in to happen every time a global var is set
432  *
433  * Revision 1.38  1994/10/04  09:16:08  john
434  * If you pass -1 as choice in newmenu_do1, then
435  * no item is highlighted until you press up or
436  * down arrows.
437  *
438  * Revision 1.37  1994/10/03  23:44:37  matt
439  * Save & restore palette effect around menus & pause message
440  *
441  * Revision 1.36  1994/10/03  22:59:40  matt
442  * Re-enabled backspace to generate Int3()
443  *
444  * Revision 1.35  1994/10/03  19:11:21  matt
445  * Changed string input cursor to blinking underscore
446  *
447  * Revision 1.34  1994/10/03  14:44:15  john
448  * Added newmenu_do1, which allows you to pass the starting
449  * item to the menu system
450  *
451  * Revision 1.33  1994/09/30  11:51:21  john
452  * Added Matt's NM_TYPE_INPUT_MENU
453  *
454  * Revision 1.32  1994/09/28  17:22:56  matt
455  * Added extra space between subtitle and menu items
456  * Made shortcut key check ignore leading spaces in text
457  *
458  * Revision 1.31  1994/09/15  16:11:22  john
459  * Added support for VFX1 head tracking. Fixed bug with memory over-
460  * write when using stereo mode.
461  *
462  * Revision 1.30  1994/09/12  09:52:59  john
463  * Made global flush function that flushes keyboard,mouse, and joystick.
464  *
465  * Revision 1.29  1994/09/10  19:10:54  matt
466  * Fixed a few things (like arrow key handling) for menus with all
467  * text items, such as the key help message.
468  *
469  * Revision 1.28  1994/09/01  18:55:38  john
470  * freed scores.lbm
471  *
472  * Revision 1.27  1994/09/01  18:03:50  john
473  * Neatened up scores a bit.
474  *
475  * Revision 1.26  1994/08/30  20:38:13  john
476  * Passed citem in newmenu sub.
477  *
478  * Revision 1.25  1994/08/30  11:13:01  john
479  * Added beveled edges to menus.
480  *
481  * Revision 1.24  1994/08/26  13:01:58  john
482  * Put high score system in.
483  *
484  * Revision 1.23  1994/08/16  00:18:44  john
485  * Made pressing the first letter of a menu
486  * item move to it.
487  *
488  * Revision 1.22  1994/08/15  23:17:43  john
489  * *** empty log message ***
490  *
491  * Revision 1.21  1994/08/15  23:15:28  john
492  * Made 1 menu/checkbox return with any keypress.
493  *
494  * Revision 1.20  1994/08/12  10:18:23  john
495  * *** empty log message ***
496  *
497  * Revision 1.19  1994/08/12  10:09:11  john
498  * Made borders better.
499  *
500  * Revision 1.18  1994/08/12  03:11:16  john
501  * Made network be default off; Moved network options into
502  * main menu.  Made starting net game check that mines are the
503  * same.
504  *
505  * Revision 1.17  1994/08/11  22:14:43  john
506  * Free'd up some memory that I forgot to free.
507  *
508  * Revision 1.16  1994/08/11  19:27:35  john
509  * Made the Backspace drop into the debugger only
510  * if you're not in an inputbox.
511  *
512  * Revision 1.15  1994/08/11  18:01:49  matt
513  * Added F2 and BACKSPACE keys to new menu system
514  *
515  * Revision 1.14  1994/08/11  14:25:58  john
516  * *** empty log message ***
517  *
518  * Revision 1.13  1994/08/11  14:25:40  john
519  * *** empty log message ***
520  *
521  * Revision 1.12  1994/08/11  13:47:02  john
522  * Made newmenu have subtitles, passed key through to
523  * the newmenu subfunctions.
524  *
525  * Revision 1.11  1994/08/11  12:45:08  john
526  * *** empty log message ***
527  *
528  * Revision 1.10  1994/08/11  12:25:45  john
529  * Made right_offset spacing different
530  *
531  * Revision 1.9  1994/08/11  12:09:49  john
532  * Made work with bitmapped fonts.
533  *
534  * Revision 1.8  1994/08/10  19:56:16  john
535  * Changed font stuff; Took out old menu; messed up lots of
536  * other stuff like game sequencing messages, etc.
537  *
538  * Revision 1.7  1994/07/27  16:12:23  john
539  * Changed newmenu system to have a callback function.
540  * /.
541  *
542  * Revision 1.6  1994/07/25  15:10:23  john
543  * *** empty log message ***
544  *
545  * Revision 1.5  1994/07/25  12:33:35  john
546  * Network "pinging" in.
547  *
548  * Revision 1.4  1994/07/24  18:21:27  john
549  * Took out first time stuff.
550  *
551  * Revision 1.3  1994/07/24  17:32:47  john
552  * Added percent item.  Also neatend up a bit.
553  *
554  * Revision 1.2  1994/07/22  17:48:13  john
555  * Added new menuing system.
556  *
557  * Revision 1.1  1994/07/22  13:55:38  john
558  * Initial revision
559  *
560  *
561  */
562
563 #ifdef HAVE_CONFIG_H
564 #include <conf.h>
565 #endif
566
567 #ifdef WINDOWS
568 #include "desw.h"
569 #endif
570
571 #include <stdio.h>
572 #include <stdlib.h>
573 #include <string.h>
574 #include <stdarg.h>
575 #include <ctype.h>
576 #if !defined(_MSC_VER) && !defined(macintosh)
577 #include <unistd.h>
578 #endif
579 #include <limits.h>
580
581 #include "pa_enabl.h"                   //$$POLY_ACC
582 #include "error.h"
583 #include "pstypes.h"
584 #include "gr.h"
585 #include "mono.h"
586 #include "songs.h"
587 #include "key.h"
588 #include "palette.h"
589 #include "game.h"
590 #include "text.h"
591 #include "findfile.h"
592
593 #include "menu.h"
594 #include "newmenu.h"
595 #include "gamefont.h"
596 #include "gamepal.h"
597 #ifdef NETWORK
598 #include "network.h"
599 #endif
600 #include "iff.h"
601 #include "pcx.h"
602 #include "u_mem.h"
603 #include "mouse.h"
604 #include "joy.h"
605 #include "digi.h"
606
607 #include "multi.h"
608 #include "endlevel.h"
609 #include "screens.h"
610 #include "config.h"
611 #include "player.h"
612 #include "newdemo.h"
613 #include "kconfig.h"
614 #include "strutil.h"
615
616 #ifdef MACINTOSH
617 #include <Events.h>
618 #endif
619
620 #if defined (TACTILE)
621  #include "tactile.h"
622 #endif
623
624 #if defined(POLY_ACC)
625 #include "poly_acc.h"
626 #endif
627
628 #define MAXDISPLAYABLEITEMS 15
629
630 #define LHX(x)      ((x)*(MenuHires?2:1))
631 #define LHY(y)      ((y)*(MenuHires?2.4:1))
632
633 #define TITLE_FONT      HUGE_FONT
634 #define NORMAL_FONT     MEDIUM1_FONT    //normal, non-highlighted item
635 #define SELECTED_FONT   MEDIUM2_FONT    //highlighted item
636 #define SUBTITLE_FONT   MEDIUM3_FONT
637
638 #define NORMAL_CHECK_BOX    "\81"
639 #define CHECKED_CHECK_BOX   "\82"
640
641 #define NORMAL_RADIO_BOX    "\7f"
642 #define CHECKED_RADIO_BOX   "\80"
643 #define CURSOR_STRING       "_"
644 #define SLIDER_LEFT         "\83"  // 131
645 #define SLIDER_RIGHT        "\84"  // 132
646 #define SLIDER_MIDDLE       "\85"  // 133
647 #define SLIDER_MARKER       "\86"  // 134
648 #define UP_ARROW_MARKER     "\87"  // 135
649 #define DOWN_ARROW_MARKER   "\88"  // 136
650
651 int newmenu_do4( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height, int TinyMode );
652 void show_extra_netgame_info(int choice);
653
654
655 int Newmenu_first_time = 1;
656 //--unused-- int Newmenu_fade_in = 1;
657
658 typedef struct bkg {
659         WINDOS (dd_grs_canvas *menu_canvas, grs_canvas * menu_canvas);
660         grs_bitmap * saved;                     // The background under the menu.
661         grs_bitmap * background;
662 } bkg;
663
664 grs_bitmap nm_background,nm_background_save;
665
666 #define MESSAGEBOX_TEXT_SIZE 2176   // How many characters in messagebox (changed form 300 (fixes crash from show_game_score and friends) - 2000/01/18 Matt Mueller)
667 #define MAX_TEXT_WIDTH  200                             // How many pixels wide a input box can be
668
669 ubyte MenuReordering=0;
670 ubyte SurfingNet=0;
671 char Pauseable_menu=0;
672 char already_showing_info=0;
673
674
675 void newmenu_close()    {
676         if ( nm_background.bm_data )
677                 d_free(nm_background.bm_data);
678
679         if ( nm_background_save.bm_data )
680                 d_free(nm_background_save.bm_data);
681         Newmenu_first_time = 1;
682 }
683
684 ubyte background_palette[768];
685
686 //should be called whenever the palette changes
687 void nm_remap_background()
688 {
689         if (!Newmenu_first_time) {
690                 if (!nm_background.bm_data)
691                         nm_background.bm_data = d_malloc(nm_background.bm_w * nm_background.bm_h);
692
693                 memcpy(nm_background.bm_data,nm_background_save.bm_data,nm_background.bm_w * nm_background.bm_h);
694
695                 gr_remap_bitmap_good( &nm_background, background_palette, -1, -1 );
696         }
697 }
698
699 #include <math.h>
700
701 extern char last_palette_loaded[];
702
703 void nm_draw_background1(char * filename)
704 {
705         int pcx_error;
706         grs_bitmap *bmp;
707         ubyte pal[256*3];
708         int width, height;
709
710         //@@//I think this only gets called to fill the whole screen
711         //@@Assert(grd_curcanv->cv_bitmap.bm_w == 320);
712         //@@Assert(grd_curcanv->cv_bitmap.bm_h == 200);
713
714         pcx_error = pcx_get_dimensions(filename, &width, &height);
715         if (pcx_error != PCX_ERROR_NONE)
716                 Error("Could not open pcx file <%s>\n", filename);
717
718         bmp = gr_create_bitmap(width, height);
719
720         pcx_error = pcx_read_bitmap(filename,bmp,bmp->bm_type,pal);
721         Assert(pcx_error == PCX_ERROR_NONE);
722
723         //@@gr_remap_bitmap_good( bmp, pal, -1, -1 );
724
725
726         {       //remap stuff. this code is kindof a hack
727
728                 //now, before we bring up the menu, we need to
729                 //do some stuff to make sure the palette is ok.  First, we need to
730                 //get our current palette into the 2d's array, so the remapping will
731                 //work.  Second, we need to remap the fonts.  Third, we need to fill
732                 //in part of the fade tables so the darkening of the menu edges works
733
734                 gr_copy_palette(gr_palette, pal, sizeof(gr_palette));
735 #ifdef OGL
736                 gr_palette_load(gr_palette);
737 #endif
738                 remap_fonts_and_menus(1);
739
740         }
741
742 WIN(DDGRLOCK(dd_grd_curcanv));
743 #if defined(POLY_ACC)
744     pa_save_clut();
745     pa_update_clut(gr_palette, 0, 256, 0);
746 #endif
747         show_fullscr(bmp);
748 #if defined(POLY_ACC)
749     pa_restore_clut();
750 #endif
751 WIN(DDGRUNLOCK(dd_grd_curcanv));
752
753         gr_free_bitmap(bmp);
754
755         strcpy(last_palette_loaded,"");         //force palette load next time
756
757 }
758
759 #define MENU_BACKGROUND_BITMAP_HIRES (cfexist("scoresb.pcx")?"scoresb.pcx":"scores.pcx")
760 #define MENU_BACKGROUND_BITMAP_LORES (cfexist("scores.pcx")?"scores.pcx":"scoresb.pcx") // Mac datafiles only have scoresb.pcx
761
762 #define MENU_BACKGROUND_BITMAP (MenuHires?MENU_BACKGROUND_BITMAP_HIRES:MENU_BACKGROUND_BITMAP_LORES)
763
764 int Background_hires;
765 int No_darkening=0;
766
767 void nm_draw_background(int x1, int y1, int x2, int y2 )
768 {
769         int w,h;
770
771         if (Newmenu_first_time || MenuHires!=Background_hires)  {
772                 int pcx_error;
773
774                 if (Newmenu_first_time) {
775                         atexit( newmenu_close );
776                         Newmenu_first_time = 0;
777                         nm_background_save.bm_data=NULL;                
778                 }
779                 else {
780                         if (nm_background_save.bm_data)
781                                 d_free(nm_background_save.bm_data);
782                         if (nm_background.bm_data)
783                                 d_free(nm_background.bm_data);
784                 }
785
786                 pcx_error = pcx_read_bitmap(MENU_BACKGROUND_BITMAP,&nm_background_save,BM_LINEAR,background_palette);
787                 Assert(pcx_error == PCX_ERROR_NONE);
788
789                 nm_background = nm_background_save;
790                 nm_background.bm_data=NULL;             
791                 nm_remap_background();
792
793                 Background_hires = MenuHires;
794         }
795
796         if ( x1 < 0 ) x1 = 0;
797         if ( y1 < 0 ) y1 = 0;
798
799         w = x2-x1+1;
800         h = y2-y1+1;
801
802         //if ( w > nm_background.bm_w ) w = nm_background.bm_w;
803         //if ( h > nm_background.bm_h ) h = nm_background.bm_h;
804         
805         x2 = x1 + w - 1;
806         y2 = y1 + h - 1;
807
808 #if 0
809         {
810                 grs_bitmap *tmp = gr_create_bitmap(w, h);
811
812                 gr_bitmap_scale_to(&nm_background, tmp);
813
814                 WIN(DDGRLOCK(dd_grd_curcanv));
815                 if (No_darkening)
816                         gr_bm_bitblt(w, h, x1, y1, LHX(10), LHY(10), tmp, &(grd_curcanv->cv_bitmap) );
817                 else
818                         gr_bm_bitblt(w, h, x1, y1, 0, 0, tmp, &(grd_curcanv->cv_bitmap) );
819                 gr_free_bitmap(tmp);
820         }
821 #else
822         WIN(DDGRLOCK(dd_grd_curcanv));
823         if (No_darkening)
824                 gr_bm_bitblt(w, h, x1, y1, LHX(10), LHY(10), &nm_background, &(grd_curcanv->cv_bitmap) );
825         else
826                 gr_bm_bitblt(w, h, x1, y1, 0, 0, &nm_background, &(grd_curcanv->cv_bitmap) );
827 #endif
828
829         if (!No_darkening) {
830                 Gr_scanline_darkening_level = 2*7;
831
832                 gr_setcolor( BM_XRGB(0,0,0) );
833                 gr_urect( x2-5, y1+5, x2-5, y2-5 );
834                 gr_urect( x2-4, y1+4, x2-4, y2-5 );
835                 gr_urect( x2-3, y1+3, x2-3, y2-5 );
836                 gr_urect( x2-2, y1+2, x2-2, y2-5 );
837                 gr_urect( x2-1, y1+1, x2-1, y2-5 );
838                 gr_urect( x2+0, y1+0, x2-0, y2-5 );
839
840                 gr_urect( x1+5, y2-5, x2, y2-5 );
841                 gr_urect( x1+4, y2-4, x2, y2-4 );
842                 gr_urect( x1+3, y2-3, x2, y2-3 );
843                 gr_urect( x1+2, y2-2, x2, y2-2 );
844                 gr_urect( x1+1, y2-1, x2, y2-1 );
845                 gr_urect( x1+0, y2, x2, y2-0 );
846         }
847         WIN(DDGRUNLOCK(dd_grd_curcanv));
848
849         Gr_scanline_darkening_level = GR_FADE_LEVELS;
850 }
851
852 void nm_restore_background( int x, int y, int w, int h )
853 {
854         int x1, x2, y1, y2;
855
856         x1 = x; x2 = x+w-1;
857         y1 = y; y2 = y+h-1;
858
859         if ( x1 < 0 ) x1 = 0;
860         if ( y1 < 0 ) y1 = 0;
861
862         if ( x2 >= nm_background.bm_w ) x2=nm_background.bm_w-1;
863         if ( y2 >= nm_background.bm_h ) y2=nm_background.bm_h-1;
864
865         w = x2 - x1 + 1;
866         h = y2 - y1 + 1;
867
868         WIN(DDGRLOCK(dd_grd_curcanv));
869                 gr_bm_bitblt(w, h, x1, y1, x1, y1, &nm_background, &(grd_curcanv->cv_bitmap) );
870         WIN(DDGRUNLOCK(dd_grd_curcanv));
871 }
872
873 // Draw a left justfied string
874 void nm_string( bkg * b, int w1,int x, int y, char * s)
875 {
876         int w,h,aw,tx=0,t=0,i;
877         char *p,*s1,*s2,measure[2];
878         int XTabs[]={15,87,124,162,228,253};
879    
880         p=s1=NULL;
881         s2 = d_strdup(s);
882
883         for (i=0;i<6;i++) {
884                 XTabs[i]=(LHX(XTabs[i]));
885                 XTabs[i]+=x;
886         }
887  
888         measure[1]=0;
889
890         if (!SurfingNet) {
891                 p = strchr( s2, '\t' );
892                 if (p && (w1>0) ) {
893                         *p = '\0';
894                         s1 = p+1;
895                 }
896         }
897
898         gr_get_string_size(s2, &w, &h, &aw  );
899
900         if (w1 > 0)
901                 w = w1;
902
903         // CHANGED
904         gr_bm_bitblt(b->background->bm_w-15, h+2, 5, y-1, 5, y-1, b->background, &(grd_curcanv->cv_bitmap) );
905         //gr_bm_bitblt(w, h, x, y, x, y, b->background, &(grd_curcanv->cv_bitmap) );
906
907         if (SurfingNet) {
908                 for (i=0;i<strlen(s2);i++) {
909                         if (s2[i]=='\t' && SurfingNet) {
910                                 x=XTabs[t];
911                                 t++;
912                                 continue;
913                         }
914                         measure[0]=s2[i];
915                         gr_get_string_size(measure,&tx,&h,&aw);
916                         gr_string(x,y,measure);
917                         x+=tx;
918                 }
919         }
920         else
921                 gr_string (x,y,s2);
922          
923         if (!SurfingNet && p && (w1>0) ) {
924                 gr_get_string_size(s1, &w, &h, &aw  );
925
926                 gr_string( x+w1-w, y, s1 );
927
928                 *p = '\t';
929         }
930         d_free(s2);
931 }
932
933 // Draw a slider and it's string
934 void nm_string_slider( bkg * b, int w1,int x, int y, char * s )
935 {
936         int w,h,aw;
937         char *p,*s1;
938
939         s1=NULL;
940
941         p = strchr( s, '\t' );
942         if (p)  {
943                 *p = '\0';
944                 s1 = p+1;
945         }
946
947         gr_get_string_size(s, &w, &h, &aw  );
948         // CHANGED
949
950                 gr_bm_bitblt(b->background->bm_w-15, h, 5, y, 5, y, b->background, &(grd_curcanv->cv_bitmap) );
951                 //gr_bm_bitblt(w, h, x, y, x, y, b->background, &(grd_curcanv->cv_bitmap) );
952
953                 gr_string( x, y, s );
954
955                 if (p)  {
956                         gr_get_string_size(s1, &w, &h, &aw  );
957
958                         // CHANGED
959                         gr_bm_bitblt(w, 1, x+w1-w, y, x+w1-w, y, b->background, &(grd_curcanv->cv_bitmap) );
960                         // CHANGED
961                         gr_bm_bitblt(w, 1, x+w1-w, y+h-1, x+w1-w, y, b->background, &(grd_curcanv->cv_bitmap) );
962
963                         gr_string( x+w1-w, y, s1 );
964
965                         *p = '\t';
966                 }
967 }
968
969
970 // Draw a left justfied string with black background.
971 void nm_string_black( bkg * b, int w1,int x, int y, char * s )
972 {
973         int w,h,aw;
974         gr_get_string_size(s, &w, &h, &aw  );
975         b = b;                                  
976         if (w1 == 0) w1 = w;
977
978         WIN(DDGRLOCK(dd_grd_curcanv));
979                 gr_setcolor( BM_XRGB(2,2,2) );
980                 gr_rect( x-1, y-1, x-1, y+h-1 );
981                 gr_rect( x-1, y-1, x+w1-1, y-1 );
982
983          
984                 gr_setcolor( BM_XRGB(5,5,5) );
985                 gr_rect( x, y+h, x+w1, y+h);
986                 gr_rect( x+w1, y-1, x+w1, y+h );
987      
988                 gr_setcolor( BM_XRGB(0,0,0) );
989                 gr_rect( x, y, x+w1-1, y+h-1 );
990         
991                 gr_string( x+1, y+1, s );
992         WIN(DDGRUNLOCK(dd_grd_curcanv));
993 }
994
995
996 // Draw a right justfied string
997 void nm_rstring( bkg * b,int w1,int x, int y, char * s )
998 {
999         int w,h,aw;
1000         gr_get_string_size(s, &w, &h, &aw  );
1001         x -= 3;
1002
1003         if (w1 == 0) w1 = w;
1004
1005         //mprintf( 0, "Width = %d, string='%s'\n", w, s );
1006
1007         // CHANGED
1008         WIN(DDGRLOCK(dd_grd_curcanv));
1009                 gr_bm_bitblt(w1, h, x-w1, y, x-w1, y, b->background, &(grd_curcanv->cv_bitmap) );
1010                 gr_string( x-w, y, s );
1011         WIN(DDGRUNLOCK(dd_grd_curcanv));
1012 }
1013
1014 #include "timer.h"
1015
1016 //for text items, constantly redraw cursor (to achieve flash)
1017 void update_cursor( newmenu_item *item)
1018 {
1019         int w,h,aw;
1020         fix time = timer_get_approx_seconds();
1021         int x,y;
1022         char * text = item->text;
1023
1024         Assert(item->type==NM_TYPE_INPUT_MENU || item->type==NM_TYPE_INPUT);
1025
1026         while( *text )  {
1027                 gr_get_string_size(text, &w, &h, &aw  );
1028                 if ( w > item->w-10 )
1029                         text++;
1030                 else
1031                         break;
1032         }
1033         if (*text==0) 
1034                 w = 0;
1035         x = item->x+w; y = item->y;
1036
1037 WIN(DDGRLOCK(dd_grd_curcanv));
1038         if (time & 0x8000)
1039                 gr_string( x, y, CURSOR_STRING );
1040         else {
1041                 gr_setcolor( BM_XRGB(0,0,0) );
1042                 gr_rect( x, y, x+grd_curcanv->cv_font->ft_w-1, y+grd_curcanv->cv_font->ft_h-1 );
1043         }
1044 WIN(DDGRUNLOCK(dd_grd_curcanv));
1045 }
1046
1047 void nm_string_inputbox( bkg *b, int w, int x, int y, char * text, int current )
1048 {
1049         int w1,h1,aw;
1050
1051         while( *text )  {
1052                 gr_get_string_size(text, &w1, &h1, &aw  );
1053                 if ( w1 > w-10 )
1054                         text++;
1055                 else
1056                         break;
1057         }
1058         if ( *text == 0 )
1059                 w1 = 0;
1060
1061    nm_string_black( b, w, x, y, text );
1062                 
1063         if ( current )  {
1064                 gr_string( x+w1+1, y, CURSOR_STRING );
1065         }
1066 }
1067
1068 void draw_item( bkg * b, newmenu_item *item, int is_current,int tiny )
1069 {
1070        if (tiny)
1071         {
1072          if (is_current)
1073           gr_set_fontcolor(gr_find_closest_color_current(57,49,20),-1);
1074          else
1075           gr_set_fontcolor(gr_find_closest_color_current(29,29,47),-1);
1076
1077          if (item->text[0]=='\t')
1078           gr_set_fontcolor (gr_find_closest_color_current(63,63,63),-1);
1079         }
1080        else
1081         {
1082          if (is_current)
1083           grd_curcanv->cv_font = SELECTED_FONT;
1084          else
1085           grd_curcanv->cv_font = NORMAL_FONT;
1086
1087                 #ifdef WINDOWS
1088                         if (is_current && item->type == NM_TYPE_TEXT) 
1089                                 grd_curcanv->cv_font = NORMAL_FONT;
1090                 #endif
1091         }
1092
1093 WIN(DDGRLOCK(dd_grd_curcanv));  
1094         switch( item->type )    {
1095         case NM_TYPE_TEXT:
1096       // grd_curcanv->cv_font=TEXT_FONT;
1097                 // fall through on purpose
1098
1099         case NM_TYPE_MENU:
1100                 nm_string( b, item->w, item->x, item->y, item->text );
1101                 break;
1102         case NM_TYPE_SLIDER:    {
1103                 int j;
1104                 if (item->value < item->min_value) item->value=item->min_value;
1105                 if (item->value > item->max_value) item->value=item->max_value;
1106                 sprintf( item->saved_text, "%s\t%s", item->text, SLIDER_LEFT );
1107                 for (j=0; j<(item->max_value-item->min_value+1); j++ )  {
1108                         sprintf( item->saved_text, "%s%s", item->saved_text,SLIDER_MIDDLE );
1109                 }
1110                 sprintf( item->saved_text, "%s%s", item->saved_text,SLIDER_RIGHT );
1111                 
1112                 item->saved_text[item->value+1+strlen(item->text)+1] = SLIDER_MARKER[0];
1113                 
1114                 nm_string_slider( b, item->w, item->x, item->y, item->saved_text );
1115                 }
1116                 break;
1117         case NM_TYPE_INPUT_MENU:
1118                 if ( item->group==0 )           {
1119                         nm_string( b, item->w, item->x, item->y, item->text );
1120                 } else {
1121                         nm_string_inputbox( b, item->w, item->x, item->y, item->text, is_current );
1122                 }
1123                 break;
1124         case NM_TYPE_INPUT:
1125                 nm_string_inputbox( b, item->w, item->x, item->y, item->text, is_current );
1126                 break;
1127         case NM_TYPE_CHECK:
1128                 nm_string( b, item->w, item->x, item->y, item->text );
1129                 if (item->value)
1130                         nm_rstring( b,item->right_offset,item->x, item->y, CHECKED_CHECK_BOX );
1131                 else                                                                                                              
1132                         nm_rstring( b,item->right_offset,item->x, item->y, NORMAL_CHECK_BOX );
1133                 break;
1134         case NM_TYPE_RADIO:
1135                 nm_string( b, item->w, item->x, item->y, item->text );
1136                 if (item->value)
1137                         nm_rstring( b,item->right_offset, item->x, item->y, CHECKED_RADIO_BOX );
1138                 else
1139                         nm_rstring( b,item->right_offset, item->x, item->y, NORMAL_RADIO_BOX );
1140                 break;
1141         case NM_TYPE_NUMBER:    {
1142                 char text[10];
1143                 if (item->value < item->min_value) item->value=item->min_value;
1144                 if (item->value > item->max_value) item->value=item->max_value;
1145                 nm_string( b, item->w, item->x, item->y, item->text );
1146                 sprintf( text, "%d", item->value );
1147                 nm_rstring( b,item->right_offset,item->x, item->y, text );
1148                 }
1149                 break;
1150         }
1151 WIN(DDGRUNLOCK(dd_grd_curcanv));
1152
1153 }
1154
1155 char *Newmenu_allowed_chars=NULL;
1156
1157 //returns true if char is allowed
1158 int char_allowed(char c)
1159 {
1160         char *p = Newmenu_allowed_chars;
1161
1162         if (!p)
1163                 return 1;
1164
1165         while (*p) {
1166                 Assert(p[1]);
1167
1168                 if (c>=p[0] && c<=p[1])
1169                         return 1;
1170
1171                 p += 2;
1172         }
1173
1174         return 0;
1175 }
1176
1177 void strip_end_whitespace( char * text )
1178 {
1179         int i,l;
1180         l = strlen( text );
1181         for (i=l-1; i>=0; i-- ) {
1182                 if ( isspace(text[i]) )
1183                         text[i] = 0;
1184                 else
1185                         return;
1186         }
1187 }
1188
1189 int newmenu_do( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) )
1190 {
1191         return newmenu_do3( title, subtitle, nitems, item, subfunction, 0, NULL, -1, -1 );
1192 }
1193 int newmenu_dotiny( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) )
1194 {
1195         return newmenu_do4( title, subtitle, nitems, item, subfunction, 0, NULL, LHX(310), -1, 1 );
1196 }
1197
1198
1199 int newmenu_dotiny2( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) )
1200 {
1201         return newmenu_do4( title, subtitle, nitems, item, subfunction, 0, NULL, -1, -1, 1 );
1202 }
1203
1204
1205 int newmenu_do1( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem )
1206 {
1207         return newmenu_do3( title, subtitle, nitems, item, subfunction, citem, NULL, -1, -1 );
1208 }
1209
1210
1211 int newmenu_do2( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename )
1212 {
1213         return newmenu_do3( title, subtitle, nitems, item, subfunction, citem, filename, -1, -1 );
1214 }
1215 int newmenu_do3( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height )
1216  {
1217   return newmenu_do4( title, subtitle, nitems, item, subfunction, citem, filename, width, height,0 );
1218  }
1219
1220 int newmenu_do_fixedfont( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height){
1221         set_screen_mode(SCREEN_MENU);//hafta set the screen mode before calling or fonts might get changed/freed up if screen res changes
1222 //      return newmenu_do3_real( title, subtitle, nitems, item, subfunction, citem, filename, width,height, GAME_FONT, GAME_FONT, GAME_FONT, GAME_FONT);
1223         return newmenu_do4( title, subtitle, nitems, item, subfunction, citem, filename, width,height, 0);
1224 }
1225
1226 //returns 1 if a control device button has been pressed
1227 int check_button_press()
1228 {
1229         int i;
1230
1231         switch (Config_control_type) {
1232         case    CONTROL_JOYSTICK:
1233         case    CONTROL_FLIGHTSTICK_PRO:
1234         case    CONTROL_THRUSTMASTER_FCS:
1235         case    CONTROL_GRAVIS_GAMEPAD:
1236                 for (i=0; i<4; i++ )    
1237                         if (joy_get_button_down_cnt(i)>0) return 1;
1238                 break;
1239         case    CONTROL_MOUSE:
1240         case    CONTROL_CYBERMAN:
1241 #ifndef NEWMENU_MOUSE   // don't allow mouse to continue from menu
1242                 for (i=0; i<3; i++ )    
1243                         if (mouse_button_down_count(i)>0) return 1;
1244                 break;
1245 #endif
1246         case    CONTROL_WINJOYSTICK:
1247         #ifdef WINDOWS  
1248                 for (i=0; i<4; i++ )    
1249                         if (joy_get_button_down_cnt(i)>0) return 1;
1250         #endif  
1251                 break;
1252         case    CONTROL_NONE:           //keyboard only
1253                 #ifdef APPLE_DEMO
1254                         if (key_checkch())      return 1;                       
1255                 #endif
1256
1257                 break;
1258         default:
1259                 Error("Bad control type (Config_control_type):%i",Config_control_type);
1260         }
1261
1262         return 0;
1263 }
1264
1265 extern int network_request_player_names(int);
1266 extern int RestoringMenu;
1267
1268 #ifdef NEWMENU_MOUSE
1269 ubyte Hack_DblClick_MenuMode=0;
1270 #endif
1271
1272 #ifdef MACINTOSH
1273 extern ubyte joydefs_calibrating;
1274 #else
1275 # define joydefs_calibrating 0
1276 #endif
1277
1278 #define CLOSE_X     (MenuHires?15:7)
1279 #define CLOSE_Y     (MenuHires?15:7)
1280 #define CLOSE_SIZE  (MenuHires?10:5)
1281
1282 void draw_close_box(int x,int y)
1283 {
1284         WIN (DDGRLOCK(dd_grd_curcanv));
1285         gr_setcolor( BM_XRGB(0, 0, 0) );
1286         gr_rect(x + CLOSE_X, y + CLOSE_Y, x + CLOSE_X + CLOSE_SIZE, y + CLOSE_Y + CLOSE_SIZE);
1287         gr_setcolor( BM_XRGB(21, 21, 21) );
1288         gr_rect(x + CLOSE_X + LHX(1), y + CLOSE_Y + LHX(1), x + CLOSE_X + CLOSE_SIZE - LHX(1), y + CLOSE_Y + CLOSE_SIZE - LHX(1));
1289         WIN (DDGRUNLOCK(dd_grd_curcanv));
1290 }
1291
1292 int newmenu_do4( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height, int TinyMode )
1293 {
1294         int old_keyd_repeat, done;
1295         int  choice,old_choice,i,j,x,y,w,h,aw, tw, th, twidth,fm,right_offset;
1296         int k, nmenus, nothers,ScrollOffset=0,LastScrollCheck=-1,MaxDisplayable,sx,sy;
1297         grs_font * save_font;
1298         int string_width, string_height, average_width;
1299         int ty;
1300         bkg bg;
1301         int all_text=0;         //set true if all text items
1302         int sound_stopped=0,time_stopped=0;
1303    int TopChoice,IsScrollBox=0;   // Is this a scrolling box? Set to false at init
1304    char *Temp,TempVal;
1305         int dont_restore=0;
1306    int MaxOnMenu=MAXDISPLAYABLEITEMS;
1307         WINDOS(dd_grs_canvas *save_canvas, grs_canvas *save_canvas );   
1308 #ifdef NEWMENU_MOUSE
1309         int mouse_state, omouse_state, dblclick_flag=0;
1310         int mx=0, my=0, x1 = 0, x2, y1, y2;
1311         int close_box=0;
1312 #endif
1313 #ifdef MACINTOSH
1314         EventRecord event;              // looking for disk inserted events for CD mounts
1315 #endif
1316
1317         PA_DFX (pa_set_frontbuffer_current());
1318         PA_DFX (pa_set_front_to_read());
1319
1320         WIN(if (!_AppActive) return -1);                // Don't draw message if minimized!
1321         newmenu_hide_cursor();
1322
1323         if (nitems < 1 )
1324     {
1325                 return -1;
1326     } 
1327
1328         WIN(mouse_set_mode(0));         //disable centering mode
1329
1330         MaxDisplayable=nitems;
1331
1332         //set_screen_mode(SCREEN_MENU);
1333         set_popup_screen();
1334
1335         if ( Function_mode == FMODE_GAME && !(Game_mode & GM_MULTI)) {
1336                 digi_pause_digi_sounds();
1337                 sound_stopped = 1;
1338         }
1339
1340         if (!((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence)) )
1341         {
1342                 time_stopped = 1;
1343                 stop_time();
1344                 #ifdef TACTILE 
1345                   if (TactileStick)     
1346                           DisableForces();      
1347                 #endif
1348         }
1349
1350 #ifdef WINDOWS
1351 RePaintNewmenu4:
1352 #endif
1353         WINDOS( save_canvas = dd_grd_curcanv, save_canvas = grd_curcanv );
1354
1355         WINDOS( dd_gr_set_current_canvas(NULL), gr_set_current_canvas(NULL) );
1356
1357         save_font = grd_curcanv->cv_font;
1358
1359         tw = th = 0;
1360
1361         if ( title )    {
1362                 grd_curcanv->cv_font = TITLE_FONT;
1363                 gr_get_string_size(title,&string_width,&string_height,&average_width );
1364                 tw = string_width;
1365                 th = string_height;
1366         }
1367         if ( subtitle ) {
1368                 grd_curcanv->cv_font = SUBTITLE_FONT;
1369                 gr_get_string_size(subtitle,&string_width,&string_height,&average_width );
1370                 if (string_width > tw )
1371                         tw = string_width;
1372                 th += string_height;
1373         }
1374
1375         th += LHY(8);           //put some space between titles & body
1376
1377         if (TinyMode)
1378         grd_curcanv->cv_font = SMALL_FONT;
1379         else 
1380         grd_curcanv->cv_font = NORMAL_FONT;
1381
1382         w = aw = 0;
1383         h = th;
1384         nmenus = nothers = 0;
1385
1386         // Find menu height & width (store in w,h)
1387         for (i=0; i<nitems; i++ )       {
1388                 item[i].redraw=1;
1389                 item[i].y = h;
1390                 gr_get_string_size(item[i].text,&string_width,&string_height,&average_width );
1391                 item[i].right_offset = 0;
1392                 
1393                 if (SurfingNet)
1394                         string_height+=LHY(3);
1395
1396                 item[i].saved_text[0] = '\0';
1397
1398                 if ( item[i].type == NM_TYPE_SLIDER )   {
1399                         int w1,h1,aw1;
1400                         nothers++;
1401                         sprintf( item[i].saved_text, "%s", SLIDER_LEFT );
1402                         for (j=0; j<(item[i].max_value-item[i].min_value+1); j++ )      {
1403                                 sprintf( item[i].saved_text, "%s%s", item[i].saved_text,SLIDER_MIDDLE );
1404                         }
1405                         sprintf( item[i].saved_text, "%s%s", item[i].saved_text,SLIDER_RIGHT );
1406                         gr_get_string_size(item[i].saved_text,&w1,&h1,&aw1 );
1407                         string_width += w1 + aw;
1408                 }
1409
1410                 if ( item[i].type == NM_TYPE_MENU )     {
1411                         nmenus++;
1412                 }
1413
1414                 if ( item[i].type == NM_TYPE_CHECK )    {
1415                         int w1,h1,aw1;
1416                         nothers++;
1417                         gr_get_string_size(NORMAL_CHECK_BOX, &w1, &h1, &aw1  );
1418                         item[i].right_offset = w1;
1419                         gr_get_string_size(CHECKED_CHECK_BOX, &w1, &h1, &aw1  );
1420                         if (w1 > item[i].right_offset)
1421                                 item[i].right_offset = w1;
1422                 }
1423                 
1424                 if (item[i].type == NM_TYPE_RADIO ) {
1425                         int w1,h1,aw1;
1426                         nothers++;
1427                         gr_get_string_size(NORMAL_RADIO_BOX, &w1, &h1, &aw1  );
1428                         item[i].right_offset = w1;
1429                         gr_get_string_size(CHECKED_RADIO_BOX, &w1, &h1, &aw1  );
1430                         if (w1 > item[i].right_offset)
1431                                 item[i].right_offset = w1;
1432                 }
1433
1434                 if  (item[i].type==NM_TYPE_NUMBER )     {
1435                         int w1,h1,aw1;
1436                         char test_text[20];
1437                         nothers++;
1438                         sprintf( test_text, "%d", item[i].max_value );
1439                         gr_get_string_size( test_text, &w1, &h1, &aw1 );
1440                         item[i].right_offset = w1;
1441                         sprintf( test_text, "%d", item[i].min_value );
1442                         gr_get_string_size( test_text, &w1, &h1, &aw1 );
1443                         if ( w1 > item[i].right_offset)
1444                                 item[i].right_offset = w1;
1445                 }
1446
1447                 if ( item[i].type == NM_TYPE_INPUT )    {
1448                         Assert( strlen(item[i].text) < NM_MAX_TEXT_LEN );
1449                         strcpy(item[i].saved_text, item[i].text );
1450                         nothers++;
1451                         string_width = item[i].text_len*grd_curcanv->cv_font->ft_w+((MenuHires?3:1)*item[i].text_len);
1452                         if ( string_width > MAX_TEXT_WIDTH ) 
1453                                 string_width = MAX_TEXT_WIDTH;
1454                         item[i].value = -1;
1455                 }
1456
1457                 if ( item[i].type == NM_TYPE_INPUT_MENU )       {
1458                         Assert( strlen(item[i].text) < NM_MAX_TEXT_LEN );
1459                         strcpy(item[i].saved_text, item[i].text );
1460                         nmenus++;
1461                         string_width = item[i].text_len*grd_curcanv->cv_font->ft_w+((MenuHires?3:1)*item[i].text_len);
1462                         item[i].value = -1;
1463                         item[i].group = 0;
1464                 }
1465
1466                 item[i].w = string_width;
1467                 item[i].h = string_height;
1468
1469                 if ( string_width > w )
1470                         w = string_width;               // Save maximum width
1471                 if ( average_width > aw )
1472                         aw = average_width;
1473                 h += string_height+1;           // Find the height of all strings
1474         }
1475
1476    // Big hack for allowing the netgame options menu to spill over
1477
1478    MaxOnMenu=MAXDISPLAYABLEITEMS;
1479    if (ExtGameStatus==GAMESTAT_NETGAME_OPTIONS || ExtGameStatus==GAMESTAT_MORE_NETGAME_OPTIONS)
1480                 MaxOnMenu++;
1481
1482    if (!TinyMode && (h>((MaxOnMenu+1)*(string_height+1))+(LHY(8))))
1483     {
1484      IsScrollBox=1;
1485      h=(MaxOnMenu*(string_height+1)+LHY(8));
1486      MaxDisplayable=MaxOnMenu;
1487      mprintf ((0,"Hey, this is a scroll box!\n"));
1488     }
1489    else
1490     IsScrollBox=0;
1491
1492         right_offset=0;
1493
1494         if ( width > -1 )
1495                 w = width;
1496
1497         if ( height > -1 )
1498                 h = height;
1499
1500         for (i=0; i<nitems; i++ )       {
1501                 item[i].w = w;
1502                 if (item[i].right_offset > right_offset )
1503                         right_offset = item[i].right_offset;
1504         }
1505         if (right_offset > 0 )
1506                 right_offset += 3;
1507
1508         //gr_get_string_size("",&string_width,&string_height,&average_width );
1509
1510         w += right_offset;
1511
1512
1513         twidth = 0;
1514         if ( tw > w )   {
1515                 twidth = ( tw - w )/2;
1516                 w = tw;
1517         }
1518
1519    if (RestoringMenu)
1520          { right_offset=0; twidth=0;}
1521
1522         mprintf(( 0, "Right offset = %d\n", right_offset ));
1523
1524
1525         // Find min point of menu border
1526 //      x = (grd_curscreen->sc_w-w)/2;
1527 //      y = (grd_curscreen->sc_h-h)/2;
1528
1529         w += MenuHires?60:30;
1530         h += MenuHires?60:30;
1531
1532         if ( w > grd_curcanv->cv_bitmap.bm_w ) w = grd_curcanv->cv_bitmap.bm_w;
1533         if ( h > grd_curcanv->cv_bitmap.bm_h ) h = grd_curcanv->cv_bitmap.bm_h;
1534
1535         x = (grd_curcanv->cv_bitmap.bm_w-w)/2;
1536         y = (grd_curcanv->cv_bitmap.bm_h-h)/2;
1537
1538         if ( x < 0 ) x = 0;
1539         if ( y < 0 ) y = 0;
1540
1541         if ( filename != NULL ) {
1542                 nm_draw_background1( filename );
1543                 gr_palette_load(gr_palette);
1544         }
1545
1546 // Save the background of the display
1547 //              Win95 must refer to the screen as a dd_grs_canvas, so...
1548         WINDOS (        bg.menu_canvas = dd_gr_create_sub_canvas( dd_grd_screencanv, x, y, w, h ),
1549                         bg.menu_canvas = gr_create_sub_canvas( &grd_curscreen->sc_canvas, x, y, w, h )
1550         );
1551         WINDOS (        dd_gr_set_current_canvas( bg.menu_canvas ), 
1552                         gr_set_current_canvas(bg.menu_canvas)   );
1553
1554         if ( filename == NULL ) {
1555                 // Save the background under the menu...
1556                 #ifdef TACTILE
1557                         if (TactileStick)
1558                                 DisableForces();
1559                 #endif
1560                 
1561 #if defined(POLY_ACC)
1562                 bg.saved = gr_create_bitmap2( w, h, grd_curcanv->cv_bitmap.bm_type, NULL );
1563 #else
1564                 bg.saved = gr_create_bitmap( w, h );
1565 #endif
1566                 Assert( bg.saved != NULL );
1567
1568                 WIN (DDGRLOCK(dd_grd_curcanv));
1569                         gr_bm_bitblt(w, h, 0, 0, 0, 0, &grd_curcanv->cv_bitmap, bg.saved );
1570                 WIN (DDGRUNLOCK(dd_grd_curcanv));
1571
1572                 WINDOS (        dd_gr_set_current_canvas(NULL), 
1573                                         gr_set_current_canvas( NULL ) 
1574                 );
1575
1576                 nm_draw_background(x,y,x+w-1,y+h-1);
1577
1578                 WINDOS (        dd_gr_set_current_canvas(bg.menu_canvas),
1579                                         gr_set_current_canvas( bg.menu_canvas )
1580                 );
1581
1582                 bg.background = gr_create_sub_bitmap(&nm_background,0,0,w,h);
1583
1584         } else {
1585                 bg.saved = NULL;
1586 #if defined(POLY_ACC)
1587                 bg.background = gr_create_bitmap2( w, h, grd_curcanv->cv_bitmap.bm_type, NULL );
1588 #else
1589                 bg.background = gr_create_bitmap( w, h );
1590 #endif
1591                 Assert( bg.background != NULL );
1592                 
1593                 WIN (DDGRLOCK(dd_grd_curcanv));
1594                         gr_bm_bitblt(w, h, 0, 0, 0, 0, &grd_curcanv->cv_bitmap, bg.background );
1595                 WIN (DDGRUNLOCK(dd_grd_curcanv));
1596         }
1597
1598 // ty = 15 + (yborder/4);
1599
1600         ty = MenuHires?30:15;
1601
1602         if ( title )    {
1603                 grd_curcanv->cv_font = TITLE_FONT;
1604                 gr_set_fontcolor( GR_GETCOLOR(31,31,31), -1 );
1605                 gr_get_string_size(title,&string_width,&string_height,&average_width );
1606                 tw = string_width;
1607                 th = string_height;
1608                 WIN (DDGRLOCK(dd_grd_curcanv));
1609                         gr_printf( 0x8000, ty, title );
1610                 WIN (DDGRUNLOCK(dd_grd_curcanv));
1611                 ty += th;
1612         }
1613
1614         if ( subtitle ) {
1615                 grd_curcanv->cv_font = SUBTITLE_FONT;
1616                 gr_set_fontcolor( GR_GETCOLOR(21,21,21), -1 );
1617                 gr_get_string_size(subtitle,&string_width,&string_height,&average_width );
1618                 tw = string_width;
1619                 th = string_height;
1620                 WIN (DDGRLOCK(dd_grd_curcanv));
1621                         gr_printf( 0x8000, ty, subtitle );
1622                 WIN (DDGRUNLOCK(dd_grd_curcanv));
1623                 ty += th;
1624         }
1625
1626         if (TinyMode)
1627         grd_curcanv->cv_font = SMALL_FONT;
1628         else 
1629         grd_curcanv->cv_font = NORMAL_FONT;
1630         
1631         // Update all item's x & y values.
1632         for (i=0; i<nitems; i++ )       {
1633                 item[i].x = (MenuHires?30:15) + twidth + right_offset;
1634                 item[i].y += (MenuHires?30:15);
1635                 if ( item[i].type==NM_TYPE_RADIO )      {
1636                         fm = -1;        // find first marked one
1637                         for ( j=0; j<nitems; j++ )      {
1638                                 if ( item[j].type==NM_TYPE_RADIO && item[j].group==item[i].group )      {
1639                                         if (fm==-1 && item[j].value)
1640                                                 fm = j;
1641                                         item[j].value = 0;
1642                                 }
1643                         }
1644                         if ( fm>=0 )    
1645                                 item[fm].value=1;
1646                         else
1647                                 item[i].value=1;
1648                 }
1649         }
1650
1651         old_keyd_repeat = keyd_repeat;
1652         keyd_repeat = 1;
1653
1654         if (citem==-1)  {
1655                 choice = -1;
1656         } else {
1657                 if (citem < 0 ) citem = 0;
1658                 if (citem > nitems-1 ) citem = nitems-1;
1659                 choice = citem;
1660
1661 #ifdef NEWMENU_MOUSE
1662                 dblclick_flag = 1;
1663 #endif
1664
1665                 while ( item[choice].type==NM_TYPE_TEXT )       {
1666                         choice++;
1667                         if (choice >= nitems ) {
1668                                 choice=0; 
1669                         }
1670                         if (choice == citem ) {
1671                                 choice=0; 
1672                                 all_text=1;
1673                                 break; 
1674                         }
1675                 }
1676         } 
1677         done = 0;
1678    TopChoice=choice;
1679
1680         gr_update();
1681         // Clear mouse, joystick to clear button presses.
1682         game_flush_inputs();
1683
1684 #ifdef NEWMENU_MOUSE
1685         mouse_state = omouse_state = 0;
1686         if (filename == NULL && !MenuReordering) {
1687                 draw_close_box(0,0);
1688                 close_box = 1;
1689         }
1690
1691         if (!MenuReordering && !joydefs_calibrating)
1692         {
1693                 newmenu_show_cursor();
1694 # ifdef WINDOWS
1695                 SetCursor(LoadCursor(NULL,IDC_ARROW));
1696 # endif
1697         }
1698 #endif
1699
1700    mprintf ((0,"Set to true!\n"));
1701
1702         while(!done)    {
1703         #ifdef WINDOWS
1704                 MSG msg;
1705
1706                 DoMessageStuff(&msg);
1707
1708                 if (_RedrawScreen) {
1709                         _RedrawScreen = FALSE;
1710                 
1711                         if (!filename) {
1712                                 gr_free_bitmap(bg.saved);
1713                                 d_free( bg.background );
1714                         }
1715                         else    
1716                                 gr_free_bitmap(bg.background);
1717
1718                         dd_gr_free_sub_canvas( bg.menu_canvas );
1719                         grd_curcanv->cv_font = save_font;
1720                         dd_grd_curcanv = save_canvas;
1721
1722                         goto RePaintNewmenu4;
1723                 }
1724
1725                 DDGRRESTORE;
1726
1727         #endif
1728
1729 #ifdef NEWMENU_MOUSE
1730                 if (!joydefs_calibrating)
1731                         newmenu_show_cursor();      // possibly hidden
1732                 omouse_state = mouse_state;
1733                 if (!MenuReordering)
1734                         mouse_state = mouse_button_state(0);
1735 //@@      mprintf ((0,"mouse state:%d\n",mouse_state));
1736 #endif
1737
1738                 //see if redbook song needs to be restarted
1739                 songs_check_redbook_repeat();
1740
1741                 //network_listen();
1742
1743                 k = key_inkey();
1744
1745         if (subfunction)
1746         (*subfunction)(nitems,item,&k,choice);
1747
1748 #ifdef NETWORK
1749                 if (!time_stopped)      {
1750                         // Save current menu box
1751                         if (multi_menu_poll() == -1)
1752                                 k = -2;
1753                 }
1754 #endif
1755
1756                 if ( k<-1 ) {
1757                         dont_restore = (k == -3);               //-3 means don't restore
1758                         choice = k;
1759                         k = -1;
1760                         done = 1;
1761                 }
1762 #ifndef WINDOWS
1763                 if (check_button_press())
1764                         done = 1;
1765 #endif
1766
1767 //              if ( (nmenus<2) && (k>0) && (nothers==0) )
1768 //                      done=1;
1769
1770                 old_choice = choice;
1771         
1772                 switch( k )     {
1773
1774 #ifdef NETWORK
1775                 case KEY_I:
1776                  if (SurfingNet && !already_showing_info)
1777                    {
1778                          show_extra_netgame_info(choice-2);
1779                    }
1780                  if (SurfingNet && already_showing_info)
1781                         {
1782                          done=1;
1783                          choice=-1;
1784                         }
1785                  break;
1786                 case KEY_U:
1787                  if (SurfingNet && !already_showing_info)
1788                    {
1789                          network_request_player_names(choice-2);
1790                    }
1791                  if (SurfingNet && already_showing_info)
1792                         {
1793                          done=1;
1794                          choice=-1;
1795                         }
1796                  break;
1797 #endif
1798                 case KEY_PAUSE:
1799                  if (Pauseable_menu)
1800                    {    
1801                          Pauseable_menu=0;
1802                          done=1;
1803                          choice=-1;
1804                    }
1805                  break;
1806                 case KEY_TAB + KEY_SHIFTED:
1807                 case KEY_UP:
1808                 case KEY_PAD8:
1809                         if (all_text) break;
1810                         do {
1811                                 choice--;
1812
1813                 if (IsScrollBox)
1814                 {
1815                         LastScrollCheck=-1;
1816                 mprintf ((0,"Scrolling! Choice=%d\n",choice));
1817                                    
1818                 if (choice<TopChoice)
1819                         { choice=TopChoice; break; }
1820
1821                 if (choice<ScrollOffset)
1822                {
1823                         for (i=0;i<nitems;i++)
1824                                 item[i].redraw=1;
1825                      ScrollOffset--;
1826                      mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
1827                }
1828                 }
1829                 else
1830                 {
1831                         if (choice >= nitems ) choice=0;
1832                 if (choice < 0 ) choice=nitems-1;
1833                 }
1834                         } while ( item[choice].type==NM_TYPE_TEXT );
1835                         if ((item[choice].type==NM_TYPE_INPUT) && (choice!=old_choice)) 
1836                                 item[choice].value = -1;
1837                         if ((old_choice>-1) && (item[old_choice].type==NM_TYPE_INPUT_MENU) && (old_choice!=choice))     {
1838                                 item[old_choice].group=0;
1839                                 strcpy(item[old_choice].text, item[old_choice].saved_text );
1840                                 item[old_choice].value = -1;
1841                         }
1842                         if (old_choice>-1) 
1843                                 item[old_choice].redraw = 1;
1844                         item[choice].redraw=1;
1845                         break;
1846                 case KEY_TAB:
1847                 case KEY_DOWN:
1848                 case KEY_PAD2:
1849         // ((0,"Pressing down! IsScrollBox=%d",IsScrollBox));
1850                 if (all_text) break;
1851                         do {
1852                                 choice++;
1853
1854                         if (IsScrollBox)
1855                 {
1856                 LastScrollCheck=-1;
1857                 mprintf ((0,"Scrolling! Choice=%d\n",choice));
1858                                    
1859                 if (choice==nitems)
1860                 { choice--; break; }
1861
1862                 if (choice>=MaxOnMenu+ScrollOffset)
1863                 {
1864                 for (i=0;i<nitems;i++)
1865                                 item[i].redraw=1;
1866                   ScrollOffset++;
1867                   mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
1868                 }
1869                 }
1870             else
1871             {
1872                         if (choice < 0 ) choice=nitems-1;
1873                         if (choice >= nitems ) choice=0;
1874                 }
1875
1876                         } while ( item[choice].type==NM_TYPE_TEXT );
1877                                                       
1878                         if ((item[choice].type==NM_TYPE_INPUT) && (choice!=old_choice)) 
1879                                 item[choice].value = -1;
1880                         if ( (old_choice>-1) && (item[old_choice].type==NM_TYPE_INPUT_MENU) && (old_choice!=choice))    {
1881                                 item[old_choice].group=0;
1882                                 strcpy(item[old_choice].text, item[old_choice].saved_text );    
1883                                 item[old_choice].value = -1;
1884                         }
1885                         if (old_choice>-1)
1886                                 item[old_choice].redraw=1;
1887                         item[choice].redraw=1;
1888                         break;
1889                 case KEY_SPACEBAR:
1890                         if ( choice > -1 )      {
1891                                 switch( item[choice].type )     {
1892                                 case NM_TYPE_MENU:
1893                                 case NM_TYPE_INPUT:
1894                                 case NM_TYPE_INPUT_MENU:
1895                                         break;
1896                                 case NM_TYPE_CHECK:
1897                                         if ( item[choice].value )
1898                                                 item[choice].value = 0;
1899                                         else
1900                                                 item[choice].value = 1;
1901                                         mprintf ((0,"ISB=%d MDI=%d SO=%d choice=%d\n",IsScrollBox,MAXDISPLAYABLEITEMS,ScrollOffset,choice));
1902                                         if (IsScrollBox)
1903                                          {
1904                                                 if (choice==(MaxOnMenu+ScrollOffset-1) || choice==ScrollOffset)
1905                                                  {
1906                                                    mprintf ((0,"Special redraw!\n"));
1907                                                         LastScrollCheck=-1;                                     
1908                                                  }
1909                                          }
1910                                 
1911                                         item[choice].redraw=1;
1912                                         break;
1913                                 case NM_TYPE_RADIO:
1914                                         for (i=0; i<nitems; i++ )       {
1915                                                 if ((i!=choice) && (item[i].type==NM_TYPE_RADIO) && (item[i].group==item[choice].group) && (item[i].value) )    {
1916                                                         item[i].value = 0;
1917                                                         item[i].redraw = 1;
1918                                                 }
1919                                         }
1920                                         item[choice].value = 1;
1921                                         item[choice].redraw = 1;
1922                                         break;
1923                                 }       
1924                         }
1925                         break;
1926
1927                 case KEY_SHIFTED+KEY_UP:
1928                  if (MenuReordering && choice!=TopChoice)
1929                   {
1930                    Temp=item[choice].text;
1931                    TempVal=item[choice].value;
1932                    item[choice].text=item[choice-1].text;
1933                    item[choice].value=item[choice-1].value;
1934                    item[choice-1].text=Temp;
1935                    item[choice-1].value=TempVal;
1936                    item[choice].redraw=1;
1937                    item[choice-1].redraw=1;
1938                    choice--;
1939                   }
1940                  break;
1941                 case KEY_SHIFTED+KEY_DOWN:
1942                  if (MenuReordering && choice!=(nitems-1))
1943                   {
1944                    Temp=item[choice].text;
1945                    TempVal=item[choice].value;
1946                    item[choice].text=item[choice+1].text;
1947                    item[choice].value=item[choice+1].value;
1948                    item[choice+1].text=Temp;
1949                    item[choice+1].value=TempVal;
1950                    item[choice].redraw=1;
1951                    item[choice+1].redraw=1;
1952                    choice++;
1953                   }
1954                  break;
1955                 
1956                 case KEY_ENTER:
1957                 case KEY_PADENTER:
1958                         if ( (choice>-1) && (item[choice].type==NM_TYPE_INPUT_MENU) && (item[choice].group==0)) {
1959                                 item[choice].group = 1;
1960                                 item[choice].redraw = 1;
1961                                 if ( !strnicmp( item[choice].saved_text, TXT_EMPTY, strlen(TXT_EMPTY) ) )       {
1962                                         item[choice].text[0] = 0;
1963                                         item[choice].value = -1;
1964                                 } else {        
1965                                         strip_end_whitespace(item[choice].text);
1966                                 }
1967                         } else
1968                                 done = 1;
1969                         break;
1970
1971                 case KEY_ESC:
1972                         if ( (choice>-1) && (item[choice].type==NM_TYPE_INPUT_MENU) && (item[choice].group==1)) {
1973                                 item[choice].group=0;
1974                                 strcpy(item[choice].text, item[choice].saved_text );    
1975                                 item[choice].redraw=1;
1976                                 item[choice].value = -1;
1977                         } else {
1978                                 done = 1;
1979                                 choice = -1;
1980                         }
1981                         break;
1982
1983                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_3:)
1984                 case KEY_PRINT_SCREEN:
1985                         MAC(newmenu_hide_cursor());
1986                         save_screen_shot(0);
1987                         PA_DFX (pa_set_frontbuffer_current());
1988                         PA_DFX (pa_set_front_to_read());
1989                         for (i=0;i<nitems;i++)
1990                                 item[i].redraw=1;
1991                         
1992                         MAC(newmenu_show_cursor());
1993                         MAC(key_flush());
1994                         break;
1995
1996                 #ifdef MACINTOSH
1997
1998                 case KEY_COMMAND+KEY_RIGHT:
1999                         songs_goto_next_song();
2000                         break;
2001                 case KEY_COMMAND+KEY_LEFT:
2002                         songs_goto_prev_song();
2003                         break;
2004                 case KEY_COMMAND+KEY_UP:
2005                         songs_play_level_song(1);
2006                         break;
2007                 case KEY_COMMAND+KEY_DOWN:
2008                         songs_stop_redbook();
2009                         break;
2010
2011                 case KEY_COMMAND+KEY_M:
2012                         k = -1;
2013                         #if !defined(SHAREWARE) || defined(APPLE_DEMO)
2014                         if ( (Game_mode & GM_MULTI) )           // don't process in multiplayer games
2015                                 break;
2016
2017                         key_close();            // no processing of keys with keyboard handler.. jeez                           
2018                         stop_time();
2019                         newmenu_hide_cursor();
2020                         show_boxed_message ("Mounting CD\nESC to quit");        
2021                         RBAMountDisk();         // OS has totaly control of the CD.
2022                         if (Function_mode == FMODE_MENU)
2023                                 songs_play_song(SONG_TITLE,1);
2024                         else if (Function_mode == FMODE_GAME)
2025                                 songs_play_level_song( Current_level_num );
2026                         clear_boxed_message();
2027                         newmenu_show_cursor();
2028                         key_init();
2029                         key_flush();
2030                         start_time();
2031                         #endif
2032                         
2033                         break;
2034
2035                 case KEY_COMMAND+KEY_E:
2036                         songs_stop_redbook();
2037                         RBAEjectDisk();
2038                         k = -1;         // force key not to register
2039                         break;
2040                         
2041                 case KEY_COMMAND+KEY_Q: {
2042                         extern void macintosh_quit();
2043                         
2044                         if ( !(Game_mode & GM_MULTI) )
2045                                 macintosh_quit();
2046                         if (!joydefs_calibrating)
2047                                 newmenu_show_cursor();
2048                         k = -1;         // force key not to register
2049                         break;
2050                 }
2051                 #endif
2052
2053                 #ifndef NDEBUG
2054                 case KEY_BACKSP:        
2055                         if ( (choice>-1) && (item[choice].type!=NM_TYPE_INPUT)&&(item[choice].type!=NM_TYPE_INPUT_MENU))
2056                                 Int3(); 
2057                         break;
2058                 #endif
2059
2060                 }
2061
2062 #ifdef NEWMENU_MOUSE // for mouse selection of menu's etc.
2063                 WIN(Sleep(100));
2064                 if ( !done && mouse_state && !omouse_state && !all_text ) {
2065                         mouse_get_pos(&mx, &my);
2066                         for (i=0; i<nitems; i++ )       {
2067                                 x1 = grd_curcanv->cv_bitmap.bm_x + item[i].x - item[i].right_offset - 6;
2068                                 x2 = x1 + item[i].w;
2069                                 y1 = grd_curcanv->cv_bitmap.bm_y + item[i].y;
2070                                 y2 = y1 + item[i].h;
2071                                 if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2))) {
2072                                         if (i+ScrollOffset != choice) {
2073                                                 if(Hack_DblClick_MenuMode) dblclick_flag = 0; 
2074                                         }
2075                                         
2076                                         choice = i + ScrollOffset;
2077
2078                                         switch( item[choice].type )     {
2079                                         case NM_TYPE_CHECK:
2080                                                 if ( item[choice].value )
2081                                                         item[choice].value = 0;
2082                                                 else
2083                                                         item[choice].value = 1;
2084                                                 item[choice].redraw=1;
2085
2086                                                 if (IsScrollBox)
2087                                                         LastScrollCheck=-1;
2088 #if 0
2089                                                 if (IsScrollBox)
2090                                                  {
2091                                                         if (choice==(MaxOnMenu+ScrollOffset-1) || choice==ScrollOffset)
2092                                                          {
2093                                                            mprintf ((0,"Special redraw!\n"));
2094                                                                 LastScrollCheck=-1;                                     
2095                                                          }
2096                                                  }
2097 #endif
2098                                                 break;
2099                                         case NM_TYPE_RADIO:
2100                                                 for (i=0; i<nitems; i++ )       {
2101                                                         if ((i!=choice) && (item[i].type==NM_TYPE_RADIO) && (item[i].group==item[choice].group) && (item[i].value) )    {
2102                                                                 item[i].value = 0;
2103                                                                 item[i].redraw = 1;
2104                                                         }
2105                                                 }
2106                                                 item[choice].value = 1;
2107                                                 item[choice].redraw = 1;
2108                                                 break;
2109                                         }
2110                                         item[old_choice].redraw=1;
2111                                         break;
2112                                 }
2113                         }
2114                 }
2115
2116                 if (mouse_state && all_text)
2117                         done = 1;
2118                 
2119                 if ( !done && mouse_state && !all_text ) {
2120                         mouse_get_pos(&mx, &my);
2121                         
2122                         // check possible scrollbar stuff first
2123                         if (IsScrollBox) {
2124                                 int arrow_width, arrow_height, aw;
2125                                 
2126                                 if (ScrollOffset != 0) {
2127                                         gr_get_string_size(UP_ARROW_MARKER, &arrow_width, &arrow_height, &aw);
2128                                         x2 = grd_curcanv->cv_bitmap.bm_x + item[ScrollOffset].x-(MenuHires?24:12);
2129                                 y1 = grd_curcanv->cv_bitmap.bm_y + item[ScrollOffset].y-((string_height+1)*ScrollOffset);
2130                                         x1 = x1 - arrow_width;
2131                                         y2 = y1 + arrow_height;
2132                                         if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
2133                                                 choice--;
2134                                         LastScrollCheck=-1;
2135                                 mprintf ((0,"Scrolling! Choice=%d\n",choice));
2136                                                    
2137                                 if (choice<ScrollOffset)
2138                                {
2139                                         for (i=0;i<nitems;i++)
2140                                                 item[i].redraw=1;
2141                                      ScrollOffset--;
2142                                      mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
2143                                }
2144                                         }
2145                                 }
2146                                 if (ScrollOffset+MaxDisplayable<nitems) {
2147                                         gr_get_string_size(DOWN_ARROW_MARKER, &arrow_width, &arrow_height, &aw);
2148                                         x2 = grd_curcanv->cv_bitmap.bm_x + item[ScrollOffset+MaxDisplayable-1].x-(MenuHires?24:12);
2149                                         y1 = grd_curcanv->cv_bitmap.bm_y + item[ScrollOffset+MaxDisplayable-1].y-((string_height+1)*ScrollOffset);
2150                                         x1 = x1 - arrow_width;
2151                                         y2 = y1 + arrow_height;
2152                                         if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
2153                                                 choice++;
2154                                 LastScrollCheck=-1;
2155                                 mprintf ((0,"Scrolling! Choice=%d\n",choice));
2156                                                    
2157                                 if (choice>=MaxOnMenu+ScrollOffset)
2158                                 {
2159                                 for (i=0;i<nitems;i++)
2160                                                 item[i].redraw=1;
2161                                   ScrollOffset++;
2162                                   mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
2163                                 }
2164                                         }
2165                                 }
2166                         }
2167                         
2168                         for (i=0; i<nitems; i++ )       {
2169                                 x1 = grd_curcanv->cv_bitmap.bm_x + item[i].x - item[i].right_offset - 6;
2170                                 x2 = x1 + item[i].w;
2171                                 y1 = grd_curcanv->cv_bitmap.bm_y + item[i].y;
2172                                 y2 = y1 + item[i].h;
2173                                 if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && (item[i].type != NM_TYPE_TEXT) ) {
2174                                         if (i+ScrollOffset != choice) {
2175                                                 if(Hack_DblClick_MenuMode) dblclick_flag = 0; 
2176                                         }
2177
2178                                         choice = i + ScrollOffset;
2179
2180                                         if ( item[choice].type == NM_TYPE_SLIDER ) {
2181                                                 char slider_text[NM_MAX_TEXT_LEN+1], *p, *s1;
2182                                                 int slider_width, height, aw, sleft_width, sright_width, smiddle_width;
2183                                                 
2184                                                 strcpy(slider_text, item[choice].saved_text);
2185                                                 p = strchr(slider_text, '\t');
2186                                                 if (p) {
2187                                                         *p = '\0';
2188                                                         s1 = p+1;
2189                                                 }
2190                                                 if (p) {
2191                                                         gr_get_string_size(s1, &slider_width, &height, &aw);
2192                                                         gr_get_string_size(SLIDER_LEFT, &sleft_width, &height, &aw);
2193                                                         gr_get_string_size(SLIDER_RIGHT, &sright_width, &height, &aw);
2194                                                         gr_get_string_size(SLIDER_MIDDLE, &smiddle_width, &height, &aw);
2195
2196                                                         x1 = grd_curcanv->cv_bitmap.bm_x + item[choice].x + item[choice].w - slider_width;
2197                                                         x2 = x1 + slider_width + sright_width;
2198                                                         if ( (mx > x1) && (mx < (x1 + sleft_width)) && (item[choice].value != item[choice].min_value) ) {
2199                                                                 item[choice].value = item[choice].min_value;
2200                                                                 item[choice].redraw = 2;
2201                                                         } else if ( (mx < x2) && (mx > (x2 - sright_width)) && (item[choice].value != item[choice].max_value) ) {
2202                                                                 item[choice].value = item[choice].max_value;
2203                                                                 item[choice].redraw = 2;
2204                                                         } else if ( (mx > (x1 + sleft_width)) && (mx < (x2 - sright_width)) ) {
2205                                                                 int num_values, value_width, new_value;
2206                                                                 
2207                                                                 num_values = item[choice].max_value - item[choice].min_value + 1;
2208                                                                 value_width = (slider_width - sleft_width - sright_width) / num_values;
2209                                                                 new_value = (mx - x1 - sleft_width) / value_width;
2210                                                                 if ( item[choice].value != new_value ) {
2211                                                                         item[choice].value = new_value;
2212                                                                         item[choice].redraw = 2;
2213                                                                 }
2214                                                         }
2215                                                         *p = '\t';
2216                                                 }
2217                                         }
2218                                         if (choice == old_choice)
2219                                                 break;
2220                                         if ((item[choice].type==NM_TYPE_INPUT) && (choice!=old_choice)) 
2221                                                 item[choice].value = -1;
2222                                         if ((old_choice>-1) && (item[old_choice].type==NM_TYPE_INPUT_MENU) && (old_choice!=choice))     {
2223                                                 item[old_choice].group=0;
2224                                                 strcpy(item[old_choice].text, item[old_choice].saved_text );
2225                                                 item[old_choice].value = -1;
2226                                         }
2227                                         if (old_choice>-1) 
2228                                                 item[old_choice].redraw = 1;
2229                                         item[choice].redraw=1;
2230                                         break;
2231                                 }
2232                         }
2233                 }
2234                 
2235                 if ( !done && !mouse_state && omouse_state && !all_text && (choice != -1) && (item[choice].type == NM_TYPE_MENU) ) {
2236                         mouse_get_pos(&mx, &my);
2237                         x1 = grd_curcanv->cv_bitmap.bm_x + item[choice].x;
2238                         x2 = x1 + item[choice].w;
2239                         y1 = grd_curcanv->cv_bitmap.bm_y + item[choice].y;
2240                         y2 = y1 + item[choice].h;
2241                         if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2))) {
2242                                 if (Hack_DblClick_MenuMode) {
2243                                         if (dblclick_flag) done = 1;
2244                                         else dblclick_flag = 1;
2245                                 }
2246                                 else done = 1;
2247                         }
2248                 }
2249                 
2250                 if ( !done && !mouse_state && omouse_state && (choice>-1) && (item[choice].type==NM_TYPE_INPUT_MENU) && (item[choice].group==0))        {
2251                         item[choice].group = 1;
2252                         item[choice].redraw = 1;
2253                         if ( !strnicmp( item[choice].saved_text, TXT_EMPTY, strlen(TXT_EMPTY) ) )       {
2254                                 item[choice].text[0] = 0;
2255                                 item[choice].value = -1;
2256                         } else {        
2257                                 strip_end_whitespace(item[choice].text);
2258                         }
2259                 }
2260                 
2261                 if ( !done && !mouse_state && omouse_state && close_box ) {
2262                         mouse_get_pos(&mx, &my);
2263                         x1 = grd_curcanv->cv_bitmap.bm_x + CLOSE_X;
2264                         x2 = x1 + CLOSE_SIZE;
2265                         y1 = grd_curcanv->cv_bitmap.bm_y + CLOSE_Y;
2266                         y2 = y1 + CLOSE_SIZE;
2267                         if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
2268                                 choice = -1;
2269                                 done = 1;
2270                         }
2271                 }
2272
2273 //       HACK! Don't redraw loadgame preview
2274                 if (RestoringMenu) item[0].redraw = 0;
2275 #endif // NEWMENU_MOUSE
2276
2277                 if ( choice > -1 )      {
2278                         int ascii;
2279
2280                         if ( ((item[choice].type==NM_TYPE_INPUT)||((item[choice].type==NM_TYPE_INPUT_MENU)&&(item[choice].group==1)) )&& (old_choice==choice) ) {
2281                                 if ( k==KEY_LEFT || k==KEY_BACKSP || k==KEY_PAD4 )      {
2282                                         if (item[choice].value==-1) item[choice].value = strlen(item[choice].text);
2283                                         if (item[choice].value > 0)
2284                                                 item[choice].value--;
2285                                         item[choice].text[item[choice].value] = 0;
2286                                         item[choice].redraw = 1;        
2287                                 } else {
2288                                         ascii = key_to_ascii(k);
2289                                         if ((ascii < 255 ) && (item[choice].value < item[choice].text_len ))
2290                                         {
2291                                                 int allowed;
2292
2293                                                 if (item[choice].value==-1) {
2294                                                         item[choice].value = 0;
2295                                                 }
2296
2297                                                 allowed = char_allowed(ascii);
2298
2299                                                 if (!allowed && ascii==' ' && char_allowed('_')) {
2300                                                         ascii = '_';
2301                                                         allowed=1;
2302                                                 }
2303
2304                                                 if (allowed) {
2305                                                         item[choice].text[item[choice].value++] = ascii;
2306                                                         item[choice].text[item[choice].value] = 0;
2307                                                         item[choice].redraw=1;  
2308                                                 }
2309                                         }
2310                                 }
2311                         } else if ((item[choice].type!=NM_TYPE_INPUT) && (item[choice].type!=NM_TYPE_INPUT_MENU) ) {
2312                                 ascii = key_to_ascii(k);
2313                                 if (ascii < 255 ) {
2314                                         int choice1 = choice;
2315                                         ascii = toupper(ascii);
2316                                         do {
2317                                                 int i,ch;
2318                                                 choice1++;
2319                                                 if (choice1 >= nitems ) choice1=0;
2320                                                 for (i=0;(ch=item[choice1].text[i])!=0 && ch==' ';i++);
2321                                                 if ( ( (item[choice1].type==NM_TYPE_MENU) ||
2322                                                                  (item[choice1].type==NM_TYPE_CHECK) ||
2323                                                                  (item[choice1].type==NM_TYPE_RADIO) ||
2324                                                                  (item[choice1].type==NM_TYPE_NUMBER) ||
2325                                                                  (item[choice1].type==NM_TYPE_SLIDER) )
2326                                                                 && (ascii==toupper(ch)) )       {
2327                                                         k = 0;
2328                                                         choice = choice1;
2329                                                         if (old_choice>-1)
2330                                                                 item[old_choice].redraw=1;
2331                                                         item[choice].redraw=1;
2332                                                 }
2333                                         } while (choice1 != choice );
2334                                 }       
2335                         }
2336
2337                         if ( (item[choice].type==NM_TYPE_NUMBER) || (item[choice].type==NM_TYPE_SLIDER))        {
2338                                 int ov=item[choice].value;
2339                                 switch( k ) {
2340                                 case KEY_PAD4:
2341                                 case KEY_LEFT:
2342                                 case KEY_MINUS:
2343                                 case KEY_MINUS+KEY_SHIFTED:
2344                                 case KEY_PADMINUS:
2345                                         item[choice].value -= 1;
2346                                         break;
2347                                 case KEY_RIGHT:
2348                                 case KEY_PAD6:
2349                                 case KEY_EQUAL:
2350                                 case KEY_EQUAL+KEY_SHIFTED:
2351                                 case KEY_PADPLUS:
2352                                         item[choice].value++;
2353                                         break;
2354                                 case KEY_PAGEUP:
2355                                 case KEY_PAD9:
2356                                 case KEY_SPACEBAR:
2357                                         item[choice].value += 10;
2358                                         break;
2359                                 case KEY_PAGEDOWN:
2360                                 case KEY_BACKSP:
2361                                 case KEY_PAD3:
2362                                         item[choice].value -= 10;
2363                                         break;
2364                                 }
2365                                 if (ov!=item[choice].value)
2366                                         item[choice].redraw=1;
2367                         }
2368         
2369                 }
2370
2371                 WINDOS (        dd_gr_set_current_canvas(bg.menu_canvas),
2372                                 gr_set_current_canvas(bg.menu_canvas));
2373
2374         // Redraw everything...
2375         for (i=ScrollOffset; i<MaxDisplayable+ScrollOffset; i++ )
2376         {
2377         if (item[i].redraw) // warning! ugly hack below                  
2378                 {
2379                 item[i].y-=((string_height+1)*ScrollOffset);
2380                         newmenu_hide_cursor();
2381                 draw_item( &bg, &item[i], (i==choice && !all_text),TinyMode );
2382                                 item[i].redraw=0;
2383 #ifdef NEWMENU_MOUSE
2384                                 if (!MenuReordering && !joydefs_calibrating)
2385                                         newmenu_show_cursor();
2386 #endif
2387             item[i].y+=((string_height+1)*ScrollOffset);
2388                 }   
2389          if (i==choice && (item[i].type==NM_TYPE_INPUT || (item[i].type==NM_TYPE_INPUT_MENU && item[i].group)))
2390                                 update_cursor( &item[i]);
2391                 }
2392         gr_update();
2393
2394       if (IsScrollBox)
2395         {
2396         //grd_curcanv->cv_font = NORMAL_FONT;
2397         
2398                 if (LastScrollCheck!=ScrollOffset)
2399          {
2400                 LastScrollCheck=ScrollOffset;
2401                 grd_curcanv->cv_font = SELECTED_FONT;
2402                                 
2403                 sy=item[ScrollOffset].y-((string_height+1)*ScrollOffset);
2404                 sx=item[ScrollOffset].x-(MenuHires?24:12);
2405                                 
2406           
2407                 if (ScrollOffset!=0)
2408                         nm_rstring( &bg, (MenuHires?20:10), sx, sy, UP_ARROW_MARKER );
2409                 else
2410                         nm_rstring( &bg, (MenuHires?20:10), sx, sy, "  " );
2411
2412                 sy=item[ScrollOffset+MaxDisplayable-1].y-((string_height+1)*ScrollOffset);
2413                 sx=item[ScrollOffset+MaxDisplayable-1].x-(MenuHires?24:12);
2414           
2415                 if (ScrollOffset+MaxDisplayable<nitems)
2416                         nm_rstring( &bg, (MenuHires?20:10), sx, sy, DOWN_ARROW_MARKER );
2417                 else
2418                 nm_rstring( &bg, (MenuHires?20:10), sx, sy, "  " );
2419
2420         }
2421
2422         }   
2423
2424                 if ( !dont_restore && gr_palette_faded_out )    {
2425                         gr_palette_fade_in( gr_palette, 32, 0 );
2426                 }
2427         }
2428
2429         newmenu_hide_cursor();
2430
2431         // Restore everything...
2432
2433         WINDOS (        dd_gr_set_current_canvas(bg.menu_canvas),
2434                         gr_set_current_canvas(bg.menu_canvas));
2435
2436         if ( filename == NULL ) {
2437                 // Save the background under the menu...
2438                 WIN (DDGRLOCK(dd_grd_curcanv));
2439                         gr_bitmap(0, 0, bg.saved);      
2440                 WIN (DDGRUNLOCK(dd_grd_curcanv));
2441                 gr_free_bitmap(bg.saved);
2442                 d_free( bg.background );
2443         } else {
2444                 if (!dont_restore)      //info passed back from subfunction
2445                 {
2446                         WIN (DDGRLOCK(dd_grd_curcanv));
2447                         gr_bitmap(0, 0, bg.background);
2448                         WIN (DDGRUNLOCK(dd_grd_curcanv));       
2449                 }
2450                 gr_free_bitmap(bg.background);
2451         }
2452
2453         WINDOS (        dd_gr_free_sub_canvas(bg.menu_canvas),
2454                         gr_free_sub_canvas( bg.menu_canvas ) );
2455
2456         WINDOS (dd_gr_set_current_canvas(NULL), gr_set_current_canvas( NULL ));                 
2457         grd_curcanv->cv_font    = save_font;
2458         WINDOS (dd_gr_set_current_canvas(NULL), gr_set_current_canvas( save_canvas ));                  
2459         keyd_repeat = old_keyd_repeat;
2460
2461         game_flush_inputs();
2462
2463         if (time_stopped) 
2464      {
2465                 start_time();
2466                 #ifdef TACTILE
2467                         if (TactileStick)
2468                                 EnableForces();
2469                 #endif
2470           }
2471
2472         if ( sound_stopped )
2473                 digi_resume_digi_sounds();
2474
2475         WIN(mouse_set_mode(1));                         //re-enable centering mode
2476
2477         return choice;
2478         
2479 }
2480
2481
2482 int nm_messagebox1( char *title, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int nchoices, ... )
2483 {
2484         int i;
2485         char * format;
2486         va_list args;
2487         char *s;
2488         char nm_text[MESSAGEBOX_TEXT_SIZE];
2489         newmenu_item nm_message_items[5];
2490
2491         va_start(args, nchoices );
2492
2493         Assert( nchoices <= 5 );
2494
2495         for (i=0; i<nchoices; i++ )     {
2496                 s = va_arg( args, char * );
2497                 nm_message_items[i].type = NM_TYPE_MENU; nm_message_items[i].text = s;
2498         }
2499         format = va_arg( args, char * );
2500         strcpy( nm_text, "" );
2501         vsprintf(nm_text,format,args);
2502         va_end(args);
2503
2504         Assert(strlen(nm_text) < MESSAGEBOX_TEXT_SIZE);
2505
2506         return newmenu_do( title, nm_text, nchoices, nm_message_items, subfunction );
2507 }
2508
2509 int nm_messagebox( char *title, int nchoices, ... )
2510 {
2511         int i;
2512         char * format;
2513         va_list args;
2514         char *s;
2515         char nm_text[MESSAGEBOX_TEXT_SIZE];
2516         newmenu_item nm_message_items[5];
2517
2518         va_start(args, nchoices );
2519
2520         Assert( nchoices <= 5 );
2521
2522         for (i=0; i<nchoices; i++ )     {
2523                 s = va_arg( args, char * );
2524                 nm_message_items[i].type = NM_TYPE_MENU; nm_message_items[i].text = s;
2525         }
2526         format = va_arg( args, char * );
2527         strcpy( nm_text, "" );
2528         vsprintf(nm_text,format,args);
2529         va_end(args);
2530
2531         Assert(strlen(nm_text) < MESSAGEBOX_TEXT_SIZE );
2532
2533         return newmenu_do( title, nm_text, nchoices, nm_message_items, NULL );
2534 }
2535
2536
2537
2538
2539 void newmenu_file_sort( int n, char *list )
2540 {
2541         int i, j, incr;
2542         char t[14];
2543
2544         incr = n / 2;
2545         while( incr > 0 )               {
2546                 for (i=incr; i<n; i++ )         {
2547                         j = i - incr;
2548                         while (j>=0 )                   {
2549                                 if (strncmp(&list[j*14], &list[(j+incr)*14], 12) > 0)                           {
2550                                         memcpy( t, &list[j*14], FILENAME_LEN );
2551                                         memcpy( &list[j*14], &list[(j+incr)*14], FILENAME_LEN );
2552                                         memcpy( &list[(j+incr)*14], t, FILENAME_LEN );
2553                                         j -= incr;
2554                                 }
2555                                 else
2556                                         break;
2557                         }
2558                 }
2559                 incr = incr / 2;
2560         }
2561 }
2562
2563 void delete_player_saved_games(char * name)
2564 {
2565         int i;
2566         char filename[16];
2567         
2568         for (i=0;i<10; i++)     {
2569 #ifndef MACINTOSH
2570                 sprintf( filename, "%s.sg%d", name, i );
2571 #else
2572                 sprintf( filename, ":Players:%s.sg%d", name, i );
2573 #endif
2574                 cfile_delete(filename);
2575         }
2576 }
2577
2578 #define MAX_FILES 300
2579
2580 int MakeNewPlayerFile(int allow_abort);
2581
2582 extern char AltHogDir[64];
2583 extern char AltHogdir_initialized;
2584
2585 int newmenu_get_filename( char * title, char * filespec, char * filename, int allow_abort_flag )
2586 {
2587         int i;
2588         FILEFINDSTRUCT find;
2589         int NumFiles=0, key,done, citem, ocitem;
2590         char * filenames = NULL;
2591         int NumFiles_displayed = 8;
2592         int first_item = -1, ofirst_item;
2593         int old_keyd_repeat = keyd_repeat;
2594         int player_mode=0;
2595         int demo_mode=0;
2596         int demos_deleted=0;
2597         int initialized = 0;
2598         int exit_value = 0;
2599         int w_x, w_y, w_w, w_h, title_height;
2600         int box_x, box_y, box_w, box_h;
2601         bkg bg;         // background under listbox
2602 #ifdef NEWMENU_MOUSE
2603         int mx, my, x1, x2, y1, y2, mouse_state, omouse_state;
2604         int mouse2_state, omouse2_state;
2605         int dblclick_flag=0;
2606 # ifdef WINDOWS
2607         int simukey=0;
2608         int show_up_arrow=0,show_down_arrow=0;
2609 # endif
2610 #endif
2611 WIN(int win_redraw=0);
2612
2613         w_x=w_y=w_w=w_h=title_height=0;
2614         box_x=box_y=box_w=box_h=0;
2615
2616         filenames = d_malloc( MAX_FILES * 14 );
2617         if (filenames==NULL) return 0;
2618
2619         citem = 0;
2620         keyd_repeat = 1;
2621
2622         WIN(mouse_set_mode(0));                         //disable centering mode
2623
2624         if (strstr( filespec, "*.plr" ))
2625                 player_mode = 1;
2626         else if (strstr( filespec, "*.dem" ))
2627                 demo_mode = 1;
2628
2629 ReadFileNames:
2630         done = 0;
2631         NumFiles=0;
2632         
2633 #if !defined(APPLE_DEMO)                // no new pilots for special apple oem version
2634         if (player_mode)        {
2635                 strncpy( &filenames[NumFiles*14], TXT_CREATE_NEW, FILENAME_LEN );
2636                 NumFiles++;
2637         }
2638 #endif
2639
2640         if( !FileFindFirst( filespec, &find ) ) {
2641                 do      {
2642                         if (NumFiles<MAX_FILES) {
2643                                 strncpy( &filenames[NumFiles*14], find.name, FILENAME_LEN );
2644                                 if ( player_mode )      {
2645                                         char * p;
2646                                         p = strchr(&filenames[NumFiles*14],'.');
2647                                         if (p) *p = '\0';
2648                                 }
2649                                 NumFiles++;
2650                         } else {
2651                                 break;
2652                         }
2653                 } while( !FileFindNext( &find ) );
2654                 FileFindClose();
2655         }
2656
2657         if (demo_mode && AltHogdir_initialized) {
2658                 char filespec2[PATH_MAX + FILENAME_LEN];
2659                 strcpy(filespec2, AltHogDir);
2660                 strcat(filespec2, "/");
2661                 strcat(filespec2, filespec);
2662                 if ( !FileFindFirst( filespec2, &find ) ) {
2663                         do {
2664                                 if (NumFiles<MAX_FILES) {
2665                                         strncpy( &filenames[NumFiles*14], find.name, FILENAME_LEN );
2666                                         NumFiles++;
2667                                 } else {
2668                                         break;
2669                                 }
2670                         } while( !FileFindNext( &find ) );
2671                         FileFindClose();
2672                 }
2673         }
2674
2675         if ( (NumFiles < 1) && demos_deleted )  {
2676                 exit_value = 0;
2677                 goto ExitFileMenu;
2678         }
2679         if ( (NumFiles < 1) && demo_mode ) {
2680                 nm_messagebox( NULL, 1, TXT_OK, "%s %s\n%s", TXT_NO_DEMO_FILES, TXT_USE_F5, TXT_TO_CREATE_ONE);
2681                 exit_value = 0;
2682                 goto ExitFileMenu;
2683         }
2684
2685         #ifndef APPLE_DEMO
2686         if ( (NumFiles < 2) && player_mode ) {
2687                 citem = 0;
2688                 goto ExitFileMenuEarly;
2689         }
2690         #endif
2691
2692
2693         if ( NumFiles<1 )       {
2694                 #ifndef APPLE_DEMO
2695                         nm_messagebox( NULL, 1, "Ok", "%s\n '%s' %s", TXT_NO_FILES_MATCHING, filespec, TXT_WERE_FOUND);
2696                 #endif
2697                 exit_value = 0;
2698                 goto ExitFileMenu;
2699         }
2700
2701         if (!initialized) {     
2702 //              set_screen_mode(SCREEN_MENU);
2703                 set_popup_screen();
2704
2705         #ifdef WINDOWS
2706 RePaintNewmenuFile:
2707
2708                 dd_gr_set_current_canvas(NULL);
2709         #else
2710                 gr_set_current_canvas(NULL);
2711         #endif
2712
2713                 WIN(DDGRLOCK(dd_grd_curcanv))                                   //mwa put these here -- are these needed Samir???
2714                 {
2715                         grd_curcanv->cv_font = SUBTITLE_FONT;
2716                 }
2717                 WIN(DDGRUNLOCK(dd_grd_curcanv));
2718
2719                 w_w = 0;
2720                 w_h = 0;
2721
2722                 for (i=0; i<NumFiles; i++ ) {
2723                         int w, h, aw;
2724                         gr_get_string_size( &filenames[i*14], &w, &h, &aw );            
2725                         if ( w > w_w )
2726                                 w_w = w;
2727                 }
2728                 if ( title ) {
2729                         int w, h, aw;
2730                         gr_get_string_size( title, &w, &h, &aw );               
2731                         if ( w > w_w )
2732                                 w_w = w;
2733                         title_height = h + (grd_curfont->ft_h*2);               // add a little space at the bottom of the title
2734                 }
2735
2736                 box_w = w_w;
2737                 box_h = ((grd_curfont->ft_h + 2) * NumFiles_displayed);
2738
2739                 w_w += (grd_curfont->ft_w * 4);
2740                 w_h = title_height + box_h + (grd_curfont->ft_h * 2);           // more space at bottom
2741
2742                 if ( w_w > grd_curcanv->cv_w ) w_w = grd_curcanv->cv_w;
2743                 if ( w_h > grd_curcanv->cv_h ) w_h = grd_curcanv->cv_h;
2744         
2745                 w_x = (grd_curcanv->cv_w-w_w)/2;
2746                 w_y = (grd_curcanv->cv_h-w_h)/2;
2747         
2748                 if ( w_x < 0 ) w_x = 0;
2749                 if ( w_y < 0 ) w_y = 0;
2750
2751                 box_x = w_x + (grd_curfont->ft_w*2);                    // must be in sync with w_w!!!
2752                 box_y = w_y + title_height;
2753
2754 // save the screen behind the menu.
2755
2756                 bg.saved = NULL;
2757
2758         #if !defined(WINDOWS)
2759                 if ( (VR_offscreen_buffer->cv_w >= w_w) && (VR_offscreen_buffer->cv_h >= w_h) ) 
2760                         bg.background = &VR_offscreen_buffer->cv_bitmap;
2761                 else
2762         #endif
2763 #if defined(POLY_ACC)
2764                         bg.background = gr_create_bitmap2( w_w, w_h, grd_curcanv->cv_bitmap.bm_type, NULL );
2765 #else
2766                         bg.background = gr_create_bitmap( w_w, w_h );
2767 #endif
2768
2769                 Assert( bg.background != NULL );
2770
2771
2772                 WIN(DDGRLOCK(dd_grd_curcanv));
2773                 gr_bm_bitblt(w_w, w_h, 0, 0, w_x, w_y, &grd_curcanv->cv_bitmap, bg.background );
2774                 WIN(DDGRUNLOCK(dd_grd_curcanv));
2775
2776 #if 0
2777                 WINDOS(
2778                         dd_gr_blt_notrans(dd_grd_curcanv, 0, 0, 
2779                                 _DDModeList[W95DisplayMode].rw, _DDModeList[W95DisplayMode].rh, 
2780                                 dd_VR_offscreen_buffer, 0, 0, 
2781                                 _DDModeList[W95DisplayMode].rw, _DDModeList[W95DisplayMode].rh),
2782                         gr_bm_bitblt(grd_curcanv->cv_w, grd_curcanv->cv_h, 0, 0, 0, 0, &(grd_curcanv->cv_bitmap), &(VR_offscreen_buffer->cv_bitmap) )
2783                 );
2784 #endif
2785
2786                 nm_draw_background( w_x,w_y,w_x+w_w-1,w_y+w_h-1 );
2787                 
2788                 WIN(DDGRLOCK(dd_grd_curcanv))
2789                 {       
2790                         gr_string( 0x8000, w_y+10, title );
2791                 }
2792                 WIN(DDGRUNLOCK(dd_grd_curcanv));
2793
2794                 WIN(DDGRRESTORE);
2795          
2796                 initialized = 1;
2797         }
2798
2799         if ( !player_mode )     {
2800                 newmenu_file_sort( NumFiles, filenames );
2801         } else {
2802                 #if defined(MACINTOSH) && defined(APPLE_DEMO)
2803                 newmenu_file_sort( NumFiles, filenames );
2804                 #else
2805                 newmenu_file_sort( NumFiles-1, &filenames[14] );                // Don't sort first one!
2806                 #endif
2807                 for ( i=0; i<NumFiles; i++ )    {
2808                         if (!stricmp(Players[Player_num].callsign, &filenames[i*14]) )  {
2809 #ifdef NEWMENU_MOUSE
2810                                 dblclick_flag = 1;
2811 #endif
2812                                 citem = i;
2813                         }
2814                 }
2815         }
2816
2817 #ifdef NEWMENU_MOUSE
2818         mouse_state = omouse_state = 0;
2819         mouse2_state = omouse2_state = 0;
2820         draw_close_box(w_x,w_y);
2821         newmenu_show_cursor();
2822 #endif
2823
2824         while(!done)    {
2825         #ifdef WINDOWS
2826                 MSG msg;
2827
2828                 DoMessageStuff(&msg);
2829
2830                 if (_RedrawScreen) {
2831                         _RedrawScreen = FALSE;
2832
2833                         if ( bg.background != &VR_offscreen_buffer->cv_bitmap )
2834                                 gr_free_bitmap(bg.background);
2835         
2836                         win_redraw = 1;         
2837                         goto RePaintNewmenuFile;
2838                 }
2839
2840                 DDGRRESTORE
2841         #endif
2842
2843                 ocitem = citem;
2844                 ofirst_item = first_item;
2845                 gr_update();
2846
2847 #ifdef NEWMENU_MOUSE
2848                 omouse_state = mouse_state;
2849                 omouse2_state = mouse2_state;
2850                 mouse_state = mouse_button_state(0);
2851                 mouse2_state = mouse_button_state(1);
2852 #endif
2853
2854                 //see if redbook song needs to be restarted
2855                 songs_check_redbook_repeat();
2856
2857                 #ifdef WINDOWS
2858                 if (!mouse2_state && omouse2_state)
2859                         key = KEY_CTRLED+KEY_D;         //fake ctrl-d
2860                 else
2861                 #endif
2862                         //NOTE LINK TO ABOVE ELSE
2863                         key = key_inkey();
2864
2865         #ifdef WINDOWS
2866                 if (simukey==-1)
2867                         key=KEY_UP;
2868                 else if (simukey==1)
2869                    key=KEY_DOWN;
2870                 simukey=0;
2871         #endif
2872                         
2873                 switch(key)     {
2874                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_3:)
2875                 case KEY_PRINT_SCREEN:
2876                         MAC(newmenu_hide_cursor());
2877                         save_screen_shot(0);
2878                         PA_DFX (pa_set_frontbuffer_current());
2879                         PA_DFX (pa_set_front_to_read());
2880                         
2881                         MAC(newmenu_show_cursor());
2882                         MAC(key_flush());
2883                         break;
2884
2885                 case KEY_CTRLED+KEY_D:
2886                         #if defined(MACINTOSH) && defined(APPLE_DEMO)
2887                         break;
2888                         #endif
2889
2890                         if ( ((player_mode)&&(citem>0)) || ((demo_mode)&&(citem>=0)) )  {
2891                                 int x = 1;
2892                                 #ifdef WINDOWS
2893                                 mouse_set_mode(1);                              //re-enable centering mode
2894                                 #endif
2895                                 newmenu_hide_cursor();
2896                                 if (player_mode)
2897                                         x = nm_messagebox( NULL, 2, TXT_YES, TXT_NO, "%s %s?", TXT_DELETE_PILOT, &filenames[citem*14]+((player_mode && filenames[citem*14]=='$')?1:0) );
2898                                 else if (demo_mode)
2899                                         x = nm_messagebox( NULL, 2, TXT_YES, TXT_NO, "%s %s?", TXT_DELETE_DEMO, &filenames[citem*14]+((demo_mode && filenames[citem*14]=='$')?1:0) );
2900                                 #ifdef WINDOWS
2901                                 mouse_set_mode(0);                              //disenable centering mode
2902                                 #endif
2903                                 newmenu_show_cursor();
2904                                 if (x==0)       {
2905                                         char * p;
2906                                         int ret;
2907                                         char name[_MAX_PATH],dir[_MAX_DIR];
2908
2909                                         p = &filenames[(citem*14)+strlen(&filenames[citem*14])];
2910                                         if (player_mode)
2911                                                 *p = '.';
2912
2913                                         _splitpath(filespec,name,dir,NULL,NULL);
2914                                         strcat(name,dir);
2915                                         strcat(name,&filenames[citem*14]);
2916                                         
2917                                         #ifdef MACINTOSH
2918                                         {
2919                                                 int i;
2920                                                 char *p;
2921                                                 
2922                                                 if ( !strncmp(name, ".\\", 2) )
2923                                                         for (i = 0; i < strlen(name); i++)              // don't subtract 1 from strlen to get the EOS marker
2924                                                                 name[i] = name[i+1];
2925                                                 while ( (p = strchr(name, '\\')) )
2926                                                         *p = ':';
2927                                         }
2928                                         #endif
2929                                 
2930                                         ret = cfile_delete(name);
2931                                         if (player_mode)
2932                                                 *p = 0;
2933
2934                                         if ((!ret) && player_mode)      {
2935                                                 delete_player_saved_games( &filenames[citem*14] );
2936                                         }
2937
2938                                         if (ret) {
2939                                                 if (player_mode)
2940                                                         nm_messagebox( NULL, 1, TXT_OK, "%s %s %s", TXT_COULDNT, TXT_DELETE_PILOT, &filenames[citem*14]+((player_mode && filenames[citem*14]=='$')?1:0) );
2941                                                 else if (demo_mode)
2942                                                         nm_messagebox( NULL, 1, TXT_OK, "%s %s %s", TXT_COULDNT, TXT_DELETE_DEMO, &filenames[citem*14]+((demo_mode && filenames[citem*14]=='$')?1:0) );
2943                                         } else if (demo_mode)
2944                                                 demos_deleted = 1;
2945                                         first_item = -1;
2946                                         goto ReadFileNames;
2947                                 }
2948                         }
2949                         break;
2950                 case KEY_HOME:
2951                 case KEY_PAD7:
2952                         citem = 0;
2953                         break;
2954                 case KEY_END:
2955                 case KEY_PAD1:
2956                         citem = NumFiles-1;
2957                         break;
2958                 case KEY_UP:
2959                 case KEY_PAD8:
2960                         citem--;                        
2961                         break;
2962                 case KEY_DOWN:
2963                 case KEY_PAD2:
2964                         citem++;                        
2965                         break;
2966                 case KEY_PAGEDOWN:
2967                 case KEY_PAD3:
2968                         citem += NumFiles_displayed;
2969                         break;
2970                 case KEY_PAGEUP:
2971                 case KEY_PAD9:
2972                         citem -= NumFiles_displayed;
2973                         break;
2974                 case KEY_ESC:
2975                         if (allow_abort_flag) {
2976                                 citem = -1;
2977                                 done = 1;
2978                         }
2979                         break;
2980                 case KEY_ENTER:
2981                 case KEY_PADENTER:
2982                         done = 1;
2983                         break;
2984                         
2985                 #ifdef MACINTOSH
2986                 case KEY_COMMAND+KEY_Q: {
2987                         extern void macintosh_quit();
2988                         
2989                         if ( !(Game_mode & GM_MULTI) )
2990                                 macintosh_quit();
2991                         newmenu_show_cursor();
2992                         key_flush();
2993                         break;
2994                 }
2995                 #endif
2996                 
2997                 default:        
2998                         {
2999
3000                                 int ascii = key_to_ascii(key);
3001                                 if ( ascii < 255 )      {
3002                                         int cc,cc1;
3003                                         cc=cc1=citem+1;
3004                                         if (cc1 < 0 )  cc1 = 0;
3005                                         if (cc1 >= NumFiles )  cc1 = 0;
3006                                         while(1) {
3007                                                 if ( cc < 0 ) cc = 0;
3008                                                 if ( cc >= NumFiles ) cc = 0;
3009                                                 if ( citem == cc ) break;
3010         
3011                                                 if ( toupper(filenames[cc*14]) == toupper(ascii) )      {
3012                                                         citem = cc;
3013                                                         break;
3014                                                 }
3015                                                 cc++;
3016                                         }
3017                                 }
3018                         }
3019                 }
3020                 if ( done ) break;
3021
3022
3023                 if (citem<0)
3024                         citem=0;
3025
3026                 if (citem>=NumFiles)
3027                         citem = NumFiles-1;
3028
3029                 if (citem< first_item)
3030                         first_item = citem;
3031
3032                 if (citem>=( first_item+NumFiles_displayed))
3033                 {
3034                         first_item = citem-NumFiles_displayed+1;
3035                 }
3036
3037 #ifdef WINDOWS
3038                 if (NumFiles>first_item+NumFiles_displayed)
3039                         show_down_arrow=1;
3040                 else 
3041                         show_down_arrow=0;
3042                 if (first_item>0)
3043                         show_up_arrow=1;
3044                 else    
3045                         show_up_arrow=0;
3046 #endif
3047                         
3048
3049                 if (NumFiles <= NumFiles_displayed )
3050                          first_item = 0;
3051
3052                 if (first_item>NumFiles-NumFiles_displayed)
3053                 {
3054                         first_item = NumFiles-NumFiles_displayed;
3055                 }
3056
3057                 if (first_item < 0 ) first_item = 0;
3058
3059 #ifdef NEWMENU_MOUSE
3060                 WIN(Sleep(100));
3061                 if (mouse_state || mouse2_state) {
3062                         int w, h, aw;
3063
3064                         mouse_get_pos(&mx, &my);
3065                         for (i=first_item; i<first_item+NumFiles_displayed; i++ )       {
3066                                 gr_get_string_size(&filenames[i*14], &w, &h, &aw  );
3067                                 x1 = box_x;
3068                                 x2 = box_x + box_w - 1;
3069                                 y1 = (i-first_item)*(grd_curfont->ft_h + 2) + box_y;
3070                                 y2 = y1+h+1;
3071                                 if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
3072                                         if (i == citem && !mouse2_state) {
3073                                                 break;
3074                                         }
3075                                         citem = i;
3076                                         dblclick_flag = 0;
3077                                         break;
3078                                 }
3079                         }
3080                 }
3081                 
3082                 if (!mouse_state && omouse_state) {
3083                         int w, h, aw;
3084
3085                         gr_get_string_size(&filenames[citem*14], &w, &h, &aw  );
3086                         mouse_get_pos(&mx, &my);
3087                         x1 = box_x;
3088                         x2 = box_x + box_w - 1;
3089                         y1 = (citem-first_item)*(grd_curfont->ft_h + 2) + box_y;
3090                         y2 = y1+h+1;
3091                         if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
3092                                 if (dblclick_flag) done = 1;
3093                                 else dblclick_flag = 1;
3094                         }
3095                 }
3096
3097                 if ( !mouse_state && omouse_state ) {
3098                         mouse_get_pos(&mx, &my);
3099                         x1 = w_x + CLOSE_X + 2;
3100                         x2 = x1 + CLOSE_SIZE - 2;
3101                         y1 = w_y + CLOSE_Y + 2;
3102                         y2 = y1 + CLOSE_SIZE - 2;
3103                         if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
3104                                 citem = -1;
3105                                 done = 1;
3106                         }
3107                    #ifdef WINDOWS
3108                         x1 = box_x-LHX(10);
3109                         x2 = x1 + LHX(10);
3110                         y1 = box_y;
3111                         y2 = box_y+LHY(7);
3112                         if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && show_up_arrow ) 
3113                                 simukey = -1;
3114                         y1 = box_y+box_h-LHY(7);
3115                         y2 = box_y+box_h;
3116                         if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && show_down_arrow) 
3117                                 simukey = 1;
3118                    #endif
3119                 }
3120
3121 #endif
3122   
3123         WIN(DDGRLOCK(dd_grd_curcanv));
3124                 gr_setcolor( BM_XRGB(2,2,2));
3125                 //gr_rect( box_x - 1, box_y-2, box_x + box_w, box_y-2 );
3126                 gr_setcolor( BM_XRGB( 0,0,0)  );
3127
3128         #ifdef WINDOWS
3129                 if (ofirst_item != first_item || win_redraw)    {
3130                         win_redraw = 0;
3131         #else
3132                 if (ofirst_item != first_item)  {
3133         #endif
3134                         newmenu_hide_cursor();
3135                         gr_setcolor( BM_XRGB( 0,0,0)  );
3136                         for (i=first_item; i<first_item+NumFiles_displayed; i++ )       {
3137                                 int w, h, aw, y;
3138                                 y = (i-first_item)*(grd_curfont->ft_h + 2) + box_y;
3139                         
3140                                 if ( i >= NumFiles )    {
3141
3142                                         gr_setcolor( BM_XRGB(5,5,5));
3143                                         gr_rect( box_x + box_w, y-1, box_x + box_w, y + grd_curfont->ft_h + 1);
3144                                         //gr_rect( box_x, y + grd_curfont->ft_h + 2, box_x + box_w, y + grd_curfont->ft_h + 2);
3145                                         
3146                                         gr_setcolor( BM_XRGB(2,2,2));
3147                                         gr_rect( box_x - 1, y - 1, box_x - 1, y + grd_curfont->ft_h + 2 );
3148                                         
3149                                         gr_setcolor( BM_XRGB(0,0,0));
3150                                         gr_rect( box_x, y - 1, box_x + box_w - 1, y + grd_curfont->ft_h + 1);
3151                                         
3152                                 } else {
3153                                         if ( i == citem )       
3154                                                 grd_curcanv->cv_font = SELECTED_FONT;
3155                                         else    
3156                                                 grd_curcanv->cv_font = NORMAL_FONT;
3157                                         gr_get_string_size(&filenames[i*14], &w, &h, &aw  );
3158
3159                                         gr_setcolor( BM_XRGB(5,5,5));
3160                                   //    gr_rect( box_x, y + h + 2, box_x + box_w, y + h + 2);
3161                                         gr_rect( box_x + box_w, y - 1, box_x + box_w, y + h + 1);
3162                                         
3163                                         gr_setcolor( BM_XRGB(2,2,2));
3164                                         gr_rect( box_x - 1, y - 1, box_x - 1, y + h + 1);
3165                                         gr_setcolor( BM_XRGB(0,0,0));
3166                                                         
3167                                         gr_rect( box_x, y-1, box_x + box_w - 1, y + h + 1 );
3168                                         gr_string( box_x + 5, y, (&filenames[i*14])+((player_mode && filenames[i*14]=='$')?1:0)  );
3169                                 }
3170                         }        
3171                         newmenu_show_cursor();
3172                 } else if ( citem != ocitem )   {
3173                         int w, h, aw, y;
3174
3175                         newmenu_hide_cursor();
3176                         i = ocitem;
3177                         if ( (i>=0) && (i<NumFiles) )   {
3178                                 y = (i-first_item)*(grd_curfont->ft_h+2)+box_y;
3179                                 if ( i == citem )       
3180                                         grd_curcanv->cv_font = SELECTED_FONT;
3181                                 else    
3182                                         grd_curcanv->cv_font = NORMAL_FONT;
3183                                 gr_get_string_size(&filenames[i*14], &w, &h, &aw  );
3184                                 gr_rect( box_x, y-1, box_x + box_w - 1, y + h + 1 );
3185                                 gr_string( box_x + 5, y, (&filenames[i*14])+((player_mode && filenames[i*14]=='$')?1:0)  );
3186                         }
3187                         i = citem;
3188                         if ( (i>=0) && (i<NumFiles) )   {
3189                                 y = (i-first_item)*(grd_curfont->ft_h+2)+box_y;
3190                                 if ( i == citem )       
3191                                         grd_curcanv->cv_font = SELECTED_FONT;
3192                                 else    
3193                                         grd_curcanv->cv_font = NORMAL_FONT;
3194                                 gr_get_string_size(&filenames[i*14], &w, &h, &aw  );
3195                                 gr_rect( box_x, y-1, box_x + box_x - 1, y + h + 1 );
3196                                 gr_string( box_x + 5, y, (&filenames[i*14])+((player_mode && filenames[i*14]=='$')?1:0)  );
3197                         }
3198                         newmenu_show_cursor();
3199                 }
3200
3201         #ifdef WINDOWS   
3202                         grd_curcanv->cv_font = NORMAL_FONT;
3203                         if (show_up_arrow)
3204                                 gr_string( box_x-LHX(10), box_y ,UP_ARROW_MARKER );
3205                         else
3206                         {
3207                                 No_darkening=1;
3208                                 nm_draw_background (box_x-LHX(10),box_y,box_x-2,box_y+LHY(7));