a8ce6a50bc357ce2dde3cede3b3535b47224973e
[rocksndiamonds.git] / src / init.c
1 /***********************************************************
2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
3 *----------------------------------------------------------*
4 *  (c) 1995-98 Artsoft Entertainment                       *
5 *              Holger Schemel                              *
6 *              Oststrasse 11a                              *
7 *              33604 Bielefeld                             *
8 *              phone: ++49 +521 290471                     *
9 *              email: aeglos@valinor.owl.de                *
10 *----------------------------------------------------------*
11 *  init.c                                                  *
12 ***********************************************************/
13
14 #include <signal.h>
15
16 #include "init.h"
17 #include "events.h"
18 #include "misc.h"
19 #include "sound.h"
20 #include "screens.h"
21 #include "editor.h"
22 #include "game.h"
23 #include "tape.h"
24 #include "tools.h"
25 #include "files.h"
26 #include "joystick.h"
27 #include "image.h"
28 #include "pcx.h"
29 #include "network.h"
30 #include "netserv.h"
31
32 struct PictureFileInfo
33 {
34   char *picture_filename;
35   boolean picture_with_mask;
36 };
37
38 #ifndef USE_SDL_LIBRARY
39 static int sound_process_id = 0;
40 #endif
41
42 static void InitPlayerInfo(void);
43 static void InitLevelInfo(void);
44 static void InitNetworkServer(void);
45 static void InitSound(void);
46 static void InitSoundServer(void);
47 static void InitGfx(void);
48 static void InitGfxBackground(void);
49 static void LoadGfx(int, struct PictureFileInfo *);
50 static void InitGadgets(void);
51 static void InitElementProperties(void);
52
53 void OpenAll(int argc, char *argv[])
54 {
55 #if defined(MSDOS) || defined(WIN32)
56   initErrorFile();
57 #endif
58
59   if (options.serveronly)
60   {
61 #ifdef WIN32
62     Error(ERR_WARN, "networking not supported in Windows version");
63 #else
64     NetworkServer(options.server_port, options.serveronly);
65 #endif
66
67     /* never reached */
68     exit(0);
69   }
70
71   InitPlayerInfo();
72
73   InitCounter();
74   InitSound();
75   InitSoundServer();
76   InitJoysticks();
77   InitRND(NEW_RANDOMIZE);
78
79   signal(SIGINT, CloseAllAndExit);
80   signal(SIGTERM, CloseAllAndExit);
81
82   InitBufferedDisplay(&backbuffer, &window);
83   InitEventFilter(FilterMouseMotionEvents);
84
85   InitGfx();
86   InitElementProperties();      /* initializes IS_CHAR() for el2gfx() */
87
88   InitLevelInfo();
89   InitGadgets();                /* needs to know number of level series */
90
91   InitGfxBackground();
92   DrawMainMenu();
93
94   InitNetworkServer();
95 }
96
97 void InitPlayerInfo()
98 {
99   int i;
100
101   /* choose default local player */
102   local_player = &stored_player[0];
103
104   for (i=0; i<MAX_PLAYERS; i++)
105   {
106     stored_player[i].joystick_fd = -1;  /* joystick device closed */
107     stored_player[i].connected = FALSE;
108   }
109
110   local_player->connected = TRUE;
111
112   LoadSetup();                                  /* global setup info */
113 }
114
115 void InitLevelInfo()
116 {
117   LoadLevelInfo();                              /* global level info */
118   LoadLevelSetup_LastSeries();                  /* last played series info */
119   LoadLevelSetup_SeriesInfo();                  /* last played level info */
120 }
121
122 void InitNetworkServer()
123 {
124 #if !defined(MSDOS) && !defined(WIN32)
125   int nr_wanted;
126 #endif
127
128   if (!options.network)
129     return;
130
131 #if !defined(MSDOS) && !defined(WIN32)
132   nr_wanted = Request("Choose player", REQ_PLAYER | REQ_STAY_CLOSED);
133
134   if (!ConnectToServer(options.server_host, options.server_port))
135     Error(ERR_EXIT, "cannot connect to network game server");
136
137   SendToServer_PlayerName(setup.player_name);
138   SendToServer_ProtocolVersion();
139
140   if (nr_wanted)
141     SendToServer_NrWanted(nr_wanted);
142 #endif
143 }
144
145 void InitSound()
146 {
147   int i;
148
149   if (sound_status == SOUND_OFF)
150     return;
151
152 #ifdef USE_SDL_LIBRARY
153   /* initialize SDL audio */
154
155   if (SDL_Init(SDL_INIT_AUDIO) < 0)
156   {
157     Error(ERR_WARN, "SDL_Init() failed: %s", SDL_GetError());
158     sound_status = SOUND_OFF;
159     return;
160   }
161
162   if (Mix_OpenAudio(22050, AUDIO_S16, 2, 512) < 0)
163   {
164     Error(ERR_WARN, "Mix_OpenAudio() failed: %s", SDL_GetError());
165     sound_status = SOUND_OFF;
166     return;
167   }
168
169   Mix_Volume(-1, SDL_MIX_MAXVOLUME / 4);
170   Mix_VolumeMusic(SDL_MIX_MAXVOLUME / 4);
171
172   sound_status = SOUND_AVAILABLE;
173   sound_loops_allowed = TRUE;
174
175 #else /* !USE_SDL_LIBRARY */
176
177 #if !defined(MSDOS) && !defined(WIN32)
178   if (access(sound_device_name, W_OK) != 0)
179   {
180     Error(ERR_WARN, "cannot access sound device - no sounds");
181     sound_status = SOUND_OFF;
182     return;
183   }
184
185   if ((sound_device = OpenAudio(sound_device_name)) < 0)
186   {
187     Error(ERR_WARN, "cannot open sound device - no sounds");
188     sound_status = SOUND_OFF;
189     return;
190   }
191
192   close(sound_device);
193   sound_status = SOUND_AVAILABLE;
194
195 #ifdef VOXWARE
196   sound_loops_allowed = TRUE;
197
198   /*
199   setup.sound_loops_on = TRUE;
200   */
201
202 #endif
203 #else /* MSDOS || WIN32 */
204   sound_loops_allowed = TRUE;
205
206   /*
207   setup.sound_loops_on = TRUE;
208   */
209
210 #endif /* MSDOS || WIN32 */
211 #endif /* !USE_SDL_LIBRARY */
212
213   for(i=0; i<NUM_SOUNDS; i++)
214   {
215     Sound[i].name = sound_name[i];
216
217     if (!LoadSound(&Sound[i]))
218     {
219       sound_status = SOUND_OFF;
220       sound_loops_allowed = FALSE;
221       return;
222     }
223   }
224
225 #if 0
226   sound_status = SOUND_OFF;
227 #endif
228
229 }
230
231 void InitSoundServer()
232 {
233   if (sound_status == SOUND_OFF)
234     return;
235
236 #ifndef USE_SDL_LIBRARY
237
238 #if !defined(MSDOS) && !defined(WIN32)
239
240   if (pipe(sound_pipe)<0)
241   {
242     Error(ERR_WARN, "cannot create pipe - no sounds");
243     sound_status = SOUND_OFF;
244     return;
245   }
246
247   if ((sound_process_id = fork()) < 0)
248   {       
249     Error(ERR_WARN, "cannot create sound server process - no sounds");
250     sound_status = SOUND_OFF;
251     return;
252   }
253
254   if (!sound_process_id)        /* we are child */
255   {
256     SoundServer();
257
258     /* never reached */
259     exit(0);
260   }
261   else                          /* we are parent */
262     close(sound_pipe[0]);       /* no reading from pipe needed */
263
264 #else /* MSDOS || WIN32 */
265
266   SoundServer();
267
268 #endif /* MSDOS */
269
270 #endif /* !USE_SDL_LIBRARY */
271 }
272
273 void InitJoysticks()
274 {
275 #ifdef USE_SDL_JOYSTICK
276   static boolean sdl_joystick_subsystem_initialized = FALSE;
277 #endif
278
279   int i;
280
281   if (global_joystick_status == JOYSTICK_OFF)
282     return;
283
284   joystick_status = JOYSTICK_OFF;
285
286 #ifdef USE_SDL_JOYSTICK
287
288   if (!sdl_joystick_subsystem_initialized)
289   {
290     sdl_joystick_subsystem_initialized = TRUE;
291
292     if (SDL_Init(SDL_INIT_JOYSTICK) < 0)
293     {
294       Error(ERR_EXIT, "SDL_Init() failed: %s", SDL_GetError());
295       return;
296     }
297   }
298
299   for (i=0; i<MAX_PLAYERS; i++)
300   {
301     char *device_name = setup.input[i].joy.device_name;
302     int joystick_nr = getJoystickNrFromDeviceName(device_name);
303
304     if (joystick_nr >= SDL_NumJoysticks())
305       joystick_nr = -1;
306
307     /* misuse joystick file descriptor variable to store joystick number */
308     stored_player[i].joystick_fd = joystick_nr;
309
310     /* this allows subsequent calls to 'InitJoysticks' for re-initialization */
311     if (Check_SDL_JoystickOpened(joystick_nr))
312       Close_SDL_Joystick(joystick_nr);
313
314     if (!setup.input[i].use_joystick)
315       continue;
316
317     if (!Open_SDL_Joystick(joystick_nr))
318     {
319       Error(ERR_WARN, "cannot open joystick %d", joystick_nr);
320       continue;
321     }
322
323     joystick_status = JOYSTICK_AVAILABLE;
324   }
325
326 #else /* !USE_SDL_JOYSTICK */
327
328 #ifndef MSDOS
329   for (i=0; i<MAX_PLAYERS; i++)
330   {
331     char *device_name = setup.input[i].joy.device_name;
332
333     /* this allows subsequent calls to 'InitJoysticks' for re-initialization */
334     if (stored_player[i].joystick_fd != -1)
335     {
336       close(stored_player[i].joystick_fd);
337       stored_player[i].joystick_fd = -1;
338     }
339
340     if (!setup.input[i].use_joystick)
341       continue;
342
343     if (access(device_name, R_OK) != 0)
344     {
345       Error(ERR_WARN, "cannot access joystick device '%s'", device_name);
346       continue;
347     }
348
349     if ((stored_player[i].joystick_fd = open(device_name, O_RDONLY)) < 0)
350     {
351       Error(ERR_WARN, "cannot open joystick device '%s'", device_name);
352       continue;
353     }
354
355     joystick_status = JOYSTICK_AVAILABLE;
356   }
357
358 #else /* MSDOS */
359
360   /* try to access two joysticks; if that fails, try to access just one */
361   if (install_joystick(JOY_TYPE_2PADS) == 0 ||
362       install_joystick(JOY_TYPE_AUTODETECT) == 0)
363     joystick_status = JOYSTICK_AVAILABLE;
364
365   /*
366   load_joystick_data(JOYSTICK_FILENAME);
367   */
368
369   for (i=0; i<MAX_PLAYERS; i++)
370   {
371     char *device_name = setup.input[i].joy.device_name;
372     int joystick_nr = getJoystickNrFromDeviceName(device_name);
373
374     if (joystick_nr >= num_joysticks)
375       joystick_nr = -1;
376
377     /* misuse joystick file descriptor variable to store joystick number */
378     stored_player[i].joystick_fd = joystick_nr;
379   }
380 #endif
381
382 #endif /* !USE_SDL_LIBRARY */
383 }
384
385 void InitGfx()
386 {
387   int i, j;
388
389 #ifdef USE_SDL_LIBRARY
390   SDL_Surface *sdl_image_tmp;
391 #else
392   GC copy_clipmask_gc;
393   XGCValues clip_gc_values;
394   unsigned long clip_gc_valuemask;
395 #endif
396
397 #ifdef MSDOS
398   static struct PictureFileInfo pic[NUM_PICTURES] =
399   {
400     { "Screen", TRUE },
401     { "Door",   TRUE },
402     { "Heroes", TRUE },
403     { "Toons",  TRUE },
404     { "SP",     TRUE },
405     { "DC",     TRUE },
406     { "More",   TRUE },
407     { "Font",   FALSE },
408     { "Font2",  FALSE },
409     { "Font3",  FALSE }
410   }; 
411 #else
412   static struct PictureFileInfo pic[NUM_PICTURES] =
413   {
414     { "RocksScreen",    TRUE },
415     { "RocksDoor",      TRUE },
416     { "RocksHeroes",    TRUE },
417     { "RocksToons",     TRUE },
418     { "RocksSP",        TRUE },
419     { "RocksDC",        TRUE },
420     { "RocksMore",      TRUE },
421     { "RocksFont",      FALSE },
422     { "RocksFont2",     FALSE },
423     { "RocksFont3",     FALSE }
424   }; 
425 #endif
426
427   static struct
428   {
429     int start;
430     int count;
431   }
432   tile_needs_clipping[] =
433   {
434     { GFX_SPIELER1_UP, 4 },
435     { GFX_SPIELER1_DOWN, 4 },
436     { GFX_SPIELER1_LEFT, 4 },
437     { GFX_SPIELER1_RIGHT, 4 },
438     { GFX_SPIELER1_PUSH_LEFT, 4 },
439     { GFX_SPIELER1_PUSH_RIGHT, 4 },
440     { GFX_SPIELER2_UP, 4 },
441     { GFX_SPIELER2_DOWN, 4 },
442     { GFX_SPIELER2_LEFT, 4 },
443     { GFX_SPIELER2_RIGHT, 4 },
444     { GFX_SPIELER2_PUSH_LEFT, 4 },
445     { GFX_SPIELER2_PUSH_RIGHT, 4 },
446     { GFX_SPIELER3_UP, 4 },
447     { GFX_SPIELER3_DOWN, 4 },
448     { GFX_SPIELER3_LEFT, 4 },
449     { GFX_SPIELER3_RIGHT, 4 },
450     { GFX_SPIELER3_PUSH_LEFT, 4 },
451     { GFX_SPIELER3_PUSH_RIGHT, 4 },
452     { GFX_SPIELER4_UP, 4 },
453     { GFX_SPIELER4_DOWN, 4 },
454     { GFX_SPIELER4_LEFT, 4 },
455     { GFX_SPIELER4_RIGHT, 4 },
456     { GFX_SPIELER4_PUSH_LEFT, 4 },
457     { GFX_SPIELER4_PUSH_RIGHT, 4 },
458     { GFX_SP_MURPHY, 1 },
459     { GFX_MURPHY_GO_LEFT, 3 },
460     { GFX_MURPHY_GO_RIGHT, 3 },
461     { GFX_MURPHY_SNAP_UP, 1 },
462     { GFX_MURPHY_SNAP_DOWN, 1 },
463     { GFX_MURPHY_SNAP_RIGHT, 1 },
464     { GFX_MURPHY_SNAP_LEFT, 1 },
465     { GFX_MURPHY_PUSH_RIGHT, 1 },
466     { GFX_MURPHY_PUSH_LEFT, 1 },
467     { GFX_GEBLUBBER, 4 },
468     { GFX_DYNAMIT, 7 },
469     { GFX_DYNABOMB, 4 },
470     { GFX_EXPLOSION, 8 },
471     { GFX_SOKOBAN_OBJEKT, 1 },
472     { GFX_FUNKELN_BLAU, 3 },
473     { GFX_FUNKELN_WEISS, 3 },
474     { GFX2_SHIELD_PASSIVE, 3 },
475     { GFX2_SHIELD_ACTIVE, 3 },
476     { -1, 0 }
477   };
478
479   /* create additional image buffers for double-buffering */
480
481   pix[PIX_DB_DOOR] = CreateBitmap(3 * DXSIZE, DYSIZE + VYSIZE, DEFAULT_DEPTH);
482   pix[PIX_DB_FIELD] = CreateBitmap(FXSIZE, FYSIZE, DEFAULT_DEPTH);
483
484   LoadGfx(PIX_SMALLFONT, &pic[PIX_SMALLFONT]);
485   DrawInitText(WINDOW_TITLE_STRING, 20, FC_YELLOW);
486   DrawInitText(WINDOW_SUBTITLE_STRING, 50, FC_RED);
487 #ifdef MSDOS
488   DrawInitText(PROGRAM_DOS_PORT_STRING, 210, FC_BLUE);
489   rest(200);
490 #endif /* MSDOS */
491   DrawInitText("Loading graphics:",120,FC_GREEN);
492
493   for(i=0; i<NUM_PICTURES; i++)
494     if (i != PIX_SMALLFONT)
495       LoadGfx(i,&pic[i]);
496
497   /* create additional image buffers for masking of graphics */
498
499 #ifdef USE_SDL_LIBRARY
500
501   /* initialize surface array to 'NULL' */
502   for(i=0; i<NUM_TILES; i++)
503     tile_masked[i] = NULL;
504
505   /* create only those masked surfaces we really need */
506   for(i=0; tile_needs_clipping[i].start>=0; i++)
507   {
508     for(j=0; j<tile_needs_clipping[i].count; j++)
509     {
510       int tile = tile_needs_clipping[i].start + j;
511       int graphic = tile;
512       int src_x, src_y;
513       int bitmap_nr;
514       Bitmap src_bitmap;
515
516       getGraphicSource(graphic, &bitmap_nr, &src_x, &src_y);
517       src_bitmap = pix_masked[bitmap_nr];
518
519       /* create surface for masked tile graphic */
520       if ((sdl_image_tmp = SDL_CreateRGBSurface(SDL_SWSURFACE, TILEX, TILEY,
521                                                 WIN_SDL_DEPTH, 0, 0, 0, 0))
522           == NULL)
523         Error(ERR_EXIT, "SDL_CreateRGBSurface() failed: %s", SDL_GetError());
524
525       /* create native transparent surface for current image */
526       SDL_SetColorKey(sdl_image_tmp, SDL_SRCCOLORKEY,
527                       SDL_MapRGB(sdl_image_tmp->format, 0x00, 0x00, 0x00));
528       if ((tile_masked[tile] = SDL_DisplayFormat(sdl_image_tmp)) == NULL)
529         Error(ERR_EXIT, "SDL_DisplayFormat() failed: %s", SDL_GetError());
530
531       SDL_FreeSurface(sdl_image_tmp);
532
533       BlitBitmap(src_bitmap, tile_masked[tile], src_x,src_y, TILEX,TILEY, 0,0);
534     }
535   }
536
537 #else /* !USE_SDL_LIBRARY */
538
539   /* create graphic context structures needed for clipping */
540   clip_gc_values.graphics_exposures = False;
541   clip_gc_valuemask = GCGraphicsExposures;
542   copy_clipmask_gc =
543     XCreateGC(display, clipmask[PIX_BACK], clip_gc_valuemask, &clip_gc_values);
544
545   clip_gc_values.graphics_exposures = False;
546   clip_gc_valuemask = GCGraphicsExposures;
547   tile_clip_gc =
548     XCreateGC(display, window, clip_gc_valuemask, &clip_gc_values);
549
550   for(i=0; i<NUM_BITMAPS; i++)
551   {
552     if (clipmask[i])
553     {
554       clip_gc_values.graphics_exposures = False;
555       clip_gc_values.clip_mask = clipmask[i];
556       clip_gc_valuemask = GCGraphicsExposures | GCClipMask;
557       clip_gc[i] = XCreateGC(display,window,clip_gc_valuemask,&clip_gc_values);
558     }
559   }
560
561   /* initialize pixmap array to Pixmap 'None' */
562   for(i=0; i<NUM_TILES; i++)
563     tile_clipmask[i] = None;
564
565   /* create only those clipping Pixmaps we really need */
566   for(i=0; tile_needs_clipping[i].start>=0; i++)
567   {
568     for(j=0; j<tile_needs_clipping[i].count; j++)
569     {
570       int tile = tile_needs_clipping[i].start + j;
571       int graphic = tile;
572       int src_x, src_y;
573       int pixmap_nr;
574       Pixmap src_pixmap;
575
576       getGraphicSource(graphic, &pixmap_nr, &src_x, &src_y);
577       src_pixmap = clipmask[pixmap_nr];
578
579       tile_clipmask[tile] = XCreatePixmap(display, window, TILEX,TILEY, 1);
580
581       XCopyArea(display,src_pixmap,tile_clipmask[tile],copy_clipmask_gc,
582                 src_x,src_y, TILEX,TILEY, 0,0);
583     }
584   }
585
586 #endif /* !USE_SDL_LIBRARY */
587 }
588
589 void InitGfxBackground()
590 {
591   int x, y;
592
593   drawto = backbuffer = pix[PIX_DB_BACK];
594   fieldbuffer = pix[PIX_DB_FIELD];
595   SetDrawtoField(DRAW_BACKBUFFER);
596
597   BlitBitmap(pix[PIX_BACK], backbuffer, 0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
598   ClearRectangle(backbuffer, REAL_SX,REAL_SY, FULL_SXSIZE,FULL_SYSIZE);
599   ClearRectangle(pix[PIX_DB_DOOR], 0,0, 3*DXSIZE,DYSIZE+VYSIZE);
600
601   for(x=0; x<MAX_BUF_XSIZE; x++)
602     for(y=0; y<MAX_BUF_YSIZE; y++)
603       redraw[x][y] = 0;
604   redraw_tiles = 0;
605   redraw_mask = REDRAW_ALL;
606 }
607
608 void LoadGfx(int pos, struct PictureFileInfo *pic)
609 {
610   char basefilename[256];
611   char filename[256];
612
613 #ifdef USE_SDL_LIBRARY
614   SDL_Surface *sdl_image_tmp;
615 #else /* !USE_SDL_LIBRARY */
616   int pcx_err;
617 #endif /* !USE_SDL_LIBRARY */
618   char *picture_ext = ".pcx";
619
620   /* Grafik laden */
621   if (pic->picture_filename)
622   {
623     sprintf(basefilename, "%s%s", pic->picture_filename, picture_ext);
624     DrawInitText(basefilename, 150, FC_YELLOW);
625     sprintf(filename, "%s/%s/%s",
626             options.ro_base_directory, GRAPHICS_DIRECTORY, basefilename);
627
628 #ifdef MSDOS
629     rest(100);
630 #endif /* MSDOS */
631
632 #ifdef USE_SDL_LIBRARY
633     /* load image to temporary surface */
634     if ((sdl_image_tmp = IMG_Load(filename)) == NULL)
635       Error(ERR_EXIT, "IMG_Load() failed: %s", SDL_GetError());
636
637     /* create native non-transparent surface for current image */
638     if ((pix[pos] = SDL_DisplayFormat(sdl_image_tmp)) == NULL)
639       Error(ERR_EXIT, "SDL_DisplayFormat() failed: %s", SDL_GetError());
640
641     /* create native transparent surface for current image */
642     SDL_SetColorKey(sdl_image_tmp, SDL_SRCCOLORKEY,
643                     SDL_MapRGB(sdl_image_tmp->format, 0x00, 0x00, 0x00));
644     if ((pix_masked[pos] = SDL_DisplayFormat(sdl_image_tmp)) == NULL)
645       Error(ERR_EXIT, "SDL_DisplayFormat() failed: %s", SDL_GetError());
646
647     /* free temporary surface */
648     SDL_FreeSurface(sdl_image_tmp);
649
650 #else /* !USE_SDL_LIBRARY */
651
652     pcx_err = Read_PCX_to_Pixmap(display, window, gc, filename,
653                                  &pix[pos], &clipmask[pos]);
654     switch(pcx_err)
655     {
656       case PCX_Success:
657         break;
658       case PCX_OpenFailed:
659         Error(ERR_EXIT, "cannot open PCX file '%s'", filename);
660       case PCX_ReadFailed:
661         Error(ERR_EXIT, "cannot read PCX file '%s'", filename);
662       case PCX_FileInvalid:
663         Error(ERR_EXIT, "invalid PCX file '%s'", filename);
664       case PCX_NoMemory:
665         Error(ERR_EXIT, "not enough memory for PCX file '%s'", filename);
666       case PCX_ColorFailed:
667         Error(ERR_EXIT, "cannot get colors for PCX file '%s'", filename);
668       default:
669         break;
670     }
671
672     if (!pix[pos])
673       Error(ERR_EXIT, "cannot get graphics for '%s'", pic->picture_filename);
674
675     /* setting pix_masked[] to pix[] allows BlitBitmapMasked() to always
676        use pix_masked[], although they are the same when not using SDL */
677     pix_masked[pos] = pix[pos];
678
679 #endif /* !USE_SDL_LIBRARY */
680   }
681
682 #ifndef USE_SDL_LIBRARY
683   /* zugehörige Maske laden (wenn vorhanden) */
684   if (pic->picture_with_mask && !clipmask[pos])
685     Error(ERR_EXIT, "cannot get clipmask for '%s'", pic->picture_filename);
686 #endif /* !USE_SDL_LIBRARY */
687 }
688
689 void InitGadgets()
690 {
691   CreateLevelEditorGadgets();
692   CreateGameButtons();
693   CreateTapeButtons();
694   CreateToolButtons();
695   CreateScreenGadgets();
696 }
697
698 void InitElementProperties()
699 {
700   int i,j;
701
702   static int ep_amoebalive[] =
703   {
704     EL_AMOEBE_NASS,
705     EL_AMOEBE_NORM,
706     EL_AMOEBE_VOLL,
707     EL_AMOEBE_BD
708   };
709   static int ep_amoebalive_num = sizeof(ep_amoebalive)/sizeof(int);
710
711   static int ep_amoeboid[] =
712   {
713     EL_AMOEBE_TOT,
714     EL_AMOEBE_NASS,
715     EL_AMOEBE_NORM,
716     EL_AMOEBE_VOLL,
717     EL_AMOEBE_BD
718   };
719   static int ep_amoeboid_num = sizeof(ep_amoeboid)/sizeof(int);
720
721   static int ep_schluessel[] =
722   {
723     EL_SCHLUESSEL1,
724     EL_SCHLUESSEL2,
725     EL_SCHLUESSEL3,
726     EL_SCHLUESSEL4,
727     EL_EM_KEY_1,
728     EL_EM_KEY_2,
729     EL_EM_KEY_3,
730     EL_EM_KEY_4
731   };
732   static int ep_schluessel_num = sizeof(ep_schluessel)/sizeof(int);
733
734   static int ep_pforte[] =
735   {
736     EL_PFORTE1,
737     EL_PFORTE2,
738     EL_PFORTE3,
739     EL_PFORTE4,
740     EL_PFORTE1X,
741     EL_PFORTE2X,
742     EL_PFORTE3X,
743     EL_PFORTE4X,
744     EL_EM_GATE_1,
745     EL_EM_GATE_2,
746     EL_EM_GATE_3,
747     EL_EM_GATE_4,
748     EL_EM_GATE_1X,
749     EL_EM_GATE_2X,
750     EL_EM_GATE_3X,
751     EL_EM_GATE_4X,
752     EL_SWITCHGATE_OPEN,
753     EL_SWITCHGATE_CLOSED,
754     EL_TIMEGATE_OPEN,
755     EL_TIMEGATE_CLOSED,
756     EL_TUBE_CROSS,
757     EL_TUBE_VERTICAL,
758     EL_TUBE_HORIZONTAL,
759     EL_TUBE_VERT_LEFT,
760     EL_TUBE_VERT_RIGHT,
761     EL_TUBE_HORIZ_UP,
762     EL_TUBE_HORIZ_DOWN,
763     EL_TUBE_LEFT_UP,
764     EL_TUBE_LEFT_DOWN,
765     EL_TUBE_RIGHT_UP,
766     EL_TUBE_RIGHT_DOWN
767   };
768   static int ep_pforte_num = sizeof(ep_pforte)/sizeof(int);
769
770   static int ep_solid[] =
771   {
772     EL_BETON,
773     EL_MAUERWERK,
774     EL_MAUER_LEBT,
775     EL_MAUER_X,
776     EL_MAUER_Y,
777     EL_MAUER_XY,
778     EL_BD_WALL,
779     EL_FELSBODEN,
780     EL_AUSGANG_ZU,
781     EL_AUSGANG_ACT,
782     EL_AUSGANG_AUF,
783     EL_AMOEBE_TOT,
784     EL_AMOEBE_NASS,
785     EL_AMOEBE_NORM,
786     EL_AMOEBE_VOLL,
787     EL_AMOEBE_BD,
788     EL_MORAST_VOLL,
789     EL_MORAST_LEER,
790     EL_MAGIC_WALL_OFF,
791     EL_MAGIC_WALL_EMPTY,
792     EL_MAGIC_WALL_FULL,
793     EL_MAGIC_WALL_DEAD,
794     EL_MAGIC_WALL_BD_OFF,
795     EL_MAGIC_WALL_BD_EMPTY,
796     EL_MAGIC_WALL_BD_FULL,
797     EL_MAGIC_WALL_BD_DEAD,
798     EL_LIFE,
799     EL_LIFE_ASYNC,
800     EL_BADEWANNE1,
801     EL_BADEWANNE2,
802     EL_BADEWANNE3,
803     EL_BADEWANNE4,
804     EL_BADEWANNE5,
805     EL_SP_CHIP_SINGLE,
806     EL_SP_CHIP_LEFT,
807     EL_SP_CHIP_RIGHT,
808     EL_SP_CHIP_UPPER,
809     EL_SP_CHIP_LOWER,
810     EL_SP_HARD_GRAY,
811     EL_SP_HARD_GREEN,
812     EL_SP_HARD_BLUE,
813     EL_SP_HARD_RED,
814     EL_SP_HARD_YELLOW,
815     EL_SP_HARD_BASE1,
816     EL_SP_HARD_BASE2,
817     EL_SP_HARD_BASE3,
818     EL_SP_HARD_BASE4,
819     EL_SP_HARD_BASE5,
820     EL_SP_HARD_BASE6,
821     EL_SP_TERMINAL,
822     EL_SP_EXIT,
823     EL_INVISIBLE_STEEL,
824     EL_BELT1_SWITCH_LEFT,
825     EL_BELT1_SWITCH_MIDDLE,
826     EL_BELT1_SWITCH_RIGHT,
827     EL_BELT2_SWITCH_LEFT,
828     EL_BELT2_SWITCH_MIDDLE,
829     EL_BELT2_SWITCH_RIGHT,
830     EL_BELT3_SWITCH_LEFT,
831     EL_BELT3_SWITCH_MIDDLE,
832     EL_BELT3_SWITCH_RIGHT,
833     EL_BELT4_SWITCH_LEFT,
834     EL_BELT4_SWITCH_MIDDLE,
835     EL_BELT4_SWITCH_RIGHT,
836     EL_SWITCHGATE_SWITCH_1,
837     EL_SWITCHGATE_SWITCH_2,
838     EL_LIGHT_SWITCH_OFF,
839     EL_LIGHT_SWITCH_ON,
840     EL_TIMEGATE_SWITCH_OFF,
841     EL_TIMEGATE_SWITCH_ON,
842     EL_SIGN_EXCLAMATION,
843     EL_SIGN_RADIOACTIVITY,
844     EL_SIGN_STOP,
845     EL_SIGN_WHEELCHAIR,
846     EL_SIGN_PARKING,
847     EL_SIGN_ONEWAY,
848     EL_SIGN_HEART,
849     EL_SIGN_TRIANGLE,
850     EL_SIGN_ROUND,
851     EL_SIGN_EXIT,
852     EL_SIGN_YINYANG,
853     EL_SIGN_OTHER,
854     EL_STEEL_SLANTED,
855     EL_EMC_STEEL_WALL_1,
856     EL_EMC_STEEL_WALL_2,
857     EL_EMC_STEEL_WALL_3,
858     EL_EMC_STEEL_WALL_4,
859     EL_EMC_WALL_1,
860     EL_EMC_WALL_2,
861     EL_EMC_WALL_3,
862     EL_EMC_WALL_4,
863     EL_EMC_WALL_5,
864     EL_EMC_WALL_6,
865     EL_EMC_WALL_7,
866     EL_EMC_WALL_8,
867     EL_CRYSTAL,
868     EL_WALL_PEARL,
869     EL_WALL_CRYSTAL,
870     EL_TUBE_CROSS,
871     EL_TUBE_VERTICAL,
872     EL_TUBE_HORIZONTAL,
873     EL_TUBE_VERT_LEFT,
874     EL_TUBE_VERT_RIGHT,
875     EL_TUBE_HORIZ_UP,
876     EL_TUBE_HORIZ_DOWN,
877     EL_TUBE_LEFT_UP,
878     EL_TUBE_LEFT_DOWN,
879     EL_TUBE_RIGHT_UP,
880     EL_TUBE_RIGHT_DOWN
881   };
882   static int ep_solid_num = sizeof(ep_solid)/sizeof(int);
883
884   static int ep_massive[] =
885   {
886     EL_BETON,
887     EL_SALZSAEURE,
888     EL_BADEWANNE1,
889     EL_BADEWANNE2,
890     EL_BADEWANNE3,
891     EL_BADEWANNE4,
892     EL_BADEWANNE5,
893     EL_PFORTE1,
894     EL_PFORTE2,
895     EL_PFORTE3,
896     EL_PFORTE4,
897     EL_PFORTE1X,
898     EL_PFORTE2X,
899     EL_PFORTE3X,
900     EL_PFORTE4X,
901     EL_EM_GATE_1,
902     EL_EM_GATE_2,
903     EL_EM_GATE_3,
904     EL_EM_GATE_4,
905     EL_EM_GATE_1X,
906     EL_EM_GATE_2X,
907     EL_EM_GATE_3X,
908     EL_EM_GATE_4X,
909     EL_SWITCHGATE_OPEN,
910     EL_SWITCHGATE_CLOSED,
911     EL_TIMEGATE_OPEN,
912     EL_TIMEGATE_CLOSED,
913     EL_SP_HARD_GRAY,
914     EL_SP_HARD_GREEN,
915     EL_SP_HARD_BLUE,
916     EL_SP_HARD_RED,
917     EL_SP_HARD_YELLOW,
918     EL_SP_HARD_BASE1,
919     EL_SP_HARD_BASE2,
920     EL_SP_HARD_BASE3,
921     EL_SP_HARD_BASE4,
922     EL_SP_HARD_BASE5,
923     EL_SP_HARD_BASE6,
924     EL_INVISIBLE_STEEL,
925     EL_BELT1_SWITCH_LEFT,
926     EL_BELT1_SWITCH_MIDDLE,
927     EL_BELT1_SWITCH_RIGHT,
928     EL_BELT2_SWITCH_LEFT,
929     EL_BELT2_SWITCH_MIDDLE,
930     EL_BELT2_SWITCH_RIGHT,
931     EL_BELT3_SWITCH_LEFT,
932     EL_BELT3_SWITCH_MIDDLE,
933     EL_BELT3_SWITCH_RIGHT,
934     EL_BELT4_SWITCH_LEFT,
935     EL_BELT4_SWITCH_MIDDLE,
936     EL_BELT4_SWITCH_RIGHT,
937     EL_LIGHT_SWITCH_OFF,
938     EL_LIGHT_SWITCH_ON,
939     EL_SIGN_EXCLAMATION,
940     EL_SIGN_RADIOACTIVITY,
941     EL_SIGN_STOP,
942     EL_SIGN_WHEELCHAIR,
943     EL_SIGN_PARKING,
944     EL_SIGN_ONEWAY,
945     EL_SIGN_HEART,
946     EL_SIGN_TRIANGLE,
947     EL_SIGN_ROUND,
948     EL_SIGN_EXIT,
949     EL_SIGN_YINYANG,
950     EL_SIGN_OTHER,
951     EL_STEEL_SLANTED,
952     EL_EMC_STEEL_WALL_1,
953     EL_EMC_STEEL_WALL_2,
954     EL_EMC_STEEL_WALL_3,
955     EL_EMC_STEEL_WALL_4,
956     EL_CRYSTAL,
957     EL_TUBE_CROSS,
958     EL_TUBE_VERTICAL,
959     EL_TUBE_HORIZONTAL,
960     EL_TUBE_VERT_LEFT,
961     EL_TUBE_VERT_RIGHT,
962     EL_TUBE_HORIZ_UP,
963     EL_TUBE_HORIZ_DOWN,
964     EL_TUBE_LEFT_UP,
965     EL_TUBE_LEFT_DOWN,
966     EL_TUBE_RIGHT_UP,
967     EL_TUBE_RIGHT_DOWN
968   };
969   static int ep_massive_num = sizeof(ep_massive)/sizeof(int);
970
971   static int ep_slippery[] =
972   {
973     EL_FELSBODEN,
974     EL_BD_WALL,
975     EL_FELSBROCKEN,
976     EL_BD_ROCK,
977     EL_EDELSTEIN,
978     EL_EDELSTEIN_BD,
979     EL_EDELSTEIN_GELB,
980     EL_EDELSTEIN_ROT,
981     EL_EDELSTEIN_LILA,
982     EL_DIAMANT,
983     EL_BOMBE,
984     EL_KOKOSNUSS,
985     EL_ABLENK_EIN,
986     EL_ABLENK_AUS,
987     EL_ZEIT_VOLL,
988     EL_ZEIT_LEER,
989     EL_BIRNE_EIN,
990     EL_BIRNE_AUS,
991     EL_BADEWANNE1,
992     EL_BADEWANNE2,
993     EL_SONDE,
994     EL_SP_ZONK,
995     EL_SP_INFOTRON,
996     EL_SP_CHIP_SINGLE,
997     EL_SP_CHIP_LEFT,
998     EL_SP_CHIP_RIGHT,
999     EL_SP_CHIP_UPPER,
1000     EL_SP_CHIP_LOWER,
1001     EL_SPEED_PILL,
1002     EL_STEEL_SLANTED,
1003     EL_PEARL,
1004     EL_CRYSTAL
1005   };
1006   static int ep_slippery_num = sizeof(ep_slippery)/sizeof(int);
1007
1008   static int ep_enemy[] =
1009   {
1010     EL_KAEFER,
1011     EL_FLIEGER,
1012     EL_BUTTERFLY,
1013     EL_FIREFLY,
1014     EL_MAMPFER,
1015     EL_MAMPFER2,
1016     EL_ROBOT,
1017     EL_PACMAN,
1018     EL_SP_SNIKSNAK,
1019     EL_SP_ELECTRON
1020   };
1021   static int ep_enemy_num = sizeof(ep_enemy)/sizeof(int);
1022
1023   static int ep_mauer[] =
1024   {
1025     EL_BETON,
1026     EL_PFORTE1,
1027     EL_PFORTE2,
1028     EL_PFORTE3,
1029     EL_PFORTE4,
1030     EL_PFORTE1X,
1031     EL_PFORTE2X,
1032     EL_PFORTE3X,
1033     EL_PFORTE4X,
1034     EL_EM_GATE_1,
1035     EL_EM_GATE_2,
1036     EL_EM_GATE_3,
1037     EL_EM_GATE_4,
1038     EL_EM_GATE_1X,
1039     EL_EM_GATE_2X,
1040     EL_EM_GATE_3X,
1041     EL_EM_GATE_4X,
1042     EL_AUSGANG_ZU,
1043     EL_AUSGANG_ACT,
1044     EL_AUSGANG_AUF,
1045     EL_MAUERWERK,
1046     EL_FELSBODEN,
1047     EL_MAUER_LEBT,
1048     EL_MAUER_X,
1049     EL_MAUER_Y,
1050     EL_MAUER_XY,
1051     EL_MAUERND,
1052     EL_BD_WALL,
1053     EL_SP_CHIP_SINGLE,
1054     EL_SP_CHIP_LEFT,
1055     EL_SP_CHIP_RIGHT,
1056     EL_SP_CHIP_UPPER,
1057     EL_SP_CHIP_LOWER,
1058     EL_SP_HARD_GRAY,
1059     EL_SP_HARD_GREEN,
1060     EL_SP_HARD_BLUE,
1061     EL_SP_HARD_RED,
1062     EL_SP_HARD_YELLOW,
1063     EL_SP_HARD_BASE1,
1064     EL_SP_HARD_BASE2,
1065     EL_SP_HARD_BASE3,
1066     EL_SP_HARD_BASE4,
1067     EL_SP_HARD_BASE5,
1068     EL_SP_HARD_BASE6,
1069     EL_SP_TERMINAL,
1070     EL_SP_EXIT,
1071     EL_INVISIBLE_STEEL,
1072     EL_STEEL_SLANTED,
1073     EL_EMC_STEEL_WALL_1,
1074     EL_EMC_STEEL_WALL_2,
1075     EL_EMC_STEEL_WALL_3,
1076     EL_EMC_STEEL_WALL_4,
1077     EL_EMC_WALL_1,
1078     EL_EMC_WALL_2,
1079     EL_EMC_WALL_3,
1080     EL_EMC_WALL_4,
1081     EL_EMC_WALL_5,
1082     EL_EMC_WALL_6,
1083     EL_EMC_WALL_7,
1084     EL_EMC_WALL_8
1085   };
1086   static int ep_mauer_num = sizeof(ep_mauer)/sizeof(int);
1087
1088   static int ep_can_fall[] =
1089   {
1090     EL_FELSBROCKEN,
1091     EL_BD_ROCK,
1092     EL_EDELSTEIN,
1093     EL_EDELSTEIN_BD,
1094     EL_EDELSTEIN_GELB,
1095     EL_EDELSTEIN_ROT,
1096     EL_EDELSTEIN_LILA,
1097     EL_DIAMANT,
1098     EL_BOMBE,
1099     EL_KOKOSNUSS,
1100     EL_TROPFEN,
1101     EL_MORAST_VOLL,
1102     EL_MAGIC_WALL_FULL,
1103     EL_MAGIC_WALL_BD_FULL,
1104     EL_ZEIT_VOLL,
1105     EL_ZEIT_LEER,
1106     EL_SP_ZONK,
1107     EL_SP_INFOTRON,
1108     EL_SP_DISK_ORANGE,
1109     EL_PEARL,
1110     EL_CRYSTAL,
1111     EL_SPRING,
1112     EL_DX_SUPABOMB
1113   };
1114   static int ep_can_fall_num = sizeof(ep_can_fall)/sizeof(int);
1115
1116   static int ep_can_smash[] =
1117   {
1118     EL_FELSBROCKEN,
1119     EL_BD_ROCK,
1120     EL_EDELSTEIN,
1121     EL_EDELSTEIN_BD,
1122     EL_EDELSTEIN_GELB,
1123     EL_EDELSTEIN_ROT,
1124     EL_EDELSTEIN_LILA,
1125     EL_DIAMANT,
1126     EL_SCHLUESSEL1,
1127     EL_SCHLUESSEL2,
1128     EL_SCHLUESSEL3,
1129     EL_SCHLUESSEL4,
1130     EL_EM_KEY_1,
1131     EL_EM_KEY_2,
1132     EL_EM_KEY_3,
1133     EL_EM_KEY_4,
1134     EL_BOMBE,
1135     EL_KOKOSNUSS,
1136     EL_TROPFEN,
1137     EL_ZEIT_VOLL,
1138     EL_ZEIT_LEER,
1139     EL_SP_ZONK,
1140     EL_SP_INFOTRON,
1141     EL_SP_DISK_ORANGE,
1142     EL_PEARL,
1143     EL_CRYSTAL,
1144     EL_SPRING,
1145     EL_DX_SUPABOMB
1146   };
1147   static int ep_can_smash_num = sizeof(ep_can_smash)/sizeof(int);
1148
1149   static int ep_can_change[] =
1150   {
1151     EL_FELSBROCKEN,
1152     EL_BD_ROCK,
1153     EL_EDELSTEIN,
1154     EL_EDELSTEIN_BD,
1155     EL_EDELSTEIN_GELB,
1156     EL_EDELSTEIN_ROT,
1157     EL_EDELSTEIN_LILA,
1158     EL_DIAMANT
1159   };
1160   static int ep_can_change_num = sizeof(ep_can_change)/sizeof(int);
1161
1162   static int ep_can_move[] =
1163   {
1164     EL_KAEFER,
1165     EL_FLIEGER,
1166     EL_BUTTERFLY,
1167     EL_FIREFLY,
1168     EL_MAMPFER,
1169     EL_MAMPFER2,
1170     EL_ROBOT,
1171     EL_PACMAN,
1172     EL_MOLE,
1173     EL_PINGUIN,
1174     EL_SCHWEIN,
1175     EL_DRACHE,
1176     EL_SONDE,
1177     EL_SP_SNIKSNAK,
1178     EL_SP_ELECTRON,
1179     EL_BALLOON,
1180     EL_SPRING_MOVING
1181   };
1182   static int ep_can_move_num = sizeof(ep_can_move)/sizeof(int);
1183
1184   static int ep_could_move[] =
1185   {
1186     EL_KAEFER_RIGHT,
1187     EL_KAEFER_UP,
1188     EL_KAEFER_LEFT,
1189     EL_KAEFER_DOWN,
1190     EL_FLIEGER_RIGHT,
1191     EL_FLIEGER_UP,
1192     EL_FLIEGER_LEFT,
1193     EL_FLIEGER_DOWN,
1194     EL_BUTTERFLY_RIGHT,
1195     EL_BUTTERFLY_UP,
1196     EL_BUTTERFLY_LEFT,
1197     EL_BUTTERFLY_DOWN,
1198     EL_FIREFLY_RIGHT,
1199     EL_FIREFLY_UP,
1200     EL_FIREFLY_LEFT,
1201     EL_FIREFLY_DOWN,
1202     EL_PACMAN_RIGHT,
1203     EL_PACMAN_UP,
1204     EL_PACMAN_LEFT,
1205     EL_PACMAN_DOWN
1206   };
1207   static int ep_could_move_num = sizeof(ep_could_move)/sizeof(int);
1208
1209   static int ep_dont_touch[] =
1210   {
1211     EL_KAEFER,
1212     EL_FLIEGER,
1213     EL_BUTTERFLY,
1214     EL_FIREFLY
1215   };
1216   static int ep_dont_touch_num = sizeof(ep_dont_touch)/sizeof(int);
1217
1218   static int ep_dont_go_to[] =
1219   {
1220     EL_KAEFER,
1221     EL_FLIEGER,
1222     EL_BUTTERFLY,
1223     EL_FIREFLY,
1224     EL_MAMPFER,
1225     EL_MAMPFER2,
1226     EL_ROBOT,
1227     EL_PACMAN,
1228     EL_TROPFEN,
1229     EL_SALZSAEURE,
1230     EL_SP_SNIKSNAK,
1231     EL_SP_ELECTRON,
1232     EL_SP_BUG_ACTIVE,
1233     EL_TRAP_ACTIVE,
1234     EL_LANDMINE
1235   };
1236   static int ep_dont_go_to_num = sizeof(ep_dont_go_to)/sizeof(int);
1237
1238   static int ep_mampf2[] =
1239   {
1240     EL_ERDREICH,
1241     EL_KAEFER,
1242     EL_FLIEGER,
1243     EL_BUTTERFLY,
1244     EL_FIREFLY,
1245     EL_MAMPFER,
1246     EL_ROBOT,
1247     EL_PACMAN,
1248     EL_TROPFEN,
1249     EL_AMOEBE_TOT,
1250     EL_AMOEBE_NASS,
1251     EL_AMOEBE_NORM,
1252     EL_AMOEBE_VOLL,
1253     EL_AMOEBE_BD,
1254     EL_EDELSTEIN,
1255     EL_EDELSTEIN_BD,
1256     EL_EDELSTEIN_GELB,
1257     EL_EDELSTEIN_ROT,
1258     EL_EDELSTEIN_LILA,
1259     EL_DIAMANT,
1260     EL_PEARL,
1261     EL_CRYSTAL
1262   };
1263   static int ep_mampf2_num = sizeof(ep_mampf2)/sizeof(int);
1264
1265   static int ep_bd_element[] =
1266   {
1267     EL_LEERRAUM,
1268     EL_ERDREICH,
1269     EL_FELSBODEN,
1270     EL_BD_WALL,
1271     EL_FELSBROCKEN,
1272     EL_BD_ROCK,
1273     EL_EDELSTEIN_BD,
1274     EL_MAGIC_WALL_BD_OFF,
1275     EL_AUSGANG_ZU,
1276     EL_AUSGANG_AUF,
1277     EL_BETON,
1278     EL_SPIELFIGUR,
1279     EL_FIREFLY,
1280     EL_FIREFLY_1,
1281     EL_FIREFLY_2,
1282     EL_FIREFLY_3,
1283     EL_FIREFLY_4,
1284     EL_BUTTERFLY,
1285     EL_BUTTERFLY_1,
1286     EL_BUTTERFLY_2,
1287     EL_BUTTERFLY_3,
1288     EL_BUTTERFLY_4,
1289     EL_AMOEBE_BD,
1290     EL_CHAR_FRAGE
1291   };
1292   static int ep_bd_element_num = sizeof(ep_bd_element)/sizeof(int);
1293
1294   static int ep_sb_element[] =
1295   {
1296     EL_LEERRAUM,
1297     EL_BETON,
1298     EL_SOKOBAN_OBJEKT,
1299     EL_SOKOBAN_FELD_LEER,
1300     EL_SOKOBAN_FELD_VOLL,
1301     EL_SPIELFIGUR,
1302     EL_INVISIBLE_STEEL
1303   };
1304   static int ep_sb_element_num = sizeof(ep_sb_element)/sizeof(int);
1305
1306   static int ep_gem[] =
1307   {
1308     EL_EDELSTEIN,
1309     EL_EDELSTEIN_BD,
1310     EL_EDELSTEIN_GELB,
1311     EL_EDELSTEIN_ROT,
1312     EL_EDELSTEIN_LILA,
1313     EL_DIAMANT,
1314     EL_SP_INFOTRON
1315   };
1316   static int ep_gem_num = sizeof(ep_gem)/sizeof(int);
1317
1318   static int ep_inactive[] =
1319   {
1320     EL_LEERRAUM,
1321     EL_ERDREICH,
1322     EL_MAUERWERK,
1323     EL_BD_WALL,
1324     EL_FELSBODEN,
1325     EL_SCHLUESSEL,
1326     EL_BETON,
1327     EL_AMOEBE_TOT,
1328     EL_MORAST_LEER,
1329     EL_BADEWANNE,
1330     EL_ABLENK_AUS,
1331     EL_SCHLUESSEL1,
1332     EL_SCHLUESSEL2,
1333     EL_SCHLUESSEL3,
1334     EL_SCHLUESSEL4,
1335     EL_EM_KEY_1,
1336     EL_EM_KEY_2,
1337     EL_EM_KEY_3,
1338     EL_EM_KEY_4,
1339     EL_PFORTE1,
1340     EL_PFORTE2,
1341     EL_PFORTE3,
1342     EL_PFORTE4,
1343     EL_PFORTE1X,
1344     EL_PFORTE2X,
1345     EL_PFORTE3X,
1346     EL_PFORTE4X,
1347     EL_EM_GATE_1,
1348     EL_EM_GATE_2,
1349     EL_EM_GATE_3,
1350     EL_EM_GATE_4,
1351     EL_EM_GATE_1X,
1352     EL_EM_GATE_2X,
1353     EL_EM_GATE_3X,
1354     EL_EM_GATE_4X,
1355     EL_DYNAMITE_INACTIVE,
1356     EL_UNSICHTBAR,
1357     EL_BIRNE_AUS,
1358     EL_BIRNE_EIN,
1359     EL_ERZ_EDEL,
1360     EL_ERZ_DIAM,
1361     EL_ERZ_EDEL_BD,
1362     EL_ERZ_EDEL_GELB,
1363     EL_DYNABOMB_NR,
1364     EL_DYNABOMB_SZ,
1365     EL_DYNABOMB_XL,
1366     EL_SOKOBAN_OBJEKT,
1367     EL_SOKOBAN_FELD_LEER,
1368     EL_SOKOBAN_FELD_VOLL,
1369     EL_ERZ_EDEL_ROT,
1370     EL_ERZ_EDEL_LILA,
1371     EL_BADEWANNE1,
1372     EL_BADEWANNE2,
1373     EL_BADEWANNE3,
1374     EL_BADEWANNE4,
1375     EL_BADEWANNE5,
1376     EL_MAGIC_WALL_OFF,
1377     EL_MAGIC_WALL_DEAD,
1378     EL_MAGIC_WALL_BD_OFF,
1379     EL_MAGIC_WALL_BD_DEAD,
1380     EL_AMOEBA2DIAM,
1381     EL_BLOCKED,
1382     EL_SP_EMPTY,
1383     EL_SP_BASE,
1384     EL_SP_PORT1_RIGHT,
1385     EL_SP_PORT1_DOWN,
1386     EL_SP_PORT1_LEFT,
1387     EL_SP_PORT1_UP,
1388     EL_SP_PORT2_RIGHT,
1389     EL_SP_PORT2_DOWN,
1390     EL_SP_PORT2_LEFT,
1391     EL_SP_PORT2_UP,
1392     EL_SP_PORT_X,
1393     EL_SP_PORT_Y,
1394     EL_SP_PORT_XY,
1395     EL_SP_DISK_RED,
1396     EL_SP_DISK_YELLOW,
1397     EL_SP_CHIP_SINGLE,
1398     EL_SP_CHIP_LEFT,
1399     EL_SP_CHIP_RIGHT,
1400     EL_SP_CHIP_UPPER,
1401     EL_SP_CHIP_LOWER,
1402     EL_SP_HARD_GRAY,
1403     EL_SP_HARD_GREEN,
1404     EL_SP_HARD_BLUE,
1405     EL_SP_HARD_RED,
1406     EL_SP_HARD_YELLOW,
1407     EL_SP_HARD_BASE1,
1408     EL_SP_HARD_BASE2,
1409     EL_SP_HARD_BASE3,
1410     EL_SP_HARD_BASE4,
1411     EL_SP_HARD_BASE5,
1412     EL_SP_HARD_BASE6,
1413     EL_SP_EXIT,
1414     EL_INVISIBLE_STEEL,
1415     EL_BELT1_SWITCH_LEFT,
1416     EL_BELT1_SWITCH_MIDDLE,
1417     EL_BELT1_SWITCH_RIGHT,
1418     EL_BELT2_SWITCH_LEFT,
1419     EL_BELT2_SWITCH_MIDDLE,
1420     EL_BELT2_SWITCH_RIGHT,
1421     EL_BELT3_SWITCH_LEFT,
1422     EL_BELT3_SWITCH_MIDDLE,
1423     EL_BELT3_SWITCH_RIGHT,
1424     EL_BELT4_SWITCH_LEFT,
1425     EL_BELT4_SWITCH_MIDDLE,
1426     EL_BELT4_SWITCH_RIGHT,
1427     EL_SIGN_EXCLAMATION,
1428     EL_SIGN_RADIOACTIVITY,
1429     EL_SIGN_STOP,
1430     EL_SIGN_WHEELCHAIR,
1431     EL_SIGN_PARKING,
1432     EL_SIGN_ONEWAY,
1433     EL_SIGN_HEART,
1434     EL_SIGN_TRIANGLE,
1435     EL_SIGN_ROUND,
1436     EL_SIGN_EXIT,
1437     EL_SIGN_YINYANG,
1438     EL_SIGN_OTHER,
1439     EL_STEEL_SLANTED,
1440     EL_EMC_STEEL_WALL_1,
1441     EL_EMC_STEEL_WALL_2,
1442     EL_EMC_STEEL_WALL_3,
1443     EL_EMC_STEEL_WALL_4,
1444     EL_EMC_WALL_1,
1445     EL_EMC_WALL_2,
1446     EL_EMC_WALL_3,
1447     EL_EMC_WALL_4,
1448     EL_EMC_WALL_5,
1449     EL_EMC_WALL_6,
1450     EL_EMC_WALL_7,
1451     EL_EMC_WALL_8
1452   };
1453   static int ep_inactive_num = sizeof(ep_inactive)/sizeof(int);
1454
1455   static int ep_explosive[] =
1456   {
1457     EL_BOMBE,
1458     EL_DYNAMITE_ACTIVE,
1459     EL_DYNAMITE_INACTIVE,
1460     EL_DYNABOMB_ACTIVE_1,
1461     EL_DYNABOMB_ACTIVE_2,
1462     EL_DYNABOMB_ACTIVE_3,
1463     EL_DYNABOMB_ACTIVE_4,
1464     EL_DYNABOMB_NR,
1465     EL_DYNABOMB_SZ,
1466     EL_DYNABOMB_XL,
1467     EL_KAEFER,
1468     EL_MOLE,
1469     EL_PINGUIN,
1470     EL_SCHWEIN,
1471     EL_DRACHE,
1472     EL_SONDE,
1473     EL_SP_DISK_RED,
1474     EL_SP_DISK_ORANGE,
1475     EL_SP_DISK_YELLOW,
1476     EL_SP_SNIKSNAK,
1477     EL_SP_ELECTRON,
1478     EL_DX_SUPABOMB
1479   };
1480   static int ep_explosive_num = sizeof(ep_explosive)/sizeof(int);
1481
1482   static int ep_mampf3[] =
1483   {
1484     EL_EDELSTEIN,
1485     EL_EDELSTEIN_BD,
1486     EL_EDELSTEIN_GELB,
1487     EL_EDELSTEIN_ROT,
1488     EL_EDELSTEIN_LILA,
1489     EL_DIAMANT,
1490     EL_PEARL,
1491     EL_CRYSTAL
1492   };
1493   static int ep_mampf3_num = sizeof(ep_mampf3)/sizeof(int);
1494
1495   static int ep_pushable[] =
1496   {
1497     EL_FELSBROCKEN,
1498     EL_BD_ROCK,
1499     EL_BOMBE,
1500     EL_KOKOSNUSS,
1501     EL_ZEIT_LEER,
1502     EL_SOKOBAN_FELD_VOLL,
1503     EL_SOKOBAN_OBJEKT,
1504     EL_SONDE,
1505     EL_SP_ZONK,
1506     EL_SP_DISK_ORANGE,
1507     EL_SP_DISK_YELLOW,
1508     EL_BALLOON,
1509     EL_SPRING,
1510     EL_DX_SUPABOMB
1511   };
1512   static int ep_pushable_num = sizeof(ep_pushable)/sizeof(int);
1513
1514   static int ep_player[] =
1515   {
1516     EL_SPIELFIGUR,
1517     EL_SPIELER1,
1518     EL_SPIELER2,
1519     EL_SPIELER3,
1520     EL_SPIELER4
1521   };
1522   static int ep_player_num = sizeof(ep_player)/sizeof(int);
1523
1524   static int ep_has_content[] =
1525   {
1526     EL_MAMPFER,
1527     EL_AMOEBE_NASS,
1528     EL_AMOEBE_NORM,
1529     EL_AMOEBE_VOLL,
1530     EL_AMOEBE_BD
1531   };
1532   static int ep_has_content_num = sizeof(ep_has_content)/sizeof(int);
1533
1534   static int ep_eatable[] =
1535   {
1536     EL_ERDREICH,
1537     EL_SP_BASE,
1538     EL_SP_BUG,
1539     EL_TRAP_INACTIVE,
1540     EL_SAND_INVISIBLE
1541   };
1542   static int ep_eatable_num = sizeof(ep_eatable)/sizeof(int);
1543
1544   static int ep_sp_element[] =
1545   {
1546     EL_SP_EMPTY,
1547     EL_SP_ZONK,
1548     EL_SP_BASE,
1549     EL_SP_MURPHY,
1550     EL_SP_INFOTRON,
1551     EL_SP_CHIP_SINGLE,
1552     EL_SP_HARD_GRAY,
1553     EL_SP_EXIT,
1554     EL_SP_DISK_ORANGE,
1555     EL_SP_PORT1_RIGHT,
1556     EL_SP_PORT1_DOWN,
1557     EL_SP_PORT1_LEFT,
1558     EL_SP_PORT1_UP,
1559     EL_SP_PORT2_RIGHT,
1560     EL_SP_PORT2_DOWN,
1561     EL_SP_PORT2_LEFT,
1562     EL_SP_PORT2_UP,
1563     EL_SP_SNIKSNAK,
1564     EL_SP_DISK_YELLOW,
1565     EL_SP_TERMINAL,
1566     EL_SP_DISK_RED,
1567     EL_SP_PORT_Y,
1568     EL_SP_PORT_X,
1569     EL_SP_PORT_XY,
1570     EL_SP_ELECTRON,
1571     EL_SP_BUG,
1572     EL_SP_CHIP_LEFT,
1573     EL_SP_CHIP_RIGHT,
1574     EL_SP_HARD_BASE1,
1575     EL_SP_HARD_GREEN,
1576     EL_SP_HARD_BLUE,
1577     EL_SP_HARD_RED,
1578     EL_SP_HARD_YELLOW,
1579     EL_SP_HARD_BASE2,
1580     EL_SP_HARD_BASE3,
1581     EL_SP_HARD_BASE4,
1582     EL_SP_HARD_BASE5,
1583     EL_SP_HARD_BASE6,
1584     EL_SP_CHIP_UPPER,
1585     EL_SP_CHIP_LOWER,
1586     /* additional elements that appeared in newer Supaplex levels */
1587     EL_UNSICHTBAR,
1588     /* more than one murphy in a level results in an inactive clone */
1589     EL_SP_MURPHY_CLONE
1590   };
1591   static int ep_sp_element_num = sizeof(ep_sp_element)/sizeof(int);
1592
1593   static int ep_quick_gate[] =
1594   {
1595     EL_EM_GATE_1,
1596     EL_EM_GATE_2,
1597     EL_EM_GATE_3,
1598     EL_EM_GATE_4,
1599     EL_EM_GATE_1X,
1600     EL_EM_GATE_2X,
1601     EL_EM_GATE_3X,
1602     EL_EM_GATE_4X,
1603     EL_SP_PORT1_LEFT,
1604     EL_SP_PORT2_LEFT,
1605     EL_SP_PORT1_RIGHT,
1606     EL_SP_PORT2_RIGHT,
1607     EL_SP_PORT1_UP,
1608     EL_SP_PORT2_UP,
1609     EL_SP_PORT1_DOWN,
1610     EL_SP_PORT2_DOWN,
1611     EL_SP_PORT_X,
1612     EL_SP_PORT_Y,
1613     EL_SP_PORT_XY,
1614     EL_SWITCHGATE_OPEN,
1615     EL_TIMEGATE_OPEN
1616   };
1617   static int ep_quick_gate_num = sizeof(ep_quick_gate)/sizeof(int);
1618
1619   static int ep_over_player[] =
1620   {
1621     EL_SP_PORT1_LEFT,
1622     EL_SP_PORT2_LEFT,
1623     EL_SP_PORT1_RIGHT,
1624     EL_SP_PORT2_RIGHT,
1625     EL_SP_PORT1_UP,
1626     EL_SP_PORT2_UP,
1627     EL_SP_PORT1_DOWN,
1628     EL_SP_PORT2_DOWN,
1629     EL_SP_PORT_X,
1630     EL_SP_PORT_Y,
1631     EL_SP_PORT_XY,
1632     EL_TUBE_CROSS,
1633     EL_TUBE_VERTICAL,
1634     EL_TUBE_HORIZONTAL,
1635     EL_TUBE_VERT_LEFT,
1636     EL_TUBE_VERT_RIGHT,
1637     EL_TUBE_HORIZ_UP,
1638     EL_TUBE_HORIZ_DOWN,
1639     EL_TUBE_LEFT_UP,
1640     EL_TUBE_LEFT_DOWN,
1641     EL_TUBE_RIGHT_UP,
1642     EL_TUBE_RIGHT_DOWN
1643   };
1644   static int ep_over_player_num = sizeof(ep_over_player)/sizeof(int);
1645
1646   static int ep_active_bomb[] =
1647   {
1648     EL_DYNAMITE_ACTIVE,
1649     EL_DYNABOMB_ACTIVE_1,
1650     EL_DYNABOMB_ACTIVE_2,
1651     EL_DYNABOMB_ACTIVE_3,
1652     EL_DYNABOMB_ACTIVE_4
1653   };
1654   static int ep_active_bomb_num = sizeof(ep_active_bomb)/sizeof(int);
1655
1656   static int ep_belt[] =
1657   {
1658     EL_BELT1_LEFT,
1659     EL_BELT1_MIDDLE,
1660     EL_BELT1_RIGHT,
1661     EL_BELT2_LEFT,
1662     EL_BELT2_MIDDLE,
1663     EL_BELT2_RIGHT,
1664     EL_BELT3_LEFT,
1665     EL_BELT3_MIDDLE,
1666     EL_BELT3_RIGHT,
1667     EL_BELT4_LEFT,
1668     EL_BELT4_MIDDLE,
1669     EL_BELT4_RIGHT,
1670   };
1671   static int ep_belt_num = sizeof(ep_belt)/sizeof(int);
1672
1673   static int ep_belt_switch[] =
1674   {
1675     EL_BELT1_SWITCH_LEFT,
1676     EL_BELT1_SWITCH_MIDDLE,
1677     EL_BELT1_SWITCH_RIGHT,
1678     EL_BELT2_SWITCH_LEFT,
1679     EL_BELT2_SWITCH_MIDDLE,
1680     EL_BELT2_SWITCH_RIGHT,
1681     EL_BELT3_SWITCH_LEFT,
1682     EL_BELT3_SWITCH_MIDDLE,
1683     EL_BELT3_SWITCH_RIGHT,
1684     EL_BELT4_SWITCH_LEFT,
1685     EL_BELT4_SWITCH_MIDDLE,
1686     EL_BELT4_SWITCH_RIGHT,
1687   };
1688   static int ep_belt_switch_num = sizeof(ep_belt_switch)/sizeof(int);
1689
1690   static int ep_tube[] =
1691   {
1692     EL_TUBE_CROSS,
1693     EL_TUBE_VERTICAL,
1694     EL_TUBE_HORIZONTAL,
1695     EL_TUBE_VERT_LEFT,
1696     EL_TUBE_VERT_RIGHT,
1697     EL_TUBE_HORIZ_UP,
1698     EL_TUBE_HORIZ_DOWN,
1699     EL_TUBE_LEFT_UP,
1700     EL_TUBE_LEFT_DOWN,
1701     EL_TUBE_RIGHT_UP,
1702     EL_TUBE_RIGHT_DOWN
1703   };
1704   static int ep_tube_num = sizeof(ep_tube)/sizeof(int);
1705
1706   static long ep1_bit[] =
1707   {
1708     EP_BIT_AMOEBALIVE,
1709     EP_BIT_AMOEBOID,
1710     EP_BIT_SCHLUESSEL,
1711     EP_BIT_PFORTE,
1712     EP_BIT_SOLID,
1713     EP_BIT_MASSIVE,
1714     EP_BIT_SLIPPERY,
1715     EP_BIT_ENEMY,
1716     EP_BIT_MAUER,
1717     EP_BIT_CAN_FALL,
1718     EP_BIT_CAN_SMASH,
1719     EP_BIT_CAN_CHANGE,
1720     EP_BIT_CAN_MOVE,
1721     EP_BIT_COULD_MOVE,
1722     EP_BIT_DONT_TOUCH,
1723     EP_BIT_DONT_GO_TO,
1724     EP_BIT_MAMPF2,
1725     EP_BIT_BD_ELEMENT,
1726     EP_BIT_SB_ELEMENT,
1727     EP_BIT_GEM,
1728     EP_BIT_INACTIVE,
1729     EP_BIT_EXPLOSIVE,
1730     EP_BIT_MAMPF3,
1731     EP_BIT_PUSHABLE,
1732     EP_BIT_PLAYER,
1733     EP_BIT_HAS_CONTENT,
1734     EP_BIT_EATABLE,
1735     EP_BIT_SP_ELEMENT,
1736     EP_BIT_QUICK_GATE,
1737     EP_BIT_OVER_PLAYER,
1738     EP_BIT_ACTIVE_BOMB
1739   };
1740   static long ep2_bit[] =
1741   {
1742     EP_BIT_BELT,
1743     EP_BIT_BELT_SWITCH,
1744     EP_BIT_TUBE
1745   };
1746   static int *ep1_array[] =
1747   {
1748     ep_amoebalive,
1749     ep_amoeboid,
1750     ep_schluessel,
1751     ep_pforte,
1752     ep_solid,
1753     ep_massive,
1754     ep_slippery,
1755     ep_enemy,
1756     ep_mauer,
1757     ep_can_fall,
1758     ep_can_smash,
1759     ep_can_change,
1760     ep_can_move,
1761     ep_could_move,
1762     ep_dont_touch,
1763     ep_dont_go_to,
1764     ep_mampf2,
1765     ep_bd_element,
1766     ep_sb_element,
1767     ep_gem,
1768     ep_inactive,
1769     ep_explosive,
1770     ep_mampf3,
1771     ep_pushable,
1772     ep_player,
1773     ep_has_content,
1774     ep_eatable,
1775     ep_sp_element,
1776     ep_quick_gate,
1777     ep_over_player,
1778     ep_active_bomb
1779   };
1780   static int *ep2_array[] =
1781   {
1782     ep_belt,
1783     ep_belt_switch,
1784     ep_tube
1785   };
1786   static int *ep1_num[] =
1787   {
1788     &ep_amoebalive_num,
1789     &ep_amoeboid_num,
1790     &ep_schluessel_num,
1791     &ep_pforte_num,
1792     &ep_solid_num,
1793     &ep_massive_num,
1794     &ep_slippery_num,
1795     &ep_enemy_num,
1796     &ep_mauer_num,
1797     &ep_can_fall_num,
1798     &ep_can_smash_num,
1799     &ep_can_change_num,
1800     &ep_can_move_num,
1801     &ep_could_move_num,
1802     &ep_dont_touch_num,
1803     &ep_dont_go_to_num,
1804     &ep_mampf2_num,
1805     &ep_bd_element_num,
1806     &ep_sb_element_num,
1807     &ep_gem_num,
1808     &ep_inactive_num,
1809     &ep_explosive_num,
1810     &ep_mampf3_num,
1811     &ep_pushable_num,
1812     &ep_player_num,
1813     &ep_has_content_num,
1814     &ep_eatable_num,
1815     &ep_sp_element_num,
1816     &ep_quick_gate_num,
1817     &ep_over_player_num,
1818     &ep_active_bomb_num
1819   };
1820   static int *ep2_num[] =
1821   {
1822     &ep_belt_num,
1823     &ep_belt_switch_num,
1824     &ep_tube_num
1825   };
1826   static int num_properties1 = sizeof(ep1_num)/sizeof(int *);
1827   static int num_properties2 = sizeof(ep2_num)/sizeof(int *);
1828
1829   for(i=0; i<MAX_ELEMENTS; i++)
1830   {
1831     Elementeigenschaften1[i] = 0;
1832     Elementeigenschaften2[i] = 0;
1833   }
1834
1835   for(i=0; i<num_properties1; i++)
1836     for(j=0; j<*(ep1_num[i]); j++)
1837       Elementeigenschaften1[(ep1_array[i])[j]] |= ep1_bit[i];
1838   for(i=0; i<num_properties2; i++)
1839     for(j=0; j<*(ep2_num[i]); j++)
1840       Elementeigenschaften2[(ep2_array[i])[j]] |= ep2_bit[i];
1841
1842   for(i=EL_CHAR_START; i<=EL_CHAR_END; i++)
1843     Elementeigenschaften1[i] |= (EP_BIT_CHAR | EP_BIT_INACTIVE);
1844 }
1845
1846 void CloseAllAndExit(int exit_value)
1847 {
1848   int i;
1849
1850 #ifdef USE_SDL_LIBRARY
1851   StopSounds();
1852   FreeSounds(NUM_SOUNDS);
1853 #else
1854   if (sound_process_id)
1855   {
1856     StopSounds();
1857     kill(sound_process_id, SIGTERM);
1858     FreeSounds(NUM_SOUNDS);
1859   }
1860 #endif
1861
1862   for(i=0; i<NUM_BITMAPS; i++)
1863   {
1864     if (pix[i])
1865       FreeBitmap(pix[i]);
1866
1867 #ifdef USE_SDL_LIBRARY
1868     FreeBitmap(pix_masked[i]);
1869 #else
1870     if (clipmask[i])
1871       FreeBitmap(clipmask[i]);
1872     if (clip_gc[i])
1873       XFreeGC(display, clip_gc[i]);
1874 #endif
1875   }
1876
1877 #ifdef USE_SDL_LIBRARY
1878   KeyboardAutoRepeatOn();
1879 #else
1880   if (gc)
1881     XFreeGC(display, gc);
1882
1883   if (display)
1884   {
1885     KeyboardAutoRepeatOn();
1886     XCloseDisplay(display);
1887   }
1888 #endif
1889
1890 #if defined(MSDOS) || defined(WIN32)
1891   dumpErrorFile();
1892 #endif
1893
1894   exit(exit_value);
1895 }