90305d7e4adfdfd28cecda7236d7fc45e803413f
[rocksndiamonds.git] / src / screens.c
1 /***********************************************************
2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
3 *----------------------------------------------------------*
4 *  ©1995 Artsoft Development                               *
5 *        Holger Schemel                                    *
6 *        33659 Bielefeld-Senne                             *
7 *        Telefon: (0521) 493245                            *
8 *        eMail: aeglos@valinor.owl.de                      *
9 *               aeglos@uni-paderborn.de                    *
10 *               q99492@pbhrzx.uni-paderborn.de             *
11 *----------------------------------------------------------*
12 *  screens.c                                               *
13 ***********************************************************/
14
15 #include "screens.h"
16 #include "events.h"
17 #include "sound.h"
18 #include "game.h"
19 #include "tools.h"
20 #include "editor.h"
21 #include "misc.h"
22 #include "files.h"
23 #include "buttons.h"
24 #include "tape.h"
25 #include "joystick.h"
26 #include "cartoons.h"
27
28 #ifdef MSDOS
29 extern unsigned char get_ascii(KeySym);
30 #endif
31
32 void DrawHeadline()
33 {
34   int x1 = SX+(SXSIZE - strlen(GAMETITLE_STRING) * FONT1_XSIZE) / 2;
35   int y1 = SY+8;
36   int x2 = SX+(SXSIZE - strlen(COPYRIGHT_STRING) * FONT2_XSIZE) / 2;
37   int y2 = SY+46;
38
39   DrawText(x1,y1, GAMETITLE_STRING, FS_BIG,FC_YELLOW);
40   DrawText(x2,y2, COPYRIGHT_STRING, FS_SMALL,FC_RED);
41 }
42
43 void DrawMainMenu()
44 {
45   int i;
46
47   FadeSounds();
48   GetPlayerConfig();
49   LoadLevel(level_nr);
50
51   ClearWindow();
52   DrawHeadline();
53   DrawText(SX+32, SY+64, "Name:",FS_BIG,FC_GREEN);
54   DrawText(SX+192,SY+64, player.alias_name,FS_BIG,FC_RED);
55   DrawText(SX+32, SY+96, "Level:",FS_BIG,FC_GREEN);
56   DrawText(SX+352,SY+96, int2str(level_nr,3),FS_BIG,
57            (level_nr<leveldir[leveldir_nr].levels ? FC_RED : FC_YELLOW));
58   DrawText(SX+32, SY+128,"Hall Of Fame",FS_BIG,FC_GREEN);
59   DrawText(SX+32, SY+160,"Level Creator",FS_BIG,FC_GREEN);
60   DrawText(SY+32, SY+192,"Info Screen",FS_BIG,FC_GREEN);
61   DrawText(SX+32, SY+224,"Start Game",FS_BIG,FC_GREEN);
62   DrawText(SX+32, SY+256,"Setup",FS_BIG,FC_GREEN);
63   DrawText(SX+32, SY+288,"Quit",FS_BIG,FC_GREEN);
64
65   DrawMicroLevel(MICROLEV_XPOS,MICROLEV_YPOS);
66
67   for(i=2;i<10;i++)
68     DrawGraphic(0,i,GFX_KUGEL_BLAU);
69   DrawGraphic(10,3,GFX_PFEIL_L);
70   DrawGraphic(14,3,GFX_PFEIL_R);
71
72   DrawText(SX+54+16,SY+326,"A Game by Artsoft Development",FS_SMALL,FC_BLUE);
73   DrawText(SX+40+16,SY+344,"Graphics: Deluxe Paint IV Amiga",
74            FS_SMALL,FC_BLUE);
75   DrawText(SX+60+16,SY+362,"Sounds: AudioMaster IV Amiga",
76            FS_SMALL,FC_BLUE);
77
78   FadeToFront();
79   InitAnimation();
80   HandleMainMenu(0,0,0,0,MB_MENU_INITIALIZE);
81
82   TapeStop();
83   if (TAPE_IS_EMPTY(tape))
84     LoadLevelTape(level_nr);
85   DrawCompleteVideoDisplay();
86
87   OpenDoor(DOOR_CLOSE_1 | DOOR_OPEN_2);
88
89   ClearEventQueue();
90   XAutoRepeatOn(display);
91 }
92
93 void HandleMainMenu(int mx, int my, int dx, int dy, int button)
94 {
95   static int choice = 3;
96   static int redraw = TRUE;
97   int x = (mx+32-SX)/32, y = (my+32-SY)/32;
98
99   if (redraw || button == MB_MENU_INITIALIZE)
100   {
101     DrawGraphic(0,choice-1,GFX_KUGEL_ROT);
102     redraw = FALSE;
103   }
104
105   if (button == MB_MENU_INITIALIZE)
106     return;
107
108   if (dx || dy)
109   {
110     if (dx && choice==4)
111     {
112       x = (dx<0 ? 11 : 15);
113       y = 4;
114     }
115     else if (dy)
116     {
117       x = 1;
118       y = choice+dy;
119     }
120     else
121       x = y = 0;
122
123     if (y<3)
124       y = 3;
125     else if (y>10)
126       y = 10;
127   }
128
129   if (!mx && !my && !dx && !dy)
130   {
131     x = 1;
132     y = choice;
133   }
134
135   if (y==4 && ((x==11 && level_nr>0) ||
136                (x==15 && level_nr<leveldir[leveldir_nr].levels)) &&
137       button)
138   {
139     static long level_delay = 0;
140     int step = (button==1 ? 1 : button==2 ? 5 : 10);
141     int new_level_nr, old_level_nr = level_nr;
142
143     new_level_nr = level_nr + (x==11 ? -step : +step);
144     if (new_level_nr<0)
145       new_level_nr = 0;
146     if (new_level_nr>leveldir[leveldir_nr].levels-1)
147       new_level_nr = leveldir[leveldir_nr].levels-1;
148
149     if (old_level_nr==new_level_nr || !DelayReached(&level_delay,15))
150       goto out;
151
152     level_nr = new_level_nr;
153
154     if (level_nr>player.handicap)
155       level_nr = player.handicap;
156
157     DrawTextExt(drawto,gc,SX+352,SY+96, int2str(level_nr,3), FS_BIG,FC_RED);
158     DrawTextExt(window,gc,SX+352,SY+96, int2str(level_nr,3), FS_BIG,FC_RED);
159
160     LoadLevel(level_nr);
161     DrawMicroLevel(MICROLEV_XPOS,MICROLEV_YPOS);
162
163     TapeErase();
164     LoadLevelTape(level_nr);
165     DrawCompleteVideoDisplay();
166
167     /* needed because DrawMicroLevel() takes some time */
168     BackToFront();
169     XSync(display,FALSE);
170     DelayReached(&level_delay,0);       /* reset delay counter */
171   }
172   else if (x==1 && y>=3 && y<=10)
173   {
174     if (button)
175     {
176       if (y!=choice)
177       {
178         DrawGraphic(0,y-1,GFX_KUGEL_ROT);
179         DrawGraphic(0,choice-1,GFX_KUGEL_BLAU);
180       }
181       choice = y;
182     }
183     else
184     {
185       if (y==3)
186       {
187         game_status = TYPENAME;
188         HandleTypeName(strlen(player.alias_name),0);
189       }
190       else if (y==4)
191       {
192         if (num_leveldirs)
193         {
194           game_status = CHOOSELEVEL;
195           SavePlayerInfo(PLAYER_LEVEL);
196           DrawChooseLevel();
197         }
198       }
199       else if (y==5)
200       {
201         game_status = HALLOFFAME;
202         DrawHallOfFame(-1);
203       }
204       else if (y==6)
205       {
206         game_status = LEVELED;
207         if (leveldir[leveldir_nr].readonly)
208           AreYouSure("This level is read only !",AYS_CONFIRM);
209         DrawLevelEd();
210       }
211       else if (y==7)
212       {
213         game_status = HELPSCREEN;
214         DrawHelpScreen();
215       }
216       else if (y==8)
217       {
218         if (autorecord_on)
219           TapeStartRecording();
220
221         game_status = PLAYING;
222         InitGame();
223       }
224       else if (y==9)
225       {
226         game_status = SETUP;
227         DrawSetupScreen();
228       }
229       else if (y==10)
230       {
231         SavePlayerInfo(PLAYER_LEVEL);
232         if (AreYouSure("Do you really want to quit ?",AYS_ASK|AYS_STAY_CLOSED))
233           game_status = EXITGAME;
234       }
235
236       if (!button)
237         redraw = TRUE;
238     }
239   }
240   BackToFront();
241
242   out:
243
244   if (game_status==MAINMENU)
245     DoAnimation();
246 }
247
248 #define MAX_HELPSCREEN_ELS      10
249 #define HA_NEXT                 -999
250 #define HA_END                  -1000
251
252 static long helpscreen_state;
253 static int helpscreen_step[MAX_HELPSCREEN_ELS];
254 static int helpscreen_frame[MAX_HELPSCREEN_ELS];
255 static int helpscreen_delay[MAX_HELPSCREEN_ELS];
256 static int helpscreen_action[] =
257 {
258   GFX_SPIELER_DOWN,4,2,
259   GFX_SPIELER_UP,4,2,
260   GFX_SPIELER_LEFT,4,2,
261   GFX_SPIELER_RIGHT,4,2,
262   GFX_SPIELER_PUSH_LEFT,4,2,
263   GFX_SPIELER_PUSH_RIGHT,4,2,                                   HA_NEXT,
264   GFX_ERDREICH,1,100,                                           HA_NEXT,
265   GFX_LEERRAUM,1,100,                                           HA_NEXT,
266   GFX_MORAST_LEER,1,100,                                        HA_NEXT,
267   GFX_BETON,1,100,                                              HA_NEXT,
268   GFX_MAUERWERK,1,100,                                          HA_NEXT,
269   GFX_MAUER_R1,3,4, GFX_MAUERWERK,1,20, GFX_LEERRAUM,1,10,
270   GFX_MAUER_L1,3,4, GFX_MAUERWERK,1,20, GFX_LEERRAUM,1,10,      HA_NEXT,
271   GFX_UNSICHTBAR,1,100,                                         HA_NEXT,
272   GFX_FELSBODEN,1,100,                                          HA_NEXT,
273   GFX_CHAR_A,30,4, GFX_CHAR_AUSRUF,32,4,                        HA_NEXT,
274   GFX_EDELSTEIN,2,5,                                            HA_NEXT,
275   GFX_DIAMANT,2,5,                                              HA_NEXT,
276   GFX_EDELSTEIN_BD,2,5,                                         HA_NEXT,
277   GFX_EDELSTEIN_GELB,2,5, GFX_EDELSTEIN_ROT,2,5,
278   GFX_EDELSTEIN_LILA,2,5,                                       HA_NEXT,
279   GFX_FELSBROCKEN,4,5,                                          HA_NEXT,
280   GFX_BOMBE,1,50, GFX_EXPLOSION,8,1, GFX_LEERRAUM,1,10,         HA_NEXT,
281   GFX_KOKOSNUSS,1,50, GFX_CRACKINGNUT,3,1, GFX_EDELSTEIN,1,10,  HA_NEXT,
282   GFX_ERZ_EDEL,1,50, GFX_EXPLOSION,8,1, GFX_EDELSTEIN,1,10,     HA_NEXT,
283   GFX_ERZ_DIAM,1,50, GFX_EXPLOSION,8,1, GFX_DIAMANT,1,10,       HA_NEXT,
284   GFX_ERZ_EDEL_BD,1,50, GFX_EXPLOSION,8,1,GFX_EDELSTEIN_BD,1,10,HA_NEXT,
285   GFX_ERZ_EDEL_GELB,1,50, GFX_EXPLOSION,8,1,
286   GFX_EDELSTEIN_GELB,1,10, GFX_ERZ_EDEL_ROT,1,50,
287   GFX_EXPLOSION,8,1, GFX_EDELSTEIN_ROT,1,10,
288   GFX_ERZ_EDEL_LILA,1,50, GFX_EXPLOSION,8,1,
289   GFX_EDELSTEIN_LILA,1,10,                                      HA_NEXT,
290   GFX_GEBLUBBER,4,4,                                            HA_NEXT,
291   GFX_SCHLUESSEL1,4,25,                                         HA_NEXT,
292   GFX_PFORTE1,4,25,                                             HA_NEXT,
293   GFX_PFORTE1X,4,25,                                            HA_NEXT,
294   GFX_DYNAMIT_AUS,1,100,                                        HA_NEXT,
295   GFX_DYNAMIT,7,6, GFX_EXPLOSION,8,1, GFX_LEERRAUM,1,10,        HA_NEXT,
296   GFX_DYNABOMB+0,4,3, GFX_DYNABOMB+3,1,3, GFX_DYNABOMB+2,1,3,
297   GFX_DYNABOMB+1,1,3, GFX_DYNABOMB+0,1,3, GFX_EXPLOSION,8,1,
298   GFX_LEERRAUM,1,10,                                            HA_NEXT,
299   GFX_DYNABOMB_NR,1,100,                                        HA_NEXT,
300   GFX_DYNABOMB_SZ,1,100,                                        HA_NEXT,
301   GFX_FLIEGER+4,1,3, GFX_FLIEGER+0,1,3, GFX_FLIEGER+4,1,3,
302   GFX_FLIEGER+5,1,3, GFX_FLIEGER+1,1,3, GFX_FLIEGER+5,1,3,
303   GFX_FLIEGER+6,1,3, GFX_FLIEGER+2,1,3, GFX_FLIEGER+6,1,3,
304   GFX_FLIEGER+7,1,3, GFX_FLIEGER+3,1,3, GFX_FLIEGER+7,1,3,      HA_NEXT,
305   GFX_KAEFER+4,1,1, GFX_KAEFER+0,1,1, GFX_KAEFER+4,1,1,
306   GFX_KAEFER+5,1,1, GFX_KAEFER+1,1,1, GFX_KAEFER+5,1,1,
307   GFX_KAEFER+6,1,1, GFX_KAEFER+2,1,1, GFX_KAEFER+6,1,1,
308   GFX_KAEFER+7,1,1, GFX_KAEFER+3,1,1, GFX_KAEFER+7,1,1,         HA_NEXT,
309   GFX_BUTTERFLY,2,2,                                            HA_NEXT,
310   GFX_FIREFLY,2,2,                                              HA_NEXT,
311   GFX_PACMAN+0,1,3, GFX_PACMAN+4,1,2, GFX_PACMAN+0,1,3,
312   GFX_PACMAN+1,1,3, GFX_PACMAN+5,1,2, GFX_PACMAN+1,1,3,
313   GFX_PACMAN+2,1,3, GFX_PACMAN+6,1,2, GFX_PACMAN+2,1,3,
314   GFX_PACMAN+3,1,3, GFX_PACMAN+7,1,2, GFX_PACMAN+3,1,3,         HA_NEXT,
315   GFX_MAMPFER+0,4,1, GFX_MAMPFER+3,1,1, GFX_MAMPFER+2,1,1,
316   GFX_MAMPFER+1,1,1, GFX_MAMPFER+0,1,1,                         HA_NEXT,
317   GFX_MAMPFER2+0,4,1, GFX_MAMPFER2+3,1,1, GFX_MAMPFER2+2,1,1,
318   GFX_MAMPFER2+1,1,1, GFX_MAMPFER2+0,1,1,                       HA_NEXT,
319   GFX_ROBOT+0,4,1, GFX_ROBOT+3,1,1, GFX_ROBOT+2,1,1,
320   GFX_ROBOT+1,1,1, GFX_ROBOT+0,1,1,                             HA_NEXT,
321   GFX_MAULWURF_DOWN,4,2,
322   GFX_MAULWURF_UP,4,2,
323   GFX_MAULWURF_LEFT,4,2,
324   GFX_MAULWURF_RIGHT,4,2,                                       HA_NEXT,
325   GFX_PINGUIN_DOWN,4,2,
326   GFX_PINGUIN_UP,4,2,
327   GFX_PINGUIN_LEFT,4,2,
328   GFX_PINGUIN_RIGHT,4,2,                                        HA_NEXT,
329   GFX_SCHWEIN_DOWN,4,2,
330   GFX_SCHWEIN_UP,4,2,
331   GFX_SCHWEIN_LEFT,4,2,
332   GFX_SCHWEIN_RIGHT,4,2,                                        HA_NEXT,
333   GFX_DRACHE_DOWN,4,2,
334   GFX_DRACHE_UP,4,2,
335   GFX_DRACHE_LEFT,4,2,
336   GFX_DRACHE_RIGHT,4,2,                                         HA_NEXT,
337   GFX_SONDE_START,8,1,                                          HA_NEXT,
338   GFX_ABLENK,4,1,                                               HA_NEXT,
339   GFX_BIRNE_AUS,1,25, GFX_BIRNE_EIN,1,25,                       HA_NEXT,
340   GFX_ZEIT_VOLL,1,25, GFX_ZEIT_LEER,1,25,                       HA_NEXT,
341   GFX_TROPFEN,1,25, GFX_AMOEBING,4,1, GFX_AMOEBE_LEBT,1,10,     HA_NEXT,
342   GFX_AMOEBE_TOT+2,2,50, GFX_AMOEBE_TOT,2,50,                   HA_NEXT,
343   GFX_AMOEBE_LEBT,4,40,                                         HA_NEXT,
344   GFX_AMOEBE_LEBT,1,10, GFX_AMOEBING,4,2,                       HA_NEXT,
345   GFX_AMOEBE_LEBT,1,25, GFX_AMOEBE_TOT,1,25, GFX_EXPLOSION,8,1,
346   GFX_DIAMANT,1,10,                                             HA_NEXT,
347   GFX_LIFE,1,100,                                               HA_NEXT,
348   GFX_LIFE_ASYNC,1,100,                                         HA_NEXT,
349   GFX_SIEB_LEER,4,2,                                            HA_NEXT,
350   GFX_SIEB2_LEER,4,2,                                           HA_NEXT,
351   GFX_AUSGANG_ZU,1,100, GFX_AUSGANG_ACT,4,2,
352   GFX_AUSGANG_AUF+0,4,2, GFX_AUSGANG_AUF+3,1,2,
353   GFX_AUSGANG_AUF+2,1,2, GFX_AUSGANG_AUF+1,1,2,                 HA_NEXT,
354   GFX_AUSGANG_AUF+0,4,2, GFX_AUSGANG_AUF+3,1,2,
355   GFX_AUSGANG_AUF+2,1,2, GFX_AUSGANG_AUF+1,1,2,                 HA_NEXT,
356   HA_END
357 };
358 static char *helpscreen_eltext[][2] =
359 {
360  {"THE HERO:",                          "(Is _this_ guy good old Rockford?)"},
361  {"Normal sand:",                       "You can dig through it"},
362  {"Empty field:",                       "You can walk through it"},
363  {"Quicksand: You cannot pass it,",     "but rocks can fall though it"},
364  {"Massive Wall:",                      "Nothing can go through it"},
365  {"Normal Wall: You can't go through",  "it, but you can bomb it away"},
366  {"Growing Wall: Grows to the left or", "right if there is an empty field"},
367  {"Invisible Wall: Behaves like normal","wall, but is invisible"},
368  {"Old Wall: Like normal wall, but",    "some things can fall down from it"},
369  {"Letter Wall: Looks like a letter,",  "behaves like a normal wall"},
370  {"Emerald: You must collect enough of","them to finish a level"},
371  {"Diamond: Counts as 3 emeralds, but", "can be destroyed by rocks"},
372  {"Diamond (BD style): Counts like one","emerald and behaves a bit different"},
373  {"Colorful Gems:",                     "Seem to behave like Emeralds"},
374  {"Rock: Smashes several things;",      "Can be moved by the player"},
375  {"Bomb: You can move it, but be",      "careful when dropping it"},
376  {"Nut: Throw a rock on it to open it;","Each nut contains an emerald"},
377  {"Wall with an emerald inside:",       "Bomb the wall away to get it"},
378  {"Wall with a diamond inside:",        "Bomb the wall away to get it"},
379  {"Wall with BD style diamond inside:", "Bomb the wall away to get it"},
380  {"Wall with colorful gem inside:",     "Bomb the wall away to get it"},
381  {"Acid: Things that fall in are gone", "forever (including our hero)"},
382  {"Key: Opens the door that has the",   "same color (red/yellow/green/blue)"},
383  {"Door: Can be opened by the key",     "with the same color"},
384  {"Door: You have to find out the",     "right color of the key for it"},
385  {"Dynamite: Collect it and use it to", "destroy walls or kill enemies"},
386  {"Dynamite: This one explodes after",  "a few seconds"},
387  {"Dyna Bomb: Explodes in 4 directions","with variable explosion size"},
388  {"Dyna Bomb: Increases the number of", "dyna bombs available at a time"},
389  {"Dyna Bomb: Increases the size of",   "explosion of dyna bombs"},
390  {"Spaceship: Moves at the left side",  "of walls; don't touch it!"},
391  {"Bug: Moves at the right side",       "of walls; don't touch it!"},
392  {"Butterfly: Moves at the right side", "of walls; don't touch it!"},
393  {"Firefly: Moves at the left side",    "of walls; don't touch it!"},
394  {"Pacman: Eats the amoeba and you,",   "if you're not careful"},
395  {"Cruncher: Eats diamonds and you,",   "if you're not careful"},
396  {"Cruncher (BD style):",               "Eats almost everything"},
397  {"Robot: Tries to kill the player",    ""},
398  {"The mole: You must guide him savely","to the exit; he will follow you"},
399  {"The penguin: Guide him to the exit,","but keep him away from monsters!"},
400  {"The Pig: Harmless, but eats all",    "gems it can get"},
401  {"The Dragon: Breathes fire,",         "especially to some monsters"},
402  {"Sonde: Follows you everywhere;",     "harmless, but may block your way"},
403  {"Magic Wheel: Touch it to get rid of","the robots for some seconds"},
404  {"Light Bulb: All of them must be",    "switched on to finish a level"},
405  {"Extra Time Orb: Adds some seconds",  "to the time available for the level"},
406  {"Amoeba Drop: Grows to an amoeba on", "the ground - don't touch it"},
407  {"Dead Amoeba: Does not grow, but",    "can still kill bugs and spaceships"},
408  {"Normal Amoeba: Grows through empty", "fields, sand and quicksand"},
409  {"Dropping Amoeba: This one makes",    "drops that grow to a new amoeba"},
410  {"Living Amoeba (BD style): Contains", "other element, when surrounded"},
411  {"Game Of Life: Behaves like the well","known 'Game Of Life' (2333 style)"},
412  {"Biomaze: A bit like the 'Game Of",   "Life', but builds crazy mazes"},
413  {"Magic Wall: Changes rocks, emeralds","and diamonds when they pass it"},
414  {"Magic Wall (BD style):",             "Changes rocks and BD style diamonds"},
415  {"Exit door: Opens if you have enough","emeralds to finish the level"},
416  {"Open exit door: Enter here to leave","the level and exit the actual game"},
417 };
418 static int num_helpscreen_els = sizeof(helpscreen_eltext)/(2*sizeof(char *));
419
420 static char *helpscreen_music[][3] =
421 {
422   { "Alchemy",                  "Ian Boddy",            "Drive" },
423   { "The Chase",                "Propaganda",           "A Secret Wish" },
424   { "Network 23",               "Tangerine Dream",      "Exit" },
425   { "Czardasz",                 "Robert Pieculewicz",   "Czardasz" },
426   { "21st Century Common Man",  "Tangerine Dream",      "Tyger" },
427   { "Voyager",                  "The Alan Parsons Project","Pyramid" },
428   { "Twilight Painter",         "Tangerine Dream",      "Heartbreakers" }
429 };
430 static int helpscreen_musicpos;
431
432 void DrawHelpScreenElAction(int start)
433 {
434   int i = 0, j = 0;
435   int frame, graphic;
436   int xstart = SX+16, ystart = SY+64+2*32, ystep = TILEY+4;
437
438   while(helpscreen_action[j] != HA_END)
439   {
440     if (i>=start+MAX_HELPSCREEN_ELS || i>=num_helpscreen_els)
441       break;
442     else if (i<start || helpscreen_delay[i-start])
443     {
444       if (i>=start && helpscreen_delay[i-start])
445         helpscreen_delay[i-start]--;
446
447       while(helpscreen_action[j] != HA_NEXT)
448         j++;
449       j++;
450       i++;
451       continue;
452     }
453
454     j += 3*helpscreen_step[i-start];
455     graphic = helpscreen_action[j++];
456
457     if (helpscreen_frame[i-start])
458     {
459       frame = helpscreen_action[j++] - helpscreen_frame[i-start];
460       helpscreen_frame[i-start]--;
461     }
462     else
463     {
464       frame = 0;
465       helpscreen_frame[i-start] = helpscreen_action[j++]-1;
466     }
467
468     helpscreen_delay[i-start] = helpscreen_action[j++] - 1;
469
470     if (helpscreen_action[j] == HA_NEXT)
471     {
472       if (!helpscreen_frame[i-start])
473         helpscreen_step[i-start] = 0;
474     }
475     else
476     {
477       if (!helpscreen_frame[i-start])
478         helpscreen_step[i-start]++;
479       while(helpscreen_action[j] != HA_NEXT)
480         j++;
481     }
482     j++;
483
484     DrawGraphicExtHiRes(drawto,gc,xstart,ystart+(i-start)*ystep,
485                         graphic+frame);
486     i++;
487   }
488
489   for(i=2;i<16;i++)
490   {
491     MarkTileDirty(0,i);
492     MarkTileDirty(1,i);
493   }
494 }
495
496 void DrawHelpScreenElText(int start)
497 {
498   int i;
499   int xstart = SX+56, ystart = SY+65+2*32, ystep = TILEY+4;
500   char text[FULL_SXSIZE/FONT2_XSIZE+10];
501
502   ClearWindow();
503   DrawHeadline();
504
505   sprintf(text,"The game elements:");
506   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+100,
507            text,FS_SMALL,FC_GREEN);
508
509   for(i=start;i<start+MAX_HELPSCREEN_ELS && i<num_helpscreen_els;i++)
510   {
511     DrawText(xstart,ystart+(i-start)*ystep+(*helpscreen_eltext[i][1] ? 0 : 8),
512              helpscreen_eltext[i][0],FS_SMALL,FC_YELLOW);
513     DrawText(xstart,ystart+(i-start)*ystep+16,
514              helpscreen_eltext[i][1],FS_SMALL,FC_YELLOW);
515   }
516
517   sprintf(text,"Press any key or button for next page");
518   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+SYSIZE-20,
519            text,FS_SMALL,FC_BLUE);
520 }
521
522 void DrawHelpScreenMusicText(int num)
523 {
524   int ystart = 150, ystep = 30;
525   char text[FULL_SXSIZE/FONT2_XSIZE+10];
526
527   FadeSounds();
528   ClearWindow();
529   DrawHeadline();
530
531   sprintf(text,"The game background music loops:");
532   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+100,
533            text,FS_SMALL,FC_GREEN);
534
535   sprintf(text,"Excerpt from");
536   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+0*ystep,
537            text,FS_SMALL,FC_YELLOW);
538   sprintf(text,"%c%s%c",'\"',helpscreen_music[num][0],'\"');
539   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+1*ystep,
540            text,FS_SMALL,FC_RED);
541   sprintf(text,"by");
542   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+2*ystep,
543            text,FS_SMALL,FC_YELLOW);
544   sprintf(text,"%s",helpscreen_music[num][1]);
545   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+3*ystep,
546            text,FS_SMALL,FC_RED);
547   sprintf(text,"from the album");
548   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+4*ystep,
549            text,FS_SMALL,FC_YELLOW);
550   sprintf(text,"%c%s%c",'\"',helpscreen_music[num][2],'\"');
551   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+5*ystep,
552            text,FS_SMALL,FC_RED);
553
554   sprintf(text,"Press any key or button for next page");
555   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+SYSIZE-20,
556            text,FS_SMALL,FC_BLUE);
557
558   PlaySoundLoop(background_loop[num]);
559 }
560
561 void DrawHelpScreenCreditsText()
562 {
563   int ystart = 150, ystep = 30;
564   char text[FULL_SXSIZE/FONT2_XSIZE+10];
565
566   FadeSounds();
567   ClearWindow();
568   DrawHeadline();
569
570   sprintf(text,"Program information:");
571   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+100,
572            text,FS_SMALL,FC_GREEN);
573
574   sprintf(text,"This game is Freeware!");
575   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+0*ystep,
576            text,FS_SMALL,FC_YELLOW);
577   sprintf(text,"If you like it, send e-mail to:");
578   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+1*ystep,
579            text,FS_SMALL,FC_YELLOW);
580   sprintf(text,"aeglos@valinor.owl.de");
581   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+2*ystep,
582            text,FS_SMALL,FC_RED);
583   sprintf(text,"or SnailMail to:");
584   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+3*ystep,
585            text,FS_SMALL,FC_YELLOW);
586   sprintf(text,"Holger Schemel");
587   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+4*ystep,
588            text,FS_SMALL,FC_RED);
589   sprintf(text,"Sennehof 28");
590   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+4*ystep+20,
591            text,FS_SMALL,FC_RED);
592   sprintf(text,"33659 Bielefeld");
593   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+4*ystep+40,
594            text,FS_SMALL,FC_RED);
595   sprintf(text,"Germany");
596   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+4*ystep+60,
597            text,FS_SMALL,FC_RED);
598
599   sprintf(text,"If you have created new levels,");
600   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+7*ystep,
601            text,FS_SMALL,FC_YELLOW);
602   sprintf(text,"send them to me to include them!");
603   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+8*ystep,
604            text,FS_SMALL,FC_YELLOW);
605   sprintf(text,":-)");
606   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+ystart+9*ystep,
607            text,FS_SMALL,FC_YELLOW);
608
609   sprintf(text,"Press any key or button for main menu");
610   DrawText(SX+(SXSIZE-strlen(text)*FONT2_XSIZE)/2,SY+SYSIZE-20,
611            text,FS_SMALL,FC_BLUE);
612 }
613
614 void DrawHelpScreen()
615 {
616   int i;
617
618   CloseDoor(DOOR_CLOSE_2);
619
620   for(i=0;i<MAX_HELPSCREEN_ELS;i++)
621     helpscreen_step[i] = helpscreen_frame[i] = helpscreen_delay[i] = 0;
622   helpscreen_musicpos = 0;
623   helpscreen_state = 0;
624   DrawHelpScreenElText(0);
625   DrawHelpScreenElAction(0);
626
627   FadeToFront();
628   InitAnimation();
629   PlaySoundLoop(SND_RHYTHMLOOP);
630 }
631
632 void HandleHelpScreen(int button)
633 {
634   static long hs_delay = 0;
635   int num_helpscreen_els_pages =
636     (num_helpscreen_els + MAX_HELPSCREEN_ELS-1) / MAX_HELPSCREEN_ELS;
637   int button_released = !button;
638   int i;
639
640   if (button_released)
641   {
642     if (helpscreen_state<num_helpscreen_els_pages-1)
643     {
644       for(i=0;i<MAX_HELPSCREEN_ELS;i++)
645         helpscreen_step[i] = helpscreen_frame[i] = helpscreen_delay[i] = 0;
646       helpscreen_state++;
647       DrawHelpScreenElText(helpscreen_state*MAX_HELPSCREEN_ELS);
648       DrawHelpScreenElAction(helpscreen_state*MAX_HELPSCREEN_ELS);
649     }
650     else if (helpscreen_state<num_helpscreen_els_pages+num_bg_loops-1)
651     {
652       helpscreen_state++;
653       DrawHelpScreenMusicText(helpscreen_state-num_helpscreen_els_pages);
654     }
655     else if (helpscreen_state==num_helpscreen_els_pages+num_bg_loops-1)
656     {
657       helpscreen_state++;
658       DrawHelpScreenCreditsText();
659     }
660     else
661     {
662       FadeSounds();
663       DrawMainMenu();
664       game_status = MAINMENU;
665     }
666   }
667   else
668   {
669     if (DelayReached(&hs_delay,GAME_FRAME_DELAY))
670     {
671       if (helpscreen_state<num_helpscreen_els_pages)
672         DrawHelpScreenElAction(helpscreen_state*MAX_HELPSCREEN_ELS);
673     }
674     DoAnimation();
675   }
676
677   BackToFront();
678 }
679
680 void CheckCheat()
681 {
682   int old_handicap = player.handicap;
683
684   if (!strcmp(player.alias_name,"Artsoft"))
685     player.handicap = leveldir[leveldir_nr].levels-1;
686
687   if (player.handicap != old_handicap)
688   {
689     SavePlayerInfo(PLAYER_LEVEL);
690     level_nr = player.handicap;
691   }
692 }
693
694 void HandleTypeName(int newxpos, KeySym key)
695 {
696   static int xpos = 0, ypos = 2;
697   unsigned char ascii;
698
699   if (newxpos)
700   {
701     xpos = newxpos;
702     DrawText(SX+6*32,SY+ypos*32,player.alias_name,FS_BIG,FC_YELLOW);
703     DrawGraphic(xpos+6,ypos,GFX_KUGEL_ROT);
704     return;
705   }
706
707 #ifndef MSDOS
708   if ((key>=XK_A && key<=XK_Z) || (key>=XK_a && key<=XK_z && 
709       xpos<MAX_NAMELEN-1))
710   {
711     if (key>=XK_A && key<=XK_Z)
712       ascii = 'A'+(char)(key-XK_A);
713     if (key>=XK_a && key<=XK_z)
714       ascii = 'a'+(char)(key-XK_a);
715 #else
716   if((ascii = get_ascii(key)) && xpos<MAX_NAMELEN-1)
717   {
718 #endif
719     player.alias_name[xpos] = ascii;
720     player.alias_name[xpos+1] = 0;
721     xpos++;
722     DrawTextExt(drawto,gc,SX+6*32,SY+ypos*32,
723                 player.alias_name,FS_BIG,FC_YELLOW);
724     DrawTextExt(window,gc,SX+6*32,SY+ypos*32,
725                 player.alias_name,FS_BIG,FC_YELLOW);
726     DrawGraphic(xpos+6,ypos,GFX_KUGEL_ROT);
727   }
728   else if ((key==XK_Delete || key==XK_BackSpace) && xpos>0)
729   {
730     xpos--;
731     player.alias_name[xpos] = 0;
732     DrawGraphic(xpos+6,ypos,GFX_KUGEL_ROT);
733     DrawGraphic(xpos+7,ypos,GFX_LEERRAUM);
734   }
735   else if (key==XK_Return && xpos>0)
736   {
737     DrawText(SX+6*32,SY+ypos*32,player.alias_name,FS_BIG,FC_RED);
738     DrawGraphic(xpos+6,ypos,GFX_LEERRAUM);
739     SavePlayerInfo(PLAYER_SETUP);
740     CheckCheat();
741
742     game_status = MAINMENU;
743 /*
744     DrawMainMenu();
745 */
746
747   }
748   BackToFront();
749 }
750
751 void DrawChooseLevel()
752 {
753   int i;
754
755   CloseDoor(DOOR_CLOSE_2);
756
757   ClearWindow();
758   DrawText(SX,SY,"Level Directories",FS_BIG,FC_GREEN);
759   for(i=0;i<num_leveldirs;i++)
760   {
761     DrawText(SX+32,SY+(i+2)*32,leveldir[i].name,FS_BIG,FC_YELLOW);
762     DrawGraphic(0,i+2,GFX_KUGEL_BLAU);
763   }
764
765   FadeToFront();
766   InitAnimation();
767   HandleChooseLevel(0,0,0,0,MB_MENU_INITIALIZE);
768 }
769
770 void HandleChooseLevel(int mx, int my, int dx, int dy, int button)
771 {
772   static int choice = 3;
773   static int redraw = TRUE;
774   int x = (mx+32-SX)/32, y = (my+32-SY)/32;
775
776   if (button == MB_MENU_INITIALIZE)
777   {
778     redraw = TRUE;
779     choice = leveldir_nr + 3;
780   }
781
782   if (redraw)
783   {
784     DrawGraphic(0,choice-1,GFX_KUGEL_ROT);
785     redraw = FALSE;
786   }
787
788   if (button == MB_MENU_INITIALIZE)
789     return;
790
791   if (dx || dy)
792   {
793     if (dy)
794     {
795       x = 1;
796       y = choice+dy;
797     }
798     else
799       x = y = 0;
800
801     if (y<3)
802       y = 3;
803     else if (y>num_leveldirs+2)
804       y = num_leveldirs+2;
805   }
806
807   if (!mx && !my && !dx && !dy)
808   {
809     x = 1;
810     y = choice;
811   }
812
813   if (x==1 && y>=3 && y<=num_leveldirs+2)
814   {
815     if (button)
816     {
817       if (y!=choice)
818       {
819         DrawGraphic(0,y-1,GFX_KUGEL_ROT);
820         DrawGraphic(0,choice-1,GFX_KUGEL_BLAU);
821       }
822       choice = y;
823     }
824     else
825     {
826       player.leveldir_nr = leveldir_nr = y-3;
827       LoadPlayerInfo(PLAYER_LEVEL);
828       SavePlayerInfo(PLAYER_SETUP);
829       CheckCheat();
830
831       TapeErase();
832       LoadLevelTape(level_nr);
833
834       game_status = MAINMENU;
835       DrawMainMenu();
836       redraw = TRUE;
837     }
838   }
839   BackToFront();
840
841   if (game_status==CHOOSELEVEL)
842     DoAnimation();
843 }
844
845 void DrawHallOfFame(int pos)
846 {
847   int y;
848   char txt[40];
849
850   CloseDoor(DOOR_CLOSE_2);
851
852   if (pos<0) 
853     LoadScore(level_nr);
854   ClearWindow();
855   DrawText(SX+64,SY+10,"Hall Of Fame",FS_BIG,FC_YELLOW);
856   sprintf(txt,"HighScores of Level %d",level_nr);
857   DrawText(SX+256-strlen(txt)*7,SY+48,txt,FS_SMALL,FC_RED);
858   for(y=0;y<MAX_SCORE_ENTRIES;y++)
859   {
860     DrawText(SX,SY+64+y*32,".................",FS_BIG,
861              (y==pos ? FC_RED : FC_GREEN));
862     DrawText(SX,SY+64+y*32,highscore[y].Name,FS_BIG,
863              (y==pos ? FC_RED : FC_GREEN));
864     DrawText(SX+12*32,SY+64+y*32,
865              int2str(highscore[y].Score,5),FS_BIG,
866              (y==pos ? FC_RED : FC_GREEN));
867   }
868
869   FadeToFront();
870   InitAnimation();
871   PlaySound(SND_HALLOFFAME);
872 }
873
874 void HandleHallOfFame(int button)
875 {
876   int button_released = !button;
877
878   if (button_released)
879   {
880     FadeSound(SND_HALLOFFAME);
881     game_status = MAINMENU;
882     DrawMainMenu();
883     BackToFront();
884   }
885   else
886     DoAnimation();
887 }
888
889 void DrawSetupScreen()
890 {
891   int i;
892   static struct setup
893   {
894     unsigned int bit;
895     char *text, *mode[2];
896     int color[2];
897   } setup[] =
898   {
899     {SETUP_SOUND,       "Sound:",       {"on", "off"},  {FC_YELLOW,FC_BLUE}},
900     {SETUP_SOUND_LOOPS, " Sound Loops:",{"on", "off"},  {FC_YELLOW,FC_BLUE}},
901     {SETUP_SOUND_MUSIC, " Game Music:", {"on", "off"},  {FC_YELLOW,FC_BLUE}},
902     {SETUP_TOONS,       "Toons:",       {"on", "off"},  {FC_YELLOW,FC_BLUE}},
903     {SETUP_DIRECT_DRAW, "Buffered gfx:",{"off","on" },  {FC_BLUE,FC_YELLOW}},
904     {SETUP_SCROLL_DELAY,"Scroll Delay:",{"on", "off"},  {FC_YELLOW,FC_BLUE}},
905     {SETUP_SOFT_SCROLL, "Soft Scroll.:",{"on", "off"},  {FC_YELLOW,FC_BLUE}},
906     {SETUP_FADING,      "Fading:",      {"on", "off"},  {FC_YELLOW,FC_BLUE}},
907     {SETUP_QUICK_DOORS, "Quick Doors:", {"on", "off"},  {FC_YELLOW,FC_BLUE}},
908     {SETUP_AUTO_RECORD, "Auto-Record:", {"on", "off"},  {FC_YELLOW,FC_BLUE}},
909     {SETUP_2ND_JOYSTICK,"Joystick:",    {"2nd","1st"},  {FC_YELLOW,FC_YELLOW}},
910     {0,                 "Cal. Joystick",{"",   ""},     {0,0}},
911     {0,                 "",             {"",   ""},     {0,0}},
912     {0,                 "Exit",         {"",   ""},     {0,0}},
913     {0,                 "Save and exit",{"",   ""},     {0,0}}
914   };
915
916   CloseDoor(DOOR_CLOSE_2);
917   ClearWindow();
918   DrawText(SX+16, SY+16,  "SETUP",FS_BIG,FC_YELLOW);
919
920   for(i=SETUP_SCREEN_POS_START;i<=SETUP_SCREEN_POS_END;i++)
921   {
922     int base = i - SETUP_SCREEN_POS_START;
923
924     if (i != SETUP_SCREEN_POS_EMPTY)
925     {
926       DrawGraphic(0,i,GFX_KUGEL_BLAU);
927       DrawText(SX+32,SY+i*32, setup[base].text, FS_BIG,FC_GREEN);
928     }
929
930     if (i < SETUP_SCREEN_POS_EMPTY)
931     {
932       int setting_bit = setup[base].bit;
933       int setting_pos = ((player.setup & setting_bit) != 0 ? 0 : 1);
934       DrawText(SX+14*32, SY+i*32,setup[base].mode[setting_pos],
935                FS_BIG,setup[base].color[setting_pos]);
936     }
937   }
938
939   FadeToFront();
940   InitAnimation();
941   HandleSetupScreen(0,0,0,0,MB_MENU_INITIALIZE);
942 }
943
944 void HandleSetupScreen(int mx, int my, int dx, int dy, int button)
945 {
946   static int choice = 3;
947   static int redraw = TRUE;
948   int x = (mx+32-SX)/32, y = (my+32-SY)/32;
949   int pos_start = SETUP_SCREEN_POS_START + 1;
950   int pos_empty = SETUP_SCREEN_POS_EMPTY + 1;
951   int pos_end   = SETUP_SCREEN_POS_END   + 1;
952
953   if (button == MB_MENU_INITIALIZE)
954     redraw = TRUE;
955
956   if (redraw)
957   {
958     DrawGraphic(0,choice-1,GFX_KUGEL_ROT);
959     redraw = FALSE;
960   }
961
962   if (button == MB_MENU_INITIALIZE)
963     return;
964
965   if (dx || dy)
966   {
967     if (dy)
968     {
969       x = 1;
970       y = choice+dy;
971     }
972     else
973       x = y = 0;
974
975     if (y == pos_empty)
976       y = (dy>0 ? pos_empty+1 : pos_empty-1);
977
978     if (y < pos_start)
979       y = pos_start;
980     else if (y > pos_end)
981       y = pos_end;
982   }
983
984   if (!mx && !my && !dx && !dy)
985   {
986     x = 1;
987     y = choice;
988   }
989
990   if (x==1 && y>=pos_start && y<=pos_end && y!=pos_empty)
991   {
992     if (button)
993     {
994       if (y!=choice)
995       {
996         DrawGraphic(0,y-1,GFX_KUGEL_ROT);
997         DrawGraphic(0,choice-1,GFX_KUGEL_BLAU);
998       }
999       choice = y;
1000     }
1001     else
1002     {
1003       int yy = y-1;
1004
1005       if (y==3 && sound_status==SOUND_AVAILABLE)
1006       {
1007         if (SETUP_SOUND_ON(player.setup))
1008         {
1009           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1010           DrawText(SX+14*32, SY+(yy+1)*32,"off",FS_BIG,FC_BLUE);
1011           DrawText(SX+14*32, SY+(yy+2)*32,"off",FS_BIG,FC_BLUE);
1012           player.setup &= ~SETUP_SOUND_LOOPS;
1013           player.setup &= ~SETUP_SOUND_MUSIC;
1014         }
1015         else
1016           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1017         player.setup ^= SETUP_SOUND;
1018       }
1019       else if (y==4 && sound_loops_allowed)
1020       {
1021         if (SETUP_SOUND_LOOPS_ON(player.setup))
1022           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1023         else
1024         {
1025           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1026           DrawText(SX+14*32, SY+(yy-1)*32,"on ",FS_BIG,FC_YELLOW);
1027           player.setup |= SETUP_SOUND;
1028         }
1029         player.setup ^= SETUP_SOUND_LOOPS;
1030       }
1031       else if (y==5 && sound_loops_allowed)
1032       {
1033         if (SETUP_SOUND_MUSIC_ON(player.setup))
1034           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1035         else
1036         {
1037           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1038           DrawText(SX+14*32, SY+(yy-2)*32,"on ",FS_BIG,FC_YELLOW);
1039           player.setup |= SETUP_SOUND;
1040         }
1041         player.setup ^= SETUP_SOUND_MUSIC;
1042       }
1043       else if (y==6)
1044       {
1045         if (SETUP_TOONS_ON(player.setup))
1046           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1047         else
1048           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1049         player.setup ^= SETUP_TOONS;
1050       }
1051       else if (y==7)
1052       {
1053         if (!SETUP_DIRECT_DRAW_ON(player.setup))
1054           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1055         else
1056           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1057         player.setup ^= SETUP_DIRECT_DRAW;
1058       }
1059       else if (y==8)
1060       {
1061         if (SETUP_SCROLL_DELAY_ON(player.setup))
1062           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1063         else
1064           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1065         player.setup ^= SETUP_SCROLL_DELAY;
1066       }
1067       else if (y==9)
1068       {
1069         if (SETUP_SOFT_SCROLL_ON(player.setup))
1070           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1071         else
1072           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1073         player.setup ^= SETUP_SOFT_SCROLL;
1074       }
1075       else if (y==10)
1076       {
1077         if (SETUP_FADING_ON(player.setup))
1078           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1079         else
1080           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1081         player.setup ^= SETUP_FADING;
1082       }
1083       else if (y==11)
1084       {
1085         if (SETUP_QUICK_DOORS_ON(player.setup))
1086           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1087         else
1088           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1089         player.setup ^= SETUP_QUICK_DOORS;
1090       }
1091       else if (y==12)
1092       {
1093         if (SETUP_AUTO_RECORD_ON(player.setup))
1094           DrawText(SX+14*32, SY+yy*32,"off",FS_BIG,FC_BLUE);
1095         else
1096           DrawText(SX+14*32, SY+yy*32,"on ",FS_BIG,FC_YELLOW);
1097         player.setup ^= SETUP_AUTO_RECORD;
1098       }
1099       else if (y==13)
1100       {
1101         if (SETUP_2ND_JOYSTICK_ON(player.setup))
1102           DrawText(SX+14*32, SY+yy*32,"1st",FS_BIG,FC_YELLOW);
1103         else
1104           DrawText(SX+14*32, SY+yy*32,"2nd",FS_BIG,FC_YELLOW);
1105         player.setup ^= SETUP_2ND_JOYSTICK;
1106       }
1107       else if (y==14)
1108       {
1109         CalibrateJoystick();
1110         redraw = TRUE;
1111       }
1112       else if (y==pos_end-1 || y==pos_end)
1113       {
1114         if (y==pos_end)
1115         {
1116           SavePlayerInfo(PLAYER_SETUP);
1117           SaveJoystickData();
1118         }
1119
1120         game_status = MAINMENU;
1121         DrawMainMenu();
1122         redraw = TRUE;
1123       }
1124     }
1125   }
1126   BackToFront();
1127
1128   if (game_status==SETUP)
1129     DoAnimation();
1130 }
1131
1132 void CalibrateJoystick()
1133 {
1134 #ifdef __FreeBSD__
1135   struct joystick joy_ctrl;
1136 #else
1137   struct joystick_control
1138   {
1139     int buttons;
1140     int x;
1141     int y;
1142   } joy_ctrl;
1143 #endif
1144
1145 #ifdef MSDOS
1146   char joy_nr[4];
1147 #endif
1148
1149   int new_joystick_xleft, new_joystick_xright, new_joystick_xmiddle;
1150   int new_joystick_yupper, new_joystick_ylower, new_joystick_ymiddle;
1151
1152   if (joystick_status==JOYSTICK_OFF)
1153     goto error_out;
1154
1155 #ifndef MSDOS
1156   ClearWindow();
1157   DrawText(SX+16, SY+7*32, "MOVE JOYSTICK TO",FS_BIG,FC_YELLOW);
1158   DrawText(SX+16, SY+8*32, " THE UPPER LEFT ",FS_BIG,FC_YELLOW);
1159   DrawText(SX+16, SY+9*32, "AND PRESS BUTTON",FS_BIG,FC_YELLOW);
1160   BackToFront();
1161
1162 #ifdef __FreeBSD__
1163   joy_ctrl.b1 = joy_ctrl.b2 = 0;
1164 #else
1165   joy_ctrl.buttons = 0;
1166 #endif
1167   while(Joystick() & JOY_BUTTON);
1168 #ifdef __FreeBSD__
1169   while(!(joy_ctrl.b1||joy_ctrl.b2))
1170 #else
1171   while(!joy_ctrl.buttons)
1172 #endif
1173   {
1174     if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
1175     {
1176       joystick_status=JOYSTICK_OFF;
1177       goto error_out;
1178     }
1179     Delay(10000);
1180   }
1181
1182   new_joystick_xleft = joy_ctrl.x;
1183   new_joystick_yupper = joy_ctrl.y;
1184
1185   ClearWindow();
1186   DrawText(SX+16, SY+7*32, "MOVE JOYSTICK TO",FS_BIG,FC_YELLOW);
1187   DrawText(SX+32, SY+8*32, "THE LOWER RIGHT",FS_BIG,FC_YELLOW);
1188   DrawText(SX+16, SY+9*32, "AND PRESS BUTTON",FS_BIG,FC_YELLOW);
1189   BackToFront();
1190
1191 #ifdef __FreeBSD__
1192   joy_ctrl.b1 = joy_ctrl.b2 = 0;
1193 #else
1194   joy_ctrl.buttons = 0;
1195 #endif
1196   while(Joystick() & JOY_BUTTON);
1197 #ifdef __FreeBSD__
1198   while(!(joy_ctrl.b1||joy_ctrl.b2))
1199 #else
1200   while(!joy_ctrl.buttons)
1201 #endif
1202   {
1203     if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
1204     {
1205       joystick_status=JOYSTICK_OFF;
1206       goto error_out;
1207     }
1208     Delay(10000);
1209   }
1210
1211   new_joystick_xright = joy_ctrl.x;
1212   new_joystick_ylower = joy_ctrl.y;
1213
1214   ClearWindow();
1215   DrawText(SX+32, SY+16+7*32, "CENTER JOYSTICK",FS_BIG,FC_YELLOW);
1216   DrawText(SX+16, SY+16+8*32, "AND PRESS BUTTON",FS_BIG,FC_YELLOW);
1217   BackToFront();
1218
1219 #ifdef __FreeBSD__
1220   joy_ctrl.b1 = joy_ctrl.b2 = 0;
1221 #else
1222   joy_ctrl.buttons = 0;
1223 #endif
1224   while(Joystick() & JOY_BUTTON);
1225 #ifdef __FreeBSD__
1226   while(!(joy_ctrl.b1||joy_ctrl.b2))
1227 #else
1228   while(!joy_ctrl.buttons)
1229 #endif
1230   {
1231     if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
1232     {
1233       joystick_status=JOYSTICK_OFF;
1234       goto error_out;
1235     }
1236     Delay(10000);
1237   }
1238
1239   new_joystick_xmiddle = joy_ctrl.x;
1240   new_joystick_ymiddle = joy_ctrl.y;
1241
1242   joystick[joystick_nr].xleft = new_joystick_xleft;
1243   joystick[joystick_nr].yupper = new_joystick_yupper;
1244   joystick[joystick_nr].xright = new_joystick_xright;
1245   joystick[joystick_nr].ylower = new_joystick_ylower;
1246   joystick[joystick_nr].xmiddle = new_joystick_xmiddle;
1247   joystick[joystick_nr].ymiddle = new_joystick_ymiddle;
1248
1249   CheckJoystickData();
1250
1251   DrawSetupScreen();
1252   while(Joystick() & JOY_BUTTON);
1253   return;
1254
1255 #endif
1256   error_out:
1257
1258 #ifdef MSDOS
1259   joy_nr[0] = '#';
1260   joy_nr[1] = SETUP_2ND_JOYSTICK_ON(player.setup)+49;
1261   joy_nr[2] = '\0';
1262
1263   remove_joystick();
1264   ClearWindow();
1265   DrawText(SX+32, SY+7*32, "CENTER JOYSTICK",FS_BIG,FC_YELLOW);
1266   DrawText(SX+16+7*32, SY+8*32, joy_nr, FS_BIG,FC_YELLOW);
1267   DrawText(SX+32, SY+9*32, "AND PRESS A KEY",FS_BIG,FC_YELLOW);
1268   BackToFront();
1269
1270   for(clear_keybuf();!keypressed(););
1271   install_joystick(JOY_TYPE_2PADS);
1272
1273   ClearWindow();
1274   DrawText(SX+16, SY+7*32, "MOVE JOYSTICK TO",FS_BIG,FC_YELLOW);
1275   DrawText(SX+16, SY+8*32, " THE UPPER LEFT ",FS_BIG,FC_YELLOW);
1276   DrawText(SX+32, SY+9*32, "AND PRESS A KEY",FS_BIG,FC_YELLOW);
1277   BackToFront();
1278
1279   for(clear_keybuf();!keypressed(););
1280   calibrate_joystick(SETUP_2ND_JOYSTICK_ON(player.setup));
1281
1282   ClearWindow();
1283   DrawText(SX+16, SY+7*32, "MOVE JOYSTICK TO",FS_BIG,FC_YELLOW);
1284   DrawText(SX+32, SY+8*32, "THE LOWER RIGHT",FS_BIG,FC_YELLOW);
1285   DrawText(SX+32, SY+9*32, "AND PRESS A KEY",FS_BIG,FC_YELLOW);
1286   BackToFront();
1287
1288   for(clear_keybuf();!keypressed(););
1289   calibrate_joystick(SETUP_2ND_JOYSTICK_ON(player.setup));
1290
1291   DrawSetupScreen();
1292   return;
1293 #endif
1294
1295   ClearWindow();
1296   DrawText(SX+16, SY+16, "NO JOYSTICK",FS_BIG,FC_YELLOW);
1297   DrawText(SX+16, SY+48, " AVAILABLE ",FS_BIG,FC_YELLOW);
1298   BackToFront();
1299   Delay(3000000);
1300   DrawSetupScreen();
1301 }
1302
1303 void HandleGameActions()
1304 {
1305   if (game_status != PLAYING)
1306     return;
1307
1308   if (LevelSolved)
1309     GameWon();
1310
1311   if (PlayerGone && !TAPE_IS_STOPPED(tape))
1312     TapeStop();
1313
1314   GameActions();
1315 }
1316
1317 void HandleVideoButtons(int mx, int my, int button)
1318 {
1319   if (game_status != MAINMENU && game_status != PLAYING)
1320     return;
1321
1322   switch(CheckVideoButtons(mx,my,button))
1323   {
1324     case BUTTON_VIDEO_EJECT:
1325       TapeStop();
1326       if (TAPE_IS_EMPTY(tape))
1327       {
1328         LoadLevelTape(level_nr);
1329         if (TAPE_IS_EMPTY(tape))
1330           AreYouSure("No tape for this level !",AYS_CONFIRM);
1331       }
1332       else
1333       {
1334         if (tape.changed)
1335           SaveLevelTape(tape.level_nr);
1336         TapeErase();
1337       }
1338       DrawCompleteVideoDisplay();
1339       break;
1340     case BUTTON_VIDEO_STOP:
1341       TapeStop();
1342       break;
1343     case BUTTON_VIDEO_PAUSE:
1344       TapeTogglePause();
1345       break;
1346     case BUTTON_VIDEO_REC:
1347       if (TAPE_IS_STOPPED(tape))
1348       {
1349         TapeStartRecording();
1350         game_status = PLAYING;
1351         InitGame();
1352       }
1353       else if (tape.pausing)
1354       {
1355         if (tape.playing)       /* PLAYING -> PAUSING -> RECORDING */
1356         {
1357           tape.pos[tape.counter].delay = tape.delay_played;
1358           tape.playing = FALSE;
1359           tape.recording = TRUE;
1360           tape.changed = TRUE;
1361
1362           DrawVideoDisplay(VIDEO_STATE_PLAY_OFF | VIDEO_STATE_REC_ON,0);
1363         }
1364         else
1365           TapeTogglePause();
1366       }
1367       break;
1368     case BUTTON_VIDEO_PLAY:
1369       if (TAPE_IS_EMPTY(tape))
1370         break;
1371
1372       if (TAPE_IS_STOPPED(tape))
1373       {
1374         TapeStartPlaying();
1375         game_status = PLAYING;
1376         InitGame();
1377       }
1378       else if (tape.playing)
1379       {
1380         if (tape.pausing)                       /* PAUSE -> PLAY */
1381           TapeTogglePause();
1382         else if (!tape.fast_forward)            /* PLAY -> FAST FORWARD PLAY */
1383         {
1384           tape.fast_forward = TRUE;
1385           DrawVideoDisplay(VIDEO_STATE_FFWD_ON, 0);
1386         }
1387         else if (!tape.pause_before_death)      /* FFWD PLAY -> + AUTO PAUSE */
1388         {
1389           tape.pause_before_death = TRUE;
1390           DrawVideoDisplay(VIDEO_STATE_PAUSE_ON, VIDEO_DISPLAY_LABEL_ONLY);
1391         }
1392         else                                    /* -> NORMAL PLAY */
1393         {
1394           tape.fast_forward = FALSE;
1395           tape.pause_before_death = FALSE;
1396           DrawVideoDisplay(VIDEO_STATE_FFWD_OFF | VIDEO_STATE_PAUSE_OFF, 0);
1397         }
1398       }
1399       break;
1400     default:
1401       break;
1402   }
1403
1404   BackToFront();
1405 }
1406
1407 void HandleSoundButtons(int mx, int my, int button)
1408 {
1409   if (game_status != PLAYING)
1410     return;
1411
1412   switch(CheckSoundButtons(mx,my,button))
1413   {
1414     case BUTTON_SOUND_MUSIC:
1415       if (sound_music_on)
1416       { 
1417         sound_music_on = FALSE;
1418         player.setup &= ~SETUP_SOUND_MUSIC;
1419         FadeSound(background_loop[level_nr % num_bg_loops]);
1420         DrawSoundDisplay(BUTTON_SOUND_MUSIC_OFF);
1421       }
1422       else if (sound_loops_allowed)
1423       { 
1424         sound_on = sound_music_on = TRUE;
1425         player.setup |= (SETUP_SOUND | SETUP_SOUND_MUSIC);
1426         PlaySoundLoop(background_loop[level_nr % num_bg_loops]);
1427         DrawSoundDisplay(BUTTON_SOUND_MUSIC_ON);
1428       }
1429       else
1430         DrawSoundDisplay(BUTTON_SOUND_MUSIC_OFF);
1431       break;
1432     case BUTTON_SOUND_LOOPS:
1433       if (sound_loops_on)
1434       { 
1435         sound_loops_on = FALSE;
1436         player.setup &= ~SETUP_SOUND_LOOPS;
1437         DrawSoundDisplay(BUTTON_SOUND_LOOPS_OFF);
1438       }
1439       else if (sound_loops_allowed)
1440       { 
1441         sound_on = sound_loops_on = TRUE;
1442         player.setup |= (SETUP_SOUND | SETUP_SOUND_LOOPS);
1443         DrawSoundDisplay(BUTTON_SOUND_LOOPS_ON);
1444       }
1445       else
1446         DrawSoundDisplay(BUTTON_SOUND_LOOPS_OFF);
1447       break;
1448     case BUTTON_SOUND_SIMPLE:
1449       if (sound_simple_on)
1450       { 
1451         sound_simple_on = FALSE;
1452         player.setup &= ~SETUP_SOUND;
1453         DrawSoundDisplay(BUTTON_SOUND_SIMPLE_OFF);
1454       }
1455       else if (sound_status==SOUND_AVAILABLE)
1456       { 
1457         sound_on = sound_simple_on = TRUE;
1458         player.setup |= SETUP_SOUND;
1459         DrawSoundDisplay(BUTTON_SOUND_SIMPLE_ON);
1460       }
1461       else
1462         DrawSoundDisplay(BUTTON_SOUND_SIMPLE_OFF);
1463       break;
1464     default:
1465       break;
1466   }
1467
1468   BackToFront();
1469 }
1470
1471 void HandleGameButtons(int mx, int my, int button)
1472 {
1473   if (game_status != PLAYING)
1474     return;
1475
1476   switch(CheckGameButtons(mx,my,button))
1477   {
1478     case BUTTON_GAME_STOP:
1479       if (GameOver)
1480       {
1481         CloseDoor(DOOR_CLOSE_1);
1482         game_status = MAINMENU;
1483         DrawMainMenu();
1484         break;
1485       }
1486
1487       if (AreYouSure("Do you really want to quit the game ?",
1488                       AYS_ASK | AYS_STAY_CLOSED))
1489       { 
1490         game_status = MAINMENU;
1491         DrawMainMenu();
1492       }
1493       else
1494         OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
1495       break;
1496     case BUTTON_GAME_PAUSE:
1497       if (tape.pausing)
1498       {
1499         tape.pausing = FALSE;
1500         DrawVideoDisplay(VIDEO_STATE_PAUSE_OFF,0);
1501       }
1502       else
1503       {
1504         tape.pausing = TRUE;
1505         DrawVideoDisplay(VIDEO_STATE_PAUSE_ON,0);
1506       }
1507       break;
1508     case BUTTON_GAME_PLAY:
1509       if (tape.pausing)
1510       {
1511         tape.pausing = FALSE;
1512         DrawVideoDisplay(VIDEO_STATE_PAUSE_OFF,0);
1513       }
1514       break;
1515     default:
1516       break;
1517   }
1518
1519   BackToFront();
1520 }