rnd-19990929-2-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   InitLevelAndPlayerInfo();
89   InitGadgets();                /* needs to know number of level series */
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     { "More",   TRUE },
480     { "Font",   FALSE },
481     { "Font2",  FALSE },
482     { "Font3",  FALSE }
483   }; 
484 #else
485   static struct PictureFileInfo pic[NUM_PICTURES] =
486   {
487     { "RocksScreen",    TRUE },
488     { "RocksDoor",      TRUE },
489     { "RocksHeroes",    TRUE },
490     { "RocksToons",     TRUE },
491     { "RocksSP",        TRUE },
492     { "RocksDC",        TRUE },
493     { "RocksMore",      TRUE },
494     { "RocksFont",      FALSE },
495     { "RocksFont2",     FALSE },
496     { "RocksFont3",     FALSE }
497   }; 
498 #endif
499
500 #ifdef DEBUG
501 #if 0
502   static struct PictureFileInfo test_pic1 =
503   {
504     "RocksFont2",
505     FALSE
506   };
507   static struct PictureFileInfo test_pic2 =
508   {
509     "mouse",
510     FALSE
511   };
512 #endif
513 #endif
514
515   static struct
516   {
517     int start;
518     int count;
519   }
520   tile_needs_clipping[] =
521   {
522     { GFX_SPIELER1_UP, 4 },
523     { GFX_SPIELER1_DOWN, 4 },
524     { GFX_SPIELER1_LEFT, 4 },
525     { GFX_SPIELER1_RIGHT, 4 },
526     { GFX_SPIELER1_PUSH_LEFT, 4 },
527     { GFX_SPIELER1_PUSH_RIGHT, 4 },
528     { GFX_SPIELER2_UP, 4 },
529     { GFX_SPIELER2_DOWN, 4 },
530     { GFX_SPIELER2_LEFT, 4 },
531     { GFX_SPIELER2_RIGHT, 4 },
532     { GFX_SPIELER2_PUSH_LEFT, 4 },
533     { GFX_SPIELER2_PUSH_RIGHT, 4 },
534     { GFX_SPIELER3_UP, 4 },
535     { GFX_SPIELER3_DOWN, 4 },
536     { GFX_SPIELER3_LEFT, 4 },
537     { GFX_SPIELER3_RIGHT, 4 },
538     { GFX_SPIELER3_PUSH_LEFT, 4 },
539     { GFX_SPIELER3_PUSH_RIGHT, 4 },
540     { GFX_SPIELER4_UP, 4 },
541     { GFX_SPIELER4_DOWN, 4 },
542     { GFX_SPIELER4_LEFT, 4 },
543     { GFX_SPIELER4_RIGHT, 4 },
544     { GFX_SPIELER4_PUSH_LEFT, 4 },
545     { GFX_SPIELER4_PUSH_RIGHT, 4 },
546     { GFX_SP_MURPHY, 1 },
547     { GFX_MURPHY_GO_LEFT, 3 },
548     { GFX_MURPHY_GO_RIGHT, 3 },
549     { GFX_MURPHY_SNAP_UP, 1 },
550     { GFX_MURPHY_SNAP_DOWN, 1 },
551     { GFX_MURPHY_SNAP_RIGHT, 1 },
552     { GFX_MURPHY_SNAP_LEFT, 1 },
553     { GFX_MURPHY_PUSH_RIGHT, 1 },
554     { GFX_MURPHY_PUSH_LEFT, 1 },
555     { GFX_GEBLUBBER, 4 },
556     { GFX_DYNAMIT, 7 },
557     { GFX_DYNABOMB, 4 },
558     { GFX_EXPLOSION, 8 },
559     { GFX_SOKOBAN_OBJEKT, 1 },
560     { GFX_FUNKELN_BLAU, 3 },
561     { GFX_FUNKELN_WEISS, 3 },
562     { GFX2_SHIELD_PASSIVE, 3 },
563     { GFX2_SHIELD_ACTIVE, 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   CreateScreenGadgets();
819 }
820
821 void InitElementProperties()
822 {
823   int i,j;
824
825   static int ep_amoebalive[] =
826   {
827     EL_AMOEBE_NASS,
828     EL_AMOEBE_NORM,
829     EL_AMOEBE_VOLL,
830     EL_AMOEBE_BD
831   };
832   static int ep_amoebalive_num = sizeof(ep_amoebalive)/sizeof(int);
833
834   static int ep_amoeboid[] =
835   {
836     EL_AMOEBE_TOT,
837     EL_AMOEBE_NASS,
838     EL_AMOEBE_NORM,
839     EL_AMOEBE_VOLL,
840     EL_AMOEBE_BD
841   };
842   static int ep_amoeboid_num = sizeof(ep_amoeboid)/sizeof(int);
843
844   static int ep_schluessel[] =
845   {
846     EL_SCHLUESSEL1,
847     EL_SCHLUESSEL2,
848     EL_SCHLUESSEL3,
849     EL_SCHLUESSEL4,
850     EL_EM_KEY_1,
851     EL_EM_KEY_2,
852     EL_EM_KEY_3,
853     EL_EM_KEY_4
854   };
855   static int ep_schluessel_num = sizeof(ep_schluessel)/sizeof(int);
856
857   static int ep_pforte[] =
858   {
859     EL_PFORTE1,
860     EL_PFORTE2,
861     EL_PFORTE3,
862     EL_PFORTE4,
863     EL_PFORTE1X,
864     EL_PFORTE2X,
865     EL_PFORTE3X,
866     EL_PFORTE4X,
867     EL_EM_GATE_1,
868     EL_EM_GATE_2,
869     EL_EM_GATE_3,
870     EL_EM_GATE_4,
871     EL_EM_GATE_1X,
872     EL_EM_GATE_2X,
873     EL_EM_GATE_3X,
874     EL_EM_GATE_4X,
875     EL_SWITCHGATE_OPEN,
876     EL_SWITCHGATE_CLOSED,
877     EL_TIMEGATE_OPEN,
878     EL_TIMEGATE_CLOSED
879   };
880   static int ep_pforte_num = sizeof(ep_pforte)/sizeof(int);
881
882   static int ep_solid[] =
883   {
884     EL_BETON,
885     EL_MAUERWERK,
886     EL_MAUER_LEBT,
887     EL_MAUER_X,
888     EL_MAUER_Y,
889     EL_MAUER_XY,
890     EL_FELSBODEN,
891     EL_AUSGANG_ZU,
892     EL_AUSGANG_ACT,
893     EL_AUSGANG_AUF,
894     EL_AMOEBE_TOT,
895     EL_AMOEBE_NASS,
896     EL_AMOEBE_NORM,
897     EL_AMOEBE_VOLL,
898     EL_AMOEBE_BD,
899     EL_MORAST_VOLL,
900     EL_MORAST_LEER,
901     EL_SIEB_INAKTIV,
902     EL_SIEB_LEER,
903     EL_SIEB_VOLL,
904     EL_SIEB_TOT,
905     EL_SIEB2_INAKTIV,
906     EL_SIEB2_LEER,
907     EL_SIEB2_VOLL,
908     EL_SIEB2_TOT,
909     EL_LIFE,
910     EL_LIFE_ASYNC,
911     EL_BADEWANNE1,
912     EL_BADEWANNE2,
913     EL_BADEWANNE3,
914     EL_BADEWANNE4,
915     EL_BADEWANNE5,
916     EL_SP_CHIP_SINGLE,
917     EL_SP_CHIP_LEFT,
918     EL_SP_CHIP_RIGHT,
919     EL_SP_CHIP_UPPER,
920     EL_SP_CHIP_LOWER,
921     EL_SP_HARD_GRAY,
922     EL_SP_HARD_GREEN,
923     EL_SP_HARD_BLUE,
924     EL_SP_HARD_RED,
925     EL_SP_HARD_YELLOW,
926     EL_SP_HARD_BASE1,
927     EL_SP_HARD_BASE2,
928     EL_SP_HARD_BASE3,
929     EL_SP_HARD_BASE4,
930     EL_SP_HARD_BASE5,
931     EL_SP_HARD_BASE6,
932     EL_SP_TERMINAL,
933     EL_SP_EXIT,
934     EL_INVISIBLE_STEEL,
935     EL_BELT1_SWITCH_LEFT,
936     EL_BELT1_SWITCH_MIDDLE,
937     EL_BELT1_SWITCH_RIGHT,
938     EL_BELT2_SWITCH_LEFT,
939     EL_BELT2_SWITCH_MIDDLE,
940     EL_BELT2_SWITCH_RIGHT,
941     EL_BELT3_SWITCH_LEFT,
942     EL_BELT3_SWITCH_MIDDLE,
943     EL_BELT3_SWITCH_RIGHT,
944     EL_BELT4_SWITCH_LEFT,
945     EL_BELT4_SWITCH_MIDDLE,
946     EL_BELT4_SWITCH_RIGHT,
947     EL_SWITCHGATE_SWITCH_1,
948     EL_SWITCHGATE_SWITCH_2,
949     EL_LIGHT_SWITCH_OFF,
950     EL_LIGHT_SWITCH_ON,
951     EL_TIMEGATE_SWITCH_OFF,
952     EL_TIMEGATE_SWITCH_ON,
953     EL_SIGN_EXCLAMATION,
954     EL_SIGN_RADIOACTIVITY,
955     EL_SIGN_STOP,
956     EL_SIGN_WHEELCHAIR,
957     EL_SIGN_PARKING,
958     EL_SIGN_ONEWAY,
959     EL_SIGN_HEART,
960     EL_SIGN_TRIANGLE,
961     EL_SIGN_ROUND,
962     EL_SIGN_EXIT,
963     EL_SIGN_YINYANG,
964     EL_SIGN_OTHER,
965     EL_STEEL_SLANTED,
966     EL_EMC_STEEL_WALL_1,
967     EL_EMC_STEEL_WALL_2,
968     EL_EMC_STEEL_WALL_3,
969     EL_EMC_STEEL_WALL_4,
970     EL_EMC_WALL_1,
971     EL_EMC_WALL_2,
972     EL_EMC_WALL_3,
973     EL_EMC_WALL_4,
974     EL_EMC_WALL_5,
975     EL_EMC_WALL_6,
976     EL_EMC_WALL_7,
977     EL_EMC_WALL_8
978   };
979   static int ep_solid_num = sizeof(ep_solid)/sizeof(int);
980
981   static int ep_massive[] =
982   {
983     EL_BETON,
984     EL_SALZSAEURE,
985     EL_BADEWANNE1,
986     EL_BADEWANNE2,
987     EL_BADEWANNE3,
988     EL_BADEWANNE4,
989     EL_BADEWANNE5,
990     EL_PFORTE1,
991     EL_PFORTE2,
992     EL_PFORTE3,
993     EL_PFORTE4,
994     EL_PFORTE1X,
995     EL_PFORTE2X,
996     EL_PFORTE3X,
997     EL_PFORTE4X,
998     EL_EM_GATE_1,
999     EL_EM_GATE_2,
1000     EL_EM_GATE_3,
1001     EL_EM_GATE_4,
1002     EL_EM_GATE_1X,
1003     EL_EM_GATE_2X,
1004     EL_EM_GATE_3X,
1005     EL_EM_GATE_4X,
1006     EL_SWITCHGATE_OPEN,
1007     EL_SWITCHGATE_CLOSED,
1008     EL_TIMEGATE_OPEN,
1009     EL_TIMEGATE_CLOSED,
1010     EL_SP_HARD_GRAY,
1011     EL_SP_HARD_GREEN,
1012     EL_SP_HARD_BLUE,
1013     EL_SP_HARD_RED,
1014     EL_SP_HARD_YELLOW,
1015     EL_SP_HARD_BASE1,
1016     EL_SP_HARD_BASE2,
1017     EL_SP_HARD_BASE3,
1018     EL_SP_HARD_BASE4,
1019     EL_SP_HARD_BASE5,
1020     EL_SP_HARD_BASE6,
1021     EL_INVISIBLE_STEEL,
1022     EL_BELT1_SWITCH_LEFT,
1023     EL_BELT1_SWITCH_MIDDLE,
1024     EL_BELT1_SWITCH_RIGHT,
1025     EL_BELT2_SWITCH_LEFT,
1026     EL_BELT2_SWITCH_MIDDLE,
1027     EL_BELT2_SWITCH_RIGHT,
1028     EL_BELT3_SWITCH_LEFT,
1029     EL_BELT3_SWITCH_MIDDLE,
1030     EL_BELT3_SWITCH_RIGHT,
1031     EL_BELT4_SWITCH_LEFT,
1032     EL_BELT4_SWITCH_MIDDLE,
1033     EL_BELT4_SWITCH_RIGHT,
1034     EL_LIGHT_SWITCH_OFF,
1035     EL_LIGHT_SWITCH_ON,
1036     EL_SIGN_EXCLAMATION,
1037     EL_SIGN_RADIOACTIVITY,
1038     EL_SIGN_STOP,
1039     EL_SIGN_WHEELCHAIR,
1040     EL_SIGN_PARKING,
1041     EL_SIGN_ONEWAY,
1042     EL_SIGN_HEART,
1043     EL_SIGN_TRIANGLE,
1044     EL_SIGN_ROUND,
1045     EL_SIGN_EXIT,
1046     EL_SIGN_YINYANG,
1047     EL_SIGN_OTHER,
1048     EL_STEEL_SLANTED,
1049     EL_EMC_STEEL_WALL_1,
1050     EL_EMC_STEEL_WALL_2,
1051     EL_EMC_STEEL_WALL_3,
1052     EL_EMC_STEEL_WALL_4
1053   };
1054   static int ep_massive_num = sizeof(ep_massive)/sizeof(int);
1055
1056   static int ep_slippery[] =
1057   {
1058     EL_FELSBODEN,
1059     EL_FELSBROCKEN,
1060     EL_EDELSTEIN,
1061     EL_EDELSTEIN_BD,
1062     EL_EDELSTEIN_GELB,
1063     EL_EDELSTEIN_ROT,
1064     EL_EDELSTEIN_LILA,
1065     EL_DIAMANT,
1066     EL_BOMBE,
1067     EL_KOKOSNUSS,
1068     EL_ABLENK_EIN,
1069     EL_ABLENK_AUS,
1070     EL_ZEIT_VOLL,
1071     EL_ZEIT_LEER,
1072     EL_BIRNE_EIN,
1073     EL_BIRNE_AUS,
1074     EL_BADEWANNE1,
1075     EL_BADEWANNE2,
1076     EL_SONDE,
1077     EL_SP_ZONK,
1078     EL_SP_INFOTRON,
1079     EL_SP_CHIP_SINGLE,
1080     EL_SP_CHIP_LEFT,
1081     EL_SP_CHIP_RIGHT,
1082     EL_SP_CHIP_UPPER,
1083     EL_SP_CHIP_LOWER,
1084     EL_SPEED_PILL,
1085     EL_STEEL_SLANTED
1086   };
1087   static int ep_slippery_num = sizeof(ep_slippery)/sizeof(int);
1088
1089   static int ep_enemy[] =
1090   {
1091     EL_KAEFER,
1092     EL_FLIEGER,
1093     EL_BUTTERFLY,
1094     EL_FIREFLY,
1095     EL_MAMPFER,
1096     EL_MAMPFER2,
1097     EL_ROBOT,
1098     EL_PACMAN,
1099     EL_SP_SNIKSNAK,
1100     EL_SP_ELECTRON
1101   };
1102   static int ep_enemy_num = sizeof(ep_enemy)/sizeof(int);
1103
1104   static int ep_mauer[] =
1105   {
1106     EL_BETON,
1107     EL_PFORTE1,
1108     EL_PFORTE2,
1109     EL_PFORTE3,
1110     EL_PFORTE4,
1111     EL_PFORTE1X,
1112     EL_PFORTE2X,
1113     EL_PFORTE3X,
1114     EL_PFORTE4X,
1115     EL_EM_GATE_1,
1116     EL_EM_GATE_2,
1117     EL_EM_GATE_3,
1118     EL_EM_GATE_4,
1119     EL_EM_GATE_1X,
1120     EL_EM_GATE_2X,
1121     EL_EM_GATE_3X,
1122     EL_EM_GATE_4X,
1123     EL_AUSGANG_ZU,
1124     EL_AUSGANG_ACT,
1125     EL_AUSGANG_AUF,
1126     EL_MAUERWERK,
1127     EL_FELSBODEN,
1128     EL_MAUER_LEBT,
1129     EL_MAUER_X,
1130     EL_MAUER_Y,
1131     EL_MAUER_XY,
1132     EL_MAUERND,
1133     EL_SP_CHIP_SINGLE,
1134     EL_SP_CHIP_LEFT,
1135     EL_SP_CHIP_RIGHT,
1136     EL_SP_CHIP_UPPER,
1137     EL_SP_CHIP_LOWER,
1138     EL_SP_HARD_GRAY,
1139     EL_SP_HARD_GREEN,
1140     EL_SP_HARD_BLUE,
1141     EL_SP_HARD_RED,
1142     EL_SP_HARD_YELLOW,
1143     EL_SP_HARD_BASE1,
1144     EL_SP_HARD_BASE2,
1145     EL_SP_HARD_BASE3,
1146     EL_SP_HARD_BASE4,
1147     EL_SP_HARD_BASE5,
1148     EL_SP_HARD_BASE6,
1149     EL_SP_TERMINAL,
1150     EL_SP_EXIT,
1151     EL_INVISIBLE_STEEL,
1152     EL_STEEL_SLANTED,
1153     EL_EMC_STEEL_WALL_1,
1154     EL_EMC_STEEL_WALL_2,
1155     EL_EMC_STEEL_WALL_3,
1156     EL_EMC_STEEL_WALL_4,
1157     EL_EMC_WALL_1,
1158     EL_EMC_WALL_2,
1159     EL_EMC_WALL_3,
1160     EL_EMC_WALL_4,
1161     EL_EMC_WALL_5,
1162     EL_EMC_WALL_6,
1163     EL_EMC_WALL_7,
1164     EL_EMC_WALL_8
1165   };
1166   static int ep_mauer_num = sizeof(ep_mauer)/sizeof(int);
1167
1168   static int ep_can_fall[] =
1169   {
1170     EL_FELSBROCKEN,
1171     EL_EDELSTEIN,
1172     EL_EDELSTEIN_BD,
1173     EL_EDELSTEIN_GELB,
1174     EL_EDELSTEIN_ROT,
1175     EL_EDELSTEIN_LILA,
1176     EL_DIAMANT,
1177     EL_BOMBE,
1178     EL_KOKOSNUSS,
1179     EL_TROPFEN,
1180     EL_MORAST_VOLL,
1181     EL_SIEB_VOLL,
1182     EL_SIEB2_VOLL,
1183     EL_ZEIT_VOLL,
1184     EL_ZEIT_LEER,
1185     EL_SP_ZONK,
1186     EL_SP_INFOTRON,
1187     EL_SP_DISK_ORANGE
1188   };
1189   static int ep_can_fall_num = sizeof(ep_can_fall)/sizeof(int);
1190
1191   static int ep_can_smash[] =
1192   {
1193     EL_FELSBROCKEN,
1194     EL_EDELSTEIN,
1195     EL_EDELSTEIN_BD,
1196     EL_EDELSTEIN_GELB,
1197     EL_EDELSTEIN_ROT,
1198     EL_EDELSTEIN_LILA,
1199     EL_DIAMANT,
1200     EL_SCHLUESSEL1,
1201     EL_SCHLUESSEL2,
1202     EL_SCHLUESSEL3,
1203     EL_SCHLUESSEL4,
1204     EL_EM_KEY_1,
1205     EL_EM_KEY_2,
1206     EL_EM_KEY_3,
1207     EL_EM_KEY_4,
1208     EL_BOMBE,
1209     EL_KOKOSNUSS,
1210     EL_TROPFEN,
1211     EL_ZEIT_VOLL,
1212     EL_ZEIT_LEER,
1213     EL_SP_ZONK,
1214     EL_SP_INFOTRON,
1215     EL_SP_DISK_ORANGE
1216   };
1217   static int ep_can_smash_num = sizeof(ep_can_smash)/sizeof(int);
1218
1219   static int ep_can_change[] =
1220   {
1221     EL_FELSBROCKEN,
1222     EL_EDELSTEIN,
1223     EL_EDELSTEIN_BD,
1224     EL_EDELSTEIN_GELB,
1225     EL_EDELSTEIN_ROT,
1226     EL_EDELSTEIN_LILA,
1227     EL_DIAMANT
1228   };
1229   static int ep_can_change_num = sizeof(ep_can_change)/sizeof(int);
1230
1231   static int ep_can_move[] =
1232   {
1233     EL_KAEFER,
1234     EL_FLIEGER,
1235     EL_BUTTERFLY,
1236     EL_FIREFLY,
1237     EL_MAMPFER,
1238     EL_MAMPFER2,
1239     EL_ROBOT,
1240     EL_PACMAN,
1241     EL_MOLE,
1242     EL_PINGUIN,
1243     EL_SCHWEIN,
1244     EL_DRACHE,
1245     EL_SONDE,
1246     EL_SP_SNIKSNAK,
1247     EL_SP_ELECTRON,
1248     EL_BALLOON
1249   };
1250   static int ep_can_move_num = sizeof(ep_can_move)/sizeof(int);
1251
1252   static int ep_could_move[] =
1253   {
1254     EL_KAEFER_RIGHT,
1255     EL_KAEFER_UP,
1256     EL_KAEFER_LEFT,
1257     EL_KAEFER_DOWN,
1258     EL_FLIEGER_RIGHT,
1259     EL_FLIEGER_UP,
1260     EL_FLIEGER_LEFT,
1261     EL_FLIEGER_DOWN,
1262     EL_BUTTERFLY_RIGHT,
1263     EL_BUTTERFLY_UP,
1264     EL_BUTTERFLY_LEFT,
1265     EL_BUTTERFLY_DOWN,
1266     EL_FIREFLY_RIGHT,
1267     EL_FIREFLY_UP,
1268     EL_FIREFLY_LEFT,
1269     EL_FIREFLY_DOWN,
1270     EL_PACMAN_RIGHT,
1271     EL_PACMAN_UP,
1272     EL_PACMAN_LEFT,
1273     EL_PACMAN_DOWN
1274   };
1275   static int ep_could_move_num = sizeof(ep_could_move)/sizeof(int);
1276
1277   static int ep_dont_touch[] =
1278   {
1279     EL_KAEFER,
1280     EL_FLIEGER,
1281     EL_BUTTERFLY,
1282     EL_FIREFLY
1283   };
1284   static int ep_dont_touch_num = sizeof(ep_dont_touch)/sizeof(int);
1285
1286   static int ep_dont_go_to[] =
1287   {
1288     EL_KAEFER,
1289     EL_FLIEGER,
1290     EL_BUTTERFLY,
1291     EL_FIREFLY,
1292     EL_MAMPFER,
1293     EL_MAMPFER2,
1294     EL_ROBOT,
1295     EL_PACMAN,
1296     EL_TROPFEN,
1297     EL_SALZSAEURE,
1298     EL_SP_SNIKSNAK,
1299     EL_SP_ELECTRON,
1300     EL_SP_BUG_ACTIVE,
1301     EL_LANDMINE
1302   };
1303   static int ep_dont_go_to_num = sizeof(ep_dont_go_to)/sizeof(int);
1304
1305   static int ep_mampf2[] =
1306   {
1307     EL_ERDREICH,
1308     EL_KAEFER,
1309     EL_FLIEGER,
1310     EL_BUTTERFLY,
1311     EL_FIREFLY,
1312     EL_MAMPFER,
1313     EL_ROBOT,
1314     EL_PACMAN,
1315     EL_TROPFEN,
1316     EL_AMOEBE_TOT,
1317     EL_AMOEBE_NASS,
1318     EL_AMOEBE_NORM,
1319     EL_AMOEBE_VOLL,
1320     EL_AMOEBE_BD,
1321     EL_EDELSTEIN,
1322     EL_EDELSTEIN_BD,
1323     EL_EDELSTEIN_GELB,
1324     EL_EDELSTEIN_ROT,
1325     EL_EDELSTEIN_LILA,
1326     EL_DIAMANT
1327   };
1328   static int ep_mampf2_num = sizeof(ep_mampf2)/sizeof(int);
1329
1330   static int ep_bd_element[] =
1331   {
1332     EL_LEERRAUM,
1333     EL_ERDREICH,
1334     EL_FELSBODEN,
1335     EL_FELSBROCKEN,
1336     EL_EDELSTEIN_BD,
1337     EL_SIEB2_INAKTIV,
1338     EL_AUSGANG_ZU,
1339     EL_AUSGANG_AUF,
1340     EL_BETON,
1341     EL_SPIELFIGUR,
1342     EL_FIREFLY,
1343     EL_FIREFLY_1,
1344     EL_FIREFLY_2,
1345     EL_FIREFLY_3,
1346     EL_FIREFLY_4,
1347     EL_BUTTERFLY,
1348     EL_BUTTERFLY_1,
1349     EL_BUTTERFLY_2,
1350     EL_BUTTERFLY_3,
1351     EL_BUTTERFLY_4,
1352     EL_AMOEBE_BD,
1353     EL_CHAR_FRAGE
1354   };
1355   static int ep_bd_element_num = sizeof(ep_bd_element)/sizeof(int);
1356
1357   static int ep_sb_element[] =
1358   {
1359     EL_LEERRAUM,
1360     EL_BETON,
1361     EL_SOKOBAN_OBJEKT,
1362     EL_SOKOBAN_FELD_LEER,
1363     EL_SOKOBAN_FELD_VOLL,
1364     EL_SPIELFIGUR,
1365     EL_INVISIBLE_STEEL
1366   };
1367   static int ep_sb_element_num = sizeof(ep_sb_element)/sizeof(int);
1368
1369   static int ep_gem[] =
1370   {
1371     EL_EDELSTEIN,
1372     EL_EDELSTEIN_BD,
1373     EL_EDELSTEIN_GELB,
1374     EL_EDELSTEIN_ROT,
1375     EL_EDELSTEIN_LILA,
1376     EL_DIAMANT,
1377     EL_SP_INFOTRON
1378   };
1379   static int ep_gem_num = sizeof(ep_gem)/sizeof(int);
1380
1381   static int ep_inactive[] =
1382   {
1383     EL_LEERRAUM,
1384     EL_ERDREICH,
1385     EL_MAUERWERK,
1386     EL_FELSBODEN,
1387     EL_SCHLUESSEL,
1388     EL_BETON,
1389     EL_AMOEBE_TOT,
1390     EL_MORAST_LEER,
1391     EL_BADEWANNE,
1392     EL_ABLENK_AUS,
1393     EL_SCHLUESSEL1,
1394     EL_SCHLUESSEL2,
1395     EL_SCHLUESSEL3,
1396     EL_SCHLUESSEL4,
1397     EL_EM_KEY_1,
1398     EL_EM_KEY_2,
1399     EL_EM_KEY_3,
1400     EL_EM_KEY_4,
1401     EL_PFORTE1,
1402     EL_PFORTE2,
1403     EL_PFORTE3,
1404     EL_PFORTE4,
1405     EL_PFORTE1X,
1406     EL_PFORTE2X,
1407     EL_PFORTE3X,
1408     EL_PFORTE4X,
1409     EL_EM_GATE_1,
1410     EL_EM_GATE_2,
1411     EL_EM_GATE_3,
1412     EL_EM_GATE_4,
1413     EL_EM_GATE_1X,
1414     EL_EM_GATE_2X,
1415     EL_EM_GATE_3X,
1416     EL_EM_GATE_4X,
1417     EL_DYNAMITE_INACTIVE,
1418     EL_UNSICHTBAR,
1419     EL_BIRNE_AUS,
1420     EL_BIRNE_EIN,
1421     EL_ERZ_EDEL,
1422     EL_ERZ_DIAM,
1423     EL_ERZ_EDEL_BD,
1424     EL_ERZ_EDEL_GELB,
1425     EL_DYNABOMB_NR,
1426     EL_DYNABOMB_SZ,
1427     EL_DYNABOMB_XL,
1428     EL_SOKOBAN_OBJEKT,
1429     EL_SOKOBAN_FELD_LEER,
1430     EL_SOKOBAN_FELD_VOLL,
1431     EL_ERZ_EDEL_ROT,
1432     EL_ERZ_EDEL_LILA,
1433     EL_BADEWANNE1,
1434     EL_BADEWANNE2,
1435     EL_BADEWANNE3,
1436     EL_BADEWANNE4,
1437     EL_BADEWANNE5,
1438     EL_SIEB_INAKTIV,
1439     EL_SIEB_TOT,
1440     EL_SIEB2_INAKTIV,
1441     EL_SIEB2_TOT,
1442     EL_AMOEBA2DIAM,
1443     EL_BLOCKED,
1444     EL_SP_EMPTY,
1445     EL_SP_BASE,
1446     EL_SP_PORT1_RIGHT,
1447     EL_SP_PORT1_DOWN,
1448     EL_SP_PORT1_LEFT,
1449     EL_SP_PORT1_UP,
1450     EL_SP_PORT2_RIGHT,
1451     EL_SP_PORT2_DOWN,
1452     EL_SP_PORT2_LEFT,
1453     EL_SP_PORT2_UP,
1454     EL_SP_PORT_X,
1455     EL_SP_PORT_Y,
1456     EL_SP_PORT_XY,
1457     EL_SP_DISK_RED,
1458     EL_SP_DISK_YELLOW,
1459     EL_SP_CHIP_SINGLE,
1460     EL_SP_CHIP_LEFT,
1461     EL_SP_CHIP_RIGHT,
1462     EL_SP_CHIP_UPPER,
1463     EL_SP_CHIP_LOWER,
1464     EL_SP_HARD_GRAY,
1465     EL_SP_HARD_GREEN,
1466     EL_SP_HARD_BLUE,
1467     EL_SP_HARD_RED,
1468     EL_SP_HARD_YELLOW,
1469     EL_SP_HARD_BASE1,
1470     EL_SP_HARD_BASE2,
1471     EL_SP_HARD_BASE3,
1472     EL_SP_HARD_BASE4,
1473     EL_SP_HARD_BASE5,
1474     EL_SP_HARD_BASE6,
1475     EL_SP_EXIT,
1476     EL_INVISIBLE_STEEL,
1477     EL_BELT1_SWITCH_LEFT,
1478     EL_BELT1_SWITCH_MIDDLE,
1479     EL_BELT1_SWITCH_RIGHT,
1480     EL_BELT2_SWITCH_LEFT,
1481     EL_BELT2_SWITCH_MIDDLE,
1482     EL_BELT2_SWITCH_RIGHT,
1483     EL_BELT3_SWITCH_LEFT,
1484     EL_BELT3_SWITCH_MIDDLE,
1485     EL_BELT3_SWITCH_RIGHT,
1486     EL_BELT4_SWITCH_LEFT,
1487     EL_BELT4_SWITCH_MIDDLE,
1488     EL_BELT4_SWITCH_RIGHT,
1489     EL_SIGN_EXCLAMATION,
1490     EL_SIGN_RADIOACTIVITY,
1491     EL_SIGN_STOP,
1492     EL_SIGN_WHEELCHAIR,
1493     EL_SIGN_PARKING,
1494     EL_SIGN_ONEWAY,
1495     EL_SIGN_HEART,
1496     EL_SIGN_TRIANGLE,
1497     EL_SIGN_ROUND,
1498     EL_SIGN_EXIT,
1499     EL_SIGN_YINYANG,
1500     EL_SIGN_OTHER,
1501     EL_STEEL_SLANTED,
1502     EL_EMC_STEEL_WALL_1,
1503     EL_EMC_STEEL_WALL_2,
1504     EL_EMC_STEEL_WALL_3,
1505     EL_EMC_STEEL_WALL_4,
1506     EL_EMC_WALL_1,
1507     EL_EMC_WALL_2,
1508     EL_EMC_WALL_3,
1509     EL_EMC_WALL_4,
1510     EL_EMC_WALL_5,
1511     EL_EMC_WALL_6,
1512     EL_EMC_WALL_7,
1513     EL_EMC_WALL_8
1514   };
1515   static int ep_inactive_num = sizeof(ep_inactive)/sizeof(int);
1516
1517   static int ep_explosive[] =
1518   {
1519     EL_BOMBE,
1520     EL_DYNAMITE_ACTIVE,
1521     EL_DYNAMITE_INACTIVE,
1522     EL_DYNABOMB_ACTIVE_1,
1523     EL_DYNABOMB_ACTIVE_2,
1524     EL_DYNABOMB_ACTIVE_3,
1525     EL_DYNABOMB_ACTIVE_4,
1526     EL_DYNABOMB_NR,
1527     EL_DYNABOMB_SZ,
1528     EL_DYNABOMB_XL,
1529     EL_KAEFER,
1530     EL_MOLE,
1531     EL_PINGUIN,
1532     EL_SCHWEIN,
1533     EL_DRACHE,
1534     EL_SONDE,
1535     EL_SP_DISK_RED,
1536     EL_SP_DISK_ORANGE,
1537     EL_SP_DISK_YELLOW,
1538     EL_SP_SNIKSNAK,
1539     EL_SP_ELECTRON
1540   };
1541   static int ep_explosive_num = sizeof(ep_explosive)/sizeof(int);
1542
1543   static int ep_mampf3[] =
1544   {
1545     EL_EDELSTEIN,
1546     EL_EDELSTEIN_BD,
1547     EL_EDELSTEIN_GELB,
1548     EL_EDELSTEIN_ROT,
1549     EL_EDELSTEIN_LILA,
1550     EL_DIAMANT
1551   };
1552   static int ep_mampf3_num = sizeof(ep_mampf3)/sizeof(int);
1553
1554   static int ep_pushable[] =
1555   {
1556     EL_FELSBROCKEN,
1557     EL_BOMBE,
1558     EL_KOKOSNUSS,
1559     EL_ZEIT_LEER,
1560     EL_SOKOBAN_FELD_VOLL,
1561     EL_SOKOBAN_OBJEKT,
1562     EL_SONDE,
1563     EL_SP_ZONK,
1564     EL_SP_DISK_ORANGE,
1565     EL_SP_DISK_YELLOW,
1566     EL_BALLOON
1567   };
1568   static int ep_pushable_num = sizeof(ep_pushable)/sizeof(int);
1569
1570   static int ep_player[] =
1571   {
1572     EL_SPIELFIGUR,
1573     EL_SPIELER1,
1574     EL_SPIELER2,
1575     EL_SPIELER3,
1576     EL_SPIELER4
1577   };
1578   static int ep_player_num = sizeof(ep_player)/sizeof(int);
1579
1580   static int ep_has_content[] =
1581   {
1582     EL_MAMPFER,
1583     EL_AMOEBE_NASS,
1584     EL_AMOEBE_NORM,
1585     EL_AMOEBE_VOLL,
1586     EL_AMOEBE_BD
1587   };
1588   static int ep_has_content_num = sizeof(ep_has_content)/sizeof(int);
1589
1590   static int ep_eatable[] =
1591   {
1592     EL_ERDREICH,
1593     EL_SP_BASE,
1594     EL_SP_BUG,
1595     EL_SAND_INVISIBLE
1596   };
1597   static int ep_eatable_num = sizeof(ep_eatable)/sizeof(int);
1598
1599   static int ep_sp_element[] =
1600   {
1601     EL_SP_EMPTY,
1602     EL_SP_ZONK,
1603     EL_SP_BASE,
1604     EL_SP_MURPHY,
1605     EL_SP_INFOTRON,
1606     EL_SP_CHIP_SINGLE,
1607     EL_SP_HARD_GRAY,
1608     EL_SP_EXIT,
1609     EL_SP_DISK_ORANGE,
1610     EL_SP_PORT1_RIGHT,
1611     EL_SP_PORT1_DOWN,
1612     EL_SP_PORT1_LEFT,
1613     EL_SP_PORT1_UP,
1614     EL_SP_PORT2_RIGHT,
1615     EL_SP_PORT2_DOWN,
1616     EL_SP_PORT2_LEFT,
1617     EL_SP_PORT2_UP,
1618     EL_SP_SNIKSNAK,
1619     EL_SP_DISK_YELLOW,
1620     EL_SP_TERMINAL,
1621     EL_SP_DISK_RED,
1622     EL_SP_PORT_Y,
1623     EL_SP_PORT_X,
1624     EL_SP_PORT_XY,
1625     EL_SP_ELECTRON,
1626     EL_SP_BUG,
1627     EL_SP_CHIP_LEFT,
1628     EL_SP_CHIP_RIGHT,
1629     EL_SP_HARD_BASE1,
1630     EL_SP_HARD_GREEN,
1631     EL_SP_HARD_BLUE,
1632     EL_SP_HARD_RED,
1633     EL_SP_HARD_YELLOW,
1634     EL_SP_HARD_BASE2,
1635     EL_SP_HARD_BASE3,
1636     EL_SP_HARD_BASE4,
1637     EL_SP_HARD_BASE5,
1638     EL_SP_HARD_BASE6,
1639     EL_SP_CHIP_UPPER,
1640     EL_SP_CHIP_LOWER,
1641     /* additional elements that appeared in newer Supaplex levels */
1642     EL_UNSICHTBAR
1643   };
1644   static int ep_sp_element_num = sizeof(ep_sp_element)/sizeof(int);
1645
1646   static int ep_quick_gate[] =
1647   {
1648     EL_EM_GATE_1,
1649     EL_EM_GATE_2,
1650     EL_EM_GATE_3,
1651     EL_EM_GATE_4,
1652     EL_EM_GATE_1X,
1653     EL_EM_GATE_2X,
1654     EL_EM_GATE_3X,
1655     EL_EM_GATE_4X,
1656     EL_SP_PORT1_LEFT,
1657     EL_SP_PORT2_LEFT,
1658     EL_SP_PORT1_RIGHT,
1659     EL_SP_PORT2_RIGHT,
1660     EL_SP_PORT1_UP,
1661     EL_SP_PORT2_UP,
1662     EL_SP_PORT1_DOWN,
1663     EL_SP_PORT2_DOWN,
1664     EL_SP_PORT_X,
1665     EL_SP_PORT_Y,
1666     EL_SP_PORT_XY,
1667     EL_SWITCHGATE_OPEN,
1668     EL_TIMEGATE_OPEN
1669   };
1670   static int ep_quick_gate_num = sizeof(ep_quick_gate)/sizeof(int);
1671
1672   static int ep_over_player[] =
1673   {
1674     EL_SP_PORT1_LEFT,
1675     EL_SP_PORT2_LEFT,
1676     EL_SP_PORT1_RIGHT,
1677     EL_SP_PORT2_RIGHT,
1678     EL_SP_PORT1_UP,
1679     EL_SP_PORT2_UP,
1680     EL_SP_PORT1_DOWN,
1681     EL_SP_PORT2_DOWN,
1682     EL_SP_PORT_X,
1683     EL_SP_PORT_Y,
1684     EL_SP_PORT_XY
1685   };
1686   static int ep_over_player_num = sizeof(ep_over_player)/sizeof(int);
1687
1688   static int ep_active_bomb[] =
1689   {
1690     EL_DYNAMITE_ACTIVE,
1691     EL_DYNABOMB_ACTIVE_1,
1692     EL_DYNABOMB_ACTIVE_2,
1693     EL_DYNABOMB_ACTIVE_3,
1694     EL_DYNABOMB_ACTIVE_4
1695   };
1696   static int ep_active_bomb_num = sizeof(ep_active_bomb)/sizeof(int);
1697
1698   static int ep_belt[] =
1699   {
1700     EL_BELT1_LEFT,
1701     EL_BELT1_MIDDLE,
1702     EL_BELT1_RIGHT,
1703     EL_BELT2_LEFT,
1704     EL_BELT2_MIDDLE,
1705     EL_BELT2_RIGHT,
1706     EL_BELT3_LEFT,
1707     EL_BELT3_MIDDLE,
1708     EL_BELT3_RIGHT,
1709     EL_BELT4_LEFT,
1710     EL_BELT4_MIDDLE,
1711     EL_BELT4_RIGHT,
1712   };
1713   static int ep_belt_num = sizeof(ep_belt)/sizeof(int);
1714
1715   static int ep_belt_switch[] =
1716   {
1717     EL_BELT1_SWITCH_LEFT,
1718     EL_BELT1_SWITCH_MIDDLE,
1719     EL_BELT1_SWITCH_RIGHT,
1720     EL_BELT2_SWITCH_LEFT,
1721     EL_BELT2_SWITCH_MIDDLE,
1722     EL_BELT2_SWITCH_RIGHT,
1723     EL_BELT3_SWITCH_LEFT,
1724     EL_BELT3_SWITCH_MIDDLE,
1725     EL_BELT3_SWITCH_RIGHT,
1726     EL_BELT4_SWITCH_LEFT,
1727     EL_BELT4_SWITCH_MIDDLE,
1728     EL_BELT4_SWITCH_RIGHT,
1729   };
1730   static int ep_belt_switch_num = sizeof(ep_belt_switch)/sizeof(int);
1731
1732   static long ep1_bit[] =
1733   {
1734     EP_BIT_AMOEBALIVE,
1735     EP_BIT_AMOEBOID,
1736     EP_BIT_SCHLUESSEL,
1737     EP_BIT_PFORTE,
1738     EP_BIT_SOLID,
1739     EP_BIT_MASSIVE,
1740     EP_BIT_SLIPPERY,
1741     EP_BIT_ENEMY,
1742     EP_BIT_MAUER,
1743     EP_BIT_CAN_FALL,
1744     EP_BIT_CAN_SMASH,
1745     EP_BIT_CAN_CHANGE,
1746     EP_BIT_CAN_MOVE,
1747     EP_BIT_COULD_MOVE,
1748     EP_BIT_DONT_TOUCH,
1749     EP_BIT_DONT_GO_TO,
1750     EP_BIT_MAMPF2,
1751     EP_BIT_BD_ELEMENT,
1752     EP_BIT_SB_ELEMENT,
1753     EP_BIT_GEM,
1754     EP_BIT_INACTIVE,
1755     EP_BIT_EXPLOSIVE,
1756     EP_BIT_MAMPF3,
1757     EP_BIT_PUSHABLE,
1758     EP_BIT_PLAYER,
1759     EP_BIT_HAS_CONTENT,
1760     EP_BIT_EATABLE,
1761     EP_BIT_SP_ELEMENT,
1762     EP_BIT_QUICK_GATE,
1763     EP_BIT_OVER_PLAYER,
1764     EP_BIT_ACTIVE_BOMB
1765   };
1766   static long ep2_bit[] =
1767   {
1768     EP_BIT_BELT,
1769     EP_BIT_BELT_SWITCH
1770   };
1771   static int *ep1_array[] =
1772   {
1773     ep_amoebalive,
1774     ep_amoeboid,
1775     ep_schluessel,
1776     ep_pforte,
1777     ep_solid,
1778     ep_massive,
1779     ep_slippery,
1780     ep_enemy,
1781     ep_mauer,
1782     ep_can_fall,
1783     ep_can_smash,
1784     ep_can_change,
1785     ep_can_move,
1786     ep_could_move,
1787     ep_dont_touch,
1788     ep_dont_go_to,
1789     ep_mampf2,
1790     ep_bd_element,
1791     ep_sb_element,
1792     ep_gem,
1793     ep_inactive,
1794     ep_explosive,
1795     ep_mampf3,
1796     ep_pushable,
1797     ep_player,
1798     ep_has_content,
1799     ep_eatable,
1800     ep_sp_element,
1801     ep_quick_gate,
1802     ep_over_player,
1803     ep_active_bomb
1804   };
1805   static int *ep2_array[] =
1806   {
1807     ep_belt,
1808     ep_belt_switch
1809   };
1810   static int *ep1_num[] =
1811   {
1812     &ep_amoebalive_num,
1813     &ep_amoeboid_num,
1814     &ep_schluessel_num,
1815     &ep_pforte_num,
1816     &ep_solid_num,
1817     &ep_massive_num,
1818     &ep_slippery_num,
1819     &ep_enemy_num,
1820     &ep_mauer_num,
1821     &ep_can_fall_num,
1822     &ep_can_smash_num,
1823     &ep_can_change_num,
1824     &ep_can_move_num,
1825     &ep_could_move_num,
1826     &ep_dont_touch_num,
1827     &ep_dont_go_to_num,
1828     &ep_mampf2_num,
1829     &ep_bd_element_num,
1830     &ep_sb_element_num,
1831     &ep_gem_num,
1832     &ep_inactive_num,
1833     &ep_explosive_num,
1834     &ep_mampf3_num,
1835     &ep_pushable_num,
1836     &ep_player_num,
1837     &ep_has_content_num,
1838     &ep_eatable_num,
1839     &ep_sp_element_num,
1840     &ep_quick_gate_num,
1841     &ep_over_player_num,
1842     &ep_active_bomb_num
1843   };
1844   static int *ep2_num[] =
1845   {
1846     &ep_belt_num,
1847     &ep_belt_switch_num
1848   };
1849   static int num_properties1 = sizeof(ep1_num)/sizeof(int *);
1850   static int num_properties2 = sizeof(ep2_num)/sizeof(int *);
1851
1852   for(i=0; i<MAX_ELEMENTS; i++)
1853   {
1854     Elementeigenschaften1[i] = 0;
1855     Elementeigenschaften2[i] = 0;
1856   }
1857
1858   for(i=0; i<num_properties1; i++)
1859     for(j=0; j<*(ep1_num[i]); j++)
1860       Elementeigenschaften1[(ep1_array[i])[j]] |= ep1_bit[i];
1861   for(i=0; i<num_properties2; i++)
1862     for(j=0; j<*(ep2_num[i]); j++)
1863       Elementeigenschaften2[(ep2_array[i])[j]] |= ep2_bit[i];
1864
1865   for(i=EL_CHAR_START; i<EL_CHAR_END; i++)
1866     Elementeigenschaften1[i] |= (EP_BIT_CHAR | EP_BIT_INACTIVE);
1867 }
1868
1869 void CloseAllAndExit(int exit_value)
1870 {
1871   int i;
1872
1873   if (sound_process_id)
1874   {
1875     StopSounds();
1876     kill(sound_process_id, SIGTERM);
1877     FreeSounds(NUM_SOUNDS);
1878   }
1879
1880   for(i=0; i<NUM_PIXMAPS; i++)
1881   {
1882     if (pix[i])
1883     {
1884 #ifdef USE_XPM_LIBRARY
1885       if (i < NUM_PICTURES)     /* XPM pictures */
1886       {
1887         XFreeColors(display,DefaultColormap(display,screen),
1888                     xpm_att[i].pixels,xpm_att[i].npixels,0);
1889         XpmFreeAttributes(&xpm_att[i]);
1890       }
1891 #endif
1892       XFreePixmap(display,pix[i]);
1893     }
1894     if (clipmask[i])
1895       XFreePixmap(display,clipmask[i]);
1896     if (clip_gc[i])
1897       XFreeGC(display, clip_gc[i]);
1898   }
1899
1900   if (gc)
1901     XFreeGC(display, gc);
1902
1903   if (display)
1904   {
1905     XAutoRepeatOn(display);
1906     XCloseDisplay(display);
1907   }
1908
1909 #ifdef MSDOS
1910   dumpErrorFile();
1911 #endif
1912
1913   exit(exit_value);
1914 }