1b8d27b414011d5c3db6cb14c731fbe9349c5a2a
[rocksndiamonds.git] / src / screens.c
1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back!               *
3 *----------------------------------------------------------*
4 * (c) 1995-2002 Artsoft Entertainment                      *
5 *               Holger Schemel                             *
6 *               Detmolder Strasse 189                      *
7 *               33604 Bielefeld                            *
8 *               Germany                                    *
9 *               e-mail: info@artsoft.org                   *
10 *----------------------------------------------------------*
11 * screens.c                                                *
12 ***********************************************************/
13
14 #include "libgame/libgame.h"
15
16 #include "screens.h"
17 #include "events.h"
18 #include "game.h"
19 #include "tools.h"
20 #include "editor.h"
21 #include "files.h"
22 #include "tape.h"
23 #include "cartoons.h"
24 #include "network.h"
25 #include "init.h"
26
27 /* screens in the setup menu */
28 #define SETUP_MODE_MAIN                 0
29 #define SETUP_MODE_GAME                 1
30 #define SETUP_MODE_EDITOR               2
31 #define SETUP_MODE_INPUT                3
32 #define SETUP_MODE_SHORTCUT             4
33 #define SETUP_MODE_GRAPHICS             5
34 #define SETUP_MODE_SOUND                6
35 #define SETUP_MODE_ARTWORK              7
36 #define SETUP_MODE_CHOOSE_GRAPHICS      8
37 #define SETUP_MODE_CHOOSE_SOUNDS        9
38 #define SETUP_MODE_CHOOSE_MUSIC         10
39
40 #define MAX_SETUP_MODES                 11
41
42 /* for input setup functions */
43 #define SETUPINPUT_SCREEN_POS_START     0
44 #define SETUPINPUT_SCREEN_POS_END       (SCR_FIELDY - 4)
45 #define SETUPINPUT_SCREEN_POS_EMPTY1    (SETUPINPUT_SCREEN_POS_START + 3)
46 #define SETUPINPUT_SCREEN_POS_EMPTY2    (SETUPINPUT_SCREEN_POS_END - 1)
47
48 /* for various menu stuff  */
49 #define MAX_MENU_ENTRIES_ON_SCREEN      (SCR_FIELDY - 2)
50 #define MENU_SCREEN_START_YPOS          2
51 #define MENU_SCREEN_VALUE_XPOS          14
52
53 /* buttons and scrollbars identifiers */
54 #define SCREEN_CTRL_ID_SCROLL_UP        0
55 #define SCREEN_CTRL_ID_SCROLL_DOWN      1
56 #define SCREEN_CTRL_ID_SCROLL_VERTICAL  2
57
58 #define NUM_SCREEN_SCROLLBUTTONS        2
59 #define NUM_SCREEN_SCROLLBARS           1
60 #define NUM_SCREEN_GADGETS              3
61
62 /* forward declarations of internal functions */
63 static void HandleScreenGadgets(struct GadgetInfo *);
64 static void HandleSetupScreen_Generic(int, int, int, int, int);
65 static void HandleSetupScreen_Input(int, int, int, int, int);
66 static void CustomizeKeyboard(int);
67 static void CalibrateJoystick(int);
68 static void execSetupArtwork(void);
69 static void HandleChooseTree(int, int, int, int, int, TreeInfo **);
70
71 static struct GadgetInfo *screen_gadget[NUM_SCREEN_GADGETS];
72 static int setup_mode = SETUP_MODE_MAIN;
73
74 #define mSX (SX + (game_status >= GAME_MODE_MAIN &&     \
75                    game_status <= GAME_MODE_SETUP ?     \
76                    menu.draw_xoffset[game_status] : menu.draw_xoffset_default))
77 #define mSY (SY + (game_status >= GAME_MODE_MAIN &&     \
78                    game_status <= GAME_MODE_SETUP ?     \
79                    menu.draw_yoffset[game_status] : menu.draw_yoffset_default))
80
81 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
82 #define NUM_SCROLLBAR_BITMAPS           2
83 static Bitmap *scrollbar_bitmap[NUM_SCROLLBAR_BITMAPS];
84 #endif
85
86
87 static void drawCursorExt(int xpos, int ypos, int color, int graphic)
88 {
89   static int cursor_array[SCR_FIELDY];
90
91   if (xpos == 0)
92   {
93     if (graphic != 0)
94       cursor_array[ypos] = graphic;
95     else
96       graphic = cursor_array[ypos];
97   }
98
99   if (color == FC_RED)
100     graphic = (graphic == IMG_MENU_BUTTON_LEFT  ? IMG_MENU_BUTTON_LEFT_ACTIVE :
101                graphic == IMG_MENU_BUTTON_RIGHT ? IMG_MENU_BUTTON_RIGHT_ACTIVE:
102                IMG_MENU_BUTTON_ACTIVE);
103
104   ypos += MENU_SCREEN_START_YPOS;
105
106   DrawBackground(mSX + xpos * TILEX, mSY + ypos * TILEY, TILEX, TILEY);
107   DrawGraphicThruMaskExt(drawto, mSX + xpos * TILEX, mSY + ypos * TILEY,
108                          graphic, 0);
109 }
110
111 static void initCursor(int ypos, int graphic)
112 {
113   drawCursorExt(0, ypos, FC_BLUE, graphic);
114 }
115
116 static void drawCursor(int ypos, int color)
117 {
118   drawCursorExt(0, ypos, color, 0);
119 }
120
121 static void drawCursorXY(int xpos, int ypos, int graphic)
122 {
123   drawCursorExt(xpos, ypos, -1, graphic);
124 }
125
126 static void PlaySound_Menu_Start(int sound)
127 {
128   if (sound_info[sound].loop)
129     PlaySoundLoop(sound);
130   else
131     PlaySound(sound);
132 }
133
134 static void PlaySound_Menu_Continue(int sound)
135 {
136   if (sound_info[sound].loop)
137     PlaySoundLoop(sound);
138 }
139
140 void DrawHeadline()
141 {
142   int font1_width = getFontWidth(FONT_TITLE_1);
143   int font2_width = getFontWidth(FONT_TITLE_2);
144   int x1 = SX + (SXSIZE - strlen(PROGRAM_TITLE_STRING)   * font1_width) / 2;
145   int x2 = SX + (SXSIZE - strlen(WINDOW_SUBTITLE_STRING) * font2_width) / 2;
146
147   DrawText(x1, SY + 8,  PROGRAM_TITLE_STRING,   FONT_TITLE_1);
148   DrawText(x2, SY + 46, WINDOW_SUBTITLE_STRING, FONT_TITLE_2);
149 }
150
151 static void ToggleFullscreenIfNeeded()
152 {
153   if (setup.fullscreen != video.fullscreen_enabled)
154   {
155     /* save old door content */
156     BlitBitmap(backbuffer, bitmap_db_door,
157                DX, DY, DXSIZE, DYSIZE, DOOR_GFX_PAGEX1, DOOR_GFX_PAGEY1);
158
159     /* toggle fullscreen */
160     ChangeVideoModeIfNeeded(setup.fullscreen);
161     setup.fullscreen = video.fullscreen_enabled;
162
163     /* redraw background to newly created backbuffer */
164     BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, backbuffer,
165                0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
166
167     /* restore old door content */
168     BlitBitmap(bitmap_db_door, backbuffer,
169                DOOR_GFX_PAGEX1, DOOR_GFX_PAGEY1, DXSIZE, DYSIZE, DX, DY);
170
171     redraw_mask = REDRAW_ALL;
172   }
173 }
174
175 void DrawMainMenu()
176 {
177   static LevelDirTree *leveldir_last_valid = NULL;
178   char *name_text = (!options.network && setup.team_mode ? "Team:" : "Name:");
179   int font_width = getFontWidth(FONT_MENU_1);
180   int name_width = font_width * strlen("Name:");
181   int level_width = font_width * strlen("Level:");
182   int i;
183
184   UnmapAllGadgets();
185   FadeSounds();
186
187   KeyboardAutoRepeatOn();
188   ActivateJoystick();
189
190   SetDrawDeactivationMask(REDRAW_NONE);
191   SetDrawBackgroundMask(REDRAW_FIELD);
192
193   audio.sound_deactivated = FALSE;
194
195   /* needed if last screen was the playing screen, invoked from level editor */
196   if (level_editor_test_game)
197   {
198     game_status = GAME_MODE_EDITOR;
199     DrawLevelEd();
200     return;
201   }
202
203   /* needed if last screen was the editor screen */
204   UndrawSpecialEditorDoor();
205
206   /* needed if last screen was the setup screen and fullscreen state changed */
207   ToggleFullscreenIfNeeded();
208
209   /* needed if last screen (level choice) changed graphics, sounds or music */
210   ReloadCustomArtwork();
211
212 #ifdef TARGET_SDL
213   SetDrawtoField(DRAW_BACKBUFFER);
214 #endif
215
216   /* map gadgets for main menu screen */
217   MapTapeButtons();
218
219   /* leveldir_current may be invalid (level group, parent link) */
220   if (!validLevelSeries(leveldir_current))
221     leveldir_current = getFirstValidTreeInfoEntry(leveldir_last_valid);
222
223   /* store valid level series information */
224   leveldir_last_valid = leveldir_current;
225
226   /* level_nr may have been set to value over handicap with level editor */
227   if (setup.handicap && level_nr > leveldir_current->handicap_level)
228     level_nr = leveldir_current->handicap_level;
229
230   GetPlayerConfig();
231   LoadLevel(level_nr);
232
233   SetMainBackgroundImage(IMG_BACKGROUND_MAIN);
234   ClearWindow();
235
236   DrawHeadline();
237
238   DrawText(mSX + 32, mSY + 2*32, name_text, FONT_MENU_1);
239   DrawText(mSX + 32, mSY + 3*32, "Level:", FONT_MENU_1);
240   DrawText(mSX + 32, mSY + 4*32, "Hall Of Fame", FONT_MENU_1);
241   DrawText(mSX + 32, mSY + 5*32, "Level Creator", FONT_MENU_1);
242   DrawText(mSX + 32, mSY + 6*32, "Info Screen", FONT_MENU_1);
243   DrawText(mSX + 32, mSY + 7*32, "Start Game", FONT_MENU_1);
244   DrawText(mSX + 32, mSY + 8*32, "Setup", FONT_MENU_1);
245   DrawText(mSX + 32, mSY + 9*32, "Quit", FONT_MENU_1);
246
247   DrawText(mSX + 32 + name_width, mSY + 2*32, setup.player_name, FONT_INPUT_1);
248   DrawText(mSX + level_width + 5 * 32, mSY + 3*32, int2str(level_nr,3),
249            FONT_VALUE_1);
250
251   DrawMicroLevel(MICROLEV_XPOS, MICROLEV_YPOS, TRUE);
252
253   DrawTextF(mSX + 32 + level_width - 2, mSY + 3*32 + 1, FONT_TEXT_3, "%d-%d",
254             leveldir_current->first_level, leveldir_current->last_level);
255
256   if (leveldir_current->readonly)
257   {
258     DrawTextF(mSX + level_width + 9 * 32 - 2,
259               mSY + 3 * 32 + 1 - 7, FONT_TEXT_3, "READ");
260     DrawTextF(mSX + level_width + 9 * 32 - 2,
261               mSY + 3 * 32 + 1 + 7, FONT_TEXT_3, "ONLY");
262   }
263
264   for(i=0; i<8; i++)
265     initCursor(i, (i == 1 || i == 6 ? IMG_MENU_BUTTON_RIGHT :IMG_MENU_BUTTON));
266
267   drawCursorXY(level_width/32 + 4, 1, IMG_MENU_BUTTON_LEFT);
268   drawCursorXY(level_width/32 + 8, 1, IMG_MENU_BUTTON_RIGHT);
269
270   DrawText(SX + 56, SY + 326, "A Game by Artsoft Entertainment", FONT_TITLE_2);
271
272   FadeToFront();
273   InitAnimation();
274   HandleMainMenu(0,0, 0,0, MB_MENU_INITIALIZE);
275
276   TapeStop();
277   if (TAPE_IS_EMPTY(tape))
278     LoadTape(level_nr);
279   DrawCompleteVideoDisplay();
280
281   OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2);
282
283 #if 0
284   ClearEventQueue();
285 #endif
286 }
287
288 static void gotoTopLevelDir()
289 {
290   /* move upwards to top level directory */
291   while (leveldir_current->node_parent)
292   {
293     /* write a "path" into level tree for easy navigation to last level */
294     if (leveldir_current->node_parent->node_group->cl_first == -1)
295     {
296       int num_leveldirs = numTreeInfoInGroup(leveldir_current);
297       int leveldir_pos = posTreeInfo(leveldir_current);
298       int num_page_entries;
299       int cl_first, cl_cursor;
300
301       if (num_leveldirs <= MAX_MENU_ENTRIES_ON_SCREEN)
302         num_page_entries = num_leveldirs;
303       else
304         num_page_entries = MAX_MENU_ENTRIES_ON_SCREEN - 1;
305
306       cl_first = MAX(0, leveldir_pos - num_page_entries + 1);
307       cl_cursor = leveldir_pos - cl_first;
308
309       leveldir_current->node_parent->node_group->cl_first = cl_first;
310       leveldir_current->node_parent->node_group->cl_cursor = cl_cursor;
311     }
312
313     leveldir_current = leveldir_current->node_parent;
314   }
315 }
316
317 void HandleMainMenu(int mx, int my, int dx, int dy, int button)
318 {
319   static int choice = 0;
320   int x = 0;
321   int y = choice;
322
323   if (button == MB_MENU_INITIALIZE)
324   {
325     drawCursor(choice, FC_RED);
326     return;
327   }
328
329   if (mx || my)         /* mouse input */
330   {
331     x = (mx - mSX) / 32;
332     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
333   }
334   else if (dx || dy)    /* keyboard input */
335   {
336     if (dx && choice == 1)
337       x = (dx < 0 ? 10 : 14);
338     else if (dy)
339       y = choice + dy;
340   }
341
342   if (y == 1 && ((x == 10 && level_nr > leveldir_current->first_level) ||
343                  (x == 14 && level_nr < leveldir_current->last_level)) &&
344       button)
345   {
346     static unsigned long level_delay = 0;
347     int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
348     int new_level_nr, old_level_nr = level_nr;
349
350     new_level_nr = level_nr + (x == 10 ? -step : +step);
351     if (new_level_nr < leveldir_current->first_level)
352       new_level_nr = leveldir_current->first_level;
353     if (new_level_nr > leveldir_current->last_level)
354       new_level_nr = leveldir_current->last_level;
355
356     if (setup.handicap && new_level_nr > leveldir_current->handicap_level)
357       new_level_nr = leveldir_current->handicap_level;
358
359     if (old_level_nr == new_level_nr ||
360         !DelayReached(&level_delay, GADGET_FRAME_DELAY))
361       goto out;
362
363     level_nr = new_level_nr;
364
365     DrawText(mSX + 11 * 32, mSY + 3 * 32, int2str(level_nr, 3), FONT_VALUE_1);
366
367     LoadLevel(level_nr);
368     DrawMicroLevel(MICROLEV_XPOS, MICROLEV_YPOS, TRUE);
369
370     TapeErase();
371     LoadTape(level_nr);
372     DrawCompleteVideoDisplay();
373
374     /* needed because DrawMicroLevel() takes some time */
375     BackToFront();
376     SyncDisplay();
377     DelayReached(&level_delay, 0);      /* reset delay counter */
378   }
379   else if (x == 0 && y >= 0 && y <= 7)
380   {
381     if (button)
382     {
383       if (y != choice)
384       {
385         drawCursor(y, FC_RED);
386         drawCursor(choice, FC_BLUE);
387         choice = y;
388       }
389     }
390     else
391     {
392       if (y == 0)
393       {
394         game_status = GAME_MODE_PSEUDO_TYPENAME;
395         HandleTypeName(strlen(setup.player_name), 0);
396       }
397       else if (y == 1)
398       {
399         if (leveldir_first)
400         {
401           game_status = GAME_MODE_LEVELS;
402           SaveLevelSetup_LastSeries();
403           SaveLevelSetup_SeriesInfo();
404
405           gotoTopLevelDir();
406
407           DrawChooseLevel();
408         }
409       }
410       else if (y == 2)
411       {
412         game_status = GAME_MODE_SCORES;
413         DrawHallOfFame(-1);
414       }
415       else if (y == 3)
416       {
417         if (leveldir_current->readonly &&
418             strcmp(setup.player_name, "Artsoft") != 0)
419           Request("This level is read only !", REQ_CONFIRM);
420         game_status = GAME_MODE_EDITOR;
421         DrawLevelEd();
422       }
423       else if (y == 4)
424       {
425         game_status = GAME_MODE_INFO;
426         DrawHelpScreen();
427       }
428       else if (y == 5)
429       {
430         if (setup.autorecord)
431           TapeStartRecording();
432
433 #if defined(PLATFORM_UNIX)
434         if (options.network)
435           SendToServer_StartPlaying();
436         else
437 #endif
438         {
439           game_status = GAME_MODE_PLAYING;
440           StopAnimation();
441           InitGame();
442         }
443       }
444       else if (y == 6)
445       {
446         game_status = GAME_MODE_SETUP;
447         setup_mode = SETUP_MODE_MAIN;
448         DrawSetupScreen();
449       }
450       else if (y == 7)
451       {
452         SaveLevelSetup_LastSeries();
453         SaveLevelSetup_SeriesInfo();
454         if (Request("Do you really want to quit ?", REQ_ASK | REQ_STAY_CLOSED))
455           game_status = GAME_MODE_QUIT;
456       }
457     }
458   }
459
460   BackToFront();
461
462   out:
463
464   if (game_status == GAME_MODE_MAIN)
465   {
466     DrawMicroLevel(MICROLEV_XPOS, MICROLEV_YPOS, FALSE);
467     DoAnimation();
468   }
469 }
470
471
472 #define MAX_HELPSCREEN_ELS      10
473 #define HA_NEXT                 -999
474 #define HA_END                  -1000
475
476 static long helpscreen_state;
477 static int helpscreen_step[MAX_HELPSCREEN_ELS];
478 static int helpscreen_frame[MAX_HELPSCREEN_ELS];
479
480 static int helpscreen_action[] =
481 {
482   IMG_PLAYER_1_MOVING_DOWN,             16,
483   IMG_PLAYER_1_MOVING_UP,               16,
484   IMG_PLAYER_1_MOVING_LEFT,             16,
485   IMG_PLAYER_1_MOVING_RIGHT,            16,
486   IMG_PLAYER_1_PUSHING_LEFT,            16,
487   IMG_PLAYER_1_PUSHING_RIGHT,           16,                     HA_NEXT,
488
489   IMG_SAND,                             -1,                     HA_NEXT,
490
491   IMG_EMPTY_SPACE,                      -1,                     HA_NEXT,
492
493   IMG_QUICKSAND_EMPTY,                  -1,                     HA_NEXT,
494
495   IMG_STEELWALL,                        -1,                     HA_NEXT,
496
497   IMG_WALL,                             -1,                     HA_NEXT,
498
499   IMG_EXPANDABLE_WALL_GROWING_LEFT,     20,
500   IMG_WALL,                             50,
501   IMG_EMPTY_SPACE,                      20,
502   IMG_EXPANDABLE_WALL_GROWING_RIGHT,    20,
503   IMG_WALL,                             50,
504   IMG_EMPTY_SPACE,                      20,
505   IMG_EXPANDABLE_WALL_GROWING_UP,       20,
506   IMG_WALL,                             50,
507   IMG_EMPTY_SPACE,                      20,
508   IMG_EXPANDABLE_WALL_GROWING_DOWN,     20,
509   IMG_WALL,                             50,
510   IMG_EMPTY_SPACE,                      20,                     HA_NEXT,
511
512   IMG_INVISIBLE_WALL,                   -1,                     HA_NEXT,
513
514   IMG_WALL_CRUMBLED,                    -1,                     HA_NEXT,
515
516   IMG_FONT_GAME_INFO,                   -1,                     HA_NEXT,
517
518   IMG_EMERALD,                          -1,                     HA_NEXT,
519
520   IMG_DIAMOND,                          -1,                     HA_NEXT,
521
522   IMG_BD_DIAMOND,                       -1,                     HA_NEXT,
523
524   IMG_EMERALD_YELLOW,                   50,
525   IMG_EMERALD_RED,                      50,
526   IMG_EMERALD_PURPLE,                   50,                     HA_NEXT,
527
528   IMG_BD_ROCK,                          -1,                     HA_NEXT,
529
530   IMG_BOMB,                             100,
531   IMG_EXPLOSION,                        16,
532   IMG_EMPTY_SPACE,                      10,                     HA_NEXT,
533
534   IMG_NUT,                              100,
535   IMG_NUT_BREAKING,                     6,
536   IMG_EMERALD,                          20,                     HA_NEXT,
537
538   IMG_WALL_EMERALD,                     100,
539   IMG_EXPLOSION,                        16,
540   IMG_EMERALD,                          20,                     HA_NEXT,
541
542   IMG_WALL_DIAMOND,                     100,
543   IMG_EXPLOSION,                        16,
544   IMG_DIAMOND,                          20,                     HA_NEXT,
545
546   IMG_WALL_BD_DIAMOND,                  100,
547   IMG_EXPLOSION,                        16,
548   IMG_BD_DIAMOND,                       20,                     HA_NEXT,
549
550   IMG_WALL_EMERALD_YELLOW,              100,
551   IMG_EXPLOSION,                        16,
552   IMG_EMERALD_YELLOW,                   20,
553   IMG_WALL_EMERALD_RED,                 100,
554   IMG_EXPLOSION,                        16,
555   IMG_EMERALD_RED,                      20,
556   IMG_WALL_EMERALD_PURPLE,              100,
557   IMG_EXPLOSION,                        16,
558   IMG_EMERALD_PURPLE,                   20,                     HA_NEXT,
559
560   IMG_ACID,                             -1,                     HA_NEXT,
561
562   IMG_KEY_1,                            50,
563   IMG_KEY_2,                            50,
564   IMG_KEY_3,                            50,
565   IMG_KEY_4,                            50,                     HA_NEXT,
566
567   IMG_GATE_1,                           50,
568   IMG_GATE_2,                           50,
569   IMG_GATE_3,                           50,
570   IMG_GATE_4,                           50,                     HA_NEXT,
571
572   IMG_GATE_1_GRAY,                      50,
573   IMG_GATE_2_GRAY,                      50,
574   IMG_GATE_3_GRAY,                      50,
575   IMG_GATE_4_GRAY,                      50,                     HA_NEXT,
576
577   IMG_DYNAMITE,                         -1,                     HA_NEXT,
578
579   IMG_DYNAMITE_ACTIVE,                  96,
580   IMG_EXPLOSION,                        16,
581   IMG_EMPTY_SPACE,                      20,                     HA_NEXT,
582
583   IMG_DYNABOMB_ACTIVE,                  100,
584   IMG_EXPLOSION,                        16,
585   IMG_EMPTY_SPACE,                      20,                     HA_NEXT,
586
587   IMG_DYNABOMB_INCREASE_NUMBER,         -1,                     HA_NEXT,
588
589   IMG_DYNABOMB_INCREASE_SIZE,           -1,                     HA_NEXT,
590
591   IMG_DYNABOMB_INCREASE_POWER,          -1,                     HA_NEXT,
592
593   IMG_SPACESHIP_RIGHT,                  16,
594   IMG_SPACESHIP_UP,                     16,
595   IMG_SPACESHIP_LEFT,                   16,
596   IMG_SPACESHIP_DOWN,                   16,                     HA_NEXT,
597
598   IMG_BUG_RIGHT,                        16,
599   IMG_BUG_UP,                           16,
600   IMG_BUG_LEFT,                         16,
601   IMG_BUG_DOWN,                         16,                     HA_NEXT,
602
603   IMG_BD_BUTTERFLY,                     -1,                     HA_NEXT,
604
605   IMG_BD_FIREFLY,                       -1,                     HA_NEXT,
606
607   IMG_PACMAN_RIGHT,                     16,
608   IMG_PACMAN_UP,                        16,
609   IMG_PACMAN_LEFT,                      16,
610   IMG_PACMAN_DOWN,                      16,                     HA_NEXT,
611
612   IMG_YAMYAM,                           -1,                     HA_NEXT,
613
614   IMG_DARK_YAMYAM,                      -1,                     HA_NEXT,
615
616   IMG_ROBOT,                            -1,                     HA_NEXT,
617
618   IMG_MOLE_MOVING_RIGHT,                16,
619   IMG_MOLE_MOVING_UP,                   16,
620   IMG_MOLE_MOVING_LEFT,                 16,
621   IMG_MOLE_MOVING_DOWN,                 16,                     HA_NEXT,
622
623   IMG_PENGUIN_MOVING_RIGHT,             16,
624   IMG_PENGUIN_MOVING_UP,                16,
625   IMG_PENGUIN_MOVING_LEFT,              16,
626   IMG_PENGUIN_MOVING_DOWN,              16,                     HA_NEXT,
627
628   IMG_PIG_MOVING_RIGHT,                 16,
629   IMG_PIG_MOVING_UP,                    16,
630   IMG_PIG_MOVING_LEFT,                  16,
631   IMG_PIG_MOVING_DOWN,                  16,                     HA_NEXT,
632
633   IMG_DRAGON_MOVING_RIGHT,              16,
634   IMG_DRAGON_MOVING_UP,                 16,
635   IMG_DRAGON_MOVING_LEFT,               16,
636   IMG_DRAGON_MOVING_DOWN,               16,                     HA_NEXT,
637
638   IMG_SATELLITE,                        -1,                     HA_NEXT,
639
640   IMG_ROBOT_WHEEL,                      50,
641   IMG_ROBOT_WHEEL_ACTIVE,               100,                    HA_NEXT,
642
643   IMG_LAMP,                             50,
644   IMG_LAMP_ACTIVE,                      50,                     HA_NEXT,
645
646   IMG_TIME_ORB_FULL,                    50,
647   IMG_TIME_ORB_EMPTY,                   50,                     HA_NEXT,
648
649   IMG_AMOEBA_DROP,                      50,
650   IMG_AMOEBA_GROWING,                   6,
651   IMG_AMOEBA_WET,                       20,                     HA_NEXT,
652
653   IMG_AMOEBA_DEAD,                      -1,                     HA_NEXT,
654
655   IMG_AMOEBA_WET,                       -1,                     HA_NEXT,
656
657   IMG_AMOEBA_WET,                       100,
658   IMG_AMOEBA_GROWING,                   6,                      HA_NEXT,
659
660   IMG_AMOEBA_FULL,                      50,
661   IMG_AMOEBA_DEAD,                      50,
662   IMG_EXPLOSION,                        16,
663   IMG_DIAMOND,                          20,                     HA_NEXT,
664
665   IMG_GAME_OF_LIFE,                     -1,                     HA_NEXT,
666
667   IMG_BIOMAZE,                          -1,                     HA_NEXT,
668
669   IMG_MAGIC_WALL_ACTIVE,                -1,                     HA_NEXT,
670
671   IMG_BD_MAGIC_WALL_ACTIVE,             -1,                     HA_NEXT,
672
673   IMG_EXIT_CLOSED,                      200,
674   IMG_EXIT_OPENING,                     16,
675   IMG_EXIT_OPEN,                        100,                    HA_NEXT,
676
677   IMG_EXIT_OPEN,                        -1,                     HA_NEXT,
678
679   IMG_SOKOBAN_OBJECT,                   -1,                     HA_NEXT,
680
681   IMG_SOKOBAN_FIELD_EMPTY,              -1,                     HA_NEXT,
682
683   IMG_SOKOBAN_FIELD_FULL,               -1,                     HA_NEXT,
684
685   IMG_SPEED_PILL,                       -1,                     HA_NEXT,
686
687   HA_END
688 };
689 static char *helpscreen_eltext[][2] =
690 {
691  {"THE HERO:",                          "(Is _this_ guy good old Rockford?)"},
692  {"Normal sand:",                       "You can dig through it"},
693  {"Empty field:",                       "You can walk through it"},
694  {"Quicksand: You cannot pass it,",     "but rocks can fall through it"},
695  {"Massive Wall:",                      "Nothing can go through it"},
696  {"Normal Wall: You can't go through",  "it, but you can bomb it away"},
697  {"Growing Wall: Grows in several di-", "rections if there is an empty field"},
698  {"Invisible Wall: Behaves like normal","wall, but is invisible"},
699  {"Old Wall: Like normal wall, but",    "some things can fall down from it"},
700  {"Letter Wall: Looks like a letter,",  "behaves like a normal wall"},
701  {"Emerald: You must collect enough of","them to finish a level"},
702  {"Diamond: Counts as 3 emeralds, but", "can be destroyed by rocks"},
703  {"Diamond (BD style): Counts like one","emerald and behaves a bit different"},
704  {"Colorful Gems:",                     "Seem to behave like Emeralds"},
705  {"Rock: Smashes several things;",      "Can be moved by the player"},
706  {"Bomb: You can move it, but be",      "careful when dropping it"},
707  {"Nut: Throw a rock on it to open it;","Each nut contains an emerald"},
708  {"Wall with an emerald inside:",       "Bomb the wall away to get it"},
709  {"Wall with a diamond inside:",        "Bomb the wall away to get it"},
710  {"Wall with BD style diamond inside:", "Bomb the wall away to get it"},
711  {"Wall with colorful gem inside:",     "Bomb the wall away to get it"},
712  {"Acid: Things that fall in are gone", "forever (including our hero)"},
713  {"Key: Opens the door that has the",   "same color (red/yellow/green/blue)"},
714  {"Door: Can be opened by the key",     "with the same color"},
715  {"Door: You have to find out the",     "right color of the key for it"},
716  {"Dynamite: Collect it and use it to", "destroy walls or kill enemies"},
717  {"Dynamite: This one explodes after",  "a few seconds"},
718  {"Dyna Bomb: Explodes in 4 directions","with variable explosion size"},
719  {"Dyna Bomb: Increases the number of", "dyna bombs available at a time"},
720  {"Dyna Bomb: Increases the size of",   "explosion of dyna bombs"},
721  {"Dyna Bomb: Increases the power of",  "explosion of dyna bombs"},
722  {"Spaceship: Moves at the left side",  "of walls; don't touch it!"},
723  {"Bug: Moves at the right side",       "of walls; don't touch it!"},
724  {"Butterfly: Moves at the right side", "of walls; don't touch it!"},
725  {"Firefly: Moves at the left side",    "of walls; don't touch it!"},
726  {"Pacman: Eats the amoeba and you,",   "if you're not careful"},
727  {"Cruncher: Eats diamonds and you,",   "if you're not careful"},
728  {"Cruncher (BD style):",               "Eats almost everything"},
729  {"Robot: Tries to kill the player",    ""},
730  {"The mole: Eats the amoeba and turns","empty space into normal sand"},
731  {"The penguin: Guide him to the exit,","but keep him away from monsters!"},
732  {"The Pig: Harmless, but eats all",    "gems it can get"},
733  {"The Dragon: Breathes fire,",         "especially to some monsters"},
734  {"Sonde: Follows you everywhere;",     "harmless, but may block your way"},
735  {"Magic Wheel: Touch it to get rid of","the robots for some seconds"},
736  {"Light Bulb: All of them must be",    "switched on to finish a level"},
737  {"Extra Time Orb: Adds some seconds",  "to the time available for the level"},
738  {"Amoeba Drop: Grows to an amoeba on", "the ground - don't touch it"},
739  {"Dead Amoeba: Does not grow, but",    "can still kill bugs and spaceships"},
740  {"Normal Amoeba: Grows through empty", "fields, sand and quicksand"},
741  {"Dropping Amoeba: This one makes",    "drops that grow to a new amoeba"},
742  {"Living Amoeba (BD style): Contains", "other element, when surrounded"},
743  {"Game Of Life: Behaves like the well","known 'Game Of Life' (2333 style)"},
744  {"Biomaze: A bit like the 'Game Of",   "Life', but builds crazy mazes"},
745  {"Magic Wall: Changes rocks, emeralds","and diamonds when they pass it"},
746  {"Magic Wall (BD style):",             "Changes rocks and BD style diamonds"},
747  {"Exit door: Opens if you have enough","emeralds to finish the level"},
748  {"Open exit door: Enter here to leave","the level and exit the actual game"},
749  {"Sokoban element: Object which must", "be pushed to an empty field"},
750  {"Sokoban element: Empty field where", "a Sokoban object can be placed on"},
751  {"Sokoban element: Field with object", "which can be pushed away"},
752  {"Speed pill: Lets the player run",    "twice as fast as normally"},
753 };
754 static int num_helpscreen_els = sizeof(helpscreen_eltext) / (2*sizeof(char *));
755
756 static char *helpscreen_music[][3] =
757 {
758   { "Alchemy",                  "Ian Boddy",            "Drive" },
759   { "The Chase",                "Propaganda",           "A Secret Wish" },
760   { "Network 23",               "Tangerine Dream",      "Exit" },
761   { "Czardasz",                 "Robert Pieculewicz",   "Czardasz" },
762   { "21st Century Common Man",  "Tangerine Dream",      "Tyger" },
763   { "Voyager",                  "The Alan Parsons Project","Pyramid" },
764   { "Twilight Painter",         "Tangerine Dream",      "Heartbreakers" }
765 };
766 static int num_helpscreen_music = 7;
767 static int helpscreen_musicpos;
768
769 #if 0
770 void OLD_DrawHelpScreenElAction(int start)
771 {
772   int i = 0, j = 0;
773   int frame, graphic;
774   int xstart = SX+16, ystart = SY+64+2*32, ystep = TILEY+4;
775
776   while(helpscreen_action[j] != HA_END)
777   {
778     if (i>=start+MAX_HELPSCREEN_ELS || i>=num_helpscreen_els)
779       break;
780     else if (i<start || helpscreen_delay[i-start])
781     {
782       if (i>=start && helpscreen_delay[i-start])
783         helpscreen_delay[i-start]--;
784
785       while(helpscreen_action[j] != HA_NEXT)
786         j++;
787       j++;
788       i++;
789       continue;
790     }
791
792     j += 3*helpscreen_step[i-start];
793     graphic = helpscreen_action[j++];
794
795     if (helpscreen_frame[i-start])
796     {
797       frame = helpscreen_action[j++] - helpscreen_frame[i-start];
798       helpscreen_frame[i-start]--;
799     }
800     else
801     {
802       frame = 0;
803       helpscreen_frame[i-start] = helpscreen_action[j++]-1;
804     }
805
806     helpscreen_delay[i-start] = helpscreen_action[j++] - 1;
807
808     if (helpscreen_action[j] == HA_NEXT)
809     {
810       if (!helpscreen_frame[i-start])
811         helpscreen_step[i-start] = 0;
812     }
813     else
814     {
815       if (!helpscreen_frame[i-start])
816         helpscreen_step[i-start]++;
817       while(helpscreen_action[j] != HA_NEXT)
818         j++;
819     }
820     j++;
821
822     DrawOldGraphicExt(drawto, xstart, ystart+(i-start)*ystep, graphic+frame);
823     i++;
824   }
825
826   for(i=2;i<16;i++)
827   {
828     MarkTileDirty(0,i);
829     MarkTileDirty(1,i);
830   }
831 }
832 #endif
833
834 void DrawHelpScreenElAction(int start)
835 {
836   int i = 0, j = 0;
837   int xstart = mSX + 16;
838   int ystart = mSY + 64 + 2 * 32;
839   int ystep = TILEY + 4;
840   int graphic;
841   int frame_count;
842   int sync_frame;
843   int frame;
844
845   while (helpscreen_action[j] != HA_END)
846   {
847     if (i >= start + MAX_HELPSCREEN_ELS || i >= num_helpscreen_els)
848       break;
849     else if (i < start)
850     {
851       while (helpscreen_action[j] != HA_NEXT)
852         j++;
853
854       j++;
855       i++;
856
857       continue;
858     }
859
860     j += 2 * helpscreen_step[i-start];
861     graphic = helpscreen_action[j++];
862     frame_count = helpscreen_action[j++];
863     if (frame_count == -1)
864       frame_count = 1000000;
865
866     if (helpscreen_frame[i-start] == 0)
867     {
868       sync_frame = 0;
869       helpscreen_frame[i-start] = frame_count - 1;
870     }
871     else
872     {
873       sync_frame = frame_count - helpscreen_frame[i-start];
874       helpscreen_frame[i-start]--;
875     }
876
877     if (helpscreen_action[j] == HA_NEXT)
878     {
879       if (!helpscreen_frame[i-start])
880         helpscreen_step[i-start] = 0;
881     }
882     else
883     {
884       if (!helpscreen_frame[i-start])
885         helpscreen_step[i-start]++;
886       while(helpscreen_action[j] != HA_NEXT)
887         j++;
888     }
889     j++;
890
891     frame = getGraphicAnimationFrame(graphic, sync_frame);
892
893     DrawGraphicExt(drawto, xstart, ystart + (i-start) * ystep,
894                    graphic, frame);
895
896     i++;
897   }
898
899   for(i=2; i<16; i++)
900   {
901     MarkTileDirty(0, i);
902     MarkTileDirty(1, i);
903   }
904
905   FrameCounter++;
906 }
907
908 void DrawHelpScreenElText(int start)
909 {
910   int i;
911   int xstart = mSX + 56, ystart = mSY + 65 + 2 * 32, ystep = TILEY + 4;
912   int ybottom = SYSIZE - 20;
913
914   SetMainBackgroundImage(IMG_BACKGROUND_INFO);
915   ClearWindow();
916   DrawHeadline();
917
918   DrawTextFCentered(100, FONT_TEXT_1, "The game elements:");
919
920   for(i=start; i < start + MAX_HELPSCREEN_ELS && i < num_helpscreen_els; i++)
921   {
922     DrawText(xstart,
923              ystart + (i - start) * ystep + (*helpscreen_eltext[i][1] ? 0 : 8),
924              helpscreen_eltext[i][0], FONT_TEXT_2);
925     DrawText(xstart, ystart + (i - start) * ystep + 16,
926              helpscreen_eltext[i][1], FONT_TEXT_2);
927   }
928
929   DrawTextFCentered(ybottom, FONT_TEXT_4,
930                     "Press any key or button for next page");
931 }
932
933 void DrawHelpScreenMusicText(int num)
934 {
935   int ystart = 150, ystep = 30;
936   int ybottom = SYSIZE - 20;
937
938   FadeSounds();
939   ClearWindow();
940   DrawHeadline();
941
942   DrawTextFCentered(100, FONT_TEXT_1, "The game background music loops:");
943
944   DrawTextFCentered(ystart + 0 * ystep, FONT_TEXT_2, "Excerpt from");
945   DrawTextFCentered(ystart + 1 * ystep, FONT_TEXT_3,
946                     "\"%s\"", helpscreen_music[num][0]);
947   DrawTextFCentered(ystart + 2 * ystep, FONT_TEXT_2, "by");
948   DrawTextFCentered(ystart + 3 * ystep, FONT_TEXT_3,
949                     "%s", helpscreen_music[num][1]);
950   DrawTextFCentered(ystart + 4 * ystep, FONT_TEXT_2, "from the album");
951   DrawTextFCentered(ystart + 5 * ystep, FONT_TEXT_3,
952                     "\"%s\"", helpscreen_music[num][2]);
953
954   DrawTextFCentered(ybottom, FONT_TEXT_4,
955                     "Press any key or button for next page");
956
957 #if 0
958   PlaySoundLoop(background_loop[num]);
959 #endif
960 }
961
962 void DrawHelpScreenCreditsText()
963 {
964   int ystart = 150, ystep = 30;
965   int ybottom = SYSIZE - 20;
966
967   FadeSounds();
968   ClearWindow();
969   DrawHeadline();
970
971   DrawTextFCentered(100, FONT_TEXT_1, "Credits:");
972   DrawTextFCentered(ystart + 0 * ystep, FONT_TEXT_2, "DOS port of the game:");
973   DrawTextFCentered(ystart + 1 * ystep, FONT_TEXT_3, "Guido Schulz");
974   DrawTextFCentered(ystart + 2 * ystep, FONT_TEXT_2, "Additional toons:");
975   DrawTextFCentered(ystart + 3 * ystep, FONT_TEXT_3, "Karl Hörnell");
976   DrawTextFCentered(ystart + 5 * ystep, FONT_TEXT_2,
977                     "...and many thanks to all contributors");
978   DrawTextFCentered(ystart + 6 * ystep, FONT_TEXT_2, "of new levels!");
979
980   DrawTextFCentered(ybottom, FONT_TEXT_4,
981                     "Press any key or button for next page");
982 }
983
984 void DrawHelpScreenContactText()
985 {
986   int ystart = 150, ystep = 30;
987   int ybottom = SYSIZE - 20;
988
989   ClearWindow();
990   DrawHeadline();
991
992   DrawTextFCentered(100, FONT_TEXT_1, "Program information:");
993
994   DrawTextFCentered(ystart + 0 * ystep, FONT_TEXT_2,
995                     "This game is Freeware!");
996   DrawTextFCentered(ystart + 1 * ystep, FONT_TEXT_2,
997                     "If you like it, send e-mail to:");
998   DrawTextFCentered(ystart + 2 * ystep, FONT_TEXT_3,
999                     "info@artsoft.org");
1000   DrawTextFCentered(ystart + 3 * ystep, FONT_TEXT_2,
1001                     "or SnailMail to:");
1002   DrawTextFCentered(ystart + 4 * ystep + 0, FONT_TEXT_3,
1003                     "Holger Schemel");
1004   DrawTextFCentered(ystart + 4 * ystep + 20, FONT_TEXT_3,
1005                     "Detmolder Strasse 189");
1006   DrawTextFCentered(ystart + 4 * ystep + 40, FONT_TEXT_3,
1007                     "33604 Bielefeld");
1008   DrawTextFCentered(ystart + 4 * ystep + 60, FONT_TEXT_3,
1009                     "Germany");
1010
1011   DrawTextFCentered(ystart + 7 * ystep, FONT_TEXT_2,
1012                     "If you have created new levels,");
1013   DrawTextFCentered(ystart + 8 * ystep, FONT_TEXT_2,
1014                     "send them to me to include them!");
1015   DrawTextFCentered(ystart + 9 * ystep, FONT_TEXT_2,
1016                     ":-)");
1017
1018   DrawTextFCentered(ybottom, FONT_TEXT_4,
1019                     "Press any key or button for main menu");
1020 }
1021
1022 void DrawHelpScreen()
1023 {
1024   int i;
1025
1026   UnmapAllGadgets();
1027   CloseDoor(DOOR_CLOSE_2);
1028
1029   for(i=0;i<MAX_HELPSCREEN_ELS;i++)
1030     helpscreen_step[i] = helpscreen_frame[i] = 0;
1031   helpscreen_musicpos = 0;
1032   helpscreen_state = 0;
1033
1034   DrawHelpScreenElText(0);
1035   DrawHelpScreenElAction(0);
1036
1037   FadeToFront();
1038   InitAnimation();
1039
1040 #if 0
1041   PlaySoundLoop(SND_BACKGROUND_INFO);
1042 #else
1043   PlaySound_Menu_Start(SND_BACKGROUND_INFO);
1044 #endif
1045 }
1046
1047 void HandleHelpScreen(int button)
1048 {
1049   static unsigned long hs_delay = 0;
1050   int num_helpscreen_els_pages =
1051     (num_helpscreen_els + MAX_HELPSCREEN_ELS-1) / MAX_HELPSCREEN_ELS;
1052   int button_released = !button;
1053   int i;
1054
1055   if (button_released)
1056   {
1057     if (helpscreen_state < num_helpscreen_els_pages - 1)
1058     {
1059       for(i=0;i<MAX_HELPSCREEN_ELS;i++)
1060         helpscreen_step[i] = helpscreen_frame[i] = 0;
1061       helpscreen_state++;
1062
1063       FrameCounter = 0;
1064       DrawHelpScreenElText(helpscreen_state * MAX_HELPSCREEN_ELS);
1065       DrawHelpScreenElAction(helpscreen_state * MAX_HELPSCREEN_ELS);
1066     }
1067     else if (helpscreen_state <
1068              num_helpscreen_els_pages + num_helpscreen_music - 1)
1069     {
1070       helpscreen_state++;
1071       DrawHelpScreenMusicText(helpscreen_state - num_helpscreen_els_pages);
1072     }
1073     else if (helpscreen_state ==
1074              num_helpscreen_els_pages + num_helpscreen_music - 1)
1075     {
1076       helpscreen_state++;
1077       DrawHelpScreenCreditsText();
1078     }
1079     else if (helpscreen_state ==
1080              num_helpscreen_els_pages + num_helpscreen_music)
1081     {
1082       helpscreen_state++;
1083       DrawHelpScreenContactText();
1084     }
1085     else
1086     {
1087       FadeSounds();
1088
1089       game_status = GAME_MODE_MAIN;
1090       DrawMainMenu();
1091     }
1092   }
1093   else
1094   {
1095     if (DelayReached(&hs_delay, GAME_FRAME_DELAY))
1096     {
1097       if (helpscreen_state < num_helpscreen_els_pages)
1098         DrawHelpScreenElAction(helpscreen_state * MAX_HELPSCREEN_ELS);
1099     }
1100
1101     /* !!! workaround for playing "music" that is really a sound loop (and
1102        must therefore periodically be reactivated with the current sound
1103        engine !!! */
1104 #if 0
1105     PlaySoundLoop(SND_BACKGROUND_INFO);
1106 #else
1107     PlaySound_Menu_Continue(SND_BACKGROUND_INFO);
1108 #endif
1109
1110     DoAnimation();
1111   }
1112
1113   BackToFront();
1114 }
1115
1116 void HandleTypeName(int newxpos, Key key)
1117 {
1118   static int xpos = 0, ypos = 2;
1119   int font_width = getFontWidth(FONT_INPUT_1_ACTIVE);
1120   int name_width = getFontWidth(FONT_MENU_1) * strlen("Name:");
1121   int startx = mSX + 32 + name_width;
1122   int starty = mSY + ypos * 32;
1123
1124   if (newxpos)
1125   {
1126     xpos = newxpos;
1127
1128     DrawText(startx, starty, setup.player_name, FONT_INPUT_1_ACTIVE);
1129     DrawText(startx + xpos * font_width, starty, "_", FONT_INPUT_1_ACTIVE);
1130
1131     return;
1132   }
1133
1134   if (((key >= KSYM_A && key <= KSYM_Z) ||
1135        (key >= KSYM_a && key <= KSYM_z)) && 
1136       xpos < MAX_PLAYER_NAME_LEN)
1137   {
1138     char ascii;
1139
1140     if (key >= KSYM_A && key <= KSYM_Z)
1141       ascii = 'A' + (char)(key - KSYM_A);
1142     else
1143       ascii = 'a' + (char)(key - KSYM_a);
1144
1145     setup.player_name[xpos] = ascii;
1146     setup.player_name[xpos + 1] = 0;
1147     xpos++;
1148
1149     DrawText(startx, starty, setup.player_name, FONT_INPUT_1_ACTIVE);
1150     DrawText(startx + xpos * font_width, starty, "_", FONT_INPUT_1_ACTIVE);
1151   }
1152   else if ((key == KSYM_Delete || key == KSYM_BackSpace) && xpos > 0)
1153   {
1154     xpos--;
1155     setup.player_name[xpos] = 0;
1156
1157     DrawText(startx + xpos * font_width, starty, "_ ", FONT_INPUT_1_ACTIVE);
1158   }
1159   else if (key == KSYM_Return && xpos > 0)
1160   {
1161     DrawText(startx, starty, setup.player_name, FONT_INPUT_1);
1162     DrawText(startx + xpos * font_width, starty, " ", FONT_INPUT_1_ACTIVE);
1163
1164     SaveSetup();
1165     game_status = GAME_MODE_MAIN;
1166   }
1167
1168   BackToFront();
1169 }
1170
1171 static void DrawChooseTree(TreeInfo **ti_ptr)
1172 {
1173   UnmapAllGadgets();
1174   CloseDoor(DOOR_CLOSE_2);
1175
1176   ClearWindow();
1177
1178   HandleChooseTree(0,0, 0,0, MB_MENU_INITIALIZE, ti_ptr);
1179   MapChooseTreeGadgets(*ti_ptr);
1180
1181   FadeToFront();
1182   InitAnimation();
1183 }
1184
1185 static void AdjustChooseTreeScrollbar(int id, int first_entry, TreeInfo *ti)
1186 {
1187   struct GadgetInfo *gi = screen_gadget[id];
1188   int items_max, items_visible, item_position;
1189
1190   items_max = numTreeInfoInGroup(ti);
1191   items_visible = MAX_MENU_ENTRIES_ON_SCREEN - 1;
1192   item_position = first_entry;
1193
1194   if (item_position > items_max - items_visible)
1195     item_position = items_max - items_visible;
1196
1197   ModifyGadget(gi, GDI_SCROLLBAR_ITEMS_MAX, items_max,
1198                GDI_SCROLLBAR_ITEM_POSITION, item_position, GDI_END);
1199 }
1200
1201 static void drawChooseTreeList(int first_entry, int num_page_entries,
1202                                TreeInfo *ti)
1203 {
1204   int i;
1205   char buffer[SCR_FIELDX * 2];
1206   int max_buffer_len = (SCR_FIELDX - 2) * 2;
1207   int num_entries = numTreeInfoInGroup(ti);
1208   char *title_string = NULL;
1209   int xoffset_setup = 16;
1210   int yoffset_setup = 0;
1211   int xoffset = (ti->type == TREE_TYPE_LEVEL_DIR ? 0 : xoffset_setup);
1212   int yoffset = (ti->type == TREE_TYPE_LEVEL_DIR ? 0 : yoffset_setup);
1213   int last_game_status = game_status;   /* save current game status */
1214
1215   DrawBackground(SX, SY, SXSIZE - 32, SYSIZE);
1216   redraw_mask |= REDRAW_FIELD;
1217
1218   title_string =
1219     (ti->type == TREE_TYPE_LEVEL_DIR ? "Level Directories" :
1220      ti->type == TREE_TYPE_GRAPHICS_DIR ? "Custom Graphics" :
1221      ti->type == TREE_TYPE_SOUNDS_DIR ? "Custom Sounds" :
1222      ti->type == TREE_TYPE_MUSIC_DIR ? "Custom Music" : "");
1223
1224   DrawText(SX + xoffset, SY + yoffset, title_string, FONT_TITLE_1);
1225
1226   /* force LEVELS font on artwork setup screen */
1227   game_status = GAME_MODE_LEVELS;
1228
1229   for(i=0; i<num_page_entries; i++)
1230   {
1231     TreeInfo *node, *node_first;
1232     int entry_pos = first_entry + i;
1233     int ypos = MENU_SCREEN_START_YPOS + i;
1234
1235     node_first = getTreeInfoFirstGroupEntry(ti);
1236     node = getTreeInfoFromPos(node_first, entry_pos);
1237
1238     strncpy(buffer, node->name , max_buffer_len);
1239     buffer[max_buffer_len] = '\0';
1240
1241     DrawText(mSX + 32, mSY + ypos * 32, buffer, FONT_TEXT_1 + node->color);
1242
1243     if (node->parent_link)
1244       initCursor(i, IMG_MENU_BUTTON_LEFT);
1245     else if (node->level_group)
1246       initCursor(i, IMG_MENU_BUTTON_RIGHT);
1247     else
1248       initCursor(i, IMG_MENU_BUTTON);
1249   }
1250
1251   if (first_entry > 0)
1252   {
1253     int ypos = 1;
1254
1255     DrawBackground(mSX, mSY + ypos * TILEY, TILEX, TILEY);
1256     DrawGraphicThruMaskExt(drawto, mSX, mSY + ypos * TILEY,
1257                            IMG_MENU_BUTTON_UP, 0);
1258   }
1259
1260   if (first_entry + num_page_entries < num_entries)
1261   {
1262     int ypos = MAX_MENU_ENTRIES_ON_SCREEN + 1;
1263
1264     DrawBackground(mSX, mSY + ypos * TILEY, TILEX, TILEY);
1265     DrawGraphicThruMaskExt(drawto, mSX, mSY + ypos * TILEY,
1266                            IMG_MENU_BUTTON_DOWN, 0);
1267   }
1268
1269   game_status = last_game_status;       /* restore current game status */
1270 }
1271
1272 static void drawChooseTreeInfo(int entry_pos, TreeInfo *ti)
1273 {
1274   TreeInfo *node, *node_first;
1275   int x, last_redraw_mask = redraw_mask;
1276
1277   if (ti->type != TREE_TYPE_LEVEL_DIR)
1278     return;
1279
1280   node_first = getTreeInfoFirstGroupEntry(ti);
1281   node = getTreeInfoFromPos(node_first, entry_pos);
1282
1283   DrawBackground(SX + 32, SY + 32, SXSIZE - 64, 32);
1284
1285   if (node->parent_link)
1286     DrawTextFCentered(40, FONT_TITLE_2, "leave group \"%s\"",
1287                       node->class_desc);
1288   else if (node->level_group)
1289     DrawTextFCentered(40, FONT_TITLE_2, "enter group \"%s\"",
1290                       node->class_desc);
1291   else if (ti->type == TREE_TYPE_LEVEL_DIR)
1292     DrawTextFCentered(40, FONT_TITLE_2, "%3d levels (%s)",
1293                       node->levels, node->class_desc);
1294
1295   /* let BackToFront() redraw only what is needed */
1296   redraw_mask = last_redraw_mask | REDRAW_TILES;
1297   for (x=0; x<SCR_FIELDX; x++)
1298     MarkTileDirty(x, 1);
1299 }
1300
1301 static void HandleChooseTree(int mx, int my, int dx, int dy, int button,
1302                              TreeInfo **ti_ptr)
1303 {
1304   static unsigned long choose_delay = 0;
1305   TreeInfo *ti = *ti_ptr;
1306   int x = 0;
1307   int y = ti->cl_cursor;
1308   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
1309   int num_entries = numTreeInfoInGroup(ti);
1310   int num_page_entries;
1311
1312   if (num_entries <= MAX_MENU_ENTRIES_ON_SCREEN)
1313     num_page_entries = num_entries;
1314   else
1315     num_page_entries = MAX_MENU_ENTRIES_ON_SCREEN - 1;
1316
1317   if (button == MB_MENU_INITIALIZE)
1318   {
1319     int entry_pos = posTreeInfo(ti);
1320
1321     if (ti->cl_first == -1)
1322     {
1323       ti->cl_first = MAX(0, entry_pos - num_page_entries + 1);
1324       ti->cl_cursor =
1325         entry_pos - ti->cl_first;
1326     }
1327
1328     if (dx == 999)      /* first entry is set by scrollbar position */
1329       ti->cl_first = dy;
1330     else
1331       AdjustChooseTreeScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
1332                                 ti->cl_first, ti);
1333
1334     drawChooseTreeList(ti->cl_first, num_page_entries, ti);
1335     drawChooseTreeInfo(ti->cl_first + ti->cl_cursor, ti);
1336     drawCursor(ti->cl_cursor, FC_RED);
1337     return;
1338   }
1339   else if (button == MB_MENU_LEAVE)
1340   {
1341     if (ti->node_parent)
1342     {
1343       *ti_ptr = ti->node_parent;
1344       DrawChooseTree(ti_ptr);
1345     }
1346     else if (game_status == GAME_MODE_SETUP)
1347     {
1348       execSetupArtwork();
1349     }
1350     else
1351     {
1352       game_status = GAME_MODE_MAIN;
1353       DrawMainMenu();
1354     }
1355
1356     return;
1357   }
1358
1359   if (mx || my)         /* mouse input */
1360   {
1361     x = (mx - mSX) / 32;
1362     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
1363   }
1364   else if (dx || dy)    /* keyboard input */
1365   {
1366     if (dy)
1367       y = ti->cl_cursor + dy;
1368
1369     if (ABS(dy) == SCR_FIELDY)  /* handle KSYM_Page_Up, KSYM_Page_Down */
1370     {
1371       dy = SIGN(dy);
1372       step = num_page_entries - 1;
1373       y = (dy < 0 ? -1 : num_page_entries);
1374     }
1375   }
1376
1377   if (x == 0 && y == -1)
1378   {
1379     if (ti->cl_first > 0 &&
1380         (dy || DelayReached(&choose_delay, GADGET_FRAME_DELAY)))
1381     {
1382       ti->cl_first -= step;
1383       if (ti->cl_first < 0)
1384         ti->cl_first = 0;
1385
1386       drawChooseTreeList(ti->cl_first, num_page_entries, ti);
1387       drawChooseTreeInfo(ti->cl_first + ti->cl_cursor, ti);
1388       drawCursor(ti->cl_cursor, FC_RED);
1389       AdjustChooseTreeScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
1390                                 ti->cl_first, ti);
1391       return;
1392     }
1393   }
1394   else if (x == 0 && y > num_page_entries - 1)
1395   {
1396     if (ti->cl_first + num_page_entries < num_entries &&
1397         (dy || DelayReached(&choose_delay, GADGET_FRAME_DELAY)))
1398     {
1399       ti->cl_first += step;
1400       if (ti->cl_first + num_page_entries > num_entries)
1401         ti->cl_first = MAX(0, num_entries - num_page_entries);
1402
1403       drawChooseTreeList(ti->cl_first, num_page_entries, ti);
1404       drawChooseTreeInfo(ti->cl_first + ti->cl_cursor, ti);
1405       drawCursor(ti->cl_cursor, FC_RED);
1406       AdjustChooseTreeScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
1407                                 ti->cl_first, ti);
1408       return;
1409     }
1410   }
1411
1412   if (dx == 1)
1413   {
1414     TreeInfo *node_first, *node_cursor;
1415     int entry_pos = ti->cl_first + y;
1416
1417     node_first = getTreeInfoFirstGroupEntry(ti);
1418     node_cursor = getTreeInfoFromPos(node_first, entry_pos);
1419
1420     if (node_cursor->node_group)
1421     {
1422       node_cursor->cl_first = ti->cl_first;
1423       node_cursor->cl_cursor = ti->cl_cursor;
1424       *ti_ptr = node_cursor->node_group;
1425       DrawChooseTree(ti_ptr);
1426       return;
1427     }
1428   }
1429   else if (dx == -1 && ti->node_parent)
1430   {
1431     *ti_ptr = ti->node_parent;
1432     DrawChooseTree(ti_ptr);
1433     return;
1434   }
1435
1436   if (x == 0 && y >= 0 && y < num_page_entries)
1437   {
1438     if (button)
1439     {
1440       if (y != ti->cl_cursor)
1441       {
1442         drawCursor(y, FC_RED);
1443         drawCursor(ti->cl_cursor, FC_BLUE);
1444         drawChooseTreeInfo(ti->cl_first + y, ti);
1445         ti->cl_cursor = y;
1446       }
1447     }
1448     else
1449     {
1450       TreeInfo *node_first, *node_cursor;
1451       int entry_pos = ti->cl_first + y;
1452
1453       node_first = getTreeInfoFirstGroupEntry(ti);
1454       node_cursor = getTreeInfoFromPos(node_first, entry_pos);
1455
1456       if (node_cursor->node_group)
1457       {
1458         node_cursor->cl_first = ti->cl_first;
1459         node_cursor->cl_cursor = ti->cl_cursor;
1460         *ti_ptr = node_cursor->node_group;
1461         DrawChooseTree(ti_ptr);
1462       }
1463       else if (node_cursor->parent_link)
1464       {
1465         *ti_ptr = node_cursor->node_parent;
1466         DrawChooseTree(ti_ptr);
1467       }
1468       else
1469       {
1470         node_cursor->cl_first = ti->cl_first;
1471         node_cursor->cl_cursor = ti->cl_cursor;
1472         *ti_ptr = node_cursor;
1473
1474         if (ti->type == TREE_TYPE_LEVEL_DIR)
1475         {
1476           LoadLevelSetup_SeriesInfo();
1477
1478           SaveLevelSetup_LastSeries();
1479           SaveLevelSetup_SeriesInfo();
1480           TapeErase();
1481         }
1482
1483         if (game_status == GAME_MODE_SETUP)
1484         {
1485           execSetupArtwork();
1486         }
1487         else
1488         {
1489           game_status = GAME_MODE_MAIN;
1490           DrawMainMenu();
1491         }
1492       }
1493     }
1494   }
1495
1496   BackToFront();
1497
1498   if (game_status == GAME_MODE_LEVELS || game_status == GAME_MODE_SETUP)
1499     DoAnimation();
1500 }
1501
1502 void DrawChooseLevel()
1503 {
1504   SetMainBackgroundImage(IMG_BACKGROUND_LEVELS);
1505
1506   DrawChooseTree(&leveldir_current);
1507 }
1508
1509 void HandleChooseLevel(int mx, int my, int dx, int dy, int button)
1510 {
1511   HandleChooseTree(mx, my, dx, dy, button, &leveldir_current);
1512 }
1513
1514 void DrawHallOfFame(int highlight_position)
1515 {
1516   UnmapAllGadgets();
1517   FadeSounds();
1518   CloseDoor(DOOR_CLOSE_2);
1519
1520   if (highlight_position < 0) 
1521     LoadScore(level_nr);
1522
1523   FadeToFront();
1524   InitAnimation();
1525
1526   HandleHallOfFame(highlight_position,0, 0,0, MB_MENU_INITIALIZE);
1527
1528 #if 0
1529   PlaySound(SND_BACKGROUND_SCORES);
1530 #else
1531   PlaySound_Menu_Start(SND_BACKGROUND_SCORES);
1532 #endif
1533 }
1534
1535 static void drawHallOfFameList(int first_entry, int highlight_position)
1536 {
1537   int i;
1538
1539   SetMainBackgroundImage(IMG_BACKGROUND_SCORES);
1540   ClearWindow();
1541
1542   DrawText(mSX + 80, mSY + 8, "Hall Of Fame", FONT_TITLE_1);
1543   DrawTextFCentered(46, FONT_TITLE_2, "HighScores of Level %d", level_nr);
1544
1545   for(i=0; i<MAX_MENU_ENTRIES_ON_SCREEN; i++)
1546   {
1547     int entry = first_entry + i;
1548     boolean active = (entry == highlight_position);
1549     int font_nr1 = (active ? FONT_TEXT_1_ACTIVE : FONT_TEXT_1);
1550     int font_nr2 = (active ? FONT_TEXT_2_ACTIVE : FONT_TEXT_2);
1551     int font_nr3 = (active ? FONT_TEXT_3_ACTIVE : FONT_TEXT_3);
1552     int font_nr4 = (active ? FONT_TEXT_4_ACTIVE : FONT_TEXT_4);
1553     int dx1 = 3 * getFontWidth(font_nr1);
1554     int dx2 = dx1 + getFontWidth(font_nr1);
1555     int dx3 = dx2 + 25 * getFontWidth(font_nr3);
1556     int sy = mSY + 64 + i * 32;
1557
1558     DrawText(mSX, sy, int2str(entry + 1, 3), font_nr1);
1559     DrawText(mSX + dx1, sy, ".", font_nr1);
1560     DrawText(mSX + dx2, sy, ".........................", font_nr3);
1561     if (strcmp(highscore[entry].Name, EMPTY_PLAYER_NAME) != 0)
1562       DrawText(mSX + dx2, sy, highscore[entry].Name, font_nr2);
1563     DrawText(mSX + dx3, sy, int2str(highscore[entry].Score, 5), font_nr4);
1564   }
1565 }
1566
1567 void HandleHallOfFame(int mx, int my, int dx, int dy, int button)
1568 {
1569   static int first_entry = 0;
1570   static int highlight_position = 0;
1571   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
1572   int button_released = !button;
1573
1574   if (button == MB_MENU_INITIALIZE)
1575   {
1576     first_entry = 0;
1577     highlight_position = mx;
1578     drawHallOfFameList(first_entry, highlight_position);
1579     return;
1580   }
1581
1582   if (ABS(dy) == SCR_FIELDY)    /* handle KSYM_Page_Up, KSYM_Page_Down */
1583     step = MAX_MENU_ENTRIES_ON_SCREEN - 1;
1584
1585   if (dy < 0)
1586   {
1587     if (first_entry > 0)
1588     {
1589       first_entry -= step;
1590       if (first_entry < 0)
1591         first_entry = 0;
1592
1593       drawHallOfFameList(first_entry, highlight_position);
1594       return;
1595     }
1596   }
1597   else if (dy > 0)
1598   {
1599     if (first_entry + MAX_MENU_ENTRIES_ON_SCREEN < MAX_SCORE_ENTRIES)
1600     {
1601       first_entry += step;
1602       if (first_entry + MAX_MENU_ENTRIES_ON_SCREEN > MAX_SCORE_ENTRIES)
1603         first_entry = MAX(0, MAX_SCORE_ENTRIES - MAX_MENU_ENTRIES_ON_SCREEN);
1604
1605       drawHallOfFameList(first_entry, highlight_position);
1606       return;
1607     }
1608   }
1609
1610   if (button_released)
1611   {
1612     FadeSound(SND_BACKGROUND_SCORES);
1613     game_status = GAME_MODE_MAIN;
1614     DrawMainMenu();
1615   }
1616
1617   BackToFront();
1618
1619   if (game_status == GAME_MODE_SCORES)
1620   {
1621     DoAnimation();
1622 #if 1
1623     PlaySound_Menu_Continue(SND_BACKGROUND_SCORES);
1624 #endif
1625   }
1626 }
1627
1628
1629 /* ========================================================================= */
1630 /* setup screen functions                                                    */
1631 /* ========================================================================= */
1632
1633 static struct TokenInfo *setup_info;
1634 static int num_setup_info;
1635
1636 static char *graphics_set_name;
1637 static char *sounds_set_name;
1638 static char *music_set_name;
1639
1640 static void execSetupMain()
1641 {
1642   setup_mode = SETUP_MODE_MAIN;
1643   DrawSetupScreen();
1644 }
1645
1646 static void execSetupGame()
1647 {
1648   setup_mode = SETUP_MODE_GAME;
1649   DrawSetupScreen();
1650 }
1651
1652 static void execSetupEditor()
1653 {
1654   setup_mode = SETUP_MODE_EDITOR;
1655   DrawSetupScreen();
1656 }
1657
1658 static void execSetupGraphics()
1659 {
1660   setup_mode = SETUP_MODE_GRAPHICS;
1661   DrawSetupScreen();
1662 }
1663
1664 static void execSetupSound()
1665 {
1666   setup_mode = SETUP_MODE_SOUND;
1667   DrawSetupScreen();
1668 }
1669
1670 static void execSetupArtwork()
1671 {
1672   /* needed if last screen (setup choice) changed graphics, sounds or music */
1673   ReloadCustomArtwork();
1674
1675   setup.graphics_set = artwork.gfx_current->identifier;
1676   setup.sounds_set = artwork.snd_current->identifier;
1677   setup.music_set = artwork.mus_current->identifier;
1678
1679   /* needed for displaying artwork name instead of artwork identifier */
1680   graphics_set_name = artwork.gfx_current->name;
1681   sounds_set_name = artwork.snd_current->name;
1682   music_set_name = artwork.mus_current->name;
1683
1684   setup_mode = SETUP_MODE_ARTWORK;
1685   DrawSetupScreen();
1686 }
1687
1688 static void execSetupChooseGraphics()
1689 {
1690   setup_mode = SETUP_MODE_CHOOSE_GRAPHICS;
1691   DrawSetupScreen();
1692 }
1693
1694 static void execSetupChooseSounds()
1695 {
1696   setup_mode = SETUP_MODE_CHOOSE_SOUNDS;
1697   DrawSetupScreen();
1698 }
1699
1700 static void execSetupChooseMusic()
1701 {
1702   setup_mode = SETUP_MODE_CHOOSE_MUSIC;
1703   DrawSetupScreen();
1704 }
1705
1706 static void execSetupInput()
1707 {
1708   setup_mode = SETUP_MODE_INPUT;
1709   DrawSetupScreen();
1710 }
1711
1712 static void execSetupShortcut()
1713 {
1714   setup_mode = SETUP_MODE_SHORTCUT;
1715   DrawSetupScreen();
1716 }
1717
1718 static void execExitSetup()
1719 {
1720   game_status = GAME_MODE_MAIN;
1721   DrawMainMenu();
1722 }
1723
1724 static void execSaveAndExitSetup()
1725 {
1726   SaveSetup();
1727   execExitSetup();
1728 }
1729
1730 static struct TokenInfo setup_info_main[] =
1731 {
1732   { TYPE_ENTER_MENU,    execSetupGame,          "Game Settings"         },
1733   { TYPE_ENTER_MENU,    execSetupEditor,        "Editor Settings"       },
1734   { TYPE_ENTER_MENU,    execSetupGraphics,      "Graphics"              },
1735   { TYPE_ENTER_MENU,    execSetupSound,         "Sound & Music"         },
1736   { TYPE_ENTER_MENU,    execSetupArtwork,       "Custom Artwork"        },
1737   { TYPE_ENTER_MENU,    execSetupInput,         "Input Devices"         },
1738   { TYPE_ENTER_MENU,    execSetupShortcut,      "Key Shortcuts"         },
1739   { TYPE_EMPTY,         NULL,                   ""                      },
1740   { TYPE_LEAVE_MENU,    execExitSetup,          "Exit"                  },
1741   { TYPE_LEAVE_MENU,    execSaveAndExitSetup,   "Save and Exit"         },
1742   { 0,                  NULL,                   NULL                    }
1743 };
1744
1745 static struct TokenInfo setup_info_game[] =
1746 {
1747   { TYPE_SWITCH,        &setup.team_mode,       "Team-Mode:"            },
1748   { TYPE_SWITCH,        &setup.handicap,        "Handicap:"             },
1749   { TYPE_SWITCH,        &setup.time_limit,      "Timelimit:"            },
1750   { TYPE_SWITCH,        &setup.autorecord,      "Auto-Record:"          },
1751   { TYPE_EMPTY,         NULL,                   ""                      },
1752   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1753   { 0,                  NULL,                   NULL                    }
1754 };
1755
1756 static struct TokenInfo setup_info_editor[] =
1757 {
1758   { TYPE_STRING,        NULL,                   "Offer Special Elements:"},
1759   { TYPE_SWITCH,        &setup.editor.el_boulderdash,   "BoulderDash:"  },
1760   { TYPE_SWITCH,        &setup.editor.el_emerald_mine,  "Emerald Mine:" },
1761   { TYPE_SWITCH,        &setup.editor.el_more,          "More:"         },
1762   { TYPE_SWITCH,        &setup.editor.el_sokoban,       "Sokoban:"      },
1763   { TYPE_SWITCH,        &setup.editor.el_supaplex,      "Supaplex:"     },
1764   { TYPE_SWITCH,        &setup.editor.el_diamond_caves, "Diamd. Caves:" },
1765   { TYPE_SWITCH,        &setup.editor.el_dx_boulderdash,"DX Boulderd.:" },
1766   { TYPE_SWITCH,        &setup.editor.el_chars,         "Characters:"   },
1767   { TYPE_SWITCH,        &setup.editor.el_custom,        "Custom:"       },
1768   { TYPE_EMPTY,         NULL,                   ""                      },
1769   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1770   { 0,                  NULL,                   NULL                    }
1771 };
1772
1773 static struct TokenInfo setup_info_graphics[] =
1774 {
1775   { TYPE_SWITCH,        &setup.fullscreen,      "Fullscreen:"           },
1776   { TYPE_SWITCH,        &setup.scroll_delay,    "Scroll Delay:"         },
1777   { TYPE_SWITCH,        &setup.soft_scrolling,  "Soft Scroll.:"         },
1778 #if 0
1779   { TYPE_SWITCH,        &setup.double_buffering,"Buffered gfx:"         },
1780   { TYPE_SWITCH,        &setup.fading,          "Fading:"               },
1781 #endif
1782   { TYPE_SWITCH,        &setup.quick_doors,     "Quick Doors:"          },
1783   { TYPE_SWITCH,        &setup.toons,           "Toons:"                },
1784   { TYPE_EMPTY,         NULL,                   ""                      },
1785   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1786   { 0,                  NULL,                   NULL                    }
1787 };
1788
1789 static struct TokenInfo setup_info_sound[] =
1790 {
1791   { TYPE_SWITCH,        &setup.sound,           "Sound:",               },
1792   { TYPE_EMPTY,         NULL,                   ""                      },
1793   { TYPE_SWITCH,        &setup.sound_simple,    "Simple Sound:"         },
1794   { TYPE_SWITCH,        &setup.sound_loops,     "Sound Loops:"          },
1795   { TYPE_SWITCH,        &setup.sound_music,     "Game Music:"           },
1796   { TYPE_EMPTY,         NULL,                   ""                      },
1797   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1798   { 0,                  NULL,                   NULL                    }
1799 };
1800
1801 static struct TokenInfo setup_info_artwork[] =
1802 {
1803   { TYPE_ENTER_MENU,    execSetupChooseGraphics,"Custom Graphics"       },
1804   { TYPE_STRING,        &graphics_set_name,     ""                      },
1805   { TYPE_ENTER_MENU,    execSetupChooseSounds,  "Custom Sounds"         },
1806   { TYPE_STRING,        &sounds_set_name,       ""                      },
1807   { TYPE_ENTER_MENU,    execSetupChooseMusic,   "Custom Music"          },
1808   { TYPE_STRING,        &music_set_name,        ""                      },
1809   { TYPE_EMPTY,         NULL,                   ""                      },
1810   { TYPE_STRING,        NULL,                   "Override Level Artwork:"},
1811   { TYPE_YES_NO,        &setup.override_level_graphics, "Graphics:"     },
1812   { TYPE_YES_NO,        &setup.override_level_sounds,   "Sounds:"       },
1813   { TYPE_YES_NO,        &setup.override_level_music,    "Music:"        },
1814   { TYPE_EMPTY,         NULL,                   ""                      },
1815   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1816   { 0,                  NULL,                   NULL                    }
1817 };
1818
1819 static struct TokenInfo setup_info_shortcut[] =
1820 {
1821   { TYPE_KEYTEXT,       NULL,                   "Quick Save Game:",     },
1822   { TYPE_KEY,           &setup.shortcut.save_game,      ""              },
1823   { TYPE_KEYTEXT,       NULL,                   "Quick Load Game:",     },
1824   { TYPE_KEY,           &setup.shortcut.load_game,      ""              },
1825   { TYPE_KEYTEXT,       NULL,                   "Toggle Pause:",        },
1826   { TYPE_KEY,           &setup.shortcut.toggle_pause,   ""              },
1827   { TYPE_EMPTY,         NULL,                   ""                      },
1828   { TYPE_YES_NO,        &setup.ask_on_escape,   "Ask on Esc:"           },
1829   { TYPE_EMPTY,         NULL,                   ""                      },
1830   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1831   { 0,                  NULL,                   NULL                    }
1832 };
1833
1834 static Key getSetupKey()
1835 {
1836   Key key = KSYM_UNDEFINED;
1837   boolean got_key_event = FALSE;
1838
1839   while (!got_key_event)
1840   {
1841     if (PendingEvent())         /* got event */
1842     {
1843       Event event;
1844
1845       NextEvent(&event);
1846
1847       switch(event.type)
1848       {
1849         case EVENT_KEYPRESS:
1850           {
1851             key = GetEventKey((KeyEvent *)&event, TRUE);
1852
1853             /* press 'Escape' or 'Enter' to keep the existing key binding */
1854             if (key == KSYM_Escape || key == KSYM_Return)
1855               key = KSYM_UNDEFINED;     /* keep old value */
1856
1857             got_key_event = TRUE;
1858           }
1859           break;
1860
1861         case EVENT_KEYRELEASE:
1862           key_joystick_mapping = 0;
1863           break;
1864
1865         default:
1866           HandleOtherEvents(&event);
1867           break;
1868       }
1869     }
1870
1871     BackToFront();
1872     DoAnimation();
1873
1874     /* don't eat all CPU time */
1875     Delay(10);
1876   }
1877
1878   return key;
1879 }
1880
1881 static void drawSetupValue(int pos)
1882 {
1883   int xpos = MENU_SCREEN_VALUE_XPOS;
1884   int ypos = MENU_SCREEN_START_YPOS + pos;
1885   int font_nr = FONT_VALUE_1;
1886   char *value_string = getSetupValue(setup_info[pos].type & ~TYPE_GHOSTED,
1887                                      setup_info[pos].value);
1888
1889   if (value_string == NULL)
1890     return;
1891
1892   if (setup_info[pos].type & TYPE_KEY)
1893   {
1894     xpos = 3;
1895
1896     if (setup_info[pos].type & TYPE_QUERY)
1897     {
1898       value_string = "<press key>";
1899       font_nr = FONT_INPUT_1_ACTIVE;
1900     }
1901   }
1902   else if (setup_info[pos].type & TYPE_STRING)
1903   {
1904     int max_value_len = (SCR_FIELDX - 2) * 2;
1905
1906     xpos = 1;
1907     font_nr = FONT_VALUE_2;
1908
1909     if (strlen(value_string) > max_value_len)
1910       value_string[max_value_len] = '\0';
1911   }
1912   else if (setup_info[pos].type & TYPE_BOOLEAN_STYLE &&
1913            !*(boolean *)(setup_info[pos].value))
1914     font_nr = FONT_OPTION_OFF;
1915
1916   DrawText(mSX + xpos * 32, mSY + ypos * 32,
1917            (xpos == 3 ? "              " : "   "), font_nr);
1918   DrawText(mSX + xpos * 32, mSY + ypos * 32, value_string, font_nr);
1919 }
1920
1921 static void changeSetupValue(int pos)
1922 {
1923   if (setup_info[pos].type & TYPE_BOOLEAN_STYLE)
1924   {
1925     *(boolean *)setup_info[pos].value ^= TRUE;
1926   }
1927   else if (setup_info[pos].type & TYPE_KEY)
1928   {
1929     Key key;
1930
1931     setup_info[pos].type |= TYPE_QUERY;
1932     drawSetupValue(pos);
1933     setup_info[pos].type &= ~TYPE_QUERY;
1934
1935     key = getSetupKey();
1936     if (key != KSYM_UNDEFINED)
1937       *(Key *)setup_info[pos].value = key;
1938   }
1939
1940   drawSetupValue(pos);
1941 }
1942
1943 static void DrawSetupScreen_Generic()
1944 {
1945   char *title_string = NULL;
1946   int i;
1947
1948   UnmapAllGadgets();
1949   CloseDoor(DOOR_CLOSE_2);
1950
1951   ClearWindow();
1952
1953   if (setup_mode == SETUP_MODE_MAIN)
1954   {
1955     setup_info = setup_info_main;
1956     title_string = "Setup";
1957   }
1958   else if (setup_mode == SETUP_MODE_GAME)
1959   {
1960     setup_info = setup_info_game;
1961     title_string = "Setup Game";
1962   }
1963   else if (setup_mode == SETUP_MODE_EDITOR)
1964   {
1965     setup_info = setup_info_editor;
1966     title_string = "Setup Editor";
1967   }
1968   else if (setup_mode == SETUP_MODE_GRAPHICS)
1969   {
1970     setup_info = setup_info_graphics;
1971     title_string = "Setup Graphics";
1972   }
1973   else if (setup_mode == SETUP_MODE_SOUND)
1974   {
1975     setup_info = setup_info_sound;
1976     title_string = "Setup Sound";
1977   }
1978   else if (setup_mode == SETUP_MODE_ARTWORK)
1979   {
1980     setup_info = setup_info_artwork;
1981     title_string = "Custom Artwork";
1982   }
1983   else if (setup_mode == SETUP_MODE_SHORTCUT)
1984   {
1985     setup_info = setup_info_shortcut;
1986     title_string = "Setup Shortcuts";
1987   }
1988
1989   DrawText(mSX + 16, mSY + 16, title_string, FONT_TITLE_1);
1990
1991   num_setup_info = 0;
1992   for(i=0; setup_info[i].type != 0 && i < MAX_MENU_ENTRIES_ON_SCREEN; i++)
1993   {
1994     void *value_ptr = setup_info[i].value;
1995     int ypos = MENU_SCREEN_START_YPOS + i;
1996     int font_nr = FONT_MENU_1;
1997
1998     /* set some entries to "unchangeable" according to other variables */
1999     if ((value_ptr == &setup.sound       && !audio.sound_available) ||
2000         (value_ptr == &setup.sound_loops && !audio.loops_available) ||
2001         (value_ptr == &setup.sound_music && !audio.music_available) ||
2002         (value_ptr == &setup.fullscreen  && !video.fullscreen_available))
2003       setup_info[i].type |= TYPE_GHOSTED;
2004
2005     if (setup_info[i].type & TYPE_STRING)
2006       font_nr = FONT_MENU_2;
2007
2008     DrawText(mSX + 32, mSY + ypos * 32, setup_info[i].text, font_nr);
2009
2010     if (setup_info[i].type & TYPE_ENTER_MENU)
2011       initCursor(i, IMG_MENU_BUTTON_RIGHT);
2012     else if (setup_info[i].type & TYPE_LEAVE_MENU)
2013       initCursor(i, IMG_MENU_BUTTON_LEFT);
2014     else if (setup_info[i].type & ~TYPE_SKIP_ENTRY)
2015       initCursor(i, IMG_MENU_BUTTON);
2016
2017     if (setup_info[i].type & TYPE_VALUE)
2018       drawSetupValue(i);
2019
2020     num_setup_info++;
2021   }
2022
2023   FadeToFront();
2024   InitAnimation();
2025   HandleSetupScreen_Generic(0,0,0,0,MB_MENU_INITIALIZE);
2026 }
2027
2028 void HandleSetupScreen_Generic(int mx, int my, int dx, int dy, int button)
2029 {
2030   static int choice_store[MAX_SETUP_MODES];
2031   int choice = choice_store[setup_mode];        /* always starts with 0 */
2032   int x = 0;
2033   int y = choice;
2034
2035   if (button == MB_MENU_INITIALIZE)
2036   {
2037     /* advance to first valid menu entry */
2038     while (choice < num_setup_info &&
2039            (setup_info[choice].type & TYPE_SKIP_ENTRY))
2040       choice++;
2041     choice_store[setup_mode] = choice;
2042
2043     drawCursor(choice, FC_RED);
2044     return;
2045   }
2046   else if (button == MB_MENU_LEAVE)
2047   {
2048     for (y=0; y<num_setup_info; y++)
2049     {
2050       if (setup_info[y].type & TYPE_LEAVE_MENU)
2051       {
2052         void (*menu_callback_function)(void) = setup_info[y].value;
2053
2054         menu_callback_function();
2055         break;  /* absolutely needed because function changes 'setup_info'! */
2056       }
2057     }
2058
2059     return;
2060   }
2061
2062   if (mx || my)         /* mouse input */
2063   {
2064     x = (mx - mSX) / 32;
2065     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
2066   }
2067   else if (dx || dy)    /* keyboard input */
2068   {
2069     if (dx)
2070     {
2071       int menu_navigation_type = (dx < 0 ? TYPE_LEAVE_MENU : TYPE_ENTER_MENU);
2072
2073       if ((setup_info[choice].type & menu_navigation_type) ||
2074           (setup_info[choice].type & TYPE_BOOLEAN_STYLE))
2075         button = MB_MENU_CHOICE;
2076     }
2077     else if (dy)
2078       y = choice + dy;
2079
2080     /* jump to next non-empty menu entry (up or down) */
2081     while (y > 0 && y < num_setup_info - 1 &&
2082            (setup_info[y].type & TYPE_SKIP_ENTRY))
2083       y += dy;
2084   }
2085
2086   if (x == 0 && y >= 0 && y < num_setup_info &&
2087       (setup_info[y].type & ~TYPE_SKIP_ENTRY))
2088   {
2089     if (button)
2090     {
2091       if (y != choice)
2092       {
2093         drawCursor(y, FC_RED);
2094         drawCursor(choice, FC_BLUE);
2095         choice = choice_store[setup_mode] = y;
2096       }
2097     }
2098     else if (!(setup_info[y].type & TYPE_GHOSTED))
2099     {
2100       if (setup_info[y].type & TYPE_ENTER_OR_LEAVE_MENU)
2101       {
2102         void (*menu_callback_function)(void) = setup_info[choice].value;
2103
2104         menu_callback_function();
2105       }
2106       else
2107       {
2108         if ((setup_info[y].type & TYPE_KEYTEXT) &&
2109             (setup_info[y + 1].type & TYPE_KEY))
2110           y++;
2111
2112         if (setup_info[y].type & TYPE_VALUE)
2113           changeSetupValue(y);
2114       }
2115     }
2116   }
2117
2118   BackToFront();
2119
2120   if (game_status == GAME_MODE_SETUP)
2121     DoAnimation();
2122 }
2123
2124 void DrawSetupScreen_Input()
2125 {
2126   ClearWindow();
2127
2128   DrawText(mSX+16, mSY+16, "Setup Input", FONT_TITLE_1);
2129
2130   initCursor(0, IMG_MENU_BUTTON);
2131   initCursor(1, IMG_MENU_BUTTON);
2132   initCursor(2, IMG_MENU_BUTTON_RIGHT);
2133   initCursor(13, IMG_MENU_BUTTON_LEFT);
2134
2135   drawCursorXY(10, 0, IMG_MENU_BUTTON_LEFT);
2136   drawCursorXY(12, 0, IMG_MENU_BUTTON_RIGHT);
2137
2138   DrawText(mSX+32, mSY+2*32, "Player:", FONT_MENU_1);
2139   DrawText(mSX+32, mSY+3*32, "Device:", FONT_MENU_1);
2140   DrawText(mSX+32, mSY+15*32, "Back",   FONT_MENU_1);
2141
2142 #if 0
2143   DeactivateJoystickForCalibration();
2144   DrawTextFCentered(SYSIZE - 20, FONT_TEXT_4,
2145                     "Joysticks deactivated on this screen");
2146 #endif
2147
2148   HandleSetupScreen_Input(0,0, 0,0, MB_MENU_INITIALIZE);
2149   FadeToFront();
2150   InitAnimation();
2151 }
2152
2153 static void setJoystickDeviceToNr(char *device_name, int device_nr)
2154 {
2155   if (device_name == NULL)
2156     return;
2157
2158   if (device_nr < 0 || device_nr >= MAX_PLAYERS)
2159     device_nr = 0;
2160
2161   if (strlen(device_name) > 1)
2162   {
2163     char c1 = device_name[strlen(device_name) - 1];
2164     char c2 = device_name[strlen(device_name) - 2];
2165
2166     if (c1 >= '0' && c1 <= '9' && !(c2 >= '0' && c2 <= '9'))
2167       device_name[strlen(device_name) - 1] = '0' + (char)(device_nr % 10);
2168   }
2169   else
2170     strncpy(device_name, getDeviceNameFromJoystickNr(device_nr),
2171             strlen(device_name));
2172 }
2173
2174 static void drawPlayerSetupInputInfo(int player_nr)
2175 {
2176   int i;
2177   static struct SetupKeyboardInfo custom_key;
2178   static struct
2179   {
2180     Key *key;
2181     char *text;
2182   } custom[] =
2183   {
2184     { &custom_key.left,  "Joystick Left"  },
2185     { &custom_key.right, "Joystick Right" },
2186     { &custom_key.up,    "Joystick Up"    },
2187     { &custom_key.down,  "Joystick Down"  },
2188     { &custom_key.snap,  "Button 1"       },
2189     { &custom_key.bomb,  "Button 2"       }
2190   };
2191   static char *joystick_name[MAX_PLAYERS] =
2192   {
2193     "Joystick1",
2194     "Joystick2",
2195     "Joystick3",
2196     "Joystick4"
2197   };
2198
2199   custom_key = setup.input[player_nr].key;
2200
2201   DrawText(mSX+11*32, mSY+2*32, int2str(player_nr +1, 1), FONT_INPUT_1_ACTIVE);
2202 #if 1
2203   DrawGraphicThruMaskExt(drawto, mSX + 8 * TILEX, mSY + 2 * TILEY,
2204                          PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0);
2205 #else
2206   DrawGraphicThruMask(8, 2, PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0);
2207 #endif
2208
2209   if (setup.input[player_nr].use_joystick)
2210   {
2211     char *device_name = setup.input[player_nr].joy.device_name;
2212
2213     DrawText(mSX+8*32, mSY+3*32,
2214              joystick_name[getJoystickNrFromDeviceName(device_name)],
2215              FONT_VALUE_1);
2216     DrawText(mSX+32, mSY+4*32, "Calibrate", FONT_MENU_1);
2217   }
2218   else
2219   {
2220     DrawText(mSX+8*32, mSY+3*32, "Keyboard ", FONT_VALUE_1);
2221     DrawText(mSX+32,   mSY+4*32, "Customize", FONT_MENU_1);
2222   }
2223
2224   DrawText(mSX+32, mSY+5*32, "Actual Settings:", FONT_MENU_1);
2225   drawCursorXY(1, 4, IMG_MENU_BUTTON_LEFT);
2226   drawCursorXY(1, 5, IMG_MENU_BUTTON_RIGHT);
2227   drawCursorXY(1, 6, IMG_MENU_BUTTON_UP);
2228   drawCursorXY(1, 7, IMG_MENU_BUTTON_DOWN);
2229   DrawText(mSX+2*32, mSY+6*32, ":", FONT_VALUE_OLD);
2230   DrawText(mSX+2*32, mSY+7*32, ":", FONT_VALUE_OLD);
2231   DrawText(mSX+2*32, mSY+8*32, ":", FONT_VALUE_OLD);
2232   DrawText(mSX+2*32, mSY+9*32, ":", FONT_VALUE_OLD);
2233   DrawText(mSX+32, mSY+10*32, "Snap Field:", FONT_VALUE_OLD);
2234   DrawText(mSX+32, mSY+12*32, "Place Bomb:", FONT_VALUE_OLD);
2235
2236   for (i=0; i<6; i++)
2237   {
2238     int ypos = 6 + i + (i > 3 ? i-3 : 0);
2239
2240     DrawText(mSX + 3*32, mSY + ypos*32,
2241              "              ", FONT_VALUE_1);
2242     DrawText(mSX + 3*32, mSY + ypos*32,
2243              (setup.input[player_nr].use_joystick ?
2244               custom[i].text :
2245               getKeyNameFromKey(*custom[i].key)), FONT_VALUE_1);
2246   }
2247 }
2248
2249 void HandleSetupScreen_Input(int mx, int my, int dx, int dy, int button)
2250 {
2251   static int choice = 0;
2252   static int player_nr = 0;
2253   int x = 0;
2254   int y = choice;
2255   int pos_start  = SETUPINPUT_SCREEN_POS_START;
2256   int pos_empty1 = SETUPINPUT_SCREEN_POS_EMPTY1;
2257   int pos_empty2 = SETUPINPUT_SCREEN_POS_EMPTY2;
2258   int pos_end    = SETUPINPUT_SCREEN_POS_END;
2259
2260   if (button == MB_MENU_INITIALIZE)
2261   {
2262     drawPlayerSetupInputInfo(player_nr);
2263     drawCursor(choice, FC_RED);
2264     return;
2265   }
2266   else if (button == MB_MENU_LEAVE)
2267   {
2268     setup_mode = SETUP_MODE_MAIN;
2269     DrawSetupScreen();
2270     InitJoysticks();
2271   }
2272
2273   if (mx || my)         /* mouse input */
2274   {
2275     x = (mx - mSX) / 32;
2276     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
2277   }
2278   else if (dx || dy)    /* keyboard input */
2279   {
2280     if (dx && choice == 0)
2281       x = (dx < 0 ? 10 : 12);
2282     else if ((dx && choice == 1) ||
2283              (dx == +1 && choice == 2) ||
2284              (dx == -1 && choice == pos_end))
2285       button = MB_MENU_CHOICE;
2286     else if (dy)
2287       y = choice + dy;
2288
2289     if (y >= pos_empty1 && y <= pos_empty2)
2290       y = (dy > 0 ? pos_empty2 + 1 : pos_empty1 - 1);
2291   }
2292
2293   if (y == 0 && ((x == 0 && !button) || ((x == 10 || x == 12) && button)))
2294   {
2295     static unsigned long delay = 0;
2296
2297     if (!DelayReached(&delay, GADGET_FRAME_DELAY))
2298       goto out;
2299
2300     player_nr = (player_nr + (x == 10 ? -1 : +1) + MAX_PLAYERS) % MAX_PLAYERS;
2301
2302     drawPlayerSetupInputInfo(player_nr);
2303   }
2304   else if (x == 0 && y >= pos_start && y <= pos_end &&
2305            !(y >= pos_empty1 && y <= pos_empty2))
2306   {
2307     if (button)
2308     {
2309       if (y != choice)
2310       {
2311         drawCursor(y, FC_RED);
2312         drawCursor(choice, FC_BLUE);
2313         choice = y;
2314       }
2315     }
2316     else
2317     {
2318       if (y == 1)
2319       {
2320         char *device_name = setup.input[player_nr].joy.device_name;
2321
2322         if (!setup.input[player_nr].use_joystick)
2323         {
2324           int new_device_nr = (dx >= 0 ? 0 : MAX_PLAYERS - 1);
2325
2326           setJoystickDeviceToNr(device_name, new_device_nr);
2327           setup.input[player_nr].use_joystick = TRUE;
2328         }
2329         else
2330         {
2331           int device_nr = getJoystickNrFromDeviceName(device_name);
2332           int new_device_nr = device_nr + (dx >= 0 ? +1 : -1);
2333
2334           if (new_device_nr < 0 || new_device_nr >= MAX_PLAYERS)
2335             setup.input[player_nr].use_joystick = FALSE;
2336           else
2337             setJoystickDeviceToNr(device_name, new_device_nr);
2338         }
2339
2340         drawPlayerSetupInputInfo(player_nr);
2341       }
2342       else if (y == 2)
2343       {
2344         if (setup.input[player_nr].use_joystick)
2345         {
2346           InitJoysticks();
2347           CalibrateJoystick(player_nr);
2348         }
2349         else
2350           CustomizeKeyboard(player_nr);
2351       }
2352       else if (y == pos_end)
2353       {
2354         InitJoysticks();
2355
2356         setup_mode = SETUP_MODE_MAIN;
2357         DrawSetupScreen();
2358       }
2359     }
2360   }
2361
2362   BackToFront();
2363
2364   out:
2365
2366   if (game_status == GAME_MODE_SETUP)
2367     DoAnimation();
2368 }
2369
2370 void CustomizeKeyboard(int player_nr)
2371 {
2372   int i;
2373   int step_nr;
2374   boolean finished = FALSE;
2375   static struct SetupKeyboardInfo custom_key;
2376   static struct
2377   {
2378     Key *key;
2379     char *text;
2380   } customize_step[] =
2381   {
2382     { &custom_key.left,  "Move Left"  },
2383     { &custom_key.right, "Move Right" },
2384     { &custom_key.up,    "Move Up"    },
2385     { &custom_key.down,  "Move Down"  },
2386     { &custom_key.snap,  "Snap Field" },
2387     { &custom_key.bomb,  "Place Bomb" }
2388   };
2389
2390   /* read existing key bindings from player setup */
2391   custom_key = setup.input[player_nr].key;
2392
2393   ClearWindow();
2394   DrawText(mSX + 16, mSY + 16, "Keyboard Input", FONT_TITLE_1);
2395
2396   BackToFront();
2397   InitAnimation();
2398
2399   step_nr = 0;
2400   DrawText(mSX, mSY + (2+2*step_nr)*32,
2401            customize_step[step_nr].text, FONT_INPUT_1_ACTIVE);
2402   DrawText(mSX, mSY + (2+2*step_nr+1)*32,
2403            "Key:", FONT_INPUT_1_ACTIVE);
2404   DrawText(mSX + 4*32, mSY + (2+2*step_nr+1)*32,
2405            getKeyNameFromKey(*customize_step[step_nr].key), FONT_VALUE_OLD);
2406
2407   while(!finished)
2408   {
2409     if (PendingEvent())         /* got event */
2410     {
2411       Event event;
2412
2413       NextEvent(&event);
2414
2415       switch(event.type)
2416       {
2417         case EVENT_KEYPRESS:
2418           {
2419             Key key = GetEventKey((KeyEvent *)&event, FALSE);
2420
2421             if (key == KSYM_Escape || (key == KSYM_Return && step_nr == 6))
2422             {
2423               finished = TRUE;
2424               break;
2425             }
2426
2427             /* all keys configured -- wait for "Escape" or "Return" key */
2428             if (step_nr == 6)
2429               break;
2430
2431             /* press 'Enter' to keep the existing key binding */
2432             if (key == KSYM_Return)
2433               key = *customize_step[step_nr].key;
2434
2435             /* check if key already used */
2436             for (i=0; i<step_nr; i++)
2437               if (*customize_step[i].key == key)
2438                 break;
2439             if (i < step_nr)
2440               break;
2441
2442             /* got new key binding */
2443             *customize_step[step_nr].key = key;
2444             DrawText(mSX + 4*32, mSY + (2+2*step_nr+1)*32,
2445                      "             ", FONT_VALUE_1);
2446             DrawText(mSX + 4*32, mSY + (2+2*step_nr+1)*32,
2447                      getKeyNameFromKey(key), FONT_VALUE_1);
2448             step_nr++;
2449
2450             /* un-highlight last query */
2451             DrawText(mSX, mSY+(2+2*(step_nr-1))*32,
2452                      customize_step[step_nr-1].text, FONT_MENU_1);
2453             DrawText(mSX, mSY+(2+2*(step_nr-1)+1)*32,
2454                      "Key:", FONT_MENU_1);
2455
2456             /* press 'Enter' to leave */
2457             if (step_nr == 6)
2458             {
2459               DrawText(mSX + 16, mSY + 15*32+16,
2460                        "Press Enter", FONT_TITLE_1);
2461               break;
2462             }
2463
2464             /* query next key binding */
2465             DrawText(mSX, mSY+(2+2*step_nr)*32,
2466                      customize_step[step_nr].text, FONT_INPUT_1_ACTIVE);
2467             DrawText(mSX, mSY+(2+2*step_nr+1)*32,
2468                      "Key:", FONT_INPUT_1_ACTIVE);
2469             DrawText(mSX + 4*32, mSY+(2+2*step_nr+1)*32,
2470                      getKeyNameFromKey(*customize_step[step_nr].key),
2471                      FONT_VALUE_OLD);
2472           }
2473           break;
2474
2475         case EVENT_KEYRELEASE:
2476           key_joystick_mapping = 0;
2477           break;
2478
2479         default:
2480           HandleOtherEvents(&event);
2481           break;
2482       }
2483     }
2484
2485     BackToFront();
2486     DoAnimation();
2487
2488     /* don't eat all CPU time */
2489     Delay(10);
2490   }
2491
2492   /* write new key bindings back to player setup */
2493   setup.input[player_nr].key = custom_key;
2494
2495   StopAnimation();
2496   DrawSetupScreen_Input();
2497 }
2498
2499 static boolean CalibrateJoystickMain(int player_nr)
2500 {
2501   int new_joystick_xleft = JOYSTICK_XMIDDLE;
2502   int new_joystick_xright = JOYSTICK_XMIDDLE;
2503   int new_joystick_yupper = JOYSTICK_YMIDDLE;
2504   int new_joystick_ylower = JOYSTICK_YMIDDLE;
2505   int new_joystick_xmiddle, new_joystick_ymiddle;
2506
2507   int joystick_fd = joystick.fd[player_nr];
2508   int x, y, last_x, last_y, xpos = 8, ypos = 3;
2509   boolean check[3][3];
2510   int check_remaining = 3 * 3;
2511   int joy_x, joy_y;
2512   int joy_value;
2513   int result = -1;
2514
2515   if (joystick.status == JOYSTICK_NOT_AVAILABLE)
2516     return FALSE;
2517
2518   if (joystick_fd < 0 || !setup.input[player_nr].use_joystick)
2519     return FALSE;
2520
2521   ClearWindow();
2522
2523   for(y=0; y < 3; y++)
2524   {
2525     for(x=0; x < 3; x++)
2526     {
2527       DrawGraphic(xpos + x - 1, ypos + y - 1, IMG_MENU_CALIBRATE_BLUE, 0);
2528       check[x][y] = FALSE;
2529     }
2530   }
2531
2532   DrawText(mSX,      mSY +  6 * 32, " ROTATE JOYSTICK ", FONT_TITLE_1);
2533   DrawText(mSX,      mSY +  7 * 32, "IN ALL DIRECTIONS", FONT_TITLE_1);
2534   DrawText(mSX + 16, mSY +  9 * 32, "  IF ALL BALLS  ",  FONT_TITLE_1);
2535   DrawText(mSX,      mSY + 10 * 32, "   ARE YELLOW,   ", FONT_TITLE_1);
2536   DrawText(mSX,      mSY + 11 * 32, " CENTER JOYSTICK ", FONT_TITLE_1);
2537   DrawText(mSX,      mSY + 12 * 32, "       AND       ", FONT_TITLE_1);
2538   DrawText(mSX,      mSY + 13 * 32, "PRESS ANY BUTTON!", FONT_TITLE_1);
2539
2540   joy_value = Joystick(player_nr);
2541   last_x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
2542   last_y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
2543
2544   /* eventually uncalibrated center position (joystick could be uncentered) */
2545   if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
2546     return FALSE;
2547
2548   new_joystick_xmiddle = joy_x;
2549   new_joystick_ymiddle = joy_y;
2550
2551   DrawGraphic(xpos + last_x, ypos + last_y, IMG_MENU_CALIBRATE_RED, 0);
2552   BackToFront();
2553
2554   while(Joystick(player_nr) & JOY_BUTTON);      /* wait for released button */
2555   InitAnimation();
2556
2557   while(result < 0)
2558   {
2559     if (PendingEvent())         /* got event */
2560     {
2561       Event event;
2562
2563       NextEvent(&event);
2564
2565       switch(event.type)
2566       {
2567         case EVENT_KEYPRESS:
2568           switch(GetEventKey((KeyEvent *)&event, TRUE))
2569           {
2570             case KSYM_Return:
2571               if (check_remaining == 0)
2572                 result = 1;
2573               break;
2574
2575             case KSYM_Escape:
2576               result = 0;
2577               break;
2578
2579             default:
2580               break;
2581           }
2582           break;
2583
2584         case EVENT_KEYRELEASE:
2585           key_joystick_mapping = 0;
2586           break;
2587
2588         default:
2589           HandleOtherEvents(&event);
2590           break;
2591       }
2592     }
2593
2594     if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
2595       return FALSE;
2596
2597     new_joystick_xleft  = MIN(new_joystick_xleft,  joy_x);
2598     new_joystick_xright = MAX(new_joystick_xright, joy_x);
2599     new_joystick_yupper = MIN(new_joystick_yupper, joy_y);
2600     new_joystick_ylower = MAX(new_joystick_ylower, joy_y);
2601
2602     setup.input[player_nr].joy.xleft = new_joystick_xleft;
2603     setup.input[player_nr].joy.yupper = new_joystick_yupper;
2604     setup.input[player_nr].joy.xright = new_joystick_xright;
2605     setup.input[player_nr].joy.ylower = new_joystick_ylower;
2606     setup.input[player_nr].joy.xmiddle = new_joystick_xmiddle;
2607     setup.input[player_nr].joy.ymiddle = new_joystick_ymiddle;
2608
2609     CheckJoystickData();
2610
2611     joy_value = Joystick(player_nr);
2612
2613     if (joy_value & JOY_BUTTON && check_remaining == 0)
2614       result = 1;
2615
2616     x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
2617     y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
2618
2619     if (x != last_x || y != last_y)
2620     {
2621       DrawGraphic(xpos + last_x, ypos + last_y, IMG_MENU_CALIBRATE_YELLOW, 0);
2622       DrawGraphic(xpos + x,      ypos + y,      IMG_MENU_CALIBRATE_RED,    0);
2623
2624       last_x = x;
2625       last_y = y;
2626
2627       if (check_remaining > 0 && !check[x+1][y+1])
2628       {
2629         check[x+1][y+1] = TRUE;
2630         check_remaining--;
2631       }
2632
2633 #if 0
2634 #ifdef DEBUG
2635       printf("LEFT / MIDDLE / RIGHT == %d / %d / %d\n",
2636              setup.input[player_nr].joy.xleft,
2637              setup.input[player_nr].joy.xmiddle,
2638              setup.input[player_nr].joy.xright);
2639       printf("UP / MIDDLE / DOWN == %d / %d / %d\n",
2640              setup.input[player_nr].joy.yupper,
2641              setup.input[player_nr].joy.ymiddle,
2642              setup.input[player_nr].joy.ylower);
2643 #endif
2644 #endif
2645
2646     }
2647
2648     BackToFront();
2649     DoAnimation();
2650
2651     /* don't eat all CPU time */
2652     Delay(10);
2653   }
2654
2655   /* calibrated center position (joystick should now be centered) */
2656   if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
2657     return FALSE;
2658
2659   new_joystick_xmiddle = joy_x;
2660   new_joystick_ymiddle = joy_y;
2661
2662   StopAnimation();
2663
2664   DrawSetupScreen_Input();
2665
2666   /* wait until the last pressed button was released */
2667   while (Joystick(player_nr) & JOY_BUTTON)
2668   {
2669     if (PendingEvent())         /* got event */
2670     {
2671       Event event;
2672
2673       NextEvent(&event);
2674       HandleOtherEvents(&event);
2675
2676       Delay(10);
2677     }
2678   }
2679
2680   return TRUE;
2681 }
2682
2683 void CalibrateJoystick(int player_nr)
2684 {
2685   if (!CalibrateJoystickMain(player_nr))
2686   {
2687     ClearWindow();
2688
2689     DrawText(mSX + 16, mSY + 6*32, "  JOYSTICK NOT  ",  FONT_TITLE_1);
2690     DrawText(mSX,      mSY + 7*32, "    AVAILABLE    ", FONT_TITLE_1);
2691     BackToFront();
2692     Delay(2000);        /* show error message for two seconds */
2693   }
2694 }
2695
2696 void DrawSetupScreen()
2697 {
2698   DeactivateJoystick();
2699
2700   SetMainBackgroundImage(IMG_BACKGROUND_SETUP);
2701
2702   if (setup_mode == SETUP_MODE_INPUT)
2703     DrawSetupScreen_Input();
2704   else if (setup_mode == SETUP_MODE_CHOOSE_GRAPHICS)
2705     DrawChooseTree(&artwork.gfx_current);
2706   else if (setup_mode == SETUP_MODE_CHOOSE_SOUNDS)
2707     DrawChooseTree(&artwork.snd_current);
2708   else if (setup_mode == SETUP_MODE_CHOOSE_MUSIC)
2709     DrawChooseTree(&artwork.mus_current);
2710   else
2711     DrawSetupScreen_Generic();
2712 }
2713
2714 void HandleSetupScreen(int mx, int my, int dx, int dy, int button)
2715 {
2716   if (setup_mode == SETUP_MODE_INPUT)
2717     HandleSetupScreen_Input(mx, my, dx, dy, button);
2718   else if (setup_mode == SETUP_MODE_CHOOSE_GRAPHICS)
2719     HandleChooseTree(mx, my, dx, dy, button, &artwork.gfx_current);
2720   else if (setup_mode == SETUP_MODE_CHOOSE_SOUNDS)
2721     HandleChooseTree(mx, my, dx, dy, button, &artwork.snd_current);
2722   else if (setup_mode == SETUP_MODE_CHOOSE_MUSIC)
2723     HandleChooseTree(mx, my, dx, dy, button, &artwork.mus_current);
2724   else
2725     HandleSetupScreen_Generic(mx, my, dx, dy, button);
2726 }
2727
2728 void HandleGameActions()
2729 {
2730   if (game_status != GAME_MODE_PLAYING)
2731     return;
2732
2733   if (local_player->LevelSolved)
2734     GameWon();
2735
2736   if (AllPlayersGone && !TAPE_IS_STOPPED(tape))
2737     TapeStop();
2738
2739   GameActions();
2740
2741   BackToFront();
2742
2743 #if 1
2744   if (tape.auto_play && !tape.playing)
2745     AutoPlayTape();     /* continue automatically playing next tape */
2746 #endif
2747 }
2748
2749 /* ---------- new screen button stuff -------------------------------------- */
2750
2751 /* graphic position and size values for buttons and scrollbars */
2752 #define SC_SCROLLBUTTON_XSIZE           32
2753 #define SC_SCROLLBUTTON_YSIZE           32
2754
2755 #define SC_SCROLL_UP_XPOS               (SXSIZE - SC_SCROLLBUTTON_XSIZE)
2756 #define SC_SCROLL_UP_YPOS               SC_SCROLLBUTTON_YSIZE
2757 #define SC_SCROLL_DOWN_XPOS             SC_SCROLL_UP_XPOS
2758 #define SC_SCROLL_DOWN_YPOS             (SYSIZE - SC_SCROLLBUTTON_YSIZE)
2759 #define SC_SCROLL_VERTICAL_XPOS         SC_SCROLL_UP_XPOS
2760 #define SC_SCROLL_VERTICAL_YPOS   (SC_SCROLL_UP_YPOS + SC_SCROLLBUTTON_YSIZE)
2761 #define SC_SCROLL_VERTICAL_XSIZE        SC_SCROLLBUTTON_XSIZE
2762 #define SC_SCROLL_VERTICAL_YSIZE        (SYSIZE - 3 * SC_SCROLLBUTTON_YSIZE)
2763
2764 #define SC_BORDER_SIZE                  14
2765
2766 static struct
2767 {
2768   int gfx_unpressed, gfx_pressed;
2769   int x, y;
2770   int gadget_id;
2771   char *infotext;
2772 } scrollbutton_info[NUM_SCREEN_SCROLLBUTTONS] =
2773 {
2774   {
2775     IMG_MENU_BUTTON_UP, IMG_MENU_BUTTON_UP_ACTIVE,
2776     SC_SCROLL_UP_XPOS, SC_SCROLL_UP_YPOS,
2777     SCREEN_CTRL_ID_SCROLL_UP,
2778     "scroll up"
2779   },
2780   {
2781     IMG_MENU_BUTTON_DOWN, IMG_MENU_BUTTON_DOWN_ACTIVE,
2782     SC_SCROLL_DOWN_XPOS, SC_SCROLL_DOWN_YPOS,
2783     SCREEN_CTRL_ID_SCROLL_DOWN,
2784     "scroll down"
2785   }
2786 };
2787
2788 static struct
2789 {
2790 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2791   Bitmap **gfx_unpressed, **gfx_pressed;
2792 #else
2793   int gfx_unpressed, gfx_pressed;
2794 #endif
2795   int x, y;
2796   int width, height;
2797   int type;
2798   int gadget_id;
2799   char *infotext;
2800 } scrollbar_info[NUM_SCREEN_SCROLLBARS] =
2801 {
2802   {
2803 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2804     &scrollbar_bitmap[0], &scrollbar_bitmap[1],
2805 #else
2806     IMG_MENU_SCROLLBAR, IMG_MENU_SCROLLBAR_ACTIVE,
2807 #endif
2808     SX + SC_SCROLL_VERTICAL_XPOS, SY + SC_SCROLL_VERTICAL_YPOS,
2809     SC_SCROLL_VERTICAL_XSIZE, SC_SCROLL_VERTICAL_YSIZE,
2810     GD_TYPE_SCROLLBAR_VERTICAL,
2811     SCREEN_CTRL_ID_SCROLL_VERTICAL,
2812     "scroll level series vertically"
2813   }
2814 };
2815
2816 static void CreateScreenScrollbuttons()
2817 {
2818   struct GadgetInfo *gi;
2819   unsigned long event_mask;
2820   int i;
2821
2822   for (i=0; i<NUM_SCREEN_SCROLLBUTTONS; i++)
2823   {
2824     Bitmap *gd_bitmap_unpressed, *gd_bitmap_pressed;
2825     int gfx_unpressed, gfx_pressed;
2826     int x, y, width, height;
2827     int gd_x1, gd_x2, gd_y1, gd_y2;
2828     int id = scrollbutton_info[i].gadget_id;
2829
2830     x = scrollbutton_info[i].x;
2831     y = scrollbutton_info[i].y;
2832
2833     event_mask = GD_EVENT_PRESSED | GD_EVENT_REPEATED;
2834
2835     x += SX;
2836     y += SY;
2837     width = SC_SCROLLBUTTON_XSIZE;
2838     height = SC_SCROLLBUTTON_YSIZE;
2839
2840     gfx_unpressed = scrollbutton_info[i].gfx_unpressed;
2841     gfx_pressed   = scrollbutton_info[i].gfx_pressed;
2842     gd_bitmap_unpressed = graphic_info[gfx_unpressed].bitmap;
2843     gd_bitmap_pressed   = graphic_info[gfx_pressed].bitmap;
2844     gd_x1 = graphic_info[gfx_unpressed].src_x;
2845     gd_y1 = graphic_info[gfx_unpressed].src_y;
2846     gd_x2 = graphic_info[gfx_pressed].src_x;
2847     gd_y2 = graphic_info[gfx_pressed].src_y;
2848
2849     gi = CreateGadget(GDI_CUSTOM_ID, id,
2850                       GDI_CUSTOM_TYPE_ID, i,
2851                       GDI_INFO_TEXT, scrollbutton_info[i].infotext,
2852                       GDI_X, x,
2853                       GDI_Y, y,
2854                       GDI_WIDTH, width,
2855                       GDI_HEIGHT, height,
2856                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
2857                       GDI_STATE, GD_BUTTON_UNPRESSED,
2858                       GDI_DESIGN_UNPRESSED, gd_bitmap_unpressed, gd_x1, gd_y1,
2859                       GDI_DESIGN_PRESSED, gd_bitmap_pressed, gd_x2, gd_y2,
2860                       GDI_EVENT_MASK, event_mask,
2861                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
2862                       GDI_END);
2863
2864     if (gi == NULL)
2865       Error(ERR_EXIT, "cannot create gadget");
2866
2867     screen_gadget[id] = gi;
2868   }
2869 }
2870
2871 static void CreateScreenScrollbars()
2872 {
2873   int i;
2874
2875   for (i=0; i<NUM_SCREEN_SCROLLBARS; i++)
2876   {
2877     Bitmap *gd_bitmap_unpressed, *gd_bitmap_pressed;
2878 #if !defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2879     int gfx_unpressed, gfx_pressed;
2880 #endif
2881     int gd_x1, gd_x2, gd_y1, gd_y2;
2882     struct GadgetInfo *gi;
2883     int items_max, items_visible, item_position;
2884     unsigned long event_mask;
2885     int num_page_entries = MAX_MENU_ENTRIES_ON_SCREEN - 1;
2886     int id = scrollbar_info[i].gadget_id;
2887
2888     items_max = num_page_entries;
2889     items_visible = num_page_entries;
2890     item_position = 0;
2891
2892     event_mask = GD_EVENT_MOVING | GD_EVENT_OFF_BORDERS;
2893
2894 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2895     gd_bitmap_unpressed = *scrollbar_info[i].gfx_unpressed;
2896     gd_bitmap_pressed   = *scrollbar_info[i].gfx_pressed;
2897     gd_x1 = 0;
2898     gd_y1 = 0;
2899     gd_x2 = 0;
2900     gd_y2 = 0;
2901 #else
2902     gfx_unpressed = scrollbar_info[i].gfx_unpressed;
2903     gfx_pressed   = scrollbar_info[i].gfx_pressed;
2904     gd_bitmap_unpressed = graphic_info[gfx_unpressed].bitmap;
2905     gd_bitmap_pressed   = graphic_info[gfx_pressed].bitmap;
2906     gd_x1 = graphic_info[gfx_unpressed].src_x;
2907     gd_y1 = graphic_info[gfx_unpressed].src_y;
2908     gd_x2 = graphic_info[gfx_pressed].src_x;
2909     gd_y2 = graphic_info[gfx_pressed].src_y;
2910 #endif
2911
2912     gi = CreateGadget(GDI_CUSTOM_ID, id,
2913                       GDI_CUSTOM_TYPE_ID, i,
2914                       GDI_INFO_TEXT, scrollbar_info[i].infotext,
2915                       GDI_X, scrollbar_info[i].x,
2916                       GDI_Y, scrollbar_info[i].y,
2917                       GDI_WIDTH, scrollbar_info[i].width,
2918                       GDI_HEIGHT, scrollbar_info[i].height,
2919                       GDI_TYPE, scrollbar_info[i].type,
2920                       GDI_SCROLLBAR_ITEMS_MAX, items_max,
2921                       GDI_SCROLLBAR_ITEMS_VISIBLE, items_visible,
2922                       GDI_SCROLLBAR_ITEM_POSITION, item_position,
2923                       GDI_STATE, GD_BUTTON_UNPRESSED,
2924                       GDI_DESIGN_UNPRESSED, gd_bitmap_unpressed, gd_x1, gd_y1,
2925                       GDI_DESIGN_PRESSED, gd_bitmap_pressed, gd_x2, gd_y2,
2926                       GDI_BORDER_SIZE, SC_BORDER_SIZE, SC_BORDER_SIZE,
2927                       GDI_EVENT_MASK, event_mask,
2928                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
2929                       GDI_END);
2930
2931     if (gi == NULL)
2932       Error(ERR_EXIT, "cannot create gadget");
2933
2934     screen_gadget[id] = gi;
2935   }
2936 }
2937
2938 void CreateScreenGadgets()
2939 {
2940 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2941   int i;
2942
2943   for (i=0; i < NUM_SCROLLBAR_BITMAPS; i++)
2944   {
2945     scrollbar_bitmap[i] = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
2946
2947     /* copy pointers to clip mask and GC */
2948     scrollbar_bitmap[i]->clip_mask =
2949       graphic_info[IMG_MENU_SCROLLBAR + i].clip_mask;
2950     scrollbar_bitmap[i]->stored_clip_gc =
2951       graphic_info[IMG_MENU_SCROLLBAR + i].clip_gc;
2952
2953     BlitBitmap(graphic_info[IMG_MENU_SCROLLBAR + i].bitmap,
2954                scrollbar_bitmap[i],
2955                graphic_info[IMG_MENU_SCROLLBAR + i].src_x,
2956                graphic_info[IMG_MENU_SCROLLBAR + i].src_y,
2957                TILEX, TILEY, 0, 0);
2958   }
2959 #endif
2960
2961   CreateScreenScrollbuttons();
2962   CreateScreenScrollbars();
2963 }
2964
2965 void FreeScreenGadgets()
2966 {
2967   int i;
2968
2969 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2970   for (i=0; i < NUM_SCROLLBAR_BITMAPS; i++)
2971   {
2972     /* prevent freeing clip mask and GC twice */
2973     scrollbar_bitmap[i]->clip_mask = None;
2974     scrollbar_bitmap[i]->stored_clip_gc = None;
2975
2976     FreeBitmap(scrollbar_bitmap[i]);
2977   }
2978 #endif
2979
2980   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2981     FreeGadget(screen_gadget[i]);
2982 }
2983
2984 void MapChooseTreeGadgets(TreeInfo *ti)
2985 {
2986   int num_entries = numTreeInfoInGroup(ti);
2987   int i;
2988
2989   if (num_entries <= MAX_MENU_ENTRIES_ON_SCREEN)
2990     return;
2991
2992   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2993     MapGadget(screen_gadget[i]);
2994 }
2995
2996 void UnmapChooseTreeGadgets()
2997 {
2998   int i;
2999
3000   for (i=0; i<NUM_SCREEN_GADGETS; i++)
3001     UnmapGadget(screen_gadget[i]);
3002 }
3003
3004 static void HandleScreenGadgets(struct GadgetInfo *gi)
3005 {
3006   int id = gi->custom_id;
3007
3008   if (game_status != GAME_MODE_LEVELS && game_status != GAME_MODE_SETUP)
3009     return;
3010
3011   switch (id)
3012   {
3013     case SCREEN_CTRL_ID_SCROLL_UP:
3014       if (game_status == GAME_MODE_LEVELS)
3015         HandleChooseLevel(mSX,mSY + 32, 0,0, MB_MENU_MARK);
3016       else if (game_status == GAME_MODE_SETUP)
3017         HandleSetupScreen(mSX,mSY + 32, 0,0, MB_MENU_MARK);
3018       break;
3019
3020     case SCREEN_CTRL_ID_SCROLL_DOWN:
3021       if (game_status == GAME_MODE_LEVELS)
3022         HandleChooseLevel(mSX,mSY + SYSIZE - 32, 0,0, MB_MENU_MARK);
3023       else if (game_status == GAME_MODE_SETUP)
3024         HandleSetupScreen(mSX,mSY + SYSIZE - 32, 0,0, MB_MENU_MARK);
3025       break;
3026
3027     case SCREEN_CTRL_ID_SCROLL_VERTICAL:
3028       if (game_status == GAME_MODE_LEVELS)
3029         HandleChooseLevel(0,0, 999,gi->event.item_position,MB_MENU_INITIALIZE);
3030       else if (game_status == GAME_MODE_SETUP)
3031         HandleSetupScreen(0,0, 999,gi->event.item_position,MB_MENU_INITIALIZE);
3032       break;
3033
3034     default:
3035       break;
3036   }
3037 }