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