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