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