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