rnd-19980812
[rocksndiamonds.git] / src / init.c
1 /***********************************************************
2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
3 *----------------------------------------------------------*
4 *  ©1995 Artsoft Development                               *
5 *        Holger Schemel                                    *
6 *        33659 Bielefeld-Senne                             *
7 *        Telefon: (0521) 493245                            *
8 *        eMail: aeglos@valinor.owl.de                      *
9 *               aeglos@uni-paderborn.de                    *
10 *               q99492@pbhrzx.uni-paderborn.de             *
11 *----------------------------------------------------------*
12 *  init.c                                                  *
13 ***********************************************************/
14
15 #include "init.h"
16 #include "misc.h"
17 #include "sound.h"
18 #include "screens.h"
19 #include "tools.h"
20 #include "files.h"
21 #include "joystick.h"
22 #include "gfxloader.h"
23
24 #include <signal.h>
25
26 #ifdef DEBUG
27 /*
28 #define DEBUG_TIMING
29 */
30 #endif
31
32 struct PictureFileInfo
33 {
34   char *picture_filename;
35   BOOL picture_with_mask;
36 };
37
38 struct IconFileInfo
39 {
40   char *picture_filename;
41   char *picturemask_filename;
42 };
43
44 static int sound_process_id = 0;
45
46 static void InitLevelAndPlayerInfo(void);
47 static void InitDisplay(int, char **);
48 static void InitSound(void);
49 static void InitSoundProcess(void);
50 static void InitWindow(int, char **);
51 static void InitGfx(void);
52 static void LoadGfx(int, struct PictureFileInfo *);
53 static void InitElementProperties(void);
54
55 void OpenAll(int argc, char *argv[])
56 {
57   InitLevelAndPlayerInfo();
58
59   InitCounter();
60   InitSound();
61   InitSoundProcess();
62   InitJoystick();
63   InitRND(NEW_RANDOMIZE);
64
65   signal(SIGINT, CloseAll);
66   signal(SIGTERM, CloseAll);
67
68   InitDisplay(argc, argv);
69   InitWindow(argc, argv);
70
71   XMapWindow(display, window);
72   XFlush(display);
73
74   InitGfx();
75   InitElementProperties();
76
77   DrawMainMenu();
78 }
79
80 void InitLevelAndPlayerInfo()
81 {
82   if (!LoadLevelInfo())                 /* global level info */
83     CloseAll();
84
85   LoadPlayerInfo(PLAYER_SETUP);         /* global setup info */
86   LoadPlayerInfo(PLAYER_LEVEL);         /* level specific info */
87 }
88
89 void InitSound()
90 {
91   int i;
92
93   if (sound_status==SOUND_OFF)
94     return;
95
96   if (access(sound_device_name,W_OK)<0)
97   {
98     fprintf(stderr,"%s: cannot access sound device - no sounds\n",progname);
99     sound_status=SOUND_OFF;
100     return;
101   }
102
103   if ((sound_device=open(sound_device_name,O_WRONLY))<0)
104   {
105     fprintf(stderr,"%s: cannot open sound device - no sounds\n",progname);
106     sound_status=SOUND_OFF;
107     return;
108   }
109
110   close(sound_device);
111   sound_status=SOUND_AVAILABLE;
112
113 #ifdef VOXWARE
114   sound_loops_allowed = TRUE;
115   sound_loops_on = TRUE;
116 #endif
117
118   for(i=0;i<NUM_SOUNDS;i++)
119   {
120     Sound[i].name = sound_name[i];
121     if (!LoadSound(&Sound[i]))
122     {
123       sound_status=SOUND_OFF;
124       return;
125     }
126   }
127 }
128
129 void InitSoundProcess()
130 {
131   if (sound_status==SOUND_OFF)
132     return;
133
134   if (pipe(sound_pipe)<0)
135   {
136     fprintf(stderr,"%s: cannot create pipe - no sounds\n",progname);
137     sound_status=SOUND_OFF;
138     return;
139   }
140
141   if ((sound_process_id=fork())<0)
142   {       
143     fprintf(stderr,"%s: cannot create child process - no sounds\n",progname);
144     sound_status=SOUND_OFF;
145     return;
146   }
147
148   if (!sound_process_id)        /* we are child */
149     SoundServer();
150   else                          /* we are parent */
151     close(sound_pipe[0]);       /* no reading from pipe needed */
152 }
153
154 void InitJoystick()
155 {
156   if (global_joystick_status==JOYSTICK_OFF)
157     return;
158
159   if (access(joystick_device_name[joystick_nr],R_OK)<0)
160   {
161     fprintf(stderr,"%s: cannot access joystick device '%s'\n",
162             progname,joystick_device_name[joystick_nr]);
163     joystick_status = JOYSTICK_OFF;
164     return;
165   }
166
167   if ((joystick_device=open(joystick_device_name[joystick_nr],O_RDONLY))<0)
168   {
169     fprintf(stderr,"%s: cannot open joystick device '%s'\n",
170             progname,joystick_device_name[joystick_nr]);
171     joystick_status = JOYSTICK_OFF;
172     return;
173   }
174
175   joystick_status = JOYSTICK_AVAILABLE;
176   LoadJoystickData();
177 }
178
179 void InitDisplay(int argc, char *argv[])
180 {
181   char *display_name = NULL;
182   int i;
183
184   /* get X server to connect to, if given as an argument */
185   for (i=1;i<argc-1;i++)
186   {
187     char *dispstr="-display";
188     int len=MAX(strlen(dispstr),strlen(argv[i]));
189
190     if (len<4)
191       continue;
192     else if (!strncmp(argv[i],dispstr,len))
193     {
194       display_name=argv[i+1];
195       break;
196     }
197   }
198
199   /* connect to X server */
200   if (!(display=XOpenDisplay(display_name)))
201   {
202     fprintf(stderr,"%s: cannot connect to X server %s\n", 
203             progname, XDisplayName(display_name));
204     exit(-1);
205   }
206   
207   screen = DefaultScreen(display);
208   cmap   = DefaultColormap(display, screen);
209   pen_fg = WhitePixel(display,screen);
210   pen_bg = BlackPixel(display,screen);
211 }
212
213 void InitWindow(int argc, char *argv[])
214 {
215   unsigned int border_width = 4;
216   Pixmap icon_pixmap, iconmask_pixmap;
217   unsigned int icon_width,icon_height;
218   int icon_hot_x,icon_hot_y;
219   char icon_filename[256];
220   XSizeHints size_hints;
221   XWMHints wm_hints;
222   XClassHint class_hints;
223   XTextProperty windowName, iconName;
224   XGCValues gc_values;
225   unsigned long gc_valuemask;
226   char *window_name = WINDOWTITLE_STRING;
227   char *icon_name = WINDOWTITLE_STRING;
228   long window_event_mask;
229   static struct IconFileInfo icon_pic =
230   {
231     "rocks_icon.xbm",
232     "rocks_iconmask.xbm"
233   };
234
235   width = WIN_XSIZE;
236   height = WIN_YSIZE;
237
238   window = XCreateSimpleWindow(display, RootWindow(display, screen),
239                             WIN_XPOS, WIN_YPOS, width, height, border_width,
240                             pen_fg, pen_bg);
241
242   sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picture_filename);
243   XReadBitmapFile(display,window,icon_filename,
244                   &icon_width,&icon_height,
245                   &icon_pixmap,&icon_hot_x,&icon_hot_y);
246   if (!icon_pixmap)
247   {
248     fprintf(stderr, "%s: cannot read icon bitmap file '%s'.\n",
249             progname,icon_filename);
250     exit(-1);
251   }
252
253   sprintf(icon_filename,"%s/%s",GFX_PATH,icon_pic.picturemask_filename);
254   XReadBitmapFile(display,window,icon_filename,
255                   &icon_width,&icon_height,
256                   &iconmask_pixmap,&icon_hot_x,&icon_hot_y);
257   if (!iconmask_pixmap)
258   {
259     fprintf(stderr, "%s: cannot read icon bitmap file '%s'.\n",
260             progname,icon_filename);
261     exit(-1);
262   }
263
264   size_hints.flags = PSize | PMinSize | PMaxSize;
265   size_hints.width  = size_hints.min_width  = size_hints.max_width  = width;
266   size_hints.height = size_hints.min_height = size_hints.max_height = height;
267
268   if (!XStringListToTextProperty(&window_name, 1, &windowName))
269   {
270     fprintf(stderr, "%s: structure allocation for windowName failed.\n",
271             progname);
272     exit(-1);
273   }
274
275   if (!XStringListToTextProperty(&icon_name, 1, &iconName))
276   {
277     fprintf(stderr, "%s: structure allocation for iconName failed.\n",
278             progname);
279     exit(-1);
280   }
281
282   wm_hints.initial_state = NormalState;
283   wm_hints.input = True;
284   wm_hints.icon_pixmap = icon_pixmap;
285   wm_hints.icon_mask = iconmask_pixmap;
286   wm_hints.flags = StateHint | IconPixmapHint | IconMaskHint | InputHint;
287
288   class_hints.res_name = progname;
289   class_hints.res_class = "Rocks'n'Diamonds";
290
291   XSetWMProperties(display, window, &windowName, &iconName, 
292                    argv, argc, &size_hints, &wm_hints, 
293                    &class_hints);
294
295   XFree(windowName.value);
296   XFree(iconName.value);
297
298   /* Select event types wanted */
299   window_event_mask = ExposureMask | StructureNotifyMask | FocusChangeMask |
300                       ButtonPressMask | ButtonReleaseMask | ButtonMotionMask |
301                       KeyPressMask | KeyReleaseMask;
302   XSelectInput(display, window, window_event_mask);
303
304   /* create GC for drawing with window depth */
305   gc_values.graphics_exposures = False;
306   gc_values.foreground = pen_bg;
307   gc_values.background = pen_bg;
308   gc_valuemask = GCGraphicsExposures | GCForeground | GCBackground;
309   gc = XCreateGC(display, window, gc_valuemask, &gc_values);
310 }
311
312 void DrawInitText(char *text, int ypos, int color)
313 {
314   if (display && window && pix[PIX_SMALLFONT])
315   {
316     XFillRectangle(display,window,gc,0,ypos, WIN_XSIZE,FONT2_YSIZE);
317     DrawTextExt(window,gc,(WIN_XSIZE-strlen(text)*FONT2_XSIZE)/2,
318                 ypos,text,FS_SMALL,color);
319     XFlush(display);
320   }
321 }
322
323 void InitGfx()
324 {
325   int i,j;
326   XGCValues clip_gc_values;
327   unsigned long clip_gc_valuemask;
328   static struct PictureFileInfo pic[NUM_PICTURES] =
329   {
330     { "RocksScreen",    TRUE },
331     { "RocksDoor",      TRUE },
332     { "RocksHeroes",    TRUE },
333     { "RocksToons",     TRUE },
334     { "RocksFont",      FALSE },
335     { "RocksFont2",     FALSE }
336   }; 
337
338 #ifdef DEBUG_TIMING
339   long count1, count2;
340   count1 = Counter();
341 #endif
342
343   LoadGfx(PIX_SMALLFONT,&pic[PIX_SMALLFONT]);
344   DrawInitText(WINDOWTITLE_STRING,20,FC_YELLOW);
345   DrawInitText(COPYRIGHT_STRING,50,FC_RED);
346   DrawInitText("Loading graphics:",120,FC_GREEN);
347
348   for(i=0;i<NUM_PICTURES;i++)
349     if (i!=PIX_SMALLFONT)
350       LoadGfx(i,&pic[i]);
351
352 #ifdef DEBUG_TIMING
353   count2 = Counter();
354   printf("SUMMARY: %.2f SECONDS LOADING TIME\n",(float)(count2-count1)/100.0);
355 #endif
356
357
358   pix[PIX_DB_BACK] = XCreatePixmap(display, window,
359                                    WIN_XSIZE,WIN_YSIZE,
360                                    XDefaultDepth(display,screen));
361   pix[PIX_DB_DOOR] = XCreatePixmap(display, window,
362                                    3*DXSIZE,DYSIZE+VYSIZE,
363                                    XDefaultDepth(display,screen));
364   pix[PIX_DB_FIELD] = XCreatePixmap(display, window,
365                                     FXSIZE,FYSIZE,
366                                     XDefaultDepth(display,screen));
367
368   if (!pix[PIX_DB_BACK] || !pix[PIX_DB_DOOR])
369   {
370     fprintf(stderr, "%s: cannot create additional Pixmaps!\n",progname);
371     CloseAll();
372     exit(-1);
373   }
374
375   for(i=0;i<NUM_PIXMAPS;i++)
376   {
377     if (clipmask[i])
378     {
379       clip_gc_values.graphics_exposures = False;
380       clip_gc_values.foreground = pen_fg;
381       clip_gc_values.background = pen_bg;
382       clip_gc_values.clip_mask = clipmask[i];
383       clip_gc_valuemask =
384         GCGraphicsExposures | GCForeground | GCBackground | GCClipMask;
385       clip_gc[i] = XCreateGC(display,window,clip_gc_valuemask,&clip_gc_values);
386     }
387   }
388
389   drawto = backbuffer = pix[PIX_DB_BACK];
390   fieldbuffer = pix[PIX_DB_FIELD];
391   SetDrawtoField(DRAW_BACKBUFFER);
392
393   XCopyArea(display,pix[PIX_BACK],backbuffer,gc,
394             0,0, WIN_XSIZE,WIN_YSIZE, 0,0);
395   XFillRectangle(display,pix[PIX_DB_BACK],gc,
396                  REAL_SX,REAL_SY, FULL_SXSIZE,FULL_SYSIZE);
397   XFillRectangle(display,pix[PIX_DB_DOOR],gc,
398                  0,0, 3*DXSIZE,DYSIZE+VYSIZE);
399
400   for(i=0; i<MAX_BUF_XSIZE; i++)
401     for(j=0; j<MAX_BUF_YSIZE; j++)
402       redraw[i][j] = 0;
403   redraw_tiles = 0;
404   redraw_mask = REDRAW_ALL;
405 }
406
407 void LoadGfx(int pos, struct PictureFileInfo *pic)
408 {
409   char basefilename[256];
410   char filename[256];
411
412 #ifdef XPM_INCLUDE_FILE
413   int xpm_err, xbm_err;
414   unsigned int width,height;
415   int hot_x,hot_y;
416   Pixmap shapemask;
417   char *picture_ext = ".xpm";
418   char *picturemask_ext = "Mask.xbm";
419 #else
420   int gif_err, ilbm_err;
421   char *picture_ext = ".gif";
422   char *picturemask_ext = "Mask.ilbm";
423 #endif
424
425 #ifdef DEBUG_TIMING
426   long count1, count2;
427 #endif
428
429   /* Grafik laden */
430   if (pic->picture_filename)
431   {
432     sprintf(basefilename,"%s%s",pic->picture_filename,picture_ext);
433     DrawInitText(basefilename,150,FC_YELLOW);
434     sprintf(filename,"%s/%s",GFX_PATH,basefilename);
435
436 #ifdef DEBUG_TIMING
437     count1 = Counter();
438 #endif
439
440 #ifdef XPM_INCLUDE_FILE
441
442     xpm_att[pos].valuemask = XpmCloseness;
443     xpm_att[pos].closeness = 20000;
444     xpm_err = XpmReadFileToPixmap(display,window,filename,
445                                   &pix[pos],&shapemask,&xpm_att[pos]);
446     switch(xpm_err)
447     {
448       case XpmOpenFailed:
449         fprintf(stderr,"Cannot open Xpm file '%s' !\n",filename);
450         CloseAll();
451         exit(-1);
452       case XpmFileInvalid:
453         fprintf(stderr,"Invalid Xpm file '%s'!\n",filename);
454         CloseAll();
455         exit(-1);
456       case XpmNoMemory:
457         fprintf(stderr,"Not enough memory for Xpm file '%s'!\n",filename);
458         CloseAll();
459         exit(1);
460       case XpmColorFailed:
461         fprintf(stderr,"Can't get colors for Xpm file '%s'!\n",filename);
462         CloseAll();
463         exit(-1);
464       default:
465         break;
466     }
467
468 #else 
469
470     gif_err = Read_GIF_to_Pixmap(display,filename,&pix[pos]);
471
472     switch(gif_err)
473     {
474       case GIF_Success:
475         break;
476       case GIF_OpenFailed:
477         fprintf(stderr,"Cannot open GIF file '%s' !\n",filename);
478         CloseAll();
479         exit(-1);
480       case GIF_ReadFailed:
481         fprintf(stderr,"Cannot read GIF file '%s' !\n",filename);
482         CloseAll();
483         exit(-1);
484       case GIF_FileInvalid:
485         fprintf(stderr,"Invalid GIF file '%s'!\n",filename);
486         CloseAll();
487         exit(-1);
488       case GIF_NoMemory:
489         fprintf(stderr,"Not enough memory for GIF file '%s'!\n",filename);
490         CloseAll();
491         exit(1);
492       case GIF_ColorFailed:
493         fprintf(stderr,"Can't get colors for GIF file '%s'!\n",filename);
494         CloseAll();
495         exit(-1);
496       default:
497         break;
498     }
499
500 #endif
501
502 #ifdef DEBUG_TIMING
503     count2 = Counter();
504     printf("LOADING %s IN %.2f SECONDS\n",
505            filename,(float)(count2-count1)/100.0);
506 #endif
507
508     if (!pix[pos])
509     {
510       fprintf(stderr, "%s: cannot read graphics file '%s'.\n",
511               progname,filename);
512       CloseAll();
513       exit(-1);
514     }
515   }
516
517   /* zugehörige Maske laden (wenn vorhanden) */
518   if (pic->picture_with_mask)
519   {
520     sprintf(basefilename,"%s%s",pic->picture_filename,picturemask_ext);
521     DrawInitText(basefilename,150,FC_YELLOW);
522     sprintf(filename,"%s/%s",GFX_PATH,basefilename);
523
524 #ifdef DEBUG_TIMING
525     count1 = Counter();
526 #endif
527
528 #ifdef XPM_INCLUDE_FILE
529
530     xbm_err = XReadBitmapFile(display,window,filename,
531                               &width,&height,&clipmask[pos],&hot_x,&hot_y);
532     switch(xbm_err)
533     {
534       case BitmapSuccess:
535         break;
536       case BitmapOpenFailed:
537         fprintf(stderr,"Bitmap file open failed on '%s' !\n",filename);
538         CloseAll();
539         exit(-1);
540         break;
541       case BitmapFileInvalid:
542         fprintf(stderr,"Bitmap file invalid: '%s' !\n",filename);
543         CloseAll();
544         exit(-1);
545         break;
546       case BitmapNoMemory:
547         fprintf(stderr,"No memory for file '%s' !\n",filename);
548         CloseAll();
549         exit(-1);
550         break;
551       default:
552         break;
553     }
554
555 #else
556
557     ilbm_err = Read_ILBM_to_Bitmap(display,filename,&clipmask[pos]);
558
559     switch(ilbm_err)
560     {
561       case ILBM_Success:
562         break;
563       case ILBM_OpenFailed:
564         fprintf(stderr,"Cannot open ILBM file '%s' !\n",filename);
565         CloseAll();
566         exit(-1);
567       case ILBM_ReadFailed:
568         fprintf(stderr,"Cannot read ILBM file '%s' !\n",filename);
569         CloseAll();
570         exit(-1);
571       case ILBM_FileInvalid:
572         fprintf(stderr,"Invalid ILBM file '%s'!\n",filename);
573         CloseAll();
574         exit(-1);
575       case ILBM_NoMemory:
576         fprintf(stderr,"Not enough memory for ILBM file '%s'!\n",filename);
577         CloseAll();
578         exit(1);
579       default:
580         break;
581     }
582
583 #endif
584
585 #ifdef DEBUG_TIMING
586     count2 = Counter();
587     printf("LOADING %s IN %.2f SECONDS\n",
588            filename,(float)(count2-count1)/100.0);
589 #endif
590
591     if (!clipmask[pos])
592     {
593       fprintf(stderr, "%s: cannot read graphics file '%s'.\n",
594               progname,filename);
595       CloseAll();
596       exit(-1);
597     }
598   }
599 }
600
601 void InitElementProperties()
602 {
603   int i,j;
604
605   static int ep_amoebalive[] =
606   {
607     EL_AMOEBE_NASS,
608     EL_AMOEBE_NORM,
609     EL_AMOEBE_VOLL,
610     EL_AMOEBE_BD
611   };
612   static int ep_amoebalive_num = sizeof(ep_amoebalive)/sizeof(int);
613
614   static int ep_amoeboid[] =
615   {
616     EL_AMOEBE_TOT,
617     EL_AMOEBE_NASS,
618     EL_AMOEBE_NORM,
619     EL_AMOEBE_VOLL,
620     EL_AMOEBE_BD
621   };
622   static int ep_amoeboid_num = sizeof(ep_amoeboid)/sizeof(int);
623
624   static int ep_schluessel[] =
625   {
626     EL_SCHLUESSEL1,
627     EL_SCHLUESSEL2,
628     EL_SCHLUESSEL3,
629     EL_SCHLUESSEL4
630   };
631   static int ep_schluessel_num = sizeof(ep_schluessel)/sizeof(int);
632
633   static int ep_pforte[] =
634   {
635     EL_PFORTE1,
636     EL_PFORTE2,
637     EL_PFORTE3,
638     EL_PFORTE4,
639     EL_PFORTE1X,
640     EL_PFORTE2X,
641     EL_PFORTE3X,
642     EL_PFORTE4X
643   };
644   static int ep_pforte_num = sizeof(ep_pforte)/sizeof(int);
645
646   static int ep_solid[] =
647   {
648     EL_BETON,
649     EL_MAUERWERK,
650     EL_MAUER_LEBT,
651     EL_FELSBODEN,
652     EL_AUSGANG_ZU,
653     EL_AUSGANG_ACT,
654     EL_AUSGANG_AUF,
655     EL_AMOEBE_TOT,
656     EL_AMOEBE_NASS,
657     EL_AMOEBE_NORM,
658     EL_AMOEBE_VOLL,
659     EL_AMOEBE_BD,
660     EL_MORAST_VOLL,
661     EL_MORAST_LEER,
662     EL_SIEB_VOLL,
663     EL_SIEB_LEER,
664     EL_SIEB_TOT,
665     EL_SIEB2_VOLL,
666     EL_SIEB2_LEER,
667     EL_SIEB2_TOT,
668     EL_LIFE,
669     EL_LIFE_ASYNC,
670     EL_BADEWANNE1,
671     EL_BADEWANNE2,
672     EL_BADEWANNE3,
673     EL_BADEWANNE4,
674     EL_BADEWANNE5
675   };
676   static int ep_solid_num = sizeof(ep_solid)/sizeof(int);
677
678   static int ep_massiv[] =
679   {
680     EL_BETON,
681     EL_SALZSAEURE,
682     EL_BADEWANNE1,
683     EL_BADEWANNE2,
684     EL_BADEWANNE3,
685     EL_BADEWANNE4,
686     EL_BADEWANNE5,
687     EL_PFORTE1,
688     EL_PFORTE2,
689     EL_PFORTE3,
690     EL_PFORTE4,
691     EL_PFORTE1X,
692     EL_PFORTE2X,
693     EL_PFORTE3X,
694     EL_PFORTE4X
695   };
696   static int ep_massiv_num = sizeof(ep_massiv)/sizeof(int);
697
698   static int ep_slippery[] =
699   {
700     EL_FELSBODEN,
701     EL_FELSBROCKEN,
702     EL_EDELSTEIN,
703     EL_EDELSTEIN_BD,
704     EL_EDELSTEIN_GELB,
705     EL_EDELSTEIN_ROT,
706     EL_EDELSTEIN_LILA,
707     EL_DIAMANT,
708     EL_BOMBE,
709     EL_KOKOSNUSS,
710     EL_ABLENK_EIN,
711     EL_ABLENK_AUS,
712     EL_ZEIT_VOLL,
713     EL_ZEIT_LEER,
714     EL_BIRNE_EIN,
715     EL_BIRNE_AUS,
716     EL_BADEWANNE1,
717     EL_BADEWANNE2,
718     EL_SONDE
719   };
720   static int ep_slippery_num = sizeof(ep_slippery)/sizeof(int);
721
722   static int ep_enemy[] =
723   {
724     EL_KAEFER,
725     EL_FLIEGER,
726     EL_BUTTERFLY,
727     EL_FIREFLY,
728     EL_MAMPFER,
729     EL_MAMPFER2,
730     EL_ROBOT,
731     EL_PACMAN
732   };
733   static int ep_enemy_num = sizeof(ep_enemy)/sizeof(int);
734
735   static int ep_mauer[] =
736   {
737     EL_BETON,
738     EL_PFORTE1,
739     EL_PFORTE2,
740     EL_PFORTE3,
741     EL_PFORTE4,
742     EL_PFORTE1X,
743     EL_PFORTE2X,
744     EL_PFORTE3X,
745     EL_PFORTE4X,
746     EL_AUSGANG_ZU,
747     EL_AUSGANG_ACT,
748     EL_AUSGANG_AUF,
749     EL_MAUERWERK,
750     EL_FELSBODEN,
751     EL_MAUER_LEBT,
752     EL_MAUERND
753   };
754   static int ep_mauer_num = sizeof(ep_mauer)/sizeof(int);
755
756   static int ep_can_fall[] =
757   {
758     EL_FELSBROCKEN,
759     EL_EDELSTEIN,
760     EL_EDELSTEIN_BD,
761     EL_EDELSTEIN_GELB,
762     EL_EDELSTEIN_ROT,
763     EL_EDELSTEIN_LILA,
764     EL_DIAMANT,
765     EL_BOMBE,
766     EL_KOKOSNUSS,
767     EL_TROPFEN,
768     EL_MORAST_VOLL,
769     EL_SIEB_VOLL,
770     EL_SIEB2_VOLL,
771     EL_ZEIT_VOLL,
772     EL_ZEIT_LEER
773   };
774   static int ep_can_fall_num = sizeof(ep_can_fall)/sizeof(int);
775
776   static int ep_can_smash[] =
777   {
778     EL_FELSBROCKEN,
779     EL_EDELSTEIN,
780     EL_EDELSTEIN_BD,
781     EL_EDELSTEIN_GELB,
782     EL_EDELSTEIN_ROT,
783     EL_EDELSTEIN_LILA,
784     EL_DIAMANT,
785     EL_SCHLUESSEL1,
786     EL_SCHLUESSEL2,
787     EL_SCHLUESSEL3,
788     EL_SCHLUESSEL4,
789     EL_BOMBE,
790     EL_KOKOSNUSS,
791     EL_TROPFEN,
792     EL_ZEIT_VOLL,
793     EL_ZEIT_LEER
794   };
795   static int ep_can_smash_num = sizeof(ep_can_smash)/sizeof(int);
796
797   static int ep_can_change[] =
798   {
799     EL_FELSBROCKEN,
800     EL_EDELSTEIN,
801     EL_EDELSTEIN_BD,
802     EL_EDELSTEIN_GELB,
803     EL_EDELSTEIN_ROT,
804     EL_EDELSTEIN_LILA,
805     EL_DIAMANT
806   };
807   static int ep_can_change_num = sizeof(ep_can_change)/sizeof(int);
808
809   static int ep_can_move[] =
810   {
811     EL_KAEFER,
812     EL_FLIEGER,
813     EL_BUTTERFLY,
814     EL_FIREFLY,
815     EL_MAMPFER,
816     EL_MAMPFER2,
817     EL_ROBOT,
818     EL_PACMAN,
819     EL_MAULWURF,
820     EL_PINGUIN,
821     EL_SCHWEIN,
822     EL_DRACHE,
823     EL_SONDE
824   };
825   static int ep_can_move_num = sizeof(ep_can_move)/sizeof(int);
826
827   static int ep_could_move[] =
828   {
829     EL_KAEFER_R,
830     EL_KAEFER_O,
831     EL_KAEFER_L,
832     EL_KAEFER_U,
833     EL_FLIEGER_R,
834     EL_FLIEGER_O,
835     EL_FLIEGER_L,
836     EL_FLIEGER_U,
837     EL_BUTTERFLY_R,
838     EL_BUTTERFLY_O,
839     EL_BUTTERFLY_L,
840     EL_BUTTERFLY_U,
841     EL_FIREFLY_R,
842     EL_FIREFLY_O,
843     EL_FIREFLY_L,
844     EL_FIREFLY_U,
845     EL_PACMAN_R,
846     EL_PACMAN_O,
847     EL_PACMAN_L,
848     EL_PACMAN_U
849   };
850   static int ep_could_move_num = sizeof(ep_could_move)/sizeof(int);
851
852   static int ep_dont_touch[] =
853   {
854     EL_KAEFER,
855     EL_FLIEGER,
856     EL_BUTTERFLY,
857     EL_FIREFLY
858   };
859   static int ep_dont_touch_num = sizeof(ep_dont_touch)/sizeof(int);
860
861   static int ep_dont_go_to[] =
862   {
863     EL_KAEFER,
864     EL_FLIEGER,
865     EL_BUTTERFLY,
866     EL_FIREFLY,
867     EL_MAMPFER,
868     EL_MAMPFER2,
869     EL_ROBOT,
870     EL_PACMAN,
871     EL_TROPFEN,
872     EL_SALZSAEURE
873   };
874   static int ep_dont_go_to_num = sizeof(ep_dont_go_to)/sizeof(int);
875
876   static int ep_mampf2[] =
877   {
878     EL_ERDREICH,
879     EL_KAEFER,
880     EL_FLIEGER,
881     EL_BUTTERFLY,
882     EL_FIREFLY,
883     EL_MAMPFER,
884     EL_ROBOT,
885     EL_PACMAN,
886     EL_TROPFEN,
887     EL_AMOEBE_TOT,
888     EL_AMOEBE_NASS,
889     EL_AMOEBE_NORM,
890     EL_AMOEBE_VOLL,
891     EL_AMOEBE_BD,
892     EL_EDELSTEIN,
893     EL_EDELSTEIN_BD,
894     EL_EDELSTEIN_GELB,
895     EL_EDELSTEIN_ROT,
896     EL_EDELSTEIN_LILA,
897     EL_DIAMANT
898   };
899   static int ep_mampf2_num = sizeof(ep_mampf2)/sizeof(int);
900
901   static int ep_bd_element[] =
902   {
903     EL_LEERRAUM,
904     EL_ERDREICH,
905     EL_FELSBODEN,
906     EL_FELSBROCKEN,
907     EL_EDELSTEIN_BD,
908     EL_SIEB2_LEER,
909     EL_AUSGANG_ZU,
910     EL_AUSGANG_AUF,
911     EL_BETON,
912     EL_SPIELFIGUR,
913     EL_FIREFLY,
914     EL_FIREFLY_1,
915     EL_FIREFLY_2,
916     EL_FIREFLY_3,
917     EL_FIREFLY_4,
918     EL_BUTTERFLY,
919     EL_BUTTERFLY_1,
920     EL_BUTTERFLY_2,
921     EL_BUTTERFLY_3,
922     EL_BUTTERFLY_4,
923     EL_AMOEBE_BD,
924     EL_CHAR_FRAGE
925   };
926   static int ep_bd_element_num = sizeof(ep_bd_element)/sizeof(int);
927
928   static int ep_sb_element[] =
929   {
930     EL_LEERRAUM,
931     EL_BETON,
932     EL_SOKOBAN_OBJEKT,
933     EL_SOKOBAN_FELD_LEER,
934     EL_SOKOBAN_FELD_VOLL,
935     EL_SPIELFIGUR
936   };
937   static int ep_sb_element_num = sizeof(ep_sb_element)/sizeof(int);
938
939   static int ep_gem[] =
940   {
941     EL_EDELSTEIN,
942     EL_EDELSTEIN_BD,
943     EL_EDELSTEIN_GELB,
944     EL_EDELSTEIN_ROT,
945     EL_EDELSTEIN_LILA,
946     EL_DIAMANT
947   };
948   static int ep_gem_num = sizeof(ep_gem)/sizeof(int);
949
950   static int ep_inactive[] =
951   {
952     EL_LEERRAUM,
953     EL_ERDREICH,
954     EL_MAUERWERK,
955     EL_FELSBODEN,
956     EL_SCHLUESSEL,
957     EL_BETON,
958     EL_AMOEBE_TOT,
959     EL_MORAST_LEER,
960     EL_BADEWANNE,
961     EL_ABLENK_AUS,
962     EL_SCHLUESSEL1,
963     EL_SCHLUESSEL2,
964     EL_SCHLUESSEL3,
965     EL_SCHLUESSEL4,
966     EL_PFORTE1,
967     EL_PFORTE2,
968     EL_PFORTE3,
969     EL_PFORTE4,
970     EL_PFORTE1X,
971     EL_PFORTE2X,
972     EL_PFORTE3X,
973     EL_PFORTE4X,
974     EL_DYNAMIT_AUS,
975     EL_UNSICHTBAR,
976     EL_BIRNE_AUS,
977     EL_BIRNE_EIN,
978     EL_ERZ_EDEL,
979     EL_ERZ_DIAM,
980     EL_ERZ_EDEL_BD,
981     EL_ERZ_EDEL_GELB,
982     EL_DYNABOMB_NR,
983     EL_DYNABOMB_SZ,
984     EL_DYNABOMB_XL,
985     EL_SOKOBAN_OBJEKT,
986     EL_SOKOBAN_FELD_LEER,
987     EL_SOKOBAN_FELD_VOLL,
988     EL_ERZ_EDEL_ROT,
989     EL_ERZ_EDEL_LILA,
990     EL_BADEWANNE1,
991     EL_BADEWANNE2,
992     EL_BADEWANNE3,
993     EL_BADEWANNE4,
994     EL_BADEWANNE5,
995     EL_SIEB_TOT,
996     EL_SIEB2_TOT,
997     EL_AMOEBA2DIAM,
998     EL_BLOCKED
999   };
1000   static int ep_inactive_num = sizeof(ep_inactive)/sizeof(int);
1001
1002   static int ep_explosive[] =
1003   {
1004     EL_BOMBE,
1005     EL_DYNAMIT,
1006     EL_DYNAMIT_AUS,
1007     EL_DYNABOMB,
1008     EL_DYNABOMB_NR,
1009     EL_DYNABOMB_SZ,
1010     EL_DYNABOMB_XL,
1011     EL_KAEFER,
1012     EL_MAULWURF,
1013     EL_PINGUIN,
1014     EL_SCHWEIN,
1015     EL_DRACHE,
1016     EL_SONDE
1017   };
1018   static int ep_explosive_num = sizeof(ep_explosive)/sizeof(int);
1019
1020   static int ep_mampf3[] =
1021   {
1022     EL_EDELSTEIN,
1023     EL_EDELSTEIN_BD,
1024     EL_EDELSTEIN_GELB,
1025     EL_EDELSTEIN_ROT,
1026     EL_EDELSTEIN_LILA,
1027     EL_DIAMANT
1028   };
1029   static int ep_mampf3_num = sizeof(ep_mampf3)/sizeof(int);
1030
1031   static int ep_pushable[] =
1032   {
1033     EL_FELSBROCKEN,
1034     EL_BOMBE,
1035     EL_KOKOSNUSS,
1036     EL_ZEIT_LEER,
1037     EL_SOKOBAN_FELD_VOLL,
1038     EL_SOKOBAN_OBJEKT,
1039     EL_SONDE
1040   };
1041   static int ep_pushable_num = sizeof(ep_pushable)/sizeof(int);
1042
1043   static long ep_bit[] =
1044   {
1045     EP_BIT_AMOEBALIVE,
1046     EP_BIT_AMOEBOID,
1047     EP_BIT_SCHLUESSEL,
1048     EP_BIT_PFORTE,
1049     EP_BIT_SOLID,
1050     EP_BIT_MASSIV,
1051     EP_BIT_SLIPPERY,
1052     EP_BIT_ENEMY,
1053     EP_BIT_MAUER,
1054     EP_BIT_CAN_FALL,
1055     EP_BIT_CAN_SMASH,
1056     EP_BIT_CAN_CHANGE,
1057     EP_BIT_CAN_MOVE,
1058     EP_BIT_COULD_MOVE,
1059     EP_BIT_DONT_TOUCH,
1060     EP_BIT_DONT_GO_TO,
1061     EP_BIT_MAMPF2,
1062     EP_BIT_BD_ELEMENT,
1063     EP_BIT_SB_ELEMENT,
1064     EP_BIT_GEM,
1065     EP_BIT_INACTIVE,
1066     EP_BIT_EXPLOSIVE,
1067     EP_BIT_MAMPF3,
1068     EP_BIT_PUSHABLE
1069   };
1070   static int *ep_array[] =
1071   {
1072     ep_amoebalive,
1073     ep_amoeboid,
1074     ep_schluessel,
1075     ep_pforte,
1076     ep_solid,
1077     ep_massiv,
1078     ep_slippery,
1079     ep_enemy,
1080     ep_mauer,
1081     ep_can_fall,
1082     ep_can_smash,
1083     ep_can_change,
1084     ep_can_move,
1085     ep_could_move,
1086     ep_dont_touch,
1087     ep_dont_go_to,
1088     ep_mampf2,
1089     ep_bd_element,
1090     ep_sb_element,
1091     ep_gem,
1092     ep_inactive,
1093     ep_explosive,
1094     ep_mampf3,
1095     ep_pushable
1096   };
1097   static int *ep_num[] =
1098   {
1099     &ep_amoebalive_num,
1100     &ep_amoeboid_num,
1101     &ep_schluessel_num,
1102     &ep_pforte_num,
1103     &ep_solid_num,
1104     &ep_massiv_num,
1105     &ep_slippery_num,
1106     &ep_enemy_num,
1107     &ep_mauer_num,
1108     &ep_can_fall_num,
1109     &ep_can_smash_num,
1110     &ep_can_change_num,
1111     &ep_can_move_num,
1112     &ep_could_move_num,
1113     &ep_dont_touch_num,
1114     &ep_dont_go_to_num,
1115     &ep_mampf2_num,
1116     &ep_bd_element_num,
1117     &ep_sb_element_num,
1118     &ep_gem_num,
1119     &ep_inactive_num,
1120     &ep_explosive_num,
1121     &ep_mampf3_num,
1122     &ep_pushable_num
1123   };
1124   static int num_properties = sizeof(ep_num)/sizeof(int *);
1125
1126   for(i=0;i<MAX_ELEMENTS;i++)
1127     Elementeigenschaften[i] = 0;
1128
1129   for(i=0;i<num_properties;i++)
1130     for(j=0;j<*(ep_num[i]);j++)
1131       Elementeigenschaften[(ep_array[i])[j]] |= ep_bit[i];
1132   for(i=EL_CHAR_START;i<EL_CHAR_END;i++)
1133     Elementeigenschaften[i] |= (EP_BIT_CHAR | EP_BIT_INACTIVE);
1134 }
1135
1136 void CloseAll()
1137 {
1138   int i;
1139
1140   if (sound_process_id)
1141   {
1142     StopSounds();
1143     kill(sound_process_id, SIGTERM);
1144     FreeSounds(NUM_SOUNDS);
1145   }
1146
1147   for(i=0;i<NUM_PIXMAPS;i++)
1148   {
1149     if (pix[i])
1150     {
1151 #ifdef XPM_INCLUDE_FILE
1152       if (i<NUM_PICTURES)       /* XPM pictures */
1153       {
1154         XFreeColors(display,DefaultColormap(display,screen),
1155                     xpm_att[i].pixels,xpm_att[i].npixels,0);
1156         XpmFreeAttributes(&xpm_att[i]);
1157       }
1158 #endif
1159       XFreePixmap(display,pix[i]);
1160     }
1161     if (clipmask[i])
1162       XFreePixmap(display,clipmask[i]);
1163     if (clip_gc[i])
1164       XFreeGC(display, clip_gc[i]);
1165   }
1166
1167   if (gc)
1168     XFreeGC(display, gc);
1169   if (display)
1170     XCloseDisplay(display);
1171
1172   exit(0);
1173 }