rnd-20030416-4-src
[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
1558     DrawText(mSX, mSY + 64 + i * 32, "..................................",
1559              (entry == highlight_position ? FONT_TEXT_4 : FONT_TEXT_2));
1560     DrawText(mSX, mSY + 64 + i * 32, int2str(entry + 1, 3),
1561              (entry == highlight_position ? FONT_TEXT_4 : FONT_TEXT_2));
1562     DrawText(mSX + 64, mSY + 64 + i * 32, highscore[entry].Name,
1563              (entry == highlight_position ? FONT_TEXT_3 : FONT_TEXT_1));
1564     DrawText(mSX + 14 * 32 + 16, mSY + 64 + i * 32,
1565              int2str(highscore[entry].Score, 5),
1566              (entry == highlight_position ? FONT_TEXT_4 : FONT_TEXT_2));
1567   }
1568 }
1569
1570 void HandleHallOfFame(int mx, int my, int dx, int dy, int button)
1571 {
1572   static int first_entry = 0;
1573   static int highlight_position = 0;
1574   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
1575   int button_released = !button;
1576
1577   if (button == MB_MENU_INITIALIZE)
1578   {
1579     first_entry = 0;
1580     highlight_position = mx;
1581     drawHallOfFameList(first_entry, highlight_position);
1582     return;
1583   }
1584
1585   if (ABS(dy) == SCR_FIELDY)    /* handle KSYM_Page_Up, KSYM_Page_Down */
1586     step = MAX_MENU_ENTRIES_ON_SCREEN - 1;
1587
1588   if (dy < 0)
1589   {
1590     if (first_entry > 0)
1591     {
1592       first_entry -= step;
1593       if (first_entry < 0)
1594         first_entry = 0;
1595
1596       drawHallOfFameList(first_entry, highlight_position);
1597       return;
1598     }
1599   }
1600   else if (dy > 0)
1601   {
1602     if (first_entry + MAX_MENU_ENTRIES_ON_SCREEN < MAX_SCORE_ENTRIES)
1603     {
1604       first_entry += step;
1605       if (first_entry + MAX_MENU_ENTRIES_ON_SCREEN > MAX_SCORE_ENTRIES)
1606         first_entry = MAX(0, MAX_SCORE_ENTRIES - MAX_MENU_ENTRIES_ON_SCREEN);
1607
1608       drawHallOfFameList(first_entry, highlight_position);
1609       return;
1610     }
1611   }
1612
1613   if (button_released)
1614   {
1615     FadeSound(SND_BACKGROUND_SCORES);
1616     game_status = MAINMENU;
1617     DrawMainMenu();
1618   }
1619
1620   BackToFront();
1621
1622   if (game_status == HALLOFFAME)
1623   {
1624     DoAnimation();
1625 #if 1
1626     PlaySound_Menu_Continue(SND_BACKGROUND_SCORES);
1627 #endif
1628   }
1629 }
1630
1631
1632 /* ========================================================================= */
1633 /* setup screen functions                                                    */
1634 /* ========================================================================= */
1635
1636 static struct TokenInfo *setup_info;
1637 static int num_setup_info;
1638
1639 static char *graphics_set_name;
1640 static char *sounds_set_name;
1641 static char *music_set_name;
1642
1643 static void execSetupMain()
1644 {
1645   setup_mode = SETUP_MODE_MAIN;
1646   DrawSetupScreen();
1647 }
1648
1649 static void execSetupGame()
1650 {
1651   setup_mode = SETUP_MODE_GAME;
1652   DrawSetupScreen();
1653 }
1654
1655 static void execSetupEditor()
1656 {
1657   setup_mode = SETUP_MODE_EDITOR;
1658   DrawSetupScreen();
1659 }
1660
1661 static void execSetupGraphics()
1662 {
1663   setup_mode = SETUP_MODE_GRAPHICS;
1664   DrawSetupScreen();
1665 }
1666
1667 static void execSetupSound()
1668 {
1669   setup_mode = SETUP_MODE_SOUND;
1670   DrawSetupScreen();
1671 }
1672
1673 static void execSetupArtwork()
1674 {
1675   /* needed if last screen (setup choice) changed graphics, sounds or music */
1676   ReloadCustomArtwork();
1677
1678   setup.graphics_set = artwork.gfx_current->identifier;
1679   setup.sounds_set = artwork.snd_current->identifier;
1680   setup.music_set = artwork.mus_current->identifier;
1681
1682   /* needed for displaying artwork name instead of artwork identifier */
1683   graphics_set_name = artwork.gfx_current->name;
1684   sounds_set_name = artwork.snd_current->name;
1685   music_set_name = artwork.mus_current->name;
1686
1687   setup_mode = SETUP_MODE_ARTWORK;
1688   DrawSetupScreen();
1689 }
1690
1691 static void execSetupChooseGraphics()
1692 {
1693   setup_mode = SETUP_MODE_CHOOSE_GRAPHICS;
1694   DrawSetupScreen();
1695 }
1696
1697 static void execSetupChooseSounds()
1698 {
1699   setup_mode = SETUP_MODE_CHOOSE_SOUNDS;
1700   DrawSetupScreen();
1701 }
1702
1703 static void execSetupChooseMusic()
1704 {
1705   setup_mode = SETUP_MODE_CHOOSE_MUSIC;
1706   DrawSetupScreen();
1707 }
1708
1709 static void execSetupInput()
1710 {
1711   setup_mode = SETUP_MODE_INPUT;
1712   DrawSetupScreen();
1713 }
1714
1715 static void execSetupShortcut()
1716 {
1717   setup_mode = SETUP_MODE_SHORTCUT;
1718   DrawSetupScreen();
1719 }
1720
1721 static void execExitSetup()
1722 {
1723   game_status = MAINMENU;
1724   DrawMainMenu();
1725 }
1726
1727 static void execSaveAndExitSetup()
1728 {
1729   SaveSetup();
1730   execExitSetup();
1731 }
1732
1733 static struct TokenInfo setup_info_main[] =
1734 {
1735   { TYPE_ENTER_MENU,    execSetupGame,          "Game Settings"         },
1736   { TYPE_ENTER_MENU,    execSetupEditor,        "Editor Settings"       },
1737   { TYPE_ENTER_MENU,    execSetupGraphics,      "Graphics"              },
1738   { TYPE_ENTER_MENU,    execSetupSound,         "Sound & Music"         },
1739   { TYPE_ENTER_MENU,    execSetupArtwork,       "Custom Artwork"        },
1740   { TYPE_ENTER_MENU,    execSetupInput,         "Input Devices"         },
1741   { TYPE_ENTER_MENU,    execSetupShortcut,      "Key Shortcuts"         },
1742   { TYPE_EMPTY,         NULL,                   ""                      },
1743   { TYPE_LEAVE_MENU,    execExitSetup,          "Exit"                  },
1744   { TYPE_LEAVE_MENU,    execSaveAndExitSetup,   "Save and Exit"         },
1745   { 0,                  NULL,                   NULL                    }
1746 };
1747
1748 static struct TokenInfo setup_info_game[] =
1749 {
1750   { TYPE_SWITCH,        &setup.team_mode,       "Team-Mode:"            },
1751   { TYPE_SWITCH,        &setup.handicap,        "Handicap:"             },
1752   { TYPE_SWITCH,        &setup.time_limit,      "Timelimit:"            },
1753   { TYPE_SWITCH,        &setup.autorecord,      "Auto-Record:"          },
1754   { TYPE_EMPTY,         NULL,                   ""                      },
1755   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1756   { 0,                  NULL,                   NULL                    }
1757 };
1758
1759 static struct TokenInfo setup_info_editor[] =
1760 {
1761   { TYPE_STRING,        NULL,                   "Offer Special Elements:"},
1762   { TYPE_SWITCH,        &setup.editor.el_boulderdash,   "BoulderDash:"  },
1763   { TYPE_SWITCH,        &setup.editor.el_emerald_mine,  "Emerald Mine:" },
1764   { TYPE_SWITCH,        &setup.editor.el_more,          "More:"         },
1765   { TYPE_SWITCH,        &setup.editor.el_sokoban,       "Sokoban:"      },
1766   { TYPE_SWITCH,        &setup.editor.el_supaplex,      "Supaplex:"     },
1767   { TYPE_SWITCH,        &setup.editor.el_diamond_caves, "Diamd. Caves:" },
1768   { TYPE_SWITCH,        &setup.editor.el_dx_boulderdash,"DX Boulderd.:" },
1769   { TYPE_SWITCH,        &setup.editor.el_chars,         "Characters:"   },
1770   { TYPE_SWITCH,        &setup.editor.el_custom,        "Custom:"       },
1771   { TYPE_EMPTY,         NULL,                   ""                      },
1772   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1773   { 0,                  NULL,                   NULL                    }
1774 };
1775
1776 static struct TokenInfo setup_info_graphics[] =
1777 {
1778   { TYPE_SWITCH,        &setup.fullscreen,      "Fullscreen:"           },
1779   { TYPE_SWITCH,        &setup.scroll_delay,    "Scroll Delay:"         },
1780   { TYPE_SWITCH,        &setup.soft_scrolling,  "Soft Scroll.:"         },
1781 #if 0
1782   { TYPE_SWITCH,        &setup.double_buffering,"Buffered gfx:"         },
1783   { TYPE_SWITCH,        &setup.fading,          "Fading:"               },
1784 #endif
1785   { TYPE_SWITCH,        &setup.quick_doors,     "Quick Doors:"          },
1786   { TYPE_SWITCH,        &setup.toons,           "Toons:"                },
1787   { TYPE_EMPTY,         NULL,                   ""                      },
1788   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1789   { 0,                  NULL,                   NULL                    }
1790 };
1791
1792 static struct TokenInfo setup_info_sound[] =
1793 {
1794   { TYPE_SWITCH,        &setup.sound,           "Sound:",               },
1795   { TYPE_EMPTY,         NULL,                   ""                      },
1796   { TYPE_SWITCH,        &setup.sound_simple,    "Simple Sound:"         },
1797   { TYPE_SWITCH,        &setup.sound_loops,     "Sound Loops:"          },
1798   { TYPE_SWITCH,        &setup.sound_music,     "Game Music:"           },
1799   { TYPE_EMPTY,         NULL,                   ""                      },
1800   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1801   { 0,                  NULL,                   NULL                    }
1802 };
1803
1804 static struct TokenInfo setup_info_artwork[] =
1805 {
1806   { TYPE_ENTER_MENU,    execSetupChooseGraphics,"Custom Graphics"       },
1807   { TYPE_STRING,        &graphics_set_name,     ""                      },
1808   { TYPE_ENTER_MENU,    execSetupChooseSounds,  "Custom Sounds"         },
1809   { TYPE_STRING,        &sounds_set_name,       ""                      },
1810   { TYPE_ENTER_MENU,    execSetupChooseMusic,   "Custom Music"          },
1811   { TYPE_STRING,        &music_set_name,        ""                      },
1812   { TYPE_EMPTY,         NULL,                   ""                      },
1813   { TYPE_STRING,        NULL,                   "Override Level Artwork:"},
1814   { TYPE_YES_NO,        &setup.override_level_graphics, "Graphics:"     },
1815   { TYPE_YES_NO,        &setup.override_level_sounds,   "Sounds:"       },
1816   { TYPE_YES_NO,        &setup.override_level_music,    "Music:"        },
1817   { TYPE_EMPTY,         NULL,                   ""                      },
1818   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1819   { 0,                  NULL,                   NULL                    }
1820 };
1821
1822 static struct TokenInfo setup_info_shortcut[] =
1823 {
1824   { TYPE_KEYTEXT,       NULL,                   "Quick Save Game:",     },
1825   { TYPE_KEY,           &setup.shortcut.save_game,      ""              },
1826   { TYPE_KEYTEXT,       NULL,                   "Quick Load Game:",     },
1827   { TYPE_KEY,           &setup.shortcut.load_game,      ""              },
1828   { TYPE_KEYTEXT,       NULL,                   "Toggle Pause:",        },
1829   { TYPE_KEY,           &setup.shortcut.toggle_pause,   ""              },
1830   { TYPE_EMPTY,         NULL,                   ""                      },
1831   { TYPE_YES_NO,        &setup.ask_on_escape,   "Ask on Esc:"           },
1832   { TYPE_EMPTY,         NULL,                   ""                      },
1833   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
1834   { 0,                  NULL,                   NULL                    }
1835 };
1836
1837 static Key getSetupKey()
1838 {
1839   Key key = KSYM_UNDEFINED;
1840   boolean got_key_event = FALSE;
1841
1842   while (!got_key_event)
1843   {
1844     if (PendingEvent())         /* got event */
1845     {
1846       Event event;
1847
1848       NextEvent(&event);
1849
1850       switch(event.type)
1851       {
1852         case EVENT_KEYPRESS:
1853           {
1854             key = GetEventKey((KeyEvent *)&event, TRUE);
1855
1856             /* press 'Escape' or 'Enter' to keep the existing key binding */
1857             if (key == KSYM_Escape || key == KSYM_Return)
1858               key = KSYM_UNDEFINED;     /* keep old value */
1859
1860             got_key_event = TRUE;
1861           }
1862           break;
1863
1864         case EVENT_KEYRELEASE:
1865           key_joystick_mapping = 0;
1866           break;
1867
1868         default:
1869           HandleOtherEvents(&event);
1870           break;
1871       }
1872     }
1873
1874     BackToFront();
1875     DoAnimation();
1876
1877     /* don't eat all CPU time */
1878     Delay(10);
1879   }
1880
1881   return key;
1882 }
1883
1884 static void drawSetupValue(int pos)
1885 {
1886   int xpos = MENU_SCREEN_VALUE_XPOS;
1887   int ypos = MENU_SCREEN_START_YPOS + pos;
1888   int font_nr = FONT_VALUE_1;
1889   char *value_string = getSetupValue(setup_info[pos].type & ~TYPE_GHOSTED,
1890                                      setup_info[pos].value);
1891
1892   if (value_string == NULL)
1893     return;
1894
1895   if (setup_info[pos].type & TYPE_KEY)
1896   {
1897     xpos = 3;
1898
1899     if (setup_info[pos].type & TYPE_QUERY)
1900     {
1901       value_string = "<press key>";
1902       font_nr = FONT_INPUT_1_ACTIVE;
1903     }
1904   }
1905   else if (setup_info[pos].type & TYPE_STRING)
1906   {
1907     int max_value_len = (SCR_FIELDX - 2) * 2;
1908
1909     xpos = 1;
1910     font_nr = FONT_VALUE_2;
1911
1912     if (strlen(value_string) > max_value_len)
1913       value_string[max_value_len] = '\0';
1914   }
1915   else if (setup_info[pos].type & TYPE_BOOLEAN_STYLE &&
1916            !*(boolean *)(setup_info[pos].value))
1917     font_nr = FONT_OPTION_OFF;
1918
1919   DrawText(mSX + xpos * 32, mSY + ypos * 32,
1920            (xpos == 3 ? "              " : "   "), font_nr);
1921   DrawText(mSX + xpos * 32, mSY + ypos * 32, value_string, font_nr);
1922 }
1923
1924 static void changeSetupValue(int pos)
1925 {
1926   if (setup_info[pos].type & TYPE_BOOLEAN_STYLE)
1927   {
1928     *(boolean *)setup_info[pos].value ^= TRUE;
1929   }
1930   else if (setup_info[pos].type & TYPE_KEY)
1931   {
1932     Key key;
1933
1934     setup_info[pos].type |= TYPE_QUERY;
1935     drawSetupValue(pos);
1936     setup_info[pos].type &= ~TYPE_QUERY;
1937
1938     key = getSetupKey();
1939     if (key != KSYM_UNDEFINED)
1940       *(Key *)setup_info[pos].value = key;
1941   }
1942
1943   drawSetupValue(pos);
1944 }
1945
1946 static void DrawSetupScreen_Generic()
1947 {
1948   char *title_string = NULL;
1949   int i;
1950
1951   UnmapAllGadgets();
1952   CloseDoor(DOOR_CLOSE_2);
1953
1954   ClearWindow();
1955
1956   if (setup_mode == SETUP_MODE_MAIN)
1957   {
1958     setup_info = setup_info_main;
1959     title_string = "Setup";
1960   }
1961   else if (setup_mode == SETUP_MODE_GAME)
1962   {
1963     setup_info = setup_info_game;
1964     title_string = "Setup Game";
1965   }
1966   else if (setup_mode == SETUP_MODE_EDITOR)
1967   {
1968     setup_info = setup_info_editor;
1969     title_string = "Setup Editor";
1970   }
1971   else if (setup_mode == SETUP_MODE_GRAPHICS)
1972   {
1973     setup_info = setup_info_graphics;
1974     title_string = "Setup Graphics";
1975   }
1976   else if (setup_mode == SETUP_MODE_SOUND)
1977   {
1978     setup_info = setup_info_sound;
1979     title_string = "Setup Sound";
1980   }
1981   else if (setup_mode == SETUP_MODE_ARTWORK)
1982   {
1983     setup_info = setup_info_artwork;
1984     title_string = "Custom Artwork";
1985   }
1986   else if (setup_mode == SETUP_MODE_SHORTCUT)
1987   {
1988     setup_info = setup_info_shortcut;
1989     title_string = "Setup Shortcuts";
1990   }
1991
1992   DrawText(mSX + 16, mSY + 16, title_string, FONT_TITLE_1);
1993
1994   num_setup_info = 0;
1995   for(i=0; setup_info[i].type != 0 && i < MAX_MENU_ENTRIES_ON_SCREEN; i++)
1996   {
1997     void *value_ptr = setup_info[i].value;
1998     int ypos = MENU_SCREEN_START_YPOS + i;
1999     int font_nr = FONT_MENU_1;
2000
2001     /* set some entries to "unchangeable" according to other variables */
2002     if ((value_ptr == &setup.sound       && !audio.sound_available) ||
2003         (value_ptr == &setup.sound_loops && !audio.loops_available) ||
2004         (value_ptr == &setup.sound_music && !audio.music_available) ||
2005         (value_ptr == &setup.fullscreen  && !video.fullscreen_available))
2006       setup_info[i].type |= TYPE_GHOSTED;
2007
2008     if (setup_info[i].type & TYPE_STRING)
2009       font_nr = FONT_MENU_2;
2010
2011     DrawText(mSX + 32, mSY + ypos * 32, setup_info[i].text, font_nr);
2012
2013     if (setup_info[i].type & TYPE_ENTER_MENU)
2014       initCursor(i, IMG_MENU_BUTTON_RIGHT);
2015     else if (setup_info[i].type & TYPE_LEAVE_MENU)
2016       initCursor(i, IMG_MENU_BUTTON_LEFT);
2017     else if (setup_info[i].type & ~TYPE_SKIP_ENTRY)
2018       initCursor(i, IMG_MENU_BUTTON);
2019
2020     if (setup_info[i].type & TYPE_VALUE)
2021       drawSetupValue(i);
2022
2023     num_setup_info++;
2024   }
2025
2026   FadeToFront();
2027   InitAnimation();
2028   HandleSetupScreen_Generic(0,0,0,0,MB_MENU_INITIALIZE);
2029 }
2030
2031 void HandleSetupScreen_Generic(int mx, int my, int dx, int dy, int button)
2032 {
2033   static int choice_store[MAX_SETUP_MODES];
2034   int choice = choice_store[setup_mode];        /* always starts with 0 */
2035   int x = 0;
2036   int y = choice;
2037
2038   if (button == MB_MENU_INITIALIZE)
2039   {
2040     /* advance to first valid menu entry */
2041     while (choice < num_setup_info &&
2042            (setup_info[choice].type & TYPE_SKIP_ENTRY))
2043       choice++;
2044     choice_store[setup_mode] = choice;
2045
2046     drawCursor(choice, FC_RED);
2047     return;
2048   }
2049   else if (button == MB_MENU_LEAVE)
2050   {
2051     for (y=0; y<num_setup_info; y++)
2052     {
2053       if (setup_info[y].type & TYPE_LEAVE_MENU)
2054       {
2055         void (*menu_callback_function)(void) = setup_info[y].value;
2056
2057         menu_callback_function();
2058         break;  /* absolutely needed because function changes 'setup_info'! */
2059       }
2060     }
2061
2062     return;
2063   }
2064
2065   if (mx || my)         /* mouse input */
2066   {
2067     x = (mx - SX) / 32;
2068     y = (my - SY) / 32 - MENU_SCREEN_START_YPOS;
2069   }
2070   else if (dx || dy)    /* keyboard input */
2071   {
2072     if (dx)
2073     {
2074       int menu_navigation_type = (dx < 0 ? TYPE_LEAVE_MENU : TYPE_ENTER_MENU);
2075
2076       if ((setup_info[choice].type & menu_navigation_type) ||
2077           (setup_info[choice].type & TYPE_BOOLEAN_STYLE))
2078         button = MB_MENU_CHOICE;
2079     }
2080     else if (dy)
2081       y = choice + dy;
2082
2083     /* jump to next non-empty menu entry (up or down) */
2084     while (y > 0 && y < num_setup_info - 1 &&
2085            (setup_info[y].type & TYPE_SKIP_ENTRY))
2086       y += dy;
2087   }
2088
2089   if (x == 0 && y >= 0 && y < num_setup_info &&
2090       (setup_info[y].type & ~TYPE_SKIP_ENTRY))
2091   {
2092     if (button)
2093     {
2094       if (y != choice)
2095       {
2096         drawCursor(y, FC_RED);
2097         drawCursor(choice, FC_BLUE);
2098         choice = choice_store[setup_mode] = y;
2099       }
2100     }
2101     else if (!(setup_info[y].type & TYPE_GHOSTED))
2102     {
2103       if (setup_info[y].type & TYPE_ENTER_OR_LEAVE_MENU)
2104       {
2105         void (*menu_callback_function)(void) = setup_info[choice].value;
2106
2107         menu_callback_function();
2108       }
2109       else
2110       {
2111         if ((setup_info[y].type & TYPE_KEYTEXT) &&
2112             (setup_info[y + 1].type & TYPE_KEY))
2113           y++;
2114
2115         if (setup_info[y].type & TYPE_VALUE)
2116           changeSetupValue(y);
2117       }
2118     }
2119   }
2120
2121   BackToFront();
2122
2123   if (game_status == SETUP)
2124     DoAnimation();
2125 }
2126
2127 void DrawSetupScreen_Input()
2128 {
2129   ClearWindow();
2130
2131   DrawText(mSX+16, mSY+16, "Setup Input", FONT_TITLE_1);
2132
2133   initCursor(0, IMG_MENU_BUTTON);
2134   initCursor(1, IMG_MENU_BUTTON);
2135   initCursor(2, IMG_MENU_BUTTON_RIGHT);
2136   initCursor(13, IMG_MENU_BUTTON_LEFT);
2137
2138   drawCursorXY(10, 0, IMG_MENU_BUTTON_LEFT);
2139   drawCursorXY(12, 0, IMG_MENU_BUTTON_RIGHT);
2140
2141   DrawText(mSX+32, mSY+2*32, "Player:", FONT_MENU_1);
2142   DrawText(mSX+32, mSY+3*32, "Device:", FONT_MENU_1);
2143   DrawText(mSX+32, mSY+15*32, "Back",   FONT_MENU_1);
2144
2145 #if 0
2146   DeactivateJoystickForCalibration();
2147   DrawTextFCentered(SYSIZE - 20, FONT_TEXT_4,
2148                     "Joysticks deactivated on this screen");
2149 #endif
2150
2151   HandleSetupScreen_Input(0,0, 0,0, MB_MENU_INITIALIZE);
2152   FadeToFront();
2153   InitAnimation();
2154 }
2155
2156 static void setJoystickDeviceToNr(char *device_name, int device_nr)
2157 {
2158   if (device_name == NULL)
2159     return;
2160
2161   if (device_nr < 0 || device_nr >= MAX_PLAYERS)
2162     device_nr = 0;
2163
2164   if (strlen(device_name) > 1)
2165   {
2166     char c1 = device_name[strlen(device_name) - 1];
2167     char c2 = device_name[strlen(device_name) - 2];
2168
2169     if (c1 >= '0' && c1 <= '9' && !(c2 >= '0' && c2 <= '9'))
2170       device_name[strlen(device_name) - 1] = '0' + (char)(device_nr % 10);
2171   }
2172   else
2173     strncpy(device_name, getDeviceNameFromJoystickNr(device_nr),
2174             strlen(device_name));
2175 }
2176
2177 static void drawPlayerSetupInputInfo(int player_nr)
2178 {
2179   int i;
2180   static struct SetupKeyboardInfo custom_key;
2181   static struct
2182   {
2183     Key *key;
2184     char *text;
2185   } custom[] =
2186   {
2187     { &custom_key.left,  "Joystick Left"  },
2188     { &custom_key.right, "Joystick Right" },
2189     { &custom_key.up,    "Joystick Up"    },
2190     { &custom_key.down,  "Joystick Down"  },
2191     { &custom_key.snap,  "Button 1"       },
2192     { &custom_key.bomb,  "Button 2"       }
2193   };
2194   static char *joystick_name[MAX_PLAYERS] =
2195   {
2196     "Joystick1",
2197     "Joystick2",
2198     "Joystick3",
2199     "Joystick4"
2200   };
2201
2202   custom_key = setup.input[player_nr].key;
2203
2204   DrawText(mSX+11*32, mSY+2*32, int2str(player_nr +1, 1), FONT_INPUT_1_ACTIVE);
2205 #if 1
2206   DrawGraphicThruMaskExt(drawto, mSX + 8 * TILEX, mSY + 2 * TILEY,
2207                          PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0);
2208 #else
2209   DrawGraphicThruMask(8, 2, PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0);
2210 #endif
2211
2212   if (setup.input[player_nr].use_joystick)
2213   {
2214     char *device_name = setup.input[player_nr].joy.device_name;
2215
2216     DrawText(mSX+8*32, mSY+3*32,
2217              joystick_name[getJoystickNrFromDeviceName(device_name)],
2218              FONT_VALUE_1);
2219     DrawText(mSX+32, mSY+4*32, "Calibrate", FONT_MENU_1);
2220   }
2221   else
2222   {
2223     DrawText(mSX+8*32, mSY+3*32, "Keyboard ", FONT_VALUE_1);
2224     DrawText(mSX+32,   mSY+4*32, "Customize", FONT_MENU_1);
2225   }
2226
2227   DrawText(mSX+32, mSY+5*32, "Actual Settings:", FONT_MENU_1);
2228   drawCursorXY(1, 4, IMG_MENU_BUTTON_LEFT);
2229   drawCursorXY(1, 5, IMG_MENU_BUTTON_RIGHT);
2230   drawCursorXY(1, 6, IMG_MENU_BUTTON_UP);
2231   drawCursorXY(1, 7, IMG_MENU_BUTTON_DOWN);
2232   DrawText(mSX+2*32, mSY+6*32, ":", FONT_VALUE_OLD);
2233   DrawText(mSX+2*32, mSY+7*32, ":", FONT_VALUE_OLD);
2234   DrawText(mSX+2*32, mSY+8*32, ":", FONT_VALUE_OLD);
2235   DrawText(mSX+2*32, mSY+9*32, ":", FONT_VALUE_OLD);
2236   DrawText(mSX+32, mSY+10*32, "Snap Field:", FONT_VALUE_OLD);
2237   DrawText(mSX+32, mSY+12*32, "Place Bomb:", FONT_VALUE_OLD);
2238
2239   for (i=0; i<6; i++)
2240   {
2241     int ypos = 6 + i + (i > 3 ? i-3 : 0);
2242
2243     DrawText(mSX + 3*32, mSY + ypos*32,
2244              "              ", FONT_VALUE_1);
2245     DrawText(mSX + 3*32, mSY + ypos*32,
2246              (setup.input[player_nr].use_joystick ?
2247               custom[i].text :
2248               getKeyNameFromKey(*custom[i].key)), FONT_VALUE_1);
2249   }
2250 }
2251
2252 void HandleSetupScreen_Input(int mx, int my, int dx, int dy, int button)
2253 {
2254   static int choice = 0;
2255   static int player_nr = 0;
2256   int x = 0;
2257   int y = choice;
2258   int pos_start  = SETUPINPUT_SCREEN_POS_START;
2259   int pos_empty1 = SETUPINPUT_SCREEN_POS_EMPTY1;
2260   int pos_empty2 = SETUPINPUT_SCREEN_POS_EMPTY2;
2261   int pos_end    = SETUPINPUT_SCREEN_POS_END;
2262
2263   if (button == MB_MENU_INITIALIZE)
2264   {
2265     drawPlayerSetupInputInfo(player_nr);
2266     drawCursor(choice, FC_RED);
2267     return;
2268   }
2269   else if (button == MB_MENU_LEAVE)
2270   {
2271     setup_mode = SETUP_MODE_MAIN;
2272     DrawSetupScreen();
2273     InitJoysticks();
2274   }
2275
2276   if (mx || my)         /* mouse input */
2277   {
2278     x = (mx - SX) / 32;
2279     y = (my - SY) / 32 - MENU_SCREEN_START_YPOS;
2280   }
2281   else if (dx || dy)    /* keyboard input */
2282   {
2283     if (dx && choice == 0)
2284       x = (dx < 0 ? 10 : 12);
2285     else if ((dx && choice == 1) ||
2286              (dx == +1 && choice == 2) ||
2287              (dx == -1 && choice == pos_end))
2288       button = MB_MENU_CHOICE;
2289     else if (dy)
2290       y = choice + dy;
2291
2292     if (y >= pos_empty1 && y <= pos_empty2)
2293       y = (dy > 0 ? pos_empty2 + 1 : pos_empty1 - 1);
2294   }
2295
2296   if (y == 0 && ((x == 0 && !button) || ((x == 10 || x == 12) && button)))
2297   {
2298     static unsigned long delay = 0;
2299
2300     if (!DelayReached(&delay, GADGET_FRAME_DELAY))
2301       goto out;
2302
2303     player_nr = (player_nr + (x == 10 ? -1 : +1) + MAX_PLAYERS) % MAX_PLAYERS;
2304
2305     drawPlayerSetupInputInfo(player_nr);
2306   }
2307   else if (x == 0 && y >= pos_start && y <= pos_end &&
2308            !(y >= pos_empty1 && y <= pos_empty2))
2309   {
2310     if (button)
2311     {
2312       if (y != choice)
2313       {
2314         drawCursor(y, FC_RED);
2315         drawCursor(choice, FC_BLUE);
2316         choice = y;
2317       }
2318     }
2319     else
2320     {
2321       if (y == 1)
2322       {
2323         char *device_name = setup.input[player_nr].joy.device_name;
2324
2325         if (!setup.input[player_nr].use_joystick)
2326         {
2327           int new_device_nr = (dx >= 0 ? 0 : MAX_PLAYERS - 1);
2328
2329           setJoystickDeviceToNr(device_name, new_device_nr);
2330           setup.input[player_nr].use_joystick = TRUE;
2331         }
2332         else
2333         {
2334           int device_nr = getJoystickNrFromDeviceName(device_name);
2335           int new_device_nr = device_nr + (dx >= 0 ? +1 : -1);
2336
2337           if (new_device_nr < 0 || new_device_nr >= MAX_PLAYERS)
2338             setup.input[player_nr].use_joystick = FALSE;
2339           else
2340             setJoystickDeviceToNr(device_name, new_device_nr);
2341         }
2342
2343         drawPlayerSetupInputInfo(player_nr);
2344       }
2345       else if (y == 2)
2346       {
2347         if (setup.input[player_nr].use_joystick)
2348         {
2349           InitJoysticks();
2350           CalibrateJoystick(player_nr);
2351         }
2352         else
2353           CustomizeKeyboard(player_nr);
2354       }
2355       else if (y == pos_end)
2356       {
2357         InitJoysticks();
2358
2359         setup_mode = SETUP_MODE_MAIN;
2360         DrawSetupScreen();
2361       }
2362     }
2363   }
2364
2365   BackToFront();
2366
2367   out:
2368
2369   if (game_status == SETUP)
2370     DoAnimation();
2371 }
2372
2373 void CustomizeKeyboard(int player_nr)
2374 {
2375   int i;
2376   int step_nr;
2377   boolean finished = FALSE;
2378   static struct SetupKeyboardInfo custom_key;
2379   static struct
2380   {
2381     Key *key;
2382     char *text;
2383   } customize_step[] =
2384   {
2385     { &custom_key.left,  "Move Left"  },
2386     { &custom_key.right, "Move Right" },
2387     { &custom_key.up,    "Move Up"    },
2388     { &custom_key.down,  "Move Down"  },
2389     { &custom_key.snap,  "Snap Field" },
2390     { &custom_key.bomb,  "Place Bomb" }
2391   };
2392
2393   /* read existing key bindings from player setup */
2394   custom_key = setup.input[player_nr].key;
2395
2396   ClearWindow();
2397   DrawText(mSX + 16, mSY + 16, "Keyboard Input", FONT_TITLE_1);
2398
2399   BackToFront();
2400   InitAnimation();
2401
2402   step_nr = 0;
2403   DrawText(mSX, mSY + (2+2*step_nr)*32,
2404            customize_step[step_nr].text, FONT_INPUT_1_ACTIVE);
2405   DrawText(mSX, mSY + (2+2*step_nr+1)*32,
2406            "Key:", FONT_INPUT_1_ACTIVE);
2407   DrawText(mSX + 4*32, mSY + (2+2*step_nr+1)*32,
2408            getKeyNameFromKey(*customize_step[step_nr].key), FONT_VALUE_OLD);
2409
2410   while(!finished)
2411   {
2412     if (PendingEvent())         /* got event */
2413     {
2414       Event event;
2415
2416       NextEvent(&event);
2417
2418       switch(event.type)
2419       {
2420         case EVENT_KEYPRESS:
2421           {
2422             Key key = GetEventKey((KeyEvent *)&event, FALSE);
2423
2424             if (key == KSYM_Escape || (key == KSYM_Return && step_nr == 6))
2425             {
2426               finished = TRUE;
2427               break;
2428             }
2429
2430             /* all keys configured -- wait for "Escape" or "Return" key */
2431             if (step_nr == 6)
2432               break;
2433
2434             /* press 'Enter' to keep the existing key binding */
2435             if (key == KSYM_Return)
2436               key = *customize_step[step_nr].key;
2437
2438             /* check if key already used */
2439             for (i=0; i<step_nr; i++)
2440               if (*customize_step[i].key == key)
2441                 break;
2442             if (i < step_nr)
2443               break;
2444
2445             /* got new key binding */
2446             *customize_step[step_nr].key = key;
2447             DrawText(mSX + 4*32, mSY + (2+2*step_nr+1)*32,
2448                      "             ", FONT_VALUE_1);
2449             DrawText(mSX + 4*32, mSY + (2+2*step_nr+1)*32,
2450                      getKeyNameFromKey(key), FONT_VALUE_1);
2451             step_nr++;
2452
2453             /* un-highlight last query */
2454             DrawText(mSX, mSY+(2+2*(step_nr-1))*32,
2455                      customize_step[step_nr-1].text, FONT_MENU_1);
2456             DrawText(mSX, mSY+(2+2*(step_nr-1)+1)*32,
2457                      "Key:", FONT_MENU_1);
2458
2459             /* press 'Enter' to leave */
2460             if (step_nr == 6)
2461             {
2462               DrawText(mSX + 16, mSY + 15*32+16,
2463                        "Press Enter", FONT_TITLE_1);
2464               break;
2465             }
2466
2467             /* query next key binding */
2468             DrawText(mSX, mSY+(2+2*step_nr)*32,
2469                      customize_step[step_nr].text, FONT_INPUT_1_ACTIVE);
2470             DrawText(mSX, mSY+(2+2*step_nr+1)*32,
2471                      "Key:", FONT_INPUT_1_ACTIVE);
2472             DrawText(mSX + 4*32, mSY+(2+2*step_nr+1)*32,
2473                      getKeyNameFromKey(*customize_step[step_nr].key),
2474                      FONT_VALUE_OLD);
2475           }
2476           break;
2477
2478         case EVENT_KEYRELEASE:
2479           key_joystick_mapping = 0;
2480           break;
2481
2482         default:
2483           HandleOtherEvents(&event);
2484           break;
2485       }
2486     }
2487
2488     BackToFront();
2489     DoAnimation();
2490
2491     /* don't eat all CPU time */
2492     Delay(10);
2493   }
2494
2495   /* write new key bindings back to player setup */
2496   setup.input[player_nr].key = custom_key;
2497
2498   StopAnimation();
2499   DrawSetupScreen_Input();
2500 }
2501
2502 static boolean CalibrateJoystickMain(int player_nr)
2503 {
2504   int new_joystick_xleft = JOYSTICK_XMIDDLE;
2505   int new_joystick_xright = JOYSTICK_XMIDDLE;
2506   int new_joystick_yupper = JOYSTICK_YMIDDLE;
2507   int new_joystick_ylower = JOYSTICK_YMIDDLE;
2508   int new_joystick_xmiddle, new_joystick_ymiddle;
2509
2510   int joystick_fd = joystick.fd[player_nr];
2511   int x, y, last_x, last_y, xpos = 8, ypos = 3;
2512   boolean check[3][3];
2513   int check_remaining = 3 * 3;
2514   int joy_x, joy_y;
2515   int joy_value;
2516   int result = -1;
2517
2518   if (joystick.status == JOYSTICK_NOT_AVAILABLE)
2519     return FALSE;
2520
2521   if (joystick_fd < 0 || !setup.input[player_nr].use_joystick)
2522     return FALSE;
2523
2524   ClearWindow();
2525
2526   for(y=0; y < 3; y++)
2527   {
2528     for(x=0; x < 3; x++)
2529     {
2530       DrawGraphic(xpos + x - 1, ypos + y - 1, IMG_MENU_CALIBRATE_BLUE, 0);
2531       check[x][y] = FALSE;
2532     }
2533   }
2534
2535   DrawText(mSX,      mSY +  6 * 32, " ROTATE JOYSTICK ", FONT_TITLE_1);
2536   DrawText(mSX,      mSY +  7 * 32, "IN ALL DIRECTIONS", FONT_TITLE_1);
2537   DrawText(mSX + 16, mSY +  9 * 32, "  IF ALL BALLS  ",  FONT_TITLE_1);
2538   DrawText(mSX,      mSY + 10 * 32, "   ARE YELLOW,   ", FONT_TITLE_1);
2539   DrawText(mSX,      mSY + 11 * 32, " CENTER JOYSTICK ", FONT_TITLE_1);
2540   DrawText(mSX,      mSY + 12 * 32, "       AND       ", FONT_TITLE_1);
2541   DrawText(mSX,      mSY + 13 * 32, "PRESS ANY BUTTON!", FONT_TITLE_1);
2542
2543   joy_value = Joystick(player_nr);
2544   last_x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
2545   last_y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
2546
2547   /* eventually uncalibrated center position (joystick could be uncentered) */
2548   if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
2549     return FALSE;
2550
2551   new_joystick_xmiddle = joy_x;
2552   new_joystick_ymiddle = joy_y;
2553
2554   DrawGraphic(xpos + last_x, ypos + last_y, IMG_MENU_CALIBRATE_RED, 0);
2555   BackToFront();
2556
2557   while(Joystick(player_nr) & JOY_BUTTON);      /* wait for released button */
2558   InitAnimation();
2559
2560   while(result < 0)
2561   {
2562     if (PendingEvent())         /* got event */
2563     {
2564       Event event;
2565
2566       NextEvent(&event);
2567
2568       switch(event.type)
2569       {
2570         case EVENT_KEYPRESS:
2571           switch(GetEventKey((KeyEvent *)&event, TRUE))
2572           {
2573             case KSYM_Return:
2574               if (check_remaining == 0)
2575                 result = 1;
2576               break;
2577
2578             case KSYM_Escape:
2579               result = 0;
2580               break;
2581
2582             default:
2583               break;
2584           }
2585           break;
2586
2587         case EVENT_KEYRELEASE:
2588           key_joystick_mapping = 0;
2589           break;
2590
2591         default:
2592           HandleOtherEvents(&event);
2593           break;
2594       }
2595     }
2596
2597     if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
2598       return FALSE;
2599
2600     new_joystick_xleft  = MIN(new_joystick_xleft,  joy_x);
2601     new_joystick_xright = MAX(new_joystick_xright, joy_x);
2602     new_joystick_yupper = MIN(new_joystick_yupper, joy_y);
2603     new_joystick_ylower = MAX(new_joystick_ylower, joy_y);
2604
2605     setup.input[player_nr].joy.xleft = new_joystick_xleft;
2606     setup.input[player_nr].joy.yupper = new_joystick_yupper;
2607     setup.input[player_nr].joy.xright = new_joystick_xright;
2608     setup.input[player_nr].joy.ylower = new_joystick_ylower;
2609     setup.input[player_nr].joy.xmiddle = new_joystick_xmiddle;
2610     setup.input[player_nr].joy.ymiddle = new_joystick_ymiddle;
2611
2612     CheckJoystickData();
2613
2614     joy_value = Joystick(player_nr);
2615
2616     if (joy_value & JOY_BUTTON && check_remaining == 0)
2617       result = 1;
2618
2619     x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
2620     y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
2621
2622     if (x != last_x || y != last_y)
2623     {
2624       DrawGraphic(xpos + last_x, ypos + last_y, IMG_MENU_CALIBRATE_YELLOW, 0);
2625       DrawGraphic(xpos + x,      ypos + y,      IMG_MENU_CALIBRATE_RED,    0);
2626
2627       last_x = x;
2628       last_y = y;
2629
2630       if (check_remaining > 0 && !check[x+1][y+1])
2631       {
2632         check[x+1][y+1] = TRUE;
2633         check_remaining--;
2634       }
2635
2636 #if 0
2637 #ifdef DEBUG
2638       printf("LEFT / MIDDLE / RIGHT == %d / %d / %d\n",
2639              setup.input[player_nr].joy.xleft,
2640              setup.input[player_nr].joy.xmiddle,
2641              setup.input[player_nr].joy.xright);
2642       printf("UP / MIDDLE / DOWN == %d / %d / %d\n",
2643              setup.input[player_nr].joy.yupper,
2644              setup.input[player_nr].joy.ymiddle,
2645              setup.input[player_nr].joy.ylower);
2646 #endif
2647 #endif
2648
2649     }
2650
2651     BackToFront();
2652     DoAnimation();
2653
2654     /* don't eat all CPU time */
2655     Delay(10);
2656   }
2657
2658   /* calibrated center position (joystick should now be centered) */
2659   if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
2660     return FALSE;
2661
2662   new_joystick_xmiddle = joy_x;
2663   new_joystick_ymiddle = joy_y;
2664
2665   StopAnimation();
2666
2667   DrawSetupScreen_Input();
2668
2669   /* wait until the last pressed button was released */
2670   while (Joystick(player_nr) & JOY_BUTTON)
2671   {
2672     if (PendingEvent())         /* got event */
2673     {
2674       Event event;
2675
2676       NextEvent(&event);
2677       HandleOtherEvents(&event);
2678
2679       Delay(10);
2680     }
2681   }
2682
2683   return TRUE;
2684 }
2685
2686 void CalibrateJoystick(int player_nr)
2687 {
2688   if (!CalibrateJoystickMain(player_nr))
2689   {
2690     ClearWindow();
2691
2692     DrawText(mSX + 16, mSY + 6*32, "  JOYSTICK NOT  ",  FONT_TITLE_1);
2693     DrawText(mSX,      mSY + 7*32, "    AVAILABLE    ", FONT_TITLE_1);
2694     BackToFront();
2695     Delay(2000);        /* show error message for two seconds */
2696   }
2697 }
2698
2699 void DrawSetupScreen()
2700 {
2701   DeactivateJoystick();
2702
2703   SetMainBackgroundImage(IMG_BACKGROUND_SETUP);
2704
2705   if (setup_mode == SETUP_MODE_INPUT)
2706     DrawSetupScreen_Input();
2707   else if (setup_mode == SETUP_MODE_CHOOSE_GRAPHICS)
2708     DrawChooseTree(&artwork.gfx_current);
2709   else if (setup_mode == SETUP_MODE_CHOOSE_SOUNDS)
2710     DrawChooseTree(&artwork.snd_current);
2711   else if (setup_mode == SETUP_MODE_CHOOSE_MUSIC)
2712     DrawChooseTree(&artwork.mus_current);
2713   else
2714     DrawSetupScreen_Generic();
2715 }
2716
2717 void HandleSetupScreen(int mx, int my, int dx, int dy, int button)
2718 {
2719   if (setup_mode == SETUP_MODE_INPUT)
2720     HandleSetupScreen_Input(mx, my, dx, dy, button);
2721   else if (setup_mode == SETUP_MODE_CHOOSE_GRAPHICS)
2722     HandleChooseTree(mx, my, dx, dy, button, &artwork.gfx_current);
2723   else if (setup_mode == SETUP_MODE_CHOOSE_SOUNDS)
2724     HandleChooseTree(mx, my, dx, dy, button, &artwork.snd_current);
2725   else if (setup_mode == SETUP_MODE_CHOOSE_MUSIC)
2726     HandleChooseTree(mx, my, dx, dy, button, &artwork.mus_current);
2727   else
2728     HandleSetupScreen_Generic(mx, my, dx, dy, button);
2729 }
2730
2731 void HandleGameActions()
2732 {
2733   if (game_status != PLAYING)
2734     return;
2735
2736   if (local_player->LevelSolved)
2737     GameWon();
2738
2739   if (AllPlayersGone && !TAPE_IS_STOPPED(tape))
2740     TapeStop();
2741
2742   GameActions();
2743
2744   BackToFront();
2745 }
2746
2747 /* ---------- new screen button stuff -------------------------------------- */
2748
2749 /* graphic position and size values for buttons and scrollbars */
2750 #define SC_SCROLLBUTTON_XSIZE           32
2751 #define SC_SCROLLBUTTON_YSIZE           32
2752
2753 #define SC_SCROLL_UP_XPOS               (SXSIZE - SC_SCROLLBUTTON_XSIZE)
2754 #define SC_SCROLL_UP_YPOS               SC_SCROLLBUTTON_YSIZE
2755 #define SC_SCROLL_DOWN_XPOS             SC_SCROLL_UP_XPOS
2756 #define SC_SCROLL_DOWN_YPOS             (SYSIZE - SC_SCROLLBUTTON_YSIZE)
2757 #define SC_SCROLL_VERTICAL_XPOS         SC_SCROLL_UP_XPOS
2758 #define SC_SCROLL_VERTICAL_YPOS   (SC_SCROLL_UP_YPOS + SC_SCROLLBUTTON_YSIZE)
2759 #define SC_SCROLL_VERTICAL_XSIZE        SC_SCROLLBUTTON_XSIZE
2760 #define SC_SCROLL_VERTICAL_YSIZE        (SYSIZE - 3 * SC_SCROLLBUTTON_YSIZE)
2761
2762 #define SC_BORDER_SIZE                  14
2763
2764 static struct
2765 {
2766   int gfx_unpressed, gfx_pressed;
2767   int x, y;
2768   int gadget_id;
2769   char *infotext;
2770 } scrollbutton_info[NUM_SCREEN_SCROLLBUTTONS] =
2771 {
2772   {
2773     IMG_MENU_BUTTON_UP, IMG_MENU_BUTTON_UP_ACTIVE,
2774     SC_SCROLL_UP_XPOS, SC_SCROLL_UP_YPOS,
2775     SCREEN_CTRL_ID_SCROLL_UP,
2776     "scroll up"
2777   },
2778   {
2779     IMG_MENU_BUTTON_DOWN, IMG_MENU_BUTTON_DOWN_ACTIVE,
2780     SC_SCROLL_DOWN_XPOS, SC_SCROLL_DOWN_YPOS,
2781     SCREEN_CTRL_ID_SCROLL_DOWN,
2782     "scroll down"
2783   }
2784 };
2785
2786 static struct
2787 {
2788 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2789   Bitmap **gfx_unpressed, **gfx_pressed;
2790 #else
2791   int gfx_unpressed, gfx_pressed;
2792 #endif
2793   int x, y;
2794   int width, height;
2795   int type;
2796   int gadget_id;
2797   char *infotext;
2798 } scrollbar_info[NUM_SCREEN_SCROLLBARS] =
2799 {
2800   {
2801 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2802     &scrollbar_bitmap[0], &scrollbar_bitmap[1],
2803 #else
2804     IMG_MENU_SCROLLBAR, IMG_MENU_SCROLLBAR_ACTIVE,
2805 #endif
2806     SX + SC_SCROLL_VERTICAL_XPOS, SY + SC_SCROLL_VERTICAL_YPOS,
2807     SC_SCROLL_VERTICAL_XSIZE, SC_SCROLL_VERTICAL_YSIZE,
2808     GD_TYPE_SCROLLBAR_VERTICAL,
2809     SCREEN_CTRL_ID_SCROLL_VERTICAL,
2810     "scroll level series vertically"
2811   }
2812 };
2813
2814 static void CreateScreenScrollbuttons()
2815 {
2816   struct GadgetInfo *gi;
2817   unsigned long event_mask;
2818   int i;
2819
2820   for (i=0; i<NUM_SCREEN_SCROLLBUTTONS; i++)
2821   {
2822     Bitmap *gd_bitmap_unpressed, *gd_bitmap_pressed;
2823     int gfx_unpressed, gfx_pressed;
2824     int x, y, width, height;
2825     int gd_x1, gd_x2, gd_y1, gd_y2;
2826     int id = scrollbutton_info[i].gadget_id;
2827
2828     x = scrollbutton_info[i].x;
2829     y = scrollbutton_info[i].y;
2830
2831     event_mask = GD_EVENT_PRESSED | GD_EVENT_REPEATED;
2832
2833     x += SX;
2834     y += SY;
2835     width = SC_SCROLLBUTTON_XSIZE;
2836     height = SC_SCROLLBUTTON_YSIZE;
2837
2838     gfx_unpressed = scrollbutton_info[i].gfx_unpressed;
2839     gfx_pressed   = scrollbutton_info[i].gfx_pressed;
2840     gd_bitmap_unpressed = graphic_info[gfx_unpressed].bitmap;
2841     gd_bitmap_pressed   = graphic_info[gfx_pressed].bitmap;
2842     gd_x1 = graphic_info[gfx_unpressed].src_x;
2843     gd_y1 = graphic_info[gfx_unpressed].src_y;
2844     gd_x2 = graphic_info[gfx_pressed].src_x;
2845     gd_y2 = graphic_info[gfx_pressed].src_y;
2846
2847     gi = CreateGadget(GDI_CUSTOM_ID, id,
2848                       GDI_CUSTOM_TYPE_ID, i,
2849                       GDI_INFO_TEXT, scrollbutton_info[i].infotext,
2850                       GDI_X, x,
2851                       GDI_Y, y,
2852                       GDI_WIDTH, width,
2853                       GDI_HEIGHT, height,
2854                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
2855                       GDI_STATE, GD_BUTTON_UNPRESSED,
2856                       GDI_DESIGN_UNPRESSED, gd_bitmap_unpressed, gd_x1, gd_y1,
2857                       GDI_DESIGN_PRESSED, gd_bitmap_pressed, gd_x2, gd_y2,
2858                       GDI_EVENT_MASK, event_mask,
2859                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
2860                       GDI_END);
2861
2862     if (gi == NULL)
2863       Error(ERR_EXIT, "cannot create gadget");
2864
2865     screen_gadget[id] = gi;
2866   }
2867 }
2868
2869 static void CreateScreenScrollbars()
2870 {
2871   int i;
2872
2873   for (i=0; i<NUM_SCREEN_SCROLLBARS; i++)
2874   {
2875     Bitmap *gd_bitmap_unpressed, *gd_bitmap_pressed;
2876 #if !defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2877     int gfx_unpressed, gfx_pressed;
2878 #endif
2879     int gd_x1, gd_x2, gd_y1, gd_y2;
2880     struct GadgetInfo *gi;
2881     int items_max, items_visible, item_position;
2882     unsigned long event_mask;
2883     int num_page_entries = MAX_MENU_ENTRIES_ON_SCREEN - 1;
2884     int id = scrollbar_info[i].gadget_id;
2885
2886     items_max = num_page_entries;
2887     items_visible = num_page_entries;
2888     item_position = 0;
2889
2890     event_mask = GD_EVENT_MOVING | GD_EVENT_OFF_BORDERS;
2891
2892 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2893     gd_bitmap_unpressed = *scrollbar_info[i].gfx_unpressed;
2894     gd_bitmap_pressed   = *scrollbar_info[i].gfx_pressed;
2895     gd_x1 = 0;
2896     gd_y1 = 0;
2897     gd_x2 = 0;
2898     gd_y2 = 0;
2899 #else
2900     gfx_unpressed = scrollbar_info[i].gfx_unpressed;
2901     gfx_pressed   = scrollbar_info[i].gfx_pressed;
2902     gd_bitmap_unpressed = graphic_info[gfx_unpressed].bitmap;
2903     gd_bitmap_pressed   = graphic_info[gfx_pressed].bitmap;
2904     gd_x1 = graphic_info[gfx_unpressed].src_x;
2905     gd_y1 = graphic_info[gfx_unpressed].src_y;
2906     gd_x2 = graphic_info[gfx_pressed].src_x;
2907     gd_y2 = graphic_info[gfx_pressed].src_y;
2908 #endif
2909
2910     gi = CreateGadget(GDI_CUSTOM_ID, id,
2911                       GDI_CUSTOM_TYPE_ID, i,
2912                       GDI_INFO_TEXT, scrollbar_info[i].infotext,
2913                       GDI_X, scrollbar_info[i].x,
2914                       GDI_Y, scrollbar_info[i].y,
2915                       GDI_WIDTH, scrollbar_info[i].width,
2916                       GDI_HEIGHT, scrollbar_info[i].height,
2917                       GDI_TYPE, scrollbar_info[i].type,
2918                       GDI_SCROLLBAR_ITEMS_MAX, items_max,
2919                       GDI_SCROLLBAR_ITEMS_VISIBLE, items_visible,
2920                       GDI_SCROLLBAR_ITEM_POSITION, item_position,
2921                       GDI_STATE, GD_BUTTON_UNPRESSED,
2922                       GDI_DESIGN_UNPRESSED, gd_bitmap_unpressed, gd_x1, gd_y1,
2923                       GDI_DESIGN_PRESSED, gd_bitmap_pressed, gd_x2, gd_y2,
2924                       GDI_BORDER_SIZE, SC_BORDER_SIZE, SC_BORDER_SIZE,
2925                       GDI_EVENT_MASK, event_mask,
2926                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
2927                       GDI_END);
2928
2929     if (gi == NULL)
2930       Error(ERR_EXIT, "cannot create gadget");
2931
2932     screen_gadget[id] = gi;
2933   }
2934 }
2935
2936 void CreateScreenGadgets()
2937 {
2938 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2939   int i;
2940
2941   for (i=0; i < NUM_SCROLLBAR_BITMAPS; i++)
2942   {
2943     scrollbar_bitmap[i] = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
2944
2945     /* copy pointers to clip mask and GC */
2946     scrollbar_bitmap[i]->clip_mask =
2947       graphic_info[IMG_MENU_SCROLLBAR + i].clip_mask;
2948     scrollbar_bitmap[i]->stored_clip_gc =
2949       graphic_info[IMG_MENU_SCROLLBAR + i].clip_gc;
2950
2951     BlitBitmap(graphic_info[IMG_MENU_SCROLLBAR + i].bitmap,
2952                scrollbar_bitmap[i],
2953                graphic_info[IMG_MENU_SCROLLBAR + i].src_x,
2954                graphic_info[IMG_MENU_SCROLLBAR + i].src_y,
2955                TILEX, TILEY, 0, 0);
2956   }
2957 #endif
2958
2959   CreateScreenScrollbuttons();
2960   CreateScreenScrollbars();
2961 }
2962
2963 void FreeScreenGadgets()
2964 {
2965   int i;
2966
2967 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
2968   for (i=0; i < NUM_SCROLLBAR_BITMAPS; i++)
2969   {
2970     /* prevent freeing clip mask and GC twice */
2971     scrollbar_bitmap[i]->clip_mask = None;
2972     scrollbar_bitmap[i]->stored_clip_gc = None;
2973
2974     FreeBitmap(scrollbar_bitmap[i]);
2975   }
2976 #endif
2977
2978   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2979     FreeGadget(screen_gadget[i]);
2980 }
2981
2982 void MapChooseTreeGadgets(TreeInfo *ti)
2983 {
2984   int num_entries = numTreeInfoInGroup(ti);
2985   int i;
2986
2987   if (num_entries <= MAX_MENU_ENTRIES_ON_SCREEN)
2988     return;
2989
2990   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2991     MapGadget(screen_gadget[i]);
2992 }
2993
2994 void UnmapChooseTreeGadgets()
2995 {
2996   int i;
2997
2998   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2999     UnmapGadget(screen_gadget[i]);
3000 }
3001
3002 static void HandleScreenGadgets(struct GadgetInfo *gi)
3003 {
3004   int id = gi->custom_id;
3005
3006   if (game_status != CHOOSELEVEL && game_status != SETUP)
3007     return;
3008
3009   switch (id)
3010   {
3011     case SCREEN_CTRL_ID_SCROLL_UP:
3012       if (game_status == CHOOSELEVEL)
3013         HandleChooseLevel(SX,SY + 32, 0,0, MB_MENU_MARK);
3014       else if (game_status == SETUP)
3015         HandleSetupScreen(SX,SY + 32, 0,0, MB_MENU_MARK);
3016       break;
3017
3018     case SCREEN_CTRL_ID_SCROLL_DOWN:
3019       if (game_status == CHOOSELEVEL)
3020         HandleChooseLevel(SX,SY + SYSIZE - 32, 0,0, MB_MENU_MARK);
3021       else if (game_status == SETUP)
3022         HandleSetupScreen(SX,SY + SYSIZE - 32, 0,0, MB_MENU_MARK);
3023       break;
3024
3025     case SCREEN_CTRL_ID_SCROLL_VERTICAL:
3026       if (game_status == CHOOSELEVEL)
3027         HandleChooseLevel(0,0, 999,gi->event.item_position,MB_MENU_INITIALIZE);
3028       else if (game_status == SETUP)
3029         HandleSetupScreen(0,0, 999,gi->event.item_position,MB_MENU_INITIALIZE);
3030       break;
3031
3032     default:
3033       break;
3034   }
3035 }