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