src/screens.c

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