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_1           4
  33 #define SETUP_MODE_SHORTCUT_2           5
  34 #define SETUP_MODE_GRAPHICS             6
  35 #define SETUP_MODE_SOUND                7
  36 #define SETUP_MODE_ARTWORK              8
  37 #define SETUP_MODE_CHOOSE_GRAPHICS      9
  38 #define SETUP_MODE_CHOOSE_SOUNDS        10
  39 #define SETUP_MODE_CHOOSE_MUSIC         11
  40
  41 #define MAX_SETUP_MODES                 12
  42
  43 /* for input setup functions */
  44 #define SETUPINPUT_SCREEN_POS_START     0
  45 #define SETUPINPUT_SCREEN_POS_END       (SCR_FIELDY - 4)
  46 #define SETUPINPUT_SCREEN_POS_EMPTY1    (SETUPINPUT_SCREEN_POS_START + 3)
  47 #define SETUPINPUT_SCREEN_POS_EMPTY2    (SETUPINPUT_SCREEN_POS_END - 1)
  48
  49 /* screens on the info screen */
  50 #define INFO_MODE_MAIN                  0
  51 #define INFO_MODE_TITLESCREEN           1
  52 #define INFO_MODE_ELEMENTS              2
  53 #define INFO_MODE_MUSIC                 3
  54 #define INFO_MODE_CREDITS               4
  55 #define INFO_MODE_PROGRAM               5
  56 #define INFO_MODE_LEVELSET              6
  57
  58 #define MAX_INFO_MODES                  7
  59
  60 /* for various menu stuff  */
  61 #define MENU_SCREEN_START_XPOS          1
  62 #define MENU_SCREEN_START_YPOS          2
  63 #define MENU_SCREEN_VALUE_XPOS          14
  64 #define MENU_SCREEN_MAX_XPOS            (SCR_FIELDX - 1)
  65 #define MENU_TITLE1_YPOS                8
  66 #define MENU_TITLE2_YPOS                46
  67 #define MAX_INFO_ELEMENTS_ON_SCREEN     10
  68 #define MAX_MENU_ENTRIES_ON_SCREEN      (SCR_FIELDY - MENU_SCREEN_START_YPOS)
  69 #define MAX_MENU_TEXT_LENGTH_BIG        (MENU_SCREEN_VALUE_XPOS -       \
  70                                          MENU_SCREEN_START_XPOS)
  71 #define MAX_MENU_TEXT_LENGTH_MEDIUM     (MAX_MENU_TEXT_LENGTH_BIG * 2)
  72
  73 /* buttons and scrollbars identifiers */
  74 #define SCREEN_CTRL_ID_SCROLL_UP        0
  75 #define SCREEN_CTRL_ID_SCROLL_DOWN      1
  76 #define SCREEN_CTRL_ID_SCROLL_VERTICAL  2
  77
  78 #define NUM_SCREEN_SCROLLBUTTONS        2
  79 #define NUM_SCREEN_SCROLLBARS           1
  80 #define NUM_SCREEN_GADGETS              3
  81
  82 /* graphic position and size values for buttons and scrollbars */
  83 #define SC_SCROLLBUTTON_XSIZE           TILEX
  84 #define SC_SCROLLBUTTON_YSIZE           TILEY
  85
  86 #define SC_SCROLLBAR_XPOS               (SXSIZE - SC_SCROLLBUTTON_XSIZE)
  87
  88 #define SC_SCROLL_VERTICAL_XSIZE        SC_SCROLLBUTTON_XSIZE
  89 #define SC_SCROLL_VERTICAL_YSIZE        ((MAX_MENU_ENTRIES_ON_SCREEN - 2) * \
  90                                          SC_SCROLLBUTTON_YSIZE)
  91
  92 #define SC_SCROLL_UP_XPOS               SC_SCROLLBAR_XPOS
  93 #define SC_SCROLL_UP_YPOS               (2 * SC_SCROLLBUTTON_YSIZE)
  94
  95 #define SC_SCROLL_VERTICAL_XPOS         SC_SCROLLBAR_XPOS
  96 #define SC_SCROLL_VERTICAL_YPOS         (SC_SCROLL_UP_YPOS + \
  97                                          SC_SCROLLBUTTON_YSIZE)
  98
  99 #define SC_SCROLL_DOWN_XPOS             SC_SCROLLBAR_XPOS
 100 #define SC_SCROLL_DOWN_YPOS             (SC_SCROLL_VERTICAL_YPOS + \
 101                                          SC_SCROLL_VERTICAL_YSIZE)
 102
 103 #define SC_BORDER_SIZE                  14
 104
 105
 106 /* forward declarations of internal functions */
 107 static void HandleScreenGadgets(struct GadgetInfo *);
 108 static void HandleSetupScreen_Generic(int, int, int, int, int);
 109 static void HandleSetupScreen_Input(int, int, int, int, int);
 110 static void CustomizeKeyboard(int);
 111 static void CalibrateJoystick(int);
 112 static void execSetupArtwork(void);
 113 static void HandleChooseTree(int, int, int, int, int, TreeInfo **);
 114
 115 static void DrawChooseLevel(void);
 116 static void DrawInfoScreen(void);
 117 static void DrawSetupScreen(void);
 118
 119 static void DrawInfoScreenExt(int);
 120 static void DrawInfoScreen_HelpAnim(int, int, boolean);
 121 static void DrawInfoScreen_HelpText(int, int, int, int);
 122 static void HandleInfoScreen_Main(int, int, int, int, int);
 123 static void HandleInfoScreen_TitleScreen(int);
 124 static void HandleInfoScreen_Elements(int);
 125 static void HandleInfoScreen_Music(int);
 126 static void HandleInfoScreen_Credits(int);
 127 static void HandleInfoScreen_Program(int);
 128
 129 static void MapChooseTreeGadgets(TreeInfo *);
 130
 131 static struct GadgetInfo *screen_gadget[NUM_SCREEN_GADGETS];
 132 static int setup_mode = SETUP_MODE_MAIN;
 133 static int info_mode = INFO_MODE_MAIN;
 134
 135 #define DRAW_OFFSET_MODE(x)     (x >= GAME_MODE_MAIN &&                 \
 136                                  x <= GAME_MODE_SETUP ? x :             \
 137                                  x == GAME_MODE_PSEUDO_TYPENAME ?       \
 138                                  GAME_MODE_MAIN : GAME_MODE_DEFAULT)
 139
 140 #define mSX (SX + menu.draw_xoffset[DRAW_OFFSET_MODE(game_status)])
 141 #define mSY (SY + menu.draw_yoffset[DRAW_OFFSET_MODE(game_status)])
 142
 143 #define NUM_MENU_ENTRIES_ON_SCREEN (menu.list_size[game_status] > 2 ?   \
 144                                     menu.list_size[game_status] :       \
 145                                     MAX_MENU_ENTRIES_ON_SCREEN)
 146
 147 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
 148 #define NUM_SCROLLBAR_BITMAPS           2
 149 static Bitmap *scrollbar_bitmap[NUM_SCROLLBAR_BITMAPS];
 150 #endif
 151
 152
 153 static void drawCursorExt(int xpos, int ypos, int color, int g)
 154 {
 155   static int cursor_array[SCR_FIELDY];
 156
 157   if (xpos == 0)
 158   {
 159     if (g != 0)
 160       cursor_array[ypos] = g;
 161     else
 162       g = cursor_array[ypos];
 163   }
 164
 165   if (color == FC_RED)
 166     g = (g == IMG_MENU_BUTTON_LEFT  ? IMG_MENU_BUTTON_LEFT_ACTIVE  :
 167          g == IMG_MENU_BUTTON_RIGHT ? IMG_MENU_BUTTON_RIGHT_ACTIVE :
 168          g == IMG_MENU_BUTTON_LEAVE_MENU ? IMG_MENU_BUTTON_LEAVE_MENU_ACTIVE :
 169          g == IMG_MENU_BUTTON_ENTER_MENU ? IMG_MENU_BUTTON_ENTER_MENU_ACTIVE :
 170          g == IMG_MENU_BUTTON_LAST_LEVEL ? IMG_MENU_BUTTON_LAST_LEVEL_ACTIVE :
 171          g == IMG_MENU_BUTTON_NEXT_LEVEL ? IMG_MENU_BUTTON_NEXT_LEVEL_ACTIVE :
 172          IMG_MENU_BUTTON_ACTIVE);
 173
 174   ypos += MENU_SCREEN_START_YPOS;
 175
 176   DrawBackground(mSX + xpos * TILEX, mSY + ypos * TILEY, TILEX, TILEY);
 177   DrawGraphicThruMaskExt(drawto, mSX + xpos * TILEX, mSY + ypos * TILEY, g, 0);
 178 }
 179
 180 static void initCursor(int ypos, int graphic)
 181 {
 182   drawCursorExt(0, ypos, FC_BLUE, graphic);
 183 }
 184
 185 static void drawCursor(int ypos, int color)
 186 {
 187   drawCursorExt(0, ypos, color, 0);
 188 }
 189
 190 static void drawCursorXY(int xpos, int ypos, int graphic)
 191 {
 192   drawCursorExt(xpos, ypos, -1, graphic);
 193 }
 194
 195 static void drawChooseTreeCursor(int ypos, int color)
 196 {
 197   int last_game_status = game_status;   /* save current game status */
 198
 199   /* force LEVELS draw offset on artwork setup screen */
 200   game_status = GAME_MODE_LEVELS;
 201
 202   drawCursorExt(0, ypos, color, 0);
 203
 204   game_status = last_game_status;       /* restore current game status */
 205 }
 206
 207 void DrawHeadline()
 208 {
 209   DrawTextSCentered(MENU_TITLE1_YPOS, FONT_TITLE_1, PROGRAM_TITLE_STRING);
 210   DrawTextSCentered(MENU_TITLE2_YPOS, FONT_TITLE_2, PROGRAM_COPYRIGHT_STRING);
 211 }
 212
 213 static void ToggleFullscreenIfNeeded()
 214 {
 215   if (setup.fullscreen != video.fullscreen_enabled)
 216   {
 217     /* save old door content */
 218     BlitBitmap(backbuffer, bitmap_db_door,
 219                DX, DY, DXSIZE, DYSIZE, DOOR_GFX_PAGEX1, DOOR_GFX_PAGEY1);
 220
 221     /* toggle fullscreen */
 222     ChangeVideoModeIfNeeded(setup.fullscreen);
 223     setup.fullscreen = video.fullscreen_enabled;
 224
 225     /* redraw background to newly created backbuffer */
 226     BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, backbuffer,
 227                0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
 228
 229     /* restore old door content */
 230     BlitBitmap(bitmap_db_door, backbuffer,
 231                DOOR_GFX_PAGEX1, DOOR_GFX_PAGEY1, DXSIZE, DYSIZE, DX, DY);
 232
 233     redraw_mask = REDRAW_ALL;
 234   }
 235 }
 236
 237 static int getLastLevelButtonPos()
 238 {
 239   return 10;
 240 }
 241
 242 static int getCurrentLevelTextPos()
 243 {
 244   return (getLastLevelButtonPos() + 1);
 245 }
 246
 247 static int getNextLevelButtonPos()
 248 {
 249   return getLastLevelButtonPos() + 3 + 1;
 250 }
 251
 252 static int getLevelRangeTextPos()
 253 {
 254   return getNextLevelButtonPos() + 1;
 255 }
 256
 257 void DrawTitleScreenImage(int nr)
 258 {
 259   int graphic = IMG_TITLESCREEN_1 + nr;
 260   Bitmap *bitmap = graphic_info[graphic].bitmap;
 261   int width  = graphic_info[graphic].src_image_width;
 262   int height = graphic_info[graphic].src_image_height;
 263   int src_x = 0, src_y = 0;
 264   int dst_x, dst_y;
 265
 266   if (bitmap == NULL)
 267     return;
 268
 269   if (width > WIN_XSIZE)
 270   {
 271     /* image width too large for window => center image horizontally */
 272     src_x = (width - WIN_XSIZE) / 2;
 273     width = WIN_XSIZE;
 274   }
 275
 276   if (height > WIN_YSIZE)
 277   {
 278     /* image height too large for window => center image vertically */
 279     src_y = (height - WIN_YSIZE) / 2;
 280     height = WIN_YSIZE;
 281   }
 282
 283   dst_x = (WIN_XSIZE - width) / 2;
 284   dst_y = (WIN_YSIZE - height) / 2;
 285
 286   ClearRectangleOnBackground(drawto, 0, 0, WIN_XSIZE, WIN_YSIZE);
 287
 288   if (DrawingOnBackground(dst_x, dst_y))
 289     BlitBitmapMasked(bitmap, drawto, src_x, src_y, width, height, dst_x, dst_y);
 290   else
 291     BlitBitmap(bitmap, drawto, src_x, src_y, width, height, dst_x, dst_y);
 292
 293   redraw_mask = REDRAW_ALL;
 294 }
 295
 296 void DrawTitleScreen()
 297 {
 298   KeyboardAutoRepeatOff();
 299
 300   SetMainBackgroundImage(IMG_BACKGROUND_TITLE);
 301
 302   PlayMenuSound();
 303   PlayMenuMusic();
 304
 305   HandleTitleScreen(0, 0, 0, 0, MB_MENU_INITIALIZE);
 306
 307   StopAnimation();
 308 }
 309
 310 static void DrawMainMenuExt(int fade_delay)
 311 {
 312   static LevelDirTree *leveldir_last_valid = NULL;
 313   boolean levelset_has_changed = FALSE;
 314   char *name_text = (!options.network && setup.team_mode ? "Team:" : "Name:");
 315 #if 1
 316   char *level_text = "Levelset";
 317 #else
 318   char *level_text = "Level:";
 319 #endif
 320   int name_width, level_width;
 321   int i;
 322
 323   UnmapAllGadgets();
 324   FadeSoundsAndMusic();
 325
 326   KeyboardAutoRepeatOn();
 327   ActivateJoystick();
 328
 329   SetDrawDeactivationMask(REDRAW_NONE);
 330   SetDrawBackgroundMask(REDRAW_FIELD);
 331
 332   audio.sound_deactivated = FALSE;
 333
 334 #if 1
 335   GetPlayerConfig();
 336 #endif
 337
 338   /* needed if last screen was the playing screen, invoked from level editor */
 339   if (level_editor_test_game)
 340   {
 341     game_status = GAME_MODE_EDITOR;
 342     DrawLevelEd();
 343
 344     return;
 345   }
 346
 347   /* needed if last screen was the editor screen */
 348   UndrawSpecialEditorDoor();
 349
 350   /* needed if last screen was the setup screen and fullscreen state changed */
 351   ToggleFullscreenIfNeeded();
 352
 353   /* leveldir_current may be invalid (level group, parent link) */
 354   if (!validLevelSeries(leveldir_current))
 355     leveldir_current = getFirstValidTreeInfoEntry(leveldir_last_valid);
 356
 357   if (leveldir_current != leveldir_last_valid)
 358     levelset_has_changed = TRUE;
 359
 360   /* store valid level series information */
 361   leveldir_last_valid = leveldir_current;
 362
 363   /* needed if last screen (level choice) changed graphics, sounds or music */
 364   ReloadCustomArtwork(0);
 365
 366 #ifdef TARGET_SDL
 367   SetDrawtoField(DRAW_BACKBUFFER);
 368 #endif
 369
 370   if (setup.show_titlescreen &&
 371       levelset_has_changed &&
 372       graphic_info[IMG_TITLESCREEN_1].bitmap != NULL)
 373   {
 374     game_status = GAME_MODE_TITLE;
 375     DrawTitleScreen();
 376
 377     return;
 378   }
 379
 380 #if 0
 381   /* map gadgets for main menu screen */
 382   MapTapeButtons();
 383 #endif
 384
 385   /* level_nr may have been set to value over handicap with level editor */
 386   if (setup.handicap && level_nr > leveldir_current->handicap_level)
 387     level_nr = leveldir_current->handicap_level;
 388
 389 #if 0
 390   GetPlayerConfig();
 391 #endif
 392   LoadLevel(level_nr);
 393
 394   SetMainBackgroundImage(IMG_BACKGROUND_MAIN);
 395   ClearWindow();
 396
 397   DrawHeadline();
 398
 399   DrawText(mSX + 32, mSY + 2 * 32, name_text,       FONT_MENU_1);
 400   DrawText(mSX + 32, mSY + 3 * 32, level_text,      FONT_MENU_1);
 401   DrawText(mSX + 32, mSY + 4 * 32, "Hall Of Fame",  FONT_MENU_1);
 402   DrawText(mSX + 32, mSY + 5 * 32, "Level Creator", FONT_MENU_1);
 403   DrawText(mSX + 32, mSY + 6 * 32, "Info Screen",   FONT_MENU_1);
 404   DrawText(mSX + 32, mSY + 7 * 32, "Start Game",    FONT_MENU_1);
 405   DrawText(mSX + 32, mSY + 8 * 32, "Setup",         FONT_MENU_1);
 406   DrawText(mSX + 32, mSY + 9 * 32, "Quit",          FONT_MENU_1);
 407
 408   /* calculated after (possible) reload of custom artwork */
 409   name_width  = getTextWidth(name_text,  FONT_MENU_1);
 410 #if 1
 411   level_width = 9 * 32;
 412 #else
 413 #if 1
 414   level_width = 9 * getFontWidth(FONT_MENU_1);
 415 #else
 416   level_width = getTextWidth(level_text, FONT_MENU_1);
 417 #endif
 418 #endif
 419
 420   DrawText(mSX + 32 + name_width, mSY + 2 * 32, setup.player_name,
 421            FONT_INPUT_1);
 422
 423 #if 1
 424   DrawText(mSX + getCurrentLevelTextPos() * 32, mSY + 3 * 32,
 425            int2str(level_nr, 3), FONT_VALUE_1);
 426 #else
 427 #if 1
 428   DrawText(mSX + level_width + 2 * 32, mSY + 3 * 32, int2str(level_nr, 3),
 429            FONT_VALUE_1);
 430 #else
 431   DrawText(mSX + level_width + 5 * 32, mSY + 3 * 32, int2str(level_nr, 3),
 432            FONT_VALUE_1);
 433 #endif
 434 #endif
 435
 436   DrawMicroLevel(MICROLEVEL_XPOS, MICROLEVEL_YPOS, TRUE);
 437
 438 #if 1
 439
 440 #if 1
 441   {
 442     int text_height = getFontHeight(FONT_TEXT_3);
 443 #if 1
 444     int xpos = getLevelRangeTextPos() * 32;
 445 #else
 446     int xpos = level_width + 6 * 32;
 447 #endif
 448     int ypos2 = -SY + 3 * 32 + 16;
 449     int ypos1 = ypos2 - text_height;
 450
 451     DrawTextF(mSX + xpos, mSY + ypos1, FONT_TEXT_3,
 452               "%03d", leveldir_current->first_level);
 453     DrawTextF(mSX + xpos, mSY + ypos2, FONT_TEXT_3,
 454               "%03d", leveldir_current->last_level);
 455   }
 456 #else
 457   DrawTextF(mSX + level_width + 6 * 32, mSY + 3 * 32 + 1, FONT_TEXT_3,
 458             "%d", leveldir_current->levels);
 459 #endif
 460
 461 #else
 462   DrawTextF(mSX + 32 + level_width - 2, mSY + 3 * 32 + 1, FONT_TEXT_3, "%d-%d",
 463             leveldir_current->first_level, leveldir_current->last_level);
 464 #endif
 465
 466 #if 0
 467   if (leveldir_current->readonly)
 468   {
 469     DrawTextS(mSX + level_width + 9 * 32 - 2,
 470               mSY + 3 * 32 + 1 - 7, FONT_TEXT_3, "READ");
 471     DrawTextS(mSX + level_width + 9 * 32 - 2,
 472               mSY + 3 * 32 + 1 + 7, FONT_TEXT_3, "ONLY");
 473   }
 474 #endif
 475
 476   for (i = 0; i < 8; i++)
 477     initCursor(i, (i == 1 || i == 4 || i == 6 ? IMG_MENU_BUTTON_ENTER_MENU :
 478                    IMG_MENU_BUTTON));
 479
 480 #if 1
 481   drawCursorXY(getLastLevelButtonPos(), 1, IMG_MENU_BUTTON_LAST_LEVEL);
 482   drawCursorXY(getNextLevelButtonPos(), 1, IMG_MENU_BUTTON_NEXT_LEVEL);
 483 #else
 484 #if 1
 485   drawCursorXY(level_width / 32 + 1, 1, IMG_MENU_BUTTON_LEFT);
 486   drawCursorXY(level_width / 32 + 5, 1, IMG_MENU_BUTTON_RIGHT);
 487 #else
 488   drawCursorXY(level_width / 32 + 4, 1, IMG_MENU_BUTTON_LEFT);
 489   drawCursorXY(level_width / 32 + 8, 1, IMG_MENU_BUTTON_RIGHT);
 490 #endif
 491 #endif
 492
 493   DrawTextSCentered(326, FONT_TITLE_2, "A Game by Artsoft Entertainment");
 494
 495 #if 0
 496   FadeToFront();
 497 #endif
 498 #if 0
 499   InitAnimation();
 500 #endif
 501
 502   HandleMainMenu(0, 0, 0, 0, MB_MENU_INITIALIZE);
 503
 504   TapeStop();
 505   if (TAPE_IS_EMPTY(tape))
 506     LoadTape(level_nr);
 507   DrawCompleteVideoDisplay();
 508
 509   PlayMenuSound();
 510   PlayMenuMusic();
 511
 512 #if 0
 513 #if 1
 514   OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2);
 515 #else
 516   if (fade_delay > 0)
 517     OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2 | DOOR_NO_DELAY | DOOR_FORCE_REDRAW);
 518   else
 519     OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2);
 520 #endif
 521 #endif
 522
 523 #if 0
 524   InitAnimation();
 525 #endif
 526
 527 #if 1
 528   /* map gadgets for main menu screen */
 529   MapTapeButtons();
 530 #endif
 531
 532 #if 1
 533 #if 1
 534   FadeIn(fade_delay);
 535 #else
 536   BackToFront();
 537 #endif
 538 #endif
 539
 540 #if 1
 541   InitAnimation();
 542 #endif
 543
 544 #if 1
 545   OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2);
 546 #endif
 547 }
 548
 549 void DrawMainMenu()
 550 {
 551   DrawMainMenuExt(0);
 552 }
 553
 554 #if 0
 555 static void gotoTopLevelDir()
 556 {
 557   /* move upwards to top level directory */
 558   while (leveldir_current->node_parent)
 559   {
 560     /* write a "path" into level tree for easy navigation to last level */
 561     if (leveldir_current->node_parent->node_group->cl_first == -1)
 562     {
 563       int num_leveldirs = numTreeInfoInGroup(leveldir_current);
 564       int leveldir_pos = posTreeInfo(leveldir_current);
 565       int num_page_entries;
 566       int cl_first, cl_cursor;
 567
 568       if (num_leveldirs <= NUM_MENU_ENTRIES_ON_SCREEN)
 569         num_page_entries = num_leveldirs;
 570       else
 571         num_page_entries = NUM_MENU_ENTRIES_ON_SCREEN;
 572
 573       cl_first = MAX(0, leveldir_pos - num_page_entries + 1);
 574       cl_cursor = leveldir_pos - cl_first;
 575
 576       leveldir_current->node_parent->node_group->cl_first = cl_first;
 577       leveldir_current->node_parent->node_group->cl_cursor = cl_cursor;
 578     }
 579
 580     leveldir_current = leveldir_current->node_parent;
 581   }
 582 }
 583 #endif
 584
 585 void HandleTitleScreen(int mx, int my, int dx, int dy, int button)
 586 {
 587   static int title_nr = 0;
 588   boolean return_to_main_menu = FALSE;
 589   boolean use_fading_main_menu = TRUE;
 590   boolean use_cross_fading = TRUE;
 591   int fade_delay = 500;
 592   int post_delay = fade_delay / 2;
 593
 594   if (button == MB_MENU_INITIALIZE)
 595   {
 596     title_nr = 0;
 597
 598     if (game_status == GAME_MODE_INFO)
 599     {
 600       FadeSoundsAndMusic();
 601
 602       FadeOut(fade_delay, post_delay);
 603     }
 604
 605     DrawTitleScreenImage(title_nr);
 606
 607     FadeIn(fade_delay);
 608
 609     return;
 610   }
 611   else if (button == MB_MENU_LEAVE)
 612   {
 613     return_to_main_menu = TRUE;
 614     use_fading_main_menu = FALSE;
 615   }
 616   else if (button == MB_MENU_CHOICE)
 617   {
 618     title_nr++;
 619
 620     if (!use_cross_fading)
 621       FadeOut(fade_delay, post_delay);
 622
 623     if (title_nr < MAX_NUM_TITLE_SCREENS &&
 624         graphic_info[IMG_TITLESCREEN_1 + title_nr].bitmap != NULL)
 625     {
 626       Bitmap *drawto_last = drawto;
 627
 628       if (use_cross_fading)
 629         drawto = bitmap_db_title;
 630
 631       DrawTitleScreenImage(title_nr);
 632
 633       drawto = drawto_last;
 634
 635       if (use_cross_fading)
 636         FadeCross(fade_delay);
 637       else
 638         FadeIn(fade_delay);
 639     }
 640     else
 641     {
 642       FadeSoundsAndMusic();
 643
 644       FadeOut(fade_delay, post_delay);
 645
 646       return_to_main_menu = TRUE;
 647     }
 648   }
 649
 650   if (return_to_main_menu)
 651   {
 652     int menu_fade_delay = (use_fading_main_menu ? fade_delay : 0);
 653
 654     RedrawBackground();
 655
 656     if (game_status == GAME_MODE_INFO)
 657     {
 658       OpenDoor(DOOR_CLOSE_1 | DOOR_CLOSE_2 | DOOR_NO_DELAY | DOOR_FORCE_REDRAW);
 659
 660       info_mode = INFO_MODE_MAIN;
 661       DrawInfoScreenExt(menu_fade_delay);
 662     }
 663     else        /* default: return to main menu */
 664     {
 665       OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2 | DOOR_NO_DELAY | DOOR_FORCE_REDRAW);
 666
 667       game_status = GAME_MODE_MAIN;
 668       DrawMainMenuExt(menu_fade_delay);
 669     }
 670   }
 671 }
 672
 673 void HandleMainMenu(int mx, int my, int dx, int dy, int button)
 674 {
 675   static unsigned long level_delay = 0;
 676   static int choice = 5;
 677   int x = 0;
 678   int y = choice;
 679
 680   if (button == MB_MENU_INITIALIZE)
 681   {
 682     drawCursor(choice, FC_RED);
 683     return;
 684   }
 685
 686   if (mx || my)         /* mouse input */
 687   {
 688     x = (mx - mSX) / 32;
 689     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
 690   }
 691   else if (dx || dy)    /* keyboard input */
 692   {
 693     if (dx && choice == 1)
 694       x = (dx < 0 ? 10 : 14);
 695     else if (dx > 0)
 696     {
 697       if (choice == 4 || choice == 6)
 698         button = MB_MENU_CHOICE;
 699     }
 700     else if (dy)
 701       y = choice + dy;
 702   }
 703
 704   if (y == 1 && ((x == 10 && level_nr > leveldir_current->first_level) ||
 705                  (x == 14 && level_nr < leveldir_current->last_level)) &&
 706       button && DelayReached(&level_delay, GADGET_FRAME_DELAY))
 707   {
 708     int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
 709     int old_level_nr = level_nr;
 710     int new_level_nr;
 711
 712     new_level_nr = level_nr + (x == 10 ? -step : +step);
 713     if (new_level_nr < leveldir_current->first_level)
 714       new_level_nr = leveldir_current->first_level;
 715     if (new_level_nr > leveldir_current->last_level)
 716       new_level_nr = leveldir_current->last_level;
 717
 718     if (setup.handicap && new_level_nr > leveldir_current->handicap_level)
 719     {
 720       /* skipping levels is only allowed when trying to skip single level */
 721       if (setup.skip_levels && step == 1 &&
 722           Request("Level still unsolved ! Skip despite handicap ?", REQ_ASK))
 723       {
 724         leveldir_current->handicap_level++;
 725         SaveLevelSetup_SeriesInfo();
 726       }
 727
 728       new_level_nr = leveldir_current->handicap_level;
 729     }
 730
 731     if (new_level_nr != old_level_nr)
 732     {
 733       level_nr = new_level_nr;
 734
 735       DrawText(mSX + 11 * 32, mSY + 3 * 32, int2str(level_nr, 3),
 736                FONT_VALUE_1);
 737
 738       LoadLevel(level_nr);
 739       DrawMicroLevel(MICROLEVEL_XPOS, MICROLEVEL_YPOS, TRUE);
 740
 741       TapeErase();
 742       LoadTape(level_nr);
 743       DrawCompleteVideoDisplay();
 744
 745       /* needed because DrawMicroLevel() takes some time */
 746       BackToFront();
 747       SyncDisplay();
 748       DelayReached(&level_delay, 0);    /* reset delay counter */
 749     }
 750   }
 751   else if (IN_VIS_FIELD(x, y) &&
 752            y >= 0 && y <= 7 && (y != 1 || x < 10))
 753   {
 754     if (button)
 755     {
 756       if (y != choice)
 757       {
 758         drawCursor(y, FC_RED);
 759         drawCursor(choice, FC_BLUE);
 760         choice = y;
 761       }
 762     }
 763     else
 764     {
 765       if (y == 0)
 766       {
 767         game_status = GAME_MODE_PSEUDO_TYPENAME;
 768         HandleTypeName(strlen(setup.player_name), 0);
 769       }
 770       else if (y == 1)
 771       {
 772         if (leveldir_first)
 773         {
 774           game_status = GAME_MODE_LEVELS;
 775           SaveLevelSetup_LastSeries();
 776           SaveLevelSetup_SeriesInfo();
 777
 778 #if 0
 779           gotoTopLevelDir();
 780 #endif
 781
 782           DrawChooseLevel();
 783         }
 784       }
 785       else if (y == 2)
 786       {
 787         game_status = GAME_MODE_SCORES;
 788         DrawHallOfFame(-1);
 789       }
 790       else if (y == 3)
 791       {
 792         if (leveldir_current->readonly &&
 793             !strEqual(setup.player_name, "Artsoft"))
 794           Request("This level is read only !", REQ_CONFIRM);
 795         game_status = GAME_MODE_EDITOR;
 796         DrawLevelEd();
 797       }
 798       else if (y == 4)
 799       {
 800         game_status = GAME_MODE_INFO;
 801         info_mode = INFO_MODE_MAIN;
 802         DrawInfoScreen();
 803       }
 804       else if (y == 5)
 805       {
 806         StartGameActions(options.network, setup.autorecord, NEW_RANDOMIZE);
 807       }
 808       else if (y == 6)
 809       {
 810         game_status = GAME_MODE_SETUP;
 811         setup_mode = SETUP_MODE_MAIN;
 812
 813         DrawSetupScreen();
 814       }
 815       else if (y == 7)
 816       {
 817         SaveLevelSetup_LastSeries();
 818         SaveLevelSetup_SeriesInfo();
 819
 820         if (Request("Do you really want to quit ?", REQ_ASK | REQ_STAY_CLOSED))
 821           game_status = GAME_MODE_QUIT;
 822       }
 823     }
 824   }
 825
 826   if (game_status == GAME_MODE_MAIN)
 827   {
 828     DrawMicroLevel(MICROLEVEL_XPOS, MICROLEVEL_YPOS, FALSE);
 829     DoAnimation();
 830   }
 831 }
 832
 833
 834 /* ========================================================================= */
 835 /* info screen functions                                                     */
 836 /* ========================================================================= */
 837
 838 static struct TokenInfo *info_info;
 839 static int num_info_info;
 840
 841 static void execInfoTitleScreen()
 842 {
 843   info_mode = INFO_MODE_TITLESCREEN;
 844   DrawInfoScreen();
 845 }
 846
 847 static void execInfoElements()
 848 {
 849   info_mode = INFO_MODE_ELEMENTS;
 850   DrawInfoScreen();
 851 }
 852
 853 static void execInfoMusic()
 854 {
 855   info_mode = INFO_MODE_MUSIC;
 856   DrawInfoScreen();
 857 }
 858
 859 static void execInfoCredits()
 860 {
 861   info_mode = INFO_MODE_CREDITS;
 862   DrawInfoScreen();
 863 }
 864
 865 static void execInfoProgram()
 866 {
 867   info_mode = INFO_MODE_PROGRAM;
 868   DrawInfoScreen();
 869 }
 870
 871 static void execInfoLevelSet()
 872 {
 873   info_mode = INFO_MODE_LEVELSET;
 874   DrawInfoScreen();
 875 }
 876
 877 static void execExitInfo()
 878 {
 879   game_status = GAME_MODE_MAIN;
 880   DrawMainMenu();
 881 }
 882
 883 static struct TokenInfo info_info_main[] =
 884 {
 885   { TYPE_ENTER_SCREEN,  execInfoTitleScreen,    "Title Screen"          },
 886   { TYPE_ENTER_SCREEN,  execInfoElements,       "Elements Info"         },
 887   { TYPE_ENTER_SCREEN,  execInfoMusic,          "Music Info"            },
 888   { TYPE_ENTER_SCREEN,  execInfoCredits,        "Credits"               },
 889   { TYPE_ENTER_SCREEN,  execInfoProgram,        "Program Info"          },
 890   { TYPE_ENTER_SCREEN,  execInfoLevelSet,       "Level Set Info"        },
 891   { TYPE_EMPTY,         NULL,                   ""                      },
 892   { TYPE_LEAVE_MENU,    execExitInfo,           "Exit"                  },
 893
 894   { 0,                  NULL,                   NULL                    }
 895 };
 896
 897 static void DrawInfoScreen_Main(int fade_delay)
 898 {
 899   int i;
 900
 901   UnmapAllGadgets();
 902   CloseDoor(DOOR_CLOSE_2);
 903
 904   ClearWindow();
 905
 906 #if 1
 907   DrawTextSCentered(mSY - SY + 16, FONT_TITLE_1, "Info Screen");
 908 #else
 909   DrawText(mSX + 16, mSY + 16, "Info Screen", FONT_TITLE_1);
 910 #endif
 911
 912   info_info = info_info_main;
 913   num_info_info = 0;
 914
 915   for (i = 0; info_info[i].type != 0 && i < NUM_MENU_ENTRIES_ON_SCREEN; i++)
 916   {
 917     int xpos = MENU_SCREEN_START_XPOS;
 918     int ypos = MENU_SCREEN_START_YPOS + i;
 919     int font_nr = FONT_MENU_1;
 920
 921     DrawText(mSX + xpos * 32, mSY + ypos * 32, info_info[i].text, font_nr);
 922
 923     if (info_info[i].type & TYPE_ENTER_MENU)
 924       initCursor(i, IMG_MENU_BUTTON_ENTER_MENU);
 925     else if (info_info[i].type & TYPE_LEAVE_MENU)
 926       initCursor(i, IMG_MENU_BUTTON_LEAVE_MENU);
 927     else if (info_info[i].type & ~TYPE_SKIP_ENTRY)
 928       initCursor(i, IMG_MENU_BUTTON);
 929
 930     num_info_info++;
 931   }
 932
 933 #if 1
 934
 935   HandleInfoScreen_Main(0, 0, 0, 0, MB_MENU_INITIALIZE);
 936
 937   PlayMenuSound();
 938   PlayMenuMusic();
 939
 940   FadeIn(fade_delay);
 941   InitAnimation();
 942
 943 #else
 944
 945   FadeToFront();
 946   InitAnimation();
 947
 948   PlayMenuSound();
 949   PlayMenuMusic();
 950
 951   HandleInfoScreen_Main(0, 0, 0, 0, MB_MENU_INITIALIZE);
 952 #endif
 953 }
 954
 955 void HandleInfoScreen_Main(int mx, int my, int dx, int dy, int button)
 956 {
 957   static int choice_store[MAX_INFO_MODES];
 958   int choice = choice_store[info_mode];         /* always starts with 0 */
 959   int x = 0;
 960   int y = choice;
 961
 962   if (button == MB_MENU_INITIALIZE)
 963   {
 964     /* advance to first valid menu entry */
 965     while (choice < num_info_info &&
 966            info_info[choice].type & TYPE_SKIP_ENTRY)
 967       choice++;
 968     choice_store[info_mode] = choice;
 969
 970     drawCursor(choice, FC_RED);
 971     return;
 972   }
 973   else if (button == MB_MENU_LEAVE)
 974   {
 975     for (y = 0; y < num_info_info; y++)
 976     {
 977       if (info_info[y].type & TYPE_LEAVE_MENU)
 978       {
 979         void (*menu_callback_function)(void) = info_info[y].value;
 980
 981         menu_callback_function();
 982         break;  /* absolutely needed because function changes 'info_info'! */
 983       }
 984     }
 985
 986     return;
 987   }
 988
 989   if (mx || my)         /* mouse input */
 990   {
 991     x = (mx - mSX) / 32;
 992     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
 993   }
 994   else if (dx || dy)    /* keyboard input */
 995   {
 996     if (dx)
 997     {
 998       int menu_navigation_type = (dx < 0 ? TYPE_LEAVE_MENU : TYPE_ENTER_MENU);
 999
1000       if (info_info[choice].type & menu_navigation_type ||
1001           info_info[choice].type & TYPE_ENTER_SCREEN ||
1002           info_info[choice].type & TYPE_BOOLEAN_STYLE)
1003         button = MB_MENU_CHOICE;
1004     }
1005     else if (dy)
1006       y = choice + dy;
1007
1008     /* jump to next non-empty menu entry (up or down) */
1009     while (y > 0 && y < num_info_info - 1 &&
1010            info_info[y].type & TYPE_SKIP_ENTRY)
1011       y += dy;
1012   }
1013
1014   if (IN_VIS_FIELD(x, y) &&
1015       y >= 0 && y < num_info_info && info_info[y].type & ~TYPE_SKIP_ENTRY)
1016   {
1017     if (button)
1018     {
1019       if (y != choice)
1020       {
1021         drawCursor(y, FC_RED);
1022         drawCursor(choice, FC_BLUE);
1023         choice = choice_store[info_mode] = y;
1024       }
1025     }
1026     else if (!(info_info[y].type & TYPE_GHOSTED))
1027     {
1028       if (info_info[y].type & TYPE_ENTER_OR_LEAVE_MENU)
1029       {
1030         void (*menu_callback_function)(void) = info_info[choice].value;
1031
1032         menu_callback_function();
1033       }
1034     }
1035   }
1036 }
1037
1038 void DrawInfoScreen_HelpAnim(int start, int max_anims, boolean init)
1039 {
1040   static int infoscreen_step[MAX_INFO_ELEMENTS_ON_SCREEN];
1041   static int infoscreen_frame[MAX_INFO_ELEMENTS_ON_SCREEN];
1042   int xstart = mSX + 16;
1043   int ystart = mSY + 64 + 2 * 32;
1044   int ystep = TILEY + 4;
1045   int element, action, direction;
1046   int graphic;
1047   int delay;
1048   int sync_frame;
1049   int i, j;
1050
1051   if (init)
1052   {
1053     for (i = 0; i < MAX_INFO_ELEMENTS_ON_SCREEN; i++)
1054       infoscreen_step[i] = infoscreen_frame[i] = 0;
1055
1056     ClearWindow();
1057     DrawHeadline();
1058
1059     DrawTextSCentered(100, FONT_TEXT_1, "The Game Elements:");
1060
1061     DrawTextSCentered(SYSIZE - 20, FONT_TEXT_4,
1062                       "Press any key or button for next page");
1063
1064     FrameCounter = 0;
1065   }
1066
1067   i = j = 0;
1068   while (helpanim_info[j].element != HELPANIM_LIST_END)
1069   {
1070     if (i >= start + MAX_INFO_ELEMENTS_ON_SCREEN ||
1071         i >= max_anims)
1072       break;
1073     else if (i < start)
1074     {
1075       while (helpanim_info[j].element != HELPANIM_LIST_NEXT)
1076         j++;
1077
1078       j++;
1079       i++;
1080
1081       continue;
1082     }
1083
1084     j += infoscreen_step[i - start];
1085
1086     element = helpanim_info[j].element;
1087     action = helpanim_info[j].action;
1088     direction = helpanim_info[j].direction;
1089
1090     if (element < 0)
1091       element = EL_UNKNOWN;
1092
1093     if (action != -1 && direction != -1)
1094       graphic = el_act_dir2img(element, action, direction);
1095     else if (action != -1)
1096       graphic = el_act2img(element, action);
1097     else if (direction != -1)
1098       graphic = el_dir2img(element, direction);
1099     else
1100       graphic = el2img(element);
1101
1102     delay = helpanim_info[j++].delay;
1103
1104     if (delay == -1)
1105       delay = 1000000;
1106
1107     if (infoscreen_frame[i - start] == 0)
1108     {
1109       sync_frame = 0;
1110       infoscreen_frame[i - start] = delay - 1;
1111     }
1112     else
1113     {
1114       sync_frame = delay - infoscreen_frame[i - start];
1115       infoscreen_frame[i - start]--;
1116     }
1117
1118     if (helpanim_info[j].element == HELPANIM_LIST_NEXT)
1119     {
1120       if (!infoscreen_frame[i - start])
1121         infoscreen_step[i - start] = 0;
1122     }
1123     else
1124     {
1125       if (!infoscreen_frame[i - start])
1126         infoscreen_step[i - start]++;
1127       while (helpanim_info[j].element != HELPANIM_LIST_NEXT)
1128         j++;
1129     }
1130
1131     j++;
1132
1133     ClearRectangleOnBackground(drawto, xstart, ystart + (i - start) * ystep,
1134                                TILEX, TILEY);
1135     DrawGraphicAnimationExt(drawto, xstart, ystart + (i - start) * ystep,
1136                             graphic, sync_frame, USE_MASKING);
1137
1138     if (init)
1139       DrawInfoScreen_HelpText(element, action, direction, i - start);
1140
1141     i++;
1142   }
1143
1144   redraw_mask |= REDRAW_FIELD;
1145
1146   FrameCounter++;
1147 }
1148
1149 static char *getHelpText(int element, int action, int direction)
1150 {
1151   char token[MAX_LINE_LEN];
1152
1153   strcpy(token, element_info[element].token_name);
1154
1155   if (action != -1)
1156     strcat(token, element_action_info[action].suffix);
1157
1158   if (direction != -1)
1159     strcat(token, element_direction_info[MV_DIR_TO_BIT(direction)].suffix);
1160
1161   return getHashEntry(helptext_info, token);
1162 }
1163
1164 void DrawInfoScreen_HelpText(int element, int action, int direction, int ypos)
1165 {
1166   int font_nr = FONT_LEVEL_NUMBER;
1167   int font_width = getFontWidth(font_nr);
1168   int sx = mSX + MINI_TILEX + TILEX + MINI_TILEX;
1169   int sy = mSY + 65 + 2 * 32 + 1;
1170   int ystep = TILEY + 4;
1171   int pad_x = sx - SX;
1172   int max_chars_per_line = (SXSIZE - pad_x - MINI_TILEX) / font_width;
1173   int max_lines_per_text = 2;
1174   char *text = NULL;
1175
1176   if (action != -1 && direction != -1)          /* element.action.direction */
1177     text = getHelpText(element, action, direction);
1178
1179   if (text == NULL && action != -1)             /* element.action */
1180     text = getHelpText(element, action, -1);
1181
1182   if (text == NULL && direction != -1)          /* element.direction */
1183     text = getHelpText(element, -1, direction);
1184
1185   if (text == NULL)                             /* base element */
1186     text = getHelpText(element, -1, -1);
1187
1188   if (text == NULL)                             /* not found */
1189     text = "No description available";
1190
1191   if (strlen(text) <= max_chars_per_line)       /* only one line of text */
1192     sy += getFontHeight(font_nr) / 2;
1193
1194   DrawTextWrapped(sx, sy + ypos * ystep, text, font_nr,
1195                   max_chars_per_line, max_lines_per_text);
1196 }
1197
1198 void DrawInfoScreen_TitleScreen()
1199 {
1200   DrawTitleScreen();
1201 }
1202
1203 void HandleInfoScreen_TitleScreen(int button)
1204 {
1205   HandleTitleScreen(0, 0, 0, 0, button);
1206 }
1207
1208 void DrawInfoScreen_Elements()
1209 {
1210   SetMainBackgroundImageIfDefined(IMG_BACKGROUND_INFO_ELEMENTS);
1211
1212   LoadHelpAnimInfo();
1213   LoadHelpTextInfo();
1214
1215   HandleInfoScreen_Elements(MB_MENU_INITIALIZE);
1216
1217   FadeToFront();
1218   InitAnimation();
1219 }
1220
1221 void HandleInfoScreen_Elements(int button)
1222 {
1223   static unsigned long info_delay = 0;
1224   static int num_anims;
1225   static int num_pages;
1226   static int page;
1227   int anims_per_page = MAX_INFO_ELEMENTS_ON_SCREEN;
1228   int button_released = !button;
1229   int i;
1230
1231   if (button == MB_MENU_INITIALIZE)
1232   {
1233     boolean new_element = TRUE;
1234
1235     num_anims = 0;
1236     for (i = 0; helpanim_info[i].element != HELPANIM_LIST_END; i++)
1237     {
1238       if (helpanim_info[i].element == HELPANIM_LIST_NEXT)
1239         new_element = TRUE;
1240       else if (new_element)
1241       {
1242         num_anims++;
1243         new_element = FALSE;
1244       }
1245     }
1246
1247     num_pages = (num_anims + anims_per_page - 1) / anims_per_page;
1248     page = 0;
1249   }
1250   else if (button == MB_MENU_LEAVE)
1251   {
1252     info_mode = INFO_MODE_MAIN;
1253     DrawInfoScreen();
1254
1255     return;
1256   }
1257
1258   if (button_released || button == MB_MENU_INITIALIZE)
1259   {
1260     if (button != MB_MENU_INITIALIZE)
1261       page++;
1262
1263     if (page >= num_pages)
1264     {
1265       FadeSoundsAndMusic();
1266
1267       info_mode = INFO_MODE_MAIN;
1268       DrawInfoScreen();
1269
1270       return;
1271     }
1272
1273     DrawInfoScreen_HelpAnim(page * anims_per_page, num_anims, TRUE);
1274   }
1275   else
1276   {
1277     if (DelayReached(&info_delay, GameFrameDelay))
1278       if (page < num_pages)
1279         DrawInfoScreen_HelpAnim(page * anims_per_page, num_anims, FALSE);
1280
1281     PlayMenuSoundIfLoop();
1282   }
1283 }
1284
1285 void DrawInfoScreen_Music()
1286 {
1287   SetMainBackgroundImageIfDefined(IMG_BACKGROUND_INFO_MUSIC);
1288
1289   ClearWindow();
1290   DrawHeadline();
1291
1292   LoadMusicInfo();
1293
1294   HandleInfoScreen_Music(MB_MENU_INITIALIZE);
1295 }
1296
1297 void HandleInfoScreen_Music(int button)
1298 {
1299   static struct MusicFileInfo *list = NULL;
1300   int ystart = 150, dy = 30;
1301   int ybottom = SYSIZE - 20;
1302   int button_released = !button;
1303
1304   if (button == MB_MENU_INITIALIZE)
1305   {
1306     list = music_file_info;
1307
1308     if (list == NULL)
1309     {
1310       FadeSoundsAndMusic();
1311
1312       ClearWindow();
1313       DrawHeadline();
1314
1315       DrawTextSCentered(100, FONT_TEXT_1, "No music info for this level set.");
1316
1317       DrawTextSCentered(ybottom, FONT_TEXT_4,
1318                         "Press any key or button for info menu");
1319
1320       return;
1321     }
1322   }
1323   else if (button == MB_MENU_LEAVE)
1324   {
1325     info_mode = INFO_MODE_MAIN;
1326     DrawInfoScreen();
1327
1328     return;
1329   }
1330
1331   if (button_released || button == MB_MENU_INITIALIZE)
1332   {
1333     int y = 0;
1334
1335     if (button != MB_MENU_INITIALIZE)
1336       if (list != NULL)
1337         list = list->next;
1338
1339     if (list == NULL)
1340     {
1341       info_mode = INFO_MODE_MAIN;
1342       DrawInfoScreen();
1343
1344       return;
1345     }
1346
1347     FadeSoundsAndMusic();
1348
1349     ClearWindow();
1350     DrawHeadline();
1351
1352     if (list->is_sound)
1353     {
1354       int sound = list->music;
1355
1356       if (sound_info[sound].loop)
1357         PlaySoundLoop(sound);
1358       else
1359         PlaySound(sound);
1360
1361       DrawTextSCentered(100, FONT_TEXT_1, "The Game Background Sounds:");
1362     }
1363     else
1364     {
1365       PlayMusic(list->music);
1366
1367       DrawTextSCentered(100, FONT_TEXT_1, "The Game Background Music:");
1368     }
1369
1370     if (!strEqual(list->title, UNKNOWN_NAME))
1371     {
1372       if (!strEqual(list->title_header, UNKNOWN_NAME))
1373         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, list->title_header);
1374
1375       DrawTextFCentered(ystart + y++ * dy, FONT_TEXT_3, "\"%s\"", list->title);
1376     }
1377
1378     if (!strEqual(list->artist, UNKNOWN_NAME))
1379     {
1380       if (!strEqual(list->artist_header, UNKNOWN_NAME))
1381         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, list->artist_header);
1382       else
1383         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, "by");
1384
1385       DrawTextFCentered(ystart + y++ * dy, FONT_TEXT_3, "%s", list->artist);
1386     }
1387
1388     if (!strEqual(list->album, UNKNOWN_NAME))
1389     {
1390       if (!strEqual(list->album_header, UNKNOWN_NAME))
1391         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, list->album_header);
1392       else
1393         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, "from the album");
1394
1395       DrawTextFCentered(ystart + y++ * dy, FONT_TEXT_3, "\"%s\"", list->album);
1396     }
1397
1398     if (!strEqual(list->year, UNKNOWN_NAME))
1399     {
1400       if (!strEqual(list->year_header, UNKNOWN_NAME))
1401         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, list->year_header);
1402       else
1403         DrawTextSCentered(ystart + y++ * dy, FONT_TEXT_2, "from the year");
1404
1405       DrawTextFCentered(ystart + y++ * dy, FONT_TEXT_3, "%s", list->year);
1406     }
1407
1408     DrawTextSCentered(ybottom, FONT_TEXT_4,
1409                       "Press any key or button for next page");
1410   }
1411
1412   if (list != NULL && list->is_sound && sound_info[list->music].loop)
1413     PlaySoundLoop(list->music);
1414 }
1415
1416 static boolean DrawInfoScreen_CreditsScreen(int screen_nr)
1417 {
1418   int ystart = 150, ystep = 30;
1419   int ybottom = SYSIZE - 20;
1420
1421   ClearWindow();
1422   DrawHeadline();
1423
1424   DrawTextSCentered(100, FONT_TEXT_1, "Credits:");
1425
1426   if (screen_nr == 0)
1427   {
1428     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1429                       "Special thanks to");
1430     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1431                       "Peter Liepa");
1432     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1433                       "for creating");
1434     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1435                       "\"Boulder Dash\"");
1436     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_2,
1437                       "in the year");
1438     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_3,
1439                       "1984");
1440     DrawTextSCentered(ystart + 6 * ystep, FONT_TEXT_2,
1441                       "published by");
1442     DrawTextSCentered(ystart + 7 * ystep, FONT_TEXT_3,
1443                       "First Star Software");
1444   }
1445   else if (screen_nr == 1)
1446   {
1447     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1448                       "Special thanks to");
1449     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1450                       "Klaus Heinz & Volker Wertich");
1451     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1452                       "for creating");
1453     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1454                       "\"Emerald Mine\"");
1455     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_2,
1456                       "in the year");
1457     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_3,
1458                       "1987");
1459     DrawTextSCentered(ystart + 6 * ystep, FONT_TEXT_2,
1460                       "published by");
1461     DrawTextSCentered(ystart + 7 * ystep, FONT_TEXT_3,
1462                       "Kingsoft");
1463   }
1464   else if (screen_nr == 2)
1465   {
1466     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1467                       "Special thanks to");
1468     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1469                       "Michael Stopp & Philip Jespersen");
1470     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1471                       "for creating");
1472     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1473                       "\"Supaplex\"");
1474     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_2,
1475                       "in the year");
1476     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_3,
1477                       "1991");
1478     DrawTextSCentered(ystart + 6 * ystep, FONT_TEXT_2,
1479                       "published by");
1480     DrawTextSCentered(ystart + 7 * ystep, FONT_TEXT_3,
1481                       "Digital Integration");
1482   }
1483   else if (screen_nr == 3)
1484   {
1485     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1486                       "Special thanks to");
1487     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1488                       "Hiroyuki Imabayashi");
1489     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1490                       "for creating");
1491     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1492                       "\"Sokoban\"");
1493     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_2,
1494                       "in the year");
1495     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_3,
1496                       "1982");
1497     DrawTextSCentered(ystart + 6 * ystep, FONT_TEXT_2,
1498                       "published by");
1499     DrawTextSCentered(ystart + 7 * ystep, FONT_TEXT_3,
1500                       "Thinking Rabbit");
1501   }
1502   else if (screen_nr == 4)
1503   {
1504     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1505                       "Special thanks to");
1506     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1507                       "Alan Bond");
1508     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1509                       "and");
1510     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1511                       "Jürgen Bonhagen");
1512     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_2,
1513                       "for the continuous creation");
1514     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_2,
1515                       "of outstanding level sets");
1516   }
1517   else if (screen_nr == 5)
1518   {
1519     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1520                       "Thanks to");
1521     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1522                       "Peter Elzner");
1523     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1524                       "for ideas and inspiration by");
1525     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1526                       "Diamond Caves");
1527
1528     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_2,
1529                       "Thanks to");
1530     DrawTextSCentered(ystart + 6 * ystep, FONT_TEXT_3,
1531                       "Steffest");
1532     DrawTextSCentered(ystart + 7 * ystep, FONT_TEXT_2,
1533                       "for ideas and inspiration by");
1534     DrawTextSCentered(ystart + 8 * ystep, FONT_TEXT_3,
1535                       "DX-Boulderdash");
1536   }
1537   else if (screen_nr == 6)
1538   {
1539     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1540                       "Thanks to");
1541     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1542                       "David Tritscher");
1543     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1544                       "for the new Emerald Mine engine");
1545   }
1546   else if (screen_nr == 7)
1547   {
1548     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1549                       "Thanks to");
1550     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_3,
1551                       "Guido Schulz");
1552     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_2,
1553                       "for the initial DOS port");
1554
1555     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_2,
1556                       "Thanks to");
1557     DrawTextSCentered(ystart + 5 * ystep, FONT_TEXT_3,
1558                       "Karl Hörnell");
1559     DrawTextSCentered(ystart + 6 * ystep, FONT_TEXT_2,
1560                       "for some additional toons");
1561   }
1562   else if (screen_nr == 8)
1563   {
1564     DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1565                       "And not to forget:");
1566     DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_2,
1567                       "Many thanks to");
1568     DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_3,
1569                       "All those who contributed");
1570     DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_3,
1571                       "levels to this game");
1572     DrawTextSCentered(ystart + 4 * ystep, FONT_TEXT_3,
1573                       "since 1995");
1574   }
1575   else
1576   {
1577     return FALSE;
1578   }
1579
1580   DrawTextSCentered(ybottom, FONT_TEXT_4,
1581                     "Press any key or button for next page");
1582
1583   return TRUE;
1584 }
1585
1586 void DrawInfoScreen_Credits()
1587 {
1588   SetMainBackgroundImageIfDefined(IMG_BACKGROUND_INFO_CREDITS);
1589
1590   FadeSoundsAndMusic();
1591
1592   HandleInfoScreen_Credits(MB_MENU_INITIALIZE);
1593 }
1594
1595 void HandleInfoScreen_Credits(int button)
1596 {
1597   static int screen_nr = 0;
1598
1599   if (button == MB_MENU_INITIALIZE)
1600   {
1601     screen_nr = 0;
1602
1603     DrawInfoScreen_CreditsScreen(screen_nr);
1604   }
1605   else if (button == MB_MENU_LEAVE)
1606   {
1607     info_mode = INFO_MODE_MAIN;
1608     DrawInfoScreen();
1609
1610     return;
1611   }
1612   else if (button == MB_MENU_CHOICE)
1613   {
1614     screen_nr++;
1615
1616     if (!DrawInfoScreen_CreditsScreen(screen_nr))
1617     {
1618       FadeSoundsAndMusic();
1619
1620       info_mode = INFO_MODE_MAIN;
1621       DrawInfoScreen();
1622     }
1623   }
1624   else
1625   {
1626     PlayMenuSoundIfLoop();
1627   }
1628 }
1629
1630 void DrawInfoScreen_Program()
1631 {
1632   int ystart = 150, ystep = 30;
1633   int ybottom = SYSIZE - 20;
1634
1635   SetMainBackgroundImageIfDefined(IMG_BACKGROUND_INFO_PROGRAM);
1636
1637   ClearWindow();
1638   DrawHeadline();
1639
1640   DrawTextSCentered(100, FONT_TEXT_1, "Program Information:");
1641
1642   DrawTextSCentered(ystart + 0 * ystep, FONT_TEXT_2,
1643                     "This game is Freeware!");
1644   DrawTextSCentered(ystart + 1 * ystep, FONT_TEXT_2,
1645                     "If you like it, send e-mail to:");
1646   DrawTextSCentered(ystart + 2 * ystep, FONT_TEXT_3,
1647                     "info@artsoft.org");
1648   DrawTextSCentered(ystart + 3 * ystep, FONT_TEXT_2,
1649                     "or SnailMail to:");
1650   DrawTextSCentered(ystart + 4 * ystep + 0, FONT_TEXT_3,
1651                     "Holger Schemel");
1652   DrawTextSCentered(ystart + 4 * ystep + 20, FONT_TEXT_3,
1653                     "Detmolder Strasse 189");
1654   DrawTextSCentered(ystart + 4 * ystep + 40, FONT_TEXT_3,
1655                     "33604 Bielefeld");
1656   DrawTextSCentered(ystart + 4 * ystep + 60, FONT_TEXT_3,
1657                     "Germany");
1658
1659   DrawTextSCentered(ystart + 7 * ystep, FONT_TEXT_2,
1660                     "If you have created new levels,");
1661   DrawTextSCentered(ystart + 8 * ystep, FONT_TEXT_2,
1662                     "send them to me to include them!");
1663   DrawTextSCentered(ystart + 9 * ystep, FONT_TEXT_2,
1664                     ":-)");
1665
1666   DrawTextSCentered(ybottom, FONT_TEXT_4,
1667                     "Press any key or button for info menu");
1668 }
1669
1670 void HandleInfoScreen_Program(int button)
1671 {
1672   int button_released = !button;
1673
1674   if (button == MB_MENU_LEAVE)
1675   {
1676     info_mode = INFO_MODE_MAIN;
1677     DrawInfoScreen();
1678
1679     return;
1680   }
1681
1682   if (button_released)
1683   {
1684     FadeSoundsAndMusic();
1685
1686     info_mode = INFO_MODE_MAIN;
1687     DrawInfoScreen();
1688   }
1689   else
1690   {
1691     PlayMenuSoundIfLoop();
1692   }
1693 }
1694
1695 void DrawInfoScreen_LevelSet()
1696 {
1697   int ystart = 150;
1698   int ybottom = SYSIZE - 20;
1699   char *filename = getLevelSetInfoFilename();
1700   int font_nr = FONT_LEVEL_NUMBER;
1701   int font_width = getFontWidth(font_nr);
1702   int font_height = getFontHeight(font_nr);
1703   int pad_x = 32;
1704   int pad_y = ystart;
1705   int sx = SX + pad_x;
1706   int sy = SY + pad_y;
1707   int max_chars_per_line = (SXSIZE - 2 * pad_x) / font_width;
1708   int max_lines_per_screen = (SYSIZE - pad_y) / font_height - 1;
1709
1710   SetMainBackgroundImageIfDefined(IMG_BACKGROUND_INFO_LEVELSET);
1711
1712   ClearWindow();
1713   DrawHeadline();
1714
1715   DrawTextSCentered(100, FONT_TEXT_1, "Level Set Information:");
1716
1717   DrawTextSCentered(ybottom, FONT_TEXT_4,
1718                     "Press any key or button for info menu");
1719
1720   if (filename != NULL)
1721     DrawTextFromFile(sx, sy, filename, font_nr, max_chars_per_line,
1722                      max_lines_per_screen);
1723   else
1724     DrawTextSCentered(ystart, FONT_TEXT_2,
1725                       "No information for this level set.");
1726 }
1727
1728 void HandleInfoScreen_LevelSet(int button)
1729 {
1730   int button_released = !button;
1731
1732   if (button == MB_MENU_LEAVE)
1733   {
1734     info_mode = INFO_MODE_MAIN;
1735     DrawInfoScreen();
1736
1737     return;
1738   }
1739
1740   if (button_released)
1741   {
1742     FadeSoundsAndMusic();
1743
1744     info_mode = INFO_MODE_MAIN;
1745     DrawInfoScreen();
1746   }
1747   else
1748   {
1749     PlayMenuSoundIfLoop();
1750   }
1751 }
1752
1753 static void DrawInfoScreenExt(int fade_delay)
1754 {
1755   SetMainBackgroundImage(IMG_BACKGROUND_INFO);
1756
1757   if (info_mode == INFO_MODE_TITLESCREEN)
1758     DrawInfoScreen_TitleScreen();
1759   else if (info_mode == INFO_MODE_ELEMENTS)
1760     DrawInfoScreen_Elements();
1761   else if (info_mode == INFO_MODE_MUSIC)
1762     DrawInfoScreen_Music();
1763   else if (info_mode == INFO_MODE_CREDITS)
1764     DrawInfoScreen_Credits();
1765   else if (info_mode == INFO_MODE_PROGRAM)
1766     DrawInfoScreen_Program();
1767   else if (info_mode == INFO_MODE_LEVELSET)
1768     DrawInfoScreen_LevelSet();
1769   else
1770     DrawInfoScreen_Main(fade_delay);
1771
1772   if (info_mode != INFO_MODE_MUSIC)
1773   {
1774     PlayMenuSound();
1775     PlayMenuMusic();
1776   }
1777 }
1778
1779 void DrawInfoScreen()
1780 {
1781   DrawInfoScreenExt(0);
1782 }
1783
1784 void HandleInfoScreen(int mx, int my, int dx, int dy, int button)
1785 {
1786   if (info_mode == INFO_MODE_TITLESCREEN)
1787     HandleInfoScreen_TitleScreen(button);
1788   else if (info_mode == INFO_MODE_ELEMENTS)
1789     HandleInfoScreen_Elements(button);
1790   else if (info_mode == INFO_MODE_MUSIC)
1791     HandleInfoScreen_Music(button);
1792   else if (info_mode == INFO_MODE_CREDITS)
1793     HandleInfoScreen_Credits(button);
1794   else if (info_mode == INFO_MODE_PROGRAM)
1795     HandleInfoScreen_Program(button);
1796   else if (info_mode == INFO_MODE_LEVELSET)
1797     HandleInfoScreen_LevelSet(button);
1798   else
1799     HandleInfoScreen_Main(mx, my, dx, dy, button);
1800
1801   DoAnimation();
1802 }
1803
1804
1805 /* ========================================================================= */
1806 /* type name functions                                                       */
1807 /* ========================================================================= */
1808
1809 void HandleTypeName(int newxpos, Key key)
1810 {
1811   static int xpos = 0, ypos = 2;
1812   int font_width = getFontWidth(FONT_INPUT_1_ACTIVE);
1813   int name_width = getFontWidth(FONT_MENU_1) * strlen("Name:");
1814   int startx = mSX + 32 + name_width;
1815   int starty = mSY + ypos * 32;
1816
1817   if (newxpos)
1818   {
1819     xpos = newxpos;
1820
1821     DrawText(startx, starty, setup.player_name, FONT_INPUT_1_ACTIVE);
1822     DrawText(startx + xpos * font_width, starty, "_", FONT_INPUT_1_ACTIVE);
1823
1824     return;
1825   }
1826
1827   if (((key >= KSYM_A && key <= KSYM_Z) ||
1828        (key >= KSYM_a && key <= KSYM_z)) &&
1829       xpos < MAX_PLAYER_NAME_LEN)
1830   {
1831     char ascii;
1832
1833     if (key >= KSYM_A && key <= KSYM_Z)
1834       ascii = 'A' + (char)(key - KSYM_A);
1835     else
1836       ascii = 'a' + (char)(key - KSYM_a);
1837
1838     setup.player_name[xpos] = ascii;
1839     setup.player_name[xpos + 1] = 0;
1840     xpos++;
1841
1842     DrawText(startx, starty, setup.player_name, FONT_INPUT_1_ACTIVE);
1843     DrawText(startx + xpos * font_width, starty, "_", FONT_INPUT_1_ACTIVE);
1844   }
1845   else if ((key == KSYM_Delete || key == KSYM_BackSpace) && xpos > 0)
1846   {
1847     xpos--;
1848     setup.player_name[xpos] = 0;
1849
1850     DrawText(startx + xpos * font_width, starty, "_ ", FONT_INPUT_1_ACTIVE);
1851   }
1852   else if (key == KSYM_Return && xpos > 0)
1853   {
1854     DrawText(startx, starty, setup.player_name, FONT_INPUT_1);
1855     DrawText(startx + xpos * font_width, starty, " ", FONT_INPUT_1_ACTIVE);
1856
1857     SaveSetup();
1858     game_status = GAME_MODE_MAIN;
1859   }
1860 }
1861
1862
1863 /* ========================================================================= */
1864 /* tree menu functions                                                       */
1865 /* ========================================================================= */
1866
1867 static void DrawChooseTree(TreeInfo **ti_ptr)
1868 {
1869   UnmapAllGadgets();
1870
1871   FreeScreenGadgets();
1872   CreateScreenGadgets();
1873
1874   CloseDoor(DOOR_CLOSE_2);
1875
1876   ClearWindow();
1877
1878   HandleChooseTree(0, 0, 0, 0, MB_MENU_INITIALIZE, ti_ptr);
1879   MapChooseTreeGadgets(*ti_ptr);
1880
1881   FadeToFront();
1882   InitAnimation();
1883 }
1884
1885 static void AdjustChooseTreeScrollbar(int id, int first_entry, TreeInfo *ti)
1886 {
1887   struct GadgetInfo *gi = screen_gadget[id];
1888   int items_max, items_visible, item_position;
1889
1890   items_max = numTreeInfoInGroup(ti);
1891   items_visible = NUM_MENU_ENTRIES_ON_SCREEN;
1892   item_position = first_entry;
1893
1894   if (item_position > items_max - items_visible)
1895     item_position = items_max - items_visible;
1896
1897   ModifyGadget(gi, GDI_SCROLLBAR_ITEMS_MAX, items_max,
1898                GDI_SCROLLBAR_ITEMS_VISIBLE, items_visible,
1899                GDI_SCROLLBAR_ITEM_POSITION, item_position, GDI_END);
1900 }
1901
1902 static void drawChooseTreeList(int first_entry, int num_page_entries,
1903                                TreeInfo *ti)
1904 {
1905   int i;
1906   char *title_string = NULL;
1907 #if 0
1908   int xoffset_sets = 16;
1909 #endif
1910   int yoffset_sets = MENU_TITLE1_YPOS;
1911 #if 0
1912   int xoffset_setup = 16;
1913 #endif
1914   int yoffset_setup = 16;
1915 #if 1
1916 #if 0
1917   int xoffset = (ti->type == TREE_TYPE_LEVEL_DIR ? xoffset_sets :
1918                  xoffset_setup);
1919 #endif
1920   int yoffset = (ti->type == TREE_TYPE_LEVEL_DIR ? yoffset_sets :
1921                  yoffset_setup);
1922 #else
1923   int xoffset = (ti->type == TREE_TYPE_LEVEL_DIR ? 0 : xoffset_setup);
1924   int yoffset = (ti->type == TREE_TYPE_LEVEL_DIR ? 0 : yoffset_setup);
1925 #endif
1926   int last_game_status = game_status;   /* save current game status */
1927
1928   title_string =
1929     (ti->type == TREE_TYPE_LEVEL_DIR ? "Level Sets" :
1930      ti->type == TREE_TYPE_GRAPHICS_DIR ? "Custom Graphics" :
1931      ti->type == TREE_TYPE_SOUNDS_DIR ? "Custom Sounds" :
1932      ti->type == TREE_TYPE_MUSIC_DIR ? "Custom Music" : "");
1933
1934 #if 1
1935   DrawTextSCentered(mSY - SY + yoffset, FONT_TITLE_1, title_string);
1936 #else
1937   DrawText(SX + xoffset, SY + yoffset, title_string, FONT_TITLE_1);
1938 #endif
1939
1940   /* force LEVELS font on artwork setup screen */
1941   game_status = GAME_MODE_LEVELS;
1942
1943   /* clear tree list area, but not title or scrollbar */
1944   DrawBackground(mSX, mSY + MENU_SCREEN_START_YPOS * 32,
1945                  SC_SCROLLBAR_XPOS + menu.scrollbar_xoffset,
1946                  MAX_MENU_ENTRIES_ON_SCREEN * 32);
1947
1948   for (i = 0; i < num_page_entries; i++)
1949   {
1950     TreeInfo *node, *node_first;
1951     int entry_pos = first_entry + i;
1952     int xpos = MENU_SCREEN_START_XPOS;
1953     int ypos = MENU_SCREEN_START_YPOS + i;
1954     int startx = mSX + xpos * 32;
1955     int starty = mSY + ypos * 32;
1956     int font_nr = FONT_TEXT_1;
1957     int font_xoffset = getFontBitmapInfo(font_nr)->draw_xoffset;
1958     int startx_text = startx + font_xoffset;
1959     int startx_scrollbar = mSX + SC_SCROLLBAR_XPOS + menu.scrollbar_xoffset;
1960     int text_size = startx_scrollbar - startx_text;
1961     int max_buffer_len = text_size / getFontWidth(font_nr);
1962     char buffer[max_buffer_len + 1];
1963
1964     node_first = getTreeInfoFirstGroupEntry(ti);
1965     node = getTreeInfoFromPos(node_first, entry_pos);
1966
1967     strncpy(buffer, node->name, max_buffer_len);
1968     buffer[max_buffer_len] = '\0';
1969
1970     DrawText(startx, starty, buffer, font_nr + node->color);
1971
1972     if (node->parent_link)
1973       initCursor(i, IMG_MENU_BUTTON_LEAVE_MENU);
1974     else if (node->level_group)
1975       initCursor(i, IMG_MENU_BUTTON_ENTER_MENU);
1976     else
1977       initCursor(i, IMG_MENU_BUTTON);
1978   }
1979
1980   game_status = last_game_status;       /* restore current game status */
1981
1982   redraw_mask |= REDRAW_FIELD;
1983 }
1984
1985 static void drawChooseTreeInfo(int entry_pos, TreeInfo *ti)
1986 {
1987   TreeInfo *node, *node_first;
1988   int x, last_redraw_mask = redraw_mask;
1989 #if 1
1990   int ypos = MENU_TITLE2_YPOS;
1991 #else
1992   int ypos = 40;
1993 #endif
1994
1995   if (ti->type != TREE_TYPE_LEVEL_DIR)
1996     return;
1997
1998   node_first = getTreeInfoFirstGroupEntry(ti);
1999   node = getTreeInfoFromPos(node_first, entry_pos);
2000
2001   DrawBackground(SX, SY + ypos, SXSIZE, getFontHeight(FONT_TITLE_2));
2002
2003   if (node->parent_link)
2004     DrawTextFCentered(ypos, FONT_TITLE_2, "leave group \"%s\"",
2005                       node->class_desc);
2006   else if (node->level_group)
2007     DrawTextFCentered(ypos, FONT_TITLE_2, "enter group \"%s\"",
2008                       node->class_desc);
2009   else if (ti->type == TREE_TYPE_LEVEL_DIR)
2010     DrawTextFCentered(ypos, FONT_TITLE_2, "%3d levels (%s)",
2011                       node->levels, node->class_desc);
2012
2013   /* let BackToFront() redraw only what is needed */
2014   redraw_mask = last_redraw_mask | REDRAW_TILES;
2015   for (x = 0; x < SCR_FIELDX; x++)
2016     MarkTileDirty(x, 1);
2017 }
2018
2019 static void HandleChooseTree(int mx, int my, int dx, int dy, int button,
2020                              TreeInfo **ti_ptr)
2021 {
2022   TreeInfo *ti = *ti_ptr;
2023   int x = 0;
2024   int y = ti->cl_cursor;
2025   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
2026   int num_entries = numTreeInfoInGroup(ti);
2027   int num_page_entries;
2028   int last_game_status = game_status;   /* save current game status */
2029   boolean position_set_by_scrollbar = (dx == 999);
2030
2031   /* force LEVELS draw offset on choose level and artwork setup screen */
2032   game_status = GAME_MODE_LEVELS;
2033
2034   if (num_entries <= NUM_MENU_ENTRIES_ON_SCREEN)
2035     num_page_entries = num_entries;
2036   else
2037     num_page_entries = NUM_MENU_ENTRIES_ON_SCREEN;
2038
2039   game_status = last_game_status;       /* restore current game status */
2040
2041   if (button == MB_MENU_INITIALIZE)
2042   {
2043     int num_entries = numTreeInfoInGroup(ti);
2044     int entry_pos = posTreeInfo(ti);
2045
2046     if (ti->cl_first == -1)
2047     {
2048       /* only on initialization */
2049       ti->cl_first = MAX(0, entry_pos - num_page_entries + 1);
2050       ti->cl_cursor = entry_pos - ti->cl_first;
2051     }
2052     else if (ti->cl_cursor >= num_page_entries ||
2053              (num_entries > num_page_entries &&
2054               num_entries - ti->cl_first < num_page_entries))
2055     {
2056       /* only after change of list size (by custom graphic configuration) */
2057       ti->cl_first = MAX(0, entry_pos - num_page_entries + 1);
2058       ti->cl_cursor = entry_pos - ti->cl_first;
2059     }
2060
2061     if (position_set_by_scrollbar)
2062       ti->cl_first = dy;
2063     else
2064       AdjustChooseTreeScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
2065                                 ti->cl_first, ti);
2066
2067     drawChooseTreeList(ti->cl_first, num_page_entries, ti);
2068     drawChooseTreeInfo(ti->cl_first + ti->cl_cursor, ti);
2069     drawChooseTreeCursor(ti->cl_cursor, FC_RED);
2070
2071     return;
2072   }
2073   else if (button == MB_MENU_LEAVE)
2074   {
2075     if (ti->node_parent)
2076     {
2077       *ti_ptr = ti->node_parent;
2078       DrawChooseTree(ti_ptr);
2079     }
2080     else if (game_status == GAME_MODE_SETUP)
2081     {
2082       execSetupArtwork();
2083     }
2084     else
2085     {
2086       game_status = GAME_MODE_MAIN;
2087       DrawMainMenu();
2088     }
2089
2090     return;
2091   }
2092
2093   if (mx || my)         /* mouse input */
2094   {
2095     int last_game_status = game_status; /* save current game status */
2096
2097     /* force LEVELS draw offset on artwork setup screen */
2098     game_status = GAME_MODE_LEVELS;
2099
2100     x = (mx - mSX) / 32;
2101     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
2102
2103     game_status = last_game_status;     /* restore current game status */
2104   }
2105   else if (dx || dy)    /* keyboard or scrollbar/scrollbutton input */
2106   {
2107     /* move cursor instead of scrolling when already at start/end of list */
2108     if (dy == -1 * SCROLL_LINE && ti->cl_first == 0)
2109       dy = -1;
2110     else if (dy == +1 * SCROLL_LINE &&
2111              ti->cl_first + num_page_entries == num_entries)
2112       dy = 1;
2113
2114     /* handle scrolling screen one line or page */
2115     if (ti->cl_cursor + dy < 0 ||
2116         ti->cl_cursor + dy > num_page_entries - 1)
2117     {
2118       if (ABS(dy) == SCROLL_PAGE)
2119         step = num_page_entries - 1;
2120
2121       if (dy < 0 && ti->cl_first > 0)
2122       {
2123         /* scroll page/line up */
2124
2125         ti->cl_first -= step;
2126         if (ti->cl_first < 0)
2127           ti->cl_first = 0;
2128
2129         drawChooseTreeList(ti->cl_first, num_page_entries, ti);
2130         drawChooseTreeInfo(ti->cl_first + ti->cl_cursor, ti);
2131         drawChooseTreeCursor(ti->cl_cursor, FC_RED);
2132         AdjustChooseTreeScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
2133                                   ti->cl_first, ti);
2134       }
2135       else if (dy > 0 && ti->cl_first + num_page_entries < num_entries)
2136       {
2137         /* scroll page/line down */
2138
2139         ti->cl_first += step;
2140         if (ti->cl_first + num_page_entries > num_entries)
2141           ti->cl_first = MAX(0, num_entries - num_page_entries);
2142
2143         drawChooseTreeList(ti->cl_first, num_page_entries, ti);
2144         drawChooseTreeInfo(ti->cl_first + ti->cl_cursor, ti);
2145         drawChooseTreeCursor(ti->cl_cursor, FC_RED);
2146         AdjustChooseTreeScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
2147                                   ti->cl_first, ti);
2148       }
2149
2150       return;
2151     }
2152
2153     /* handle moving cursor one line */
2154     y = ti->cl_cursor + dy;
2155   }
2156
2157   if (dx == 1)
2158   {
2159     TreeInfo *node_first, *node_cursor;
2160     int entry_pos = ti->cl_first + y;
2161
2162     node_first = getTreeInfoFirstGroupEntry(ti);
2163     node_cursor = getTreeInfoFromPos(node_first, entry_pos);
2164
2165     if (node_cursor->node_group)
2166     {
2167       node_cursor->cl_first = ti->cl_first;
2168       node_cursor->cl_cursor = ti->cl_cursor;
2169       *ti_ptr = node_cursor->node_group;
2170       DrawChooseTree(ti_ptr);
2171
2172       return;
2173     }
2174   }
2175   else if (dx == -1 && ti->node_parent)
2176   {
2177     *ti_ptr = ti->node_parent;
2178     DrawChooseTree(ti_ptr);
2179
2180     return;
2181   }
2182
2183   if (!anyScrollbarGadgetActive() &&
2184       IN_VIS_FIELD(x, y) &&
2185       mx < screen_gadget[SCREEN_CTRL_ID_SCROLL_VERTICAL]->x &&
2186       y >= 0 && y < num_page_entries)
2187   {
2188     if (button)
2189     {
2190       if (y != ti->cl_cursor)
2191       {
2192         drawChooseTreeCursor(y, FC_RED);
2193         drawChooseTreeCursor(ti->cl_cursor, FC_BLUE);
2194         drawChooseTreeInfo(ti->cl_first + y, ti);
2195         ti->cl_cursor = y;
2196       }
2197     }
2198     else
2199     {
2200       TreeInfo *node_first, *node_cursor;
2201       int entry_pos = ti->cl_first + y;
2202
2203       node_first = getTreeInfoFirstGroupEntry(ti);
2204       node_cursor = getTreeInfoFromPos(node_first, entry_pos);
2205
2206       if (node_cursor->node_group)
2207       {
2208         node_cursor->cl_first = ti->cl_first;
2209         node_cursor->cl_cursor = ti->cl_cursor;
2210         *ti_ptr = node_cursor->node_group;
2211         DrawChooseTree(ti_ptr);
2212       }
2213       else if (node_cursor->parent_link)
2214       {
2215         *ti_ptr = node_cursor->node_parent;
2216         DrawChooseTree(ti_ptr);
2217       }
2218       else
2219       {
2220         node_cursor->cl_first = ti->cl_first;
2221         node_cursor->cl_cursor = ti->cl_cursor;
2222         *ti_ptr = node_cursor;
2223
2224         if (ti->type == TREE_TYPE_LEVEL_DIR)
2225         {
2226           LoadLevelSetup_SeriesInfo();
2227
2228           SaveLevelSetup_LastSeries();
2229           SaveLevelSetup_SeriesInfo();
2230           TapeErase();
2231         }
2232
2233         if (game_status == GAME_MODE_SETUP)
2234         {
2235           execSetupArtwork();
2236         }
2237         else
2238         {
2239           game_status = GAME_MODE_MAIN;
2240           DrawMainMenu();
2241         }
2242       }
2243     }
2244   }
2245 }
2246
2247 void DrawChooseLevel()
2248 {
2249   SetMainBackgroundImage(IMG_BACKGROUND_LEVELS);
2250
2251   DrawChooseTree(&leveldir_current);
2252
2253   PlayMenuSound();
2254   PlayMenuMusic();
2255 }
2256
2257 void HandleChooseLevel(int mx, int my, int dx, int dy, int button)
2258 {
2259   HandleChooseTree(mx, my, dx, dy, button, &leveldir_current);
2260
2261   DoAnimation();
2262 }
2263
2264 void DrawHallOfFame(int highlight_position)
2265 {
2266   UnmapAllGadgets();
2267   FadeSoundsAndMusic();
2268   CloseDoor(DOOR_CLOSE_2);
2269
2270   if (highlight_position < 0)
2271     LoadScore(level_nr);
2272
2273   FadeToFront();
2274   InitAnimation();
2275
2276   PlayMenuSound();
2277   PlayMenuMusic();
2278
2279   HandleHallOfFame(highlight_position, 0, 0, 0, MB_MENU_INITIALIZE);
2280 }
2281
2282 static void drawHallOfFameList(int first_entry, int highlight_position)
2283 {
2284   int i;
2285
2286   SetMainBackgroundImage(IMG_BACKGROUND_SCORES);
2287   ClearWindow();
2288
2289 #if 1
2290   DrawTextSCentered(MENU_TITLE1_YPOS, FONT_TITLE_1, "Hall Of Fame");
2291   DrawTextFCentered(MENU_TITLE2_YPOS, FONT_TITLE_2,
2292                     "HighScores of Level %d", level_nr);
2293 #else
2294   DrawText(mSX + 80, mSY + MENU_TITLE1_YPOS, "Hall Of Fame", FONT_TITLE_1);
2295   DrawTextFCentered(MENU_TITLE2_YPOS, FONT_TITLE_2,
2296                     "HighScores of Level %d", level_nr);
2297 #endif
2298
2299   for (i = 0; i < NUM_MENU_ENTRIES_ON_SCREEN; i++)
2300   {
2301     int entry = first_entry + i;
2302     boolean active = (entry == highlight_position);
2303     int font_nr1 = (active ? FONT_TEXT_1_ACTIVE : FONT_TEXT_1);
2304     int font_nr2 = (active ? FONT_TEXT_2_ACTIVE : FONT_TEXT_2);
2305     int font_nr3 = (active ? FONT_TEXT_3_ACTIVE : FONT_TEXT_3);
2306     int font_nr4 = (active ? FONT_TEXT_4_ACTIVE : FONT_TEXT_4);
2307     int dx1 = 3 * getFontWidth(font_nr1);
2308     int dx2 = dx1 + getFontWidth(font_nr1);
2309     int dx3 = dx2 + 25 * getFontWidth(font_nr3);
2310     int sy = mSY + 64 + i * 32;
2311
2312     DrawText(mSX, sy, int2str(entry + 1, 3), font_nr1);
2313     DrawText(mSX + dx1, sy, ".", font_nr1);
2314     DrawText(mSX + dx2, sy, ".........................", font_nr3);
2315
2316     if (!strEqual(highscore[entry].Name, EMPTY_PLAYER_NAME))
2317       DrawText(mSX + dx2, sy, highscore[entry].Name, font_nr2);
2318
2319     DrawText(mSX + dx3, sy, int2str(highscore[entry].Score, 5), font_nr4);
2320   }
2321
2322   redraw_mask |= REDRAW_FIELD;
2323 }
2324
2325 void HandleHallOfFame(int mx, int my, int dx, int dy, int button)
2326 {
2327   static int first_entry = 0;
2328   static int highlight_position = 0;
2329   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
2330   int button_released = !button;
2331
2332   if (button == MB_MENU_INITIALIZE)
2333   {
2334     first_entry = 0;
2335     highlight_position = mx;
2336     drawHallOfFameList(first_entry, highlight_position);
2337
2338     return;
2339   }
2340
2341   if (ABS(dy) == SCROLL_PAGE)           /* handle scrolling one page */
2342     step = NUM_MENU_ENTRIES_ON_SCREEN - 1;
2343
2344   if (dy < 0)
2345   {
2346     if (first_entry > 0)
2347     {
2348       first_entry -= step;
2349       if (first_entry < 0)
2350         first_entry = 0;
2351
2352       drawHallOfFameList(first_entry, highlight_position);
2353     }
2354   }
2355   else if (dy > 0)
2356   {
2357     if (first_entry + NUM_MENU_ENTRIES_ON_SCREEN < MAX_SCORE_ENTRIES)
2358     {
2359       first_entry += step;
2360       if (first_entry + NUM_MENU_ENTRIES_ON_SCREEN > MAX_SCORE_ENTRIES)
2361         first_entry = MAX(0, MAX_SCORE_ENTRIES - NUM_MENU_ENTRIES_ON_SCREEN);
2362
2363       drawHallOfFameList(first_entry, highlight_position);
2364     }
2365   }
2366   else if (button_released)
2367   {
2368     FadeSound(SND_BACKGROUND_SCORES);
2369     game_status = GAME_MODE_MAIN;
2370     DrawMainMenu();
2371   }
2372
2373   if (game_status == GAME_MODE_SCORES)
2374     PlayMenuSoundIfLoop();
2375
2376   DoAnimation();
2377 }
2378
2379
2380 /* ========================================================================= */
2381 /* setup screen functions                                                    */
2382 /* ========================================================================= */
2383
2384 static struct TokenInfo *setup_info;
2385 static int num_setup_info;
2386
2387 static char *graphics_set_name;
2388 static char *sounds_set_name;
2389 static char *music_set_name;
2390
2391 static void execSetupMain()
2392 {
2393   setup_mode = SETUP_MODE_MAIN;
2394   DrawSetupScreen();
2395 }
2396
2397 static void execSetupGame()
2398 {
2399   setup_mode = SETUP_MODE_GAME;
2400   DrawSetupScreen();
2401 }
2402
2403 static void execSetupEditor()
2404 {
2405   setup_mode = SETUP_MODE_EDITOR;
2406   DrawSetupScreen();
2407 }
2408
2409 static void execSetupGraphics()
2410 {
2411   setup_mode = SETUP_MODE_GRAPHICS;
2412   DrawSetupScreen();
2413 }
2414
2415 static void execSetupSound()
2416 {
2417   setup_mode = SETUP_MODE_SOUND;
2418   DrawSetupScreen();
2419 }
2420
2421 static void execSetupArtwork()
2422 {
2423   setup.graphics_set = artwork.gfx_current->identifier;
2424   setup.sounds_set = artwork.snd_current->identifier;
2425   setup.music_set = artwork.mus_current->identifier;
2426
2427   /* needed if last screen (setup choice) changed graphics, sounds or music */
2428   ReloadCustomArtwork(0);
2429
2430   /* needed for displaying artwork name instead of artwork identifier */
2431   graphics_set_name = artwork.gfx_current->name;
2432   sounds_set_name = artwork.snd_current->name;
2433   music_set_name = artwork.mus_current->name;
2434
2435   setup_mode = SETUP_MODE_ARTWORK;
2436   DrawSetupScreen();
2437 }
2438
2439 static void execSetupChooseGraphics()
2440 {
2441   setup_mode = SETUP_MODE_CHOOSE_GRAPHICS;
2442   DrawSetupScreen();
2443 }
2444
2445 static void execSetupChooseSounds()
2446 {
2447   setup_mode = SETUP_MODE_CHOOSE_SOUNDS;
2448   DrawSetupScreen();
2449 }
2450
2451 static void execSetupChooseMusic()
2452 {
2453   setup_mode = SETUP_MODE_CHOOSE_MUSIC;
2454   DrawSetupScreen();
2455 }
2456
2457 static void execSetupInput()
2458 {
2459   setup_mode = SETUP_MODE_INPUT;
2460   DrawSetupScreen();
2461 }
2462
2463 static void execSetupShortcut1()
2464 {
2465   setup_mode = SETUP_MODE_SHORTCUT_1;
2466   DrawSetupScreen();
2467 }
2468
2469 static void execSetupShortcut2()
2470 {
2471   setup_mode = SETUP_MODE_SHORTCUT_2;
2472   DrawSetupScreen();
2473 }
2474
2475 static void execExitSetup()
2476 {
2477   game_status = GAME_MODE_MAIN;
2478   DrawMainMenu();
2479 }
2480
2481 static void execSaveAndExitSetup()
2482 {
2483   SaveSetup();
2484   execExitSetup();
2485 }
2486
2487 static struct TokenInfo setup_info_main[] =
2488 {
2489   { TYPE_ENTER_MENU,    execSetupGame,          "Game & Menu"           },
2490   { TYPE_ENTER_MENU,    execSetupEditor,        "Editor"                },
2491   { TYPE_ENTER_MENU,    execSetupGraphics,      "Graphics"              },
2492   { TYPE_ENTER_MENU,    execSetupSound,         "Sound & Music"         },
2493   { TYPE_ENTER_MENU,    execSetupArtwork,       "Custom Artwork"        },
2494   { TYPE_ENTER_MENU,    execSetupInput,         "Input Devices"         },
2495   { TYPE_ENTER_MENU,    execSetupShortcut1,     "Key Shortcuts 1"       },
2496   { TYPE_ENTER_MENU,    execSetupShortcut2,     "Key Shortcuts 2"       },
2497   { TYPE_EMPTY,         NULL,                   ""                      },
2498   { TYPE_LEAVE_MENU,    execExitSetup,          "Exit"                  },
2499   { TYPE_LEAVE_MENU,    execSaveAndExitSetup,   "Save and Exit"         },
2500
2501   { 0,                  NULL,                   NULL                    }
2502 };
2503
2504 static struct TokenInfo setup_info_game[] =
2505 {
2506   { TYPE_SWITCH,        &setup.team_mode,       "Team-Mode (Multi-Player):" },
2507   { TYPE_YES_NO,        &setup.input_on_focus,  "Only Move Focussed Player:" },
2508   { TYPE_SWITCH,        &setup.handicap,        "Handicap:"             },
2509   { TYPE_SWITCH,        &setup.skip_levels,     "Skip Unsolved Levels:" },
2510   { TYPE_SWITCH,        &setup.time_limit,      "Time Limit:"           },
2511   { TYPE_SWITCH,        &setup.autorecord,      "Auto-Record Tapes:"    },
2512   { TYPE_EMPTY,         NULL,                   ""                      },
2513   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2514
2515   { 0,                  NULL,                   NULL                    }
2516 };
2517
2518 static struct TokenInfo setup_info_editor[] =
2519 {
2520 #if 0
2521   { TYPE_SWITCH,        &setup.editor.el_boulderdash,   "Boulder Dash:" },
2522   { TYPE_SWITCH,        &setup.editor.el_emerald_mine,  "Emerald Mine:" },
2523   { TYPE_SWITCH, &setup.editor.el_emerald_mine_club,    "Emerald Mine Club:" },
2524   { TYPE_SWITCH,        &setup.editor.el_more,          "Rocks'n'Diamonds:" },
2525   { TYPE_SWITCH,        &setup.editor.el_sokoban,       "Sokoban:"      },
2526   { TYPE_SWITCH,        &setup.editor.el_supaplex,      "Supaplex:"     },
2527   { TYPE_SWITCH,        &setup.editor.el_diamond_caves, "Diamond Caves II:" },
2528   { TYPE_SWITCH,        &setup.editor.el_dx_boulderdash,"DX-Boulderdash:" },
2529 #endif
2530   { TYPE_SWITCH,        &setup.editor.el_chars,         "Text Characters:" },
2531   { TYPE_SWITCH,        &setup.editor.el_custom,  "Custom & Group Elements:" },
2532   { TYPE_SWITCH,        &setup.editor.el_headlines,     "Headlines:"    },
2533   { TYPE_SWITCH, &setup.editor.el_user_defined, "User defined element list:" },
2534   { TYPE_SWITCH,        &setup.editor.el_dynamic,  "Dynamic level elements:" },
2535   { TYPE_EMPTY,         NULL,                   ""                      },
2536   { TYPE_SWITCH, &setup.editor.show_element_token,      "Show element token:" },
2537   { TYPE_EMPTY,         NULL,                   ""                      },
2538   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2539
2540   { 0,                  NULL,                   NULL                    }
2541 };
2542
2543 static struct TokenInfo setup_info_graphics[] =
2544 {
2545   { TYPE_SWITCH,        &setup.fullscreen,      "Fullscreen Mode:"      },
2546   { TYPE_SWITCH,        &setup.scroll_delay,    "Delayed Scrolling:"    },
2547 #if 0
2548   { TYPE_SWITCH,        &setup.soft_scrolling,  "Soft Scrolling:"       },
2549   { TYPE_SWITCH,        &setup.double_buffering,"Double-Buffering:"     },
2550   { TYPE_SWITCH,        &setup.fading,          "Fading:"               },
2551 #endif
2552   { TYPE_SWITCH,        &setup.quick_switch,    "Quick Player Focus Switch:" },
2553   { TYPE_SWITCH,        &setup.quick_doors,     "Quick Menu Doors:"     },
2554   { TYPE_SWITCH,        &setup.show_titlescreen,"Show Title Screens:"   },
2555   { TYPE_SWITCH,        &setup.toons,           "Show Toons:"           },
2556   { TYPE_ECS_AGA,       &setup.prefer_aga_graphics,"EMC graphics preference:" },
2557   { TYPE_EMPTY,         NULL,                   ""                      },
2558   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2559
2560   { 0,                  NULL,                   NULL                    }
2561 };
2562
2563 static struct TokenInfo setup_info_sound[] =
2564 {
2565   { TYPE_SWITCH,        &setup.sound_simple,    "Sound Effects (Normal):"  },
2566   { TYPE_SWITCH,        &setup.sound_loops,     "Sound Effects (Looping):" },
2567   { TYPE_SWITCH,        &setup.sound_music,     "Music:"                },
2568   { TYPE_EMPTY,         NULL,                   ""                      },
2569   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2570
2571   { 0,                  NULL,                   NULL                    }
2572 };
2573
2574 static struct TokenInfo setup_info_artwork[] =
2575 {
2576   { TYPE_ENTER_MENU,    execSetupChooseGraphics,"Custom Graphics"       },
2577   { TYPE_STRING,        &graphics_set_name,     ""                      },
2578   { TYPE_ENTER_MENU,    execSetupChooseSounds,  "Custom Sounds"         },
2579   { TYPE_STRING,        &sounds_set_name,       ""                      },
2580   { TYPE_ENTER_MENU,    execSetupChooseMusic,   "Custom Music"          },
2581   { TYPE_STRING,        &music_set_name,        ""                      },
2582   { TYPE_EMPTY,         NULL,                   ""                      },
2583 #if 1
2584   { TYPE_YES_NO, &setup.override_level_graphics,"Override Level Graphics:" },
2585   { TYPE_YES_NO, &setup.override_level_sounds,  "Override Level Sounds:"   },
2586   { TYPE_YES_NO, &setup.override_level_music,   "Override Level Music:"    },
2587 #else
2588   { TYPE_STRING,        NULL,                   "Override Level Artwork:"},
2589   { TYPE_YES_NO,        &setup.override_level_graphics, "Graphics:"     },
2590   { TYPE_YES_NO,        &setup.override_level_sounds,   "Sounds:"       },
2591   { TYPE_YES_NO,        &setup.override_level_music,    "Music:"        },
2592 #endif
2593   { TYPE_EMPTY,         NULL,                   ""                      },
2594   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2595
2596   { 0,                  NULL,                   NULL                    }
2597 };
2598
2599 static struct TokenInfo setup_info_shortcut_1[] =
2600 {
2601   { TYPE_KEYTEXT,       NULL,           "Quick Save Game to Tape:",     },
2602   { TYPE_KEY,           &setup.shortcut.save_game, ""                   },
2603   { TYPE_KEYTEXT,       NULL,           "Quick Load Game from Tape:",   },
2604   { TYPE_KEY,           &setup.shortcut.load_game, ""                   },
2605   { TYPE_KEYTEXT,       NULL,           "Start Game & Toggle Pause:",   },
2606   { TYPE_KEY,           &setup.shortcut.toggle_pause, ""                },
2607   { TYPE_EMPTY,         NULL,                   ""                      },
2608   { TYPE_YES_NO,        &setup.ask_on_escape,   "Ask on 'Esc' Key:"     },
2609   { TYPE_YES_NO, &setup.ask_on_escape_editor,   "Ask on 'Esc' Key (Editor):" },
2610   { TYPE_EMPTY,         NULL,                   ""                      },
2611   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2612
2613   { 0,                  NULL,                   NULL                    }
2614 };
2615
2616 static struct TokenInfo setup_info_shortcut_2[] =
2617 {
2618   { TYPE_KEYTEXT,       NULL,           "Set Focus to Player 1:",       },
2619   { TYPE_KEY,           &setup.shortcut.focus_player[0], ""             },
2620   { TYPE_KEYTEXT,       NULL,           "Set Focus to Player 2:",       },
2621   { TYPE_KEY,           &setup.shortcut.focus_player[1], ""             },
2622   { TYPE_KEYTEXT,       NULL,           "Set Focus to Player 3:",       },
2623   { TYPE_KEY,           &setup.shortcut.focus_player[2], ""             },
2624   { TYPE_KEYTEXT,       NULL,           "Set Focus to Player 4:",       },
2625   { TYPE_KEY,           &setup.shortcut.focus_player[3], ""             },
2626   { TYPE_KEYTEXT,       NULL,           "Set Focus to All Players:",    },
2627   { TYPE_KEY,           &setup.shortcut.focus_player_all, ""            },
2628   { TYPE_EMPTY,         NULL,                   ""                      },
2629   { TYPE_LEAVE_MENU,    execSetupMain,          "Back"                  },
2630
2631   { 0,                  NULL,                   NULL                    }
2632 };
2633
2634 static Key getSetupKey()
2635 {
2636   Key key = KSYM_UNDEFINED;
2637   boolean got_key_event = FALSE;
2638
2639   while (!got_key_event)
2640   {
2641     if (PendingEvent())         /* got event */
2642     {
2643       Event event;
2644
2645       NextEvent(&event);
2646
2647       switch(event.type)
2648       {
2649         case EVENT_KEYPRESS:
2650           {
2651             key = GetEventKey((KeyEvent *)&event, TRUE);
2652
2653             /* press 'Escape' or 'Enter' to keep the existing key binding */
2654             if (key == KSYM_Escape || key == KSYM_Return)
2655               key = KSYM_UNDEFINED;     /* keep old value */
2656
2657             got_key_event = TRUE;
2658           }
2659           break;
2660
2661         case EVENT_KEYRELEASE:
2662           key_joystick_mapping = 0;
2663           break;
2664
2665         default:
2666           HandleOtherEvents(&event);
2667           break;
2668       }
2669     }
2670
2671     DoAnimation();
2672     BackToFront();
2673
2674     /* don't eat all CPU time */
2675     Delay(10);
2676   }
2677
2678   return key;
2679 }
2680
2681 static int getSetupTextFont(int type)
2682 {
2683   if (type & (TYPE_SWITCH |
2684               TYPE_YES_NO |
2685               TYPE_STRING |
2686               TYPE_ECS_AGA |
2687               TYPE_KEYTEXT))
2688     return FONT_MENU_2;
2689   else
2690     return FONT_MENU_1;
2691 }
2692
2693 static int getSetupValueFont(int type, void *value)
2694 {
2695   if (type & TYPE_KEY)
2696     return (type & TYPE_QUERY ? FONT_INPUT_1_ACTIVE : FONT_VALUE_1);
2697   else if (type & TYPE_STRING)
2698     return FONT_VALUE_2;
2699   else if (type & TYPE_ECS_AGA)
2700     return FONT_VALUE_1;
2701   else if (type & TYPE_BOOLEAN_STYLE)
2702     return (*(boolean *)value ? FONT_OPTION_ON : FONT_OPTION_OFF);
2703   else
2704     return FONT_VALUE_1;
2705 }
2706
2707 static void drawSetupValue(int pos)
2708 {
2709   boolean font_draw_xoffset_modified = FALSE;
2710   int font_draw_xoffset_old = -1;
2711   int xpos = MENU_SCREEN_VALUE_XPOS;
2712   int ypos = MENU_SCREEN_START_YPOS + pos;
2713   int startx = mSX + xpos * 32;
2714   int starty = mSY + ypos * 32;
2715   int font_nr, font_width;
2716   int type = setup_info[pos].type;
2717   void *value = setup_info[pos].value;
2718   char *value_string = getSetupValue(type, value);
2719   int i;
2720
2721   if (value_string == NULL)
2722     return;
2723
2724   if (type & TYPE_KEY)
2725   {
2726 #if 1
2727     xpos = MENU_SCREEN_START_XPOS;
2728 #else
2729     xpos = 3;
2730 #endif
2731
2732     if (type & TYPE_QUERY)
2733     {
2734       value_string = "<press key>";
2735 #if 0
2736       font_nr = FONT_INPUT_1_ACTIVE;
2737 #endif
2738     }
2739   }
2740   else if (type & TYPE_STRING)
2741   {
2742     int max_value_len = (SCR_FIELDX - 2) * 2;
2743
2744     xpos = MENU_SCREEN_START_XPOS;
2745 #if 0
2746     font_nr = FONT_VALUE_2;
2747 #endif
2748
2749     if (strlen(value_string) > max_value_len)
2750       value_string[max_value_len] = '\0';
2751   }
2752   else if (type & TYPE_ECS_AGA)
2753   {
2754 #if 0
2755     font_nr = FONT_VALUE_1;
2756 #endif
2757   }
2758   else if (type & TYPE_BOOLEAN_STYLE)
2759   {
2760 #if 0
2761     font_nr = (*(boolean *)value ? FONT_OPTION_ON : FONT_OPTION_OFF);
2762 #endif
2763   }
2764
2765   startx = mSX + xpos * 32;
2766   starty = mSY + ypos * 32;
2767   font_nr = getSetupValueFont(type, value);
2768   font_width = getFontWidth(font_nr);
2769
2770   /* downward compatibility correction for Juergen Bonhagen's menu settings */
2771   if (setup_mode != SETUP_MODE_INPUT)
2772   {
2773     int check_font_nr = FONT_OPTION_ON; /* known font that needs correction */
2774     int font1_xoffset = getFontBitmapInfo(font_nr)->draw_xoffset;
2775     int font2_xoffset = getFontBitmapInfo(check_font_nr)->draw_xoffset;
2776     int text_startx = mSX + MENU_SCREEN_START_XPOS * 32;
2777     int text_font_nr = getSetupTextFont(FONT_MENU_2);
2778     int text_font_xoffset = getFontBitmapInfo(text_font_nr)->draw_xoffset;
2779     int text_width = MAX_MENU_TEXT_LENGTH_MEDIUM * getFontWidth(text_font_nr);
2780     boolean correct_font_draw_xoffset = FALSE;
2781
2782     if (xpos == MENU_SCREEN_START_XPOS &&
2783         startx + font1_xoffset < text_startx + text_font_xoffset)
2784       correct_font_draw_xoffset = TRUE;
2785
2786     if (xpos == MENU_SCREEN_VALUE_XPOS &&
2787         startx + font2_xoffset < text_startx + text_width + text_font_xoffset)
2788       correct_font_draw_xoffset = TRUE;
2789
2790 #if 0
2791     printf("::: %d + %d < %d + %d + %d\n",
2792            startx, font_xoffset, text_startx, text_width, text_font_xoffset);
2793     printf("::: => need correction == %d\n", correct_font_draw_xoffset);
2794 #endif
2795
2796     /* check if setup value would overlap with setup text when printed */
2797     /* (this can happen for extreme/wrong values for font draw offset) */
2798     if (correct_font_draw_xoffset)
2799     {
2800       font_draw_xoffset_old = getFontBitmapInfo(font_nr)->draw_xoffset;
2801       font_draw_xoffset_modified = TRUE;
2802
2803       if (type & TYPE_KEY)
2804         getFontBitmapInfo(font_nr)->draw_xoffset += 2 * getFontWidth(font_nr);
2805       else if (!(type & TYPE_STRING))
2806         getFontBitmapInfo(font_nr)->draw_xoffset = text_font_xoffset + 20 -
2807           MAX_MENU_TEXT_LENGTH_MEDIUM * (16 - getFontWidth(text_font_nr));
2808     }
2809   }
2810
2811 #if 1
2812   for (i = 0; i <= MENU_SCREEN_MAX_XPOS - xpos; i++)
2813     DrawText(startx + i * font_width, starty, " ", font_nr);
2814 #else
2815 #if 1
2816   for (i = xpos; i <= MENU_SCREEN_MAX_XPOS; i++)
2817     DrawText(mSX + i * 32, starty, " ", font_nr);
2818 #else
2819   DrawText(startx, starty,
2820            (xpos == 3 ? "              " : "   "), font_nr);
2821 #endif
2822 #endif
2823
2824   DrawText(startx, starty, value_string, font_nr);
2825
2826   if (font_draw_xoffset_modified)
2827     getFontBitmapInfo(font_nr)->draw_xoffset = font_draw_xoffset_old;
2828 }
2829
2830 static void changeSetupValue(int pos)
2831 {
2832   if (setup_info[pos].type & TYPE_BOOLEAN_STYLE)
2833   {
2834     *(boolean *)setup_info[pos].value ^= TRUE;
2835   }
2836   else if (setup_info[pos].type & TYPE_KEY)
2837   {
2838     Key key;
2839
2840     setup_info[pos].type |= TYPE_QUERY;
2841     drawSetupValue(pos);
2842     setup_info[pos].type &= ~TYPE_QUERY;
2843
2844     key = getSetupKey();
2845     if (key != KSYM_UNDEFINED)
2846       *(Key *)setup_info[pos].value = key;
2847   }
2848
2849   drawSetupValue(pos);
2850 }
2851
2852 static void DrawSetupScreen_Generic()
2853 {
2854   char *title_string = NULL;
2855   int i;
2856
2857   UnmapAllGadgets();
2858   CloseDoor(DOOR_CLOSE_2);
2859
2860   ClearWindow();
2861
2862   if (setup_mode == SETUP_MODE_MAIN)
2863   {
2864     setup_info = setup_info_main;
2865     title_string = "Setup";
2866   }
2867   else if (setup_mode == SETUP_MODE_GAME)
2868   {
2869     setup_info = setup_info_game;
2870     title_string = "Setup Game";
2871   }
2872   else if (setup_mode == SETUP_MODE_EDITOR)
2873   {
2874     setup_info = setup_info_editor;
2875     title_string = "Setup Editor";
2876   }
2877   else if (setup_mode == SETUP_MODE_GRAPHICS)
2878   {
2879     setup_info = setup_info_graphics;
2880     title_string = "Setup Graphics";
2881   }
2882   else if (setup_mode == SETUP_MODE_SOUND)
2883   {
2884     setup_info = setup_info_sound;
2885     title_string = "Setup Sound";
2886   }
2887   else if (setup_mode == SETUP_MODE_ARTWORK)
2888   {
2889     setup_info = setup_info_artwork;
2890     title_string = "Custom Artwork";
2891   }
2892   else if (setup_mode == SETUP_MODE_SHORTCUT_1)
2893   {
2894     setup_info = setup_info_shortcut_1;
2895     title_string = "Setup Shortcuts";
2896   }
2897   else if (setup_mode == SETUP_MODE_SHORTCUT_2)
2898   {
2899     setup_info = setup_info_shortcut_2;
2900     title_string = "Setup Shortcuts";
2901   }
2902
2903 #if 1
2904   DrawTextSCentered(mSY - SY + 16, FONT_TITLE_1, title_string);
2905 #else
2906   DrawText(mSX + 16, mSY + 16, title_string, FONT_TITLE_1);
2907 #endif
2908
2909   num_setup_info = 0;
2910   for (i = 0; setup_info[i].type != 0 && i < NUM_MENU_ENTRIES_ON_SCREEN; i++)
2911   {
2912     void *value_ptr = setup_info[i].value;
2913     int xpos = MENU_SCREEN_START_XPOS;
2914     int ypos = MENU_SCREEN_START_YPOS + i;
2915 #if 1
2916     int font_nr;
2917 #else
2918     int font_nr = FONT_MENU_1;
2919 #endif
2920
2921     /* set some entries to "unchangeable" according to other variables */
2922     if ((value_ptr == &setup.sound_simple && !audio.sound_available) ||
2923         (value_ptr == &setup.sound_loops  && !audio.loops_available) ||
2924         (value_ptr == &setup.sound_music  && !audio.music_available) ||
2925         (value_ptr == &setup.fullscreen   && !video.fullscreen_available))
2926       setup_info[i].type |= TYPE_GHOSTED;
2927
2928 #if 1
2929     font_nr = getSetupTextFont(setup_info[i].type);
2930 #else
2931 #if 1
2932     if (setup_info[i].type & (TYPE_SWITCH |
2933                               TYPE_YES_NO |
2934                               TYPE_STRING |
2935                               TYPE_ECS_AGA |
2936                               TYPE_KEYTEXT))
2937       font_nr = FONT_MENU_2;
2938 #else
2939     if (setup_info[i].type & TYPE_STRING)
2940       font_nr = FONT_MENU_2;
2941 #endif
2942 #endif
2943
2944     DrawText(mSX + xpos * 32, mSY + ypos * 32, setup_info[i].text, font_nr);
2945
2946     if (setup_info[i].type & TYPE_ENTER_MENU)
2947       initCursor(i, IMG_MENU_BUTTON_ENTER_MENU);
2948     else if (setup_info[i].type & TYPE_LEAVE_MENU)
2949       initCursor(i, IMG_MENU_BUTTON_LEAVE_MENU);
2950     else if (setup_info[i].type & ~TYPE_SKIP_ENTRY)
2951       initCursor(i, IMG_MENU_BUTTON);
2952
2953     if (setup_info[i].type & TYPE_VALUE)
2954       drawSetupValue(i);
2955
2956     num_setup_info++;
2957   }
2958
2959 #if 0
2960   DrawTextSCentered(SYSIZE - 20, FONT_TEXT_4,
2961                     "Joysticks deactivated in setup menu");
2962 #endif
2963
2964   FadeToFront();
2965   InitAnimation();
2966   HandleSetupScreen_Generic(0, 0, 0, 0, MB_MENU_INITIALIZE);
2967 }
2968
2969 void HandleSetupScreen_Generic(int mx, int my, int dx, int dy, int button)
2970 {
2971   static int choice_store[MAX_SETUP_MODES];
2972   int choice = choice_store[setup_mode];        /* always starts with 0 */
2973   int x = 0;
2974   int y = choice;
2975
2976   if (button == MB_MENU_INITIALIZE)
2977   {
2978     /* advance to first valid menu entry */
2979     while (choice < num_setup_info &&
2980            setup_info[choice].type & TYPE_SKIP_ENTRY)
2981       choice++;
2982     choice_store[setup_mode] = choice;
2983
2984     drawCursor(choice, FC_RED);
2985     return;
2986   }
2987   else if (button == MB_MENU_LEAVE)
2988   {
2989     for (y = 0; y < num_setup_info; y++)
2990     {
2991       if (setup_info[y].type & TYPE_LEAVE_MENU)
2992       {
2993         void (*menu_callback_function)(void) = setup_info[y].value;
2994
2995         menu_callback_function();
2996         break;  /* absolutely needed because function changes 'setup_info'! */
2997       }
2998     }
2999
3000     return;
3001   }
3002
3003   if (mx || my)         /* mouse input */
3004   {
3005     x = (mx - mSX) / 32;
3006     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
3007   }
3008   else if (dx || dy)    /* keyboard input */
3009   {
3010     if (dx)
3011     {
3012       int menu_navigation_type = (dx < 0 ? TYPE_LEAVE_MENU : TYPE_ENTER_MENU);
3013
3014       if (setup_info[choice].type & menu_navigation_type ||
3015           setup_info[choice].type & TYPE_BOOLEAN_STYLE)
3016         button = MB_MENU_CHOICE;
3017     }
3018     else if (dy)
3019       y = choice + dy;
3020
3021     /* jump to next non-empty menu entry (up or down) */
3022     while (y > 0 && y < num_setup_info - 1 &&
3023            setup_info[y].type & TYPE_SKIP_ENTRY)
3024       y += dy;
3025   }
3026
3027   if (IN_VIS_FIELD(x, y) &&
3028       y >= 0 && y < num_setup_info && setup_info[y].type & ~TYPE_SKIP_ENTRY)
3029   {
3030     if (button)
3031     {
3032       if (y != choice)
3033       {
3034         drawCursor(y, FC_RED);
3035         drawCursor(choice, FC_BLUE);
3036         choice = choice_store[setup_mode] = y;
3037       }
3038     }
3039     else if (!(setup_info[y].type & TYPE_GHOSTED))
3040     {
3041       if (setup_info[y].type & TYPE_ENTER_OR_LEAVE_MENU)
3042       {
3043         void (*menu_callback_function)(void) = setup_info[choice].value;
3044
3045         menu_callback_function();
3046       }
3047       else
3048       {
3049         if (setup_info[y].type & TYPE_KEYTEXT &&
3050             setup_info[y + 1].type & TYPE_KEY)
3051           y++;
3052
3053         if (setup_info[y].type & TYPE_VALUE)
3054           changeSetupValue(y);
3055       }
3056     }
3057   }
3058 }
3059
3060 void DrawSetupScreen_Input()
3061 {
3062   ClearWindow();
3063
3064 #if 1
3065   DrawTextSCentered(mSY - SY + 16, FONT_TITLE_1, "Setup Input");
3066 #else
3067   DrawText(mSX + 16, mSY + 16, "Setup Input", FONT_TITLE_1);
3068 #endif
3069
3070   initCursor(0,  IMG_MENU_BUTTON);
3071   initCursor(1,  IMG_MENU_BUTTON);
3072   initCursor(2,  IMG_MENU_BUTTON_ENTER_MENU);
3073   initCursor(13, IMG_MENU_BUTTON_LEAVE_MENU);
3074
3075   drawCursorXY(10, 0, IMG_MENU_BUTTON_LEFT);
3076   drawCursorXY(12, 0, IMG_MENU_BUTTON_RIGHT);
3077
3078   DrawText(mSX + 32, mSY +  2 * 32, "Player:", FONT_MENU_1);
3079   DrawText(mSX + 32, mSY +  3 * 32, "Device:", FONT_MENU_1);
3080   DrawText(mSX + 32, mSY + 15 * 32, "Back",   FONT_MENU_1);
3081
3082 #if 0
3083   DeactivateJoystickForCalibration();
3084 #endif
3085 #if 1
3086   DrawTextSCentered(SYSIZE - 20, FONT_TEXT_4,
3087                     "Joysticks deactivated on this screen");
3088 #endif
3089
3090   HandleSetupScreen_Input(0, 0, 0, 0, MB_MENU_INITIALIZE);
3091   FadeToFront();
3092   InitAnimation();
3093 }
3094
3095 static void setJoystickDeviceToNr(char *device_name, int device_nr)
3096 {
3097   if (device_name == NULL)
3098     return;
3099
3100   if (device_nr < 0 || device_nr >= MAX_PLAYERS)
3101     device_nr = 0;
3102
3103   if (strlen(device_name) > 1)
3104   {
3105     char c1 = device_name[strlen(device_name) - 1];
3106     char c2 = device_name[strlen(device_name) - 2];
3107
3108     if (c1 >= '0' && c1 <= '9' && !(c2 >= '0' && c2 <= '9'))
3109       device_name[strlen(device_name) - 1] = '0' + (char)(device_nr % 10);
3110   }
3111   else
3112     strncpy(device_name, getDeviceNameFromJoystickNr(device_nr),
3113             strlen(device_name));
3114 }
3115
3116 static void drawPlayerSetupInputInfo(int player_nr)
3117 {
3118   int i;
3119   static struct SetupKeyboardInfo custom_key;
3120   static struct
3121   {
3122     Key *key;
3123     char *text;
3124   } custom[] =
3125   {
3126     { &custom_key.left,  "Joystick Left"  },
3127     { &custom_key.right, "Joystick Right" },
3128     { &custom_key.up,    "Joystick Up"    },
3129     { &custom_key.down,  "Joystick Down"  },
3130     { &custom_key.snap,  "Button 1"       },
3131     { &custom_key.drop,  "Button 2"       }
3132   };
3133   static char *joystick_name[MAX_PLAYERS] =
3134   {
3135     "Joystick1",
3136     "Joystick2",
3137     "Joystick3",
3138     "Joystick4"
3139   };
3140
3141   InitJoysticks();
3142
3143   custom_key = setup.input[player_nr].key;
3144
3145   DrawText(mSX + 11 * 32, mSY + 2 * 32, int2str(player_nr + 1, 1),
3146            FONT_INPUT_1_ACTIVE);
3147
3148   ClearRectangleOnBackground(drawto, mSX + 8 * TILEX, mSY + 2 * TILEY,
3149                              TILEX, TILEY);
3150   DrawGraphicThruMaskExt(drawto, mSX + 8 * TILEX, mSY + 2 * TILEY,
3151                          PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0);
3152
3153   if (setup.input[player_nr].use_joystick)
3154   {
3155     char *device_name = setup.input[player_nr].joy.device_name;
3156     char *text = joystick_name[getJoystickNrFromDeviceName(device_name)];
3157     int font_nr = (joystick.fd[player_nr] < 0 ? FONT_VALUE_OLD : FONT_VALUE_1);
3158
3159     DrawText(mSX + 8 * 32, mSY + 3 * 32, text, font_nr);
3160     DrawText(mSX + 32, mSY + 4 * 32, "Calibrate", FONT_MENU_1);
3161   }
3162   else
3163   {
3164     DrawText(mSX + 8 * 32, mSY + 3 * 32, "Keyboard ", FONT_VALUE_1);
3165     DrawText(mSX + 1 * 32, mSY + 4 * 32, "Customize", FONT_MENU_1);
3166   }
3167
3168   DrawText(mSX + 32, mSY + 5 * 32, "Actual Settings:", FONT_MENU_1);
3169   drawCursorXY(1, 4, IMG_MENU_BUTTON_LEFT);
3170   drawCursorXY(1, 5, IMG_MENU_BUTTON_RIGHT);
3171   drawCursorXY(1, 6, IMG_MENU_BUTTON_UP);
3172   drawCursorXY(1, 7, IMG_MENU_BUTTON_DOWN);
3173   DrawText(mSX + 2 * 32, mSY +  6 * 32, ":", FONT_VALUE_OLD);
3174   DrawText(mSX + 2 * 32, mSY +  7 * 32, ":", FONT_VALUE_OLD);
3175   DrawText(mSX + 2 * 32, mSY +  8 * 32, ":", FONT_VALUE_OLD);
3176   DrawText(mSX + 2 * 32, mSY +  9 * 32, ":", FONT_VALUE_OLD);
3177   DrawText(mSX + 1 * 32, mSY + 10 * 32, "Snap Field:", FONT_VALUE_OLD);
3178   DrawText(mSX + 1 * 32, mSY + 12 * 32, "Drop Element:", FONT_VALUE_OLD);
3179
3180   for (i = 0; i < 6; i++)
3181   {
3182     int ypos = 6 + i + (i > 3 ? i-3 : 0);
3183
3184     DrawText(mSX + 3 * 32, mSY + ypos * 32,
3185              "              ", FONT_VALUE_1);
3186     DrawText(mSX + 3 * 32, mSY + ypos * 32,
3187              (setup.input[player_nr].use_joystick ?
3188               custom[i].text :
3189               getKeyNameFromKey(*custom[i].key)), FONT_VALUE_1);
3190   }
3191 }
3192
3193 void HandleSetupScreen_Input(int mx, int my, int dx, int dy, int button)
3194 {
3195   static int choice = 0;
3196   static int player_nr = 0;
3197   int x = 0;
3198   int y = choice;
3199   int pos_start  = SETUPINPUT_SCREEN_POS_START;
3200   int pos_empty1 = SETUPINPUT_SCREEN_POS_EMPTY1;
3201   int pos_empty2 = SETUPINPUT_SCREEN_POS_EMPTY2;
3202   int pos_end    = SETUPINPUT_SCREEN_POS_END;
3203
3204   if (button == MB_MENU_INITIALIZE)
3205   {
3206     drawPlayerSetupInputInfo(player_nr);
3207     drawCursor(choice, FC_RED);
3208
3209     return;
3210   }
3211   else if (button == MB_MENU_LEAVE)
3212   {
3213     setup_mode = SETUP_MODE_MAIN;
3214     DrawSetupScreen();
3215     InitJoysticks();
3216
3217     return;
3218   }
3219
3220   if (mx || my)         /* mouse input */
3221   {
3222     x = (mx - mSX) / 32;
3223     y = (my - mSY) / 32 - MENU_SCREEN_START_YPOS;
3224   }
3225   else if (dx || dy)    /* keyboard input */
3226   {
3227     if (dx && choice == 0)
3228       x = (dx < 0 ? 10 : 12);
3229     else if ((dx && choice == 1) ||
3230              (dx == +1 && choice == 2) ||
3231              (dx == -1 && choice == pos_end))
3232       button = MB_MENU_CHOICE;
3233     else if (dy)
3234       y = choice + dy;
3235
3236     if (y >= pos_empty1 && y <= pos_empty2)
3237       y = (dy > 0 ? pos_empty2 + 1 : pos_empty1 - 1);
3238   }
3239
3240   if (IN_VIS_FIELD(x, y) &&
3241       y == 0 && ((x < 10 && !button) || ((x == 10 || x == 12) && button)))
3242   {
3243     static unsigned long delay = 0;
3244
3245     if (!DelayReached(&delay, GADGET_FRAME_DELAY))
3246       return;
3247
3248     player_nr = (player_nr + (x == 10 ? -1 : +1) + MAX_PLAYERS) % MAX_PLAYERS;
3249
3250     drawPlayerSetupInputInfo(player_nr);
3251   }
3252   else if (IN_VIS_FIELD(x, y) &&
3253            y >= pos_start && y <= pos_end &&
3254            !(y >= pos_empty1 && y <= pos_empty2))
3255   {
3256     if (button)
3257     {
3258       if (y != choice)
3259       {
3260         drawCursor(y, FC_RED);
3261         drawCursor(choice, FC_BLUE);
3262         choice = y;
3263       }
3264     }
3265     else
3266     {
3267       if (y == 1)
3268       {
3269         char *device_name = setup.input[player_nr].joy.device_name;
3270
3271         if (!setup.input[player_nr].use_joystick)
3272         {
3273           int new_device_nr = (dx >= 0 ? 0 : MAX_PLAYERS - 1);
3274
3275           setJoystickDeviceToNr(device_name, new_device_nr);
3276           setup.input[player_nr].use_joystick = TRUE;
3277         }
3278         else
3279         {
3280           int device_nr = getJoystickNrFromDeviceName(device_name);
3281           int new_device_nr = device_nr + (dx >= 0 ? +1 : -1);
3282
3283           if (new_device_nr < 0 || new_device_nr >= MAX_PLAYERS)
3284             setup.input[player_nr].use_joystick = FALSE;
3285           else
3286             setJoystickDeviceToNr(device_name, new_device_nr);
3287         }
3288
3289         drawPlayerSetupInputInfo(player_nr);
3290       }
3291       else if (y == 2)
3292       {
3293         if (setup.input[player_nr].use_joystick)
3294         {
3295           InitJoysticks();
3296           CalibrateJoystick(player_nr);
3297         }
3298         else
3299           CustomizeKeyboard(player_nr);
3300       }
3301       else if (y == pos_end)
3302       {
3303         InitJoysticks();
3304
3305         setup_mode = SETUP_MODE_MAIN;
3306         DrawSetupScreen();
3307       }
3308     }
3309   }
3310 }
3311
3312 void CustomizeKeyboard(int player_nr)
3313 {
3314   int i;
3315   int step_nr;
3316   boolean finished = FALSE;
3317   static struct SetupKeyboardInfo custom_key;
3318   static struct
3319   {
3320     Key *key;
3321     char *text;
3322   } customize_step[] =
3323   {
3324     { &custom_key.left,  "Move Left"    },
3325     { &custom_key.right, "Move Right"   },
3326     { &custom_key.up,    "Move Up"      },
3327     { &custom_key.down,  "Move Down"    },
3328     { &custom_key.snap,  "Snap Field"   },
3329     { &custom_key.drop,  "Drop Element" }
3330   };
3331
3332   /* read existing key bindings from player setup */
3333   custom_key = setup.input[player_nr].key;
3334
3335   ClearWindow();
3336
3337 #if 1
3338   DrawTextSCentered(mSY - SY + 16, FONT_TITLE_1, "Keyboard Input");
3339 #else
3340   DrawText(mSX + 16, mSY + 16, "Keyboard Input", FONT_TITLE_1);
3341 #endif
3342
3343   BackToFront();
3344   InitAnimation();
3345
3346   step_nr = 0;
3347   DrawText(mSX, mSY + (2 + 2 * step_nr) * 32,
3348            customize_step[step_nr].text, FONT_INPUT_1_ACTIVE);
3349   DrawText(mSX, mSY + (2 + 2 * step_nr + 1) * 32,
3350            "Key:", FONT_INPUT_1_ACTIVE);
3351   DrawText(mSX + 4 * 32, mSY + (2 + 2 * step_nr + 1) * 32,
3352            getKeyNameFromKey(*customize_step[step_nr].key), FONT_VALUE_OLD);
3353
3354   while (!finished)
3355   {
3356     if (PendingEvent())         /* got event */
3357     {
3358       Event event;
3359
3360       NextEvent(&event);
3361
3362       switch(event.type)
3363       {
3364         case EVENT_KEYPRESS:
3365           {
3366             Key key = GetEventKey((KeyEvent *)&event, FALSE);
3367
3368             if (key == KSYM_Escape || (key == KSYM_Return && step_nr == 6))
3369             {
3370               finished = TRUE;
3371               break;
3372             }
3373
3374             /* all keys configured -- wait for "Escape" or "Return" key */
3375             if (step_nr == 6)
3376               break;
3377
3378             /* press 'Enter' to keep the existing key binding */
3379             if (key == KSYM_Return)
3380               key = *customize_step[step_nr].key;
3381
3382             /* check if key already used */
3383             for (i = 0; i < step_nr; i++)
3384               if (*customize_step[i].key == key)
3385                 break;
3386             if (i < step_nr)
3387               break;
3388
3389             /* got new key binding */
3390             *customize_step[step_nr].key = key;
3391             DrawText(mSX + 4 * 32, mSY + (2 + 2 * step_nr + 1) * 32,
3392                      "             ", FONT_VALUE_1);
3393             DrawText(mSX + 4 * 32, mSY + (2 + 2 * step_nr + 1) * 32,
3394                      getKeyNameFromKey(key), FONT_VALUE_1);
3395             step_nr++;
3396
3397             /* un-highlight last query */
3398             DrawText(mSX, mSY + (2 + 2 * (step_nr - 1)) * 32,
3399                      customize_step[step_nr - 1].text, FONT_MENU_1);
3400             DrawText(mSX, mSY + (2 + 2 * (step_nr - 1) + 1) * 32,
3401                      "Key:", FONT_MENU_1);
3402
3403             /* press 'Enter' to leave */
3404             if (step_nr == 6)
3405             {
3406               DrawText(mSX + 16, mSY + 15 * 32 + 16,
3407                        "Press Enter", FONT_TITLE_1);
3408               break;
3409             }
3410
3411             /* query next key binding */
3412             DrawText(mSX, mSY + (2 + 2 * step_nr) * 32,
3413                      customize_step[step_nr].text, FONT_INPUT_1_ACTIVE);
3414             DrawText(mSX, mSY + (2 + 2 * step_nr + 1) * 32,
3415                      "Key:", FONT_INPUT_1_ACTIVE);
3416             DrawText(mSX + 4 * 32, mSY + (2 + 2 * step_nr + 1) * 32,
3417                      getKeyNameFromKey(*customize_step[step_nr].key),
3418                      FONT_VALUE_OLD);
3419           }
3420           break;
3421
3422         case EVENT_KEYRELEASE:
3423           key_joystick_mapping = 0;
3424           break;
3425
3426         default:
3427           HandleOtherEvents(&event);
3428           break;
3429       }
3430     }
3431
3432     DoAnimation();
3433     BackToFront();
3434
3435     /* don't eat all CPU time */
3436     Delay(10);
3437   }
3438
3439   /* write new key bindings back to player setup */
3440   setup.input[player_nr].key = custom_key;
3441
3442   StopAnimation();
3443   DrawSetupScreen_Input();
3444 }
3445
3446 static boolean CalibrateJoystickMain(int player_nr)
3447 {
3448   int new_joystick_xleft = JOYSTICK_XMIDDLE;
3449   int new_joystick_xright = JOYSTICK_XMIDDLE;
3450   int new_joystick_yupper = JOYSTICK_YMIDDLE;
3451   int new_joystick_ylower = JOYSTICK_YMIDDLE;
3452   int new_joystick_xmiddle, new_joystick_ymiddle;
3453
3454   int joystick_fd = joystick.fd[player_nr];
3455   int x, y, last_x, last_y, xpos = 8, ypos = 3;
3456   boolean check[3][3];
3457   int check_remaining = 3 * 3;
3458   int joy_x, joy_y;
3459   int joy_value;
3460   int result = -1;
3461
3462   if (joystick.status == JOYSTICK_NOT_AVAILABLE)
3463     return FALSE;
3464
3465   if (joystick_fd < 0 || !setup.input[player_nr].use_joystick)
3466     return FALSE;
3467
3468   ClearWindow();
3469
3470   for (y = 0; y < 3; y++)
3471   {
3472     for (x = 0; x < 3; x++)
3473     {
3474       DrawGraphic(xpos + x - 1, ypos + y - 1, IMG_MENU_CALIBRATE_BLUE, 0);
3475       check[x][y] = FALSE;
3476     }
3477   }
3478
3479   DrawTextSCentered(mSY - SY +  6 * 32, FONT_TITLE_1, "Rotate joystick");
3480   DrawTextSCentered(mSY - SY +  7 * 32, FONT_TITLE_1, "in all directions");
3481   DrawTextSCentered(mSY - SY +  9 * 32, FONT_TITLE_1, "if all balls");
3482   DrawTextSCentered(mSY - SY + 10 * 32, FONT_TITLE_1, "are marked,");
3483   DrawTextSCentered(mSY - SY + 11 * 32, FONT_TITLE_1, "center joystick");
3484   DrawTextSCentered(mSY - SY + 12 * 32, FONT_TITLE_1, "and");
3485   DrawTextSCentered(mSY - SY + 13 * 32, FONT_TITLE_1, "press any button!");
3486
3487   joy_value = Joystick(player_nr);
3488   last_x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
3489   last_y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
3490
3491   /* eventually uncalibrated center position (joystick could be uncentered) */
3492   if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
3493     return FALSE;
3494
3495   new_joystick_xmiddle = joy_x;
3496   new_joystick_ymiddle = joy_y;
3497
3498   DrawGraphic(xpos + last_x, ypos + last_y, IMG_MENU_CALIBRATE_RED, 0);
3499   BackToFront();
3500
3501   while (Joystick(player_nr) & JOY_BUTTON);     /* wait for released button */
3502   InitAnimation();
3503
3504   while (result < 0)
3505   {
3506     if (PendingEvent())         /* got event */
3507     {
3508       Event event;
3509
3510       NextEvent(&event);
3511
3512       switch(event.type)
3513       {
3514         case EVENT_KEYPRESS:
3515           switch(GetEventKey((KeyEvent *)&event, TRUE))
3516           {
3517             case KSYM_Return:
3518               if (check_remaining == 0)
3519                 result = 1;
3520               break;
3521
3522             case KSYM_Escape:
3523               result = 0;
3524               break;
3525
3526             default:
3527               break;
3528           }
3529           break;
3530
3531         case EVENT_KEYRELEASE:
3532           key_joystick_mapping = 0;
3533           break;
3534
3535         default:
3536           HandleOtherEvents(&event);
3537           break;
3538       }
3539     }
3540
3541     if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
3542       return FALSE;
3543
3544     new_joystick_xleft  = MIN(new_joystick_xleft,  joy_x);
3545     new_joystick_xright = MAX(new_joystick_xright, joy_x);
3546     new_joystick_yupper = MIN(new_joystick_yupper, joy_y);
3547     new_joystick_ylower = MAX(new_joystick_ylower, joy_y);
3548
3549     setup.input[player_nr].joy.xleft = new_joystick_xleft;
3550     setup.input[player_nr].joy.yupper = new_joystick_yupper;
3551     setup.input[player_nr].joy.xright = new_joystick_xright;
3552     setup.input[player_nr].joy.ylower = new_joystick_ylower;
3553     setup.input[player_nr].joy.xmiddle = new_joystick_xmiddle;
3554     setup.input[player_nr].joy.ymiddle = new_joystick_ymiddle;
3555
3556     CheckJoystickData();
3557
3558     joy_value = Joystick(player_nr);
3559
3560     if (joy_value & JOY_BUTTON && check_remaining == 0)
3561       result = 1;
3562
3563     x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
3564     y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
3565
3566     if (x != last_x || y != last_y)
3567     {
3568       DrawGraphic(xpos + last_x, ypos + last_y, IMG_MENU_CALIBRATE_YELLOW, 0);
3569       DrawGraphic(xpos + x,      ypos + y,      IMG_MENU_CALIBRATE_RED,    0);
3570
3571       last_x = x;
3572       last_y = y;
3573
3574       if (check_remaining > 0 && !check[x+1][y+1])
3575       {
3576         check[x+1][y+1] = TRUE;
3577         check_remaining--;
3578       }
3579
3580 #if 0
3581 #ifdef DEBUG
3582       printf("LEFT / MIDDLE / RIGHT == %d / %d / %d\n",
3583              setup.input[player_nr].joy.xleft,
3584              setup.input[player_nr].joy.xmiddle,
3585              setup.input[player_nr].joy.xright);
3586       printf("UP / MIDDLE / DOWN == %d / %d / %d\n",
3587              setup.input[player_nr].joy.yupper,
3588              setup.input[player_nr].joy.ymiddle,
3589              setup.input[player_nr].joy.ylower);
3590 #endif
3591 #endif
3592
3593     }
3594
3595     DoAnimation();
3596     BackToFront();
3597
3598     /* don't eat all CPU time */
3599     Delay(10);
3600   }
3601
3602   /* calibrated center position (joystick should now be centered) */
3603   if (!ReadJoystick(joystick_fd, &joy_x, &joy_y, NULL, NULL))
3604     return FALSE;
3605
3606   new_joystick_xmiddle = joy_x;
3607   new_joystick_ymiddle = joy_y;
3608
3609   StopAnimation();
3610
3611 #if 0
3612   DrawSetupScreen_Input();
3613 #endif
3614
3615   /* wait until the last pressed button was released */
3616   while (Joystick(player_nr) & JOY_BUTTON)
3617   {
3618     if (PendingEvent())         /* got event */
3619     {
3620       Event event;
3621
3622       NextEvent(&event);
3623       HandleOtherEvents(&event);
3624
3625       Delay(10);
3626     }
3627   }
3628
3629   return TRUE;
3630 }
3631
3632 void CalibrateJoystick(int player_nr)
3633 {
3634   if (!CalibrateJoystickMain(player_nr))
3635   {
3636     char *device_name = setup.input[player_nr].joy.device_name;
3637     int nr = getJoystickNrFromDeviceName(device_name) + 1;
3638     int xpos = mSX - SX;
3639     int ypos = mSY - SY;
3640
3641     ClearWindow();
3642
3643     DrawTextF(xpos + 16, ypos + 6 * 32, FONT_TITLE_1, "   JOYSTICK %d   ", nr);
3644     DrawTextF(xpos + 16, ypos + 7 * 32, FONT_TITLE_1, " NOT AVAILABLE! ");
3645     BackToFront();
3646
3647     Delay(2000);                /* show error message for a short time */
3648
3649     ClearEventQueue();
3650   }
3651
3652 #if 1
3653   DrawSetupScreen_Input();
3654 #endif
3655 }
3656
3657 void DrawSetupScreen()
3658 {
3659   DeactivateJoystick();
3660
3661   SetMainBackgroundImage(IMG_BACKGROUND_SETUP);
3662
3663   if (setup_mode == SETUP_MODE_INPUT)
3664     DrawSetupScreen_Input();
3665   else if (setup_mode == SETUP_MODE_CHOOSE_GRAPHICS)
3666     DrawChooseTree(&artwork.gfx_current);
3667   else if (setup_mode == SETUP_MODE_CHOOSE_SOUNDS)
3668     DrawChooseTree(&artwork.snd_current);
3669   else if (setup_mode == SETUP_MODE_CHOOSE_MUSIC)
3670     DrawChooseTree(&artwork.mus_current);
3671   else
3672     DrawSetupScreen_Generic();
3673
3674   PlayMenuSound();
3675   PlayMenuMusic();
3676 }
3677
3678 void HandleSetupScreen(int mx, int my, int dx, int dy, int button)
3679 {
3680   if (setup_mode == SETUP_MODE_INPUT)
3681     HandleSetupScreen_Input(mx, my, dx, dy, button);
3682   else if (setup_mode == SETUP_MODE_CHOOSE_GRAPHICS)
3683     HandleChooseTree(mx, my, dx, dy, button, &artwork.gfx_current);
3684   else if (setup_mode == SETUP_MODE_CHOOSE_SOUNDS)
3685     HandleChooseTree(mx, my, dx, dy, button, &artwork.snd_current);
3686   else if (setup_mode == SETUP_MODE_CHOOSE_MUSIC)
3687     HandleChooseTree(mx, my, dx, dy, button, &artwork.mus_current);
3688   else
3689     HandleSetupScreen_Generic(mx, my, dx, dy, button);
3690
3691   DoAnimation();
3692 }
3693
3694 void HandleGameActions()
3695 {
3696   if (game_status != GAME_MODE_PLAYING)
3697     return;
3698
3699   GameActions();        /* main game loop */
3700
3701   if (tape.auto_play && !tape.playing)
3702     AutoPlayTape();     /* continue automatically playing next tape */
3703 }
3704
3705
3706 /* ---------- new screen button stuff -------------------------------------- */
3707
3708 static struct
3709 {
3710   int gfx_unpressed, gfx_pressed;
3711   int x, y;
3712   int gadget_id;
3713   char *infotext;
3714 } scrollbutton_info[NUM_SCREEN_SCROLLBUTTONS] =
3715 {
3716   {
3717     IMG_MENU_BUTTON_UP, IMG_MENU_BUTTON_UP_ACTIVE,
3718     SC_SCROLL_UP_XPOS, SC_SCROLL_UP_YPOS,
3719     SCREEN_CTRL_ID_SCROLL_UP,
3720     "scroll up"
3721   },
3722   {
3723     IMG_MENU_BUTTON_DOWN, IMG_MENU_BUTTON_DOWN_ACTIVE,
3724     SC_SCROLL_DOWN_XPOS, SC_SCROLL_DOWN_YPOS,
3725     SCREEN_CTRL_ID_SCROLL_DOWN,
3726     "scroll down"
3727   }
3728 };
3729
3730 static struct
3731 {
3732 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
3733   Bitmap **gfx_unpressed, **gfx_pressed;
3734 #else
3735   int gfx_unpressed, gfx_pressed;
3736 #endif
3737   int x, y;
3738   int width, height;
3739   int type;
3740   int gadget_id;
3741   char *infotext;
3742 } scrollbar_info[NUM_SCREEN_SCROLLBARS] =
3743 {
3744   {
3745 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
3746     &scrollbar_bitmap[0], &scrollbar_bitmap[1],
3747 #else
3748     IMG_MENU_SCROLLBAR, IMG_MENU_SCROLLBAR_ACTIVE,
3749 #endif
3750     SC_SCROLL_VERTICAL_XPOS, SC_SCROLL_VERTICAL_YPOS,
3751     SC_SCROLL_VERTICAL_XSIZE, SC_SCROLL_VERTICAL_YSIZE,
3752     GD_TYPE_SCROLLBAR_VERTICAL,
3753     SCREEN_CTRL_ID_SCROLL_VERTICAL,
3754     "scroll level series vertically"
3755   }
3756 };
3757
3758 static void CreateScreenScrollbuttons()
3759 {
3760   struct GadgetInfo *gi;
3761   unsigned long event_mask;
3762   int i;
3763
3764   for (i = 0; i < NUM_SCREEN_SCROLLBUTTONS; i++)
3765   {
3766     Bitmap *gd_bitmap_unpressed, *gd_bitmap_pressed;
3767     int gfx_unpressed, gfx_pressed;
3768     int x, y, width, height;
3769     int gd_x1, gd_x2, gd_y1, gd_y2;
3770     int id = scrollbutton_info[i].gadget_id;
3771
3772     event_mask = GD_EVENT_PRESSED | GD_EVENT_REPEATED;
3773
3774     x = mSX + scrollbutton_info[i].x + menu.scrollbar_xoffset;
3775     y = mSY + scrollbutton_info[i].y;
3776     width = SC_SCROLLBUTTON_XSIZE;
3777     height = SC_SCROLLBUTTON_YSIZE;
3778
3779     if (id == SCREEN_CTRL_ID_SCROLL_DOWN)
3780       y = mSY + (SC_SCROLL_VERTICAL_YPOS +
3781                  (NUM_MENU_ENTRIES_ON_SCREEN - 2) * SC_SCROLLBUTTON_YSIZE);
3782
3783     gfx_unpressed = scrollbutton_info[i].gfx_unpressed;
3784     gfx_pressed   = scrollbutton_info[i].gfx_pressed;
3785     gd_bitmap_unpressed = graphic_info[gfx_unpressed].bitmap;
3786     gd_bitmap_pressed   = graphic_info[gfx_pressed].bitmap;
3787     gd_x1 = graphic_info[gfx_unpressed].src_x;
3788     gd_y1 = graphic_info[gfx_unpressed].src_y;
3789     gd_x2 = graphic_info[gfx_pressed].src_x;
3790     gd_y2 = graphic_info[gfx_pressed].src_y;
3791
3792     gi = CreateGadget(GDI_CUSTOM_ID, id,
3793                       GDI_CUSTOM_TYPE_ID, i,
3794                       GDI_INFO_TEXT, scrollbutton_info[i].infotext,
3795                       GDI_X, x,
3796                       GDI_Y, y,
3797                       GDI_WIDTH, width,
3798                       GDI_HEIGHT, height,
3799                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
3800                       GDI_STATE, GD_BUTTON_UNPRESSED,
3801                       GDI_DESIGN_UNPRESSED, gd_bitmap_unpressed, gd_x1, gd_y1,
3802                       GDI_DESIGN_PRESSED, gd_bitmap_pressed, gd_x2, gd_y2,
3803                       GDI_DIRECT_DRAW, FALSE,
3804                       GDI_EVENT_MASK, event_mask,
3805                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
3806                       GDI_END);
3807
3808     if (gi == NULL)
3809       Error(ERR_EXIT, "cannot create gadget");
3810
3811     screen_gadget[id] = gi;
3812   }
3813 }
3814
3815 static void CreateScreenScrollbars()
3816 {
3817   int i;
3818
3819   for (i = 0; i < NUM_SCREEN_SCROLLBARS; i++)
3820   {
3821     Bitmap *gd_bitmap_unpressed, *gd_bitmap_pressed;
3822 #if !defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
3823     int gfx_unpressed, gfx_pressed;
3824 #endif
3825     int x, y, width, height;
3826     int gd_x1, gd_x2, gd_y1, gd_y2;
3827     struct GadgetInfo *gi;
3828     int items_max, items_visible, item_position;
3829     unsigned long event_mask;
3830     int num_page_entries = NUM_MENU_ENTRIES_ON_SCREEN;
3831     int id = scrollbar_info[i].gadget_id;
3832
3833     event_mask = GD_EVENT_MOVING | GD_EVENT_OFF_BORDERS;
3834
3835     x = mSX + scrollbar_info[i].x + menu.scrollbar_xoffset;
3836     y = mSY + scrollbar_info[i].y;
3837     width  = scrollbar_info[i].width;
3838     height = scrollbar_info[i].height;
3839
3840     if (id == SCREEN_CTRL_ID_SCROLL_VERTICAL)
3841       height = (NUM_MENU_ENTRIES_ON_SCREEN - 2) * SC_SCROLLBUTTON_YSIZE;
3842
3843     items_max = num_page_entries;
3844     items_visible = num_page_entries;
3845     item_position = 0;
3846
3847 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
3848     gd_bitmap_unpressed = *scrollbar_info[i].gfx_unpressed;
3849     gd_bitmap_pressed   = *scrollbar_info[i].gfx_pressed;
3850     gd_x1 = 0;
3851     gd_y1 = 0;
3852     gd_x2 = 0;
3853     gd_y2 = 0;
3854 #else
3855     gfx_unpressed = scrollbar_info[i].gfx_unpressed;
3856     gfx_pressed   = scrollbar_info[i].gfx_pressed;
3857     gd_bitmap_unpressed = graphic_info[gfx_unpressed].bitmap;
3858     gd_bitmap_pressed   = graphic_info[gfx_pressed].bitmap;
3859     gd_x1 = graphic_info[gfx_unpressed].src_x;
3860     gd_y1 = graphic_info[gfx_unpressed].src_y;
3861     gd_x2 = graphic_info[gfx_pressed].src_x;
3862     gd_y2 = graphic_info[gfx_pressed].src_y;
3863 #endif
3864
3865     gi = CreateGadget(GDI_CUSTOM_ID, id,
3866                       GDI_CUSTOM_TYPE_ID, i,
3867                       GDI_INFO_TEXT, scrollbar_info[i].infotext,
3868                       GDI_X, x,
3869                       GDI_Y, y,
3870                       GDI_WIDTH, width,
3871                       GDI_HEIGHT, height,
3872                       GDI_TYPE, scrollbar_info[i].type,
3873                       GDI_SCROLLBAR_ITEMS_MAX, items_max,
3874                       GDI_SCROLLBAR_ITEMS_VISIBLE, items_visible,
3875                       GDI_SCROLLBAR_ITEM_POSITION, item_position,
3876                       GDI_STATE, GD_BUTTON_UNPRESSED,
3877                       GDI_DESIGN_UNPRESSED, gd_bitmap_unpressed, gd_x1, gd_y1,
3878                       GDI_DESIGN_PRESSED, gd_bitmap_pressed, gd_x2, gd_y2,
3879                       GDI_BORDER_SIZE, SC_BORDER_SIZE, SC_BORDER_SIZE,
3880                       GDI_DIRECT_DRAW, FALSE,
3881                       GDI_EVENT_MASK, event_mask,
3882                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
3883                       GDI_END);
3884
3885     if (gi == NULL)
3886       Error(ERR_EXIT, "cannot create gadget");
3887
3888     screen_gadget[id] = gi;
3889   }
3890 }
3891
3892 void CreateScreenGadgets()
3893 {
3894   int last_game_status = game_status;   /* save current game status */
3895
3896 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
3897   int i;
3898
3899   for (i = 0; i < NUM_SCROLLBAR_BITMAPS; i++)
3900   {
3901     scrollbar_bitmap[i] = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
3902
3903     /* copy pointers to clip mask and GC */
3904     scrollbar_bitmap[i]->clip_mask =
3905       graphic_info[IMG_MENU_SCROLLBAR + i].clip_mask;
3906     scrollbar_bitmap[i]->stored_clip_gc =
3907       graphic_info[IMG_MENU_SCROLLBAR + i].clip_gc;
3908
3909     BlitBitmap(graphic_info[IMG_MENU_SCROLLBAR + i].bitmap,
3910                scrollbar_bitmap[i],
3911                graphic_info[IMG_MENU_SCROLLBAR + i].src_x,
3912                graphic_info[IMG_MENU_SCROLLBAR + i].src_y,
3913                TILEX, TILEY, 0, 0);
3914   }
3915 #endif
3916
3917   /* force LEVELS draw offset for scrollbar / scrollbutton gadgets */
3918   game_status = GAME_MODE_LEVELS;
3919
3920   CreateScreenScrollbuttons();
3921   CreateScreenScrollbars();
3922
3923   game_status = last_game_status;       /* restore current game status */
3924 }
3925
3926 void FreeScreenGadgets()
3927 {
3928   int i;
3929
3930 #if defined(TARGET_X11_NATIVE_PERFORMANCE_WORKAROUND)
3931   for (i = 0; i < NUM_SCROLLBAR_BITMAPS; i++)
3932   {
3933     /* prevent freeing clip mask and GC twice */
3934     scrollbar_bitmap[i]->clip_mask = None;
3935     scrollbar_bitmap[i]->stored_clip_gc = None;
3936
3937     FreeBitmap(scrollbar_bitmap[i]);
3938   }
3939 #endif
3940
3941   for (i = 0; i < NUM_SCREEN_GADGETS; i++)
3942     FreeGadget(screen_gadget[i]);
3943 }
3944
3945 void MapChooseTreeGadgets(TreeInfo *ti)
3946 {
3947   int num_entries = numTreeInfoInGroup(ti);
3948   int i;
3949
3950   if (num_entries <= NUM_MENU_ENTRIES_ON_SCREEN)
3951     return;
3952
3953   for (i = 0; i < NUM_SCREEN_GADGETS; i++)
3954     MapGadget(screen_gadget[i]);
3955 }
3956
3957 #if 0
3958 void UnmapChooseTreeGadgets()
3959 {
3960   int i;
3961
3962   for (i = 0; i < NUM_SCREEN_GADGETS; i++)
3963     UnmapGadget(screen_gadget[i]);
3964 }
3965 #endif
3966
3967 static void HandleScreenGadgets(struct GadgetInfo *gi)
3968 {
3969   int id = gi->custom_id;
3970
3971   if (game_status != GAME_MODE_LEVELS && game_status != GAME_MODE_SETUP)
3972     return;
3973
3974   switch (id)
3975   {
3976     case SCREEN_CTRL_ID_SCROLL_UP:
3977       if (game_status == GAME_MODE_LEVELS)
3978         HandleChooseLevel(0,0, 0, -1 * SCROLL_LINE, MB_MENU_MARK);
3979       else if (game_status == GAME_MODE_SETUP)
3980         HandleSetupScreen(0,0, 0, -1 * SCROLL_LINE, MB_MENU_MARK);
3981       break;
3982
3983     case SCREEN_CTRL_ID_SCROLL_DOWN:
3984       if (game_status == GAME_MODE_LEVELS)
3985         HandleChooseLevel(0,0, 0, +1 * SCROLL_LINE, MB_MENU_MARK);
3986       else if (game_status == GAME_MODE_SETUP)
3987         HandleSetupScreen(0,0, 0, +1 * SCROLL_LINE, MB_MENU_MARK);
3988       break;
3989
3990     case SCREEN_CTRL_ID_SCROLL_VERTICAL:
3991       if (game_status == GAME_MODE_LEVELS)
3992         HandleChooseLevel(0,0, 999,gi->event.item_position,MB_MENU_INITIALIZE);
3993       else if (game_status == GAME_MODE_SETUP)
3994         HandleSetupScreen(0,0, 999,gi->event.item_position,MB_MENU_INITIALIZE);
3995       break;
3996
3997     default:
3998       break;
3999   }
4000 }