src/init.c

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