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