src/screens.c

   1 /***********************************************************
   2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
   3 *----------------------------------------------------------*
   4 *  (c) 1995-98 Artsoft Entertainment                       *
   5 *              Holger Schemel                              *
   6 *              Oststrasse 11a                              *
   7 *              33604 Bielefeld                             *
   8 *              phone: ++49 +521 290471                     *
   9 *              email: aeglos@valinor.owl.de                *
  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 "joystick.h"
  24 #include "cartoons.h"
  25 #include "network.h"
  26 #include "init.h"
  27
  28 /* for DrawSetupScreen(), HandleSetupScreen() */
  29 #define SETUP_SCREEN_POS_START          2
  30 #define SETUP_SCREEN_POS_END            (SCR_FIELDY - 1)
  31 #define SETUP_SCREEN_POS_EMPTY1         (SETUP_SCREEN_POS_END - 2)
  32 #define SETUP_SCREEN_POS_EMPTY2         (SETUP_SCREEN_POS_END - 2)
  33
  34 /* for HandleSetupInputScreen() */
  35 #define SETUPINPUT_SCREEN_POS_START     2
  36 #define SETUPINPUT_SCREEN_POS_END       (SCR_FIELDY - 2)
  37 #define SETUPINPUT_SCREEN_POS_EMPTY1    (SETUPINPUT_SCREEN_POS_START + 3)
  38 #define SETUPINPUT_SCREEN_POS_EMPTY2    (SETUPINPUT_SCREEN_POS_END - 1)
  39
  40 /* for HandleChooseLevel() */
  41 #define MAX_LEVEL_SERIES_ON_SCREEN      (SCR_FIELDY - 2)
  42
  43 /* buttons and scrollbars identifiers */
  44 #define SCREEN_CTRL_ID_SCROLL_UP        0
  45 #define SCREEN_CTRL_ID_SCROLL_DOWN      1
  46 #define SCREEN_CTRL_ID_SCROLL_VERTICAL  2
  47
  48 #define NUM_SCREEN_SCROLLBUTTONS        2
  49 #define NUM_SCREEN_SCROLLBARS           1
  50 #define NUM_SCREEN_GADGETS              3
  51
  52 /* forward declaration for internal use */
  53 static void HandleScreenGadgets(struct GadgetInfo *);
  54
  55 static struct GadgetInfo *screen_gadget[NUM_SCREEN_GADGETS];
  56
  57 void DrawHeadline()
  58 {
  59   int x = SX + (SXSIZE - strlen(PROGRAM_TITLE_STRING) * FONT1_XSIZE) / 2;
  60
  61   DrawText(x, SY + 8, PROGRAM_TITLE_STRING, FS_BIG, FC_YELLOW);
  62   DrawTextFCentered(46, FC_RED, WINDOW_SUBTITLE_STRING);
  63 }
  64
  65 void DrawMainMenu()
  66 {
  67   static struct LevelDirInfo *leveldir_last_valid = NULL;
  68   int i;
  69   char *name_text = (!options.network && setup.team_mode ? "Team:" : "Name:");
  70
  71   UnmapAllGadgets();
  72   FadeSounds();
  73   KeyboardAutoRepeatOn();
  74
  75   /* needed if last screen was the playing screen, invoked from level editor */
  76   if (level_editor_test_game)
  77   {
  78     game_status = LEVELED;
  79     DrawLevelEd();
  80     return;
  81   }
  82
  83   /* needed if last screen was the editor screen */
  84   UndrawSpecialEditorDoor();
  85
  86   /* needed if last screen was the setup screen and fullscreen state changed */
  87   setup.fullscreen = ChangeVideoModeIfNeeded(setup.fullscreen);
  88 #ifdef TARGET_SDL
  89   SetDrawtoField(DRAW_BACKBUFFER);
  90 #endif
  91
  92   /* map gadgets for main menu screen */
  93   MapTapeButtons();
  94
  95   /* leveldir_current may be invalid (level group, parent link) */
  96   if (!validLevelSeries(leveldir_current))
  97     leveldir_current = getFirstValidLevelSeries(leveldir_last_valid);
  98
  99   /* store valid level series information */
 100   leveldir_last_valid = leveldir_current;
 101
 102   /* level_nr may have been set to value over handicap with level editor */
 103   if (setup.handicap && level_nr > leveldir_current->handicap_level)
 104     level_nr = leveldir_current->handicap_level;
 105
 106   GetPlayerConfig();
 107   LoadLevel(level_nr);
 108
 109   ClearWindow();
 110   DrawHeadline();
 111   DrawText(SX + 32,    SY + 2*32, name_text, FS_BIG, FC_GREEN);
 112   DrawText(SX + 6*32,  SY + 2*32, setup.player_name, FS_BIG, FC_RED);
 113   DrawText(SX + 32,    SY + 3*32, "Level:", FS_BIG, FC_GREEN);
 114   DrawText(SX + 11*32, SY + 3*32, int2str(level_nr,3), FS_BIG,
 115            (leveldir_current->readonly ? FC_RED : FC_YELLOW));
 116   DrawText(SX + 32,    SY + 4*32, "Hall Of Fame", FS_BIG, FC_GREEN);
 117   DrawText(SX + 32,    SY + 5*32, "Level Creator", FS_BIG, FC_GREEN);
 118   DrawText(SY + 32,    SY + 6*32, "Info Screen", FS_BIG, FC_GREEN);
 119   DrawText(SX + 32,    SY + 7*32, "Start Game", FS_BIG, FC_GREEN);
 120   DrawText(SX + 32,    SY + 8*32, "Setup", FS_BIG, FC_GREEN);
 121   DrawText(SX + 32,    SY + 9*32, "Quit", FS_BIG, FC_GREEN);
 122
 123   DrawMicroLevel(MICROLEV_XPOS, MICROLEV_YPOS, TRUE);
 124
 125   DrawTextF(7*32 + 6, 3*32 + 9, FC_RED, "%d-%d",
 126             leveldir_current->first_level,
 127             leveldir_current->last_level);
 128
 129   if (leveldir_current->readonly)
 130   {
 131     DrawTextF(15*32 + 6, 3*32 + 9 - 7, FC_RED, "READ");
 132     DrawTextF(15*32 + 6, 3*32 + 9 + 7, FC_RED, "ONLY");
 133   }
 134
 135   for(i=2; i<10; i++)
 136     DrawGraphic(0, i, GFX_KUGEL_BLAU);
 137   DrawGraphic(10, 3, GFX_ARROW_BLUE_LEFT);
 138   DrawGraphic(14, 3, GFX_ARROW_BLUE_RIGHT);
 139
 140   DrawText(SX + 56, SY + 326, "A Game by Artsoft Entertainment",
 141            FS_SMALL, FC_RED);
 142
 143   if (leveldir_current->name)
 144   {
 145     int len = strlen(leveldir_current->name);
 146     int lxpos = SX + (SXSIZE - len * FONT4_XSIZE) / 2;
 147     int lypos = SY + 352;
 148
 149     DrawText(lxpos, lypos, leveldir_current->name, FS_SMALL, FC_SPECIAL2);
 150   }
 151
 152   FadeToFront();
 153   InitAnimation();
 154   HandleMainMenu(0,0, 0,0, MB_MENU_INITIALIZE);
 155
 156   TapeStop();
 157   if (TAPE_IS_EMPTY(tape))
 158     LoadTape(level_nr);
 159   DrawCompleteVideoDisplay();
 160
 161   OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2);
 162
 163 #if 0
 164   ClearEventQueue();
 165 #endif
 166
 167 }
 168
 169 static void gotoTopLevelDir()
 170 {
 171   /* move upwards to top level directory */
 172   while (leveldir_current->node_parent)
 173   {
 174     /* write a "path" into level tree for easy navigation to last level */
 175     if (leveldir_current->node_parent->node_group->cl_first == -1)
 176     {
 177       int num_leveldirs = numLevelDirInfoInGroup(leveldir_current);
 178       int leveldir_pos = posLevelDirInfo(leveldir_current);
 179       int num_page_entries;
 180       int cl_first, cl_cursor;
 181
 182       if (num_leveldirs <= MAX_LEVEL_SERIES_ON_SCREEN)
 183         num_page_entries = num_leveldirs;
 184       else
 185         num_page_entries = MAX_LEVEL_SERIES_ON_SCREEN - 1;
 186
 187       cl_first = MAX(0, leveldir_pos - num_page_entries + 1);
 188       cl_cursor = leveldir_pos - cl_first + 3;
 189
 190       leveldir_current->node_parent->node_group->cl_first = cl_first;
 191       leveldir_current->node_parent->node_group->cl_cursor = cl_cursor;
 192     }
 193
 194     leveldir_current = leveldir_current->node_parent;
 195   }
 196 }
 197
 198 void HandleMainMenu(int mx, int my, int dx, int dy, int button)
 199 {
 200   static int choice = 3;
 201   static int redraw = TRUE;
 202   int x = (mx + 32 - SX) / 32, y = (my + 32 - SY) / 32;
 203
 204   if (redraw || button == MB_MENU_INITIALIZE)
 205   {
 206     DrawGraphic(0, choice - 1, GFX_KUGEL_ROT);
 207     redraw = FALSE;
 208   }
 209
 210   if (button == MB_MENU_INITIALIZE)
 211     return;
 212
 213   if (dx || dy)
 214   {
 215     if (dx && choice == 4)
 216     {
 217       x = (dx < 0 ? 11 : 15);
 218       y = 4;
 219     }
 220     else if (dy)
 221     {
 222       x = 1;
 223       y = choice + dy;
 224     }
 225     else
 226       x = y = 0;
 227
 228     if (y < 3)
 229       y = 3;
 230     else if (y > 10)
 231       y = 10;
 232   }
 233
 234   if (!mx && !my && !dx && !dy)
 235   {
 236     x = 1;
 237     y = choice;
 238   }
 239
 240   if (y == 4 && ((x == 11 && level_nr > leveldir_current->first_level) ||
 241                  (x == 15 && level_nr < leveldir_current->last_level)) &&
 242       button)
 243   {
 244     static unsigned long level_delay = 0;
 245     int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
 246     int new_level_nr, old_level_nr = level_nr;
 247     int font_color = (leveldir_current->readonly ? FC_RED : FC_YELLOW);
 248
 249     new_level_nr = level_nr + (x == 11 ? -step : +step);
 250     if (new_level_nr < leveldir_current->first_level)
 251       new_level_nr = leveldir_current->first_level;
 252     if (new_level_nr > leveldir_current->last_level)
 253       new_level_nr = leveldir_current->last_level;
 254
 255     if (setup.handicap && new_level_nr > leveldir_current->handicap_level)
 256       new_level_nr = leveldir_current->handicap_level;
 257
 258     if (old_level_nr == new_level_nr ||
 259         !DelayReached(&level_delay, GADGET_FRAME_DELAY))
 260       goto out;
 261
 262     level_nr = new_level_nr;
 263
 264     DrawTextExt(drawto, SX + 11 * 32, SY + 3 * 32,
 265                 int2str(level_nr, 3), FS_BIG, font_color);
 266     DrawTextExt(window, SX + 11 * 32, SY + 3 * 32,
 267                 int2str(level_nr, 3), FS_BIG, font_color);
 268
 269     LoadLevel(level_nr);
 270     DrawMicroLevel(MICROLEV_XPOS, MICROLEV_YPOS, TRUE);
 271
 272     TapeErase();
 273     LoadTape(level_nr);
 274     DrawCompleteVideoDisplay();
 275
 276     /* needed because DrawMicroLevel() takes some time */
 277     BackToFront();
 278     SyncDisplay();
 279     DelayReached(&level_delay, 0);      /* reset delay counter */
 280   }
 281   else if (x == 1 && y >= 3 && y <= 10)
 282   {
 283     if (button)
 284     {
 285       if (y != choice)
 286       {
 287         DrawGraphic(0, y - 1, GFX_KUGEL_ROT);
 288         DrawGraphic(0, choice - 1, GFX_KUGEL_BLAU);
 289         choice = y;
 290       }
 291     }
 292     else
 293     {
 294       if (y == 3)
 295       {
 296         game_status = TYPENAME;
 297         HandleTypeName(strlen(setup.player_name), 0);
 298       }
 299       else if (y == 4)
 300       {
 301         if (leveldir_first)
 302         {
 303           game_status = CHOOSELEVEL;
 304           SaveLevelSetup_LastSeries();
 305           SaveLevelSetup_SeriesInfo();
 306
 307           gotoTopLevelDir();
 308
 309           DrawChooseLevel();
 310         }
 311       }
 312       else if (y == 5)
 313       {
 314         game_status = HALLOFFAME;
 315         DrawHallOfFame(-1);
 316       }
 317       else if (y == 6)
 318       {
 319         if (leveldir_current->readonly &&
 320             strcmp(setup.player_name, "Artsoft") != 0)
 321           Request("This level is read only !", REQ_CONFIRM);
 322         game_status = LEVELED;
 323         DrawLevelEd();
 324       }
 325       else if (y == 7)
 326       {
 327         game_status = HELPSCREEN;
 328         DrawHelpScreen();
 329       }
 330       else if (y == 8)
 331       {
 332         if (setup.autorecord)
 333           TapeStartRecording();
 334
 335 #if defined(PLATFORM_UNIX)
 336         if (options.network)
 337           SendToServer_StartPlaying();
 338         else
 339 #endif
 340         {
 341           game_status = PLAYING;
 342           StopAnimation();
 343           InitGame();
 344         }
 345       }
 346       else if (y == 9)
 347       {
 348         game_status = SETUP;
 349         DrawSetupScreen();
 350       }
 351       else if (y == 10)
 352       {
 353         SaveLevelSetup_LastSeries();
 354         SaveLevelSetup_SeriesInfo();
 355         if (Request("Do you really want to quit ?", REQ_ASK | REQ_STAY_CLOSED))
 356           game_status = EXITGAME;
 357       }
 358
 359       redraw = TRUE;
 360     }
 361   }
 362   BackToFront();
 363
 364   out:
 365
 366   if (game_status == MAINMENU)
 367   {
 368     DrawMicroLevel(MICROLEV_XPOS, MICROLEV_YPOS, FALSE);
 369     DoAnimation();
 370   }
 371 }
 372
 373 #define MAX_HELPSCREEN_ELS      10
 374 #define HA_NEXT                 -999
 375 #define HA_END                  -1000
 376
 377 static long helpscreen_state;
 378 static int helpscreen_step[MAX_HELPSCREEN_ELS];
 379 static int helpscreen_frame[MAX_HELPSCREEN_ELS];
 380 static int helpscreen_delay[MAX_HELPSCREEN_ELS];
 381 static int helpscreen_action[] =
 382 {
 383   GFX_SPIELER1_DOWN,4,2,
 384   GFX_SPIELER1_UP,4,2,
 385   GFX_SPIELER1_LEFT,4,2,
 386   GFX_SPIELER1_RIGHT,4,2,
 387   GFX_SPIELER1_PUSH_LEFT,4,2,
 388   GFX_SPIELER1_PUSH_RIGHT,4,2,                                  HA_NEXT,
 389   GFX_ERDREICH,1,100,                                           HA_NEXT,
 390   GFX_LEERRAUM,1,100,                                           HA_NEXT,
 391   GFX_MORAST_LEER,1,100,                                        HA_NEXT,
 392   GFX_BETON,1,100,                                              HA_NEXT,
 393   GFX_MAUERWERK,1,100,                                          HA_NEXT,
 394   GFX_MAUER_L1,  3,4, GFX_MAUERWERK,1,20, GFX_LEERRAUM,1,10,
 395   GFX_MAUER_R1,  3,4, GFX_MAUERWERK,1,20, GFX_LEERRAUM,1,10,
 396   GFX_MAUER_UP,  3,4, GFX_MAUERWERK,1,20, GFX_LEERRAUM,1,10,
 397   GFX_MAUER_DOWN,3,4, GFX_MAUERWERK,1,20, GFX_LEERRAUM,1,10,    HA_NEXT,
 398   GFX_UNSICHTBAR,1,100,                                         HA_NEXT,
 399   GFX_FELSBODEN,1,100,                                          HA_NEXT,
 400   GFX_CHAR_A,30,4, GFX_CHAR_AUSRUF,32,4,                        HA_NEXT,
 401   GFX_EDELSTEIN,2,5,                                            HA_NEXT,
 402   GFX_DIAMANT,2,5,                                              HA_NEXT,
 403   GFX_EDELSTEIN_BD,2,5,                                         HA_NEXT,
 404   GFX_EDELSTEIN_GELB,2,5, GFX_EDELSTEIN_ROT,2,5,
 405   GFX_EDELSTEIN_LILA,2,5,                                       HA_NEXT,
 406   GFX_FELSBROCKEN,4,5,                                          HA_NEXT,
 407   GFX_BOMBE,1,50, GFX_EXPLOSION,8,1, GFX_LEERRAUM,1,10,         HA_NEXT,
 408   GFX_KOKOSNUSS,1,50, GFX_CRACKINGNUT,3,1, GFX_EDELSTEIN,1,10,  HA_NEXT,
 409   GFX_ERZ_EDEL,1,50, GFX_EXPLOSION,8,1, GFX_EDELSTEIN,1,10,     HA_NEXT,
 410   GFX_ERZ_DIAM,1,50, GFX_EXPLOSION,8,1, GFX_DIAMANT,1,10,       HA_NEXT,
 411   GFX_ERZ_EDEL_BD,1,50, GFX_EXPLOSION,8,1,GFX_EDELSTEIN_BD,1,10,HA_NEXT,
 412   GFX_ERZ_EDEL_GELB,1,50, GFX_EXPLOSION,8,1,
 413   GFX_EDELSTEIN_GELB,1,10, GFX_ERZ_EDEL_ROT,1,50,
 414   GFX_EXPLOSION,8,1, GFX_EDELSTEIN_ROT,1,10,
 415   GFX_ERZ_EDEL_LILA,1,50, GFX_EXPLOSION,8,1,
 416   GFX_EDELSTEIN_LILA,1,10,                                      HA_NEXT,
 417   GFX_GEBLUBBER,4,4,                                            HA_NEXT,
 418   GFX_SCHLUESSEL1,4,25,                                         HA_NEXT,
 419   GFX_PFORTE1,4,25,                                             HA_NEXT,
 420   GFX_PFORTE1X,4,25,                                            HA_NEXT,
 421   GFX_DYNAMIT_AUS,1,100,                                        HA_NEXT,
 422   GFX_DYNAMIT,7,6, GFX_EXPLOSION,8,1, GFX_LEERRAUM,1,10,        HA_NEXT,
 423   GFX_DYNABOMB+0,4,3, GFX_DYNABOMB+3,1,3, GFX_DYNABOMB+2,1,3,
 424   GFX_DYNABOMB+1,1,3, GFX_DYNABOMB+0,1,3, GFX_EXPLOSION,8,1,
 425   GFX_LEERRAUM,1,10,                                            HA_NEXT,
 426   GFX_DYNABOMB_NR,1,100,                                        HA_NEXT,
 427   GFX_DYNABOMB_SZ,1,100,                                        HA_NEXT,
 428   GFX_FLIEGER+4,1,3, GFX_FLIEGER+0,1,3, GFX_FLIEGER+4,1,3,
 429   GFX_FLIEGER+5,1,3, GFX_FLIEGER+1,1,3, GFX_FLIEGER+5,1,3,
 430   GFX_FLIEGER+6,1,3, GFX_FLIEGER+2,1,3, GFX_FLIEGER+6,1,3,
 431   GFX_FLIEGER+7,1,3, GFX_FLIEGER+3,1,3, GFX_FLIEGER+7,1,3,      HA_NEXT,
 432   GFX_KAEFER+4,1,1, GFX_KAEFER+0,1,1, GFX_KAEFER+4,1,1,
 433   GFX_KAEFER+5,1,1, GFX_KAEFER+1,1,1, GFX_KAEFER+5,1,1,
 434   GFX_KAEFER+6,1,1, GFX_KAEFER+2,1,1, GFX_KAEFER+6,1,1,
 435   GFX_KAEFER+7,1,1, GFX_KAEFER+3,1,1, GFX_KAEFER+7,1,1,         HA_NEXT,
 436   GFX_BUTTERFLY,2,2,                                            HA_NEXT,
 437   GFX_FIREFLY,2,2,                                              HA_NEXT,
 438   GFX_PACMAN+0,1,3, GFX_PACMAN+4,1,2, GFX_PACMAN+0,1,3,
 439   GFX_PACMAN+1,1,3, GFX_PACMAN+5,1,2, GFX_PACMAN+1,1,3,
 440   GFX_PACMAN+2,1,3, GFX_PACMAN+6,1,2, GFX_PACMAN+2,1,3,
 441   GFX_PACMAN+3,1,3, GFX_PACMAN+7,1,2, GFX_PACMAN+3,1,3,         HA_NEXT,
 442   GFX_MAMPFER+0,4,1, GFX_MAMPFER+3,1,1, GFX_MAMPFER+2,1,1,
 443   GFX_MAMPFER+1,1,1, GFX_MAMPFER+0,1,1,                         HA_NEXT,
 444   GFX_MAMPFER2+0,4,1, GFX_MAMPFER2+3,1,1, GFX_MAMPFER2+2,1,1,
 445   GFX_MAMPFER2+1,1,1, GFX_MAMPFER2+0,1,1,                       HA_NEXT,
 446   GFX_ROBOT+0,4,1, GFX_ROBOT+3,1,1, GFX_ROBOT+2,1,1,
 447   GFX_ROBOT+1,1,1, GFX_ROBOT+0,1,1,                             HA_NEXT,
 448   GFX_MOLE_DOWN,4,2,
 449   GFX_MOLE_UP,4,2,
 450   GFX_MOLE_LEFT,4,2,
 451   GFX_MOLE_RIGHT,4,2,                                           HA_NEXT,
 452   GFX_PINGUIN_DOWN,4,2,
 453   GFX_PINGUIN_UP,4,2,
 454   GFX_PINGUIN_LEFT,4,2,
 455   GFX_PINGUIN_RIGHT,4,2,                                        HA_NEXT,
 456   GFX_SCHWEIN_DOWN,4,2,
 457   GFX_SCHWEIN_UP,4,2,
 458   GFX_SCHWEIN_LEFT,4,2,
 459   GFX_SCHWEIN_RIGHT,4,2,                                        HA_NEXT,
 460   GFX_DRACHE_DOWN,4,2,
 461   GFX_DRACHE_UP,4,2,
 462   GFX_DRACHE_LEFT,4,2,
 463   GFX_DRACHE_RIGHT,4,2,                                         HA_NEXT,
 464   GFX_SONDE_START,8,1,                                          HA_NEXT,
 465   GFX_ABLENK,4,1,                                               HA_NEXT,
 466   GFX_BIRNE_AUS,1,25, GFX_BIRNE_EIN,1,25,                       HA_NEXT,
 467   GFX_ZEIT_VOLL,1,25, GFX_ZEIT_LEER,1,25,                       HA_NEXT,
 468   GFX_TROPFEN,1,25, GFX_AMOEBING,4,1, GFX_AMOEBE_LEBT,1,10,     HA_NEXT,
 469   GFX_AMOEBE_TOT+2,2,50, GFX_AMOEBE_TOT,2,50,                   HA_NEXT,
 470   GFX_AMOEBE_LEBT,4,40,                                         HA_NEXT,
 471   GFX_AMOEBE_LEBT,1,10, GFX_AMOEBING,4,2,                       HA_NEXT,
 472   GFX_AMOEBE_LEBT,1,25, GFX_AMOEBE_TOT,1,25, GFX_EXPLOSION,8,1,
 473   GFX_DIAMANT,1,10,                                             HA_NEXT,
 474   GFX_LIFE,1,100,                                               HA_NEXT,
 475   GFX_LIFE_ASYNC,1,100,                                         HA_NEXT,
 476   GFX_MAGIC_WALL_OFF,4,2,                                       HA_NEXT,
 477   GFX_MAGIC_WALL_BD_OFF,4,2,                                    HA_NEXT,
 478   GFX_AUSGANG_ZU,1,100, GFX_AUSGANG_ACT,4,2,
 479   GFX_AUSGANG_AUF+0,4,2, GFX_AUSGANG_AUF+3,1,2,
 480   GFX_AUSGANG_AUF+2,1,2, GFX_AUSGANG_AUF+1,1,2,                 HA_NEXT,
 481   GFX_AUSGANG_AUF+0,4,2, GFX_AUSGANG_AUF+3,1,2,
 482   GFX_AUSGANG_AUF+2,1,2, GFX_AUSGANG_AUF+1,1,2,                 HA_NEXT,
 483   GFX_SOKOBAN_OBJEKT,1,100,                                     HA_NEXT,
 484   GFX_SOKOBAN_FELD_LEER,1,100,                                  HA_NEXT,
 485   GFX_SOKOBAN_FELD_VOLL,1,100,                                  HA_NEXT,
 486   GFX_SPEED_PILL,1,100,                                         HA_NEXT,
 487   HA_END
 488 };
 489 static char *helpscreen_eltext[][2] =
 490 {
 491  {"THE HERO:",                          "(Is _this_ guy good old Rockford?)"},
 492  {"Normal sand:",                       "You can dig through it"},
 493  {"Empty field:",                       "You can walk through it"},
 494  {"Quicksand: You cannot pass it,",     "but rocks can fall though it"},
 495  {"Massive Wall:",                      "Nothing can go through it"},
 496  {"Normal Wall: You can't go through",  "it, but you can bomb it away"},
 497  {"Growing Wall: Grows in several di-", "rections if there is an empty field"},
 498  {"Invisible Wall: Behaves like normal","wall, but is invisible"},
 499  {"Old Wall: Like normal wall, but",    "some things can fall down from it"},
 500  {"Letter Wall: Looks like a letter,",  "behaves like a normal wall"},
 501  {"Emerald: You must collect enough of","them to finish a level"},
 502  {"Diamond: Counts as 3 emeralds, but", "can be destroyed by rocks"},
 503  {"Diamond (BD style): Counts like one","emerald and behaves a bit different"},
 504  {"Colorful Gems:",                     "Seem to behave like Emeralds"},
 505  {"Rock: Smashes several things;",      "Can be moved by the player"},
 506  {"Bomb: You can move it, but be",      "careful when dropping it"},
 507  {"Nut: Throw a rock on it to open it;","Each nut contains an emerald"},
 508  {"Wall with an emerald inside:",       "Bomb the wall away to get it"},
 509  {"Wall with a diamond inside:",        "Bomb the wall away to get it"},
 510  {"Wall with BD style diamond inside:", "Bomb the wall away to get it"},
 511  {"Wall with colorful gem inside:",     "Bomb the wall away to get it"},
 512  {"Acid: Things that fall in are gone", "forever (including our hero)"},
 513  {"Key: Opens the door that has the",   "same color (red/yellow/green/blue)"},
 514  {"Door: Can be opened by the key",     "with the same color"},
 515  {"Door: You have to find out the",     "right color of the key for it"},
 516  {"Dynamite: Collect it and use it to", "destroy walls or kill enemies"},
 517  {"Dynamite: This one explodes after",  "a few seconds"},
 518  {"Dyna Bomb: Explodes in 4 directions","with variable explosion size"},
 519  {"Dyna Bomb: Increases the number of", "dyna bombs available at a time"},
 520  {"Dyna Bomb: Increases the size of",   "explosion of dyna bombs"},
 521  {"Spaceship: Moves at the left side",  "of walls; don't touch it!"},
 522  {"Bug: Moves at the right side",       "of walls; don't touch it!"},
 523  {"Butterfly: Moves at the right side", "of walls; don't touch it!"},
 524  {"Firefly: Moves at the left side",    "of walls; don't touch it!"},
 525  {"Pacman: Eats the amoeba and you,",   "if you're not careful"},
 526  {"Cruncher: Eats diamonds and you,",   "if you're not careful"},
 527  {"Cruncher (BD style):",               "Eats almost everything"},
 528  {"Robot: Tries to kill the player",    ""},
 529  {"The mole: Eats the amoeba and turns","empty space into normal sand"},
 530  {"The penguin: Guide him to the exit,","but keep him away from monsters!"},
 531  {"The Pig: Harmless, but eats all",    "gems it can get"},
 532  {"The Dragon: Breathes fire,",         "especially to some monsters"},
 533  {"Sonde: Follows you everywhere;",     "harmless, but may block your way"},
 534  {"Magic Wheel: Touch it to get rid of","the robots for some seconds"},
 535  {"Light Bulb: All of them must be",    "switched on to finish a level"},
 536  {"Extra Time Orb: Adds some seconds",  "to the time available for the level"},
 537  {"Amoeba Drop: Grows to an amoeba on", "the ground - don't touch it"},
 538  {"Dead Amoeba: Does not grow, but",    "can still kill bugs and spaceships"},
 539  {"Normal Amoeba: Grows through empty", "fields, sand and quicksand"},
 540  {"Dropping Amoeba: This one makes",    "drops that grow to a new amoeba"},
 541  {"Living Amoeba (BD style): Contains", "other element, when surrounded"},
 542  {"Game Of Life: Behaves like the well","known 'Game Of Life' (2333 style)"},
 543  {"Biomaze: A bit like the 'Game Of",   "Life', but builds crazy mazes"},
 544  {"Magic Wall: Changes rocks, emeralds","and diamonds when they pass it"},
 545  {"Magic Wall (BD style):",             "Changes rocks and BD style diamonds"},
 546  {"Exit door: Opens if you have enough","emeralds to finish the level"},
 547  {"Open exit door: Enter here to leave","the level and exit the actual game"},
 548  {"Sokoban element: Object which must", "be pushed to an empty field"},
 549  {"Sokoban element: Empty field where", "a Sokoban object can be placed on"},
 550  {"Sokoban element: Field with object", "which can be pushed away"},
 551  {"Speed pill: Lets the player run",    "twice as fast as normally"},
 552 };
 553 static int num_helpscreen_els = sizeof(helpscreen_eltext)/(2*sizeof(char *));
 554
 555 static char *helpscreen_music[][3] =
 556 {
 557   { "Alchemy",                  "Ian Boddy",            "Drive" },
 558   { "The Chase",                "Propaganda",           "A Secret Wish" },
 559   { "Network 23",               "Tangerine Dream",      "Exit" },
 560   { "Czardasz",                 "Robert Pieculewicz",   "Czardasz" },
 561   { "21st Century Common Man",  "Tangerine Dream",      "Tyger" },
 562   { "Voyager",                  "The Alan Parsons Project","Pyramid" },
 563   { "Twilight Painter",         "Tangerine Dream",      "Heartbreakers" }
 564 };
 565 static int helpscreen_musicpos;
 566
 567 void DrawHelpScreenElAction(int start)
 568 {
 569   int i = 0, j = 0;
 570   int frame, graphic;
 571   int xstart = SX+16, ystart = SY+64+2*32, ystep = TILEY+4;
 572
 573   while(helpscreen_action[j] != HA_END)
 574   {
 575     if (i>=start+MAX_HELPSCREEN_ELS || i>=num_helpscreen_els)
 576       break;
 577     else if (i<start || helpscreen_delay[i-start])
 578     {
 579       if (i>=start && helpscreen_delay[i-start])
 580         helpscreen_delay[i-start]--;
 581
 582       while(helpscreen_action[j] != HA_NEXT)
 583         j++;
 584       j++;
 585       i++;
 586       continue;
 587     }
 588
 589     j += 3*helpscreen_step[i-start];
 590     graphic = helpscreen_action[j++];
 591
 592     if (helpscreen_frame[i-start])
 593     {
 594       frame = helpscreen_action[j++] - helpscreen_frame[i-start];
 595       helpscreen_frame[i-start]--;
 596     }
 597     else
 598     {
 599       frame = 0;
 600       helpscreen_frame[i-start] = helpscreen_action[j++]-1;
 601     }
 602
 603     helpscreen_delay[i-start] = helpscreen_action[j++] - 1;
 604
 605     if (helpscreen_action[j] == HA_NEXT)
 606     {
 607       if (!helpscreen_frame[i-start])
 608         helpscreen_step[i-start] = 0;
 609     }
 610     else
 611     {
 612       if (!helpscreen_frame[i-start])
 613         helpscreen_step[i-start]++;
 614       while(helpscreen_action[j] != HA_NEXT)
 615         j++;
 616     }
 617     j++;
 618
 619     DrawGraphicExt(drawto, xstart, ystart+(i-start)*ystep, graphic+frame);
 620     i++;
 621   }
 622
 623   for(i=2;i<16;i++)
 624   {
 625     MarkTileDirty(0,i);
 626     MarkTileDirty(1,i);
 627   }
 628 }
 629
 630 void DrawHelpScreenElText(int start)
 631 {
 632   int i;
 633   int xstart = SX + 56, ystart = SY + 65 + 2 * 32, ystep = TILEY + 4;
 634   int ybottom = SYSIZE - 20;
 635
 636   ClearWindow();
 637   DrawHeadline();
 638
 639   DrawTextFCentered(100, FC_GREEN, "The game elements:");
 640
 641   for(i=start; i < start + MAX_HELPSCREEN_ELS && i < num_helpscreen_els; i++)
 642   {
 643     DrawText(xstart,
 644              ystart + (i - start) * ystep + (*helpscreen_eltext[i][1] ? 0 : 8),
 645              helpscreen_eltext[i][0], FS_SMALL, FC_YELLOW);
 646     DrawText(xstart, ystart + (i - start) * ystep + 16,
 647              helpscreen_eltext[i][1], FS_SMALL, FC_YELLOW);
 648   }
 649
 650   DrawTextFCentered(ybottom, FC_BLUE, "Press any key or button for next page");
 651 }
 652
 653 void DrawHelpScreenMusicText(int num)
 654 {
 655   int ystart = 150, ystep = 30;
 656   int ybottom = SYSIZE - 20;
 657
 658   FadeSounds();
 659   ClearWindow();
 660   DrawHeadline();
 661
 662   DrawTextFCentered(100, FC_GREEN, "The game background music loops:");
 663
 664   DrawTextFCentered(ystart + 0 * ystep, FC_YELLOW,
 665                     "Excerpt from");
 666   DrawTextFCentered(ystart + 1 * ystep, FC_RED, "\"%s\"",
 667                     helpscreen_music[num][0]);
 668   DrawTextFCentered(ystart + 2 * ystep, FC_YELLOW,
 669                     "by");
 670   DrawTextFCentered(ystart + 3 * ystep, FC_RED,
 671                     "%s", helpscreen_music[num][1]);
 672   DrawTextFCentered(ystart + 4 * ystep, FC_YELLOW,
 673                     "from the album");
 674   DrawTextFCentered(ystart + 5 * ystep, FC_RED, "\"%s\"",
 675                     helpscreen_music[num][2]);
 676
 677   DrawTextFCentered(ybottom, FC_BLUE, "Press any key or button for next page");
 678
 679   PlaySoundLoop(background_loop[num]);
 680 }
 681
 682 void DrawHelpScreenCreditsText()
 683 {
 684   int ystart = 150, ystep = 30;
 685   int ybottom = SYSIZE - 20;
 686
 687   FadeSounds();
 688   ClearWindow();
 689   DrawHeadline();
 690
 691   DrawTextFCentered(100, FC_GREEN,
 692                     "Credits:");
 693   DrawTextFCentered(ystart + 0 * ystep, FC_YELLOW,
 694                     "DOS port of the game:");
 695   DrawTextFCentered(ystart + 1 * ystep, FC_RED,
 696                     "Guido Schulz");
 697   DrawTextFCentered(ystart + 2 * ystep, FC_YELLOW,
 698                     "Additional toons:");
 699   DrawTextFCentered(ystart + 3 * ystep, FC_RED,
 700                     "Karl Hörnell");
 701   DrawTextFCentered(ystart + 5 * ystep, FC_YELLOW,
 702                     "...and many thanks to all contributors");
 703   DrawTextFCentered(ystart + 6 * ystep, FC_YELLOW,
 704                     "of new levels!");
 705
 706   DrawTextFCentered(ybottom, FC_BLUE, "Press any key or button for next page");
 707 }
 708
 709 void DrawHelpScreenContactText()
 710 {
 711   int ystart = 150, ystep = 30;
 712   int ybottom = SYSIZE - 20;
 713
 714   ClearWindow();
 715   DrawHeadline();
 716
 717   DrawTextFCentered(100, FC_GREEN, "Program information:");
 718
 719   DrawTextFCentered(ystart + 0 * ystep, FC_YELLOW,
 720                     "This game is Freeware!");
 721   DrawTextFCentered(ystart + 1 * ystep, FC_YELLOW,
 722                     "If you like it, send e-mail to:");
 723   DrawTextFCentered(ystart + 2 * ystep, FC_RED,
 724                     "info@artsoft.org");
 725   DrawTextFCentered(ystart + 3 * ystep, FC_YELLOW,
 726                     "or SnailMail to:");
 727   DrawTextFCentered(ystart + 4 * ystep + 0, FC_RED,
 728                     "Holger Schemel");
 729   DrawTextFCentered(ystart + 4 * ystep + 20, FC_RED,
 730                     "Detmolder Strasse 189");
 731   DrawTextFCentered(ystart + 4 * ystep + 40, FC_RED,
 732                     "33604 Bielefeld");
 733   DrawTextFCentered(ystart + 4 * ystep + 60, FC_RED,
 734                     "Germany");
 735
 736   DrawTextFCentered(ystart + 7 * ystep, FC_YELLOW,
 737                     "If you have created new levels,");
 738   DrawTextFCentered(ystart + 8 * ystep, FC_YELLOW,
 739                     "send them to me to include them!");
 740   DrawTextFCentered(ystart + 9 * ystep, FC_YELLOW,
 741                     ":-)");
 742
 743   DrawTextFCentered(ybottom, FC_BLUE, "Press any key or button for main menu");
 744 }
 745
 746 void DrawHelpScreen()
 747 {
 748   int i;
 749
 750   UnmapAllGadgets();
 751   CloseDoor(DOOR_CLOSE_2);
 752
 753   for(i=0;i<MAX_HELPSCREEN_ELS;i++)
 754     helpscreen_step[i] = helpscreen_frame[i] = helpscreen_delay[i] = 0;
 755   helpscreen_musicpos = 0;
 756   helpscreen_state = 0;
 757   DrawHelpScreenElText(0);
 758   DrawHelpScreenElAction(0);
 759
 760   FadeToFront();
 761   InitAnimation();
 762   PlaySoundLoop(SND_RHYTHMLOOP);
 763 }
 764
 765 void HandleHelpScreen(int button)
 766 {
 767   static unsigned long hs_delay = 0;
 768   int num_helpscreen_els_pages =
 769     (num_helpscreen_els + MAX_HELPSCREEN_ELS-1) / MAX_HELPSCREEN_ELS;
 770   int button_released = !button;
 771   int i;
 772
 773   if (button_released)
 774   {
 775     if (helpscreen_state < num_helpscreen_els_pages - 1)
 776     {
 777       for(i=0;i<MAX_HELPSCREEN_ELS;i++)
 778         helpscreen_step[i] = helpscreen_frame[i] = helpscreen_delay[i] = 0;
 779       helpscreen_state++;
 780       DrawHelpScreenElText(helpscreen_state*MAX_HELPSCREEN_ELS);
 781       DrawHelpScreenElAction(helpscreen_state*MAX_HELPSCREEN_ELS);
 782     }
 783     else if (helpscreen_state < num_helpscreen_els_pages + num_bg_loops - 1)
 784     {
 785       helpscreen_state++;
 786       DrawHelpScreenMusicText(helpscreen_state - num_helpscreen_els_pages);
 787     }
 788     else if (helpscreen_state == num_helpscreen_els_pages + num_bg_loops - 1)
 789     {
 790       helpscreen_state++;
 791       DrawHelpScreenCreditsText();
 792     }
 793     else if (helpscreen_state == num_helpscreen_els_pages + num_bg_loops)
 794     {
 795       helpscreen_state++;
 796       DrawHelpScreenContactText();
 797     }
 798     else
 799     {
 800       FadeSounds();
 801       DrawMainMenu();
 802       game_status = MAINMENU;
 803     }
 804   }
 805   else
 806   {
 807     if (DelayReached(&hs_delay,GAME_FRAME_DELAY * 2))
 808     {
 809       if (helpscreen_state<num_helpscreen_els_pages)
 810         DrawHelpScreenElAction(helpscreen_state*MAX_HELPSCREEN_ELS);
 811     }
 812     DoAnimation();
 813   }
 814
 815   BackToFront();
 816 }
 817
 818 void HandleTypeName(int newxpos, Key key)
 819 {
 820   static int xpos = 0, ypos = 2;
 821
 822   if (newxpos)
 823   {
 824     xpos = newxpos;
 825     DrawText(SX + 6*32, SY + ypos*32, setup.player_name, FS_BIG, FC_YELLOW);
 826     DrawGraphic(xpos + 6, ypos, GFX_KUGEL_ROT);
 827     return;
 828   }
 829
 830   if (((key >= KSYM_A && key <= KSYM_Z) ||
 831        (key >= KSYM_a && key <= KSYM_z)) &&
 832       xpos < MAX_PLAYER_NAME_LEN)
 833   {
 834     char ascii;
 835
 836     if (key >= KSYM_A && key <= KSYM_Z)
 837       ascii = 'A' + (char)(key - KSYM_A);
 838     else
 839       ascii = 'a' + (char)(key - KSYM_a);
 840
 841     setup.player_name[xpos] = ascii;
 842     setup.player_name[xpos + 1] = 0;
 843     xpos++;
 844     DrawTextExt(drawto, SX + 6*32, SY + ypos*32,
 845                 setup.player_name, FS_BIG, FC_YELLOW);
 846     DrawTextExt(window, SX + 6*32, SY + ypos*32,
 847                 setup.player_name, FS_BIG, FC_YELLOW);
 848     DrawGraphic(xpos + 6, ypos, GFX_KUGEL_ROT);
 849   }
 850   else if ((key == KSYM_Delete || key == KSYM_BackSpace) && xpos > 0)
 851   {
 852     xpos--;
 853     setup.player_name[xpos] = 0;
 854     DrawGraphic(xpos + 6, ypos, GFX_KUGEL_ROT);
 855     DrawGraphic(xpos + 7, ypos, GFX_LEERRAUM);
 856   }
 857   else if (key == KSYM_Return && xpos > 0)
 858   {
 859     DrawText(SX + 6*32, SY + ypos*32, setup.player_name, FS_BIG, FC_RED);
 860     DrawGraphic(xpos + 6, ypos, GFX_LEERRAUM);
 861
 862     SaveSetup();
 863     game_status = MAINMENU;
 864   }
 865
 866   BackToFront();
 867 }
 868
 869 static void drawCursorExt(int ypos, int color, int graphic)
 870 {
 871   static int cursor_array[SCR_FIELDY];
 872
 873   if (graphic)
 874     cursor_array[ypos] = graphic;
 875
 876   graphic = cursor_array[ypos];
 877
 878   if (color == FC_RED)
 879     graphic = (graphic == GFX_ARROW_BLUE_LEFT  ? GFX_ARROW_RED_LEFT  :
 880                graphic == GFX_ARROW_BLUE_RIGHT ? GFX_ARROW_RED_RIGHT :
 881                GFX_KUGEL_ROT);
 882
 883   DrawGraphic(0, ypos, graphic);
 884 }
 885
 886 static void initCursor(int ypos, int graphic)
 887 {
 888   drawCursorExt(ypos, FC_BLUE, graphic);
 889 }
 890
 891 static void drawCursor(int ypos, int color)
 892 {
 893   drawCursorExt(ypos, color, 0);
 894 }
 895
 896 void DrawChooseLevel()
 897 {
 898   UnmapAllGadgets();
 899   CloseDoor(DOOR_CLOSE_2);
 900
 901   ClearWindow();
 902   HandleChooseLevel(0,0, 0,0, MB_MENU_INITIALIZE);
 903   MapChooseLevelGadgets();
 904
 905   FadeToFront();
 906   InitAnimation();
 907 }
 908
 909 static void AdjustChooseLevelScrollbar(int id, int first_entry)
 910 {
 911   struct GadgetInfo *gi = screen_gadget[id];
 912   int items_max, items_visible, item_position;
 913
 914   items_max = numLevelDirInfoInGroup(leveldir_current);
 915   items_visible = MAX_LEVEL_SERIES_ON_SCREEN - 1;
 916   item_position = first_entry;
 917
 918   if (item_position > items_max - items_visible)
 919     item_position = items_max - items_visible;
 920
 921   ModifyGadget(gi, GDI_SCROLLBAR_ITEMS_MAX, items_max,
 922                GDI_SCROLLBAR_ITEM_POSITION, item_position, GDI_END);
 923 }
 924
 925 static void drawChooseLevelList(int first_entry, int num_page_entries)
 926 {
 927   int i;
 928   char buffer[SCR_FIELDX * 2];
 929   int max_buffer_len = (SCR_FIELDX - 2) * 2;
 930   int num_leveldirs = numLevelDirInfoInGroup(leveldir_current);
 931
 932   ClearRectangle(backbuffer, SX, SY, SXSIZE - 32, SYSIZE);
 933   redraw_mask |= REDRAW_FIELD;
 934
 935   DrawText(SX, SY, "Level Directories", FS_BIG, FC_GREEN);
 936
 937   for(i=0; i<num_page_entries; i++)
 938   {
 939     struct LevelDirInfo *node, *node_first;
 940     int leveldir_pos = first_entry + i;
 941     int ypos = i + 2;
 942
 943     node_first = getLevelDirInfoFirstGroupEntry(leveldir_current);
 944     node = getLevelDirInfoFromPos(node_first, leveldir_pos);
 945
 946     strncpy(buffer, node->name , max_buffer_len);
 947     buffer[max_buffer_len] = '\0';
 948
 949     DrawText(SX + 32, SY + ypos * 32, buffer, FS_MEDIUM, node->color);
 950
 951     if (node->parent_link)
 952       initCursor(ypos, GFX_ARROW_BLUE_LEFT);
 953     else if (node->level_group)
 954       initCursor(ypos, GFX_ARROW_BLUE_RIGHT);
 955     else
 956       initCursor(ypos, GFX_KUGEL_BLAU);
 957   }
 958
 959   if (first_entry > 0)
 960     DrawGraphic(0, 1, GFX_ARROW_BLUE_UP);
 961
 962   if (first_entry + num_page_entries < num_leveldirs)
 963     DrawGraphic(0, MAX_LEVEL_SERIES_ON_SCREEN + 1, GFX_ARROW_BLUE_DOWN);
 964 }
 965
 966 static void drawChooseLevelInfo(int leveldir_pos)
 967 {
 968   struct LevelDirInfo *node, *node_first;
 969   int x, last_redraw_mask = redraw_mask;
 970
 971   node_first = getLevelDirInfoFirstGroupEntry(leveldir_current);
 972   node = getLevelDirInfoFromPos(node_first, leveldir_pos);
 973
 974   ClearRectangle(drawto, SX + 32, SY + 32, SXSIZE - 64, 32);
 975
 976   if (node->parent_link)
 977     DrawTextFCentered(40, FC_RED, "leave group \"%s\"", node->class_desc);
 978   else if (node->level_group)
 979     DrawTextFCentered(40, FC_RED, "enter group \"%s\"", node->class_desc);
 980   else
 981     DrawTextFCentered(40, FC_RED, "%3d levels (%s)",
 982                       node->levels, node->class_desc);
 983
 984   /* let BackToFront() redraw only what is needed */
 985   redraw_mask = last_redraw_mask | REDRAW_TILES;
 986   for (x=0; x<SCR_FIELDX; x++)
 987     MarkTileDirty(x, 1);
 988 }
 989
 990 void HandleChooseLevel(int mx, int my, int dx, int dy, int button)
 991 {
 992   static unsigned long choose_delay = 0;
 993   static int redraw = TRUE;
 994   int x = (mx + 32 - SX) / 32, y = (my + 32 - SY) / 32;
 995   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
 996   int num_leveldirs = numLevelDirInfoInGroup(leveldir_current);
 997   int num_page_entries;
 998
 999   if (num_leveldirs <= MAX_LEVEL_SERIES_ON_SCREEN)
1000     num_page_entries = num_leveldirs;
1001   else
1002     num_page_entries = MAX_LEVEL_SERIES_ON_SCREEN - 1;
1003
1004   if (button == MB_MENU_INITIALIZE)
1005   {
1006     int leveldir_pos = posLevelDirInfo(leveldir_current);
1007
1008     if (leveldir_current->cl_first == -1)
1009     {
1010       leveldir_current->cl_first = MAX(0, leveldir_pos - num_page_entries + 1);
1011       leveldir_current->cl_cursor =
1012         leveldir_pos - leveldir_current->cl_first + 3;
1013     }
1014
1015     if (dx == 999)      /* first entry is set by scrollbar position */
1016       leveldir_current->cl_first = dy;
1017     else
1018       AdjustChooseLevelScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
1019                                  leveldir_current->cl_first);
1020
1021     drawChooseLevelList(leveldir_current->cl_first, num_page_entries);
1022     drawChooseLevelInfo(leveldir_pos);
1023     redraw = TRUE;
1024   }
1025
1026   if (redraw)
1027   {
1028     drawCursor(leveldir_current->cl_cursor - 1, FC_RED);
1029     redraw = FALSE;
1030   }
1031
1032   if (button == MB_MENU_INITIALIZE)
1033     return;
1034
1035   if (dx || dy)
1036   {
1037     if (dy)
1038     {
1039       x = 1;
1040       y = leveldir_current->cl_cursor + dy;
1041     }
1042     else
1043       x = y = 0;        /* no action */
1044
1045     if (ABS(dy) == SCR_FIELDY)  /* handle KSYM_Page_Up, KSYM_Page_Down */
1046     {
1047       dy = SIGN(dy);
1048       step = num_page_entries - 1;
1049       x = 1;
1050       y = (dy < 0 ? 2 : num_page_entries + 3);
1051     }
1052   }
1053
1054   if (x == 1 && y == 2)
1055   {
1056     if (leveldir_current->cl_first > 0 &&
1057         (dy || DelayReached(&choose_delay, GADGET_FRAME_DELAY)))
1058     {
1059       leveldir_current->cl_first -= step;
1060       if (leveldir_current->cl_first < 0)
1061         leveldir_current->cl_first = 0;
1062
1063       drawChooseLevelList(leveldir_current->cl_first, num_page_entries);
1064       drawChooseLevelInfo(leveldir_current->cl_first +
1065                           leveldir_current->cl_cursor - 3);
1066       drawCursor(leveldir_current->cl_cursor - 1, FC_RED);
1067       AdjustChooseLevelScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
1068                                  leveldir_current->cl_first);
1069       return;
1070     }
1071   }
1072   else if (x == 1 && y > num_page_entries + 2)
1073   {
1074     if (leveldir_current->cl_first + num_page_entries < num_leveldirs &&
1075         (dy || DelayReached(&choose_delay, GADGET_FRAME_DELAY)))
1076     {
1077       leveldir_current->cl_first += step;
1078       if (leveldir_current->cl_first + num_page_entries > num_leveldirs)
1079         leveldir_current->cl_first = MAX(0, num_leveldirs - num_page_entries);
1080
1081       drawChooseLevelList(leveldir_current->cl_first, num_page_entries);
1082       drawChooseLevelInfo(leveldir_current->cl_first +
1083                           leveldir_current->cl_cursor - 3);
1084       drawCursor(leveldir_current->cl_cursor - 1, FC_RED);
1085       AdjustChooseLevelScrollbar(SCREEN_CTRL_ID_SCROLL_VERTICAL,
1086                                  leveldir_current->cl_first);
1087       return;
1088     }
1089   }
1090
1091   if (!mx && !my && !dx && !dy)
1092   {
1093     x = 1;
1094     y = leveldir_current->cl_cursor;
1095   }
1096
1097   if (dx == 1)
1098   {
1099     struct LevelDirInfo *node_first, *node_cursor;
1100     int leveldir_pos =
1101       leveldir_current->cl_first + leveldir_current->cl_cursor - 3;
1102
1103     node_first = getLevelDirInfoFirstGroupEntry(leveldir_current);
1104     node_cursor = getLevelDirInfoFromPos(node_first, leveldir_pos);
1105
1106     if (node_cursor->node_group)
1107     {
1108       node_cursor->cl_first = leveldir_current->cl_first;
1109       node_cursor->cl_cursor = leveldir_current->cl_cursor;
1110       leveldir_current = node_cursor->node_group;
1111       DrawChooseLevel();
1112     }
1113   }
1114   else if (dx == -1 && leveldir_current->node_parent)
1115   {
1116     leveldir_current = leveldir_current->node_parent;
1117     DrawChooseLevel();
1118   }
1119
1120   if (x == 1 && y >= 3 && y <= num_page_entries + 2)
1121   {
1122     if (button)
1123     {
1124       if (y != leveldir_current->cl_cursor)
1125       {
1126         drawCursor(y - 1, FC_RED);
1127         drawCursor(leveldir_current->cl_cursor - 1, FC_BLUE);
1128         drawChooseLevelInfo(leveldir_current->cl_first + y - 3);
1129         leveldir_current->cl_cursor = y;
1130       }
1131     }
1132     else
1133     {
1134       struct LevelDirInfo *node_first, *node_cursor;
1135       int leveldir_pos = leveldir_current->cl_first + y - 3;
1136
1137       node_first = getLevelDirInfoFirstGroupEntry(leveldir_current);
1138       node_cursor = getLevelDirInfoFromPos(node_first, leveldir_pos);
1139
1140       if (node_cursor->node_group)
1141       {
1142         node_cursor->cl_first = leveldir_current->cl_first;
1143         node_cursor->cl_cursor = leveldir_current->cl_cursor;
1144         leveldir_current = node_cursor->node_group;
1145         DrawChooseLevel();
1146       }
1147       else if (node_cursor->parent_link)
1148       {
1149         leveldir_current = node_cursor->node_parent;
1150         DrawChooseLevel();
1151       }
1152       else
1153       {
1154         leveldir_current = node_cursor;
1155
1156         LoadLevelSetup_SeriesInfo();
1157
1158         SaveLevelSetup_LastSeries();
1159         SaveLevelSetup_SeriesInfo();
1160         TapeErase();
1161
1162         game_status = MAINMENU;
1163         DrawMainMenu();
1164       }
1165     }
1166   }
1167
1168   BackToFront();
1169
1170   if (game_status == CHOOSELEVEL)
1171     DoAnimation();
1172 }
1173
1174 void DrawHallOfFame(int highlight_position)
1175 {
1176   UnmapAllGadgets();
1177   CloseDoor(DOOR_CLOSE_2);
1178
1179   if (highlight_position < 0)
1180     LoadScore(level_nr);
1181
1182   FadeToFront();
1183   InitAnimation();
1184   HandleHallOfFame(highlight_position,0, 0,0, MB_MENU_INITIALIZE);
1185   PlaySound(SND_HALLOFFAME);
1186 }
1187
1188 static void drawHallOfFameList(int first_entry, int highlight_position)
1189 {
1190   int i;
1191
1192   ClearWindow();
1193   DrawText(SX + 80, SY + 8, "Hall Of Fame", FS_BIG, FC_YELLOW);
1194   DrawTextFCentered(46, FC_RED, "HighScores of Level %d", level_nr);
1195
1196   for(i=0; i<MAX_LEVEL_SERIES_ON_SCREEN; i++)
1197   {
1198     int entry = first_entry + i;
1199     int color = (entry == highlight_position ? FC_RED : FC_GREEN);
1200
1201 #if 0
1202     DrawText(SX, SY + 64 + i * 32, ".................", FS_BIG, color);
1203     DrawText(SX, SY + 64 + i * 32, highscore[i].Name, FS_BIG, color);
1204     DrawText(SX + 12 * 32, SY + 64 + i * 32,
1205              int2str(highscore[i].Score, 5), FS_BIG, color);
1206 #else
1207     DrawText(SX, SY + 64 + i * 32, "..................................",
1208              FS_MEDIUM, FC_YELLOW);
1209     DrawText(SX, SY + 64 + i * 32, int2str(entry + 1, 3),
1210              FS_MEDIUM, FC_YELLOW);
1211     DrawText(SX + 64, SY + 64 + i * 32, highscore[entry].Name, FS_BIG, color);
1212     DrawText(SX + 14 * 32 + 16, SY + 64 + i * 32,
1213              int2str(highscore[entry].Score, 5), FS_MEDIUM, color);
1214 #endif
1215   }
1216 }
1217
1218 void HandleHallOfFame(int mx, int my, int dx, int dy, int button)
1219 {
1220   static int first_entry = 0;
1221   static int highlight_position = 0;
1222   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
1223   int button_released = !button;
1224
1225   if (button == MB_MENU_INITIALIZE)
1226   {
1227     first_entry = 0;
1228     highlight_position = mx;
1229     drawHallOfFameList(first_entry, highlight_position);
1230     return;
1231   }
1232
1233   if (ABS(dy) == SCR_FIELDY)    /* handle KSYM_Page_Up, KSYM_Page_Down */
1234     step = MAX_LEVEL_SERIES_ON_SCREEN - 1;
1235
1236   if (dy < 0)
1237   {
1238     if (first_entry > 0)
1239     {
1240       first_entry -= step;
1241       if (first_entry < 0)
1242         first_entry = 0;
1243
1244       drawHallOfFameList(first_entry, highlight_position);
1245       return;
1246     }
1247   }
1248   else if (dy > 0)
1249   {
1250     if (first_entry + MAX_LEVEL_SERIES_ON_SCREEN < MAX_SCORE_ENTRIES)
1251     {
1252       first_entry += step;
1253       if (first_entry + MAX_LEVEL_SERIES_ON_SCREEN > MAX_SCORE_ENTRIES)
1254         first_entry = MAX(0, MAX_SCORE_ENTRIES - MAX_LEVEL_SERIES_ON_SCREEN);
1255
1256       drawHallOfFameList(first_entry, highlight_position);
1257       return;
1258     }
1259   }
1260
1261   if (button_released)
1262   {
1263     FadeSound(SND_HALLOFFAME);
1264     game_status = MAINMENU;
1265     DrawMainMenu();
1266   }
1267
1268   BackToFront();
1269
1270   if (game_status == HALLOFFAME)
1271     DoAnimation();
1272 }
1273
1274 void DrawSetupScreen()
1275 {
1276   int i;
1277   static struct setup
1278   {
1279     boolean *value;
1280     char *text;
1281   } setup_info[] =
1282   {
1283     { &setup.sound,             "Sound:",       },
1284     { &setup.sound_loops,       " Sound Loops:" },
1285     { &setup.sound_music,       " Game Music:"  },
1286 #if 0
1287     { &setup.toons,             "Toons:"        },
1288     { &setup.double_buffering,  "Buffered gfx:" },
1289 #endif
1290     { &setup.scroll_delay,      "Scroll Delay:" },
1291     { &setup.soft_scrolling,    "Soft Scroll.:" },
1292 #if 0
1293     { &setup.fading,            "Fading:"       },
1294 #endif
1295     { &setup.fullscreen,        "Fullscreen:"   },
1296     { &setup.quick_doors,       "Quick Doors:"  },
1297     { &setup.autorecord,        "Auto-Record:"  },
1298     { &setup.team_mode,         "Team-Mode:"    },
1299     { &setup.handicap,          "Handicap:"     },
1300     { &setup.time_limit,        "Timelimit:"    },
1301     { NULL,                     "Input Devices" },
1302     { NULL,                     ""              },
1303     { NULL,                     "Exit"          },
1304     { NULL,                     "Save and exit" }
1305   };
1306
1307   UnmapAllGadgets();
1308   CloseDoor(DOOR_CLOSE_2);
1309   ClearWindow();
1310
1311   DrawText(SX + 16, SY + 16, "SETUP",FS_BIG,FC_YELLOW);
1312
1313   for(i=SETUP_SCREEN_POS_START;i<=SETUP_SCREEN_POS_END;i++)
1314   {
1315     int base = i - SETUP_SCREEN_POS_START;
1316
1317     if (!(i >= SETUP_SCREEN_POS_EMPTY1 && i <= SETUP_SCREEN_POS_EMPTY2))
1318     {
1319       DrawText(SX+32,SY+i*32, setup_info[base].text, FS_BIG,FC_GREEN);
1320
1321       if (strcmp(setup_info[base].text, "Input Devices") == 0)
1322         initCursor(i, GFX_ARROW_BLUE_RIGHT);
1323       else
1324         initCursor(i, GFX_KUGEL_BLAU);
1325     }
1326
1327     if (setup_info[base].value)
1328     {
1329       int setting_value = *setup_info[base].value;
1330
1331       DrawText(SX+14*32, SY+i*32, (setting_value ? "on" : "off"),
1332                FS_BIG, (setting_value ? FC_YELLOW : FC_BLUE));
1333     }
1334   }
1335
1336   FadeToFront();
1337   InitAnimation();
1338   HandleSetupScreen(0,0,0,0,MB_MENU_INITIALIZE);
1339 }
1340
1341 void HandleSetupScreen(int mx, int my, int dx, int dy, int button)
1342 {
1343   static int choice = 3;
1344   static int redraw = TRUE;
1345   int x = (mx+32-SX)/32, y = (my+32-SY)/32;
1346   int pos_start  = SETUP_SCREEN_POS_START  + 1;
1347   int pos_empty1 = SETUP_SCREEN_POS_EMPTY1 + 1;
1348   int pos_empty2 = SETUP_SCREEN_POS_EMPTY2 + 1;
1349   int pos_end    = SETUP_SCREEN_POS_END    + 1;
1350
1351   if (button == MB_MENU_INITIALIZE)
1352     redraw = TRUE;
1353
1354   if (redraw)
1355   {
1356     drawCursor(choice - 1, FC_RED);
1357     redraw = FALSE;
1358   }
1359
1360   if (button == MB_MENU_INITIALIZE)
1361     return;
1362
1363   if (dx || dy)
1364   {
1365     if (dy)
1366     {
1367       x = 1;
1368       y = choice+dy;
1369     }
1370     else
1371       x = y = 0;
1372
1373     if (y >= pos_empty1 && y <= pos_empty2)
1374       y = (dy > 0 ? pos_empty2 + 1 : pos_empty1 - 1);
1375
1376     if (y < pos_start)
1377       y = pos_start;
1378     else if (y > pos_end)
1379       y = pos_end;
1380   }
1381
1382   if (!mx && !my && !dx && !dy)
1383   {
1384     x = 1;
1385     y = choice;
1386   }
1387
1388   if (dx == 1 && choice == 14)
1389   {
1390     game_status = SETUPINPUT;
1391     DrawSetupInputScreen();
1392     redraw = TRUE;
1393   }
1394
1395   if (x==1 && y >= pos_start && y <= pos_end &&
1396       !(y >= pos_empty1 && y <= pos_empty2))
1397   {
1398     if (button)
1399     {
1400       if (y!=choice)
1401       {
1402         drawCursor(y - 1, FC_RED);
1403         drawCursor(choice - 1, FC_BLUE);
1404       }
1405       choice = y;
1406     }
1407     else
1408     {
1409       int yy = y-1;
1410
1411       if (y == 3 && audio.sound_available)
1412       {
1413         if (setup.sound)
1414         {
1415           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1416           DrawText(SX+14*32, SY+(yy+1)*32,"off",FS_BIG,FC_BLUE);
1417           DrawText(SX+14*32, SY+(yy+2)*32,"off",FS_BIG,FC_BLUE);
1418           setup.sound_loops = FALSE;
1419           setup.sound_music = FALSE;
1420         }
1421         else
1422           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1423         setup.sound = !setup.sound;
1424       }
1425       else if (y == 4 && audio.loops_available)
1426       {
1427         if (setup.sound_loops)
1428           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1429         else
1430         {
1431           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1432           DrawText(SX+14*32, SY+(yy-1)*32,"on ",FS_BIG,FC_YELLOW);
1433           setup.sound = TRUE;
1434         }
1435         setup.sound_loops = !setup.sound_loops;
1436       }
1437       else if (y == 5 && audio.loops_available)
1438       {
1439         if (setup.sound_music)
1440           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1441         else
1442         {
1443           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1444           DrawText(SX+14*32, SY+(yy-2)*32,"on ",FS_BIG,FC_YELLOW);
1445           setup.sound = TRUE;
1446         }
1447         setup.sound_music = !setup.sound_music;
1448       }
1449
1450 #if 0
1451       else if (y == 6)
1452       {
1453         if (setup.toons)
1454           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1455         else
1456           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1457         setup.toons = !setup.toons;
1458       }
1459       else if (y == 7)
1460       {
1461 #if 0
1462         if (setup.double_buffering)
1463           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1464         else
1465           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1466         setup.double_buffering = !setup.double_buffering;
1467         setup.direct_draw = !setup.double_buffering;
1468 #else
1469         DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1470         setup.double_buffering = TRUE;
1471         setup.direct_draw = !setup.double_buffering;
1472 #endif
1473       }
1474 #endif
1475
1476       else if (y == 6)
1477       {
1478         if (setup.scroll_delay)
1479           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1480         else
1481           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1482         setup.scroll_delay = !setup.scroll_delay;
1483       }
1484       else if (y == 7)
1485       {
1486         if (setup.soft_scrolling)
1487           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1488         else
1489           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1490         setup.soft_scrolling = !setup.soft_scrolling;
1491       }
1492 #if 0
1493       else if (y == 8)
1494       {
1495         if (setup.fading)
1496           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1497         else
1498           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1499         setup.fading = !setup.fading;
1500       }
1501 #endif
1502       else if (y == 8 && video.fullscreen_available)
1503       {
1504         if (setup.fullscreen)
1505           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1506         else
1507           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1508         setup.fullscreen = !setup.fullscreen;
1509       }
1510       else if (y == 9)
1511       {
1512         if (setup.quick_doors)
1513           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1514         else
1515           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1516         setup.quick_doors = !setup.quick_doors;
1517       }
1518       else if (y == 10)
1519       {
1520         if (setup.autorecord)
1521           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1522         else
1523           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1524         setup.autorecord = !setup.autorecord;
1525       }
1526       else if (y == 11)
1527       {
1528         if (setup.team_mode)
1529           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1530         else
1531           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1532         setup.team_mode = !setup.team_mode;
1533       }
1534       else if (y == 12)
1535       {
1536         if (setup.handicap)
1537           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1538         else
1539           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1540         setup.handicap = !setup.handicap;
1541       }
1542       else if (y == 13)
1543       {
1544         if (setup.time_limit)
1545           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1546         else
1547           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1548         setup.time_limit = !setup.time_limit;
1549       }
1550       else if (y == 14)
1551       {
1552         game_status = SETUPINPUT;
1553         DrawSetupInputScreen();
1554         redraw = TRUE;
1555       }
1556       else if (y==pos_end-1 || y==pos_end)
1557       {
1558         if (y==pos_end)
1559         {
1560           SaveSetup();
1561
1562           /*
1563           SaveJoystickData();
1564           */
1565
1566 #if defined(PLATFORM_MSDOS)
1567           save_joystick_data(JOYSTICK_FILENAME);
1568 #endif
1569
1570
1571         }
1572
1573         game_status = MAINMENU;
1574         DrawMainMenu();
1575         redraw = TRUE;
1576       }
1577     }
1578   }
1579   BackToFront();
1580
1581   if (game_status==SETUP)
1582     DoAnimation();
1583 }
1584
1585 void DrawSetupInputScreen()
1586 {
1587   ClearWindow();
1588   DrawText(SX+16, SY+16, "SETUP INPUT", FS_BIG, FC_YELLOW);
1589
1590   initCursor(2, GFX_KUGEL_BLAU);
1591   initCursor(3, GFX_KUGEL_BLAU);
1592   initCursor(4, GFX_ARROW_BLUE_RIGHT);
1593   initCursor(15, GFX_KUGEL_BLAU);
1594
1595   DrawGraphic(10, 2, GFX_ARROW_BLUE_LEFT);
1596   DrawGraphic(12, 2, GFX_ARROW_BLUE_RIGHT);
1597
1598   DrawText(SX+32, SY+2*32, "Player:", FS_BIG, FC_GREEN);
1599   DrawText(SX+32, SY+3*32, "Device:", FS_BIG, FC_GREEN);
1600   DrawText(SX+32, SY+15*32, "Exit", FS_BIG, FC_GREEN);
1601
1602   DrawTextFCentered(SYSIZE - 20, FC_BLUE,
1603                     "Joysticks deactivated on this screen");
1604
1605   HandleSetupInputScreen(0,0, 0,0, MB_MENU_INITIALIZE);
1606   FadeToFront();
1607   InitAnimation();
1608 }
1609
1610 static void setJoystickDeviceToNr(char *device_name, int device_nr)
1611 {
1612   if (device_name == NULL)
1613     return;
1614
1615   if (device_nr < 0 || device_nr >= MAX_PLAYERS)
1616     device_nr = 0;
1617
1618   if (strlen(device_name) > 1)
1619   {
1620     char c1 = device_name[strlen(device_name) - 1];
1621     char c2 = device_name[strlen(device_name) - 2];
1622
1623     if (c1 >= '0' && c1 <= '9' && !(c2 >= '0' && c2 <= '9'))
1624       device_name[strlen(device_name) - 1] = '0' + (char)(device_nr % 10);
1625   }
1626   else
1627     strncpy(device_name, joystick_device_name[device_nr], strlen(device_name));
1628 }
1629
1630 static void drawPlayerSetupInputInfo(int player_nr)
1631 {
1632   int i;
1633   static struct SetupKeyboardInfo custom_key;
1634   static struct
1635   {
1636     Key *key;
1637     char *text;
1638   } custom[] =
1639   {
1640     { &custom_key.left,  "Joystick Left"  },
1641     { &custom_key.right, "Joystick Right" },
1642     { &custom_key.up,    "Joystick Up"    },
1643     { &custom_key.down,  "Joystick Down"  },
1644     { &custom_key.snap,  "Button 1"       },
1645     { &custom_key.bomb,  "Button 2"       }
1646   };
1647   static char *joystick_name[MAX_PLAYERS] =
1648   {
1649     "Joystick1",
1650     "Joystick2",
1651     "Joystick3",
1652     "Joystick4"
1653   };
1654
1655   custom_key = setup.input[player_nr].key;
1656
1657   DrawText(SX+11*32, SY+2*32, int2str(player_nr + 1, 1), FS_BIG, FC_RED);
1658   DrawGraphic(8, 2, GFX_SPIELER1 + player_nr);
1659
1660   if (setup.input[player_nr].use_joystick)
1661   {
1662     char *device_name = setup.input[player_nr].joy.device_name;
1663
1664     DrawText(SX+8*32, SY+3*32,
1665              joystick_name[getJoystickNrFromDeviceName(device_name)],
1666              FS_BIG, FC_YELLOW);
1667     DrawText(SX+32, SY+4*32, "Calibrate", FS_BIG, FC_GREEN);
1668   }
1669   else
1670   {
1671     DrawText(SX+8*32, SY+3*32, "Keyboard ", FS_BIG, FC_YELLOW);
1672     DrawText(SX+32, SY+4*32, "Customize", FS_BIG, FC_GREEN);
1673   }
1674
1675   DrawText(SX+32, SY+5*32, "Actual Settings:", FS_BIG, FC_GREEN);
1676   DrawGraphic(1, 6, GFX_ARROW_BLUE_LEFT);
1677   DrawGraphic(1, 7, GFX_ARROW_BLUE_RIGHT);
1678   DrawGraphic(1, 8, GFX_ARROW_BLUE_UP);
1679   DrawGraphic(1, 9, GFX_ARROW_BLUE_DOWN);
1680   DrawText(SX+2*32, SY+6*32, ":", FS_BIG, FC_BLUE);
1681   DrawText(SX+2*32, SY+7*32, ":", FS_BIG, FC_BLUE);
1682   DrawText(SX+2*32, SY+8*32, ":", FS_BIG, FC_BLUE);
1683   DrawText(SX+2*32, SY+9*32, ":", FS_BIG, FC_BLUE);
1684   DrawText(SX+32, SY+10*32, "Snap Field:", FS_BIG, FC_BLUE);
1685   DrawText(SX+32, SY+12*32, "Place Bomb:", FS_BIG, FC_BLUE);
1686
1687   for (i=0; i<6; i++)
1688   {
1689     int ypos = 6 + i + (i > 3 ? i-3 : 0);
1690
1691     DrawText(SX + 3*32, SY + ypos*32,
1692              "              ", FS_BIG, FC_YELLOW);
1693     DrawText(SX + 3*32, SY + ypos*32,
1694              (setup.input[player_nr].use_joystick ?
1695               custom[i].text :
1696               getKeyNameFromKey(*custom[i].key)),
1697              FS_BIG, FC_YELLOW);
1698   }
1699 }
1700
1701 void HandleSetupInputScreen(int mx, int my, int dx, int dy, int button)
1702 {
1703   static int choice = 3;
1704   static int player_nr = 0;
1705   static int redraw = TRUE;
1706   int x = (mx+32-SX)/32, y = (my+32-SY)/32;
1707   int pos_start  = SETUPINPUT_SCREEN_POS_START  + 1;
1708   int pos_empty1 = SETUPINPUT_SCREEN_POS_EMPTY1 + 1;
1709   int pos_empty2 = SETUPINPUT_SCREEN_POS_EMPTY2 + 1;
1710   int pos_end    = SETUPINPUT_SCREEN_POS_END    + 1;
1711
1712   if (button == MB_MENU_INITIALIZE)
1713   {
1714     drawPlayerSetupInputInfo(player_nr);
1715     redraw = TRUE;
1716   }
1717
1718   if (redraw)
1719   {
1720     drawCursor(choice - 1, FC_RED);
1721     redraw = FALSE;
1722   }
1723
1724   if (button == MB_MENU_INITIALIZE)
1725     return;
1726
1727   if (dx || dy)
1728   {
1729     if (dx && choice == 3)
1730     {
1731       x = (dx < 0 ? 11 : 13);
1732       y = 3;
1733     }
1734     else if (dx && choice == 4)
1735     {
1736       button = MB_MENU_CHOICE;
1737       x = 1;
1738       y = 4;
1739     }
1740     else if (dy)
1741     {
1742       x = 1;
1743       y = choice + dy;
1744     }
1745     else
1746       x = y = 0;
1747
1748     if (y >= pos_empty1 && y <= pos_empty2)
1749       y = (dy > 0 ? pos_empty2 + 1 : pos_empty1 - 1);
1750
1751     if (y < pos_start)
1752       y = pos_start;
1753     else if (y > pos_end)
1754       y = pos_end;
1755   }
1756
1757   if (!mx && !my && !dx && !dy)
1758   {
1759     x = 1;
1760     y = choice;
1761   }
1762
1763   if (y == 3 && ((x == 1 && !button) || ((x == 11 || x == 13) && button)))
1764   {
1765     static unsigned long delay = 0;
1766
1767     if (!DelayReached(&delay, GADGET_FRAME_DELAY))
1768       goto out;
1769
1770     player_nr = (player_nr + (x == 11 ? -1 : +1) + MAX_PLAYERS) % MAX_PLAYERS;
1771
1772     drawPlayerSetupInputInfo(player_nr);
1773   }
1774   else if (x==1 && y >= pos_start && y <= pos_end &&
1775            !(y >= pos_empty1 && y <= pos_empty2))
1776   {
1777     if (button)
1778     {
1779       if (y != choice)
1780       {
1781         drawCursor(y - 1, FC_RED);
1782         drawCursor(choice - 1, FC_BLUE);
1783       }
1784       choice = y;
1785     }
1786     else
1787     {
1788       if (y == 4)
1789       {
1790         char *device_name = setup.input[player_nr].joy.device_name;
1791
1792         if (!setup.input[player_nr].use_joystick)
1793         {
1794           int new_device_nr = (dx >= 0 ? 0 : MAX_PLAYERS - 1);
1795
1796           setJoystickDeviceToNr(device_name, new_device_nr);
1797           setup.input[player_nr].use_joystick = TRUE;
1798         }
1799         else
1800         {
1801           int device_nr = getJoystickNrFromDeviceName(device_name);
1802           int new_device_nr = device_nr + (dx >= 0 ? +1 : -1);
1803
1804           if (new_device_nr < 0 || new_device_nr >= MAX_PLAYERS)
1805             setup.input[player_nr].use_joystick = FALSE;
1806           else
1807             setJoystickDeviceToNr(device_name, new_device_nr);
1808         }
1809
1810
1811         /*
1812         InitJoysticks();
1813         */
1814
1815
1816 #if 0
1817         int one_joystick_nr       = (dx >= 0 ? 0 : 1);
1818         int the_other_joystick_nr = (dx >= 0 ? 1 : 0);
1819
1820         if (setup.input[player_nr].use_joystick)
1821         {
1822           if (setup.input[player_nr].joystick_nr == one_joystick_nr)
1823             setup.input[player_nr].joystick_nr = the_other_joystick_nr;
1824           else
1825             setup.input[player_nr].use_joystick = FALSE;
1826         }
1827         else
1828         {
1829           setup.input[player_nr].use_joystick = TRUE;
1830           setup.input[player_nr].joystick_nr = one_joystick_nr;
1831         }
1832 #endif
1833
1834         drawPlayerSetupInputInfo(player_nr);
1835       }
1836       else if (y == 5)
1837       {
1838         if (setup.input[player_nr].use_joystick)
1839         {
1840           InitJoysticks();
1841           game_status = CALIBRATION;
1842           CalibrateJoystick(player_nr);
1843           game_status = SETUPINPUT;
1844         }
1845         else
1846           CustomizeKeyboard(player_nr);
1847
1848         redraw = TRUE;
1849       }
1850       else if (y == pos_end)
1851       {
1852         InitJoysticks();
1853
1854         game_status = SETUP;
1855         DrawSetupScreen();
1856         redraw = TRUE;
1857       }
1858     }
1859   }
1860   BackToFront();
1861
1862   out:
1863
1864   if (game_status == SETUPINPUT)
1865     DoAnimation();
1866 }
1867
1868 void CustomizeKeyboard(int player_nr)
1869 {
1870   int i;
1871   int step_nr;
1872   boolean finished = FALSE;
1873   static struct SetupKeyboardInfo custom_key;
1874   static struct
1875   {
1876     Key *key;
1877     char *text;
1878   } customize_step[] =
1879   {
1880     { &custom_key.left,  "Move Left"  },
1881     { &custom_key.right, "Move Right" },
1882     { &custom_key.up,    "Move Up"    },
1883     { &custom_key.down,  "Move Down"  },
1884     { &custom_key.snap,  "Snap Field" },
1885     { &custom_key.bomb,  "Place Bomb" }
1886   };
1887
1888   /* read existing key bindings from player setup */
1889   custom_key = setup.input[player_nr].key;
1890
1891   ClearWindow();
1892   DrawText(SX + 16, SY + 16, "Keyboard Input", FS_BIG, FC_YELLOW);
1893
1894   BackToFront();
1895   InitAnimation();
1896
1897   step_nr = 0;
1898   DrawText(SX, SY + (2+2*step_nr)*32,
1899            customize_step[step_nr].text, FS_BIG, FC_RED);
1900   DrawText(SX, SY + (2+2*step_nr+1)*32,
1901            "Key:", FS_BIG, FC_RED);
1902   DrawText(SX + 4*32, SY + (2+2*step_nr+1)*32,
1903            getKeyNameFromKey(*customize_step[step_nr].key),
1904            FS_BIG, FC_BLUE);
1905
1906   while(!finished)
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 key = GetEventKey((KeyEvent *)&event, TRUE);
1919
1920             if (key == KSYM_Escape || (key == KSYM_Return && step_nr == 6))
1921             {
1922               finished = TRUE;
1923               break;
1924             }
1925
1926             /* all keys configured -- wait for "Escape" or "Return" key */
1927             if (step_nr == 6)
1928               break;
1929
1930             /* press 'Enter' to keep the existing key binding */
1931             if (key == KSYM_Return)
1932               key = *customize_step[step_nr].key;
1933
1934             /* check if key already used */
1935             for (i=0; i<step_nr; i++)
1936               if (*customize_step[i].key == key)
1937                 break;
1938             if (i < step_nr)
1939               break;
1940
1941             /* got new key binding */
1942             *customize_step[step_nr].key = key;
1943             DrawText(SX + 4*32, SY + (2+2*step_nr+1)*32,
1944                      "             ", FS_BIG, FC_YELLOW);
1945             DrawText(SX + 4*32, SY + (2+2*step_nr+1)*32,
1946                      getKeyNameFromKey(key), FS_BIG, FC_YELLOW);
1947             step_nr++;
1948
1949             /* un-highlight last query */
1950             DrawText(SX, SY+(2+2*(step_nr-1))*32,
1951                      customize_step[step_nr-1].text, FS_BIG, FC_GREEN);
1952             DrawText(SX, SY+(2+2*(step_nr-1)+1)*32,
1953                      "Key:", FS_BIG, FC_GREEN);
1954
1955             /* press 'Enter' to leave */
1956             if (step_nr == 6)
1957             {
1958               DrawText(SX + 16, SY + 15*32+16,
1959                        "Press Enter", FS_BIG, FC_YELLOW);
1960               break;
1961             }
1962
1963             /* query next key binding */
1964             DrawText(SX, SY+(2+2*step_nr)*32,
1965                      customize_step[step_nr].text, FS_BIG, FC_RED);
1966             DrawText(SX, SY+(2+2*step_nr+1)*32,
1967                      "Key:", FS_BIG, FC_RED);
1968             DrawText(SX + 4*32, SY+(2+2*step_nr+1)*32,
1969                      getKeyNameFromKey(*customize_step[step_nr].key),
1970                      FS_BIG, FC_BLUE);
1971           }
1972           break;
1973
1974         case EVENT_KEYRELEASE:
1975           key_joystick_mapping = 0;
1976           break;
1977
1978         default:
1979           HandleOtherEvents(&event);
1980           break;
1981       }
1982     }
1983
1984     BackToFront();
1985     DoAnimation();
1986
1987     /* don't eat all CPU time */
1988     Delay(10);
1989   }
1990
1991   /* write new key bindings back to player setup */
1992   setup.input[player_nr].key = custom_key;
1993
1994   StopAnimation();
1995   DrawSetupInputScreen();
1996 }
1997
1998 void CalibrateJoystick(int player_nr)
1999 {
2000 #ifdef __FreeBSD__
2001   struct joystick joy_ctrl;
2002 #else
2003   struct joystick_control
2004   {
2005     int buttons;
2006     int x;
2007     int y;
2008   } joy_ctrl;
2009 #endif
2010
2011 #if !defined(PLATFORM_MSDOS)
2012   int new_joystick_xleft = 128, new_joystick_xright = 128;
2013   int new_joystick_yupper = 128, new_joystick_ylower = 128;
2014   int new_joystick_xmiddle, new_joystick_ymiddle;
2015 #else
2016   int calibration_step = 1;
2017 #endif
2018
2019   int joystick_fd = stored_player[player_nr].joystick_fd;
2020   int x, y, last_x, last_y, xpos = 8, ypos = 3;
2021   boolean check[3][3];
2022   int check_remaining;
2023   int joy_value;
2024   int result = -1;
2025
2026   if (joystick_status == JOYSTICK_OFF ||
2027       joystick_fd < 0 ||
2028       !setup.input[player_nr].use_joystick)
2029     goto error_out;
2030
2031   ClearWindow();
2032
2033 #if !defined(PLATFORM_MSDOS)
2034   DrawText(SX,      SY +  6*32, " ROTATE JOYSTICK ", FS_BIG, FC_YELLOW);
2035   DrawText(SX,      SY +  7*32, "IN ALL DIRECTIONS", FS_BIG, FC_YELLOW);
2036   DrawText(SX + 16, SY +  9*32, "  IF ALL BALLS  ",  FS_BIG, FC_YELLOW);
2037   DrawText(SX,      SY + 10*32, "   ARE YELLOW,   ", FS_BIG, FC_YELLOW);
2038   DrawText(SX,      SY + 11*32, "PRESS ANY BUTTON!", FS_BIG, FC_YELLOW);
2039   check_remaining = 3 * 3;
2040 #else
2041   DrawText(SX,      SY +  7*32, "  MOVE JOYSTICK  ", FS_BIG, FC_YELLOW);
2042   DrawText(SX + 16, SY +  8*32, "       TO       ",  FS_BIG, FC_YELLOW);
2043   DrawText(SX,      SY +  9*32, " CENTER POSITION ",  FS_BIG, FC_YELLOW);
2044   DrawText(SX,      SY + 10*32, "       AND       ", FS_BIG, FC_YELLOW);
2045   DrawText(SX,      SY + 11*32, "PRESS ANY BUTTON!", FS_BIG, FC_YELLOW);
2046   check_remaining = 0;
2047 #endif
2048
2049   for(y=0; y<3; y++)
2050   {
2051     for(x=0; x<3; x++)
2052     {
2053       check[x][y] = FALSE;
2054       DrawGraphic(xpos + x - 1, ypos + y - 1, GFX_KUGEL_BLAU);
2055     }
2056   }
2057
2058   joy_value = Joystick(player_nr);
2059   last_x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
2060   last_y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
2061   DrawGraphic(xpos + last_x, ypos + last_y, GFX_KUGEL_ROT);
2062
2063   BackToFront();
2064
2065 #ifdef __FreeBSD__
2066   joy_ctrl.b1 = joy_ctrl.b2 = 0;
2067 #else
2068   joy_ctrl.buttons = 0;
2069 #endif
2070
2071   while(Joystick(player_nr) & JOY_BUTTON);
2072
2073   InitAnimation();
2074
2075   while(result < 0)
2076   {
2077     if (PendingEvent())         /* got event */
2078     {
2079       Event event;
2080
2081       NextEvent(&event);
2082
2083       switch(event.type)
2084       {
2085         case EVENT_KEYPRESS:
2086           switch(GetEventKey((KeyEvent *)&event, TRUE))
2087           {
2088             case KSYM_Return:
2089               if (check_remaining == 0)
2090                 result = 1;
2091               break;
2092
2093             case KSYM_Escape:
2094               result = 0;
2095               break;
2096
2097             default:
2098               break;
2099           }
2100           break;
2101
2102         case EVENT_KEYRELEASE:
2103           key_joystick_mapping = 0;
2104           break;
2105
2106         default:
2107           HandleOtherEvents(&event);
2108           break;
2109       }
2110     }
2111
2112 #if !defined(PLATFORM_MSDOS)
2113
2114 #if defined(TARGET_SDL)
2115     joy_ctrl.x = Get_SDL_Joystick_Axis(joystick_fd, 0);
2116     joy_ctrl.y = Get_SDL_Joystick_Axis(joystick_fd, 1);
2117 #else
2118     if (read(joystick_fd, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
2119     {
2120       joystick_status = JOYSTICK_OFF;
2121       goto error_out;
2122     }
2123 #endif
2124
2125     new_joystick_xleft  = MIN(new_joystick_xleft,  joy_ctrl.x);
2126     new_joystick_xright = MAX(new_joystick_xright, joy_ctrl.x);
2127     new_joystick_yupper = MIN(new_joystick_yupper, joy_ctrl.y);
2128     new_joystick_ylower = MAX(new_joystick_ylower, joy_ctrl.y);
2129
2130     new_joystick_xmiddle =
2131       new_joystick_xleft + (new_joystick_xright - new_joystick_xleft) / 2;
2132     new_joystick_ymiddle =
2133       new_joystick_yupper + (new_joystick_ylower - new_joystick_yupper) / 2;
2134
2135     setup.input[player_nr].joy.xleft = new_joystick_xleft;
2136     setup.input[player_nr].joy.yupper = new_joystick_yupper;
2137     setup.input[player_nr].joy.xright = new_joystick_xright;
2138     setup.input[player_nr].joy.ylower = new_joystick_ylower;
2139     setup.input[player_nr].joy.xmiddle = new_joystick_xmiddle;
2140     setup.input[player_nr].joy.ymiddle = new_joystick_ymiddle;
2141
2142     CheckJoystickData();
2143 #endif
2144
2145     joy_value = Joystick(player_nr);
2146
2147     if (joy_value & JOY_BUTTON && check_remaining == 0)
2148     {
2149       result = 1;
2150
2151 #if defined(PLATFORM_MSDOS)
2152       if (calibration_step == 1)
2153       {
2154         remove_joystick();
2155         InitJoysticks();
2156       }
2157       else if (calibrate_joystick(joystick_fd) != 0)
2158       {
2159         joystick_status = JOYSTICK_OFF;
2160         goto error_out;
2161       }
2162
2163       if (joy[joystick_fd].flags & JOYFLAG_CALIBRATE)
2164       {
2165         calibration_step++;
2166         result = -1;
2167
2168         DrawText(SX,      SY +  7*32, "  MOVE JOYSTICK  ", FS_BIG, FC_YELLOW);
2169         DrawText(SX + 16, SY +  8*32, "       TO       ",  FS_BIG, FC_YELLOW);
2170
2171         if (calibration_step == 2)
2172           DrawText(SX + 16, SY + 9*32," THE UPPER LEFT ",  FS_BIG, FC_YELLOW);
2173         else
2174           DrawText(SX,      SY + 9*32," THE LOWER RIGHT ", FS_BIG, FC_YELLOW);
2175
2176         DrawText(SX,      SY + 10*32, "       AND       ", FS_BIG, FC_YELLOW);
2177         DrawText(SX,      SY + 11*32, "PRESS ANY BUTTON!", FS_BIG, FC_YELLOW);
2178
2179         BackToFront();
2180
2181         while(Joystick(player_nr) & JOY_BUTTON)
2182           DoAnimation();
2183       }
2184 #endif
2185     }
2186
2187     x = (joy_value & JOY_LEFT ? -1 : joy_value & JOY_RIGHT ? +1 : 0);
2188     y = (joy_value & JOY_UP   ? -1 : joy_value & JOY_DOWN  ? +1 : 0);
2189
2190     if (x != last_x || y != last_y)
2191     {
2192 #if !defined(PLATFORM_MSDOS)
2193       DrawGraphic(xpos + last_x, ypos + last_y, GFX_KUGEL_GELB);
2194 #else
2195       DrawGraphic(xpos + last_x, ypos + last_y, GFX_KUGEL_BLAU);
2196 #endif
2197       DrawGraphic(xpos + x,      ypos + y,      GFX_KUGEL_ROT);
2198
2199       last_x = x;
2200       last_y = y;
2201
2202       if (check_remaining > 0 && !check[x+1][y+1])
2203       {
2204         check[x+1][y+1] = TRUE;
2205         check_remaining--;
2206       }
2207
2208 #if 0
2209       printf("LEFT / MIDDLE / RIGHT == %d / %d / %d\n",
2210              setup.input[player_nr].joy.xleft,
2211              setup.input[player_nr].joy.xmiddle,
2212              setup.input[player_nr].joy.xright);
2213       printf("UP / MIDDLE / DOWN == %d / %d / %d\n",
2214              setup.input[player_nr].joy.yupper,
2215              setup.input[player_nr].joy.ymiddle,
2216              setup.input[player_nr].joy.ylower);
2217 #endif
2218
2219     }
2220
2221     BackToFront();
2222     DoAnimation();
2223
2224     /* don't eat all CPU time */
2225     Delay(10);
2226   }
2227
2228   StopAnimation();
2229
2230   DrawSetupInputScreen();
2231
2232   /* wait until the last pressed button was released */
2233   while(Joystick(player_nr) & JOY_BUTTON)
2234   {
2235     if (PendingEvent())         /* got event */
2236     {
2237       Event event;
2238
2239       NextEvent(&event);
2240       HandleOtherEvents(&event);
2241
2242       Delay(10);
2243     }
2244   }
2245   return;
2246
2247   error_out:
2248
2249   ClearWindow();
2250   DrawText(SX + 16, SY + 6*32, "  JOYSTICK NOT  ", FS_BIG, FC_YELLOW);
2251   DrawText(SX,      SY + 7*32, "    AVAILABLE    ", FS_BIG, FC_YELLOW);
2252   BackToFront();
2253   Delay(2000);
2254   DrawSetupInputScreen();
2255 }
2256
2257 void HandleGameActions()
2258 {
2259   if (game_status != PLAYING)
2260     return;
2261
2262   if (local_player->LevelSolved)
2263     GameWon();
2264
2265   if (AllPlayersGone && !TAPE_IS_STOPPED(tape))
2266     TapeStop();
2267
2268   GameActions();
2269
2270   BackToFront();
2271 }
2272
2273 /* ---------- new screen button stuff -------------------------------------- */
2274
2275 /* graphic position and size values for buttons and scrollbars */
2276 #define SC_SCROLLBUTTON_XPOS            64
2277 #define SC_SCROLLBUTTON_YPOS            0
2278 #define SC_SCROLLBAR_XPOS               0
2279 #define SC_SCROLLBAR_YPOS               64
2280
2281 #define SC_SCROLLBUTTON_XSIZE           32
2282 #define SC_SCROLLBUTTON_YSIZE           32
2283
2284 #define SC_SCROLL_UP_XPOS               (SXSIZE - SC_SCROLLBUTTON_XSIZE)
2285 #define SC_SCROLL_UP_YPOS               SC_SCROLLBUTTON_YSIZE
2286 #define SC_SCROLL_DOWN_XPOS             SC_SCROLL_UP_XPOS
2287 #define SC_SCROLL_DOWN_YPOS             (SYSIZE - SC_SCROLLBUTTON_YSIZE)
2288 #define SC_SCROLL_VERTICAL_XPOS         SC_SCROLL_UP_XPOS
2289 #define SC_SCROLL_VERTICAL_YPOS   (SC_SCROLL_UP_YPOS + SC_SCROLLBUTTON_YSIZE)
2290 #define SC_SCROLL_VERTICAL_XSIZE        SC_SCROLLBUTTON_XSIZE
2291 #define SC_SCROLL_VERTICAL_YSIZE        (SYSIZE - 3 * SC_SCROLLBUTTON_YSIZE)
2292
2293 #define SC_BORDER_SIZE                  14
2294
2295 static struct
2296 {
2297   int xpos, ypos;
2298   int x, y;
2299   int gadget_id;
2300   char *infotext;
2301 } scrollbutton_info[NUM_SCREEN_SCROLLBUTTONS] =
2302 {
2303   {
2304     SC_SCROLLBUTTON_XPOS + 0 * SC_SCROLLBUTTON_XSIZE,   SC_SCROLLBUTTON_YPOS,
2305     SC_SCROLL_UP_XPOS,                                  SC_SCROLL_UP_YPOS,
2306     SCREEN_CTRL_ID_SCROLL_UP,
2307     "scroll level series up"
2308   },
2309   {
2310     SC_SCROLLBUTTON_XPOS + 1 * SC_SCROLLBUTTON_XSIZE,   SC_SCROLLBUTTON_YPOS,
2311     SC_SCROLL_DOWN_XPOS,                                SC_SCROLL_DOWN_YPOS,
2312     SCREEN_CTRL_ID_SCROLL_DOWN,
2313     "scroll level series down"
2314   }
2315 };
2316
2317 static struct
2318 {
2319   int xpos, ypos;
2320   int x, y;
2321   int width, height;
2322   int type;
2323   int gadget_id;
2324   char *infotext;
2325 } scrollbar_info[NUM_SCREEN_SCROLLBARS] =
2326 {
2327   {
2328     SC_SCROLLBAR_XPOS,                  SC_SCROLLBAR_YPOS,
2329     SX + SC_SCROLL_VERTICAL_XPOS,       SY + SC_SCROLL_VERTICAL_YPOS,
2330     SC_SCROLL_VERTICAL_XSIZE,           SC_SCROLL_VERTICAL_YSIZE,
2331     GD_TYPE_SCROLLBAR_VERTICAL,
2332     SCREEN_CTRL_ID_SCROLL_VERTICAL,
2333     "scroll level series vertically"
2334   }
2335 };
2336
2337 static void CreateScreenScrollbuttons()
2338 {
2339   Bitmap *gd_bitmap = pix[PIX_MORE];
2340   struct GadgetInfo *gi;
2341   unsigned long event_mask;
2342   int i;
2343
2344   for (i=0; i<NUM_SCREEN_SCROLLBUTTONS; i++)
2345   {
2346     int id = scrollbutton_info[i].gadget_id;
2347     int x, y, width, height;
2348     int gd_x1, gd_x2, gd_y1, gd_y2;
2349
2350     x = scrollbutton_info[i].x;
2351     y = scrollbutton_info[i].y;
2352
2353     event_mask = GD_EVENT_PRESSED | GD_EVENT_REPEATED;
2354
2355     x += SX;
2356     y += SY;
2357     width = SC_SCROLLBUTTON_XSIZE;
2358     height = SC_SCROLLBUTTON_YSIZE;
2359     gd_x1 = scrollbutton_info[i].xpos;
2360     gd_y1 = scrollbutton_info[i].ypos;
2361     gd_x2 = gd_x1;
2362     gd_y2 = gd_y1 + SC_SCROLLBUTTON_YSIZE;
2363
2364     gi = CreateGadget(GDI_CUSTOM_ID, id,
2365                       GDI_CUSTOM_TYPE_ID, i,
2366                       GDI_INFO_TEXT, scrollbutton_info[i].infotext,
2367                       GDI_X, x,
2368                       GDI_Y, y,
2369                       GDI_WIDTH, width,
2370                       GDI_HEIGHT, height,
2371                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
2372                       GDI_STATE, GD_BUTTON_UNPRESSED,
2373                       GDI_DESIGN_UNPRESSED, gd_bitmap, gd_x1, gd_y1,
2374                       GDI_DESIGN_PRESSED, gd_bitmap, gd_x2, gd_y2,
2375                       GDI_EVENT_MASK, event_mask,
2376                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
2377                       GDI_END);
2378
2379     if (gi == NULL)
2380       Error(ERR_EXIT, "cannot create gadget");
2381
2382     screen_gadget[id] = gi;
2383   }
2384 }
2385
2386 static void CreateScreenScrollbars()
2387 {
2388   int i;
2389
2390   for (i=0; i<NUM_SCREEN_SCROLLBARS; i++)
2391   {
2392     int id = scrollbar_info[i].gadget_id;
2393     Bitmap *gd_bitmap = pix[PIX_MORE];
2394     int gd_x1, gd_x2, gd_y1, gd_y2;
2395     struct GadgetInfo *gi;
2396     int items_max, items_visible, item_position;
2397     unsigned long event_mask;
2398     int num_page_entries = MAX_LEVEL_SERIES_ON_SCREEN - 1;
2399
2400 #if 0
2401     if (num_leveldirs <= MAX_LEVEL_SERIES_ON_SCREEN)
2402       num_page_entries = num_leveldirs;
2403     else
2404       num_page_entries = MAX_LEVEL_SERIES_ON_SCREEN - 1;
2405
2406     items_max = MAX(num_leveldirs, num_page_entries);
2407     items_visible = num_page_entries;
2408     item_position = 0;
2409 #else
2410     items_max = num_page_entries;
2411     items_visible = num_page_entries;
2412     item_position = 0;
2413 #endif
2414
2415     event_mask = GD_EVENT_MOVING | GD_EVENT_OFF_BORDERS;
2416
2417     gd_x1 = scrollbar_info[i].xpos;
2418     gd_x2 = gd_x1 + scrollbar_info[i].width;
2419     gd_y1 = scrollbar_info[i].ypos;
2420     gd_y2 = scrollbar_info[i].ypos;
2421
2422     gi = CreateGadget(GDI_CUSTOM_ID, id,
2423                       GDI_CUSTOM_TYPE_ID, i,
2424                       GDI_INFO_TEXT, scrollbar_info[i].infotext,
2425                       GDI_X, scrollbar_info[i].x,
2426                       GDI_Y, scrollbar_info[i].y,
2427                       GDI_WIDTH, scrollbar_info[i].width,
2428                       GDI_HEIGHT, scrollbar_info[i].height,
2429                       GDI_TYPE, scrollbar_info[i].type,
2430                       GDI_SCROLLBAR_ITEMS_MAX, items_max,
2431                       GDI_SCROLLBAR_ITEMS_VISIBLE, items_visible,
2432                       GDI_SCROLLBAR_ITEM_POSITION, item_position,
2433                       GDI_STATE, GD_BUTTON_UNPRESSED,
2434                       GDI_DESIGN_UNPRESSED, gd_bitmap, gd_x1, gd_y1,
2435                       GDI_DESIGN_PRESSED, gd_bitmap, gd_x2, gd_y2,
2436                       GDI_BORDER_SIZE, SC_BORDER_SIZE,
2437                       GDI_EVENT_MASK, event_mask,
2438                       GDI_CALLBACK_ACTION, HandleScreenGadgets,
2439                       GDI_END);
2440
2441     if (gi == NULL)
2442       Error(ERR_EXIT, "cannot create gadget");
2443
2444     screen_gadget[id] = gi;
2445   }
2446 }
2447
2448 void CreateScreenGadgets()
2449 {
2450   CreateScreenScrollbuttons();
2451   CreateScreenScrollbars();
2452 }
2453
2454 void MapChooseLevelGadgets()
2455 {
2456   int num_leveldirs = numLevelDirInfoInGroup(leveldir_current);
2457   int i;
2458
2459   if (num_leveldirs <= MAX_LEVEL_SERIES_ON_SCREEN)
2460     return;
2461
2462   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2463     MapGadget(screen_gadget[i]);
2464 }
2465
2466 void UnmapChooseLevelGadgets()
2467 {
2468   int i;
2469
2470   for (i=0; i<NUM_SCREEN_GADGETS; i++)
2471     UnmapGadget(screen_gadget[i]);
2472 }
2473
2474 static void HandleScreenGadgets(struct GadgetInfo *gi)
2475 {
2476   int id = gi->custom_id;
2477
2478   if (game_status != CHOOSELEVEL)
2479     return;
2480
2481   switch (id)
2482   {
2483     case SCREEN_CTRL_ID_SCROLL_UP:
2484       HandleChooseLevel(SX,SY + 32, 0,0, MB_MENU_MARK);
2485       break;
2486
2487     case SCREEN_CTRL_ID_SCROLL_DOWN:
2488       HandleChooseLevel(SX,SY + SYSIZE - 32, 0,0, MB_MENU_MARK);
2489       break;
2490
2491     case SCREEN_CTRL_ID_SCROLL_VERTICAL:
2492       HandleChooseLevel(0,0, 999,gi->event.item_position, MB_MENU_INITIALIZE);
2493       break;
2494
2495     default:
2496       break;
2497   }
2498 }