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