src/tools.c

   1 // ============================================================================
   2 // Rocks'n'Diamonds - McDuffin Strikes Back!
   3 // ----------------------------------------------------------------------------
   4 // (c) 1995-2014 by Artsoft Entertainment
   5 //                  Holger Schemel
   6 //                  info@artsoft.org
   7 //                  https://www.artsoft.org/
   8 // ----------------------------------------------------------------------------
   9 // tools.c
  10 // ============================================================================
  11
  12 #include <math.h>
  13
  14 #include "libgame/libgame.h"
  15
  16 #include "tools.h"
  17 #include "init.h"
  18 #include "game.h"
  19 #include "events.h"
  20 #include "anim.h"
  21 #include "network.h"
  22 #include "tape.h"
  23 #include "screens.h"
  24
  25
  26 #define DEBUG_FRAME_TIME        FALSE
  27
  28 // tool button identifiers
  29 #define TOOL_CTRL_ID_YES        0
  30 #define TOOL_CTRL_ID_NO         1
  31 #define TOOL_CTRL_ID_CONFIRM    2
  32 #define TOOL_CTRL_ID_PLAYER_1   3
  33 #define TOOL_CTRL_ID_PLAYER_2   4
  34 #define TOOL_CTRL_ID_PLAYER_3   5
  35 #define TOOL_CTRL_ID_PLAYER_4   6
  36 #define TOOL_CTRL_ID_TOUCH_YES  7
  37 #define TOOL_CTRL_ID_TOUCH_NO   8
  38 #define TOOL_CTRL_ID_TOUCH_CONFIRM 9
  39
  40 #define NUM_TOOL_BUTTONS        10
  41
  42 // constants for number of doors and door parts
  43 #define NUM_DOORS               2
  44 #define NUM_PANELS              NUM_DOORS
  45 // #define NUM_PANELS           0
  46 #define MAX_PARTS_PER_DOOR      8
  47 #define MAX_DOOR_PARTS          (NUM_DOORS * MAX_PARTS_PER_DOOR + NUM_PANELS)
  48 #define DOOR_PART_IS_PANEL(i)   ((i) >= NUM_DOORS * MAX_PARTS_PER_DOOR)
  49
  50
  51 struct DoorPartOrderInfo
  52 {
  53   int nr;
  54   int sort_priority;
  55 };
  56
  57 static struct DoorPartOrderInfo door_part_order[MAX_DOOR_PARTS];
  58
  59 struct DoorPartControlInfo
  60 {
  61   int door_token;
  62   int graphic;
  63   struct DoorPartPosInfo *pos;
  64 };
  65
  66 static struct DoorPartControlInfo door_part_controls[] =
  67 {
  68   {
  69     DOOR_1,
  70     IMG_GFX_DOOR_1_PART_1,
  71     &door_1.part_1
  72   },
  73   {
  74     DOOR_1,
  75     IMG_GFX_DOOR_1_PART_2,
  76     &door_1.part_2
  77   },
  78   {
  79     DOOR_1,
  80     IMG_GFX_DOOR_1_PART_3,
  81     &door_1.part_3
  82   },
  83   {
  84     DOOR_1,
  85     IMG_GFX_DOOR_1_PART_4,
  86     &door_1.part_4
  87   },
  88   {
  89     DOOR_1,
  90     IMG_GFX_DOOR_1_PART_5,
  91     &door_1.part_5
  92   },
  93   {
  94     DOOR_1,
  95     IMG_GFX_DOOR_1_PART_6,
  96     &door_1.part_6
  97   },
  98   {
  99     DOOR_1,
 100     IMG_GFX_DOOR_1_PART_7,
 101     &door_1.part_7
 102   },
 103   {
 104     DOOR_1,
 105     IMG_GFX_DOOR_1_PART_8,
 106     &door_1.part_8
 107   },
 108
 109   {
 110     DOOR_2,
 111     IMG_GFX_DOOR_2_PART_1,
 112     &door_2.part_1
 113   },
 114   {
 115     DOOR_2,
 116     IMG_GFX_DOOR_2_PART_2,
 117     &door_2.part_2
 118   },
 119   {
 120     DOOR_2,
 121     IMG_GFX_DOOR_2_PART_3,
 122     &door_2.part_3
 123   },
 124   {
 125     DOOR_2,
 126     IMG_GFX_DOOR_2_PART_4,
 127     &door_2.part_4
 128   },
 129   {
 130     DOOR_2,
 131     IMG_GFX_DOOR_2_PART_5,
 132     &door_2.part_5
 133   },
 134   {
 135     DOOR_2,
 136     IMG_GFX_DOOR_2_PART_6,
 137     &door_2.part_6
 138   },
 139   {
 140     DOOR_2,
 141     IMG_GFX_DOOR_2_PART_7,
 142     &door_2.part_7
 143   },
 144   {
 145     DOOR_2,
 146     IMG_GFX_DOOR_2_PART_8,
 147     &door_2.part_8
 148   },
 149
 150   {
 151     DOOR_1,
 152     IMG_BACKGROUND_PANEL,
 153     &door_1.panel
 154   },
 155   {
 156     DOOR_2,
 157     IMG_BACKGROUND_TAPE,
 158     &door_2.panel
 159   },
 160
 161   {
 162     -1,
 163     -1,
 164     NULL
 165   }
 166 };
 167
 168 static struct XY xy_topdown[] =
 169 {
 170   {  0, -1 },
 171   { -1,  0 },
 172   { +1,  0 },
 173   {  0, +1 }
 174 };
 175
 176
 177 // forward declaration for internal use
 178 static void MapToolButtons(unsigned int);
 179 static void UnmapToolButtons(void);
 180 static void HandleToolButtons(struct GadgetInfo *);
 181 static int el_act_dir2crm(int, int, int);
 182 static int el_act2crm(int, int);
 183
 184 static struct GadgetInfo *tool_gadget[NUM_TOOL_BUTTONS];
 185 static int request_gadget_id = -1;
 186
 187 static char *print_if_not_empty(int element)
 188 {
 189   static char *s = NULL;
 190   char *token_name = element_info[element].token_name;
 191
 192   if (s != NULL)
 193     free(s);
 194
 195   s = checked_malloc(strlen(token_name) + 10 + 1);
 196
 197   if (element != EL_EMPTY)
 198     sprintf(s, "%d\t['%s']", element, token_name);
 199   else
 200     sprintf(s, "%d", element);
 201
 202   return s;
 203 }
 204
 205 int getFieldbufferOffsetX_RND(int dir, int pos)
 206 {
 207   int full_lev_fieldx = lev_fieldx + (BorderElement != EL_EMPTY ? 2 : 0);
 208   int dx = (dir & MV_HORIZONTAL ? pos : 0);
 209   int dx_var = dx * TILESIZE_VAR / TILESIZE;
 210   int fx = FX;
 211
 212   if (EVEN(SCR_FIELDX))
 213   {
 214     int sbx_right = SBX_Right + (BorderElement != EL_EMPTY ? 1 : 0);
 215     int ffx = (scroll_x - SBX_Left) * TILEX_VAR + dx_var;
 216
 217     if (ffx < sbx_right * TILEX_VAR + TILEX_VAR / 2)
 218       fx += dx_var - MIN(ffx, TILEX_VAR / 2) + TILEX_VAR;
 219     else
 220       fx += (dx_var > 0 ? TILEX_VAR : 0);
 221   }
 222   else
 223   {
 224     fx += dx_var;
 225   }
 226
 227   if (full_lev_fieldx <= SCR_FIELDX)
 228   {
 229     if (EVEN(SCR_FIELDX))
 230       fx = 2 * TILEX_VAR - (ODD(lev_fieldx)  ? TILEX_VAR / 2 : 0);
 231     else
 232       fx = 2 * TILEX_VAR - (EVEN(lev_fieldx) ? TILEX_VAR / 2 : 0);
 233   }
 234
 235   return fx;
 236 }
 237
 238 int getFieldbufferOffsetY_RND(int dir, int pos)
 239 {
 240   int full_lev_fieldy = lev_fieldy + (BorderElement != EL_EMPTY ? 2 : 0);
 241   int dy = (dir & MV_VERTICAL ? pos : 0);
 242   int dy_var = dy * TILESIZE_VAR / TILESIZE;
 243   int fy = FY;
 244
 245   if (EVEN(SCR_FIELDY))
 246   {
 247     int sby_lower = SBY_Lower + (BorderElement != EL_EMPTY ? 1 : 0);
 248     int ffy = (scroll_y - SBY_Upper) * TILEY_VAR + dy_var;
 249
 250     if (ffy < sby_lower * TILEY_VAR + TILEY_VAR / 2)
 251       fy += dy_var - MIN(ffy, TILEY_VAR / 2) + TILEY_VAR;
 252     else
 253       fy += (dy_var > 0 ? TILEY_VAR : 0);
 254   }
 255   else
 256   {
 257     fy += dy_var;
 258   }
 259
 260   if (full_lev_fieldy <= SCR_FIELDY)
 261   {
 262     if (EVEN(SCR_FIELDY))
 263       fy = 2 * TILEY_VAR - (ODD(lev_fieldy)  ? TILEY_VAR / 2 : 0);
 264     else
 265       fy = 2 * TILEY_VAR - (EVEN(lev_fieldy) ? TILEY_VAR / 2 : 0);
 266   }
 267
 268   return fy;
 269 }
 270
 271 static int getLevelFromScreenX_RND(int sx)
 272 {
 273   int fx = getFieldbufferOffsetX_RND(ScreenMovDir, ScreenGfxPos);
 274   int dx = fx - FX;
 275   int px = sx - SX;
 276   int lx = LEVELX((px + dx) / TILESIZE_VAR);
 277
 278   return lx;
 279 }
 280
 281 static int getLevelFromScreenY_RND(int sy)
 282 {
 283   int fy = getFieldbufferOffsetY_RND(ScreenMovDir, ScreenGfxPos);
 284   int dy = fy - FY;
 285   int py = sy - SY;
 286   int ly = LEVELY((py + dy) / TILESIZE_VAR);
 287
 288   return ly;
 289 }
 290
 291 static int getLevelFromScreenX_EM(int sx)
 292 {
 293   int level_xsize = level.native_em_level->cav->width;
 294   int full_xsize = level_xsize * TILESIZE_VAR;
 295
 296   sx -= (full_xsize < SXSIZE ? (SXSIZE - full_xsize) / 2 : 0);
 297
 298   int fx = getFieldbufferOffsetX_EM();
 299   int dx = fx;
 300   int px = sx - SX;
 301   int lx = LEVELX((px + dx) / TILESIZE_VAR);
 302
 303   return lx;
 304 }
 305
 306 static int getLevelFromScreenY_EM(int sy)
 307 {
 308   int level_ysize = level.native_em_level->cav->height;
 309   int full_ysize = level_ysize * TILESIZE_VAR;
 310
 311   sy -= (full_ysize < SYSIZE ? (SYSIZE - full_ysize) / 2 : 0);
 312
 313   int fy = getFieldbufferOffsetY_EM();
 314   int dy = fy;
 315   int py = sy - SY;
 316   int ly = LEVELY((py + dy) / TILESIZE_VAR);
 317
 318   return ly;
 319 }
 320
 321 static int getLevelFromScreenX_SP(int sx)
 322 {
 323   int menBorder = setup.sp_show_border_elements;
 324   int level_xsize = level.native_sp_level->width;
 325   int full_xsize = (level_xsize - (menBorder ? 0 : 1)) * TILESIZE_VAR;
 326
 327   sx += (full_xsize < SXSIZE ? (SXSIZE - full_xsize) / 2 : 0);
 328
 329   int fx = getFieldbufferOffsetX_SP();
 330   int dx = fx - FX;
 331   int px = sx - SX;
 332   int lx = LEVELX((px + dx) / TILESIZE_VAR);
 333
 334   return lx;
 335 }
 336
 337 static int getLevelFromScreenY_SP(int sy)
 338 {
 339   int menBorder = setup.sp_show_border_elements;
 340   int level_ysize = level.native_sp_level->height;
 341   int full_ysize = (level_ysize - (menBorder ? 0 : 1)) * TILESIZE_VAR;
 342
 343   sy += (full_ysize < SYSIZE ? (SYSIZE - full_ysize) / 2 : 0);
 344
 345   int fy = getFieldbufferOffsetY_SP();
 346   int dy = fy - FY;
 347   int py = sy - SY;
 348   int ly = LEVELY((py + dy) / TILESIZE_VAR);
 349
 350   return ly;
 351 }
 352
 353 static int getLevelFromScreenX_MM(int sx)
 354 {
 355   int level_xsize = level.native_mm_level->fieldx;
 356   int full_xsize = level_xsize * TILESIZE_VAR;
 357
 358   sx -= (full_xsize < SXSIZE ? (SXSIZE - full_xsize) / 2 : 0);
 359
 360   int px = sx - SX;
 361   int lx = (px + TILESIZE_VAR) / TILESIZE_VAR - 1;
 362
 363   return lx;
 364 }
 365
 366 static int getLevelFromScreenY_MM(int sy)
 367 {
 368   int level_ysize = level.native_mm_level->fieldy;
 369   int full_ysize = level_ysize * TILESIZE_VAR;
 370
 371   sy -= (full_ysize < SYSIZE ? (SYSIZE - full_ysize) / 2 : 0);
 372
 373   int py = sy - SY;
 374   int ly = (py + TILESIZE_VAR) / TILESIZE_VAR - 1;
 375
 376   return ly;
 377 }
 378
 379 int getLevelFromScreenX(int x)
 380 {
 381   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
 382     return getLevelFromScreenX_EM(x);
 383   if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
 384     return getLevelFromScreenX_SP(x);
 385   if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
 386     return getLevelFromScreenX_MM(x);
 387   else
 388     return getLevelFromScreenX_RND(x);
 389 }
 390
 391 int getLevelFromScreenY(int y)
 392 {
 393   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
 394     return getLevelFromScreenY_EM(y);
 395   if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
 396     return getLevelFromScreenY_SP(y);
 397   if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
 398     return getLevelFromScreenY_MM(y);
 399   else
 400     return getLevelFromScreenY_RND(y);
 401 }
 402
 403 int getScreenFieldSizeX(void)
 404 {
 405   return (tape.playing ? tape.scr_fieldx : SCR_FIELDX);
 406 }
 407
 408 int getScreenFieldSizeY(void)
 409 {
 410   return (tape.playing ? tape.scr_fieldy : SCR_FIELDY);
 411 }
 412
 413 void DumpTile(int x, int y)
 414 {
 415   int sx = SCREENX(x);
 416   int sy = SCREENY(y);
 417   char *token_name;
 418
 419   Info("---");
 420   Info("Field Info: SCREEN(%d, %d), LEVEL(%d, %d)", sx, sy, x, y);
 421   Info("---");
 422
 423   if (!IN_LEV_FIELD(x, y))
 424   {
 425     Info("(not in level field)");
 426     Info("");
 427
 428     return;
 429   }
 430
 431   token_name = element_info[Tile[x][y]].token_name;
 432
 433   Info("Tile:        %d\t['%s']",       Tile[x][y], token_name);
 434   Info("Back:        %s",               print_if_not_empty(Back[x][y]));
 435   Info("Store:       %s",               print_if_not_empty(Store[x][y]));
 436   Info("Store2:      %s",               print_if_not_empty(Store2[x][y]));
 437   Info("StorePlayer: %s",               print_if_not_empty(StorePlayer[x][y]));
 438   Info("MovPos:      %d",               MovPos[x][y]);
 439   Info("MovDir:      %d",               MovDir[x][y]);
 440   Info("MovDelay:    %d",               MovDelay[x][y]);
 441   Info("ChangeDelay: %d",               ChangeDelay[x][y]);
 442   Info("CustomValue: %d",               CustomValue[x][y]);
 443   Info("GfxElement:  %d",               GfxElement[x][y]);
 444   Info("GfxAction:   %d",               GfxAction[x][y]);
 445   Info("GfxFrame:    %d [%d]",          GfxFrame[x][y], FrameCounter);
 446   Info("Player x/y:  %d, %d",           local_player->jx, local_player->jy);
 447   Info("");
 448 }
 449
 450 void DumpTileFromScreen(int sx, int sy)
 451 {
 452   int lx = getLevelFromScreenX(sx);
 453   int ly = getLevelFromScreenY(sy);
 454
 455   DumpTile(lx, ly);
 456 }
 457
 458 void SetDrawtoField(int mode)
 459 {
 460   if (mode == DRAW_TO_FIELDBUFFER)
 461   {
 462     FX = 2 * TILEX_VAR;
 463     FY = 2 * TILEY_VAR;
 464     BX1 = -2;
 465     BY1 = -2;
 466     BX2 = SCR_FIELDX + 1;
 467     BY2 = SCR_FIELDY + 1;
 468
 469     drawto_field = fieldbuffer;
 470   }
 471   else  // DRAW_TO_BACKBUFFER
 472   {
 473     FX = SX;
 474     FY = SY;
 475     BX1 = 0;
 476     BY1 = 0;
 477     BX2 = SCR_FIELDX - 1;
 478     BY2 = SCR_FIELDY - 1;
 479
 480     drawto_field = backbuffer;
 481   }
 482 }
 483
 484 int GetDrawtoField(void)
 485 {
 486   return (drawto_field == fieldbuffer ? DRAW_TO_FIELDBUFFER : DRAW_TO_BACKBUFFER);
 487 }
 488
 489 static void RedrawPlayfield_RND(void)
 490 {
 491   if (game.envelope_active)
 492     return;
 493
 494   DrawLevel(REDRAW_ALL);
 495   DrawAllPlayers();
 496 }
 497
 498 void RedrawPlayfield(void)
 499 {
 500   if (game_status != GAME_MODE_PLAYING)
 501     return;
 502
 503   if (level.game_engine_type == GAME_ENGINE_TYPE_BD)
 504     RedrawPlayfield_BD(TRUE);
 505   else if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
 506     RedrawPlayfield_EM(TRUE);
 507   else if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
 508     RedrawPlayfield_SP(TRUE);
 509   else if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
 510     RedrawPlayfield_MM();
 511   else if (level.game_engine_type == GAME_ENGINE_TYPE_RND)
 512     RedrawPlayfield_RND();
 513
 514   BlitScreenToBitmap(backbuffer);
 515
 516   BlitBitmap(drawto, window, gfx.sx, gfx.sy, gfx.sxsize, gfx.sysize,
 517              gfx.sx, gfx.sy);
 518 }
 519
 520 static void DrawMaskedBorderExt_Rect(int x, int y, int width, int height,
 521                                      int draw_target)
 522 {
 523   Bitmap *src_bitmap = getGlobalBorderBitmapFromStatus(global.border_status);
 524   Bitmap *dst_bitmap = gfx.masked_border_bitmap_ptr;
 525
 526   // may happen for "border.draw_masked.*" with undefined "global.border.*"
 527   if (src_bitmap == NULL)
 528     return;
 529
 530   if (x == -1 && y == -1)
 531     return;
 532
 533   if (draw_target == DRAW_TO_SCREEN)
 534     BlitToScreenMasked(src_bitmap, x, y, width, height, x, y);
 535   else
 536     BlitBitmapMasked(src_bitmap, dst_bitmap, x, y, width, height, x, y);
 537 }
 538
 539 static void DrawMaskedBorderExt_FIELD(int draw_target)
 540 {
 541   if (global.border_status >= GAME_MODE_MAIN &&
 542       global.border_status <= GAME_MODE_PLAYING &&
 543       border.draw_masked[global.border_status])
 544     DrawMaskedBorderExt_Rect(REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE,
 545                              draw_target);
 546 }
 547
 548 static void DrawMaskedBorderExt_DOOR_1(int draw_target)
 549 {
 550   // when drawing to backbuffer, never draw border over open doors
 551   if (draw_target == DRAW_TO_BACKBUFFER &&
 552       (GetDoorState() & DOOR_OPEN_1))
 553     return;
 554
 555   if (border.draw_masked[GFX_SPECIAL_ARG_DOOR] &&
 556       (global.border_status != GAME_MODE_EDITOR ||
 557        border.draw_masked[GFX_SPECIAL_ARG_EDITOR]))
 558     DrawMaskedBorderExt_Rect(DX, DY, DXSIZE, DYSIZE, draw_target);
 559 }
 560
 561 static void DrawMaskedBorderExt_DOOR_2(int draw_target)
 562 {
 563   // when drawing to backbuffer, never draw border over open doors
 564   if (draw_target == DRAW_TO_BACKBUFFER &&
 565       (GetDoorState() & DOOR_OPEN_2))
 566     return;
 567
 568   if (border.draw_masked[GFX_SPECIAL_ARG_DOOR] &&
 569       global.border_status != GAME_MODE_EDITOR)
 570     DrawMaskedBorderExt_Rect(VX, VY, VXSIZE, VYSIZE, draw_target);
 571 }
 572
 573 static void DrawMaskedBorderExt_DOOR_3(int draw_target)
 574 {
 575   // currently not available
 576 }
 577
 578 static void DrawMaskedBorderExt_ALL(int draw_target)
 579 {
 580   DrawMaskedBorderExt_FIELD(draw_target);
 581   DrawMaskedBorderExt_DOOR_1(draw_target);
 582   DrawMaskedBorderExt_DOOR_2(draw_target);
 583   DrawMaskedBorderExt_DOOR_3(draw_target);
 584 }
 585
 586 static void DrawMaskedBorderExt(int redraw_mask, int draw_target)
 587 {
 588   // never draw masked screen borders on borderless screens
 589   if (global.border_status == GAME_MODE_LOADING ||
 590       global.border_status == GAME_MODE_TITLE)
 591     return;
 592
 593   if (redraw_mask & REDRAW_ALL)
 594     DrawMaskedBorderExt_ALL(draw_target);
 595   else
 596   {
 597     if (redraw_mask & REDRAW_FIELD)
 598       DrawMaskedBorderExt_FIELD(draw_target);
 599     if (redraw_mask & REDRAW_DOOR_1)
 600       DrawMaskedBorderExt_DOOR_1(draw_target);
 601     if (redraw_mask & REDRAW_DOOR_2)
 602       DrawMaskedBorderExt_DOOR_2(draw_target);
 603     if (redraw_mask & REDRAW_DOOR_3)
 604       DrawMaskedBorderExt_DOOR_3(draw_target);
 605   }
 606 }
 607
 608 void DrawMaskedBorder_FIELD(void)
 609 {
 610   DrawMaskedBorderExt_FIELD(DRAW_TO_BACKBUFFER);
 611 }
 612
 613 void DrawMaskedBorder(int redraw_mask)
 614 {
 615   DrawMaskedBorderExt(redraw_mask, DRAW_TO_BACKBUFFER);
 616 }
 617
 618 void DrawMaskedBorderToTarget(int draw_target)
 619 {
 620   if (draw_target == DRAW_TO_BACKBUFFER ||
 621       draw_target == DRAW_TO_SCREEN)
 622   {
 623     DrawMaskedBorderExt(REDRAW_ALL, draw_target);
 624   }
 625   else
 626   {
 627     int last_border_status = global.border_status;
 628
 629     if (draw_target == DRAW_TO_FADE_SOURCE)
 630     {
 631       global.border_status = gfx.fade_border_source_status;
 632       gfx.masked_border_bitmap_ptr = gfx.fade_bitmap_source;
 633     }
 634     else if (draw_target == DRAW_TO_FADE_TARGET)
 635     {
 636       global.border_status = gfx.fade_border_target_status;
 637       gfx.masked_border_bitmap_ptr = gfx.fade_bitmap_target;
 638     }
 639
 640     // always use global border for PLAYING when restarting the game
 641     if (global.border_status == GAME_MODE_PSEUDO_RESTARTING)
 642       global.border_status = GAME_MODE_PLAYING;
 643
 644     DrawMaskedBorderExt(REDRAW_ALL, draw_target);
 645
 646     global.border_status = last_border_status;
 647     gfx.masked_border_bitmap_ptr = backbuffer;
 648   }
 649 }
 650
 651 void DrawTileCursor(int draw_target, int drawing_stage)
 652 {
 653   int tile_cursor_active = (game_status == GAME_MODE_PLAYING);
 654
 655   DrawTileCursor_MM(draw_target, drawing_stage, tile_cursor_active);
 656 }
 657
 658 void BlitScreenToBitmapExt_RND(Bitmap *target_bitmap, int fx, int fy)
 659 {
 660   BlitBitmap(drawto_field, target_bitmap, fx, fy, SXSIZE, SYSIZE, SX, SY);
 661 }
 662
 663 void BlitScreenToBitmap_RND(Bitmap *target_bitmap)
 664 {
 665   int fx = getFieldbufferOffsetX_RND(ScreenMovDir, ScreenGfxPos);
 666   int fy = getFieldbufferOffsetY_RND(ScreenMovDir, ScreenGfxPos);
 667
 668   BlitScreenToBitmapExt_RND(target_bitmap, fx, fy);
 669 }
 670
 671 void BlitScreenToBitmap(Bitmap *target_bitmap)
 672 {
 673   if (level.game_engine_type == GAME_ENGINE_TYPE_BD)
 674     BlitScreenToBitmap_BD(target_bitmap);
 675   else if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
 676     BlitScreenToBitmap_EM(target_bitmap);
 677   else if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
 678     BlitScreenToBitmap_SP(target_bitmap);
 679   else if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
 680     BlitScreenToBitmap_MM(target_bitmap);
 681   else if (level.game_engine_type == GAME_ENGINE_TYPE_RND)
 682     BlitScreenToBitmap_RND(target_bitmap);
 683
 684   redraw_mask |= REDRAW_FIELD;
 685 }
 686
 687 static void DrawFramesPerSecond(void)
 688 {
 689   char text[100];
 690   int font_nr = FONT_TEXT_2;
 691   int font_width = getFontWidth(font_nr);
 692   int draw_deactivation_mask = GetDrawDeactivationMask();
 693   boolean draw_masked = (draw_deactivation_mask == REDRAW_NONE);
 694
 695   // draw FPS with leading space (needed if field buffer deactivated)
 696   sprintf(text, " %04.1f fps", global.frames_per_second);
 697
 698   // override draw deactivation mask (required for invisible warp mode)
 699   SetDrawDeactivationMask(REDRAW_NONE);
 700
 701   // draw opaque FPS if field buffer deactivated, else draw masked FPS
 702   DrawTextExt(backbuffer, SX + SXSIZE - font_width * strlen(text), SY, text,
 703               font_nr, (draw_masked ? BLIT_MASKED : BLIT_OPAQUE));
 704
 705   // set draw deactivation mask to previous value
 706   SetDrawDeactivationMask(draw_deactivation_mask);
 707
 708   // force full-screen redraw in this frame
 709   redraw_mask = REDRAW_ALL;
 710 }
 711
 712 #if DEBUG_FRAME_TIME
 713 static void PrintFrameTimeDebugging(void)
 714 {
 715   static unsigned int last_counter = 0;
 716   unsigned int counter = Counter();
 717   int diff_1 = counter - last_counter;
 718   int diff_2 = diff_1 - GAME_FRAME_DELAY;
 719   int diff_2_max = 20;
 720   int diff_2_cut = MIN(ABS(diff_2), diff_2_max);
 721   char diff_bar[2 * diff_2_max + 5];
 722   int pos = 0;
 723   int i;
 724
 725   diff_bar[pos++] = (diff_2 < -diff_2_max ? '<' : ' ');
 726
 727   for (i = 0; i < diff_2_max; i++)
 728     diff_bar[pos++] = (diff_2 >= 0 ? ' ' :
 729                        i >= diff_2_max - diff_2_cut ? '-' : ' ');
 730
 731   diff_bar[pos++] = '|';
 732
 733   for (i = 0; i < diff_2_max; i++)
 734     diff_bar[pos++] = (diff_2 <= 0 ? ' ' : i < diff_2_cut ? '+' : ' ');
 735
 736   diff_bar[pos++] = (diff_2 > diff_2_max ? '>' : ' ');
 737
 738   diff_bar[pos++] = '\0';
 739
 740   Debug("time:frame", "%06d [%02d] [%c%02d] %s",
 741         counter,
 742         diff_1,
 743         (diff_2 < 0 ? '-' : diff_2 > 0 ? '+' : ' '), ABS(diff_2),
 744         diff_bar);
 745
 746   last_counter = counter;
 747 }
 748 #endif
 749
 750 static int unifiedRedrawMask(int mask)
 751 {
 752   if (mask & REDRAW_ALL)
 753     return REDRAW_ALL;
 754
 755   if (mask & REDRAW_FIELD && mask & REDRAW_DOORS)
 756     return REDRAW_ALL;
 757
 758   return mask;
 759 }
 760
 761 static boolean equalRedrawMasks(int mask_1, int mask_2)
 762 {
 763   return unifiedRedrawMask(mask_1) == unifiedRedrawMask(mask_2);
 764 }
 765
 766 void BackToFront(void)
 767 {
 768   static int last_redraw_mask = REDRAW_NONE;
 769
 770   // force screen redraw in every frame to continue drawing global animations
 771   // (but always use the last redraw mask to prevent unwanted side effects)
 772   if (redraw_mask == REDRAW_NONE)
 773     redraw_mask = last_redraw_mask;
 774
 775   last_redraw_mask = redraw_mask;
 776
 777 #if 1
 778   // masked border now drawn immediately when blitting backbuffer to window
 779 #else
 780   // draw masked border to all viewports, if defined
 781   DrawMaskedBorder(redraw_mask);
 782 #endif
 783
 784   // draw frames per second (only if debug mode is enabled)
 785   if (redraw_mask & REDRAW_FPS)
 786     DrawFramesPerSecond();
 787
 788   // remove playfield redraw before potentially merging with doors redraw
 789   if (DrawingDeactivated(REAL_SX, REAL_SY))
 790     redraw_mask &= ~REDRAW_FIELD;
 791
 792   // redraw complete window if both playfield and (some) doors need redraw
 793   if (redraw_mask & REDRAW_FIELD && redraw_mask & REDRAW_DOORS)
 794     redraw_mask = REDRAW_ALL;
 795
 796   /* although redrawing the whole window would be fine for normal gameplay,
 797      being able to only redraw the playfield is required for deactivating
 798      certain drawing areas (mainly playfield) to work, which is needed for
 799      warp-forward to be fast enough (by skipping redraw of most frames) */
 800
 801   if (redraw_mask & REDRAW_ALL)
 802   {
 803     BlitBitmap(backbuffer, window, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
 804   }
 805   else if (redraw_mask & REDRAW_FIELD)
 806   {
 807     BlitBitmap(backbuffer, window,
 808                REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE, REAL_SX, REAL_SY);
 809   }
 810   else if (redraw_mask & REDRAW_DOORS)
 811   {
 812     // merge door areas to prevent calling screen redraw more than once
 813     int x1 = WIN_XSIZE;
 814     int y1 = WIN_YSIZE;
 815     int x2 = 0;
 816     int y2 = 0;
 817
 818     if (redraw_mask & REDRAW_DOOR_1)
 819     {
 820       x1 = MIN(x1, DX);
 821       y1 = MIN(y1, DY);
 822       x2 = MAX(x2, DX + DXSIZE);
 823       y2 = MAX(y2, DY + DYSIZE);
 824     }
 825
 826     if (redraw_mask & REDRAW_DOOR_2)
 827     {
 828       x1 = MIN(x1, VX);
 829       y1 = MIN(y1, VY);
 830       x2 = MAX(x2, VX + VXSIZE);
 831       y2 = MAX(y2, VY + VYSIZE);
 832     }
 833
 834     if (redraw_mask & REDRAW_DOOR_3)
 835     {
 836       x1 = MIN(x1, EX);
 837       y1 = MIN(y1, EY);
 838       x2 = MAX(x2, EX + EXSIZE);
 839       y2 = MAX(y2, EY + EYSIZE);
 840     }
 841
 842     // make sure that at least one pixel is blitted, and inside the screen
 843     // (else nothing is blitted, causing the animations not to be updated)
 844     x1 = MIN(MAX(0, x1), WIN_XSIZE - 1);
 845     y1 = MIN(MAX(0, y1), WIN_YSIZE - 1);
 846     x2 = MIN(MAX(1, x2), WIN_XSIZE);
 847     y2 = MIN(MAX(1, y2), WIN_YSIZE);
 848
 849     BlitBitmap(backbuffer, window, x1, y1, x2 - x1, y2 - y1, x1, y1);
 850   }
 851
 852   redraw_mask = REDRAW_NONE;
 853
 854 #if DEBUG_FRAME_TIME
 855   PrintFrameTimeDebugging();
 856 #endif
 857 }
 858
 859 void BackToFront_WithFrameDelay(unsigned int frame_delay_value)
 860 {
 861   unsigned int frame_delay_value_old = GetVideoFrameDelay();
 862
 863   SetVideoFrameDelay(frame_delay_value);
 864
 865   BackToFront();
 866
 867   SetVideoFrameDelay(frame_delay_value_old);
 868 }
 869
 870 static int fade_type_skip = FADE_TYPE_NONE;
 871
 872 static void FadeExt(int fade_mask, int fade_mode, int fade_type)
 873 {
 874   void (*draw_border_function)(void) = NULL;
 875   int x, y, width, height;
 876   int fade_delay, post_delay;
 877
 878   if (fade_type == FADE_TYPE_FADE_OUT)
 879   {
 880     if (fade_type_skip != FADE_TYPE_NONE)
 881     {
 882       // skip all fade operations until specified fade operation
 883       if (fade_type & fade_type_skip)
 884         fade_type_skip = FADE_TYPE_NONE;
 885
 886       return;
 887     }
 888
 889     if (fading.fade_mode & FADE_TYPE_TRANSFORM)
 890       return;
 891   }
 892
 893   redraw_mask |= fade_mask;
 894
 895   if (fade_type == FADE_TYPE_SKIP)
 896   {
 897     fade_type_skip = fade_mode;
 898
 899     return;
 900   }
 901
 902   fade_delay = fading.fade_delay;
 903   post_delay = (fade_mode == FADE_MODE_FADE_OUT ? fading.post_delay : 0);
 904
 905   if (fade_type_skip != FADE_TYPE_NONE)
 906   {
 907     // skip all fade operations until specified fade operation
 908     if (fade_type & fade_type_skip)
 909       fade_type_skip = FADE_TYPE_NONE;
 910
 911     fade_delay = 0;
 912   }
 913
 914   if (global.autoplay_leveldir)
 915   {
 916     return;
 917   }
 918
 919   if (fade_mask == REDRAW_FIELD)
 920   {
 921     x = FADE_SX;
 922     y = FADE_SY;
 923     width  = FADE_SXSIZE;
 924     height = FADE_SYSIZE;
 925
 926     if (border.draw_masked_when_fading)
 927       draw_border_function = DrawMaskedBorder_FIELD;    // update when fading
 928     else
 929       DrawMaskedBorder_FIELD();                         // draw once
 930   }
 931   else          // REDRAW_ALL
 932   {
 933     x = 0;
 934     y = 0;
 935     width  = WIN_XSIZE;
 936     height = WIN_YSIZE;
 937   }
 938
 939   // when switching screens without fading, set fade delay to zero
 940   if (!setup.fade_screens || fading.fade_mode == FADE_MODE_NONE)
 941     fade_delay = 0;
 942
 943   // do not display black frame when fading out without fade delay
 944   if (fade_mode == FADE_MODE_FADE_OUT && fade_delay == 0)
 945     return;
 946
 947   FadeRectangle(x, y, width, height, fade_mode, fade_delay, post_delay,
 948                 draw_border_function);
 949
 950   redraw_mask &= ~fade_mask;
 951
 952   ClearAutoRepeatKeyEvents();
 953 }
 954
 955 static void SetScreenStates_BeforeFadingIn(void)
 956 {
 957   // temporarily set screen mode for animations to screen after fading in
 958   global.anim_status = global.anim_status_next;
 959
 960   // store backbuffer with all animations that will be started after fading in
 961   PrepareFadeBitmap(DRAW_TO_FADE_TARGET);
 962
 963   // set screen mode for animations back to fading
 964   global.anim_status = GAME_MODE_PSEUDO_FADING;
 965 }
 966
 967 static void SetScreenStates_AfterFadingIn(void)
 968 {
 969   // store new source screen (to use correct masked border for fading)
 970   gfx.fade_border_source_status = global.border_status;
 971
 972   global.anim_status = global.anim_status_next;
 973 }
 974
 975 static void SetScreenStates_BeforeFadingOut(void)
 976 {
 977   // store new target screen (to use correct masked border for fading)
 978   gfx.fade_border_target_status = game_status;
 979
 980   // set screen mode for animations to fading
 981   global.anim_status = GAME_MODE_PSEUDO_FADING;
 982
 983   // store backbuffer with all animations that will be stopped for fading out
 984   PrepareFadeBitmap(DRAW_TO_FADE_SOURCE);
 985 }
 986
 987 static void SetScreenStates_AfterFadingOut(void)
 988 {
 989   global.border_status = game_status;
 990
 991   // always use global border for PLAYING when restarting the game
 992   if (global.border_status == GAME_MODE_PSEUDO_RESTARTING)
 993     global.border_status = GAME_MODE_PLAYING;
 994 }
 995
 996 void FadeIn(int fade_mask)
 997 {
 998   SetScreenStates_BeforeFadingIn();
 999
1000 #if 1
1001   DrawMaskedBorder(REDRAW_ALL);
1002 #endif
1003
1004   if (fading.fade_mode & FADE_TYPE_TRANSFORM)
1005     FadeExt(fade_mask, fading.fade_mode, FADE_TYPE_FADE_IN);
1006   else
1007     FadeExt(fade_mask, FADE_MODE_FADE_IN, FADE_TYPE_FADE_IN);
1008
1009   FADE_SX = REAL_SX;
1010   FADE_SY = REAL_SY;
1011   FADE_SXSIZE = FULL_SXSIZE;
1012   FADE_SYSIZE = FULL_SYSIZE;
1013
1014   // activate virtual buttons depending on upcoming game status
1015   if (strEqual(setup.touch.control_type, TOUCH_CONTROL_VIRTUAL_BUTTONS) &&
1016       game_status == GAME_MODE_PLAYING && !tape.playing)
1017     SetOverlayActive(TRUE);
1018
1019   SetScreenStates_AfterFadingIn();
1020
1021   // force update of global animation status in case of rapid screen changes
1022   redraw_mask = REDRAW_ALL;
1023   BackToFront();
1024 }
1025
1026 void FadeOut(int fade_mask)
1027 {
1028   // update screen if areas covered by "fade_mask" and "redraw_mask" differ
1029   if (!equalRedrawMasks(fade_mask, redraw_mask) &&
1030       fade_type_skip != FADE_MODE_SKIP_FADE_OUT)
1031     BackToFront();
1032
1033   // when using BD game engine, cover playfield before fading out after a game
1034   if (game_bd.cover_screen)
1035     CoverScreen_BD();
1036
1037   SetScreenStates_BeforeFadingOut();
1038
1039   SetTileCursorActive(FALSE);
1040   SetOverlayActive(FALSE);
1041
1042 #if 0
1043   DrawMaskedBorder(REDRAW_ALL);
1044 #endif
1045
1046   if (fading.fade_mode & FADE_TYPE_TRANSFORM)
1047     FadeExt(fade_mask, fading.fade_mode, FADE_TYPE_FADE_OUT);
1048   else
1049     FadeExt(fade_mask, FADE_MODE_FADE_OUT, FADE_TYPE_FADE_OUT);
1050
1051   SetScreenStates_AfterFadingOut();
1052 }
1053
1054 static void FadeSetLeaveNext(struct TitleFadingInfo fading_leave, boolean set)
1055 {
1056   static struct TitleFadingInfo fading_leave_stored;
1057
1058   if (set)
1059     fading_leave_stored = fading_leave;
1060   else
1061     fading = fading_leave_stored;
1062 }
1063
1064 void FadeSetEnterMenu(void)
1065 {
1066   fading = menu.enter_menu;
1067
1068   FadeSetLeaveNext(fading, TRUE);       // (keep same fade mode)
1069 }
1070
1071 void FadeSetLeaveMenu(void)
1072 {
1073   fading = menu.leave_menu;
1074
1075   FadeSetLeaveNext(fading, TRUE);       // (keep same fade mode)
1076 }
1077
1078 void FadeSetEnterScreen(void)
1079 {
1080   fading = menu.enter_screen[game_status];
1081
1082   FadeSetLeaveNext(menu.leave_screen[game_status], TRUE);       // store
1083 }
1084
1085 void FadeSetNextScreen(void)
1086 {
1087   fading = menu.next_screen[game_status];
1088
1089   // (do not overwrite fade mode set by FadeSetEnterScreen)
1090   // FadeSetLeaveNext(fading, TRUE);    // (keep same fade mode)
1091 }
1092
1093 void FadeSetLeaveScreen(void)
1094 {
1095   FadeSetLeaveNext(menu.leave_screen[game_status], FALSE);      // recall
1096 }
1097
1098 void FadeSetFromType(int type)
1099 {
1100   if (type & TYPE_ENTER_SCREEN)
1101     FadeSetEnterScreen();
1102   else if (type & TYPE_ENTER)
1103     FadeSetEnterMenu();
1104   else if (type & TYPE_LEAVE)
1105     FadeSetLeaveMenu();
1106 }
1107
1108 void FadeSetDisabled(void)
1109 {
1110   static struct TitleFadingInfo fading_none = { FADE_MODE_NONE, -1, -1, -1 };
1111
1112   fading = fading_none;
1113 }
1114
1115 void FadeSkipNextFadeIn(void)
1116 {
1117   FadeExt(0, FADE_MODE_SKIP_FADE_IN, FADE_TYPE_SKIP);
1118 }
1119
1120 void FadeSkipNextFadeOut(void)
1121 {
1122   FadeExt(0, FADE_MODE_SKIP_FADE_OUT, FADE_TYPE_SKIP);
1123 }
1124
1125 static int getGlobalGameStatus(int status)
1126 {
1127   return (status == GAME_MODE_PSEUDO_TYPENAME ? GAME_MODE_MAIN :
1128           status == GAME_MODE_SCOREINFO       ? GAME_MODE_SCORES :
1129           status);
1130 }
1131
1132 int getImageFromGraphicOrDefault(int graphic, int default_graphic)
1133 {
1134   if (graphic == IMG_UNDEFINED)
1135     return IMG_UNDEFINED;
1136
1137   boolean redefined = getImageListEntryFromImageID(graphic)->redefined;
1138
1139   return (graphic_info[graphic].bitmap != NULL || redefined ?
1140           graphic : default_graphic);
1141 }
1142
1143 static int getBackgroundImage(int graphic)
1144 {
1145   return getImageFromGraphicOrDefault(graphic, IMG_BACKGROUND);
1146 }
1147
1148 static int getGlobalBorderImage(int graphic)
1149 {
1150   return getImageFromGraphicOrDefault(graphic, IMG_GLOBAL_BORDER);
1151 }
1152
1153 Bitmap *getGlobalBorderBitmapFromStatus(int status_raw)
1154 {
1155   int status = getGlobalGameStatus(status_raw);
1156   int graphic =
1157     (status == GAME_MODE_MAIN    ? IMG_GLOBAL_BORDER_MAIN :
1158      status == GAME_MODE_SCORES  ? IMG_GLOBAL_BORDER_SCORES :
1159      status == GAME_MODE_EDITOR  ? IMG_GLOBAL_BORDER_EDITOR :
1160      status == GAME_MODE_PLAYING ? IMG_GLOBAL_BORDER_PLAYING :
1161      IMG_GLOBAL_BORDER);
1162   int graphic_final = getGlobalBorderImage(graphic);
1163
1164   return graphic_info[graphic_final].bitmap;
1165 }
1166
1167 void SetBackgroundImage(int graphic, int redraw_mask)
1168 {
1169   struct GraphicInfo *g = &graphic_info[graphic];
1170   struct GraphicInfo g_undefined = { 0 };
1171
1172   if (graphic == IMG_UNDEFINED)
1173     g = &g_undefined;
1174
1175   // always use original size bitmap for backgrounds, if existing
1176   Bitmap *bitmap = (g->bitmaps != NULL &&
1177                     g->bitmaps[IMG_BITMAP_PTR_ORIGINAL] != NULL ?
1178                     g->bitmaps[IMG_BITMAP_PTR_ORIGINAL] : g->bitmap);
1179
1180   // remove every mask before setting mask for window, and
1181   // remove window area mask before setting mask for main or door area
1182   int remove_mask = (redraw_mask == REDRAW_ALL ? 0xffff : REDRAW_ALL);
1183
1184   // (!!! TO BE FIXED: The whole REDRAW_* system really sucks! !!!)
1185   SetBackgroundBitmap(NULL, remove_mask, 0, 0, 0, 0);   // !!! FIX THIS !!!
1186   SetBackgroundBitmap(bitmap, redraw_mask,
1187                       g->src_x, g->src_y,
1188                       g->width, g->height);
1189 }
1190
1191 void SetWindowBackgroundImageIfDefined(int graphic)
1192 {
1193   if (graphic_info[graphic].bitmap)
1194     SetBackgroundImage(graphic, REDRAW_ALL);
1195 }
1196
1197 void SetMainBackgroundImageIfDefined(int graphic)
1198 {
1199   if (graphic_info[graphic].bitmap)
1200     SetBackgroundImage(graphic, REDRAW_FIELD);
1201 }
1202
1203 void SetDoorBackgroundImageIfDefined(int graphic)
1204 {
1205   if (graphic_info[graphic].bitmap)
1206     SetBackgroundImage(graphic, REDRAW_DOOR_1);
1207 }
1208
1209 void SetWindowBackgroundImage(int graphic)
1210 {
1211   SetBackgroundImage(getBackgroundImage(graphic), REDRAW_ALL);
1212 }
1213
1214 void SetMainBackgroundImage(int graphic)
1215 {
1216   SetBackgroundImage(getBackgroundImage(graphic), REDRAW_FIELD);
1217 }
1218
1219 void SetDoorBackgroundImage(int graphic)
1220 {
1221   SetBackgroundImage(getBackgroundImage(graphic), REDRAW_DOOR_1);
1222 }
1223
1224 void SetPanelBackground(void)
1225 {
1226   SetDoorBackgroundImage(IMG_BACKGROUND_PANEL);
1227 }
1228
1229 void DrawBackground(int x, int y, int width, int height)
1230 {
1231   // "drawto" might still point to playfield buffer here (hall of fame)
1232   ClearRectangleOnBackground(backbuffer, x, y, width, height);
1233
1234   if (IN_GFX_FIELD_FULL(x, y))
1235     redraw_mask |= REDRAW_FIELD;
1236   else if (IN_GFX_DOOR_1(x, y))
1237     redraw_mask |= REDRAW_DOOR_1;
1238   else if (IN_GFX_DOOR_2(x, y))
1239     redraw_mask |= REDRAW_DOOR_2;
1240   else if (IN_GFX_DOOR_3(x, y))
1241     redraw_mask |= REDRAW_DOOR_3;
1242 }
1243
1244 void DrawBackgroundForFont(int x, int y, int width, int height, int font_nr)
1245 {
1246   struct FontBitmapInfo *font = getFontBitmapInfo(font_nr);
1247
1248   if (font->bitmap == NULL)
1249     return;
1250
1251   DrawBackground(x, y, width, height);
1252 }
1253
1254 void DrawBackgroundForGraphic(int x, int y, int width, int height, int graphic)
1255 {
1256   struct GraphicInfo *g = &graphic_info[graphic];
1257
1258   if (g->bitmap == NULL)
1259     return;
1260
1261   DrawBackground(x, y, width, height);
1262 }
1263
1264 static int game_status_last = -1;
1265 static Bitmap *global_border_bitmap_last = NULL;
1266 static Bitmap *global_border_bitmap = NULL;
1267 static int real_sx_last = -1, real_sy_last = -1;
1268 static int full_sxsize_last = -1, full_sysize_last = -1;
1269 static int dx_last = -1, dy_last = -1;
1270 static int dxsize_last = -1, dysize_last = -1;
1271 static int vx_last = -1, vy_last = -1;
1272 static int vxsize_last = -1, vysize_last = -1;
1273 static int ex_last = -1, ey_last = -1;
1274 static int exsize_last = -1, eysize_last = -1;
1275
1276 boolean CheckIfGlobalBorderHasChanged(void)
1277 {
1278   // if game status has not changed, global border has not changed either
1279   if (game_status == game_status_last)
1280     return FALSE;
1281
1282   // determine and store new global border bitmap for current game status
1283   global_border_bitmap = getGlobalBorderBitmapFromStatus(game_status);
1284
1285   return (global_border_bitmap_last != global_border_bitmap);
1286 }
1287
1288 #define ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED             0
1289
1290 #if ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED
1291 static boolean CheckIfGlobalBorderRedrawIsNeeded(void)
1292 {
1293   // if game status has not changed, nothing has to be redrawn
1294   if (game_status == game_status_last)
1295     return FALSE;
1296
1297   // redraw if last screen was title screen
1298   if (game_status_last == GAME_MODE_TITLE)
1299     return TRUE;
1300
1301   // redraw if global screen border has changed
1302   if (CheckIfGlobalBorderHasChanged())
1303     return TRUE;
1304
1305   // redraw if position or size of playfield area has changed
1306   if (real_sx_last != REAL_SX || real_sy_last != REAL_SY ||
1307       full_sxsize_last != FULL_SXSIZE || full_sysize_last != FULL_SYSIZE)
1308     return TRUE;
1309
1310   // redraw if position or size of door area has changed
1311   if (dx_last != DX || dy_last != DY ||
1312       dxsize_last != DXSIZE || dysize_last != DYSIZE)
1313     return TRUE;
1314
1315   // redraw if position or size of tape area has changed
1316   if (vx_last != VX || vy_last != VY ||
1317       vxsize_last != VXSIZE || vysize_last != VYSIZE)
1318     return TRUE;
1319
1320   // redraw if position or size of editor area has changed
1321   if (ex_last != EX || ey_last != EY ||
1322       exsize_last != EXSIZE || eysize_last != EYSIZE)
1323     return TRUE;
1324
1325   return FALSE;
1326 }
1327 #endif
1328
1329 static void RedrawGlobalBorderFromBitmap(Bitmap *bitmap)
1330 {
1331   if (bitmap)
1332     BlitBitmap(bitmap, backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
1333   else
1334     ClearRectangle(backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE);
1335 }
1336
1337 void RedrawGlobalBorder(void)
1338 {
1339   Bitmap *bitmap = getGlobalBorderBitmapFromStatus(game_status);
1340
1341   RedrawGlobalBorderFromBitmap(bitmap);
1342
1343   redraw_mask = REDRAW_ALL;
1344 }
1345
1346 static void RedrawGlobalBorderIfNeeded(void)
1347 {
1348 #if ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED
1349   if (game_status == game_status_last)
1350     return;
1351 #endif
1352
1353   // copy current draw buffer to later copy back areas that have not changed
1354   if (game_status_last != GAME_MODE_TITLE)
1355     BlitBitmap(backbuffer, bitmap_db_store_1, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
1356
1357 #if ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED
1358   if (CheckIfGlobalBorderRedrawIsNeeded())
1359 #else
1360   // determine and store new global border bitmap for current game status
1361   global_border_bitmap = getGlobalBorderBitmapFromStatus(game_status);
1362 #endif
1363   {
1364     // redraw global screen border (or clear, if defined to be empty)
1365     RedrawGlobalBorderFromBitmap(global_border_bitmap);
1366
1367     if (game_status == GAME_MODE_EDITOR)
1368       DrawSpecialEditorDoor();
1369
1370     // copy previous playfield and door areas, if they are defined on both
1371     // previous and current screen and if they still have the same size
1372
1373     if (real_sx_last != -1 && real_sy_last != -1 &&
1374         REAL_SX != -1 && REAL_SY != -1 &&
1375         full_sxsize_last == FULL_SXSIZE && full_sysize_last == FULL_SYSIZE)
1376       BlitBitmap(bitmap_db_store_1, backbuffer,
1377                  real_sx_last, real_sy_last, FULL_SXSIZE, FULL_SYSIZE,
1378                  REAL_SX, REAL_SY);
1379
1380     if (dx_last != -1 && dy_last != -1 &&
1381         DX != -1 && DY != -1 &&
1382         dxsize_last == DXSIZE && dysize_last == DYSIZE)
1383       BlitBitmap(bitmap_db_store_1, backbuffer,
1384                  dx_last, dy_last, DXSIZE, DYSIZE, DX, DY);
1385
1386     if (game_status != GAME_MODE_EDITOR)
1387     {
1388       if (vx_last != -1 && vy_last != -1 &&
1389           VX != -1 && VY != -1 &&
1390           vxsize_last == VXSIZE && vysize_last == VYSIZE)
1391         BlitBitmap(bitmap_db_store_1, backbuffer,
1392                    vx_last, vy_last, VXSIZE, VYSIZE, VX, VY);
1393     }
1394     else
1395     {
1396       if (ex_last != -1 && ey_last != -1 &&
1397           EX != -1 && EY != -1 &&
1398           exsize_last == EXSIZE && eysize_last == EYSIZE)
1399         BlitBitmap(bitmap_db_store_1, backbuffer,
1400                    ex_last, ey_last, EXSIZE, EYSIZE, EX, EY);
1401     }
1402
1403     redraw_mask = REDRAW_ALL;
1404   }
1405
1406   game_status_last = game_status;
1407
1408   global_border_bitmap_last = global_border_bitmap;
1409
1410   real_sx_last = REAL_SX;
1411   real_sy_last = REAL_SY;
1412   full_sxsize_last = FULL_SXSIZE;
1413   full_sysize_last = FULL_SYSIZE;
1414   dx_last = DX;
1415   dy_last = DY;
1416   dxsize_last = DXSIZE;
1417   dysize_last = DYSIZE;
1418   vx_last = VX;
1419   vy_last = VY;
1420   vxsize_last = VXSIZE;
1421   vysize_last = VYSIZE;
1422   ex_last = EX;
1423   ey_last = EY;
1424   exsize_last = EXSIZE;
1425   eysize_last = EYSIZE;
1426 }
1427
1428 void ClearField(void)
1429 {
1430   RedrawGlobalBorderIfNeeded();
1431
1432   // !!! "drawto" might still point to playfield buffer here (see above) !!!
1433   // (when entering hall of fame after playing)
1434   DrawBackground(REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE);
1435
1436   // !!! maybe this should be done before clearing the background !!!
1437   if (game_status == GAME_MODE_PLAYING)
1438   {
1439     ClearRectangle(fieldbuffer, 0, 0, FXSIZE, FYSIZE);
1440     SetDrawtoField(DRAW_TO_FIELDBUFFER);
1441   }
1442   else
1443   {
1444     SetDrawtoField(DRAW_TO_BACKBUFFER);
1445   }
1446 }
1447
1448 void MarkTileDirty(int x, int y)
1449 {
1450   redraw_mask |= REDRAW_FIELD;
1451 }
1452
1453 void SetBorderElement(void)
1454 {
1455   int x, y;
1456
1457   BorderElement = EL_EMPTY;
1458
1459   // only the R'n'D game engine may use an additional steelwall border
1460   if (level.game_engine_type != GAME_ENGINE_TYPE_RND)
1461     return;
1462
1463   for (y = 0; y < lev_fieldy && BorderElement == EL_EMPTY; y++)
1464   {
1465     for (x = 0; x < lev_fieldx; x++)
1466     {
1467       if (!IS_INDESTRUCTIBLE(Tile[x][y]))
1468         BorderElement = EL_STEELWALL;
1469
1470       if (y != 0 && y != lev_fieldy - 1 && x != lev_fieldx - 1)
1471         x = lev_fieldx - 2;
1472     }
1473   }
1474 }
1475
1476 void FloodFillLevelExt(int start_x, int start_y, int fill_element,
1477                        int max_array_fieldx, int max_array_fieldy,
1478                        short field[max_array_fieldx][max_array_fieldy],
1479                        int max_fieldx, int max_fieldy)
1480 {
1481   static struct XY stack_buffer[MAX_LEV_FIELDX * MAX_LEV_FIELDY];
1482   struct XY *check = xy_topdown;
1483   int old_element = field[start_x][start_y];
1484   int stack_pos = 0;
1485
1486   // do nothing if start field already has the desired content
1487   if (old_element == fill_element)
1488     return;
1489
1490   stack_buffer[stack_pos++] = (struct XY){ start_x, start_y };
1491
1492   while (stack_pos > 0)
1493   {
1494     struct XY current = stack_buffer[--stack_pos];
1495     int i;
1496
1497     field[current.x][current.y] = fill_element;
1498
1499     for (i = 0; i < 4; i++)
1500     {
1501       int x = current.x + check[i].x;
1502       int y = current.y + check[i].y;
1503
1504       // check for stack buffer overflow (should not happen)
1505       if (stack_pos >= MAX_LEV_FIELDX * MAX_LEV_FIELDY)
1506         Fail("Stack buffer overflow in 'FloodFillLevelExt()'. Please debug.");
1507
1508       if (IN_FIELD(x, y, max_fieldx, max_fieldy) && field[x][y] == old_element)
1509         stack_buffer[stack_pos++] = (struct XY){ x, y };
1510     }
1511   }
1512 }
1513
1514 void FloodFillLevel(int from_x, int from_y, int fill_element,
1515                     short field[MAX_LEV_FIELDX][MAX_LEV_FIELDY],
1516                     int max_fieldx, int max_fieldy)
1517 {
1518   FloodFillLevelExt(from_x, from_y, fill_element,
1519                     MAX_LEV_FIELDX, MAX_LEV_FIELDY, field,
1520                     max_fieldx, max_fieldy);
1521 }
1522
1523 void SetRandomAnimationValue(int x, int y)
1524 {
1525   gfx.anim_random_frame = GfxRandom[x][y];
1526 }
1527
1528 void SetAnimationFirstLevel(int first_level)
1529 {
1530   gfx.anim_first_level = first_level;
1531 }
1532
1533 int getGraphicAnimationFrame(int graphic, int sync_frame)
1534 {
1535   // animation synchronized with global frame counter, not move position
1536   if (graphic_info[graphic].anim_global_sync || sync_frame < 0)
1537     sync_frame = FrameCounter;
1538   else if (graphic_info[graphic].anim_global_anim_sync)
1539     sync_frame = getGlobalAnimSyncFrame();
1540
1541   return getAnimationFrame(graphic_info[graphic].anim_frames,
1542                            graphic_info[graphic].anim_delay,
1543                            graphic_info[graphic].anim_mode,
1544                            graphic_info[graphic].anim_start_frame,
1545                            sync_frame);
1546 }
1547
1548 int getGraphicAnimationFrameXY(int graphic, int lx, int ly)
1549 {
1550   if (graphic_info[graphic].anim_mode & ANIM_TILED)
1551   {
1552     struct GraphicInfo *g = &graphic_info[graphic];
1553     int xsize = MAX(1, g->anim_frames_per_line);
1554     int ysize = MAX(1, g->anim_frames / xsize);
1555     int xoffset = g->anim_start_frame % xsize;
1556     int yoffset = g->anim_start_frame % ysize;
1557     // may be needed if screen field is significantly larger than playfield
1558     int x = (lx + xoffset + SCR_FIELDX * xsize) % xsize;
1559     int y = (ly + yoffset + SCR_FIELDY * ysize) % ysize;
1560     int sync_frame = y * xsize + x;
1561
1562     return sync_frame % g->anim_frames;
1563   }
1564   else if (graphic_info[graphic].anim_mode & ANIM_RANDOM_STATIC)
1565   {
1566     struct GraphicInfo *g = &graphic_info[graphic];
1567     // may be needed if screen field is significantly larger than playfield
1568     int x = (lx + SCR_FIELDX * lev_fieldx) % lev_fieldx;
1569     int y = (ly + SCR_FIELDY * lev_fieldy) % lev_fieldy;
1570     int sync_frame = GfxRandomStatic[x][y];
1571
1572     return sync_frame % g->anim_frames;
1573   }
1574   else
1575   {
1576     int sync_frame = (IN_LEV_FIELD(lx, ly) ? GfxFrame[lx][ly] : -1);
1577
1578     return getGraphicAnimationFrame(graphic, sync_frame);
1579   }
1580 }
1581
1582 void getGraphicSourceBitmap(int graphic, int tilesize, Bitmap **bitmap)
1583 {
1584   struct GraphicInfo *g = &graphic_info[graphic];
1585   int tilesize_capped = MIN(MAX(1, tilesize), TILESIZE);
1586
1587   if (tilesize == gfx.standard_tile_size)
1588     *bitmap = g->bitmaps[IMG_BITMAP_STANDARD];
1589   else if (tilesize == game.tile_size)
1590     *bitmap = g->bitmaps[IMG_BITMAP_PTR_GAME];
1591   else
1592     *bitmap = g->bitmaps[IMG_BITMAP_1x1 - log_2(tilesize_capped)];
1593 }
1594
1595 void getGraphicSourceXY(int graphic, int frame, int *x, int *y,
1596                         boolean get_backside)
1597 {
1598   struct GraphicInfo *g = &graphic_info[graphic];
1599   int src_x = g->src_x + (get_backside ? g->offset2_x : 0);
1600   int src_y = g->src_y + (get_backside ? g->offset2_y : 0);
1601
1602   if (g->offset_y == 0)         // frames are ordered horizontally
1603   {
1604     int max_width = g->anim_frames_per_line * g->width;
1605     int pos = (src_y / g->height) * max_width + src_x + frame * g->offset_x;
1606
1607     *x = pos % max_width;
1608     *y = src_y % g->height + pos / max_width * g->height;
1609   }
1610   else if (g->offset_x == 0)    // frames are ordered vertically
1611   {
1612     int max_height = g->anim_frames_per_line * g->height;
1613     int pos = (src_x / g->width) * max_height + src_y + frame * g->offset_y;
1614
1615     *x = src_x % g->width + pos / max_height * g->width;
1616     *y = pos % max_height;
1617   }
1618   else                          // frames are ordered diagonally
1619   {
1620     *x = src_x + frame * g->offset_x;
1621     *y = src_y + frame * g->offset_y;
1622   }
1623 }
1624
1625 void getSizedGraphicSourceExt(int graphic, int frame, int tilesize,
1626                               Bitmap **bitmap, int *x, int *y,
1627                               boolean get_backside)
1628 {
1629   struct GraphicInfo *g = &graphic_info[graphic];
1630
1631   // if no graphics defined at all, use fallback graphics
1632   if (g->bitmaps == NULL)
1633     *g = graphic_info[IMG_CHAR_EXCLAM];
1634
1635   // if no in-game graphics defined, always use standard graphic size
1636   if (g->bitmaps[IMG_BITMAP_PTR_GAME] == NULL)
1637     tilesize = TILESIZE;
1638
1639   getGraphicSourceBitmap(graphic, tilesize, bitmap);
1640   getGraphicSourceXY(graphic, frame, x, y, get_backside);
1641
1642   *x = *x * tilesize / g->tile_size;
1643   *y = *y * tilesize / g->tile_size;
1644 }
1645
1646 void getSizedGraphicSource(int graphic, int frame, int tilesize,
1647                            Bitmap **bitmap, int *x, int *y)
1648 {
1649   getSizedGraphicSourceExt(graphic, frame, tilesize, bitmap, x, y, FALSE);
1650 }
1651
1652 void getFixedGraphicSource(int graphic, int frame,
1653                            Bitmap **bitmap, int *x, int *y)
1654 {
1655   getSizedGraphicSourceExt(graphic, frame, TILESIZE, bitmap, x, y, FALSE);
1656 }
1657
1658 void getMiniGraphicSource(int graphic, Bitmap **bitmap, int *x, int *y)
1659 {
1660   getSizedGraphicSource(graphic, 0, MINI_TILESIZE, bitmap, x, y);
1661 }
1662
1663 void getGlobalAnimGraphicSource(int graphic, int frame,
1664                                 Bitmap **bitmap, int *x, int *y)
1665 {
1666   struct GraphicInfo *g = &graphic_info[graphic];
1667
1668   // if no graphics defined at all, use fallback graphics
1669   if (g->bitmaps == NULL)
1670     *g = graphic_info[IMG_CHAR_EXCLAM];
1671
1672   // use original size graphics, if existing, else use standard size graphics
1673   if (g->bitmaps[IMG_BITMAP_PTR_ORIGINAL])
1674     *bitmap = g->bitmaps[IMG_BITMAP_PTR_ORIGINAL];
1675   else
1676     *bitmap = g->bitmaps[IMG_BITMAP_STANDARD];
1677
1678   getGraphicSourceXY(graphic, frame, x, y, FALSE);
1679 }
1680
1681 static void getGraphicSourceExt(int graphic, int frame, Bitmap **bitmap,
1682                                 int *x, int *y, boolean get_backside)
1683 {
1684   getSizedGraphicSourceExt(graphic, frame, TILESIZE_VAR, bitmap, x, y,
1685                            get_backside);
1686 }
1687
1688 void getGraphicSource(int graphic, int frame, Bitmap **bitmap, int *x, int *y)
1689 {
1690   getGraphicSourceExt(graphic, frame, bitmap, x, y, FALSE);
1691 }
1692
1693 void DrawGraphic(int x, int y, int graphic, int frame)
1694 {
1695 #if DEBUG
1696   if (!IN_SCR_FIELD(x, y))
1697   {
1698     Debug("draw:DrawGraphic", "x = %d, y = %d, graphic = %d", x, y, graphic);
1699     Debug("draw:DrawGraphic", "This should never happen!");
1700
1701     return;
1702   }
1703 #endif
1704
1705   DrawGraphicExt(drawto_field, FX + x * TILEX_VAR, FY + y * TILEY_VAR, graphic,
1706                  frame);
1707
1708   MarkTileDirty(x, y);
1709 }
1710
1711 void DrawFixedGraphic(int x, int y, int graphic, int frame)
1712 {
1713 #if DEBUG
1714   if (!IN_SCR_FIELD(x, y))
1715   {
1716     Debug("draw:DrawFixedGraphic", "x = %d, y = %d, graphic = %d",
1717           x, y, graphic);
1718     Debug("draw:DrawFixedGraphic", "This should never happen!");
1719
1720     return;
1721   }
1722 #endif
1723
1724   DrawFixedGraphicExt(drawto_field, FX + x * TILEX, FY + y * TILEY, graphic,
1725                       frame);
1726   MarkTileDirty(x, y);
1727 }
1728
1729 void DrawGraphicExt(DrawBuffer *dst_bitmap, int x, int y, int graphic,
1730                     int frame)
1731 {
1732   Bitmap *src_bitmap;
1733   int src_x, src_y;
1734
1735   getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1736
1737   BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, TILEX_VAR, TILEY_VAR, x, y);
1738 }
1739
1740 void DrawFixedGraphicExt(DrawBuffer *dst_bitmap, int x, int y, int graphic,
1741                          int frame)
1742 {
1743   Bitmap *src_bitmap;
1744   int src_x, src_y;
1745
1746   getFixedGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1747   BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, TILEX, TILEY, x, y);
1748 }
1749
1750 void DrawGraphicThruMask(int x, int y, int graphic, int frame)
1751 {
1752 #if DEBUG
1753   if (!IN_SCR_FIELD(x, y))
1754   {
1755     Debug("draw:DrawGraphicThruMask", "x = %d, y = %d, graphic = %d",
1756           x, y, graphic);
1757     Debug("draw:DrawGraphicThruMask", "This should never happen!");
1758
1759     return;
1760   }
1761 #endif
1762
1763   DrawGraphicThruMaskExt(drawto_field, FX + x * TILEX_VAR, FY + y * TILEY_VAR,
1764                          graphic, frame);
1765
1766   MarkTileDirty(x, y);
1767 }
1768
1769 void DrawFixedGraphicThruMask(int x, int y, int graphic, int frame)
1770 {
1771 #if DEBUG
1772   if (!IN_SCR_FIELD(x, y))
1773   {
1774     Debug("draw:DrawFixedGraphicThruMask", "x = %d, y = %d, graphic = %d",
1775           x, y, graphic);
1776     Debug("draw:DrawFixedGraphicThruMask", "This should never happen!");
1777
1778     return;
1779   }
1780 #endif
1781
1782   DrawFixedGraphicThruMaskExt(drawto_field, FX + x * TILEX, FY + y * TILEY,
1783                               graphic, frame);
1784   MarkTileDirty(x, y);
1785 }
1786
1787 void DrawGraphicThruMaskExt(DrawBuffer *d, int dst_x, int dst_y, int graphic,
1788                             int frame)
1789 {
1790   Bitmap *src_bitmap;
1791   int src_x, src_y;
1792
1793   getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1794
1795   BlitBitmapMasked(src_bitmap, d, src_x, src_y, TILEX_VAR, TILEY_VAR,
1796                    dst_x, dst_y);
1797 }
1798
1799 void DrawFixedGraphicThruMaskExt(DrawBuffer *d, int dst_x, int dst_y,
1800                                  int graphic, int frame)
1801 {
1802   Bitmap *src_bitmap;
1803   int src_x, src_y;
1804
1805   getFixedGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1806
1807   BlitBitmapMasked(src_bitmap, d, src_x, src_y, TILEX, TILEY,
1808                    dst_x, dst_y);
1809 }
1810
1811 void DrawSizedGraphic(int x, int y, int graphic, int frame, int tilesize)
1812 {
1813   DrawSizedGraphicExt(drawto, SX + x * tilesize, SY + y * tilesize, graphic,
1814                       frame, tilesize);
1815   MarkTileDirty(x / tilesize, y / tilesize);
1816 }
1817
1818 void DrawSizedGraphicThruMask(int x, int y, int graphic, int frame,
1819                               int tilesize)
1820 {
1821   DrawSizedGraphicThruMaskExt(drawto, SX + x * tilesize, SY + y * tilesize,
1822                               graphic, frame, tilesize);
1823   MarkTileDirty(x / tilesize, y / tilesize);
1824 }
1825
1826 void DrawSizedGraphicExt(DrawBuffer *d, int x, int y, int graphic, int frame,
1827                          int tilesize)
1828 {
1829   Bitmap *src_bitmap;
1830   int src_x, src_y;
1831
1832   getSizedGraphicSource(graphic, frame, tilesize, &src_bitmap, &src_x, &src_y);
1833   BlitBitmap(src_bitmap, d, src_x, src_y, tilesize, tilesize, x, y);
1834 }
1835
1836 void DrawSizedGraphicThruMaskExt(DrawBuffer *d, int x, int y, int graphic,
1837                                  int frame, int tilesize)
1838 {
1839   Bitmap *src_bitmap;
1840   int src_x, src_y;
1841
1842   getSizedGraphicSource(graphic, frame, tilesize, &src_bitmap, &src_x, &src_y);
1843   BlitBitmapMasked(src_bitmap, d, src_x, src_y, tilesize, tilesize, x, y);
1844 }
1845
1846 void DrawMiniGraphic(int x, int y, int graphic)
1847 {
1848   DrawMiniGraphicExt(drawto, SX + x * MINI_TILEX, SY + y * MINI_TILEY, graphic);
1849   MarkTileDirty(x / 2, y / 2);
1850 }
1851
1852 void DrawMiniGraphicExt(DrawBuffer *d, int x, int y, int graphic)
1853 {
1854   Bitmap *src_bitmap;
1855   int src_x, src_y;
1856
1857   getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
1858   BlitBitmap(src_bitmap, d, src_x, src_y, MINI_TILEX, MINI_TILEY, x, y);
1859 }
1860
1861 static void DrawGraphicShiftedNormal(int x, int y, int dx, int dy,
1862                                      int graphic, int frame,
1863                                      int cut_mode, int mask_mode)
1864 {
1865   Bitmap *src_bitmap;
1866   int src_x, src_y;
1867   int dst_x, dst_y;
1868   int width = TILEX, height = TILEY;
1869   int cx = 0, cy = 0;
1870
1871   if (dx || dy)                 // shifted graphic
1872   {
1873     if (x < BX1)                // object enters playfield from the left
1874     {
1875       x = BX1;
1876       width = dx;
1877       cx = TILEX - dx;
1878       dx = 0;
1879     }
1880     else if (x > BX2)           // object enters playfield from the right
1881     {
1882       x = BX2;
1883       width = -dx;
1884       dx = TILEX + dx;
1885     }
1886     else if (x == BX1 && dx < 0) // object leaves playfield to the left
1887     {
1888       width += dx;
1889       cx = -dx;
1890       dx = 0;
1891     }
1892     else if (x == BX2 && dx > 0) // object leaves playfield to the right
1893       width -= dx;
1894     else if (dx)                // general horizontal movement
1895       MarkTileDirty(x + SIGN(dx), y);
1896
1897     if (y < BY1)                // object enters playfield from the top
1898     {
1899       if (cut_mode == CUT_BELOW) // object completely above top border
1900         return;
1901
1902       y = BY1;
1903       height = dy;
1904       cy = TILEY - dy;
1905       dy = 0;
1906     }
1907     else if (y > BY2)           // object enters playfield from the bottom
1908     {
1909       y = BY2;
1910       height = -dy;
1911       dy = TILEY + dy;
1912     }
1913     else if (y == BY1 && dy < 0) // object leaves playfield to the top
1914     {
1915       height += dy;
1916       cy = -dy;
1917       dy = 0;
1918     }
1919     else if (dy > 0 && cut_mode == CUT_ABOVE)
1920     {
1921       if (y == BY2)             // object completely above bottom border
1922         return;
1923
1924       height = dy;
1925       cy = TILEY - dy;
1926       dy = TILEY;
1927       MarkTileDirty(x, y + 1);
1928     }                           // object leaves playfield to the bottom
1929     else if (dy > 0 && (y == BY2 || cut_mode == CUT_BELOW))
1930       height -= dy;
1931     else if (dy)                // general vertical movement
1932       MarkTileDirty(x, y + SIGN(dy));
1933   }
1934
1935 #if DEBUG
1936   if (!IN_SCR_FIELD(x, y))
1937   {
1938     Debug("draw:DrawGraphicShiftedNormal", "x = %d, y = %d, graphic = %d",
1939           x, y, graphic);
1940     Debug("draw:DrawGraphicShiftedNormal", "This should never happen!");
1941
1942     return;
1943   }
1944 #endif
1945
1946   width = width * TILESIZE_VAR / TILESIZE;
1947   height = height * TILESIZE_VAR / TILESIZE;
1948   cx = cx * TILESIZE_VAR / TILESIZE;
1949   cy = cy * TILESIZE_VAR / TILESIZE;
1950   dx = dx * TILESIZE_VAR / TILESIZE;
1951   dy = dy * TILESIZE_VAR / TILESIZE;
1952
1953   if (width > 0 && height > 0)
1954   {
1955     getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1956
1957     src_x += cx;
1958     src_y += cy;
1959
1960     dst_x = FX + x * TILEX_VAR + dx;
1961     dst_y = FY + y * TILEY_VAR + dy;
1962
1963     if (mask_mode == USE_MASKING)
1964       BlitBitmapMasked(src_bitmap, drawto_field, src_x, src_y, width, height,
1965                        dst_x, dst_y);
1966     else
1967       BlitBitmap(src_bitmap, drawto_field, src_x, src_y, width, height,
1968                  dst_x, dst_y);
1969
1970     MarkTileDirty(x, y);
1971   }
1972 }
1973
1974 static void DrawGraphicShiftedDouble(int x, int y, int dx, int dy,
1975                                      int graphic, int frame,
1976                                      int cut_mode, int mask_mode)
1977 {
1978   Bitmap *src_bitmap;
1979   int src_x, src_y;
1980   int dst_x, dst_y;
1981   int width = TILEX_VAR, height = TILEY_VAR;
1982   int x1 = x;
1983   int y1 = y;
1984   int x2 = x + SIGN(dx);
1985   int y2 = y + SIGN(dy);
1986
1987   // movement with two-tile animations must be sync'ed with movement position,
1988   // not with current GfxFrame (which can be higher when using slow movement)
1989   int anim_pos = (dx ? ABS(dx) : ABS(dy));
1990   int anim_frames = graphic_info[graphic].anim_frames;
1991
1992   // (we also need anim_delay here for movement animations with less frames)
1993   int anim_delay = graphic_info[graphic].anim_delay;
1994   int sync_frame = anim_pos * anim_frames * anim_delay / TILESIZE;
1995
1996   boolean draw_start_tile = (cut_mode != CUT_ABOVE);    // only for falling!
1997   boolean draw_end_tile   = (cut_mode != CUT_BELOW);    // only for falling!
1998
1999   // re-calculate animation frame for two-tile movement animation
2000   frame = getGraphicAnimationFrame(graphic, sync_frame);
2001
2002   // check if movement start graphic inside screen area and should be drawn
2003   if (draw_start_tile && IN_SCR_FIELD(x1, y1))
2004   {
2005     getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, TRUE);
2006
2007     dst_x = FX + x1 * TILEX_VAR;
2008     dst_y = FY + y1 * TILEY_VAR;
2009
2010     if (mask_mode == USE_MASKING)
2011       BlitBitmapMasked(src_bitmap, drawto_field, src_x, src_y, width, height,
2012                        dst_x, dst_y);
2013     else
2014       BlitBitmap(src_bitmap, drawto_field, src_x, src_y, width, height,
2015                  dst_x, dst_y);
2016
2017     MarkTileDirty(x1, y1);
2018   }
2019
2020   // check if movement end graphic inside screen area and should be drawn
2021   if (draw_end_tile && IN_SCR_FIELD(x2, y2))
2022   {
2023     getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, FALSE);
2024
2025     dst_x = FX + x2 * TILEX_VAR;
2026     dst_y = FY + y2 * TILEY_VAR;
2027
2028     if (mask_mode == USE_MASKING)
2029       BlitBitmapMasked(src_bitmap, drawto_field, src_x, src_y, width, height,
2030                        dst_x, dst_y);
2031     else
2032       BlitBitmap(src_bitmap, drawto_field, src_x, src_y, width, height,
2033                  dst_x, dst_y);
2034
2035     MarkTileDirty(x2, y2);
2036   }
2037 }
2038
2039 static void DrawGraphicShifted(int x, int y, int dx, int dy,
2040                                int graphic, int frame,
2041                                int cut_mode, int mask_mode)
2042 {
2043   if (graphic < 0)
2044   {
2045     DrawGraphic(x, y, graphic, frame);
2046
2047     return;
2048   }
2049
2050   if (graphic_info[graphic].double_movement)    // EM style movement images
2051     DrawGraphicShiftedDouble(x, y, dx, dy, graphic, frame, cut_mode, mask_mode);
2052   else
2053     DrawGraphicShiftedNormal(x, y, dx, dy, graphic, frame, cut_mode, mask_mode);
2054 }
2055
2056 static void DrawGraphicShiftedThruMask(int x, int y, int dx, int dy,
2057                                        int graphic, int frame, int cut_mode)
2058 {
2059   DrawGraphicShifted(x, y, dx, dy, graphic, frame, cut_mode, USE_MASKING);
2060 }
2061
2062 void DrawScreenElementExt(int x, int y, int dx, int dy, int element,
2063                           int cut_mode, int mask_mode)
2064 {
2065   int lx = LEVELX(x), ly = LEVELY(y);
2066   int graphic;
2067   int frame;
2068
2069   if (IN_LEV_FIELD(lx, ly))
2070   {
2071     if (element == EL_EMPTY)
2072       element = GfxElementEmpty[lx][ly];
2073
2074     SetRandomAnimationValue(lx, ly);
2075
2076     graphic = el_act_dir2img(element, GfxAction[lx][ly], GfxDir[lx][ly]);
2077     frame = getGraphicAnimationFrameXY(graphic, lx, ly);
2078
2079     // do not use double (EM style) movement graphic when not moving
2080     if (graphic_info[graphic].double_movement && !dx && !dy)
2081     {
2082       graphic = el_act_dir2img(element, ACTION_DEFAULT, GfxDir[lx][ly]);
2083       frame = getGraphicAnimationFrameXY(graphic, lx, ly);
2084     }
2085
2086     if (game.use_masked_elements && (dx || dy))
2087       mask_mode = USE_MASKING;
2088   }
2089   else  // border element
2090   {
2091     graphic = el2img(element);
2092     frame = getGraphicAnimationFrameXY(graphic, lx, ly);
2093   }
2094
2095   if (element == EL_EXPANDABLE_WALL)
2096   {
2097     boolean left_stopped = FALSE, right_stopped = FALSE;
2098
2099     if (!IN_LEV_FIELD(lx - 1, ly) || IS_WALL(Tile[lx - 1][ly]))
2100       left_stopped = TRUE;
2101     if (!IN_LEV_FIELD(lx + 1, ly) || IS_WALL(Tile[lx + 1][ly]))
2102       right_stopped = TRUE;
2103
2104     if (left_stopped && right_stopped)
2105       graphic = IMG_WALL;
2106     else if (left_stopped)
2107     {
2108       graphic = IMG_EXPANDABLE_WALL_GROWING_RIGHT;
2109       frame = graphic_info[graphic].anim_frames - 1;
2110     }
2111     else if (right_stopped)
2112     {
2113       graphic = IMG_EXPANDABLE_WALL_GROWING_LEFT;
2114       frame = graphic_info[graphic].anim_frames - 1;
2115     }
2116   }
2117
2118   if (dx || dy)
2119     DrawGraphicShifted(x, y, dx, dy, graphic, frame, cut_mode, mask_mode);
2120   else if (mask_mode == USE_MASKING)
2121     DrawGraphicThruMask(x, y, graphic, frame);
2122   else
2123     DrawGraphic(x, y, graphic, frame);
2124 }
2125
2126 void DrawLevelElementExt(int x, int y, int dx, int dy, int element,
2127                          int cut_mode, int mask_mode)
2128 {
2129   if (IN_LEV_FIELD(x, y) && IN_SCR_FIELD(SCREENX(x), SCREENY(y)))
2130     DrawScreenElementExt(SCREENX(x), SCREENY(y), dx, dy, element,
2131                          cut_mode, mask_mode);
2132 }
2133
2134 void DrawScreenElementShifted(int x, int y, int dx, int dy, int element,
2135                               int cut_mode)
2136 {
2137   DrawScreenElementExt(x, y, dx, dy, element, cut_mode, NO_MASKING);
2138 }
2139
2140 void DrawLevelElementShifted(int x, int y, int dx, int dy, int element,
2141                              int cut_mode)
2142 {
2143   DrawLevelElementExt(x, y, dx, dy, element, cut_mode, NO_MASKING);
2144 }
2145
2146 void DrawLevelElementThruMask(int x, int y, int element)
2147 {
2148   DrawLevelElementExt(x, y, 0, 0, element, NO_CUTTING, USE_MASKING);
2149 }
2150
2151 void DrawLevelFieldThruMask(int x, int y)
2152 {
2153   DrawLevelElementExt(x, y, 0, 0, Tile[x][y], NO_CUTTING, USE_MASKING);
2154 }
2155
2156 // !!! implementation of quicksand is totally broken !!!
2157 #define IS_CRUMBLED_TILE(x, y, e)                                       \
2158         (GFX_CRUMBLED(e) && (!IN_LEV_FIELD(x, y) ||                     \
2159                              !IS_MOVING(x, y) ||                        \
2160                              (e) == EL_QUICKSAND_EMPTYING ||            \
2161                              (e) == EL_QUICKSAND_FAST_EMPTYING))
2162
2163 static void DrawLevelFieldCrumbledInnerCorners(int x, int y, int dx, int dy,
2164                                                int graphic)
2165 {
2166   Bitmap *src_bitmap;
2167   int src_x, src_y;
2168   int width, height, cx, cy;
2169   int sx = SCREENX(x), sy = SCREENY(y);
2170   int crumbled_border_size = graphic_info[graphic].border_size;
2171   int crumbled_tile_size = graphic_info[graphic].tile_size;
2172   int crumbled_border_size_var =
2173     crumbled_border_size * TILESIZE_VAR / crumbled_tile_size;
2174   int i;
2175
2176   getGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
2177
2178   for (i = 1; i < 4; i++)
2179   {
2180     int dxx = (i & 1 ? dx : 0);
2181     int dyy = (i & 2 ? dy : 0);
2182     int xx = x + dxx;
2183     int yy = y + dyy;
2184     int element = (IN_LEV_FIELD(xx, yy) ? TILE_GFX_ELEMENT(xx, yy) :
2185                    BorderElement);
2186
2187     // check if neighbour field is of same crumble type
2188     boolean same = (IS_CRUMBLED_TILE(xx, yy, element) &&
2189                     graphic_info[graphic].class ==
2190                     graphic_info[el_act2crm(element, ACTION_DEFAULT)].class);
2191
2192     // return if check prevents inner corner
2193     if (same == (dxx == dx && dyy == dy))
2194       return;
2195   }
2196
2197   // if we reach this point, we have an inner corner
2198
2199   getGraphicSource(graphic, 1, &src_bitmap, &src_x, &src_y);
2200
2201   width  = crumbled_border_size_var;
2202   height = crumbled_border_size_var;
2203   cx = (dx > 0 ? TILESIZE_VAR - width  : 0);
2204   cy = (dy > 0 ? TILESIZE_VAR - height : 0);
2205
2206   if (game.use_masked_elements)
2207   {
2208     int graphic0 = el2img(EL_EMPTY);
2209     int frame0 = getGraphicAnimationFrameXY(graphic0, x, y);
2210     Bitmap *src_bitmap0;
2211     int src_x0, src_y0;
2212
2213     getGraphicSource(graphic0, frame0, &src_bitmap0, &src_x0, &src_y0);
2214
2215     BlitBitmap(src_bitmap0, drawto_field, src_x0 + cx, src_y0 + cy,
2216                width, height,
2217                FX + sx * TILEX_VAR + cx, FY + sy * TILEY_VAR + cy);
2218
2219     BlitBitmapMasked(src_bitmap, drawto_field, src_x + cx, src_y + cy,
2220                      width, height,
2221                      FX + sx * TILEX_VAR + cx, FY + sy * TILEY_VAR + cy);
2222   }
2223   else
2224     BlitBitmap(src_bitmap, drawto_field, src_x + cx, src_y + cy,
2225                width, height,
2226                FX + sx * TILEX_VAR + cx, FY + sy * TILEY_VAR + cy);
2227 }
2228
2229 static void DrawLevelFieldCrumbledBorders(int x, int y, int graphic, int frame,
2230                                           int dir)
2231 {
2232   Bitmap *src_bitmap;
2233   int src_x, src_y;
2234   int width, height, bx, by, cx, cy;
2235   int sx = SCREENX(x), sy = SCREENY(y);
2236   int crumbled_border_size = graphic_info[graphic].border_size;
2237   int crumbled_tile_size = graphic_info[graphic].tile_size;
2238   int crumbled_border_size_var =
2239     crumbled_border_size * TILESIZE_VAR / crumbled_tile_size;
2240   int crumbled_border_pos_var = TILESIZE_VAR - crumbled_border_size_var;
2241   int i;
2242
2243   getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
2244
2245   // only needed when using masked elements
2246   int graphic0 = el2img(EL_EMPTY);
2247   int frame0 = getGraphicAnimationFrameXY(graphic0, x, y);
2248   Bitmap *src_bitmap0;
2249   int src_x0, src_y0;
2250
2251   if (game.use_masked_elements)
2252     getGraphicSource(graphic0, frame0, &src_bitmap0, &src_x0, &src_y0);
2253
2254   // draw simple, sloppy, non-corner-accurate crumbled border
2255
2256   width  = (dir == 1 || dir == 2 ? crumbled_border_size_var : TILESIZE_VAR);
2257   height = (dir == 0 || dir == 3 ? crumbled_border_size_var : TILESIZE_VAR);
2258   cx = (dir == 2 ? crumbled_border_pos_var : 0);
2259   cy = (dir == 3 ? crumbled_border_pos_var : 0);
2260
2261   if (game.use_masked_elements)
2262   {
2263     BlitBitmap(src_bitmap0, drawto_field, src_x0 + cx, src_y0 + cy,
2264                width, height,
2265                FX + sx * TILEX_VAR + cx,
2266                FY + sy * TILEY_VAR + cy);
2267
2268     BlitBitmapMasked(src_bitmap, drawto_field, src_x + cx, src_y + cy,
2269                      width, height,
2270                      FX + sx * TILEX_VAR + cx,
2271                      FY + sy * TILEY_VAR + cy);
2272   }
2273   else
2274     BlitBitmap(src_bitmap, drawto_field, src_x + cx, src_y + cy,
2275                width, height,
2276                FX + sx * TILEX_VAR + cx,
2277                FY + sy * TILEY_VAR + cy);
2278
2279   // (remaining middle border part must be at least as big as corner part)
2280   if (!(graphic_info[graphic].style & STYLE_ACCURATE_BORDERS) ||
2281       crumbled_border_size_var >= TILESIZE_VAR / 3)
2282     return;
2283
2284   // correct corners of crumbled border, if needed
2285
2286   for (i = -1; i <= 1; i += 2)
2287   {
2288     int xx = x + (dir == 0 || dir == 3 ? i : 0);
2289     int yy = y + (dir == 1 || dir == 2 ? i : 0);
2290     int element = (IN_LEV_FIELD(xx, yy) ? TILE_GFX_ELEMENT(xx, yy) :
2291                    BorderElement);
2292
2293     // check if neighbour field is of same crumble type
2294     if (IS_CRUMBLED_TILE(xx, yy, element) &&
2295         graphic_info[graphic].class ==
2296         graphic_info[el_act2crm(element, ACTION_DEFAULT)].class)
2297     {
2298       // no crumbled corner, but continued crumbled border
2299
2300       int c1 = (dir == 2 || dir == 3 ? crumbled_border_pos_var : 0);
2301       int c2 = (i == 1 ? crumbled_border_pos_var : 0);
2302       int b1 = (i == 1 ? crumbled_border_size_var :
2303                 TILESIZE_VAR - 2 * crumbled_border_size_var);
2304
2305       width  = crumbled_border_size_var;
2306       height = crumbled_border_size_var;
2307
2308       if (dir == 1 || dir == 2)
2309       {
2310         cx = c1;
2311         cy = c2;
2312         bx = cx;
2313         by = b1;
2314       }
2315       else
2316       {
2317         cx = c2;
2318         cy = c1;
2319         bx = b1;
2320         by = cy;
2321       }
2322
2323       if (game.use_masked_elements)
2324       {
2325         BlitBitmap(src_bitmap0, drawto_field, src_x0 + bx, src_y0 + by,
2326                    width, height,
2327                    FX + sx * TILEX_VAR + cx,
2328                    FY + sy * TILEY_VAR + cy);
2329
2330         BlitBitmapMasked(src_bitmap, drawto_field, src_x + bx, src_y + by,
2331                          width, height,
2332                          FX + sx * TILEX_VAR + cx,
2333                          FY + sy * TILEY_VAR + cy);
2334       }
2335       else
2336         BlitBitmap(src_bitmap, drawto_field, src_x + bx, src_y + by,
2337                    width, height,
2338                    FX + sx * TILEX_VAR + cx,
2339                    FY + sy * TILEY_VAR + cy);
2340     }
2341   }
2342 }
2343
2344 static void DrawLevelFieldCrumbledExt(int x, int y, int graphic, int frame)
2345 {
2346   int sx = SCREENX(x), sy = SCREENY(y);
2347   int element;
2348   int i;
2349   struct XY *xy = xy_topdown;
2350
2351   if (!IN_LEV_FIELD(x, y))
2352     return;
2353
2354   element = TILE_GFX_ELEMENT(x, y);
2355
2356   if (IS_CRUMBLED_TILE(x, y, element))          // crumble field itself
2357   {
2358     if (!IN_SCR_FIELD(sx, sy))
2359       return;
2360
2361     // crumble field borders towards direct neighbour fields
2362     for (i = 0; i < 4; i++)
2363     {
2364       int xx = x + xy[i].x;
2365       int yy = y + xy[i].y;
2366
2367       element = (IN_LEV_FIELD(xx, yy) ? TILE_GFX_ELEMENT(xx, yy) :
2368                  BorderElement);
2369
2370       // check if neighbour field is of same crumble type
2371       if (IS_CRUMBLED_TILE(xx, yy, element) &&
2372           graphic_info[graphic].class ==
2373           graphic_info[el_act2crm(element, ACTION_DEFAULT)].class)
2374         continue;
2375
2376       DrawLevelFieldCrumbledBorders(x, y, graphic, frame, i);
2377     }
2378
2379     // crumble inner field corners towards corner neighbour fields
2380     if ((graphic_info[graphic].style & STYLE_INNER_CORNERS) &&
2381         graphic_info[graphic].anim_frames == 2)
2382     {
2383       for (i = 0; i < 4; i++)
2384       {
2385         int dx = (i & 1 ? +1 : -1);
2386         int dy = (i & 2 ? +1 : -1);
2387
2388         DrawLevelFieldCrumbledInnerCorners(x, y, dx, dy, graphic);
2389       }
2390     }
2391
2392     MarkTileDirty(sx, sy);
2393   }
2394   else          // center field is not crumbled -- crumble neighbour fields
2395   {
2396     // crumble field borders of direct neighbour fields
2397     for (i = 0; i < 4; i++)
2398     {
2399       int xx = x + xy[i].x;
2400       int yy = y + xy[i].y;
2401       int sxx = sx + xy[i].x;
2402       int syy = sy + xy[i].y;
2403
2404       if (!IN_LEV_FIELD(xx, yy) ||
2405           !IN_SCR_FIELD(sxx, syy))
2406         continue;
2407
2408       // do not crumble fields that are being digged or snapped
2409       if (Tile[xx][yy] == EL_EMPTY ||
2410           Tile[xx][yy] == EL_ELEMENT_SNAPPING)
2411         continue;
2412
2413       element = TILE_GFX_ELEMENT(xx, yy);
2414
2415       if (!IS_CRUMBLED_TILE(xx, yy, element))
2416         continue;
2417
2418       graphic = el_act2crm(element, ACTION_DEFAULT);
2419
2420       DrawLevelFieldCrumbledBorders(xx, yy, graphic, 0, 3 - i);
2421
2422       MarkTileDirty(sxx, syy);
2423     }
2424
2425     // crumble inner field corners of corner neighbour fields
2426     for (i = 0; i < 4; i++)
2427     {
2428       int dx = (i & 1 ? +1 : -1);
2429       int dy = (i & 2 ? +1 : -1);
2430       int xx = x + dx;
2431       int yy = y + dy;
2432       int sxx = sx + dx;
2433       int syy = sy + dy;
2434
2435       if (!IN_LEV_FIELD(xx, yy) ||
2436           !IN_SCR_FIELD(sxx, syy))
2437         continue;
2438
2439       if (Tile[xx][yy] == EL_ELEMENT_SNAPPING)
2440         continue;
2441
2442       element = TILE_GFX_ELEMENT(xx, yy);
2443
2444       if (!IS_CRUMBLED_TILE(xx, yy, element))
2445         continue;
2446
2447       graphic = el_act2crm(element, ACTION_DEFAULT);
2448
2449       if ((graphic_info[graphic].style & STYLE_INNER_CORNERS) &&
2450           graphic_info[graphic].anim_frames == 2)
2451         DrawLevelFieldCrumbledInnerCorners(xx, yy, -dx, -dy, graphic);
2452
2453       MarkTileDirty(sxx, syy);
2454     }
2455   }
2456 }
2457
2458 void DrawLevelFieldCrumbled(int x, int y)
2459 {
2460   int graphic;
2461
2462   if (!IN_LEV_FIELD(x, y))
2463     return;
2464
2465   if (Tile[x][y] == EL_ELEMENT_SNAPPING &&
2466       GfxElement[x][y] != EL_UNDEFINED &&
2467       GFX_CRUMBLED(GfxElement[x][y]))
2468   {
2469     DrawLevelFieldCrumbledDigging(x, y, GfxDir[x][y], GfxFrame[x][y]);
2470
2471     return;
2472   }
2473
2474   graphic = el_act2crm(TILE_GFX_ELEMENT(x, y), ACTION_DEFAULT);
2475
2476   DrawLevelFieldCrumbledExt(x, y, graphic, 0);
2477 }
2478
2479 void DrawLevelFieldCrumbledDigging(int x, int y, int direction,
2480                                    int step_frame)
2481 {
2482   int graphic1 = el_act_dir2img(GfxElement[x][y], ACTION_DIGGING, direction);
2483   int graphic2 = el_act_dir2crm(GfxElement[x][y], ACTION_DIGGING, direction);
2484   int frame1 = getGraphicAnimationFrame(graphic1, step_frame);
2485   int frame2 = getGraphicAnimationFrame(graphic2, step_frame);
2486   int sx = SCREENX(x), sy = SCREENY(y);
2487
2488   DrawScreenGraphic(sx, sy, graphic1, frame1);
2489   DrawLevelFieldCrumbledExt(x, y, graphic2, frame2);
2490 }
2491
2492 void DrawLevelFieldCrumbledNeighbours(int x, int y)
2493 {
2494   int sx = SCREENX(x), sy = SCREENY(y);
2495   struct XY *xy = xy_topdown;
2496   int i;
2497
2498   // crumble direct neighbour fields (required for field borders)
2499   for (i = 0; i < 4; i++)
2500   {
2501     int xx = x + xy[i].x;
2502     int yy = y + xy[i].y;
2503     int sxx = sx + xy[i].x;
2504     int syy = sy + xy[i].y;
2505
2506     if (!IN_LEV_FIELD(xx, yy) ||
2507         !IN_SCR_FIELD(sxx, syy) ||
2508         !GFX_CRUMBLED(Tile[xx][yy]) ||
2509         IS_MOVING(xx, yy))
2510       continue;
2511
2512     DrawLevelField(xx, yy);
2513   }
2514
2515   // crumble corner neighbour fields (required for inner field corners)
2516   for (i = 0; i < 4; i++)
2517   {
2518     int dx = (i & 1 ? +1 : -1);
2519     int dy = (i & 2 ? +1 : -1);
2520     int xx = x + dx;
2521     int yy = y + dy;
2522     int sxx = sx + dx;
2523     int syy = sy + dy;
2524
2525     if (!IN_LEV_FIELD(xx, yy) ||
2526         !IN_SCR_FIELD(sxx, syy) ||
2527         !GFX_CRUMBLED(Tile[xx][yy]) ||
2528         IS_MOVING(xx, yy))
2529       continue;
2530
2531     int element = TILE_GFX_ELEMENT(xx, yy);
2532     int graphic = el_act2crm(element, ACTION_DEFAULT);
2533
2534     if ((graphic_info[graphic].style & STYLE_INNER_CORNERS) &&
2535         graphic_info[graphic].anim_frames == 2)
2536       DrawLevelField(xx, yy);
2537   }
2538 }
2539
2540 static int getBorderElement(int x, int y)
2541 {
2542   int border[7][2] =
2543   {
2544     { EL_STEELWALL_TOPLEFT,             EL_INVISIBLE_STEELWALL_TOPLEFT     },
2545     { EL_STEELWALL_TOPRIGHT,            EL_INVISIBLE_STEELWALL_TOPRIGHT    },
2546     { EL_STEELWALL_BOTTOMLEFT,          EL_INVISIBLE_STEELWALL_BOTTOMLEFT  },
2547     { EL_STEELWALL_BOTTOMRIGHT,         EL_INVISIBLE_STEELWALL_BOTTOMRIGHT },
2548     { EL_STEELWALL_VERTICAL,            EL_INVISIBLE_STEELWALL_VERTICAL    },
2549     { EL_STEELWALL_HORIZONTAL,          EL_INVISIBLE_STEELWALL_HORIZONTAL  },
2550     { EL_STEELWALL,                     EL_INVISIBLE_STEELWALL             }
2551   };
2552   int steel_type = (BorderElement == EL_STEELWALL ? 0 : 1);
2553   int steel_position = (x == -1         && y == -1              ? 0 :
2554                         x == lev_fieldx && y == -1              ? 1 :
2555                         x == -1         && y == lev_fieldy      ? 2 :
2556                         x == lev_fieldx && y == lev_fieldy      ? 3 :
2557                         x == -1         || x == lev_fieldx      ? 4 :
2558                         y == -1         || y == lev_fieldy      ? 5 : 6);
2559
2560   return border[steel_position][steel_type];
2561 }
2562
2563 void DrawScreenGraphic(int x, int y, int graphic, int frame)
2564 {
2565   if (game.use_masked_elements)
2566   {
2567     if (graphic != el2img(EL_EMPTY))
2568       DrawScreenElementExt(x, y, 0, 0, EL_EMPTY, NO_CUTTING, NO_MASKING);
2569
2570     DrawGraphicThruMask(x, y, graphic, frame);
2571   }
2572   else
2573   {
2574     DrawGraphic(x, y, graphic, frame);
2575   }
2576 }
2577
2578 void DrawLevelGraphic(int x, int y, int graphic, int frame)
2579 {
2580   DrawScreenGraphic(SCREENX(x), SCREENY(y), graphic, frame);
2581 }
2582
2583 void DrawScreenElement(int x, int y, int element)
2584 {
2585   int mask_mode = NO_MASKING;
2586
2587   if (game.use_masked_elements)
2588   {
2589     int lx = LEVELX(x), ly = LEVELY(y);
2590
2591     if (IN_LEV_FIELD(lx, ly) && element != EL_EMPTY)
2592     {
2593       DrawScreenElementExt(x, y, 0, 0, EL_EMPTY, NO_CUTTING, NO_MASKING);
2594
2595       mask_mode = USE_MASKING;
2596     }
2597   }
2598
2599   DrawScreenElementExt(x, y, 0, 0, element, NO_CUTTING, mask_mode);
2600   DrawLevelFieldCrumbled(LEVELX(x), LEVELY(y));
2601 }
2602
2603 void DrawLevelElement(int x, int y, int element)
2604 {
2605   if (IN_LEV_FIELD(x, y) && IN_SCR_FIELD(SCREENX(x), SCREENY(y)))
2606     DrawScreenElement(SCREENX(x), SCREENY(y), element);
2607 }
2608
2609 void DrawScreenField(int x, int y)
2610 {
2611   int lx = LEVELX(x), ly = LEVELY(y);
2612   int element, content;
2613
2614   if (!IN_LEV_FIELD(lx, ly))
2615   {
2616     if (lx < -1 || lx > lev_fieldx || ly < -1 || ly > lev_fieldy)
2617       element = EL_EMPTY;
2618     else
2619       element = getBorderElement(lx, ly);
2620
2621     DrawScreenElement(x, y, element);
2622
2623     return;
2624   }
2625
2626   element = Tile[lx][ly];
2627   content = Store[lx][ly];
2628
2629   if (IS_MOVING(lx, ly))
2630   {
2631     int horiz_move = (MovDir[lx][ly] == MV_LEFT || MovDir[lx][ly] == MV_RIGHT);
2632     boolean cut_mode = NO_CUTTING;
2633
2634     if (element == EL_QUICKSAND_EMPTYING ||
2635         element == EL_QUICKSAND_FAST_EMPTYING ||
2636         element == EL_MAGIC_WALL_EMPTYING ||
2637         element == EL_BD_MAGIC_WALL_EMPTYING ||
2638         element == EL_DC_MAGIC_WALL_EMPTYING ||
2639         element == EL_AMOEBA_DROPPING)
2640       cut_mode = CUT_ABOVE;
2641     else if (element == EL_QUICKSAND_FILLING ||
2642              element == EL_QUICKSAND_FAST_FILLING ||
2643              element == EL_MAGIC_WALL_FILLING ||
2644              element == EL_BD_MAGIC_WALL_FILLING ||
2645              element == EL_DC_MAGIC_WALL_FILLING)
2646       cut_mode = CUT_BELOW;
2647
2648     if (cut_mode == CUT_ABOVE)
2649       DrawScreenElement(x, y, element);
2650     else
2651       DrawScreenElement(x, y, EL_EMPTY);
2652
2653     if (cut_mode != CUT_BELOW && game.use_masked_elements)
2654     {
2655       int dir = MovDir[lx][ly];
2656       int newx = x + (dir == MV_LEFT ? -1 : dir == MV_RIGHT ? +1 : 0);
2657       int newy = y + (dir == MV_UP   ? -1 : dir == MV_DOWN  ? +1 : 0);
2658
2659       if (IN_SCR_FIELD(newx, newy))
2660         DrawScreenElement(newx, newy, EL_EMPTY);
2661     }
2662
2663     if (horiz_move)
2664       DrawScreenElementShifted(x, y, MovPos[lx][ly], 0, element, NO_CUTTING);
2665     else if (cut_mode == NO_CUTTING)
2666       DrawScreenElementShifted(x, y, 0, MovPos[lx][ly], element, cut_mode);
2667     else
2668     {
2669       DrawScreenElementShifted(x, y, 0, MovPos[lx][ly], content, cut_mode);
2670
2671       if (cut_mode == CUT_BELOW &&
2672           IN_LEV_FIELD(lx, ly + 1) && IN_SCR_FIELD(x, y + 1))
2673         DrawLevelElement(lx, ly + 1, element);
2674     }
2675
2676     if (content == EL_ACID)
2677     {
2678       int dir = MovDir[lx][ly];
2679       int newlx = lx + (dir == MV_LEFT ? -1 : dir == MV_RIGHT ? +1 : 0);
2680       int newly = ly + (dir == MV_UP   ? -1 : dir == MV_DOWN  ? +1 : 0);
2681
2682       DrawLevelElementThruMask(newlx, newly, EL_ACID);
2683
2684       // prevent target field from being drawn again (but without masking)
2685       // (this would happen if target field is scanned after moving element)
2686       Stop[newlx][newly] = TRUE;
2687     }
2688   }
2689   else if (IS_BLOCKED(lx, ly))
2690   {
2691     int oldx, oldy;
2692     int sx, sy;
2693     int horiz_move;
2694     boolean cut_mode = NO_CUTTING;
2695     int element_old, content_old;
2696
2697     Blocked2Moving(lx, ly, &oldx, &oldy);
2698     sx = SCREENX(oldx);
2699     sy = SCREENY(oldy);
2700     horiz_move = (MovDir[oldx][oldy] == MV_LEFT ||
2701                   MovDir[oldx][oldy] == MV_RIGHT);
2702
2703     element_old = Tile[oldx][oldy];
2704     content_old = Store[oldx][oldy];
2705
2706     if (element_old == EL_QUICKSAND_EMPTYING ||
2707         element_old == EL_QUICKSAND_FAST_EMPTYING ||
2708         element_old == EL_MAGIC_WALL_EMPTYING ||
2709         element_old == EL_BD_MAGIC_WALL_EMPTYING ||
2710         element_old == EL_DC_MAGIC_WALL_EMPTYING ||
2711         element_old == EL_AMOEBA_DROPPING)
2712       cut_mode = CUT_ABOVE;
2713
2714     DrawScreenElement(x, y, EL_EMPTY);
2715
2716     if (horiz_move)
2717       DrawScreenElementShifted(sx, sy, MovPos[oldx][oldy], 0, element_old,
2718                                NO_CUTTING);
2719     else if (cut_mode == NO_CUTTING)
2720       DrawScreenElementShifted(sx, sy, 0, MovPos[oldx][oldy], element_old,
2721                                cut_mode);
2722     else
2723       DrawScreenElementShifted(sx, sy, 0, MovPos[oldx][oldy], content_old,
2724                                cut_mode);
2725   }
2726   else if (IS_DRAWABLE(element))
2727     DrawScreenElement(x, y, element);
2728   else
2729     DrawScreenElement(x, y, EL_EMPTY);
2730 }
2731
2732 void DrawLevelField(int x, int y)
2733 {
2734   if (IN_SCR_FIELD(SCREENX(x), SCREENY(y)))
2735     DrawScreenField(SCREENX(x), SCREENY(y));
2736   else if (IS_MOVING(x, y))
2737   {
2738     int newx, newy;
2739
2740     Moving2Blocked(x, y, &newx, &newy);
2741     if (IN_SCR_FIELD(SCREENX(newx), SCREENY(newy)))
2742       DrawScreenField(SCREENX(newx), SCREENY(newy));
2743   }
2744   else if (IS_BLOCKED(x, y))
2745   {
2746     int oldx, oldy;
2747
2748     Blocked2Moving(x, y, &oldx, &oldy);
2749     if (IN_SCR_FIELD(SCREENX(oldx), SCREENY(oldy)))
2750       DrawScreenField(SCREENX(oldx), SCREENY(oldy));
2751   }
2752 }
2753
2754 static void DrawSizedWallExt_MM(int dst_x, int dst_y, int element, int tilesize,
2755                                 int (*el2img_function)(int), boolean masked,
2756                                 int element_bits_draw)
2757 {
2758   int element_base = map_mm_wall_element(element);
2759   int element_bits = (IS_DF_WALL(element) ?
2760                       element - EL_DF_WALL_START :
2761                       IS_MM_WALL(element) ?
2762                       element - EL_MM_WALL_START : EL_EMPTY) & 0x000f;
2763   int graphic = el2img_function(element_base);
2764   int tilesize_draw = tilesize / 2;
2765   Bitmap *src_bitmap;
2766   int src_x, src_y;
2767   int i;
2768
2769   getSizedGraphicSource(graphic, 0, tilesize_draw, &src_bitmap, &src_x, &src_y);
2770
2771   for (i = 0; i < 4; i++)
2772   {
2773     int dst_draw_x = dst_x + (i % 2) * tilesize_draw;
2774     int dst_draw_y = dst_y + (i / 2) * tilesize_draw;
2775
2776     if (!(element_bits_draw & (1 << i)))
2777       continue;
2778
2779     if (element_bits & (1 << i))
2780     {
2781       if (masked)
2782         BlitBitmapMasked(src_bitmap, drawto, src_x, src_y,
2783                          tilesize_draw, tilesize_draw, dst_draw_x, dst_draw_y);
2784       else
2785         BlitBitmap(src_bitmap, drawto, src_x, src_y,
2786                    tilesize_draw, tilesize_draw, dst_draw_x, dst_draw_y);
2787     }
2788     else
2789     {
2790       if (!masked)
2791         ClearRectangle(drawto, dst_draw_x, dst_draw_y,
2792                        tilesize_draw, tilesize_draw);
2793     }
2794   }
2795 }
2796
2797 void DrawSizedWallParts_MM(int x, int y, int element, int tilesize,
2798                            boolean masked, int element_bits_draw)
2799 {
2800   DrawSizedWallExt_MM(SX + x * tilesize, SY + y * tilesize,
2801                       element, tilesize, el2edimg, masked, element_bits_draw);
2802 }
2803
2804 static void DrawSizedWall_MM(int dst_x, int dst_y, int element, int tilesize,
2805                              int (*el2img_function)(int))
2806 {
2807   DrawSizedWallExt_MM(dst_x, dst_y, element, tilesize, el2img_function, FALSE,
2808                       0x000f);
2809 }
2810
2811 static void DrawSizedElementExt(int x, int y, int element, int tilesize,
2812                                 boolean masked)
2813 {
2814   if (IS_MM_WALL(element))
2815   {
2816     DrawSizedWallExt_MM(SX + x * tilesize, SY + y * tilesize,
2817                         element, tilesize, el2edimg, masked, 0x000f);
2818   }
2819   else
2820   {
2821     int graphic = el2edimg(element);
2822
2823     if (masked)
2824       DrawSizedGraphicThruMask(x, y, graphic, 0, tilesize);
2825     else
2826       DrawSizedGraphic(x, y, graphic, 0, tilesize);
2827   }
2828 }
2829
2830 void DrawSizedElement(int x, int y, int element, int tilesize)
2831 {
2832   DrawSizedElementExt(x, y, element, tilesize, FALSE);
2833 }
2834
2835 void DrawSizedElementThruMask(int x, int y, int element, int tilesize)
2836 {
2837   DrawSizedElementExt(x, y, element, tilesize, TRUE);
2838 }
2839
2840 void DrawMiniElement(int x, int y, int element)
2841 {
2842   int graphic;
2843
2844   graphic = el2edimg(element);
2845   DrawMiniGraphic(x, y, graphic);
2846 }
2847
2848 void DrawSizedElementOrWall(int sx, int sy, int scroll_x, int scroll_y,
2849                             int tilesize)
2850 {
2851   int x = sx + scroll_x, y = sy + scroll_y;
2852
2853   if (x < -1 || x > lev_fieldx || y < -1 || y > lev_fieldy)
2854     DrawSizedElement(sx, sy, EL_EMPTY, tilesize);
2855   else if (x > -1 && x < lev_fieldx && y > -1 && y < lev_fieldy)
2856     DrawSizedElement(sx, sy, Tile[x][y], tilesize);
2857   else
2858     DrawSizedGraphic(sx, sy, el2edimg(getBorderElement(x, y)), 0, tilesize);
2859 }
2860
2861 void DrawMiniElementOrWall(int sx, int sy, int scroll_x, int scroll_y)
2862 {
2863   int x = sx + scroll_x, y = sy + scroll_y;
2864
2865   if (x < -1 || x > lev_fieldx || y < -1 || y > lev_fieldy)
2866     DrawMiniElement(sx, sy, EL_EMPTY);
2867   else if (x > -1 && x < lev_fieldx && y > -1 && y < lev_fieldy)
2868     DrawMiniElement(sx, sy, Tile[x][y]);
2869   else
2870     DrawMiniGraphic(sx, sy, el2edimg(getBorderElement(x, y)));
2871 }
2872
2873 static void DrawEnvelopeBackgroundTiles(int graphic, int startx, int starty,
2874                                         int x, int y, int xsize, int ysize,
2875                                         int tile_width, int tile_height)
2876 {
2877   Bitmap *src_bitmap;
2878   int src_x, src_y;
2879   int dst_x = startx + x * tile_width;
2880   int dst_y = starty + y * tile_height;
2881   int width  = graphic_info[graphic].width;
2882   int height = graphic_info[graphic].height;
2883   int inner_width_raw  = MAX(width  - 2 * tile_width,  tile_width);
2884   int inner_height_raw = MAX(height - 2 * tile_height, tile_height);
2885   int inner_width  = inner_width_raw  - (inner_width_raw  % tile_width);
2886   int inner_height = inner_height_raw - (inner_height_raw % tile_height);
2887   int inner_sx = (width  >= 3 * tile_width  ? tile_width  : 0);
2888   int inner_sy = (height >= 3 * tile_height ? tile_height : 0);
2889   boolean draw_masked = graphic_info[graphic].draw_masked;
2890
2891   getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
2892
2893   if (src_bitmap == NULL || width < tile_width || height < tile_height)
2894   {
2895     ClearRectangle(drawto, dst_x, dst_y, tile_width, tile_height);
2896     return;
2897   }
2898
2899   src_x += (x == 0 ? 0 : x == xsize - 1 ? width  - tile_width  :
2900             inner_sx + (x - 1) * tile_width  % inner_width);
2901   src_y += (y == 0 ? 0 : y == ysize - 1 ? height - tile_height :
2902             inner_sy + (y - 1) * tile_height % inner_height);
2903
2904   if (draw_masked)
2905     BlitBitmapMasked(src_bitmap, drawto, src_x, src_y, tile_width, tile_height,
2906                      dst_x, dst_y);
2907   else
2908     BlitBitmap(src_bitmap, drawto, src_x, src_y, tile_width, tile_height,
2909                dst_x, dst_y);
2910 }
2911
2912 static void DrawEnvelopeBackground(int graphic, int startx, int starty,
2913                                    int x, int y, int xsize, int ysize,
2914                                    int font_nr)
2915 {
2916   int font_width  = getFontWidth(font_nr);
2917   int font_height = getFontHeight(font_nr);
2918
2919   DrawEnvelopeBackgroundTiles(graphic, startx, starty, x, y, xsize, ysize,
2920                               font_width, font_height);
2921 }
2922
2923 static void AnimateEnvelope(int envelope_nr, int anim_mode, int action)
2924 {
2925   int graphic = IMG_BACKGROUND_ENVELOPE_1 + envelope_nr;
2926   Bitmap *src_bitmap = graphic_info[graphic].bitmap;
2927   int mask_mode = (src_bitmap != NULL ? BLIT_MASKED : BLIT_ON_BACKGROUND);
2928   boolean ffwd_delay = (tape.playing && tape.fast_forward);
2929   boolean no_delay = (tape.warp_forward);
2930   int frame_delay_value = (ffwd_delay ? FfwdFrameDelay : GameFrameDelay);
2931   int anim_delay_value = MAX(1, (no_delay ? 0 : frame_delay_value) / 2);
2932   DelayCounter anim_delay = { anim_delay_value };
2933   int font_nr = FONT_ENVELOPE_1 + envelope_nr;
2934   int font_width = getFontWidth(font_nr);
2935   int font_height = getFontHeight(font_nr);
2936   int max_xsize = level.envelope[envelope_nr].xsize;
2937   int max_ysize = level.envelope[envelope_nr].ysize;
2938   int xstart = (anim_mode & ANIM_VERTICAL ? max_xsize : 0);
2939   int ystart = (anim_mode & ANIM_HORIZONTAL ? max_ysize : 0);
2940   int xend = max_xsize;
2941   int yend = (anim_mode != ANIM_DEFAULT ? max_ysize : 0);
2942   int xstep = (xstart < xend ? 1 : 0);
2943   int ystep = (ystart < yend || xstep == 0 ? 1 : 0);
2944   int start = 0;
2945   int end = MAX(xend - xstart, yend - ystart);
2946   int i;
2947
2948   for (i = start; i <= end; i++)
2949   {
2950     int last_frame = end;       // last frame of this "for" loop
2951     int x = xstart + i * xstep;
2952     int y = ystart + i * ystep;
2953     int xsize = (action == ACTION_CLOSING ? xend - (x - xstart) : x) + 2;
2954     int ysize = (action == ACTION_CLOSING ? yend - (y - ystart) : y) + 2;
2955     int sx = SX + (SXSIZE - xsize * font_width)  / 2;
2956     int sy = SY + (SYSIZE - ysize * font_height) / 2;
2957     int xx, yy;
2958
2959     SetDrawtoField(DRAW_TO_FIELDBUFFER);
2960
2961     BlitScreenToBitmap(backbuffer);
2962
2963     SetDrawtoField(DRAW_TO_BACKBUFFER);
2964
2965     for (yy = 0; yy < ysize; yy++)
2966       for (xx = 0; xx < xsize; xx++)
2967         DrawEnvelopeBackground(graphic, sx, sy, xx, yy, xsize, ysize, font_nr);
2968
2969     DrawTextArea(sx + font_width, sy + font_height,
2970                  level.envelope[envelope_nr].text, font_nr, max_xsize,
2971                  xsize - 2, ysize - 2, 0, mask_mode,
2972                  level.envelope[envelope_nr].autowrap,
2973                  level.envelope[envelope_nr].centered, FALSE);
2974
2975     redraw_mask |= REDRAW_FIELD;
2976     BackToFront();
2977
2978     SkipUntilDelayReached(&anim_delay, &i, last_frame);
2979   }
2980
2981   ClearAutoRepeatKeyEvents();
2982 }
2983
2984 void ShowEnvelope(int envelope_nr)
2985 {
2986   int element = EL_ENVELOPE_1 + envelope_nr;
2987   int graphic = IMG_BACKGROUND_ENVELOPE_1 + envelope_nr;
2988   int sound_opening = element_info[element].sound[ACTION_OPENING];
2989   int sound_closing = element_info[element].sound[ACTION_CLOSING];
2990   boolean ffwd_delay = (tape.playing && tape.fast_forward);
2991   boolean no_delay = (tape.warp_forward);
2992   int normal_delay_value = ONE_SECOND_DELAY / (ffwd_delay ? 2 : 1);
2993   int wait_delay_value = (no_delay ? 0 : normal_delay_value);
2994   int anim_mode = graphic_info[graphic].anim_mode;
2995   int main_anim_mode = (anim_mode == ANIM_NONE ? ANIM_VERTICAL|ANIM_HORIZONTAL:
2996                         anim_mode == ANIM_DEFAULT ? ANIM_VERTICAL : anim_mode);
2997   boolean overlay_enabled = GetOverlayEnabled();
2998
2999   game.envelope_active = TRUE;  // needed for RedrawPlayfield() events
3000
3001   SetOverlayEnabled(FALSE);
3002   UnmapAllGadgets();
3003
3004   PlayMenuSoundStereo(sound_opening, SOUND_MIDDLE);
3005
3006   if (anim_mode == ANIM_DEFAULT)
3007     AnimateEnvelope(envelope_nr, ANIM_DEFAULT, ACTION_OPENING);
3008
3009   AnimateEnvelope(envelope_nr, main_anim_mode, ACTION_OPENING);
3010
3011   if (tape.playing)
3012     Delay_WithScreenUpdates(wait_delay_value);
3013   else
3014     WaitForEventToContinue();
3015
3016   RemapAllGadgets();
3017   SetOverlayEnabled(overlay_enabled);
3018
3019   PlayMenuSoundStereo(sound_closing, SOUND_MIDDLE);
3020
3021   if (anim_mode != ANIM_NONE)
3022     AnimateEnvelope(envelope_nr, main_anim_mode, ACTION_CLOSING);
3023
3024   if (anim_mode == ANIM_DEFAULT)
3025     AnimateEnvelope(envelope_nr, ANIM_DEFAULT, ACTION_CLOSING);
3026
3027   game.envelope_active = FALSE;
3028
3029   SetDrawtoField(DRAW_TO_FIELDBUFFER);
3030
3031   redraw_mask |= REDRAW_FIELD;
3032   BackToFront();
3033 }
3034
3035 static void PrepareEnvelopeRequestToScreen(Bitmap *bitmap, int sx, int sy,
3036                                            int xsize, int ysize)
3037 {
3038   if (!global.use_envelope_request)
3039     return;
3040
3041   if (request.bitmap == NULL ||
3042       xsize > request.xsize ||
3043       ysize > request.ysize)
3044   {
3045     if (request.bitmap != NULL)
3046       FreeBitmap(request.bitmap);
3047
3048     request.bitmap = CreateBitmap(xsize, ysize, DEFAULT_DEPTH);
3049
3050     SDL_Surface *surface = request.bitmap->surface;
3051
3052     if ((request.bitmap->surface_masked = SDLGetNativeSurface(surface)) == NULL)
3053       Fail("SDLGetNativeSurface() failed");
3054   }
3055
3056   BlitBitmap(bitmap, request.bitmap, sx, sy, xsize, ysize, 0, 0);
3057
3058   // create masked surface for request bitmap, if needed
3059   if (graphic_info[IMG_BACKGROUND_REQUEST].draw_masked)
3060   {
3061     SDL_Surface *surface        = request.bitmap->surface;
3062     SDL_Surface *surface_masked = request.bitmap->surface_masked;
3063
3064     SDLBlitSurface(surface, surface_masked, 0, 0, xsize, ysize, 0, 0);
3065     SDL_SetColorKey(surface_masked, SET_TRANSPARENT_PIXEL,
3066                     SDL_MapRGB(surface_masked->format, 0x00, 0x00, 0x00));
3067   }
3068
3069   SDLFreeBitmapTextures(request.bitmap);
3070   SDLCreateBitmapTextures(request.bitmap);
3071
3072   ResetBitmapAlpha(request.bitmap);
3073
3074   // set envelope request run-time values
3075   request.sx = sx;
3076   request.sy = sy;
3077   request.xsize = xsize;
3078   request.ysize = ysize;
3079 }
3080
3081 void DrawEnvelopeRequestToScreen(int drawing_target)
3082 {
3083   if (global.use_envelope_request &&
3084       game.request_active &&
3085       drawing_target == DRAW_TO_SCREEN)
3086   {
3087     struct GraphicInfo *g = &graphic_info[IMG_BACKGROUND_REQUEST];
3088
3089     SetBitmapAlphaNextBlit(request.bitmap, g->alpha);
3090
3091     if (g->draw_masked)
3092       BlitToScreenMasked(request.bitmap, 0, 0, request.xsize, request.ysize,
3093                          request.sx, request.sy);
3094     else
3095       BlitToScreen(request.bitmap, 0, 0, request.xsize, request.ysize,
3096                    request.sx, request.sy);
3097   }
3098 }
3099
3100 static void setRequestBasePosition(int *x, int *y)
3101 {
3102   int sx_base, sy_base;
3103
3104   if (request.x != -1)
3105     sx_base = request.x;
3106   else if (request.align == ALIGN_LEFT)
3107     sx_base = SX;
3108   else if (request.align == ALIGN_RIGHT)
3109     sx_base = SX + SXSIZE;
3110   else
3111     sx_base = SX + SXSIZE / 2;
3112
3113   if (request.y != -1)
3114     sy_base = request.y;
3115   else if (request.valign == VALIGN_TOP)
3116     sy_base = SY;
3117   else if (request.valign == VALIGN_BOTTOM)
3118     sy_base = SY + SYSIZE;
3119   else
3120     sy_base = SY + SYSIZE / 2;
3121
3122   *x = sx_base;
3123   *y = sy_base;
3124 }
3125
3126 static void setRequestPositionExt(int *x, int *y, int width, int height,
3127                                   boolean add_border_size)
3128 {
3129   int border_size = request.border_size;
3130   int sx_base, sy_base;
3131   int sx, sy;
3132
3133   setRequestBasePosition(&sx_base, &sy_base);
3134
3135   if (request.align == ALIGN_LEFT)
3136     sx = sx_base;
3137   else if (request.align == ALIGN_RIGHT)
3138     sx = sx_base - width;
3139   else
3140     sx = sx_base - width  / 2;
3141
3142   if (request.valign == VALIGN_TOP)
3143     sy = sy_base;
3144   else if (request.valign == VALIGN_BOTTOM)
3145     sy = sy_base - height;
3146   else
3147     sy = sy_base - height / 2;
3148
3149   sx = MAX(0, MIN(sx, WIN_XSIZE - width));
3150   sy = MAX(0, MIN(sy, WIN_YSIZE - height));
3151
3152   if (add_border_size)
3153   {
3154     sx += border_size;
3155     sy += border_size;
3156   }
3157
3158   *x = sx;
3159   *y = sy;
3160 }
3161
3162 static void setRequestPosition(int *x, int *y, boolean add_border_size)
3163 {
3164   setRequestPositionExt(x, y, request.width, request.height, add_border_size);
3165 }
3166
3167 static void DrawEnvelopeRequestText(int sx, int sy, char *text)
3168 {
3169   char *text_final = text;
3170   char *text_door_style = NULL;
3171   int graphic = IMG_BACKGROUND_REQUEST;
3172   Bitmap *src_bitmap = graphic_info[graphic].bitmap;
3173   int mask_mode = (src_bitmap != NULL ? BLIT_MASKED : BLIT_ON_BACKGROUND);
3174   int font_nr = FONT_REQUEST;
3175   int font_width = getFontWidth(font_nr);
3176   int font_height = getFontHeight(font_nr);
3177   int border_size = request.border_size;
3178   int line_spacing = request.line_spacing;
3179   int line_height = font_height + line_spacing;
3180   int max_text_width  = request.width  - 2 * border_size;
3181   int max_text_height = request.height - 2 * border_size;
3182   int line_length = max_text_width  / font_width;
3183   int max_lines   = max_text_height / line_height;
3184   int text_width = line_length * font_width;
3185   int sx_offset = border_size;
3186   int sy_offset = border_size;
3187
3188   // force DOOR font inside door area
3189   SetFontStatus(GAME_MODE_PSEUDO_DOOR);
3190
3191   if (request.centered)
3192     sx_offset = (request.width - text_width) / 2;
3193
3194   if (request.wrap_single_words && !request.autowrap)
3195   {
3196     char *src_text_ptr, *dst_text_ptr;
3197
3198     if (maxWordLengthInRequestString(text) > line_length)
3199     {
3200       font_nr = FONT_REQUEST_NARROW;
3201       font_width = getFontWidth(font_nr);
3202       line_length = max_text_width  / font_width;
3203     }
3204
3205     text_door_style = checked_malloc(2 * strlen(text) + 1);
3206
3207     src_text_ptr = text;
3208     dst_text_ptr = text_door_style;
3209
3210     while (*src_text_ptr)
3211     {
3212       if (*src_text_ptr == ' ' ||
3213           *src_text_ptr == '?' ||
3214           *src_text_ptr == '!')
3215         *dst_text_ptr++ = '\n';
3216
3217       if (*src_text_ptr != ' ')
3218         *dst_text_ptr++ = *src_text_ptr;
3219
3220       src_text_ptr++;
3221     }
3222
3223     *dst_text_ptr = '\0';
3224
3225     text_final = text_door_style;
3226   }
3227
3228   DrawTextBuffer(sx + sx_offset, sy + sy_offset, text_final, font_nr,
3229                  line_length, -1, max_lines, line_spacing, mask_mode,
3230                  request.autowrap, request.centered, FALSE);
3231
3232   if (text_door_style)
3233     free(text_door_style);
3234
3235   ResetFontStatus();
3236 }
3237
3238 static void DrawEnvelopeRequest(char *text, unsigned int req_state)
3239 {
3240   DrawBuffer *drawto_last = drawto;
3241   int graphic = IMG_BACKGROUND_REQUEST;
3242   int width = request.width;
3243   int height = request.height;
3244   int tile_size = MAX(request.step_offset, 1);
3245   int x_steps = width  / tile_size;
3246   int y_steps = height / tile_size;
3247   int sx, sy;
3248   int x, y;
3249
3250   setRequestPosition(&sx, &sy, FALSE);
3251
3252   // draw complete envelope request to temporary bitmap
3253   drawto = bitmap_db_store_1;
3254
3255   ClearRectangle(drawto, sx, sy, width, height);
3256
3257   for (y = 0; y < y_steps; y++)
3258     for (x = 0; x < x_steps; x++)
3259       DrawEnvelopeBackgroundTiles(graphic, sx, sy,
3260                                   x, y, x_steps, y_steps,
3261                                   tile_size, tile_size);
3262
3263   // write text for request
3264   DrawEnvelopeRequestText(sx, sy, text);
3265
3266   MapToolButtons(req_state);
3267
3268   // restore pointer to drawing buffer
3269   drawto = drawto_last;
3270
3271   // prepare complete envelope request from temporary bitmap
3272   PrepareEnvelopeRequestToScreen(bitmap_db_store_1, sx, sy, width, height);
3273 }
3274
3275 static void AnimateEnvelopeRequest(int anim_mode, int action)
3276 {
3277   boolean game_ended = (game_status == GAME_MODE_PLAYING && checkGameEnded());
3278   int delay_value_normal = request.step_delay;
3279   int delay_value_fast = delay_value_normal / 2;
3280   boolean ffwd_delay = (tape.playing && tape.fast_forward);
3281   boolean no_delay = (tape.warp_forward);
3282   int delay_value = (ffwd_delay ? delay_value_fast : delay_value_normal);
3283   int anim_delay_value = MAX(1, (no_delay ? 0 : delay_value) / 2);
3284   DelayCounter anim_delay = { anim_delay_value };
3285
3286   int tile_size = MAX(request.step_offset, 1);
3287   int max_xsize = request.width  / tile_size;
3288   int max_ysize = request.height / tile_size;
3289   int max_xsize_inner = max_xsize - 2;
3290   int max_ysize_inner = max_ysize - 2;
3291
3292   int xstart = (anim_mode & ANIM_VERTICAL ? max_xsize_inner : 0);
3293   int ystart = (anim_mode & ANIM_HORIZONTAL ? max_ysize_inner : 0);
3294   int xend = max_xsize_inner;
3295   int yend = (anim_mode != ANIM_DEFAULT ? max_ysize_inner : 0);
3296   int xstep = (xstart < xend ? 1 : 0);
3297   int ystep = (ystart < yend || xstep == 0 ? 1 : 0);
3298   int start = 0;
3299   int end = MAX(xend - xstart, yend - ystart);
3300   int i;
3301
3302   if (setup.quick_doors)
3303   {
3304     xstart = xend;
3305     ystart = yend;
3306     end = 0;
3307   }
3308
3309   for (i = start; i <= end; i++)
3310   {
3311     int last_frame = end;       // last frame of this "for" loop
3312     int x = xstart + i * xstep;
3313     int y = ystart + i * ystep;
3314     int xsize = (action == ACTION_CLOSING ? xend - (x - xstart) : x) + 2;
3315     int ysize = (action == ACTION_CLOSING ? yend - (y - ystart) : y) + 2;
3316     int xsize_size_left = (xsize - 1) * tile_size;
3317     int ysize_size_top  = (ysize - 1) * tile_size;
3318     int max_xsize_pos = (max_xsize - 1) * tile_size;
3319     int max_ysize_pos = (max_ysize - 1) * tile_size;
3320     int width  = xsize * tile_size;
3321     int height = ysize * tile_size;
3322     int src_x, src_y;
3323     int dst_x, dst_y;
3324     int xx, yy;
3325
3326     if (game_ended)
3327       HandleGameActions();
3328
3329     setRequestPosition(&src_x, &src_y, FALSE);
3330     setRequestPositionExt(&dst_x, &dst_y, width, height, FALSE);
3331
3332     for (yy = 0; yy < 2; yy++)
3333     {
3334       for (xx = 0; xx < 2; xx++)
3335       {
3336         int src_xx = src_x + xx * max_xsize_pos;
3337         int src_yy = src_y + yy * max_ysize_pos;
3338         int dst_xx = dst_x + xx * xsize_size_left;
3339         int dst_yy = dst_y + yy * ysize_size_top;
3340         int xx_size = (xx ? tile_size : xsize_size_left);
3341         int yy_size = (yy ? tile_size : ysize_size_top);
3342
3343         // draw partial (animated) envelope request to temporary bitmap
3344         BlitBitmap(bitmap_db_store_1, bitmap_db_store_2,
3345                    src_xx, src_yy, xx_size, yy_size, dst_xx, dst_yy);
3346       }
3347     }
3348
3349     // prepare partial (animated) envelope request from temporary bitmap
3350     PrepareEnvelopeRequestToScreen(bitmap_db_store_2, dst_x, dst_y,
3351                                    width, height);
3352
3353     redraw_mask |= REDRAW_FIELD;
3354
3355     BackToFront();
3356
3357     SkipUntilDelayReached(&anim_delay, &i, last_frame);
3358   }
3359
3360   ClearAutoRepeatKeyEvents();
3361 }
3362
3363 static void ShowEnvelopeRequest(char *text, unsigned int req_state, int action)
3364 {
3365   int graphic = IMG_BACKGROUND_REQUEST;
3366   int sound_opening = SND_REQUEST_OPENING;
3367   int sound_closing = SND_REQUEST_CLOSING;
3368   int anim_mode_1 = request.anim_mode;                  // (higher priority)
3369   int anim_mode_2 = graphic_info[graphic].anim_mode;    // (lower priority)
3370   int anim_mode = (anim_mode_1 != ANIM_DEFAULT ? anim_mode_1 : anim_mode_2);
3371   int main_anim_mode = (anim_mode == ANIM_NONE ? ANIM_VERTICAL|ANIM_HORIZONTAL:
3372                         anim_mode == ANIM_DEFAULT ? ANIM_VERTICAL : anim_mode);
3373
3374   game.envelope_active = TRUE;  // needed for RedrawPlayfield() events
3375
3376   if (action == ACTION_OPENING)
3377   {
3378     PlayMenuSoundStereo(sound_opening, SOUND_MIDDLE);
3379
3380     if (anim_mode == ANIM_DEFAULT)
3381       AnimateEnvelopeRequest(ANIM_DEFAULT, ACTION_OPENING);
3382
3383     AnimateEnvelopeRequest(main_anim_mode, ACTION_OPENING);
3384   }
3385   else
3386   {
3387     PlayMenuSoundStereo(sound_closing, SOUND_MIDDLE);
3388
3389     if (anim_mode != ANIM_NONE)
3390       AnimateEnvelopeRequest(main_anim_mode, ACTION_CLOSING);
3391
3392     if (anim_mode == ANIM_DEFAULT)
3393       AnimateEnvelopeRequest(ANIM_DEFAULT, ACTION_CLOSING);
3394   }
3395
3396   game.envelope_active = FALSE;
3397 }
3398
3399 static Bitmap *GetPreviewTileBitmap(Bitmap *bitmap)
3400 {
3401   if (level.game_engine_type == GAME_ENGINE_TYPE_BD)
3402     return GetPreviewTileBitmap_BD(bitmap);
3403
3404   return bitmap;
3405 }
3406
3407 static void DrawPreviewElement(int dst_x, int dst_y, int element, int tilesize)
3408 {
3409   if (IS_MM_WALL(element))
3410   {
3411     DrawSizedWall_MM(dst_x, dst_y, element, tilesize, el2preimg);
3412   }
3413   else
3414   {
3415     Bitmap *src_bitmap;
3416     int src_x, src_y;
3417     int graphic = el2preimg(element);
3418
3419     getSizedGraphicSource(graphic, 0, tilesize, &src_bitmap, &src_x, &src_y);
3420
3421     // for BD style levels, maybe use bitmap with level-specific colors
3422     src_bitmap = GetPreviewTileBitmap(src_bitmap);
3423
3424     BlitBitmap(src_bitmap, drawto, src_x, src_y, tilesize, tilesize,
3425                dst_x, dst_y);
3426   }
3427 }
3428
3429 void DrawLevel(int draw_background_mask)
3430 {
3431   int x, y;
3432
3433   SetMainBackgroundImage(IMG_BACKGROUND_PLAYING);
3434   SetDrawBackgroundMask(draw_background_mask);
3435
3436   ClearField();
3437
3438   for (x = BX1; x <= BX2; x++)
3439     for (y = BY1; y <= BY2; y++)
3440       DrawScreenField(x, y);
3441
3442   redraw_mask |= REDRAW_FIELD;
3443 }
3444
3445 void DrawSizedLevel(int size_x, int size_y, int scroll_x, int scroll_y,
3446                     int tilesize)
3447 {
3448   int x, y;
3449
3450   for (x = 0; x < size_x; x++)
3451     for (y = 0; y < size_y; y++)
3452       DrawSizedElementOrWall(x, y, scroll_x, scroll_y, tilesize);
3453
3454   redraw_mask |= REDRAW_FIELD;
3455 }
3456
3457 void DrawMiniLevel(int size_x, int size_y, int scroll_x, int scroll_y)
3458 {
3459   int x, y;
3460
3461   for (x = 0; x < size_x; x++)
3462     for (y = 0; y < size_y; y++)
3463       DrawMiniElementOrWall(x, y, scroll_x, scroll_y);
3464
3465   redraw_mask |= REDRAW_FIELD;
3466 }
3467
3468 static int getPreviewLevelWidth(void)
3469 {
3470   if (level.game_engine_type == GAME_ENGINE_TYPE_BD)
3471     return (level.native_bd_level->cave->x2 - level.native_bd_level->cave->x1 + 1);
3472
3473   return lev_fieldx;
3474 }
3475
3476 static int getPreviewLevelHeight(void)
3477 {
3478   if (level.game_engine_type == GAME_ENGINE_TYPE_BD)
3479     return (level.native_bd_level->cave->y2 - level.native_bd_level->cave->y1 + 1);
3480
3481   return lev_fieldy;
3482 }
3483
3484 static void DrawPreviewLevelPlayfield(int from_x, int from_y)
3485 {
3486   boolean show_level_border = (BorderElement != EL_EMPTY);
3487   int level_xsize = getPreviewLevelWidth()  + (show_level_border ? 2 : 0);
3488   int level_ysize = getPreviewLevelHeight() + (show_level_border ? 2 : 0);
3489   int tile_size = preview.tile_size;
3490   int preview_width  = preview.xsize * tile_size;
3491   int preview_height = preview.ysize * tile_size;
3492   int real_preview_xsize = MIN(level_xsize, preview.xsize);
3493   int real_preview_ysize = MIN(level_ysize, preview.ysize);
3494   int real_preview_width  = real_preview_xsize * tile_size;
3495   int real_preview_height = real_preview_ysize * tile_size;
3496   int dst_x = SX + ALIGNED_XPOS(preview.x, preview_width, preview.align);
3497   int dst_y = SY + ALIGNED_YPOS(preview.y, preview_height, preview.valign);
3498   int x, y;
3499
3500   if (!IN_GFX_FIELD_FULL(dst_x, dst_y + preview_height - 1))
3501     return;
3502
3503   DrawBackground(dst_x, dst_y, preview_width, preview_height);
3504
3505   dst_x += (preview_width  - real_preview_width)  / 2;
3506   dst_y += (preview_height - real_preview_height) / 2;
3507
3508   for (x = 0; x < real_preview_xsize; x++)
3509   {
3510     for (y = 0; y < real_preview_ysize; y++)
3511     {
3512       int lx = from_x + x + (show_level_border ? -1 : 0);
3513       int ly = from_y + y + (show_level_border ? -1 : 0);
3514       int element = (IN_LEV_FIELD(lx, ly) ? level.field[lx][ly] :
3515                      getBorderElement(lx, ly));
3516
3517       DrawPreviewElement(dst_x + x * tile_size, dst_y + y * tile_size,
3518                          element, tile_size);
3519     }
3520   }
3521
3522   redraw_mask |= REDRAW_FIELD;
3523 }
3524
3525 #define MICROLABEL_EMPTY                0
3526 #define MICROLABEL_LEVEL_NAME           1
3527 #define MICROLABEL_LEVEL_AUTHOR_HEAD    2
3528 #define MICROLABEL_LEVEL_AUTHOR         3
3529 #define MICROLABEL_IMPORTED_FROM_HEAD   4
3530 #define MICROLABEL_IMPORTED_FROM        5
3531 #define MICROLABEL_IMPORTED_BY_HEAD     6
3532 #define MICROLABEL_IMPORTED_BY          7
3533
3534 static int getMaxTextLength(struct TextPosInfo *pos, int font_nr)
3535 {
3536   int max_text_width = SXSIZE;
3537   int font_width = getFontWidth(font_nr);
3538
3539   if (pos->align == ALIGN_CENTER)
3540     max_text_width = (pos->x < SXSIZE / 2 ? pos->x * 2 : (SXSIZE - pos->x) * 2);
3541   else if (pos->align == ALIGN_RIGHT)
3542     max_text_width = pos->x;
3543   else
3544     max_text_width = SXSIZE - pos->x;
3545
3546   return max_text_width / font_width;
3547 }
3548
3549 static void DrawPreviewLevelLabelExt(int mode, struct TextPosInfo *pos)
3550 {
3551   char label_text[MAX_OUTPUT_LINESIZE + 1];
3552   int max_len_label_text;
3553   int font_nr = pos->font;
3554   int i;
3555
3556   if (!IN_GFX_FIELD_FULL(pos->x, pos->y + getFontHeight(pos->font)))
3557     return;
3558
3559   if (mode == MICROLABEL_LEVEL_AUTHOR_HEAD ||
3560       mode == MICROLABEL_IMPORTED_FROM_HEAD ||
3561       mode == MICROLABEL_IMPORTED_BY_HEAD)
3562     font_nr = pos->font_alt;
3563
3564   max_len_label_text = getMaxTextLength(pos, font_nr);
3565
3566   if (pos->size != -1)
3567     max_len_label_text = pos->size;
3568
3569   for (i = 0; i < max_len_label_text; i++)
3570     label_text[i] = ' ';
3571   label_text[max_len_label_text] = '\0';
3572
3573   if (strlen(label_text) > 0)
3574     DrawTextSAligned(pos->x, pos->y, label_text, font_nr, pos->align);
3575
3576   strncpy(label_text,
3577           (mode == MICROLABEL_LEVEL_NAME ? level.name :
3578            mode == MICROLABEL_LEVEL_AUTHOR_HEAD ? "created by" :
3579            mode == MICROLABEL_LEVEL_AUTHOR ? level.author :
3580            mode == MICROLABEL_IMPORTED_FROM_HEAD ? "imported from" :
3581            mode == MICROLABEL_IMPORTED_FROM ? leveldir_current->imported_from :
3582            mode == MICROLABEL_IMPORTED_BY_HEAD ? "imported by" :
3583            mode == MICROLABEL_IMPORTED_BY ? leveldir_current->imported_by :""),
3584           max_len_label_text);
3585   label_text[max_len_label_text] = '\0';
3586
3587   if (strlen(label_text) > 0)
3588     DrawTextSAligned(pos->x, pos->y, label_text, font_nr, pos->align);
3589
3590   redraw_mask |= REDRAW_FIELD;
3591 }
3592
3593 static void DrawPreviewLevelLabel(int mode)
3594 {
3595   DrawPreviewLevelLabelExt(mode, &menu.main.text.level_info_2);
3596 }
3597
3598 static void DrawPreviewLevelInfo(int mode)
3599 {
3600   if (mode == MICROLABEL_LEVEL_NAME)
3601     DrawPreviewLevelLabelExt(mode, &menu.main.text.level_name);
3602   else if (mode == MICROLABEL_LEVEL_AUTHOR)
3603     DrawPreviewLevelLabelExt(mode, &menu.main.text.level_author);
3604 }
3605
3606 static void DrawPreviewLevelExt(boolean restart)
3607 {
3608   static DelayCounter scroll_delay = { 0 };
3609   static DelayCounter label_delay = { 0 };
3610   static int from_x, from_y, scroll_direction;
3611   static int label_state, label_counter;
3612   boolean show_level_border = (BorderElement != EL_EMPTY);
3613   int level_xsize = lev_fieldx + (show_level_border ? 2 : 0);
3614   int level_ysize = lev_fieldy + (show_level_border ? 2 : 0);
3615
3616   scroll_delay.value = preview.step_delay;
3617   label_delay.value = MICROLEVEL_LABEL_DELAY;
3618
3619   if (restart)
3620   {
3621     from_x = 0;
3622     from_y = 0;
3623
3624     if (preview.anim_mode == ANIM_CENTERED)
3625     {
3626       if (level_xsize > preview.xsize)
3627         from_x = (level_xsize - preview.xsize) / 2;
3628       if (level_ysize > preview.ysize)
3629         from_y = (level_ysize - preview.ysize) / 2;
3630     }
3631
3632     from_x += preview.xoffset;
3633     from_y += preview.yoffset;
3634
3635     scroll_direction = MV_RIGHT;
3636     label_state = 1;
3637     label_counter = 0;
3638
3639     DrawPreviewLevelPlayfield(from_x, from_y);
3640     DrawPreviewLevelLabel(label_state);
3641
3642     DrawPreviewLevelInfo(MICROLABEL_LEVEL_NAME);
3643     DrawPreviewLevelInfo(MICROLABEL_LEVEL_AUTHOR);
3644
3645     // initialize delay counters
3646     ResetDelayCounter(&scroll_delay);
3647     ResetDelayCounter(&label_delay);
3648
3649     if (leveldir_current->name)
3650     {
3651       struct TextPosInfo *pos = &menu.main.text.level_info_1;
3652       char label_text[MAX_OUTPUT_LINESIZE + 1];
3653       int font_nr = pos->font;
3654       int max_len_label_text = getMaxTextLength(pos, font_nr);
3655
3656       if (pos->size != -1)
3657         max_len_label_text = pos->size;
3658
3659       strncpy(label_text, leveldir_current->name, max_len_label_text);
3660       label_text[max_len_label_text] = '\0';
3661
3662       if (IN_GFX_FIELD_FULL(pos->x, pos->y + getFontHeight(pos->font)))
3663         DrawTextSAligned(pos->x, pos->y, label_text, font_nr, pos->align);
3664     }
3665
3666     return;
3667   }
3668
3669   // scroll preview level, if needed
3670   if (preview.anim_mode != ANIM_NONE &&
3671       (level_xsize > preview.xsize || level_ysize > preview.ysize) &&
3672       DelayReached(&scroll_delay))
3673   {
3674     switch (scroll_direction)
3675     {
3676       case MV_LEFT:
3677         if (from_x > 0)
3678         {
3679           from_x -= preview.step_offset;
3680           from_x = (from_x < 0 ? 0 : from_x);
3681         }
3682         else
3683           scroll_direction = MV_UP;
3684         break;
3685
3686       case MV_RIGHT:
3687         if (from_x < level_xsize - preview.xsize)
3688         {
3689           from_x += preview.step_offset;
3690           from_x = (from_x > level_xsize - preview.xsize ?
3691                     level_xsize - preview.xsize : from_x);
3692         }
3693         else
3694           scroll_direction = MV_DOWN;
3695         break;
3696
3697       case MV_UP:
3698         if (from_y > 0)
3699         {
3700           from_y -= preview.step_offset;
3701           from_y = (from_y < 0 ? 0 : from_y);
3702         }
3703         else
3704           scroll_direction = MV_RIGHT;
3705         break;
3706
3707       case MV_DOWN:
3708         if (from_y < level_ysize - preview.ysize)
3709         {
3710           from_y += preview.step_offset;
3711           from_y = (from_y > level_ysize - preview.ysize ?
3712                     level_ysize - preview.ysize : from_y);
3713         }
3714         else
3715           scroll_direction = MV_LEFT;
3716         break;
3717
3718       default:
3719         break;
3720     }
3721
3722     DrawPreviewLevelPlayfield(from_x, from_y);
3723   }
3724
3725   // !!! THIS ALL SUCKS -- SHOULD BE CLEANLY REWRITTEN !!!
3726   // redraw micro level label, if needed
3727   if (!strEqual(level.name, NAMELESS_LEVEL_NAME) &&
3728       !strEqual(level.author, ANONYMOUS_NAME) &&
3729       !strEqual(level.author, leveldir_current->name) &&
3730       DelayReached(&label_delay))
3731   {
3732     int max_label_counter = 23;
3733
3734     if (leveldir_current->imported_from != NULL &&
3735         strlen(leveldir_current->imported_from) > 0)
3736       max_label_counter += 14;
3737     if (leveldir_current->imported_by != NULL &&
3738         strlen(leveldir_current->imported_by) > 0)
3739       max_label_counter += 14;
3740
3741     label_counter = (label_counter + 1) % max_label_counter;
3742     label_state = (label_counter >= 0 && label_counter <= 7 ?
3743                    MICROLABEL_LEVEL_NAME :
3744                    label_counter >= 9 && label_counter <= 12 ?
3745                    MICROLABEL_LEVEL_AUTHOR_HEAD :
3746                    label_counter >= 14 && label_counter <= 21 ?
3747                    MICROLABEL_LEVEL_AUTHOR :
3748                    label_counter >= 23 && label_counter <= 26 ?
3749                    MICROLABEL_IMPORTED_FROM_HEAD :
3750                    label_counter >= 28 && label_counter <= 35 ?
3751                    MICROLABEL_IMPORTED_FROM :
3752                    label_counter >= 37 && label_counter <= 40 ?
3753                    MICROLABEL_IMPORTED_BY_HEAD :
3754                    label_counter >= 42 && label_counter <= 49 ?
3755                    MICROLABEL_IMPORTED_BY : MICROLABEL_EMPTY);
3756
3757     if (leveldir_current->imported_from == NULL &&
3758         (label_state == MICROLABEL_IMPORTED_FROM_HEAD ||
3759          label_state == MICROLABEL_IMPORTED_FROM))
3760       label_state = (label_state == MICROLABEL_IMPORTED_FROM_HEAD ?
3761                      MICROLABEL_IMPORTED_BY_HEAD : MICROLABEL_IMPORTED_BY);
3762
3763     DrawPreviewLevelLabel(label_state);
3764   }
3765 }
3766
3767 void DrawPreviewPlayers(void)
3768 {
3769   if (game_status != GAME_MODE_MAIN)
3770     return;
3771
3772   // do not draw preview players if level preview redefined, but players aren't
3773   if (preview.redefined && !menu.main.preview_players.redefined)
3774     return;
3775
3776   boolean player_found[MAX_PLAYERS];
3777   int num_players = 0;
3778   int i, x, y;
3779
3780   for (i = 0; i < MAX_PLAYERS; i++)
3781     player_found[i] = FALSE;
3782
3783   // check which players can be found in the level (simple approach)
3784   for (x = 0; x < lev_fieldx; x++)
3785   {
3786     for (y = 0; y < lev_fieldy; y++)
3787     {
3788       int element = level.field[x][y];
3789
3790       if (IS_PLAYER_ELEMENT(element))
3791       {
3792         int player_nr = GET_PLAYER_NR(element);
3793
3794         player_nr = MIN(MAX(0, player_nr), MAX_PLAYERS - 1);
3795
3796         if (!player_found[player_nr])
3797           num_players++;
3798
3799         player_found[player_nr] = TRUE;
3800       }
3801     }
3802   }
3803
3804   struct TextPosInfo *pos = &menu.main.preview_players;
3805   int tile_size = pos->tile_size;
3806   int border_size = pos->border_size;
3807   int player_xoffset_raw = (pos->vertical ? 0 : tile_size + border_size);
3808   int player_yoffset_raw = (pos->vertical ? tile_size + border_size : 0);
3809   int player_xoffset = (pos->xoffset != -1 ? pos->xoffset : player_xoffset_raw);
3810   int player_yoffset = (pos->yoffset != -1 ? pos->yoffset : player_yoffset_raw);
3811   int max_players_width  = (MAX_PLAYERS - 1) * player_xoffset + tile_size;
3812   int max_players_height = (MAX_PLAYERS - 1) * player_yoffset + tile_size;
3813   int all_players_width  = (num_players - 1) * player_xoffset + tile_size;
3814   int all_players_height = (num_players - 1) * player_yoffset + tile_size;
3815   int max_xpos = SX + ALIGNED_XPOS(pos->x, max_players_width,  pos->align);
3816   int max_ypos = SY + ALIGNED_YPOS(pos->y, max_players_height, pos->valign);
3817   int xpos = SX + ALIGNED_XPOS(pos->x, all_players_width,  pos->align);
3818   int ypos = SY + ALIGNED_YPOS(pos->y, all_players_height, pos->valign);
3819
3820   // clear area in which the players will be drawn
3821   ClearRectangleOnBackground(drawto, max_xpos, max_ypos,
3822                              max_players_width, max_players_height);
3823
3824   if (!network.enabled && !setup.team_mode)
3825     return;
3826
3827   // only draw players if level is suited for team mode
3828   if (num_players < 2)
3829     return;
3830
3831   // draw all players that were found in the level
3832   for (i = 0; i < MAX_PLAYERS; i++)
3833   {
3834     if (player_found[i])
3835     {
3836       int graphic = el2img(EL_PLAYER_1 + i);
3837
3838       DrawSizedGraphicThruMaskExt(drawto, xpos, ypos, graphic, 0, tile_size);
3839
3840       xpos += player_xoffset;
3841       ypos += player_yoffset;
3842     }
3843   }
3844 }
3845
3846 static void PreparePreviewTileBitmap(void)
3847 {
3848   // check if special preview bitmap with level-specific colors should be created
3849   if (level.game_engine_type != GAME_ENGINE_TYPE_BD)
3850     return;
3851
3852   // use original sized bitmap (else reduced color palette is lost by downscaling)
3853   int original_tilesize = MAX(MINI_TILESIZE, preview.tile_size);
3854   int scale_down_factor = original_tilesize / preview.tile_size;
3855   Bitmap *src_bitmap;
3856   int src_x, src_y;
3857   int element_template = EL_BD_GAME_GRAPHICS_COLOR_TEMPLATE;
3858   int graphic_template = el2preimg(element_template);
3859   int element_default = EL_BD_ROCK;
3860   int graphic_default = el2preimg(element_default);
3861
3862   // create special preview bitmap and scale it down to preview tile size
3863   getSizedGraphicSource(graphic_template, 0, original_tilesize, &src_bitmap, &src_x, &src_y);
3864   PreparePreviewTileBitmap_BD(src_bitmap, scale_down_factor);
3865
3866   // force using special preview bitmap to replace original preview bitmap
3867   getSizedGraphicSource(graphic_default, 0, preview.tile_size, &src_bitmap, &src_x, &src_y);
3868   SetPreviewTileBitmapReference_BD(src_bitmap);
3869 }
3870
3871 void DrawPreviewLevelInitial(void)
3872 {
3873   PreparePreviewTileBitmap();   // only needed for native BD style levels
3874
3875   DrawPreviewLevelExt(TRUE);
3876   DrawPreviewPlayers();
3877 }
3878
3879 void DrawPreviewLevelAnimation(void)
3880 {
3881   DrawPreviewLevelExt(FALSE);
3882 }
3883
3884 static void DrawNetworkPlayer(int x, int y, int player_nr, int tile_size,
3885                               int border_size, int font_nr)
3886 {
3887   int graphic = el2img(EL_PLAYER_1 + player_nr);
3888   int font_height = getFontHeight(font_nr);
3889   int player_height = MAX(tile_size, font_height);
3890   int xoffset_text = tile_size + border_size;
3891   int yoffset_text    = (player_height - font_height) / 2;
3892   int yoffset_graphic = (player_height - tile_size) / 2;
3893   char *player_name = getNetworkPlayerName(player_nr + 1);
3894
3895   DrawSizedGraphicThruMaskExt(drawto, x, y + yoffset_graphic, graphic, 0,
3896                               tile_size);
3897   DrawText(x + xoffset_text, y + yoffset_text, player_name, font_nr);
3898 }
3899
3900 static void DrawNetworkPlayersExt(boolean force)
3901 {
3902   if (game_status != GAME_MODE_MAIN)
3903     return;
3904
3905   if (!network.connected && !force)
3906     return;
3907
3908   // do not draw network players if level preview redefined, but players aren't
3909   if (preview.redefined && !menu.main.network_players.redefined)
3910     return;
3911
3912   int num_players = 0;
3913   int i;
3914
3915   for (i = 0; i < MAX_PLAYERS; i++)
3916     if (stored_player[i].connected_network)
3917       num_players++;
3918
3919   struct TextPosInfo *pos = &menu.main.network_players;
3920   int tile_size = pos->tile_size;
3921   int border_size = pos->border_size;
3922   int xoffset_text = tile_size + border_size;
3923   int font_nr = pos->font;
3924   int font_width = getFontWidth(font_nr);
3925   int font_height = getFontHeight(font_nr);
3926   int player_height = MAX(tile_size, font_height);
3927   int player_yoffset = player_height + border_size;
3928   int max_players_width = xoffset_text + MAX_PLAYER_NAME_LEN * font_width;
3929   int max_players_height = MAX_PLAYERS * player_yoffset - border_size;
3930   int all_players_height = num_players * player_yoffset - border_size;
3931   int max_xpos = SX + ALIGNED_XPOS(pos->x, max_players_width,  pos->align);
3932   int max_ypos = SY + ALIGNED_YPOS(pos->y, max_players_height, pos->valign);
3933   int ypos = SY + ALIGNED_YPOS(pos->y, all_players_height, pos->valign);
3934
3935   ClearRectangleOnBackground(drawto, max_xpos, max_ypos,
3936                              max_players_width, max_players_height);
3937
3938   // first draw local network player ...
3939   for (i = 0; i < MAX_PLAYERS; i++)
3940   {
3941     if (stored_player[i].connected_network &&
3942         stored_player[i].connected_locally)
3943     {
3944       char *player_name = getNetworkPlayerName(i + 1);
3945       int player_width = xoffset_text + getTextWidth(player_name, font_nr);
3946       int xpos = SX + ALIGNED_XPOS(pos->x, player_width,  pos->align);
3947
3948       DrawNetworkPlayer(xpos, ypos, i, tile_size, border_size, font_nr);
3949
3950       ypos += player_yoffset;
3951     }
3952   }
3953
3954   // ... then draw all other network players
3955   for (i = 0; i < MAX_PLAYERS; i++)
3956   {
3957     if (stored_player[i].connected_network &&
3958         !stored_player[i].connected_locally)
3959     {
3960       char *player_name = getNetworkPlayerName(i + 1);
3961       int player_width = xoffset_text + getTextWidth(player_name, font_nr);
3962       int xpos = SX + ALIGNED_XPOS(pos->x, player_width,  pos->align);
3963
3964       DrawNetworkPlayer(xpos, ypos, i, tile_size, border_size, font_nr);
3965
3966       ypos += player_yoffset;
3967     }
3968   }
3969 }
3970
3971 void DrawNetworkPlayers(void)
3972 {
3973   DrawNetworkPlayersExt(FALSE);
3974 }
3975
3976 void ClearNetworkPlayers(void)
3977 {
3978   DrawNetworkPlayersExt(TRUE);
3979 }
3980
3981 static void DrawGraphicAnimationExt(DrawBuffer *dst_bitmap, int x, int y,
3982                                     int graphic, int lx, int ly,
3983                                     int mask_mode)
3984 {
3985   int frame = getGraphicAnimationFrameXY(graphic, lx, ly);
3986
3987   if (mask_mode == USE_MASKING)
3988     DrawGraphicThruMaskExt(dst_bitmap, x, y, graphic, frame);
3989   else
3990     DrawGraphicExt(dst_bitmap, x, y, graphic, frame);
3991 }
3992
3993 void DrawFixedGraphicAnimationExt(DrawBuffer *dst_bitmap, int x, int y,
3994                                   int graphic, int sync_frame, int mask_mode)
3995 {
3996   int frame = getGraphicAnimationFrame(graphic, sync_frame);
3997
3998   if (mask_mode == USE_MASKING)
3999     DrawFixedGraphicThruMaskExt(dst_bitmap, x, y, graphic, frame);
4000   else
4001     DrawFixedGraphicExt(dst_bitmap, x, y, graphic, frame);
4002 }
4003
4004 void DrawSizedGraphicAnimationExt(DrawBuffer *dst_bitmap, int x, int y,
4005                                   int graphic, int sync_frame, int tilesize,
4006                                   int mask_mode)
4007 {
4008   int frame = getGraphicAnimationFrame(graphic, sync_frame);
4009
4010   if (mask_mode == USE_MASKING)
4011     DrawSizedGraphicThruMaskExt(dst_bitmap, x, y, graphic, frame, tilesize);
4012   else
4013     DrawSizedGraphicExt(dst_bitmap, x, y, graphic, frame, tilesize);
4014 }
4015
4016 static void DrawGraphicAnimation(int x, int y, int graphic)
4017 {
4018   int lx = LEVELX(x), ly = LEVELY(y);
4019   int mask_mode = NO_MASKING;
4020
4021   if (!IN_SCR_FIELD(x, y))
4022     return;
4023
4024   if (game.use_masked_elements)
4025   {
4026     if (Tile[lx][ly] != EL_EMPTY)
4027     {
4028       DrawScreenElementExt(x, y, 0, 0, EL_EMPTY, NO_CUTTING, NO_MASKING);
4029
4030       mask_mode = USE_MASKING;
4031     }
4032   }
4033
4034   DrawGraphicAnimationExt(drawto_field, FX + x * TILEX_VAR, FY + y * TILEY_VAR,
4035                           graphic, lx, ly, mask_mode);
4036
4037   MarkTileDirty(x, y);
4038 }
4039
4040 void DrawFixedGraphicAnimation(int x, int y, int graphic)
4041 {
4042   int lx = LEVELX(x), ly = LEVELY(y);
4043   int mask_mode = NO_MASKING;
4044
4045   if (!IN_SCR_FIELD(x, y))
4046     return;
4047
4048   if (game.use_masked_elements)
4049   {
4050     if (Tile[lx][ly] != EL_EMPTY)
4051     {
4052       DrawScreenElementExt(x, y, 0, 0, EL_EMPTY, NO_CUTTING, NO_MASKING);
4053
4054       mask_mode = USE_MASKING;
4055     }
4056   }
4057
4058   DrawGraphicAnimationExt(drawto_field, FX + x * TILEX, FY + y * TILEY,
4059                           graphic, lx, ly, mask_mode);
4060
4061   MarkTileDirty(x, y);
4062 }
4063
4064 void DrawLevelGraphicAnimation(int x, int y, int graphic)
4065 {
4066   DrawGraphicAnimation(SCREENX(x), SCREENY(y), graphic);
4067 }
4068
4069 void DrawLevelElementAnimation(int x, int y, int element)
4070 {
4071   int graphic = el_act_dir2img(element, GfxAction[x][y], GfxDir[x][y]);
4072
4073   DrawGraphicAnimation(SCREENX(x), SCREENY(y), graphic);
4074 }
4075
4076 void DrawLevelGraphicAnimationIfNeeded(int x, int y, int graphic)
4077 {
4078   int sx = SCREENX(x), sy = SCREENY(y);
4079
4080   if (!IN_LEV_FIELD(x, y) || !IN_SCR_FIELD(sx, sy))
4081     return;
4082
4083   if (Tile[x][y] == EL_EMPTY)
4084     graphic = el2img(GfxElementEmpty[x][y]);
4085
4086   if (!IS_NEW_FRAME(GfxFrame[x][y], graphic))
4087     return;
4088
4089   if (ANIM_MODE(graphic) & (ANIM_TILED | ANIM_RANDOM_STATIC))
4090     return;
4091
4092   DrawGraphicAnimation(sx, sy, graphic);
4093
4094 #if 1
4095   if (GFX_CRUMBLED(TILE_GFX_ELEMENT(x, y)))
4096     DrawLevelFieldCrumbled(x, y);
4097 #else
4098   if (GFX_CRUMBLED(Tile[x][y]))
4099     DrawLevelFieldCrumbled(x, y);
4100 #endif
4101 }
4102
4103 void DrawLevelElementAnimationIfNeeded(int x, int y, int element)
4104 {
4105   int sx = SCREENX(x), sy = SCREENY(y);
4106   int graphic;
4107
4108   if (!IN_LEV_FIELD(x, y) || !IN_SCR_FIELD(sx, sy))
4109     return;
4110
4111   graphic = el_act_dir2img(element, GfxAction[x][y], GfxDir[x][y]);
4112
4113   if (!IS_NEW_FRAME(GfxFrame[x][y], graphic))
4114     return;
4115
4116   DrawGraphicAnimation(sx, sy, graphic);
4117
4118   if (GFX_CRUMBLED(element))
4119     DrawLevelFieldCrumbled(x, y);
4120 }
4121
4122 static int getPlayerGraphic(struct PlayerInfo *player, int move_dir)
4123 {
4124   if (player->use_murphy)
4125   {
4126     // this works only because currently only one player can be "murphy" ...
4127     static int last_horizontal_dir = MV_LEFT;
4128     int graphic = el_act_dir2img(EL_SP_MURPHY, player->GfxAction, move_dir);
4129
4130     if (move_dir == MV_LEFT || move_dir == MV_RIGHT)
4131       last_horizontal_dir = move_dir;
4132
4133     if (graphic == IMG_SP_MURPHY)       // undefined => use special graphic
4134     {
4135       int direction = (player->is_snapping ? move_dir : last_horizontal_dir);
4136
4137       graphic = el_act_dir2img(EL_SP_MURPHY, player->GfxAction, direction);
4138     }
4139
4140     return graphic;
4141   }
4142   else
4143     return el_act_dir2img(player->artwork_element, player->GfxAction, move_dir);
4144 }
4145
4146 static boolean equalGraphics(int graphic1, int graphic2)
4147 {
4148   struct GraphicInfo *g1 = &graphic_info[graphic1];
4149   struct GraphicInfo *g2 = &graphic_info[graphic2];
4150
4151   return (g1->bitmap      == g2->bitmap &&
4152           g1->src_x       == g2->src_x &&
4153           g1->src_y       == g2->src_y &&
4154           g1->anim_frames == g2->anim_frames &&
4155           g1->anim_delay  == g2->anim_delay &&
4156           g1->anim_mode   == g2->anim_mode);
4157 }
4158
4159 #define DRAW_PLAYER_OVER_PUSHED_ELEMENT 1
4160
4161 enum
4162 {
4163   DRAW_PLAYER_STAGE_INIT = 0,
4164   DRAW_PLAYER_STAGE_LAST_FIELD,
4165   DRAW_PLAYER_STAGE_FIELD_UNDER_PLAYER,
4166 #if DRAW_PLAYER_OVER_PUSHED_ELEMENT
4167   DRAW_PLAYER_STAGE_ELEMENT_PUSHED,
4168   DRAW_PLAYER_STAGE_PLAYER,
4169 #else
4170   DRAW_PLAYER_STAGE_PLAYER,
4171   DRAW_PLAYER_STAGE_ELEMENT_PUSHED,
4172 #endif
4173   DRAW_PLAYER_STAGE_ELEMENT_OVER_PLAYER,
4174   DRAW_PLAYER_STAGE_FIELD_OVER_PLAYER,
4175
4176   NUM_DRAW_PLAYER_STAGES
4177 };
4178
4179 static void DrawPlayerExt(struct PlayerInfo *player, int drawing_stage)
4180 {
4181   static int static_last_player_graphic[MAX_PLAYERS];
4182   static int static_last_player_frame[MAX_PLAYERS];
4183   static boolean static_player_is_opaque[MAX_PLAYERS];
4184   static boolean draw_player[MAX_PLAYERS];
4185   int pnr = player->index_nr;
4186
4187   if (drawing_stage == DRAW_PLAYER_STAGE_INIT)
4188   {
4189     static_last_player_graphic[pnr] = getPlayerGraphic(player, player->MovDir);
4190     static_last_player_frame[pnr] = player->Frame;
4191     static_player_is_opaque[pnr] = FALSE;
4192
4193     draw_player[pnr] = TRUE;
4194   }
4195
4196   if (!draw_player[pnr])
4197     return;
4198
4199 #if DEBUG
4200   if (!IN_LEV_FIELD(player->jx, player->jy))
4201   {
4202     Debug("draw:DrawPlayerExt", "x = %d, y = %d", player->jx, player->jy);
4203     Debug("draw:DrawPlayerExt", "This should never happen!");
4204
4205     draw_player[pnr] = FALSE;
4206
4207     return;
4208   }
4209 #endif
4210
4211   int last_player_graphic  = static_last_player_graphic[pnr];
4212   int last_player_frame    = static_last_player_frame[pnr];
4213   boolean player_is_opaque = static_player_is_opaque[pnr];
4214
4215   int jx = player->jx;
4216   int jy = player->jy;
4217   int move_dir = (player->is_waiting ? player->dir_waiting : player->MovDir);
4218   int dx = (move_dir == MV_LEFT ? -1 : move_dir == MV_RIGHT ? +1 : 0);
4219   int dy = (move_dir == MV_UP   ? -1 : move_dir == MV_DOWN  ? +1 : 0);
4220   int last_jx = (player->is_moving ? jx - dx : jx);
4221   int last_jy = (player->is_moving ? jy - dy : jy);
4222   int next_jx = jx + dx;
4223   int next_jy = jy + dy;
4224   boolean player_is_moving = (player->MovPos != 0 ? TRUE : FALSE);
4225   int sx = SCREENX(jx);
4226   int sy = SCREENY(jy);
4227   int sxx = (move_dir == MV_LEFT || move_dir == MV_RIGHT ? player->GfxPos : 0);
4228   int syy = (move_dir == MV_UP   || move_dir == MV_DOWN  ? player->GfxPos : 0);
4229   int element = Tile[jx][jy];
4230   int last_element = Tile[last_jx][last_jy];
4231   int action = (player->is_pushing    ? ACTION_PUSHING         :
4232                 player->is_digging    ? ACTION_DIGGING         :
4233                 player->is_collecting ? ACTION_COLLECTING      :
4234                 player->is_moving     ? ACTION_MOVING          :
4235                 player->is_snapping   ? ACTION_SNAPPING        :
4236                 player->is_dropping   ? ACTION_DROPPING        :
4237                 player->is_waiting    ? player->action_waiting :
4238                 ACTION_DEFAULT);
4239
4240   if (drawing_stage == DRAW_PLAYER_STAGE_INIT)
4241   {
4242     // ------------------------------------------------------------------------
4243     // initialize drawing the player
4244     // ------------------------------------------------------------------------
4245
4246     draw_player[pnr] = FALSE;
4247
4248     // GfxElement[][] is set to the element the player is digging or collecting;
4249     // remove also for off-screen player if the player is not moving anymore
4250     if (IN_LEV_FIELD(jx, jy) && !player_is_moving)
4251       GfxElement[jx][jy] = EL_UNDEFINED;
4252
4253     if (!player->active || !IN_SCR_FIELD(SCREENX(last_jx), SCREENY(last_jy)))
4254       return;
4255
4256     if (element == EL_EXPLOSION)
4257       return;
4258
4259     InitPlayerGfxAnimation(player, action, move_dir);
4260
4261     draw_player[pnr] = TRUE;
4262   }
4263   else if (drawing_stage == DRAW_PLAYER_STAGE_LAST_FIELD)
4264   {
4265     // ------------------------------------------------------------------------
4266     // draw things in the field the player is leaving, if needed
4267     // ------------------------------------------------------------------------
4268
4269     if (!IN_SCR_FIELD(sx, sy))
4270       draw_player[pnr] = FALSE;
4271
4272     if (!player->is_moving)
4273       return;
4274
4275     if (Back[last_jx][last_jy] && IS_DRAWABLE(last_element))
4276     {
4277       DrawLevelElement(last_jx, last_jy, Back[last_jx][last_jy]);
4278
4279       if (last_element == EL_DYNAMITE_ACTIVE ||
4280           last_element == EL_EM_DYNAMITE_ACTIVE ||
4281           last_element == EL_SP_DISK_RED_ACTIVE)
4282         DrawDynamite(last_jx, last_jy);
4283       else
4284         DrawLevelFieldThruMask(last_jx, last_jy);
4285     }
4286     else if (last_element == EL_DYNAMITE_ACTIVE ||
4287              last_element == EL_EM_DYNAMITE_ACTIVE ||
4288              last_element == EL_SP_DISK_RED_ACTIVE)
4289       DrawDynamite(last_jx, last_jy);
4290     else
4291       DrawLevelField(last_jx, last_jy);
4292   }
4293   else if (drawing_stage == DRAW_PLAYER_STAGE_FIELD_UNDER_PLAYER)
4294   {
4295     // ------------------------------------------------------------------------
4296     // draw things behind the player, if needed
4297     // ------------------------------------------------------------------------
4298
4299     if (Back[jx][jy])
4300     {
4301       DrawLevelElement(jx, jy, Back[jx][jy]);
4302
4303       return;
4304     }
4305
4306     if (IS_ACTIVE_BOMB(element))
4307     {
4308       DrawLevelElement(jx, jy, EL_EMPTY);
4309
4310       return;
4311     }
4312
4313     if (player_is_moving && GfxElement[jx][jy] != EL_UNDEFINED)
4314     {
4315       int old_element = GfxElement[jx][jy];
4316       int old_graphic = el_act_dir2img(old_element, action, move_dir);
4317       int frame = getGraphicAnimationFrame(old_graphic, player->StepFrame);
4318
4319       if (GFX_CRUMBLED(old_element))
4320         DrawLevelFieldCrumbledDigging(jx, jy, move_dir, player->StepFrame);
4321       else
4322         DrawScreenGraphic(sx, sy, old_graphic, frame);
4323
4324       if (graphic_info[old_graphic].anim_mode & ANIM_OPAQUE_PLAYER)
4325         static_player_is_opaque[pnr] = TRUE;
4326     }
4327     else
4328     {
4329       GfxElement[jx][jy] = EL_UNDEFINED;
4330
4331       // make sure that pushed elements are drawn with correct frame rate
4332       int graphic = el_act_dir2img(element, ACTION_PUSHING, move_dir);
4333
4334       if (player->is_pushing && player->is_moving && !IS_ANIM_MODE_CE(graphic))
4335         GfxFrame[jx][jy] = player->StepFrame;
4336
4337       DrawLevelField(jx, jy);
4338     }
4339   }
4340   else if (drawing_stage == DRAW_PLAYER_STAGE_ELEMENT_PUSHED)
4341   {
4342     // ------------------------------------------------------------------------
4343     // draw things the player is pushing, if needed
4344     // ------------------------------------------------------------------------
4345
4346     if (!player->is_pushing || !player->is_moving)
4347       return;
4348
4349     if (Tile[next_jx][next_jy] == EL_EXPLOSION)
4350       return;
4351
4352     int gfx_frame = GfxFrame[jx][jy];
4353
4354     if (!IS_MOVING(jx, jy))             // push movement already finished
4355     {
4356       element = Tile[next_jx][next_jy];
4357       gfx_frame = GfxFrame[next_jx][next_jy];
4358     }
4359
4360     int graphic = el_act_dir2img(element, ACTION_PUSHING, move_dir);
4361     int sync_frame = (IS_ANIM_MODE_CE(graphic) ? gfx_frame : player->StepFrame);
4362     int frame = getGraphicAnimationFrame(graphic, sync_frame);
4363
4364     // draw background element under pushed element (like the Sokoban field)
4365     if (game.use_masked_pushing && IS_MOVING(jx, jy))
4366     {
4367       // this allows transparent pushing animation over non-black background
4368
4369       if (Back[jx][jy])
4370         DrawLevelElement(jx, jy, Back[jx][jy]);
4371       else
4372         DrawLevelElement(jx, jy, EL_EMPTY);
4373     }
4374
4375     if (Back[next_jx][next_jy])
4376       DrawLevelElement(next_jx, next_jy, Back[next_jx][next_jy]);
4377     else
4378       DrawLevelElement(next_jx, next_jy, EL_EMPTY);
4379
4380     int px = SCREENX(jx), py = SCREENY(jy);
4381     int pxx = (TILEX - ABS(sxx)) * dx;
4382     int pyy = (TILEY - ABS(syy)) * dy;
4383
4384 #if 1
4385     // do not draw (EM style) pushing animation when pushing is finished
4386     // (two-tile animations usually do not contain start and end frame)
4387     if (graphic_info[graphic].double_movement && !IS_MOVING(jx, jy))
4388       DrawLevelElement(next_jx, next_jy, Tile[next_jx][next_jy]);
4389     else
4390       DrawGraphicShiftedThruMask(px, py, pxx, pyy, graphic, frame, NO_CUTTING);
4391 #else
4392     // masked drawing is needed for EMC style (double) movement graphics
4393     // !!! (ONLY WHEN DRAWING PUSHED ELEMENT OVER THE PLAYER) !!!
4394     DrawGraphicShiftedThruMask(px, py, pxx, pyy, graphic, frame, NO_CUTTING);
4395 #endif
4396   }
4397   else if (drawing_stage == DRAW_PLAYER_STAGE_PLAYER)
4398   {
4399     // ------------------------------------------------------------------------
4400     // draw player himself
4401     // ------------------------------------------------------------------------
4402
4403     int graphic = getPlayerGraphic(player, move_dir);
4404
4405     // in the case of changed player action or direction, prevent the current
4406     // animation frame from being restarted for identical animations
4407     if (player->Frame == 0 && equalGraphics(graphic, last_player_graphic))
4408       player->Frame = last_player_frame;
4409
4410     int frame = getGraphicAnimationFrame(graphic, player->Frame);
4411
4412     if (player_is_opaque)
4413       DrawGraphicShifted(sx,sy, sxx,syy, graphic, frame, NO_CUTTING,NO_MASKING);
4414     else
4415       DrawGraphicShiftedThruMask(sx, sy, sxx, syy, graphic, frame, NO_CUTTING);
4416
4417     if (SHIELD_ON(player))
4418     {
4419       graphic = (player->shield_deadly_time_left ? IMG_SHIELD_DEADLY_ACTIVE :
4420                  IMG_SHIELD_NORMAL_ACTIVE);
4421       frame = getGraphicAnimationFrame(graphic, -1);
4422
4423       DrawGraphicShiftedThruMask(sx, sy, sxx, syy, graphic, frame, NO_CUTTING);
4424     }
4425   }
4426   else if (drawing_stage == DRAW_PLAYER_STAGE_ELEMENT_OVER_PLAYER)
4427   {
4428     // ------------------------------------------------------------------------
4429     // draw things in front of player (active dynamite or dynabombs)
4430     // ------------------------------------------------------------------------
4431
4432     if (IS_ACTIVE_BOMB(element))
4433     {
4434       int graphic = el2img(element);
4435       int frame = getGraphicAnimationFrameXY(graphic, jx, jy);
4436
4437       if (game.emulation == EMU_SUPAPLEX)
4438         DrawGraphic(sx, sy, IMG_SP_DISK_RED, frame);
4439       else
4440         DrawGraphicThruMask(sx, sy, graphic, frame);
4441     }
4442
4443     if (player_is_moving && last_element == EL_EXPLOSION)
4444     {
4445       int element = (GfxElement[last_jx][last_jy] != EL_UNDEFINED ?
4446                      GfxElement[last_jx][last_jy] :  EL_EMPTY);
4447       int graphic = el_act2img(element, ACTION_EXPLODING);
4448       int delay = (game.emulation == EMU_SUPAPLEX ? 3 : 2);
4449       int phase = ExplodePhase[last_jx][last_jy] - 1;
4450       int frame = getGraphicAnimationFrame(graphic, phase - delay);
4451
4452       if (phase >= delay)
4453         DrawGraphicThruMask(SCREENX(last_jx), SCREENY(last_jy), graphic, frame);
4454     }
4455   }
4456   else if (drawing_stage == DRAW_PLAYER_STAGE_FIELD_OVER_PLAYER)
4457   {
4458     // ------------------------------------------------------------------------
4459     // draw elements the player is just walking/passing through/under
4460     // ------------------------------------------------------------------------
4461
4462     if (player_is_moving)
4463     {
4464       // handle the field the player is leaving ...
4465       if (IS_ACCESSIBLE_INSIDE(last_element))
4466         DrawLevelField(last_jx, last_jy);
4467       else if (IS_ACCESSIBLE_UNDER(last_element))
4468         DrawLevelFieldThruMask(last_jx, last_jy);
4469     }
4470
4471     // do not redraw accessible elements if the player is just pushing them
4472     if (!player_is_moving || !player->is_pushing)
4473     {
4474       // ... and the field the player is entering
4475       if (IS_ACCESSIBLE_INSIDE(element))
4476         DrawLevelField(jx, jy);
4477       else if (IS_ACCESSIBLE_UNDER(element))
4478         DrawLevelFieldThruMask(jx, jy);
4479     }
4480
4481     MarkTileDirty(sx, sy);
4482   }
4483 }
4484
4485 void DrawPlayer(struct PlayerInfo *player)
4486 {
4487   int i;
4488
4489   for (i = 0; i < NUM_DRAW_PLAYER_STAGES; i++)
4490     DrawPlayerExt(player, i);
4491 }
4492
4493 void DrawAllPlayers(void)
4494 {
4495   int i, j;
4496
4497   for (i = 0; i < NUM_DRAW_PLAYER_STAGES; i++)
4498     for (j = 0; j < MAX_PLAYERS; j++)
4499       if (stored_player[j].active)
4500         DrawPlayerExt(&stored_player[j], i);
4501 }
4502
4503 void DrawPlayerField(int x, int y)
4504 {
4505   if (!IS_PLAYER(x, y))
4506     return;
4507
4508   DrawPlayer(PLAYERINFO(x, y));
4509 }
4510
4511 // ----------------------------------------------------------------------------
4512
4513 void WaitForEventToContinue(void)
4514 {
4515   boolean first_wait = TRUE;
4516   boolean still_wait = TRUE;
4517
4518   if (program.headless)
4519     return;
4520
4521   // simulate releasing mouse button over last gadget, if still pressed
4522   if (button_status)
4523     HandleGadgets(-1, -1, 0);
4524
4525   button_status = MB_RELEASED;
4526
4527   ClearEventQueue();
4528   ClearPlayerAction();
4529
4530   while (still_wait)
4531   {
4532     Event event;
4533
4534     if (NextValidEvent(&event))
4535     {
4536       switch (event.type)
4537       {
4538         case EVENT_BUTTONPRESS:
4539         case EVENT_FINGERPRESS:
4540           first_wait = FALSE;
4541           break;
4542
4543         case EVENT_BUTTONRELEASE:
4544         case EVENT_FINGERRELEASE:
4545           still_wait = first_wait;
4546           break;
4547
4548         case EVENT_KEYPRESS:
4549         case SDL_CONTROLLERBUTTONDOWN:
4550         case SDL_JOYBUTTONDOWN:
4551           still_wait = FALSE;
4552           break;
4553
4554         default:
4555           HandleOtherEvents(&event);
4556           break;
4557       }
4558     }
4559     else if (AnyJoystickButton() == JOY_BUTTON_NEW_PRESSED)
4560     {
4561       still_wait = FALSE;
4562     }
4563
4564     if (!PendingEvent())
4565       BackToFront();
4566   }
4567 }
4568
4569 static int RequestHandleEvents(unsigned int req_state, int draw_buffer_game)
4570 {
4571   boolean game_ended = (game_status == GAME_MODE_PLAYING && checkGameEnded());
4572   int draw_buffer_last = GetDrawtoField();
4573   int width  = request.width;
4574   int height = request.height;
4575   int sx, sy;
4576   int result;
4577
4578   setRequestPosition(&sx, &sy, FALSE);
4579
4580   button_status = MB_RELEASED;
4581
4582   request_gadget_id = -1;
4583   result = -1;
4584
4585   while (result < 0)
4586   {
4587     if (game_ended)
4588     {
4589       SetDrawtoField(draw_buffer_game);
4590
4591       HandleGameActions();
4592
4593       SetDrawtoField(DRAW_TO_BACKBUFFER);
4594     }
4595
4596     if (PendingEvent())
4597     {
4598       Event event;
4599
4600       while (NextValidEvent(&event))
4601       {
4602         switch (event.type)
4603         {
4604           case EVENT_BUTTONPRESS:
4605           case EVENT_BUTTONRELEASE:
4606           case EVENT_MOTIONNOTIFY:
4607           {
4608             DrawBuffer *drawto_last = drawto;
4609             int mx, my;
4610
4611             if (event.type == EVENT_MOTIONNOTIFY)
4612             {
4613               if (!button_status)
4614                 continue;
4615
4616               motion_status = TRUE;
4617               mx = ((MotionEvent *) &event)->x;
4618               my = ((MotionEvent *) &event)->y;
4619             }
4620             else
4621             {
4622               motion_status = FALSE;
4623               mx = ((ButtonEvent *) &event)->x;
4624               my = ((ButtonEvent *) &event)->y;
4625               if (event.type == EVENT_BUTTONPRESS)
4626                 button_status = ((ButtonEvent *) &event)->button;
4627               else
4628                 button_status = MB_RELEASED;
4629             }
4630
4631             if (global.use_envelope_request)
4632             {
4633               // draw changed button states to temporary bitmap
4634               drawto = bitmap_db_store_1;
4635             }
4636
4637             // this sets 'request_gadget_id'
4638             HandleGadgets(mx, my, button_status);
4639
4640             if (global.use_envelope_request)
4641             {
4642               // restore pointer to drawing buffer
4643               drawto = drawto_last;
4644
4645               // prepare complete envelope request from temporary bitmap
4646               PrepareEnvelopeRequestToScreen(bitmap_db_store_1, sx, sy,
4647                                              width, height);
4648             }
4649
4650             switch (request_gadget_id)
4651             {
4652               case TOOL_CTRL_ID_YES:
4653               case TOOL_CTRL_ID_TOUCH_YES:
4654                 result = TRUE;
4655                 break;
4656               case TOOL_CTRL_ID_NO:
4657               case TOOL_CTRL_ID_TOUCH_NO:
4658                 result = FALSE;
4659                 break;
4660               case TOOL_CTRL_ID_CONFIRM:
4661               case TOOL_CTRL_ID_TOUCH_CONFIRM:
4662                 result = TRUE | FALSE;
4663                 break;
4664
4665               case TOOL_CTRL_ID_PLAYER_1:
4666                 result = 1;
4667                 break;
4668               case TOOL_CTRL_ID_PLAYER_2:
4669                 result = 2;
4670                 break;
4671               case TOOL_CTRL_ID_PLAYER_3:
4672                 result = 3;
4673                 break;
4674               case TOOL_CTRL_ID_PLAYER_4:
4675                 result = 4;
4676                 break;
4677
4678               default:
4679                 break;
4680             }
4681
4682             // only needed to handle clickable pointer animations here
4683             HandleGlobalAnimClicks(mx, my, button_status, FALSE);
4684
4685             break;
4686           }
4687
4688           case SDL_WINDOWEVENT:
4689             HandleWindowEvent((WindowEvent *) &event);
4690             break;
4691
4692           case SDL_APP_WILLENTERBACKGROUND:
4693           case SDL_APP_DIDENTERBACKGROUND:
4694           case SDL_APP_WILLENTERFOREGROUND:
4695           case SDL_APP_DIDENTERFOREGROUND:
4696             HandlePauseResumeEvent((PauseResumeEvent *) &event);
4697             break;
4698
4699           case EVENT_KEYPRESS:
4700           {
4701             Key key = GetEventKey((KeyEvent *)&event);
4702
4703             switch (key)
4704             {
4705               case KSYM_space:
4706                 if (req_state & REQ_CONFIRM)
4707                   result = 1;
4708                 break;
4709
4710               case KSYM_Return:
4711               case KSYM_y:
4712               case KSYM_Y:
4713               case KSYM_Select:
4714               case KSYM_Menu:
4715 #if defined(KSYM_Rewind)
4716               case KSYM_Rewind:         // for Amazon Fire TV remote
4717 #endif
4718                 result = 1;
4719                 break;
4720
4721               case KSYM_Escape:
4722               case KSYM_n:
4723               case KSYM_N:
4724               case KSYM_Back:
4725 #if defined(KSYM_FastForward)
4726               case KSYM_FastForward:    // for Amazon Fire TV remote
4727 #endif
4728                 result = 0;
4729                 break;
4730
4731               default:
4732                 HandleKeysDebug(key, KEY_PRESSED);
4733                 break;
4734             }
4735
4736             if (req_state & REQ_PLAYER)
4737             {
4738               int old_player_nr = setup.network_player_nr;
4739
4740               if (result != -1)
4741                 result = old_player_nr + 1;
4742
4743               switch (key)
4744               {
4745                 case KSYM_space:
4746                   result = old_player_nr + 1;
4747                   break;
4748
4749                 case KSYM_Up:
4750                 case KSYM_1:
4751                   result = 1;
4752                   break;
4753
4754                 case KSYM_Right:
4755                 case KSYM_2:
4756                   result = 2;
4757                   break;
4758
4759                 case KSYM_Down:
4760                 case KSYM_3:
4761                   result = 3;
4762                   break;
4763
4764                 case KSYM_Left:
4765                 case KSYM_4:
4766                   result = 4;
4767                   break;
4768
4769                 default:
4770                   break;
4771               }
4772             }
4773
4774             break;
4775           }
4776
4777           case EVENT_FINGERRELEASE:
4778           case EVENT_KEYRELEASE:
4779             ClearPlayerAction();
4780             break;
4781
4782           case SDL_CONTROLLERBUTTONDOWN:
4783             switch (event.cbutton.button)
4784             {
4785               case SDL_CONTROLLER_BUTTON_A:
4786               case SDL_CONTROLLER_BUTTON_X:
4787               case SDL_CONTROLLER_BUTTON_LEFTSHOULDER:
4788               case SDL_CONTROLLER_BUTTON_LEFTSTICK:
4789                 result = 1;
4790                 break;
4791
4792               case SDL_CONTROLLER_BUTTON_B:
4793               case SDL_CONTROLLER_BUTTON_Y:
4794               case SDL_CONTROLLER_BUTTON_RIGHTSHOULDER:
4795               case SDL_CONTROLLER_BUTTON_RIGHTSTICK:
4796               case SDL_CONTROLLER_BUTTON_BACK:
4797                 result = 0;
4798                 break;
4799             }
4800
4801             if (req_state & REQ_PLAYER)
4802             {
4803               int old_player_nr = setup.network_player_nr;
4804
4805               if (result != -1)
4806                 result = old_player_nr + 1;
4807
4808               switch (event.cbutton.button)
4809               {
4810                 case SDL_CONTROLLER_BUTTON_DPAD_UP:
4811                 case SDL_CONTROLLER_BUTTON_Y:
4812                   result = 1;
4813                   break;
4814
4815                 case SDL_CONTROLLER_BUTTON_DPAD_RIGHT:
4816                 case SDL_CONTROLLER_BUTTON_B:
4817                   result = 2;
4818                   break;
4819
4820                 case SDL_CONTROLLER_BUTTON_DPAD_DOWN:
4821                 case SDL_CONTROLLER_BUTTON_A:
4822                   result = 3;
4823                   break;
4824
4825                 case SDL_CONTROLLER_BUTTON_DPAD_LEFT:
4826                 case SDL_CONTROLLER_BUTTON_X:
4827                   result = 4;
4828                   break;
4829
4830                 default:
4831                   break;
4832               }
4833             }
4834
4835             break;
4836
4837           case SDL_CONTROLLERBUTTONUP:
4838             HandleJoystickEvent(&event);
4839             ClearPlayerAction();
4840             break;
4841
4842           default:
4843             HandleOtherEvents(&event);
4844             break;
4845         }
4846       }
4847     }
4848     else if (AnyJoystickButton() == JOY_BUTTON_NEW_PRESSED)
4849     {
4850       int joy = AnyJoystick();
4851
4852       if (joy & JOY_BUTTON_1)
4853         result = 1;
4854       else if (joy & JOY_BUTTON_2)
4855         result = 0;
4856     }
4857     else if (AnyJoystick())
4858     {
4859       int joy = AnyJoystick();
4860
4861       if (req_state & REQ_PLAYER)
4862       {
4863         if (joy & JOY_UP)
4864           result = 1;
4865         else if (joy & JOY_RIGHT)
4866           result = 2;
4867         else if (joy & JOY_DOWN)
4868           result = 3;
4869         else if (joy & JOY_LEFT)
4870           result = 4;
4871       }
4872     }
4873
4874     BackToFront();
4875   }
4876
4877   SetDrawtoField(draw_buffer_last);
4878
4879   return result;
4880 }
4881
4882 static void DoRequestBefore(void)
4883 {
4884   boolean game_ended = (game_status == GAME_MODE_PLAYING && checkGameEnded());
4885
4886   // when showing request dialog after game ended, deactivate game panel
4887   if (game_ended)
4888     game.panel.active = FALSE;
4889
4890   if (game_status == GAME_MODE_PLAYING)
4891     BlitScreenToBitmap(backbuffer);
4892
4893   // disable deactivated drawing when quick-loading level tape recording
4894   if (tape.playing && tape.deactivate_display)
4895     TapeDeactivateDisplayOff(TRUE);
4896
4897   SetMouseCursor(CURSOR_DEFAULT);
4898
4899   // pause network game while waiting for request to answer
4900   if (network.enabled &&
4901       game_status == GAME_MODE_PLAYING &&
4902       !game.all_players_gone)
4903     SendToServer_PausePlaying();
4904
4905   // simulate releasing mouse button over last gadget, if still pressed
4906   if (button_status)
4907     HandleGadgets(-1, -1, 0);
4908
4909   UnmapAllGadgets();
4910 }
4911
4912 static void DoRequestAfter(void)
4913 {
4914   RemapAllGadgets();
4915
4916   if (game_status == GAME_MODE_PLAYING)
4917   {
4918     SetPanelBackground();
4919     SetDrawBackgroundMask(REDRAW_DOOR_1);
4920   }
4921   else
4922   {
4923     SetDrawBackgroundMask(REDRAW_FIELD);
4924   }
4925
4926   // continue network game after request
4927   if (network.enabled &&
4928       game_status == GAME_MODE_PLAYING &&
4929       !game.all_players_gone)
4930     SendToServer_ContinuePlaying();
4931
4932   // restore deactivated drawing when quick-loading level tape recording
4933   if (tape.playing && tape.deactivate_display)
4934     TapeDeactivateDisplayOn();
4935 }
4936
4937 static void setRequestDoorTextProperties(char *text,
4938                                          int text_spacing,
4939                                          int line_spacing,
4940                                          int *set_font_nr,
4941                                          int *set_max_lines,
4942                                          int *set_max_line_length)
4943 {
4944   struct RectWithBorder *vp_door_1 = &viewport.door_1[game_status];
4945   struct TextPosInfo *pos = &request.button.confirm;
4946   int button_ypos = pos->y;
4947   int font_nr = FONT_TEXT_2;
4948   int font_width = getFontWidth(font_nr);
4949   int font_height = getFontHeight(font_nr);
4950   int line_height = font_height + line_spacing;
4951   int max_text_width  = vp_door_1->width;
4952   int max_text_height = button_ypos - 2 * text_spacing;
4953   int max_line_length = max_text_width  / font_width;
4954   int max_lines       = max_text_height / line_height;
4955
4956   if (maxWordLengthInRequestString(text) > max_line_length)
4957   {
4958     font_nr = FONT_TEXT_1;
4959     font_width = getFontWidth(font_nr);
4960     max_line_length = max_text_width  / font_width;
4961   }
4962
4963   *set_font_nr = font_nr;
4964   *set_max_lines = max_lines;
4965   *set_max_line_length = max_line_length;
4966 }
4967
4968 static void DrawRequestDoorText(char *text)
4969 {
4970   char *text_ptr = text;
4971   int text_spacing = 8;
4972   int line_spacing = 2;
4973   int max_request_lines;
4974   int max_request_line_len;
4975   int font_nr;
4976   int ty;
4977
4978   // force DOOR font inside door area
4979   SetFontStatus(GAME_MODE_PSEUDO_DOOR);
4980
4981   setRequestDoorTextProperties(text, text_spacing, line_spacing, &font_nr,
4982                                &max_request_lines, &max_request_line_len);
4983
4984   for (text_ptr = text, ty = 0; ty < max_request_lines; ty++)
4985   {
4986     char text_line[max_request_line_len + 1];
4987     int tx, tl, tc = 0;
4988
4989     if (!*text_ptr)
4990       break;
4991
4992     for (tl = 0, tx = 0; tx < max_request_line_len; tl++, tx++)
4993     {
4994       tc = *(text_ptr + tx);
4995       if (!tc || tc == ' ' || tc == '?' || tc == '!')
4996         break;
4997     }
4998
4999     if ((tc == '?' || tc == '!') && tl == 0)
5000       tl = 1;
5001
5002     if (!tl)
5003     {
5004       text_ptr++;
5005       ty--;
5006       continue;
5007     }
5008
5009     strncpy(text_line, text_ptr, tl);
5010     text_line[tl] = 0;
5011
5012     DrawText(DX + (DXSIZE - tl * getFontWidth(font_nr)) / 2,
5013              DY + text_spacing + ty * (getFontHeight(font_nr) + line_spacing),
5014              text_line, font_nr);
5015
5016     text_ptr += tl + (tc == ' ' ? 1 : 0);
5017   }
5018
5019   ResetFontStatus();
5020 }
5021
5022 static int RequestDoor(char *text, unsigned int req_state)
5023 {
5024   unsigned int old_door_state = GetDoorState();
5025   int draw_buffer_last = GetDrawtoField();
5026   int result;
5027
5028   if (old_door_state & DOOR_OPEN_1)
5029   {
5030     CloseDoor(DOOR_CLOSE_1);
5031
5032     // save old door content
5033     BlitBitmap(bitmap_db_door_1, bitmap_db_door_1,
5034                0, 0, DXSIZE, DYSIZE, DXSIZE, 0);
5035   }
5036
5037   SetDoorBackgroundImage(IMG_BACKGROUND_DOOR);
5038   SetDrawBackgroundMask(REDRAW_FIELD | REDRAW_DOOR_1);
5039
5040   // clear door drawing field
5041   DrawBackground(DX, DY, DXSIZE, DYSIZE);
5042
5043   // write text for request
5044   DrawRequestDoorText(text);
5045
5046   MapToolButtons(req_state);
5047
5048   // copy request gadgets to door backbuffer
5049   BlitBitmap(drawto, bitmap_db_door_1, DX, DY, DXSIZE, DYSIZE, 0, 0);
5050
5051   OpenDoor(DOOR_OPEN_1);
5052
5053   // ---------- handle request buttons ----------
5054   result = RequestHandleEvents(req_state, draw_buffer_last);
5055
5056   UnmapToolButtons();
5057
5058   if (!(req_state & REQ_STAY_OPEN))
5059   {
5060     CloseDoor(DOOR_CLOSE_1);
5061
5062     if (((old_door_state & DOOR_OPEN_1) && !(req_state & REQ_STAY_CLOSED)) ||
5063         (req_state & REQ_REOPEN))
5064       OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
5065   }
5066
5067   return result;
5068 }
5069
5070 static int RequestEnvelope(char *text, unsigned int req_state)
5071 {
5072   int draw_buffer_last = GetDrawtoField();
5073   int result;
5074
5075   DrawEnvelopeRequest(text, req_state);
5076   ShowEnvelopeRequest(text, req_state, ACTION_OPENING);
5077
5078   // ---------- handle request buttons ----------
5079   result = RequestHandleEvents(req_state, draw_buffer_last);
5080
5081   UnmapToolButtons();
5082
5083   ShowEnvelopeRequest(text, req_state, ACTION_CLOSING);
5084
5085   return result;
5086 }
5087
5088 int Request(char *text, unsigned int req_state)
5089 {
5090   boolean overlay_enabled = GetOverlayEnabled();
5091   int result;
5092
5093   game.request_active = TRUE;
5094
5095   SetOverlayEnabled(FALSE);
5096
5097   DoRequestBefore();
5098
5099   if (global.use_envelope_request)
5100     result = RequestEnvelope(text, req_state);
5101   else
5102     result = RequestDoor(text, req_state);
5103
5104   DoRequestAfter();
5105
5106   SetOverlayEnabled(overlay_enabled);
5107
5108   game.request_active = FALSE;
5109
5110   return result;
5111 }
5112
5113 static int compareDoorPartOrderInfo(const void *object1, const void *object2)
5114 {
5115   const struct DoorPartOrderInfo *dpo1 = (struct DoorPartOrderInfo *)object1;
5116   const struct DoorPartOrderInfo *dpo2 = (struct DoorPartOrderInfo *)object2;
5117   int compare_result;
5118
5119   if (dpo1->sort_priority != dpo2->sort_priority)
5120     compare_result = dpo1->sort_priority - dpo2->sort_priority;
5121   else
5122     compare_result = dpo1->nr - dpo2->nr;
5123
5124   return compare_result;
5125 }
5126
5127 void InitGraphicCompatibilityInfo_Doors(void)
5128 {
5129   struct
5130   {
5131     int door_token;
5132     int part_1, part_8;
5133     struct DoorInfo *door;
5134   }
5135   doors[] =
5136   {
5137     { DOOR_1,   IMG_GFX_DOOR_1_PART_1,  IMG_GFX_DOOR_1_PART_8,  &door_1 },
5138     { DOOR_2,   IMG_GFX_DOOR_2_PART_1,  IMG_GFX_DOOR_2_PART_8,  &door_2 },
5139
5140     { -1,       -1,                     -1,                     NULL    }
5141   };
5142   struct Rect door_rect_list[] =
5143   {
5144     { DX, DY, DXSIZE, DYSIZE },
5145     { VX, VY, VXSIZE, VYSIZE }
5146   };
5147   int i, j;
5148
5149   for (i = 0; doors[i].door_token != -1; i++)
5150   {
5151     int door_token = doors[i].door_token;
5152     int door_index = DOOR_INDEX_FROM_TOKEN(door_token);
5153     int part_1 = doors[i].part_1;
5154     int part_8 = doors[i].part_8;
5155     int part_2 = part_1 + 1;
5156     int part_3 = part_1 + 2;
5157     struct DoorInfo *door = doors[i].door;
5158     struct Rect *door_rect = &door_rect_list[door_index];
5159     boolean door_gfx_redefined = FALSE;
5160
5161     // check if any door part graphic definitions have been redefined
5162
5163     for (j = 0; door_part_controls[j].door_token != -1; j++)
5164     {
5165       struct DoorPartControlInfo *dpc = &door_part_controls[j];
5166       struct FileInfo *fi = getImageListEntryFromImageID(dpc->graphic);
5167
5168       if (dpc->door_token == door_token && fi->redefined)
5169         door_gfx_redefined = TRUE;
5170     }
5171
5172     // check for old-style door graphic/animation modifications
5173
5174     if (!door_gfx_redefined)
5175     {
5176       if (door->anim_mode & ANIM_STATIC_PANEL)
5177       {
5178         door->panel.step_xoffset = 0;
5179         door->panel.step_yoffset = 0;
5180       }
5181
5182       if (door->anim_mode & (ANIM_HORIZONTAL | ANIM_VERTICAL))
5183       {
5184         struct GraphicInfo *g_part_1 = &graphic_info[part_1];
5185         struct GraphicInfo *g_part_2 = &graphic_info[part_2];
5186         int num_door_steps, num_panel_steps;
5187
5188         // remove door part graphics other than the two default wings
5189
5190         for (j = 0; door_part_controls[j].door_token != -1; j++)
5191         {
5192           struct DoorPartControlInfo *dpc = &door_part_controls[j];
5193           struct GraphicInfo *g = &graphic_info[dpc->graphic];
5194
5195           if (dpc->graphic >= part_3 &&
5196               dpc->graphic <= part_8)
5197             g->bitmap = NULL;
5198         }
5199
5200         // set graphics and screen positions of the default wings
5201
5202         g_part_1->width  = door_rect->width;
5203         g_part_1->height = door_rect->height;
5204         g_part_2->width  = door_rect->width;
5205         g_part_2->height = door_rect->height;
5206         g_part_2->src_x = door_rect->width;
5207         g_part_2->src_y = g_part_1->src_y;
5208
5209         door->part_2.x = door->part_1.x;
5210         door->part_2.y = door->part_1.y;
5211
5212         if (door->width != -1)
5213         {
5214           g_part_1->width = door->width;
5215           g_part_2->width = door->width;
5216
5217           // special treatment for graphics and screen position of right wing
5218           g_part_2->src_x += door_rect->width - door->width;
5219           door->part_2.x  += door_rect->width - door->width;
5220         }
5221
5222         if (door->height != -1)
5223         {
5224           g_part_1->height = door->height;
5225           g_part_2->height = door->height;
5226
5227           // special treatment for graphics and screen position of bottom wing
5228           g_part_2->src_y += door_rect->height - door->height;
5229           door->part_2.y  += door_rect->height - door->height;
5230         }
5231
5232         // set animation delays for the default wings and panels
5233
5234         door->part_1.step_delay = door->step_delay;
5235         door->part_2.step_delay = door->step_delay;
5236         door->panel.step_delay  = door->step_delay;
5237
5238         // set animation draw order for the default wings
5239
5240         door->part_1.sort_priority = 2; // draw left wing over ...
5241         door->part_2.sort_priority = 1; //          ... right wing
5242
5243         // set animation draw offset for the default wings
5244
5245         if (door->anim_mode & ANIM_HORIZONTAL)
5246         {
5247           door->part_1.step_xoffset = door->step_offset;
5248           door->part_1.step_yoffset = 0;
5249           door->part_2.step_xoffset = door->step_offset * -1;
5250           door->part_2.step_yoffset = 0;
5251
5252           num_door_steps = g_part_1->width / door->step_offset;
5253         }
5254         else    // ANIM_VERTICAL
5255         {
5256           door->part_1.step_xoffset = 0;
5257           door->part_1.step_yoffset = door->step_offset;
5258           door->part_2.step_xoffset = 0;
5259           door->part_2.step_yoffset = door->step_offset * -1;
5260
5261           num_door_steps = g_part_1->height / door->step_offset;
5262         }
5263
5264         // set animation draw offset for the default panels
5265
5266         if (door->step_offset > 1)
5267         {
5268           num_panel_steps = 2 * door_rect->height / door->step_offset;
5269           door->panel.start_step = num_panel_steps - num_door_steps;
5270           door->panel.start_step_closing = door->panel.start_step;
5271         }
5272         else
5273         {
5274           num_panel_steps = door_rect->height / door->step_offset;
5275           door->panel.start_step = num_panel_steps - num_door_steps / 2;
5276           door->panel.start_step_closing = door->panel.start_step;
5277           door->panel.step_delay *= 2;
5278         }
5279       }
5280     }
5281   }
5282 }
5283
5284 void InitDoors(void)
5285 {
5286   int i;
5287
5288   for (i = 0; door_part_controls[i].door_token != -1; i++)
5289   {
5290     struct DoorPartControlInfo *dpc = &door_part_controls[i];
5291     struct DoorPartOrderInfo *dpo = &door_part_order[i];
5292
5293     // initialize "start_step_opening" and "start_step_closing", if needed
5294     if (dpc->pos->start_step_opening == 0 &&
5295         dpc->pos->start_step_closing == 0)
5296     {
5297       // dpc->pos->start_step_opening = dpc->pos->start_step;
5298       dpc->pos->start_step_closing = dpc->pos->start_step;
5299     }
5300
5301     // fill structure for door part draw order (sorted below)
5302     dpo->nr = i;
5303     dpo->sort_priority = dpc->pos->sort_priority;
5304   }
5305
5306   // sort door part controls according to sort_priority and graphic number
5307   qsort(door_part_order, MAX_DOOR_PARTS,
5308         sizeof(struct DoorPartOrderInfo), compareDoorPartOrderInfo);
5309 }
5310
5311 unsigned int OpenDoor(unsigned int door_state)
5312 {
5313   if (door_state & DOOR_COPY_BACK)
5314   {
5315     if (door_state & DOOR_OPEN_1)
5316       BlitBitmap(bitmap_db_door_1, bitmap_db_door_1,
5317                  1 * DXSIZE, 0, DXSIZE, DYSIZE, 0 * DXSIZE, 0);
5318
5319     if (door_state & DOOR_OPEN_2)
5320       BlitBitmap(bitmap_db_door_2, bitmap_db_door_2,
5321                  1 * VXSIZE, 0, VXSIZE, VYSIZE, 0 * VXSIZE, 0);
5322
5323     door_state &= ~DOOR_COPY_BACK;
5324   }
5325
5326   return MoveDoor(door_state);
5327 }
5328
5329 unsigned int CloseDoor(unsigned int door_state)
5330 {
5331   unsigned int old_door_state = GetDoorState();
5332
5333   if (!(door_state & DOOR_NO_COPY_BACK))
5334   {
5335     if (old_door_state & DOOR_OPEN_1)
5336       BlitBitmap(backbuffer, bitmap_db_door_1,
5337                  DX, DY, DXSIZE, DYSIZE, 0, 0);
5338
5339     if (old_door_state & DOOR_OPEN_2)
5340       BlitBitmap(backbuffer, bitmap_db_door_2,
5341                  VX, VY, VXSIZE, VYSIZE, 0, 0);
5342
5343     door_state &= ~DOOR_NO_COPY_BACK;
5344   }
5345
5346   return MoveDoor(door_state);
5347 }
5348
5349 unsigned int GetDoorState(void)
5350 {
5351   return MoveDoor(DOOR_GET_STATE);
5352 }
5353
5354 unsigned int SetDoorState(unsigned int door_state)
5355 {
5356   return MoveDoor(door_state | DOOR_SET_STATE);
5357 }
5358
5359 static int euclid(int a, int b)
5360 {
5361   return (b ? euclid(b, a % b) : a);
5362 }
5363
5364 unsigned int MoveDoor(unsigned int door_state)
5365 {
5366   struct Rect door_rect_list[] =
5367   {
5368     { DX, DY, DXSIZE, DYSIZE },
5369     { VX, VY, VXSIZE, VYSIZE }
5370   };
5371   static int door1 = DOOR_CLOSE_1;
5372   static int door2 = DOOR_CLOSE_2;
5373   DelayCounter door_delay = { 0 };
5374   int i;
5375
5376   if (door_state == DOOR_GET_STATE)
5377     return (door1 | door2);
5378
5379   if (door_state & DOOR_SET_STATE)
5380   {
5381     if (door_state & DOOR_ACTION_1)
5382       door1 = door_state & DOOR_ACTION_1;
5383     if (door_state & DOOR_ACTION_2)
5384       door2 = door_state & DOOR_ACTION_2;
5385
5386     return (door1 | door2);
5387   }
5388
5389   if (!(door_state & DOOR_FORCE_REDRAW))
5390   {
5391     if (door1 == DOOR_OPEN_1 && door_state & DOOR_OPEN_1)
5392       door_state &= ~DOOR_OPEN_1;
5393     else if (door1 == DOOR_CLOSE_1 && door_state & DOOR_CLOSE_1)
5394       door_state &= ~DOOR_CLOSE_1;
5395     if (door2 == DOOR_OPEN_2 && door_state & DOOR_OPEN_2)
5396       door_state &= ~DOOR_OPEN_2;
5397     else if (door2 == DOOR_CLOSE_2 && door_state & DOOR_CLOSE_2)
5398       door_state &= ~DOOR_CLOSE_2;
5399   }
5400
5401   if (global.autoplay_leveldir)
5402   {
5403     door_state |= DOOR_NO_DELAY;
5404     door_state &= ~DOOR_CLOSE_ALL;
5405   }
5406
5407   if (game_status == GAME_MODE_EDITOR && !(door_state & DOOR_FORCE_ANIM))
5408     door_state |= DOOR_NO_DELAY;
5409
5410   if (door_state & DOOR_ACTION)
5411   {
5412     boolean game_ended = (game_status == GAME_MODE_PLAYING && checkGameEnded());
5413     boolean door_panel_drawn[NUM_DOORS];
5414     boolean panel_has_doors[NUM_DOORS];
5415     boolean door_part_skip[MAX_DOOR_PARTS];
5416     boolean door_part_done[MAX_DOOR_PARTS];
5417     boolean door_part_done_all;
5418     int num_steps[MAX_DOOR_PARTS];
5419     int max_move_delay = 0;     // delay for complete animations of all doors
5420     int max_step_delay = 0;     // delay (ms) between two animation frames
5421     int num_move_steps = 0;     // number of animation steps for all doors
5422     int max_move_delay_doors_only = 0;  // delay for doors only (no panel)
5423     int num_move_steps_doors_only = 0;  // steps for doors only (no panel)
5424     int start = 0;
5425     int k;
5426
5427     for (i = 0; i < NUM_DOORS; i++)
5428       panel_has_doors[i] = FALSE;
5429
5430     for (i = 0; i < MAX_DOOR_PARTS; i++)
5431     {
5432       struct DoorPartControlInfo *dpc = &door_part_controls[i];
5433       struct GraphicInfo *g = &graphic_info[dpc->graphic];
5434       int door_token = dpc->door_token;
5435
5436       door_part_done[i] = FALSE;
5437       door_part_skip[i] = (!(door_state & door_token) ||
5438                            !g->bitmap);
5439     }
5440
5441     for (i = 0; i < MAX_DOOR_PARTS; i++)
5442     {
5443       int nr = door_part_order[i].nr;
5444       struct DoorPartControlInfo *dpc = &door_part_controls[nr];
5445       struct DoorPartPosInfo *pos = dpc->pos;
5446       struct GraphicInfo *g = &graphic_info[dpc->graphic];
5447       int door_token = dpc->door_token;
5448       int door_index = DOOR_INDEX_FROM_TOKEN(door_token);
5449       boolean is_panel = DOOR_PART_IS_PANEL(nr);
5450       int step_xoffset = ABS(pos->step_xoffset);
5451       int step_yoffset = ABS(pos->step_yoffset);
5452       int step_delay = pos->step_delay;
5453       int current_door_state = door_state & door_token;
5454       boolean door_opening = ((current_door_state & DOOR_OPEN)  != 0);
5455       boolean door_closing = ((current_door_state & DOOR_CLOSE) != 0);
5456       boolean part_opening = (is_panel ? door_closing : door_opening);
5457       int start_step = (part_opening ? pos->start_step_opening :
5458                         pos->start_step_closing);
5459       float move_xsize = (step_xoffset ? g->width  : 0);
5460       float move_ysize = (step_yoffset ? g->height : 0);
5461       int move_xsteps = (step_xoffset ? ceil(move_xsize / step_xoffset) : 0);
5462       int move_ysteps = (step_yoffset ? ceil(move_ysize / step_yoffset) : 0);
5463       int move_steps = (move_xsteps && move_ysteps ?
5464                         MIN(move_xsteps, move_ysteps) :
5465                         move_xsteps ? move_xsteps : move_ysteps) - start_step;
5466       int move_delay = move_steps * step_delay;
5467
5468       if (door_part_skip[nr])
5469         continue;
5470
5471       max_move_delay = MAX(max_move_delay, move_delay);
5472       max_step_delay = (max_step_delay == 0 ? step_delay :
5473                         euclid(max_step_delay, step_delay));
5474       num_steps[nr] = move_steps;
5475
5476       if (!is_panel)
5477       {
5478         max_move_delay_doors_only = MAX(max_move_delay_doors_only, move_delay);
5479
5480         panel_has_doors[door_index] = TRUE;
5481       }
5482     }
5483
5484     max_step_delay = MAX(1, max_step_delay);    // prevent division by zero
5485
5486     num_move_steps = max_move_delay / max_step_delay;
5487     num_move_steps_doors_only = max_move_delay_doors_only / max_step_delay;
5488
5489     door_delay.value = max_step_delay;
5490
5491     if ((door_state & DOOR_NO_DELAY) || setup.quick_doors)
5492     {
5493       start = num_move_steps - 1;
5494     }
5495     else
5496     {
5497       // opening door sound has priority over simultaneously closing door
5498       if (door_state & (DOOR_OPEN_1 | DOOR_OPEN_2))
5499       {
5500         PlayMenuSoundStereo(SND_DOOR_OPENING, SOUND_MIDDLE);
5501
5502         if (door_state & DOOR_OPEN_1)
5503           PlayMenuSoundStereo(SND_DOOR_1_OPENING, SOUND_MIDDLE);
5504         if (door_state & DOOR_OPEN_2)
5505           PlayMenuSoundStereo(SND_DOOR_2_OPENING, SOUND_MIDDLE);
5506       }
5507       else if (door_state & (DOOR_CLOSE_1 | DOOR_CLOSE_2))
5508       {
5509         PlayMenuSoundStereo(SND_DOOR_CLOSING, SOUND_MIDDLE);
5510
5511         if (door_state & DOOR_CLOSE_1)
5512           PlayMenuSoundStereo(SND_DOOR_1_CLOSING, SOUND_MIDDLE);
5513         if (door_state & DOOR_CLOSE_2)
5514           PlayMenuSoundStereo(SND_DOOR_2_CLOSING, SOUND_MIDDLE);
5515       }
5516     }
5517
5518     for (k = start; k < num_move_steps; k++)
5519     {
5520       int last_frame = num_move_steps - 1;      // last frame of this "for" loop
5521
5522       door_part_done_all = TRUE;
5523
5524       for (i = 0; i < NUM_DOORS; i++)
5525         door_panel_drawn[i] = FALSE;
5526
5527       for (i = 0; i < MAX_DOOR_PARTS; i++)
5528       {
5529         int nr = door_part_order[i].nr;
5530         struct DoorPartControlInfo *dpc = &door_part_controls[nr];
5531         struct DoorPartPosInfo *pos = dpc->pos;
5532         struct GraphicInfo *g = &graphic_info[dpc->graphic];
5533         int door_token = dpc->door_token;
5534         int door_index = DOOR_INDEX_FROM_TOKEN(door_token);
5535         boolean is_panel = DOOR_PART_IS_PANEL(nr);
5536         boolean is_panel_and_door_has_closed = FALSE;
5537         struct Rect *door_rect = &door_rect_list[door_index];
5538         Bitmap *bitmap_db_door = (door_token == DOOR_1 ? bitmap_db_door_1 :
5539                                   bitmap_db_door_2);
5540         Bitmap *bitmap = (is_panel ? bitmap_db_door : g->bitmap);
5541         int current_door_state = door_state & door_token;
5542         boolean door_opening = ((current_door_state & DOOR_OPEN)  != 0);
5543         boolean door_closing = !door_opening;
5544         boolean part_opening = (is_panel ? door_closing : door_opening);
5545         boolean part_closing = !part_opening;
5546         int start_step = (part_opening ? pos->start_step_opening :
5547                           pos->start_step_closing);
5548         int step_delay = pos->step_delay;
5549         int step_factor = step_delay / max_step_delay;
5550         int k1 = (step_factor ? k / step_factor + 1 : k);
5551         int k2 = (part_opening ? k1 + start_step : num_steps[nr] - k1);
5552         int kk = MAX(0, k2);
5553         int g_src_x = 0;
5554         int g_src_y = 0;
5555         int src_x, src_y, src_xx, src_yy;
5556         int dst_x, dst_y, dst_xx, dst_yy;
5557         int width, height;
5558
5559         if (door_part_skip[nr])
5560           continue;
5561
5562         if (!(door_state & door_token))
5563           continue;
5564
5565         if (!g->bitmap)
5566           continue;
5567
5568         if (!is_panel)
5569         {
5570           int k2_door = (door_opening ? k : num_move_steps_doors_only - k - 1);
5571           int kk_door = MAX(0, k2_door);
5572           int sync_frame = kk_door * door_delay.value;
5573           int frame = getGraphicAnimationFrame(dpc->graphic, sync_frame);
5574
5575           getFixedGraphicSource(dpc->graphic, frame, &bitmap,
5576                                 &g_src_x, &g_src_y);
5577         }
5578
5579         // draw door panel
5580
5581         if (!door_panel_drawn[door_index])
5582         {
5583           ClearRectangleOnBackground(drawto, door_rect->x, door_rect->y,
5584                                      door_rect->width, door_rect->height);
5585
5586           door_panel_drawn[door_index] = TRUE;
5587         }
5588
5589         // draw opening or closing door parts
5590
5591         if (pos->step_xoffset < 0)      // door part on right side
5592         {
5593           src_xx = 0;
5594           dst_xx = pos->x + ABS(kk * pos->step_xoffset);
5595           width = g->width;
5596
5597           if (dst_xx + width > door_rect->width)
5598             width = door_rect->width - dst_xx;
5599         }
5600         else                            // door part on left side
5601         {
5602           src_xx = 0;
5603           dst_xx = pos->x - kk * pos->step_xoffset;
5604
5605           if (dst_xx < 0)
5606           {
5607             src_xx = ABS(dst_xx);
5608             dst_xx = 0;
5609           }
5610
5611           width = g->width - src_xx;
5612
5613           if (width > door_rect->width)
5614             width = door_rect->width;
5615
5616           // Debug("tools:MoveDoor", "k == %d [%d]", k, start_step);
5617         }
5618
5619         if (pos->step_yoffset < 0)      // door part on bottom side
5620         {
5621           src_yy = 0;
5622           dst_yy = pos->y + ABS(kk * pos->step_yoffset);
5623           height = g->height;
5624
5625           if (dst_yy + height > door_rect->height)
5626             height = door_rect->height - dst_yy;
5627         }
5628         else                            // door part on top side
5629         {
5630           src_yy = 0;
5631           dst_yy = pos->y - kk * pos->step_yoffset;
5632
5633           if (dst_yy < 0)
5634           {
5635             src_yy = ABS(dst_yy);
5636             dst_yy = 0;
5637           }
5638
5639           height = g->height - src_yy;
5640         }
5641
5642         src_x = g_src_x + src_xx;
5643         src_y = g_src_y + src_yy;
5644
5645         dst_x = door_rect->x + dst_xx;
5646         dst_y = door_rect->y + dst_yy;
5647
5648         is_panel_and_door_has_closed =
5649           (is_panel &&
5650            door_closing &&
5651            panel_has_doors[door_index] &&
5652            k >= num_move_steps_doors_only - 1);
5653
5654         if (width  >= 0 && width  <= g->width &&
5655             height >= 0 && height <= g->height &&
5656             !is_panel_and_door_has_closed)
5657         {
5658           if (is_panel || !pos->draw_masked)
5659             BlitBitmap(bitmap, drawto, src_x, src_y, width, height,
5660                        dst_x, dst_y);
5661           else
5662             BlitBitmapMasked(bitmap, drawto, src_x, src_y, width, height,
5663                              dst_x, dst_y);
5664         }
5665
5666         redraw_mask |= REDRAW_DOOR_FROM_TOKEN(door_token);
5667
5668         if ((part_opening && (width < 0         || height < 0)) ||
5669             (part_closing && (width >= g->width && height >= g->height)))
5670           door_part_done[nr] = TRUE;
5671
5672         // continue door part animations, but not panel after door has closed
5673         if (!door_part_done[nr] && !is_panel_and_door_has_closed)
5674           door_part_done_all = FALSE;
5675       }
5676
5677       if (!(door_state & DOOR_NO_DELAY))
5678       {
5679         if (game_ended)
5680           HandleGameActions();
5681
5682         BackToFront();
5683
5684         SkipUntilDelayReached(&door_delay, &k, last_frame);
5685
5686         // prevent OS (Windows) from complaining about program not responding
5687         CheckQuitEvent();
5688       }
5689
5690       if (door_part_done_all)
5691         break;
5692     }
5693
5694     if (!(door_state & DOOR_NO_DELAY))
5695     {
5696       // wait for specified door action post delay
5697       if (door_state & DOOR_ACTION_1 && door_state & DOOR_ACTION_2)
5698         door_delay.value = MAX(door_1.post_delay, door_2.post_delay);
5699       else if (door_state & DOOR_ACTION_1)
5700         door_delay.value = door_1.post_delay;
5701       else if (door_state & DOOR_ACTION_2)
5702         door_delay.value = door_2.post_delay;
5703
5704       while (!DelayReached(&door_delay))
5705       {
5706         if (game_ended)
5707           HandleGameActions();
5708
5709         BackToFront();
5710       }
5711     }
5712   }
5713
5714   if (door_state & DOOR_ACTION_1)
5715     door1 = door_state & DOOR_ACTION_1;
5716   if (door_state & DOOR_ACTION_2)
5717     door2 = door_state & DOOR_ACTION_2;
5718
5719   // draw masked border over door area
5720   DrawMaskedBorder(REDRAW_DOOR_1);
5721   DrawMaskedBorder(REDRAW_DOOR_2);
5722
5723   ClearAutoRepeatKeyEvents();
5724
5725   return (door1 | door2);
5726 }
5727
5728 static boolean useSpecialEditorDoor(void)
5729 {
5730   int graphic = IMG_GLOBAL_BORDER_EDITOR;
5731   boolean redefined = getImageListEntryFromImageID(graphic)->redefined;
5732
5733   // do not draw special editor door if editor border defined or redefined
5734   if (graphic_info[graphic].bitmap != NULL || redefined)
5735     return FALSE;
5736
5737   // do not draw special editor door if global border defined to be empty
5738   if (graphic_info[IMG_GLOBAL_BORDER].bitmap == NULL)
5739     return FALSE;
5740
5741   // do not draw special editor door if viewport definitions do not match
5742   if (EX != VX ||
5743       EY >= VY ||
5744       EXSIZE != VXSIZE ||
5745       EY + EYSIZE != VY + VYSIZE)
5746     return FALSE;
5747
5748   return TRUE;
5749 }
5750
5751 void DrawSpecialEditorDoor(void)
5752 {
5753   struct GraphicInfo *gfx1 = &graphic_info[IMG_DOOR_2_TOP_BORDER_CORRECTION];
5754   int top_border_width = gfx1->width;
5755   int top_border_height = gfx1->height;
5756   int outer_border = viewport.door_2[GAME_MODE_EDITOR].border_size;
5757   int ex = EX - outer_border;
5758   int ey = EY - outer_border;
5759   int vy = VY - outer_border;
5760   int exsize = EXSIZE + 2 * outer_border;
5761
5762   if (!useSpecialEditorDoor())
5763     return;
5764
5765   // draw bigger level editor toolbox window
5766   BlitBitmap(gfx1->bitmap, drawto, gfx1->src_x, gfx1->src_y,
5767              top_border_width, top_border_height, ex, ey - top_border_height);
5768   BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, drawto, ex, vy,
5769              exsize, EYSIZE - VYSIZE + outer_border, ex, ey);
5770
5771   redraw_mask |= REDRAW_ALL;
5772 }
5773
5774 void UndrawSpecialEditorDoor(void)
5775 {
5776   struct GraphicInfo *gfx1 = &graphic_info[IMG_DOOR_2_TOP_BORDER_CORRECTION];
5777   int top_border_width = gfx1->width;
5778   int top_border_height = gfx1->height;
5779   int outer_border = viewport.door_2[GAME_MODE_EDITOR].border_size;
5780   int ex = EX - outer_border;
5781   int ey = EY - outer_border;
5782   int ey_top = ey - top_border_height;
5783   int exsize = EXSIZE + 2 * outer_border;
5784   int eysize = EYSIZE + 2 * outer_border;
5785
5786   if (!useSpecialEditorDoor())
5787     return;
5788
5789   // draw normal tape recorder window
5790   if (graphic_info[IMG_GLOBAL_BORDER].bitmap)
5791   {
5792     BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, drawto,
5793                ex, ey_top, top_border_width, top_border_height,
5794                ex, ey_top);
5795     BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, drawto,
5796                ex, ey, exsize, eysize, ex, ey);
5797   }
5798   else
5799   {
5800     // if screen background is set to "[NONE]", clear editor toolbox window
5801     ClearRectangle(drawto, ex, ey_top, top_border_width, top_border_height);
5802     ClearRectangle(drawto, ex, ey, exsize, eysize);
5803   }
5804
5805   redraw_mask |= REDRAW_ALL;
5806 }
5807
5808
5809 // ---------- new tool button stuff -------------------------------------------
5810
5811 static struct
5812 {
5813   int graphic;
5814   struct TextPosInfo *pos;
5815   int gadget_id;
5816   boolean is_touch_button;
5817   char *infotext;
5818 } toolbutton_info[NUM_TOOL_BUTTONS] =
5819 {
5820   {
5821     IMG_GFX_REQUEST_BUTTON_YES,         &request.button.yes,
5822     TOOL_CTRL_ID_YES, FALSE,            "yes"
5823   },
5824   {
5825     IMG_GFX_REQUEST_BUTTON_NO,          &request.button.no,
5826     TOOL_CTRL_ID_NO, FALSE,             "no"
5827   },
5828   {
5829     IMG_GFX_REQUEST_BUTTON_CONFIRM,     &request.button.confirm,
5830     TOOL_CTRL_ID_CONFIRM, FALSE,        "confirm"
5831   },
5832   {
5833     IMG_GFX_REQUEST_BUTTON_PLAYER_1,    &request.button.player_1,
5834     TOOL_CTRL_ID_PLAYER_1, FALSE,       "player 1"
5835   },
5836   {
5837     IMG_GFX_REQUEST_BUTTON_PLAYER_2,    &request.button.player_2,
5838     TOOL_CTRL_ID_PLAYER_2, FALSE,       "player 2"
5839   },
5840   {
5841     IMG_GFX_REQUEST_BUTTON_PLAYER_3,    &request.button.player_3,
5842     TOOL_CTRL_ID_PLAYER_3, FALSE,       "player 3"
5843   },
5844   {
5845     IMG_GFX_REQUEST_BUTTON_PLAYER_4,    &request.button.player_4,
5846     TOOL_CTRL_ID_PLAYER_4, FALSE,       "player 4"
5847   },
5848   {
5849     IMG_GFX_REQUEST_BUTTON_TOUCH_YES,   &request.button.touch_yes,
5850     TOOL_CTRL_ID_TOUCH_YES, TRUE,       "yes"
5851   },
5852   {
5853     IMG_GFX_REQUEST_BUTTON_TOUCH_NO,    &request.button.touch_no,
5854     TOOL_CTRL_ID_TOUCH_NO, TRUE,        "no"
5855   },
5856   {
5857     IMG_GFX_REQUEST_BUTTON_TOUCH_CONFIRM, &request.button.touch_confirm,
5858     TOOL_CTRL_ID_TOUCH_CONFIRM, TRUE,   "confirm"
5859   }
5860 };
5861
5862 void CreateToolButtons(void)
5863 {
5864   int i;
5865
5866   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
5867   {
5868     int graphic = toolbutton_info[i].graphic;
5869     struct GraphicInfo *gfx = &graphic_info[graphic];
5870     struct TextPosInfo *pos = toolbutton_info[i].pos;
5871     struct GadgetInfo *gi;
5872     Bitmap *deco_bitmap = None;
5873     int deco_x = 0, deco_y = 0, deco_xpos = 0, deco_ypos = 0;
5874     unsigned int event_mask = GD_EVENT_RELEASED;
5875     boolean is_touch_button = toolbutton_info[i].is_touch_button;
5876     int base_x = (is_touch_button ? 0 : DX);
5877     int base_y = (is_touch_button ? 0 : DY);
5878     int gd_x = gfx->src_x;
5879     int gd_y = gfx->src_y;
5880     int gd_xp = gfx->src_x + gfx->pressed_xoffset;
5881     int gd_yp = gfx->src_y + gfx->pressed_yoffset;
5882     int x = pos->x;
5883     int y = pos->y;
5884     int id = i;
5885
5886     // do not use touch buttons if overlay touch buttons are disabled
5887     if (is_touch_button && !setup.touch.overlay_buttons)
5888       continue;
5889
5890     if (global.use_envelope_request && !is_touch_button)
5891     {
5892       setRequestPosition(&base_x, &base_y, TRUE);
5893
5894       // check if request buttons are outside of envelope and fix, if needed
5895       if (x < 0 || x + gfx->width  > request.width ||
5896           y < 0 || y + gfx->height > request.height)
5897       {
5898         if (id == TOOL_CTRL_ID_YES)
5899         {
5900           x = 0;
5901           y = request.height - 2 * request.border_size - gfx->height;
5902         }
5903         else if (id == TOOL_CTRL_ID_NO)
5904         {
5905           x = request.width  - 2 * request.border_size - gfx->width;
5906           y = request.height - 2 * request.border_size - gfx->height;
5907         }
5908         else if (id == TOOL_CTRL_ID_CONFIRM)
5909         {
5910           x = (request.width - 2 * request.border_size - gfx->width) / 2;
5911           y = request.height - 2 * request.border_size - gfx->height;
5912         }
5913         else if (id >= TOOL_CTRL_ID_PLAYER_1 && id <= TOOL_CTRL_ID_PLAYER_4)
5914         {
5915           int player_nr = id - TOOL_CTRL_ID_PLAYER_1;
5916
5917           x = (request.width - 2 * request.border_size - gfx->width) / 2;
5918           y = request.height - 2 * request.border_size - gfx->height * 2;
5919
5920           x += (player_nr == 3 ? -1 : player_nr == 1 ? +1 : 0) * gfx->width;
5921           y += (player_nr == 0 ? -1 : player_nr == 2 ? +1 : 0) * gfx->height;
5922         }
5923       }
5924     }
5925
5926     if (id >= TOOL_CTRL_ID_PLAYER_1 && id <= TOOL_CTRL_ID_PLAYER_4 &&
5927         pos->draw_player)
5928     {
5929       int player_nr = id - TOOL_CTRL_ID_PLAYER_1;
5930
5931       getSizedGraphicSource(PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0,
5932                             pos->size, &deco_bitmap, &deco_x, &deco_y);
5933       deco_xpos = (gfx->width  - pos->size) / 2;
5934       deco_ypos = (gfx->height - pos->size) / 2;
5935     }
5936
5937     gi = CreateGadget(GDI_CUSTOM_ID, id,
5938                       GDI_IMAGE_ID, graphic,
5939                       GDI_INFO_TEXT, toolbutton_info[i].infotext,
5940                       GDI_X, base_x + x,
5941                       GDI_Y, base_y + y,
5942                       GDI_WIDTH, gfx->width,
5943                       GDI_HEIGHT, gfx->height,
5944                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
5945                       GDI_STATE, GD_BUTTON_UNPRESSED,
5946                       GDI_DESIGN_UNPRESSED, gfx->bitmap, gd_x, gd_y,
5947                       GDI_DESIGN_PRESSED, gfx->bitmap, gd_xp, gd_yp,
5948                       GDI_DECORATION_DESIGN, deco_bitmap, deco_x, deco_y,
5949                       GDI_DECORATION_POSITION, deco_xpos, deco_ypos,
5950                       GDI_DECORATION_SIZE, pos->size, pos->size,
5951                       GDI_DECORATION_SHIFTING, 1, 1,
5952                       GDI_DIRECT_DRAW, FALSE,
5953                       GDI_OVERLAY_TOUCH_BUTTON, is_touch_button,
5954                       GDI_EVENT_MASK, event_mask,
5955                       GDI_CALLBACK_ACTION, HandleToolButtons,
5956                       GDI_END);
5957
5958     if (gi == NULL)
5959       Fail("cannot create gadget");
5960
5961     tool_gadget[id] = gi;
5962   }
5963 }
5964
5965 void FreeToolButtons(void)
5966 {
5967   int i;
5968
5969   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
5970     FreeGadget(tool_gadget[i]);
5971 }
5972
5973 static void MapToolButtons(unsigned int req_state)
5974 {
5975   if (req_state & REQ_ASK)
5976   {
5977     MapGadget(tool_gadget[TOOL_CTRL_ID_YES]);
5978     MapGadget(tool_gadget[TOOL_CTRL_ID_NO]);
5979     MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_YES]);
5980     MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_NO]);
5981   }
5982   else if (req_state & REQ_CONFIRM)
5983   {
5984     MapGadget(tool_gadget[TOOL_CTRL_ID_CONFIRM]);
5985     MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_CONFIRM]);
5986   }
5987   else if (req_state & REQ_PLAYER)
5988   {
5989     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_1]);
5990     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_2]);
5991     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_3]);
5992     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_4]);
5993   }
5994 }
5995
5996 static void UnmapToolButtons(void)
5997 {
5998   int i;
5999
6000   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
6001     UnmapGadget(tool_gadget[i]);
6002 }
6003
6004 static void HandleToolButtons(struct GadgetInfo *gi)
6005 {
6006   request_gadget_id = gi->custom_id;
6007 }
6008
6009 static struct Mapping_BD_to_RND_object
6010 {
6011   int element_bd;
6012   boolean is_rnd_to_bd_mapping;         // unique mapping BD <-> RND
6013
6014   int element_rnd;
6015   int action;
6016   int direction;
6017 }
6018 bd_object_mapping_list[] =
6019 {
6020   // additional RND style elements mapped to BD style elements (must be listed first)
6021
6022   {
6023     O_DIRT,                                     TRUE,
6024     EL_SAND,                                    -1, -1
6025   },
6026   {
6027     O_STONE,                                    TRUE,
6028     EL_BD_ROCK,                                 -1, -1
6029   },
6030   {
6031     O_BRICK,                                    TRUE,
6032     EL_BD_WALL,                                 -1, -1
6033   },
6034   {
6035     O_STEEL,                                    TRUE,
6036     EL_STEELWALL,                               -1, -1
6037   },
6038   {
6039     O_DIAMOND,                                  TRUE,
6040     EL_BD_DIAMOND,                              -1, -1
6041   },
6042   {
6043     O_INBOX,                                    TRUE,
6044     EL_PLAYER_1,                                -1, -1
6045   },
6046   {
6047     O_INBOX,                                    TRUE,
6048     EL_PLAYER_2,                                -1, -1
6049   },
6050   {
6051     O_INBOX,                                    TRUE,
6052     EL_PLAYER_3,                                -1, -1
6053   },
6054   {
6055     O_INBOX,                                    TRUE,
6056     EL_PLAYER_4,                                -1, -1
6057   },
6058   {
6059     O_PRE_OUTBOX,                               TRUE,
6060     EL_EXIT_CLOSED,                             -1, -1
6061   },
6062
6063   // BD style elements with their corresponding RND style elements
6064
6065   {
6066     O_SPACE,                                    TRUE,
6067     EL_EMPTY,                                   -1, -1
6068   },
6069   {
6070     O_DIRT,                                     TRUE,
6071     EL_BD_SAND,                                 -1, -1
6072   },
6073   {
6074     O_DIRT_SLOPED_UP_RIGHT,                     TRUE,
6075     EL_BD_SAND_SLOPED_UP_RIGHT,                 -1, -1
6076   },
6077   {
6078     O_DIRT_SLOPED_UP_LEFT,                      TRUE,
6079     EL_BD_SAND_SLOPED_UP_LEFT,                  -1, -1
6080   },
6081   {
6082     O_DIRT_SLOPED_DOWN_LEFT,                    TRUE,
6083     EL_BD_SAND_SLOPED_DOWN_LEFT,                -1, -1
6084   },
6085   {
6086     O_DIRT_SLOPED_DOWN_RIGHT,                   TRUE,
6087     EL_BD_SAND_SLOPED_DOWN_RIGHT,               -1, -1
6088   },
6089   {
6090     O_DIRT_BALL,                                TRUE,
6091     EL_BD_SAND_BALL,                            -1, -1
6092   },
6093   {
6094     O_DIRT_BALL_F,                              TRUE,
6095     EL_BD_SAND_BALL_FALLING,                    -1, -1
6096   },
6097   {
6098     O_DIRT_BALL_F,                              FALSE,
6099     EL_BD_SAND_BALL,                            ACTION_FALLING, -1
6100   },
6101   {
6102     O_DIRT_LOOSE,                               TRUE,
6103     EL_BD_SAND_LOOSE,                           -1, -1
6104   },
6105   {
6106     O_DIRT_LOOSE_F,                             TRUE,
6107     EL_BD_SAND_LOOSE_FALLING,                   -1, -1
6108   },
6109   {
6110     O_DIRT_LOOSE_F,                             FALSE,
6111     EL_BD_SAND_LOOSE,                           ACTION_FALLING, -1
6112   },
6113   {
6114     O_DIRT2,                                    TRUE,
6115     EL_BD_SAND_2,                               -1, -1
6116   },
6117   {
6118     O_BRICK,                                    TRUE,
6119     EL_BD_WALL,                                 -1, -1
6120   },
6121   {
6122     O_BRICK_SLOPED_UP_RIGHT,                    TRUE,
6123     EL_BD_WALL_SLOPED_UP_RIGHT,                 -1, -1
6124   },
6125   {
6126     O_BRICK_SLOPED_UP_LEFT,                     TRUE,
6127     EL_BD_WALL_SLOPED_UP_LEFT,                  -1, -1
6128   },
6129   {
6130     O_BRICK_SLOPED_DOWN_LEFT,                   TRUE,
6131     EL_BD_WALL_SLOPED_DOWN_LEFT,                -1, -1
6132   },
6133   {
6134     O_BRICK_SLOPED_DOWN_RIGHT,                  TRUE,
6135     EL_BD_WALL_SLOPED_DOWN_RIGHT,               -1, -1
6136   },
6137   {
6138     O_BRICK_NON_SLOPED,                         TRUE,
6139     EL_BD_WALL_NON_SLOPED,                      -1, -1
6140   },
6141   {
6142     O_MAGIC_WALL,                               TRUE,
6143     EL_BD_MAGIC_WALL,                           ACTION_ACTIVE, -1
6144   },
6145   {
6146     O_PRE_OUTBOX,                               TRUE,
6147     EL_BD_EXIT_CLOSED,                          -1, -1
6148   },
6149   {
6150     O_OUTBOX,                                   TRUE,
6151     EL_BD_EXIT_OPEN,                            -1, -1
6152   },
6153   {
6154     O_PRE_INVIS_OUTBOX,                         TRUE,
6155     EL_BD_INVISIBLE_EXIT_CLOSED,                -1, -1
6156   },
6157   {
6158     O_INVIS_OUTBOX,                             TRUE,
6159     EL_BD_INVISIBLE_EXIT_OPEN,                  -1, -1
6160   },
6161   {
6162     O_STEEL,                                    TRUE,
6163     EL_BD_STEELWALL,                            -1, -1
6164   },
6165   {
6166     O_STEEL_SLOPED_UP_RIGHT,                    TRUE,
6167     EL_BD_STEELWALL_SLOPED_UP_RIGHT,            -1, -1
6168   },
6169   {
6170     O_STEEL_SLOPED_UP_LEFT,                     TRUE,
6171     EL_BD_STEELWALL_SLOPED_UP_LEFT,             -1, -1
6172   },
6173   {
6174     O_STEEL_SLOPED_DOWN_LEFT,                   TRUE,
6175     EL_BD_STEELWALL_SLOPED_DOWN_LEFT,           -1, -1
6176   },
6177   {
6178     O_STEEL_SLOPED_DOWN_RIGHT,                  TRUE,
6179     EL_BD_STEELWALL_SLOPED_DOWN_RIGHT,          -1, -1
6180   },
6181   {
6182     O_STEEL_EXPLODABLE,                         TRUE,
6183     EL_BD_STEELWALL_EXPLODABLE,                 -1, -1
6184   },
6185   {
6186     O_STEEL_EATABLE,                            TRUE,
6187     EL_BD_STEELWALL_DIGGABLE,                   -1, -1
6188   },
6189   {
6190     O_BRICK_EATABLE,                            TRUE,
6191     EL_BD_WALL_DIGGABLE,                        -1, -1
6192   },
6193   {
6194     O_STONE,                                    TRUE,
6195     EL_BD_ROCK,                                 -1, -1
6196   },
6197   {
6198     O_STONE_F,                                  TRUE,
6199     EL_BD_ROCK_FALLING,                         -1, -1
6200   },
6201   {
6202     O_STONE_F,                                  FALSE,
6203     EL_BD_ROCK,                                 ACTION_FALLING, -1
6204   },
6205   {
6206     O_FLYING_STONE,                             TRUE,
6207     EL_BD_FLYING_ROCK,                          -1, -1
6208   },
6209   {
6210     O_FLYING_STONE_F,                           TRUE,
6211     EL_BD_FLYING_ROCK_FLYING,                   -1, -1
6212   },
6213   {
6214     O_FLYING_STONE_F,                           FALSE,
6215     EL_BD_FLYING_ROCK,                          ACTION_FLYING, -1
6216   },
6217   {
6218     O_MEGA_STONE,                               TRUE,
6219     EL_BD_MEGA_ROCK,                            -1, -1
6220   },
6221   {
6222     O_MEGA_STONE_F,                             TRUE,
6223     EL_BD_MEGA_ROCK_FALLING,                    -1, -1
6224   },
6225   {
6226     O_MEGA_STONE_F,                             FALSE,
6227     EL_BD_MEGA_ROCK,                            ACTION_FALLING, -1
6228   },
6229   {
6230     O_DIAMOND,                                  TRUE,
6231     EL_BD_DIAMOND,                              -1, -1
6232   },
6233   {
6234     O_DIAMOND_F,                                TRUE,
6235     EL_BD_DIAMOND_FALLING,                      -1, -1
6236   },
6237   {
6238     O_DIAMOND_F,                                FALSE,
6239     EL_BD_DIAMOND,                              ACTION_FALLING, -1
6240   },
6241   {
6242     O_FLYING_DIAMOND,                           TRUE,
6243     EL_BD_FLYING_DIAMOND,                       -1, -1
6244   },
6245   {
6246     O_FLYING_DIAMOND_F,                         TRUE,
6247     EL_BD_FLYING_DIAMOND_FLYING,                -1, -1
6248   },
6249   {
6250     O_FLYING_DIAMOND_F,                         FALSE,
6251     EL_BD_FLYING_DIAMOND,                       ACTION_FLYING, -1
6252   },
6253   {
6254     O_NUT,                                      TRUE,
6255     EL_BD_NUT,                                  -1, -1
6256   },
6257   {
6258     O_NUT_F,                                    TRUE,
6259     EL_BD_NUT_FALLING,                          -1, -1
6260   },
6261   {
6262     O_NUT_F,                                    FALSE,
6263     EL_BD_NUT,                                  ACTION_FALLING, -1
6264   },
6265   {
6266     O_BLADDER_SPENDER,                          TRUE,
6267     EL_BD_BLADDER_SPENDER,                      -1, -1
6268   },
6269   {
6270     O_INBOX,                                    TRUE,
6271     EL_BD_INBOX,                                -1, -1
6272   },
6273   {
6274     O_H_EXPANDING_WALL,                         TRUE,
6275     EL_BD_EXPANDABLE_WALL_HORIZONTAL,           -1, -1
6276   },
6277   {
6278     O_V_EXPANDING_WALL,                         TRUE,
6279     EL_BD_EXPANDABLE_WALL_VERTICAL,             -1, -1
6280   },
6281   {
6282     O_EXPANDING_WALL,                           TRUE,
6283     EL_BD_EXPANDABLE_WALL_ANY,                  -1, -1
6284   },
6285   {
6286     O_H_EXPANDING_STEEL_WALL,                   TRUE,
6287     EL_BD_EXPANDABLE_STEELWALL_HORIZONTAL,      -1, -1
6288   },
6289   {
6290     O_V_EXPANDING_STEEL_WALL,                   TRUE,
6291     EL_BD_EXPANDABLE_STEELWALL_VERTICAL,        -1, -1
6292   },
6293   {
6294     O_EXPANDING_STEEL_WALL,                     TRUE,
6295     EL_BD_EXPANDABLE_STEELWALL_ANY,             -1, -1
6296   },
6297   {
6298     O_EXPANDING_WALL_SWITCH,                    TRUE,
6299     EL_BD_EXPANDABLE_WALL_SWITCH,               -1, -1
6300   },
6301   {
6302     O_CREATURE_SWITCH,                          TRUE,
6303     EL_BD_CREATURE_SWITCH,                      -1, -1
6304   },
6305   {
6306     O_BITER_SWITCH,                             TRUE,
6307     EL_BD_BITER_SWITCH_1,                       -1, -1
6308   },
6309   {
6310     O_REPLICATOR_SWITCH,                        TRUE,
6311     EL_BD_REPLICATOR_SWITCH,                    -1, -1
6312   },
6313   {
6314     O_CONVEYOR_SWITCH,                          TRUE,
6315     EL_BD_CONVEYOR_SWITCH,                      -1, -1
6316   },
6317   {
6318     O_CONVEYOR_DIR_SWITCH,                      TRUE,
6319     EL_BD_CONVEYOR_DIR_SWITCH,                  -1, -1
6320   },
6321   {
6322     O_ACID,                                     TRUE,
6323     EL_BD_ACID,                                 -1, -1
6324   },
6325   {
6326     O_FALLING_WALL,                             TRUE,
6327     EL_BD_FALLING_WALL,                         -1, -1
6328   },
6329   {
6330     O_FALLING_WALL_F,                           TRUE,
6331     EL_BD_FALLING_WALL_FALLING,                 -1, -1
6332   },
6333   {
6334     O_FALLING_WALL_F,                           FALSE,
6335     EL_BD_FALLING_WALL,                         ACTION_FALLING, -1
6336   },
6337   {
6338     O_BOX,                                      TRUE,
6339     EL_BD_BOX,                                  -1, -1
6340   },
6341   {
6342     O_TIME_PENALTY,                             TRUE,
6343     EL_BD_TIME_PENALTY,                         -1, -1
6344   },
6345   {
6346     O_GRAVESTONE,                               TRUE,
6347     EL_BD_GRAVESTONE,                           -1, -1
6348   },
6349   {
6350     O_STONE_GLUED,                              TRUE,
6351     EL_BD_ROCK_GLUED,                           -1, -1
6352   },
6353   {
6354     O_DIAMOND_GLUED,                            TRUE,
6355     EL_BD_DIAMOND_GLUED,                        -1, -1
6356   },
6357   {
6358     O_DIAMOND_KEY,                              TRUE,
6359     EL_BD_DIAMOND_KEY,                          -1, -1
6360   },
6361   {
6362     O_TRAPPED_DIAMOND,                          TRUE,
6363     EL_BD_TRAPPED_DIAMOND,                      -1, -1
6364   },
6365   {
6366     O_CLOCK,                                    TRUE,
6367     EL_BD_CLOCK,                                -1, -1
6368   },
6369   {
6370     O_DIRT_GLUED,                               TRUE,
6371     EL_BD_SAND_GLUED,                           -1, -1
6372   },
6373   {
6374     O_KEY_1,                                    TRUE,
6375     EL_BD_KEY_1,                                -1, -1
6376   },
6377   {
6378     O_KEY_2,                                    TRUE,
6379     EL_BD_KEY_2,                                -1, -1
6380   },
6381   {
6382     O_KEY_3,                                    TRUE,
6383     EL_BD_KEY_3,                                -1, -1
6384   },
6385   {
6386     O_DOOR_1,                                   TRUE,
6387     EL_BD_GATE_1,                               -1, -1
6388   },
6389   {
6390     O_DOOR_2,                                   TRUE,
6391     EL_BD_GATE_2,                               -1, -1
6392   },
6393   {
6394     O_DOOR_3,                                   TRUE,
6395     EL_BD_GATE_3,                               -1, -1
6396   },
6397   {
6398     O_POT,                                      TRUE,
6399     EL_BD_POT,                                  -1, -1
6400   },
6401   {
6402     O_GRAVITY_SWITCH,                           TRUE,
6403     EL_BD_GRAVITY_SWITCH,                       -1, -1
6404   },
6405   {
6406     O_PNEUMATIC_HAMMER,                         TRUE,
6407     EL_BD_PNEUMATIC_HAMMER,                     -1, -1
6408   },
6409   {
6410     O_TELEPORTER,                               TRUE,
6411     EL_BD_TELEPORTER,                           -1, -1
6412   },
6413   {
6414     O_SKELETON,                                 TRUE,
6415     EL_BD_SKELETON,                             -1, -1
6416   },
6417   {
6418     O_WATER,                                    TRUE,
6419     EL_BD_WATER,                                -1, -1
6420   },
6421   {
6422     O_WATER_1,                                  TRUE,
6423     EL_BD_WATER_1,                              -1, -1
6424   },
6425   {
6426     O_WATER_1,                                  FALSE,
6427     EL_BD_WATER,                                -1, -1
6428   },
6429   {
6430     O_WATER_2,                                  TRUE,
6431     EL_BD_WATER_2,                              -1, -1
6432   },
6433   {
6434     O_WATER_2,                                  FALSE,
6435     EL_BD_WATER,                                -1, -1
6436   },
6437   {
6438     O_WATER_3,                                  TRUE,
6439     EL_BD_WATER_3,                              -1, -1
6440   },
6441   {
6442     O_WATER_3,                                  FALSE,
6443     EL_BD_WATER,                                -1, -1
6444   },
6445   {
6446     O_WATER_4,                                  TRUE,
6447     EL_BD_WATER_4,                              -1, -1
6448   },
6449   {
6450     O_WATER_4,                                  FALSE,
6451     EL_BD_WATER,                                -1, -1
6452   },
6453   {
6454     O_WATER_5,                                  TRUE,
6455     EL_BD_WATER_5,                              -1, -1
6456   },
6457   {
6458     O_WATER_5,                                  FALSE,
6459     EL_BD_WATER,                                -1, -1
6460   },
6461   {
6462     O_WATER_6,                                  TRUE,
6463     EL_BD_WATER_6,                              -1, -1
6464   },
6465   {
6466     O_WATER_6,                                  FALSE,
6467     EL_BD_WATER,                                -1, -1
6468   },
6469   {
6470     O_WATER_7,                                  TRUE,
6471     EL_BD_WATER_7,                              -1, -1
6472   },
6473   {
6474     O_WATER_7,                                  FALSE,
6475     EL_BD_WATER,                                -1, -1
6476   },
6477   {
6478     O_WATER_8,                                  TRUE,
6479     EL_BD_WATER_8,                              -1, -1
6480   },
6481   {
6482     O_WATER_8,                                  FALSE,
6483     EL_BD_WATER,                                -1, -1
6484   },
6485   {
6486     O_WATER_9,                                  TRUE,
6487     EL_BD_WATER_9,                              -1, -1
6488   },
6489   {
6490     O_WATER_9,                                  FALSE,
6491     EL_BD_WATER,                                -1, -1
6492   },
6493   {
6494     O_WATER_10,                                 TRUE,
6495     EL_BD_WATER_10,                             -1, -1
6496   },
6497   {
6498     O_WATER_10,                                 FALSE,
6499     EL_BD_WATER,                                -1, -1
6500   },
6501   {
6502     O_WATER_11,                                 TRUE,
6503     EL_BD_WATER_11,                             -1, -1
6504   },
6505   {
6506     O_WATER_11,                                 FALSE,
6507     EL_BD_WATER,                                -1, -1
6508   },
6509   {
6510     O_WATER_12,                                 TRUE,
6511     EL_BD_WATER_12,                             -1, -1
6512   },
6513   {
6514     O_WATER_12,                                 FALSE,
6515     EL_BD_WATER,                                -1, -1
6516   },
6517   {
6518     O_WATER_13,                                 TRUE,
6519     EL_BD_WATER_13,                             -1, -1
6520   },
6521   {
6522     O_WATER_13,                                 FALSE,
6523     EL_BD_WATER,                                -1, -1
6524   },
6525   {
6526     O_WATER_14,                                 TRUE,
6527     EL_BD_WATER_14,                             -1, -1
6528   },
6529   {
6530     O_WATER_14,                                 FALSE,
6531     EL_BD_WATER,                                -1, -1
6532   },
6533   {
6534     O_WATER_15,                                 TRUE,
6535     EL_BD_WATER_15,                             -1, -1
6536   },
6537   {
6538     O_WATER_15,                                 FALSE,
6539     EL_BD_WATER,                                -1, -1
6540   },
6541   {
6542     O_WATER_16,                                 TRUE,
6543     EL_BD_WATER_16,                             -1, -1
6544   },
6545   {
6546     O_WATER_16,                                 FALSE,
6547     EL_BD_WATER,                                -1, -1
6548   },
6549   {
6550     O_COW_1,                                    TRUE,
6551     EL_BD_COW_LEFT,                             -1, -1
6552   },
6553   {
6554     O_COW_2,                                    TRUE,
6555     EL_BD_COW_UP,                               -1, -1
6556   },
6557   {
6558     O_COW_3,                                    TRUE,
6559     EL_BD_COW_RIGHT,                            -1, -1
6560   },
6561   {
6562     O_COW_4,                                    TRUE,
6563     EL_BD_COW_DOWN,                             -1, -1
6564   },
6565   {
6566     O_COW_ENCLOSED_1,                           TRUE,
6567     EL_BD_COW_ENCLOSED_1,                       -1, -1
6568   },
6569   {
6570     O_COW_ENCLOSED_1,                           FALSE,
6571     EL_BD_COW_DOWN,                             -1, -1
6572   },
6573   {
6574     O_COW_ENCLOSED_2,                           TRUE,
6575     EL_BD_COW_ENCLOSED_2,                       -1, -1
6576   },
6577   {
6578     O_COW_ENCLOSED_2,                           FALSE,
6579     EL_BD_COW_DOWN,                             -1, -1
6580   },
6581   {
6582     O_COW_ENCLOSED_3,                           TRUE,
6583     EL_BD_COW_ENCLOSED_3,                       -1, -1
6584   },
6585   {
6586     O_COW_ENCLOSED_3,                           FALSE,
6587     EL_BD_COW_DOWN,                             -1, -1
6588   },
6589   {
6590     O_COW_ENCLOSED_4,                           TRUE,
6591     EL_BD_COW_ENCLOSED_4,                       -1, -1
6592   },
6593   {
6594     O_COW_ENCLOSED_4,                           FALSE,
6595     EL_BD_COW_DOWN,                             -1, -1
6596   },
6597   {
6598     O_COW_ENCLOSED_5,                           TRUE,
6599     EL_BD_COW_ENCLOSED_5,                       -1, -1
6600   },
6601   {
6602     O_COW_ENCLOSED_5,                           FALSE,
6603     EL_BD_COW_DOWN,                             -1, -1
6604   },
6605   {
6606     O_COW_ENCLOSED_6,                           TRUE,
6607     EL_BD_COW_ENCLOSED_6,                       -1, -1
6608   },
6609   {
6610     O_COW_ENCLOSED_6,                           FALSE,
6611     EL_BD_COW_DOWN,                             -1, -1
6612   },
6613   {
6614     O_COW_ENCLOSED_7,                           TRUE,
6615     EL_BD_COW_ENCLOSED_7,                       -1, -1
6616   },
6617   {
6618     O_COW_ENCLOSED_7,                           FALSE,
6619     EL_BD_COW_DOWN,                             -1, -1
6620   },
6621   {
6622     O_WALLED_DIAMOND,                           TRUE,
6623     EL_BD_WALL_DIAMOND,                         -1, -1
6624   },
6625   {
6626     O_WALLED_KEY_1,                             TRUE,
6627     EL_BD_WALL_KEY_1,                           -1, -1
6628   },
6629   {
6630     O_WALLED_KEY_2,                             TRUE,
6631     EL_BD_WALL_KEY_2,                           -1, -1
6632   },
6633   {
6634     O_WALLED_KEY_3,                             TRUE,
6635     EL_BD_WALL_KEY_3,                           -1, -1
6636   },
6637   {
6638     O_AMOEBA,                                   TRUE,
6639     EL_BD_AMOEBA,                               -1, -1
6640   },
6641   {
6642     O_AMOEBA_2,                                 TRUE,
6643     EL_BD_AMOEBA_2,                             -1, -1
6644   },
6645   {
6646     O_REPLICATOR,                               TRUE,
6647     EL_BD_REPLICATOR,                           -1, -1
6648   },
6649   {
6650     O_CONVEYOR_LEFT,                            TRUE,
6651     EL_BD_CONVEYOR_LEFT,                        -1, -1
6652   },
6653   {
6654     O_CONVEYOR_RIGHT,                           TRUE,
6655     EL_BD_CONVEYOR_RIGHT,                       -1, -1
6656   },
6657   {
6658     O_LAVA,                                     TRUE,
6659     EL_BD_LAVA,                                 -1, -1
6660   },
6661   {
6662     O_SWEET,                                    TRUE,
6663     EL_BD_SWEET,                                -1, -1
6664   },
6665   {
6666     O_VOODOO,                                   TRUE,
6667     EL_BD_VOODOO_DOLL,                          -1, -1
6668   },
6669   {
6670     O_SLIME,                                    TRUE,
6671     EL_BD_SLIME,                                -1, -1
6672   },
6673   {
6674     O_BLADDER,                                  TRUE,
6675     EL_BD_BLADDER,                              -1, -1
6676   },
6677   {
6678     O_BLADDER_1,                                TRUE,
6679     EL_BD_BLADDER_1,                            -1, -1
6680   },
6681   {
6682     O_BLADDER_1,                                FALSE,
6683     EL_BD_BLADDER,                              -1, -1
6684   },
6685   {
6686     O_BLADDER_2,                                TRUE,
6687     EL_BD_BLADDER_2,                            -1, -1
6688   },
6689   {
6690     O_BLADDER_2,                                FALSE,
6691     EL_BD_BLADDER,                              -1, -1
6692   },
6693   {
6694     O_BLADDER_3,                                TRUE,
6695     EL_BD_BLADDER_3,                            -1, -1
6696   },
6697   {
6698     O_BLADDER_3,                                FALSE,
6699     EL_BD_BLADDER,                              -1, -1
6700   },
6701   {
6702     O_BLADDER_4,                                TRUE,
6703     EL_BD_BLADDER_4,                            -1, -1
6704   },
6705   {
6706     O_BLADDER_4,                                FALSE,
6707     EL_BD_BLADDER,                              -1, -1
6708   },
6709   {
6710     O_BLADDER_5,                                TRUE,
6711     EL_BD_BLADDER_5,                            -1, -1
6712   },
6713   {
6714     O_BLADDER_5,                                FALSE,
6715     EL_BD_BLADDER,                              -1, -1
6716   },
6717   {
6718     O_BLADDER_6,                                TRUE,
6719     EL_BD_BLADDER_6,                            -1, -1
6720   },
6721   {
6722     O_BLADDER_6,                                FALSE,
6723     EL_BD_BLADDER,                              -1, -1
6724   },
6725   {
6726     O_BLADDER_7,                                TRUE,
6727     EL_BD_BLADDER_7,                            -1, -1
6728   },
6729   {
6730     O_BLADDER_7,                                FALSE,
6731     EL_BD_BLADDER,                              -1, -1
6732   },
6733   {
6734     O_BLADDER_8,                                TRUE,
6735     EL_BD_BLADDER_8,                            -1, -1
6736   },
6737   {
6738     O_BLADDER_8,                                FALSE,
6739     EL_BD_BLADDER,                              -1, -1
6740   },
6741   {
6742     O_WAITING_STONE,                            TRUE,
6743     EL_BD_WAITING_ROCK,                         -1, -1
6744   },
6745   {
6746     O_CHASING_STONE,                            TRUE,
6747     EL_BD_CHASING_ROCK,                         -1, -1
6748   },
6749   {
6750     O_GHOST,                                    TRUE,
6751     EL_BD_GHOST,                                -1, -1
6752   },
6753   {
6754     O_FIREFLY_1,                                TRUE,
6755     EL_BD_FIREFLY_LEFT,                         -1, -1
6756   },
6757   {
6758     O_FIREFLY_2,                                TRUE,
6759     EL_BD_FIREFLY_UP,                           -1, -1
6760   },
6761   {
6762     O_FIREFLY_3,                                TRUE,
6763     EL_BD_FIREFLY_RIGHT,                        -1, -1
6764   },
6765   {
6766     O_FIREFLY_4,                                TRUE,
6767     EL_BD_FIREFLY_DOWN,                         -1, -1
6768   },
6769   {
6770     O_ALT_FIREFLY_1,                            TRUE,
6771     EL_BD_FIREFLY_2_LEFT,                       -1, -1
6772   },
6773   {
6774     O_ALT_FIREFLY_2,                            TRUE,
6775     EL_BD_FIREFLY_2_UP,                         -1, -1
6776   },
6777   {
6778     O_ALT_FIREFLY_3,                            TRUE,
6779     EL_BD_FIREFLY_2_RIGHT,                      -1, -1
6780   },
6781   {
6782     O_ALT_FIREFLY_4,                            TRUE,
6783     EL_BD_FIREFLY_2_DOWN,                       -1, -1
6784   },
6785   {
6786     O_BUTTER_1,                                 TRUE,
6787     EL_BD_BUTTERFLY_LEFT,                       -1, -1
6788   },
6789   {
6790     O_BUTTER_2,                                 TRUE,
6791     EL_BD_BUTTERFLY_UP,                         -1, -1
6792   },
6793   {
6794     O_BUTTER_3,                                 TRUE,
6795     EL_BD_BUTTERFLY_RIGHT,                      -1, -1
6796   },
6797   {
6798     O_BUTTER_4,                                 TRUE,
6799     EL_BD_BUTTERFLY_DOWN,                       -1, -1
6800   },
6801   {
6802     O_ALT_BUTTER_1,                             TRUE,
6803     EL_BD_BUTTERFLY_2_LEFT,                     -1, -1
6804   },
6805   {
6806     O_ALT_BUTTER_2,                             TRUE,
6807     EL_BD_BUTTERFLY_2_UP,                       -1, -1
6808   },
6809   {
6810     O_ALT_BUTTER_3,                             TRUE,
6811     EL_BD_BUTTERFLY_2_RIGHT,                    -1, -1
6812   },
6813   {
6814     O_ALT_BUTTER_4,                             TRUE,
6815     EL_BD_BUTTERFLY_2_DOWN,                     -1, -1
6816   },
6817   {
6818     O_STONEFLY_1,                               TRUE,
6819     EL_BD_STONEFLY_LEFT,                        -1, -1
6820   },
6821   {
6822     O_STONEFLY_2,                               TRUE,
6823     EL_BD_STONEFLY_UP,                          -1, -1
6824   },
6825   {
6826     O_STONEFLY_3,                               TRUE,
6827     EL_BD_STONEFLY_RIGHT,                       -1, -1
6828   },
6829   {
6830     O_STONEFLY_4,                               TRUE,
6831     EL_BD_STONEFLY_DOWN,                        -1, -1
6832   },
6833   {
6834     O_BITER_1,                                  TRUE,
6835     EL_BD_BITER_UP,                             -1, -1
6836   },
6837   {
6838     O_BITER_2,                                  TRUE,
6839     EL_BD_BITER_RIGHT,                          -1, -1
6840   },
6841   {
6842     O_BITER_3,                                  TRUE,
6843     EL_BD_BITER_DOWN,                           -1, -1
6844   },
6845   {
6846     O_BITER_4,                                  TRUE,
6847     EL_BD_BITER_LEFT,                           -1, -1
6848   },
6849   {
6850     O_DRAGONFLY_1,                              TRUE,
6851     EL_BD_DRAGONFLY_LEFT,                       -1, -1
6852   },
6853   {
6854     O_DRAGONFLY_2,                              TRUE,
6855     EL_BD_DRAGONFLY_UP,                         -1, -1
6856   },
6857   {
6858     O_DRAGONFLY_3,                              TRUE,
6859     EL_BD_DRAGONFLY_RIGHT,                      -1, -1
6860   },
6861   {
6862     O_DRAGONFLY_4,                              TRUE,
6863     EL_BD_DRAGONFLY_DOWN,                       -1, -1
6864   },
6865   {
6866     O_PRE_PL_1,                                 TRUE,
6867     EL_BD_PLAYER_GROWING_1,                     -1, -1
6868   },
6869   {
6870     O_PRE_PL_1,                                 FALSE,
6871     EL_BD_PLAYER,                               ACTION_GROWING, -1
6872   },
6873   {
6874     O_PRE_PL_2,                                 TRUE,
6875     EL_BD_PLAYER_GROWING_2,                     -1, -1
6876   },
6877   {
6878     O_PRE_PL_2,                                 FALSE,
6879     EL_BD_PLAYER,                               ACTION_GROWING, -1
6880   },
6881   {
6882     O_PRE_PL_3,                                 TRUE,
6883     EL_BD_PLAYER_GROWING_3,                     -1, -1
6884   },
6885   {
6886     O_PRE_PL_3,                                 FALSE,
6887     EL_BD_PLAYER,                               ACTION_GROWING, -1
6888   },
6889   {
6890     O_PLAYER,                                   TRUE,
6891     EL_BD_PLAYER,                               -1, -1
6892   },
6893   {
6894     O_PLAYER_BOMB,                              TRUE,
6895     EL_BD_PLAYER_WITH_BOMB,                     -1, -1
6896   },
6897   {
6898     O_PLAYER_ROCKET_LAUNCHER,                   TRUE,
6899     EL_BD_PLAYER_WITH_ROCKET_LAUNCHER,          -1, -1
6900   },
6901   {
6902     O_PLAYER_GLUED,                             TRUE,
6903     EL_BD_PLAYER_GLUED,                         -1, -1
6904   },
6905   {
6906     O_PLAYER_STIRRING,                          TRUE,
6907     EL_BD_PLAYER_STIRRING,                      -1, -1
6908   },
6909   {
6910     O_ROCKET_LAUNCHER,                          TRUE,
6911     EL_BD_ROCKET_LAUNCHER,                      -1, -1
6912   },
6913   {
6914     O_ROCKET_1,                                 TRUE,
6915     EL_BD_ROCKET_RIGHT,                         -1, -1
6916   },
6917   {
6918     O_ROCKET_2,                                 TRUE,
6919     EL_BD_ROCKET_UP,                            -1, -1
6920   },
6921   {
6922     O_ROCKET_3,                                 TRUE,
6923     EL_BD_ROCKET_LEFT,                          -1, -1
6924   },
6925   {
6926     O_ROCKET_4,                                 TRUE,
6927     EL_BD_ROCKET_DOWN,                          -1, -1
6928   },
6929   {
6930     O_BOMB,                                     TRUE,
6931     EL_BD_BOMB,                                 -1, -1
6932   },
6933   {
6934     O_BOMB_TICK_1,                              TRUE,
6935     EL_BD_BOMB_TICKING_1,                       -1, -1
6936   },
6937   {
6938     O_BOMB_TICK_1,                              FALSE,
6939     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6940   },
6941   {
6942     O_BOMB_TICK_2,                              TRUE,
6943     EL_BD_BOMB_TICKING_2,                       -1, -1
6944   },
6945   {
6946     O_BOMB_TICK_2,                              FALSE,
6947     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6948   },
6949   {
6950     O_BOMB_TICK_3,                              TRUE,
6951     EL_BD_BOMB_TICKING_3,                       -1, -1
6952   },
6953   {
6954     O_BOMB_TICK_3,                              FALSE,
6955     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6956   },
6957   {
6958     O_BOMB_TICK_4,                              TRUE,
6959     EL_BD_BOMB_TICKING_4,                       -1, -1
6960   },
6961   {
6962     O_BOMB_TICK_4,                              FALSE,
6963     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6964   },
6965   {
6966     O_BOMB_TICK_5,                              TRUE,
6967     EL_BD_BOMB_TICKING_5,                       -1, -1
6968   },
6969   {
6970     O_BOMB_TICK_5,                              FALSE,
6971     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6972   },
6973   {
6974     O_BOMB_TICK_6,                              TRUE,
6975     EL_BD_BOMB_TICKING_6,                       -1, -1
6976   },
6977   {
6978     O_BOMB_TICK_6,                              FALSE,
6979     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6980   },
6981   {
6982     O_BOMB_TICK_7,                              TRUE,
6983     EL_BD_BOMB_TICKING_7,                       -1, -1
6984   },
6985   {
6986     O_BOMB_TICK_7,                              FALSE,
6987     EL_BD_BOMB,                                 ACTION_ACTIVE, -1
6988   },
6989   {
6990     O_NITRO_PACK,                               TRUE,
6991     EL_BD_NITRO_PACK,                           -1, -1
6992   },
6993   {
6994     O_NITRO_PACK_F,                             TRUE,
6995     EL_BD_NITRO_PACK_FALLING,                   -1, -1
6996   },
6997   {
6998     O_NITRO_PACK_F,                             FALSE,
6999     EL_BD_NITRO_PACK,                           ACTION_FALLING, -1
7000   },
7001   {
7002     O_PRE_CLOCK_1,                              TRUE,
7003     EL_BD_CLOCK_GROWING_1,                      -1, -1
7004   },
7005   {
7006     O_PRE_CLOCK_1,                              FALSE,
7007     EL_BD_CLOCK,                                ACTION_GROWING, -1
7008   },
7009   {
7010     O_PRE_CLOCK_2,                              TRUE,
7011     EL_BD_CLOCK_GROWING_2,                      -1, -1
7012   },
7013   {
7014     O_PRE_CLOCK_2,                              FALSE,
7015     EL_BD_CLOCK,                                ACTION_GROWING, -1
7016   },
7017   {
7018     O_PRE_CLOCK_3,                              TRUE,
7019     EL_BD_CLOCK_GROWING_3,                      -1, -1
7020   },
7021   {
7022     O_PRE_CLOCK_3,                              FALSE,
7023     EL_BD_CLOCK,                                ACTION_GROWING, -1
7024   },
7025   {
7026     O_PRE_CLOCK_4,                              TRUE,
7027     EL_BD_CLOCK_GROWING_4,                      -1, -1
7028   },
7029   {
7030     O_PRE_CLOCK_4,                              FALSE,
7031     EL_BD_CLOCK,                                ACTION_GROWING, -1
7032   },
7033   {
7034     O_PRE_DIA_1,                                TRUE,
7035     EL_BD_DIAMOND_GROWING_1,                    -1, -1
7036   },
7037   {
7038     O_PRE_DIA_1,                                FALSE,
7039     EL_BD_DIAMOND,                              ACTION_GROWING, -1
7040   },
7041   {
7042     O_PRE_DIA_2,                                TRUE,
7043     EL_BD_DIAMOND_GROWING_2,                    -1, -1
7044   },
7045   {
7046     O_PRE_DIA_2,                                FALSE,
7047     EL_BD_DIAMOND,                              ACTION_GROWING, -1
7048   },
7049   {
7050     O_PRE_DIA_3,                                TRUE,
7051     EL_BD_DIAMOND_GROWING_3,                    -1, -1
7052   },
7053   {
7054     O_PRE_DIA_3,                                FALSE,
7055     EL_BD_DIAMOND,                              ACTION_GROWING, -1
7056   },
7057   {
7058     O_PRE_DIA_4,                                TRUE,
7059     EL_BD_DIAMOND_GROWING_4,                    -1, -1
7060   },
7061   {
7062     O_PRE_DIA_4,                                FALSE,
7063     EL_BD_DIAMOND,                              ACTION_GROWING, -1
7064   },
7065   {
7066     O_PRE_DIA_5,                                TRUE,
7067     EL_BD_DIAMOND_GROWING_5,                    -1, -1
7068   },
7069   {
7070     O_PRE_DIA_5,                                FALSE,
7071     EL_BD_DIAMOND,                              ACTION_GROWING, -1
7072   },
7073   {
7074     O_EXPLODE_1,                                TRUE,
7075     EL_BD_EXPLODING_1,                          -1, -1
7076   },
7077   {
7078     O_EXPLODE_1,                                FALSE,
7079     EL_DEFAULT,                                 ACTION_EXPLODING, -1
7080   },
7081   {
7082     O_EXPLODE_2,                                TRUE,
7083     EL_BD_EXPLODING_2,                          -1, -1
7084   },
7085   {
7086     O_EXPLODE_2,                                FALSE,
7087     EL_DEFAULT,                                 ACTION_EXPLODING, -1
7088   },
7089   {
7090     O_EXPLODE_3,                                TRUE,
7091     EL_BD_EXPLODING_3,                          -1, -1
7092   },
7093   {
7094     O_EXPLODE_3,                                FALSE,
7095     EL_DEFAULT,                                 ACTION_EXPLODING, -1
7096   },
7097   {
7098     O_EXPLODE_4,                                TRUE,
7099     EL_BD_EXPLODING_4,                          -1, -1
7100   },
7101   {
7102     O_EXPLODE_4,                                FALSE,
7103     EL_DEFAULT,                                 ACTION_EXPLODING, -1
7104   },
7105   {
7106     O_EXPLODE_5,                                TRUE,
7107     EL_BD_EXPLODING_5,                          -1, -1
7108   },
7109   {
7110     O_EXPLODE_5,                                FALSE,
7111     EL_DEFAULT,                                 ACTION_EXPLODING, -1
7112   },
7113   {
7114     O_PRE_STONE_1,                              TRUE,
7115     EL_BD_ROCK_GROWING_1,                       -1, -1
7116   },
7117   {
7118     O_PRE_STONE_1,                              FALSE,
7119     EL_BD_ROCK,                                 ACTION_GROWING, -1
7120   },
7121   {
7122     O_PRE_STONE_2,                              TRUE,
7123     EL_BD_ROCK_GROWING_2,                       -1, -1
7124   },
7125   {
7126     O_PRE_STONE_2,                              FALSE,
7127     EL_BD_ROCK,                                 ACTION_GROWING, -1
7128   },
7129   {
7130     O_PRE_STONE_3,                              TRUE,
7131     EL_BD_ROCK_GROWING_3,                       -1, -1
7132   },
7133   {
7134     O_PRE_STONE_3,                              FALSE,
7135     EL_BD_ROCK,                                 ACTION_GROWING, -1
7136   },
7137   {
7138     O_PRE_STONE_4,                              TRUE,
7139     EL_BD_ROCK_GROWING_4,                       -1, -1
7140   },
7141   {
7142     O_PRE_STONE_4,                              FALSE,
7143     EL_BD_ROCK,                                 ACTION_GROWING, -1
7144   },
7145   {
7146     O_PRE_STEEL_1,                              TRUE,
7147     EL_BD_STEELWALL_GROWING_1,                  -1, -1
7148   },
7149   {
7150     O_PRE_STEEL_1,                              FALSE,
7151     EL_BD_STEELWALL,                            ACTION_GROWING, -1
7152   },
7153   {
7154     O_PRE_STEEL_2,                              TRUE,
7155     EL_BD_STEELWALL_GROWING_2,                  -1, -1
7156   },
7157   {
7158     O_PRE_STEEL_2,                              FALSE,
7159     EL_BD_STEELWALL,                            ACTION_GROWING, -1
7160   },
7161   {
7162     O_PRE_STEEL_3,                              TRUE,
7163     EL_BD_STEELWALL_GROWING_3,                  -1, -1
7164   },
7165   {
7166     O_PRE_STEEL_3,                              FALSE,
7167     EL_BD_STEELWALL,                            ACTION_GROWING, -1
7168   },
7169   {
7170     O_PRE_STEEL_4,                              TRUE,
7171     EL_BD_STEELWALL_GROWING_4,                  -1, -1
7172   },
7173   {
7174     O_PRE_STEEL_4,                              FALSE,
7175     EL_BD_STEELWALL,                            ACTION_GROWING, -1
7176   },
7177   {
7178     O_GHOST_EXPL_1,                             TRUE,
7179     EL_BD_GHOST_EXPLODING_1,                    -1, -1
7180   },
7181   {
7182     O_GHOST_EXPL_1,                             FALSE,
7183     EL_BD_GHOST,                                ACTION_EXPLODING, -1
7184   },
7185   {
7186     O_GHOST_EXPL_2,                             TRUE,
7187     EL_BD_GHOST_EXPLODING_2,                    -1, -1
7188   },
7189   {
7190     O_GHOST_EXPL_2,                             FALSE,
7191     EL_BD_GHOST,                                ACTION_EXPLODING, -1
7192   },
7193   {
7194     O_GHOST_EXPL_3,                             TRUE,
7195     EL_BD_GHOST_EXPLODING_3,                    -1, -1
7196   },
7197   {
7198     O_GHOST_EXPL_3,                             FALSE,
7199     EL_BD_GHOST,                                ACTION_EXPLODING, -1
7200   },
7201   {
7202     O_GHOST_EXPL_4,                             TRUE,
7203     EL_BD_GHOST_EXPLODING_4,                    -1, -1
7204   },
7205   {
7206     O_GHOST_EXPL_4,                             FALSE,
7207     EL_BD_GHOST,                                ACTION_EXPLODING, -1
7208   },
7209   {
7210     O_BOMB_EXPL_1,                              TRUE,
7211     EL_BD_BOMB_EXPLODING_1,                     -1, -1
7212   },
7213   {
7214     O_BOMB_EXPL_1,                              FALSE,
7215     EL_BD_BOMB,                                 ACTION_EXPLODING, -1
7216   },
7217   {
7218     O_BOMB_EXPL_2,                              TRUE,
7219     EL_BD_BOMB_EXPLODING_2,                     -1, -1
7220   },
7221   {
7222     O_BOMB_EXPL_2,                              FALSE,
7223     EL_BD_BOMB,                                 ACTION_EXPLODING, -1
7224   },
7225   {
7226     O_BOMB_EXPL_3,                              TRUE,
7227     EL_BD_BOMB_EXPLODING_3,                     -1, -1
7228   },
7229   {
7230     O_BOMB_EXPL_3,                              FALSE,
7231     EL_BD_BOMB,                                 ACTION_EXPLODING, -1
7232   },
7233   {
7234     O_BOMB_EXPL_4,                              TRUE,
7235     EL_BD_BOMB_EXPLODING_4,                     -1, -1
7236   },
7237   {
7238     O_BOMB_EXPL_4,                              FALSE,
7239     EL_BD_BOMB,                                 ACTION_EXPLODING, -1
7240   },
7241   {
7242     O_NITRO_EXPL_1,                             TRUE,
7243     EL_BD_NITRO_PACK_EXPLODING_1,               -1, -1
7244   },
7245   {
7246     O_NITRO_EXPL_1,                             FALSE,
7247     EL_BD_NITRO_PACK,                           ACTION_EXPLODING, -1
7248   },
7249   {
7250     O_NITRO_EXPL_2,                             TRUE,
7251     EL_BD_NITRO_PACK_EXPLODING_2,               -1, -1
7252   },
7253   {
7254     O_NITRO_EXPL_2,                             FALSE,
7255     EL_BD_NITRO_PACK,                           ACTION_EXPLODING, -1
7256   },
7257   {
7258     O_NITRO_EXPL_3,                             TRUE,
7259     EL_BD_NITRO_PACK_EXPLODING_3,               -1, -1
7260   },
7261   {
7262     O_NITRO_EXPL_3,                             FALSE,
7263     EL_BD_NITRO_PACK,                           ACTION_EXPLODING, -1
7264   },
7265   {
7266     O_NITRO_EXPL_4,                             TRUE,
7267     EL_BD_NITRO_PACK_EXPLODING_4,               -1, -1
7268   },
7269   {
7270     O_NITRO_EXPL_4,                             FALSE,
7271     EL_BD_NITRO_PACK,                           ACTION_EXPLODING, -1
7272   },
7273   {
7274     O_NITRO_PACK_EXPLODE,                       TRUE,
7275     EL_BD_NITRO_PACK_EXPLODING,                 -1, -1
7276   },
7277   {
7278     O_NITRO_PACK_EXPLODE,                       FALSE,
7279     EL_BD_NITRO_PACK,                           ACTION_EXPLODING, -1
7280   },
7281   {
7282     O_AMOEBA_2_EXPL_1,                          TRUE,
7283     EL_BD_AMOEBA_2_EXPLODING_1,                 -1, -1
7284   },
7285   {
7286     O_AMOEBA_2_EXPL_1,                          FALSE,
7287     EL_BD_AMOEBA_2,                             ACTION_EXPLODING, -1
7288   },
7289   {
7290     O_AMOEBA_2_EXPL_2,                          TRUE,
7291     EL_BD_AMOEBA_2_EXPLODING_2,                 -1, -1
7292   },
7293   {
7294     O_AMOEBA_2_EXPL_2,                          FALSE,
7295     EL_BD_AMOEBA_2,                             ACTION_EXPLODING, -1
7296   },
7297   {
7298     O_AMOEBA_2_EXPL_3,                          TRUE,
7299     EL_BD_AMOEBA_2_EXPLODING_3,                 -1, -1
7300   },
7301   {
7302     O_AMOEBA_2_EXPL_3,                          FALSE,
7303     EL_BD_AMOEBA_2,                             ACTION_EXPLODING, -1
7304   },
7305   {
7306     O_AMOEBA_2_EXPL_4,                          TRUE,
7307     EL_BD_AMOEBA_2_EXPLODING_4,                 -1, -1
7308   },
7309   {
7310     O_AMOEBA_2_EXPL_4,                          FALSE,
7311     EL_BD_AMOEBA_2,                             ACTION_EXPLODING, -1
7312   },
7313   {
7314     O_NUT_EXPL_1,                               TRUE,
7315     EL_BD_NUT_BREAKING_1,                       -1, -1
7316   },
7317   {
7318     O_NUT_EXPL_1,                               FALSE,
7319     EL_BD_NUT,                                  ACTION_BREAKING, -1
7320   },
7321   {
7322     O_NUT_EXPL_2,                               TRUE,
7323     EL_BD_NUT_BREAKING_2,                       -1, -1
7324   },
7325   {
7326     O_NUT_EXPL_2,                               FALSE,
7327     EL_BD_NUT,                                  ACTION_BREAKING, -1
7328   },
7329   {
7330     O_NUT_EXPL_3,                               TRUE,
7331     EL_BD_NUT_BREAKING_3,                       -1, -1
7332   },
7333   {
7334     O_NUT_EXPL_3,                               FALSE,
7335     EL_BD_NUT,                                  ACTION_BREAKING, -1
7336   },
7337   {
7338     O_NUT_EXPL_4,                               TRUE,
7339     EL_BD_NUT_BREAKING_4,                       -1, -1
7340   },
7341   {
7342     O_NUT_EXPL_4,                               FALSE,
7343     EL_BD_NUT,                                  ACTION_BREAKING, -1
7344   },
7345   {
7346     O_PLAYER_PNEUMATIC_LEFT,                    FALSE,
7347     EL_BD_PLAYER,                               ACTION_HITTING, MV_BIT_LEFT
7348   },
7349   {
7350     O_PLAYER_PNEUMATIC_RIGHT,                   FALSE,
7351     EL_BD_PLAYER,                               ACTION_HITTING, MV_BIT_RIGHT
7352   },
7353   {
7354     O_PNEUMATIC_ACTIVE_LEFT,                    FALSE,
7355     EL_BD_PNEUMATIC_HAMMER,                     ACTION_HITTING, MV_BIT_LEFT
7356   },
7357   {
7358     O_PNEUMATIC_ACTIVE_RIGHT,                   FALSE,
7359     EL_BD_PNEUMATIC_HAMMER,                     ACTION_HITTING, MV_BIT_RIGHT
7360   },
7361
7362   // helper (runtime) elements
7363
7364   {
7365     O_FAKE_BONUS,                               FALSE,
7366     EL_BD_FAKE_BONUS,                           -1, -1
7367   },
7368   {
7369     O_INBOX_CLOSED,                             FALSE,
7370     EL_BD_INBOX,                                -1, -1
7371   },
7372   {
7373     O_INBOX_OPEN,                               FALSE,
7374     EL_BD_INBOX,                                ACTION_OPENING, -1
7375   },
7376   {
7377     O_OUTBOX_CLOSED,                            FALSE,
7378     EL_BD_EXIT_CLOSED,                          -1, -1
7379   },
7380   {
7381     O_OUTBOX_OPEN,                              FALSE,
7382     EL_BD_EXIT_OPEN,                            -1, -1
7383   },
7384   {
7385     O_COVERED,                                  FALSE,
7386     EL_BD_COVERED,                              -1, -1
7387   },
7388   {
7389     O_PLAYER_LEFT,                              FALSE,
7390     EL_BD_PLAYER,                               ACTION_MOVING, MV_BIT_LEFT
7391   },
7392   {
7393     O_PLAYER_RIGHT,                             FALSE,
7394     EL_BD_PLAYER,                               ACTION_MOVING, MV_BIT_RIGHT
7395   },
7396   {
7397     O_PLAYER_BLINK,                             FALSE,
7398     EL_BD_PLAYER,                               ACTION_BORING_1, -1
7399   },
7400   {
7401     O_PLAYER_TAP,                               FALSE,
7402     EL_BD_PLAYER,                               ACTION_BORING_2, -1
7403   },
7404   {
7405     O_PLAYER_TAP_BLINK,                         FALSE,
7406     EL_BD_PLAYER,                               ACTION_BORING_3, -1
7407   },
7408   {
7409     O_CREATURE_SWITCH_ON,                       FALSE,
7410     EL_BD_CREATURE_SWITCH_ACTIVE,               -1, -1
7411   },
7412   {
7413     O_EXPANDING_WALL_SWITCH_HORIZ,              FALSE,
7414     EL_BD_EXPANDABLE_WALL_SWITCH,               -1, -1
7415   },
7416   {
7417     O_EXPANDING_WALL_SWITCH_VERT,               FALSE,
7418     EL_BD_EXPANDABLE_WALL_SWITCH_ACTIVE,        -1, -1
7419   },
7420   {
7421     O_GRAVITY_SWITCH_ACTIVE,                    FALSE,
7422     EL_BD_GRAVITY_SWITCH_ACTIVE,                -1, -1
7423   },
7424   {
7425     O_REPLICATOR_SWITCH_OFF,                    FALSE,
7426     EL_BD_REPLICATOR_SWITCH,                    -1, -1
7427   },
7428   {
7429     O_REPLICATOR_SWITCH_ON,                     FALSE,
7430     EL_BD_REPLICATOR_SWITCH_ACTIVE,             -1, -1
7431   },
7432   {
7433     O_CONVEYOR_DIR_NORMAL,                      FALSE,
7434     EL_BD_CONVEYOR_DIR_SWITCH,                  -1, -1
7435   },
7436   {
7437     O_CONVEYOR_DIR_CHANGED,                     FALSE,
7438     EL_BD_CONVEYOR_DIR_SWITCH_ACTIVE,           -1, -1
7439   },
7440   {
7441     O_CONVEYOR_SWITCH_OFF,                      FALSE,
7442     EL_BD_CONVEYOR_SWITCH,                      -1, -1
7443   },
7444   {
7445     O_CONVEYOR_SWITCH_ON,                       FALSE,
7446     EL_BD_CONVEYOR_SWITCH_ACTIVE,               -1, -1
7447   },
7448   {
7449     O_MAGIC_WALL_ACTIVE,                        FALSE,
7450     EL_BD_MAGIC_WALL_ACTIVE,                    -1, -1
7451   },
7452   {
7453     O_REPLICATOR_ACTIVE,                        FALSE,
7454     EL_BD_REPLICATOR_ACTIVE,                    -1, -1
7455   },
7456   {
7457     O_CONVEYOR_LEFT_ACTIVE,                     FALSE,
7458     EL_BD_CONVEYOR_LEFT_ACTIVE,                 -1, -1
7459   },
7460   {
7461     O_CONVEYOR_RIGHT_ACTIVE,                    FALSE,
7462     EL_BD_CONVEYOR_RIGHT_ACTIVE,                -1, -1
7463   },
7464   {
7465     O_BITER_SWITCH_1,                           FALSE,
7466     EL_BD_BITER_SWITCH_1,                       -1, -1
7467   },
7468   {
7469     O_BITER_SWITCH_2,                           FALSE,
7470     EL_BD_BITER_SWITCH_2,                       -1, -1
7471   },
7472   {
7473     O_BITER_SWITCH_3,                           FALSE,
7474     EL_BD_BITER_SWITCH_3,                       -1, -1
7475   },
7476   {
7477     O_BITER_SWITCH_4,                           FALSE,
7478     EL_BD_BITER_SWITCH_4,                       -1, -1
7479   },
7480
7481   {
7482     -1,                                         FALSE,
7483     -1,                                         -1, -1
7484   }
7485 };
7486
7487 int map_element_RND_to_BD_cave(int element_rnd)
7488 {
7489   static unsigned short mapping_RND_to_BD[NUM_FILE_ELEMENTS];
7490   static boolean mapping_initialized = FALSE;
7491
7492   if (!mapping_initialized)
7493   {
7494     int i;
7495
7496     // return "O_UNKNOWN" for all undefined elements in mapping array
7497     for (i = 0; i < NUM_FILE_ELEMENTS; i++)
7498       mapping_RND_to_BD[i] = O_UNKNOWN;
7499
7500     for (i = 0; bd_object_mapping_list[i].element_bd != -1; i++)
7501       if (bd_object_mapping_list[i].is_rnd_to_bd_mapping)
7502         mapping_RND_to_BD[bd_object_mapping_list[i].element_rnd] =
7503           bd_object_mapping_list[i].element_bd;
7504
7505     mapping_initialized = TRUE;
7506   }
7507
7508   if (element_rnd < 0 || element_rnd >= NUM_FILE_ELEMENTS)
7509   {
7510     Warn("invalid RND element %d", element_rnd);
7511
7512     return O_UNKNOWN;
7513   }
7514
7515   return mapping_RND_to_BD[element_rnd];
7516 }
7517
7518 int map_element_RND_to_BD_effect(int element_rnd, int action)
7519 {
7520   static unsigned short mapping_RND_to_BD[NUM_FILE_ELEMENTS][NUM_ACTIONS];
7521   static boolean mapping_initialized = FALSE;
7522
7523   if (!mapping_initialized)
7524   {
7525     int i, j;
7526
7527     // return "O_UNKNOWN" for all undefined elements in mapping array
7528     for (i = 0; i < NUM_FILE_ELEMENTS; i++)
7529       for (j = 0; j < NUM_ACTIONS; j++)
7530         mapping_RND_to_BD[i][j] = O_UNKNOWN;
7531
7532     for (i = 0; bd_object_mapping_list[i].element_bd != -1; i++)
7533     {
7534       int element_rnd = bd_object_mapping_list[i].element_rnd;
7535       int element_bd  = bd_object_mapping_list[i].element_bd;
7536       int action      = bd_object_mapping_list[i].action;
7537
7538       if (action != -1)
7539         mapping_RND_to_BD[element_rnd][action] = element_bd;
7540     }
7541
7542     mapping_initialized = TRUE;
7543   }
7544
7545   if (element_rnd < 0 || element_rnd >= NUM_FILE_ELEMENTS)
7546   {
7547     Warn("invalid RND element %d", element_rnd);
7548
7549     return O_UNKNOWN;
7550   }
7551
7552   if (action < 0 || action >= NUM_ACTIONS)
7553   {
7554     Warn("invalid action %d", action);
7555
7556     return O_UNKNOWN;
7557   }
7558
7559   return mapping_RND_to_BD[element_rnd][action];
7560 }
7561
7562 int map_element_BD_to_RND_cave(int element_bd)
7563 {
7564   static unsigned short mapping_BD_to_RND[O_MAX_ALL];
7565   static boolean mapping_initialized = FALSE;
7566
7567   if (!mapping_initialized)
7568   {
7569     int i;
7570
7571     // return "EL_UNKNOWN" for all undefined elements in mapping array
7572     for (i = 0; i < O_MAX_ALL; i++)
7573       mapping_BD_to_RND[i] = EL_UNKNOWN;
7574
7575     for (i = 0; bd_object_mapping_list[i].element_bd != -1; i++)
7576       if (bd_object_mapping_list[i].is_rnd_to_bd_mapping)
7577         mapping_BD_to_RND[bd_object_mapping_list[i].element_bd] =
7578           bd_object_mapping_list[i].element_rnd;
7579
7580     mapping_initialized = TRUE;
7581   }
7582
7583   if (element_bd < 0 || element_bd >= O_MAX_ALL)
7584   {
7585     Warn("invalid BD element %d", element_bd);
7586
7587     return EL_UNKNOWN;
7588   }
7589
7590   return mapping_BD_to_RND[element_bd];
7591 }
7592
7593 int map_element_BD_to_RND_game(int element_bd)
7594 {
7595   static unsigned short mapping_BD_to_RND[O_MAX_ALL];
7596   static boolean mapping_initialized = FALSE;
7597
7598   if (!mapping_initialized)
7599   {
7600     int i;
7601
7602     // return "EL_UNKNOWN" for all undefined elements in mapping array
7603     for (i = 0; i < O_MAX_ALL; i++)
7604       mapping_BD_to_RND[i] = EL_UNKNOWN;
7605
7606     for (i = 0; bd_object_mapping_list[i].element_bd != -1; i++)
7607       mapping_BD_to_RND[bd_object_mapping_list[i].element_bd] =
7608         bd_object_mapping_list[i].element_rnd;
7609
7610     mapping_initialized = TRUE;
7611   }
7612
7613   if (element_bd < 0 || element_bd >= O_MAX_ALL)
7614   {
7615     Warn("invalid BD element %d", element_bd);
7616
7617     return EL_UNKNOWN;
7618   }
7619
7620   return mapping_BD_to_RND[element_bd];
7621 }
7622
7623 static struct Mapping_EM_to_RND_object
7624 {
7625   int element_em;
7626   boolean is_rnd_to_em_mapping;         // unique mapping EM <-> RND
7627   boolean is_backside;                  // backside of moving element
7628
7629   int element_rnd;
7630   int action;
7631   int direction;
7632 }
7633 em_object_mapping_list[GAME_TILE_MAX + 1] =
7634 {
7635   {
7636     Zborder,                            FALSE,  FALSE,
7637     EL_EMPTY,                           -1, -1
7638   },
7639   {
7640     Zplayer,                            FALSE,  FALSE,
7641     EL_EMPTY,                           -1, -1
7642   },
7643
7644   {
7645     Zbug,                               FALSE,  FALSE,
7646     EL_EMPTY,                           -1, -1
7647   },
7648   {
7649     Ztank,                              FALSE,  FALSE,
7650     EL_EMPTY,                           -1, -1
7651   },
7652   {
7653     Zeater,                             FALSE,  FALSE,
7654     EL_EMPTY,                           -1, -1
7655   },
7656   {
7657     Zdynamite,                          FALSE,  FALSE,
7658     EL_EMPTY,                           -1, -1
7659   },
7660   {
7661     Zboom,                              FALSE,  FALSE,
7662     EL_EMPTY,                           -1, -1
7663   },
7664
7665   {
7666     Xchain,                             FALSE,  FALSE,
7667     EL_DEFAULT,                         ACTION_EXPLODING, -1
7668   },
7669   {
7670     Xboom_bug,                          FALSE,  FALSE,
7671     EL_BUG,                             ACTION_EXPLODING, -1
7672   },
7673   {
7674     Xboom_tank,                         FALSE,  FALSE,
7675     EL_SPACESHIP,                       ACTION_EXPLODING, -1
7676   },
7677   {
7678     Xboom_android,                      FALSE,  FALSE,
7679     EL_EMC_ANDROID,                     ACTION_OTHER, -1
7680   },
7681   {
7682     Xboom_1,                            FALSE,  FALSE,
7683     EL_DEFAULT,                         ACTION_EXPLODING, -1
7684   },
7685   {
7686     Xboom_2,                            FALSE,  FALSE,
7687     EL_DEFAULT,                         ACTION_EXPLODING, -1
7688   },
7689
7690   {
7691     Xblank,                             TRUE,   FALSE,
7692     EL_EMPTY,                           -1, -1
7693   },
7694
7695   {
7696     Xsplash_e,                          FALSE,  FALSE,
7697     EL_ACID_SPLASH_RIGHT,               -1, -1
7698   },
7699   {
7700     Xsplash_w,                          FALSE,  FALSE,
7701     EL_ACID_SPLASH_LEFT,                -1, -1
7702   },
7703
7704   {
7705     Xplant,                             TRUE,   FALSE,
7706     EL_EMC_PLANT,                       -1, -1
7707   },
7708   {
7709     Yplant,                             FALSE,  FALSE,
7710     EL_EMC_PLANT,                       -1, -1
7711   },
7712
7713   {
7714     Xacid_1,                            TRUE,   FALSE,
7715     EL_ACID,                            -1, -1
7716   },
7717   {
7718     Xacid_2,                            FALSE,  FALSE,
7719     EL_ACID,                            -1, -1
7720   },
7721   {
7722     Xacid_3,                            FALSE,  FALSE,
7723     EL_ACID,                            -1, -1
7724   },
7725   {
7726     Xacid_4,                            FALSE,  FALSE,
7727     EL_ACID,                            -1, -1
7728   },
7729   {
7730     Xacid_5,                            FALSE,  FALSE,
7731     EL_ACID,                            -1, -1
7732   },
7733   {
7734     Xacid_6,                            FALSE,  FALSE,
7735     EL_ACID,                            -1, -1
7736   },
7737   {
7738     Xacid_7,                            FALSE,  FALSE,
7739     EL_ACID,                            -1, -1
7740   },
7741   {
7742     Xacid_8,                            FALSE,  FALSE,
7743     EL_ACID,                            -1, -1
7744   },
7745
7746   {
7747     Xfake_acid_1,                       TRUE,   FALSE,
7748     EL_EMC_FAKE_ACID,                   -1, -1
7749   },
7750   {
7751     Xfake_acid_2,                       FALSE,  FALSE,
7752     EL_EMC_FAKE_ACID,                   -1, -1
7753   },
7754   {
7755     Xfake_acid_3,                       FALSE,  FALSE,
7756     EL_EMC_FAKE_ACID,                   -1, -1
7757   },
7758   {
7759     Xfake_acid_4,                       FALSE,  FALSE,
7760     EL_EMC_FAKE_ACID,                   -1, -1
7761   },
7762   {
7763     Xfake_acid_5,                       FALSE,  FALSE,
7764     EL_EMC_FAKE_ACID,                   -1, -1
7765   },
7766   {
7767     Xfake_acid_6,                       FALSE,  FALSE,
7768     EL_EMC_FAKE_ACID,                   -1, -1
7769   },
7770   {
7771     Xfake_acid_7,                       FALSE,  FALSE,
7772     EL_EMC_FAKE_ACID,                   -1, -1
7773   },
7774   {
7775     Xfake_acid_8,                       FALSE,  FALSE,
7776     EL_EMC_FAKE_ACID,                   -1, -1
7777   },
7778
7779   {
7780     Xfake_acid_1_player,                FALSE,  FALSE,
7781     EL_EMC_FAKE_ACID,                   -1, -1
7782   },
7783   {
7784     Xfake_acid_2_player,                FALSE,  FALSE,
7785     EL_EMC_FAKE_ACID,                   -1, -1
7786   },
7787   {
7788     Xfake_acid_3_player,                FALSE,  FALSE,
7789     EL_EMC_FAKE_ACID,                   -1, -1
7790   },
7791   {
7792     Xfake_acid_4_player,                FALSE,  FALSE,
7793     EL_EMC_FAKE_ACID,                   -1, -1
7794   },
7795   {
7796     Xfake_acid_5_player,                FALSE,  FALSE,
7797     EL_EMC_FAKE_ACID,                   -1, -1
7798   },
7799   {
7800     Xfake_acid_6_player,                FALSE,  FALSE,
7801     EL_EMC_FAKE_ACID,                   -1, -1
7802   },
7803   {
7804     Xfake_acid_7_player,                FALSE,  FALSE,
7805     EL_EMC_FAKE_ACID,                   -1, -1
7806   },
7807   {
7808     Xfake_acid_8_player,                FALSE,  FALSE,
7809     EL_EMC_FAKE_ACID,                   -1, -1
7810   },
7811
7812   {
7813     Xgrass,                             TRUE,   FALSE,
7814     EL_EMC_GRASS,                       -1, -1
7815   },
7816   {
7817     Ygrass_nB,                          FALSE,  FALSE,
7818     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_UP
7819   },
7820   {
7821     Ygrass_eB,                          FALSE,  FALSE,
7822     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_RIGHT
7823   },
7824   {
7825     Ygrass_sB,                          FALSE,  FALSE,
7826     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_DOWN
7827   },
7828   {
7829     Ygrass_wB,                          FALSE,  FALSE,
7830     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_LEFT
7831   },
7832
7833   {
7834     Xdirt,                              TRUE,   FALSE,
7835     EL_SAND,                            -1, -1
7836   },
7837   {
7838     Ydirt_nB,                           FALSE,  FALSE,
7839     EL_SAND,                            ACTION_DIGGING, MV_BIT_UP
7840   },
7841   {
7842     Ydirt_eB,                           FALSE,  FALSE,
7843     EL_SAND,                            ACTION_DIGGING, MV_BIT_RIGHT
7844   },
7845   {
7846     Ydirt_sB,                           FALSE,  FALSE,
7847     EL_SAND,                            ACTION_DIGGING, MV_BIT_DOWN
7848   },
7849   {
7850     Ydirt_wB,                           FALSE,  FALSE,
7851     EL_SAND,                            ACTION_DIGGING, MV_BIT_LEFT
7852   },
7853
7854   {
7855     Xandroid,                           TRUE,   FALSE,
7856     EL_EMC_ANDROID,                     ACTION_ACTIVE, -1
7857   },
7858   {
7859     Xandroid_1_n,                       FALSE,  FALSE,
7860     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_UP
7861   },
7862   {
7863     Xandroid_2_n,                       FALSE,  FALSE,
7864     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_UP
7865   },
7866   {
7867     Xandroid_1_e,                       FALSE,  FALSE,
7868     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_RIGHT
7869   },
7870   {
7871     Xandroid_2_e,                       FALSE,  FALSE,
7872     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_RIGHT
7873   },
7874   {
7875     Xandroid_1_w,                       FALSE,  FALSE,
7876     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_LEFT
7877   },
7878   {
7879     Xandroid_2_w,                       FALSE,  FALSE,
7880     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_LEFT
7881   },
7882   {
7883     Xandroid_1_s,                       FALSE,  FALSE,
7884     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_DOWN
7885   },
7886   {
7887     Xandroid_2_s,                       FALSE,  FALSE,
7888     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_DOWN
7889   },
7890   {
7891     Yandroid_n,                         FALSE,  FALSE,
7892     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_UP
7893   },
7894   {
7895     Yandroid_nB,                        FALSE,  TRUE,
7896     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_UP
7897   },
7898   {
7899     Yandroid_ne,                        FALSE,  FALSE,
7900     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_UPRIGHT
7901   },
7902   {
7903     Yandroid_neB,                       FALSE,  TRUE,
7904     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_UPRIGHT
7905   },
7906   {
7907     Yandroid_e,                         FALSE,  FALSE,
7908     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_RIGHT
7909   },
7910   {
7911     Yandroid_eB,                        FALSE,  TRUE,
7912     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_RIGHT
7913   },
7914   {
7915     Yandroid_se,                        FALSE,  FALSE,
7916     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_DOWNRIGHT
7917   },
7918   {
7919     Yandroid_seB,                       FALSE,  TRUE,
7920     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_DOWNRIGHT
7921   },
7922   {
7923     Yandroid_s,                         FALSE,  FALSE,
7924     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_DOWN
7925   },
7926   {
7927     Yandroid_sB,                        FALSE,  TRUE,
7928     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_DOWN
7929   },
7930   {
7931     Yandroid_sw,                        FALSE,  FALSE,
7932     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_DOWNLEFT
7933   },
7934   {
7935     Yandroid_swB,                       FALSE,  TRUE,
7936     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_DOWNLEFT
7937   },
7938   {
7939     Yandroid_w,                         FALSE,  FALSE,
7940     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_LEFT
7941   },
7942   {
7943     Yandroid_wB,                        FALSE,  TRUE,
7944     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_LEFT
7945   },
7946   {
7947     Yandroid_nw,                        FALSE,  FALSE,
7948     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_UPLEFT
7949   },
7950   {
7951     Yandroid_nwB,                       FALSE,  TRUE,
7952     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_UPLEFT
7953   },
7954
7955   {
7956     Xeater_n,                           TRUE,   FALSE,
7957     EL_YAMYAM_UP,                       -1, -1
7958   },
7959   {
7960     Xeater_e,                           TRUE,   FALSE,
7961     EL_YAMYAM_RIGHT,                    -1, -1
7962   },
7963   {
7964     Xeater_w,                           TRUE,   FALSE,
7965     EL_YAMYAM_LEFT,                     -1, -1
7966   },
7967   {
7968     Xeater_s,                           TRUE,   FALSE,
7969     EL_YAMYAM_DOWN,                     -1, -1
7970   },
7971   {
7972     Yeater_n,                           FALSE,  FALSE,
7973     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_UP
7974   },
7975   {
7976     Yeater_nB,                          FALSE,  TRUE,
7977     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_UP
7978   },
7979   {
7980     Yeater_e,                           FALSE,  FALSE,
7981     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_RIGHT
7982   },
7983   {
7984     Yeater_eB,                          FALSE,  TRUE,
7985     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_RIGHT
7986   },
7987   {
7988     Yeater_s,                           FALSE,  FALSE,
7989     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_DOWN
7990   },
7991   {
7992     Yeater_sB,                          FALSE,  TRUE,
7993     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_DOWN
7994   },
7995   {
7996     Yeater_w,                           FALSE,  FALSE,
7997     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_LEFT
7998   },
7999   {
8000     Yeater_wB,                          FALSE,  TRUE,
8001     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_LEFT
8002   },
8003   {
8004     Yeater_stone,                       FALSE,  FALSE,
8005     EL_YAMYAM,                          ACTION_SMASHED_BY_ROCK, -1
8006   },
8007   {
8008     Yeater_spring,                      FALSE,  FALSE,
8009     EL_YAMYAM,                          ACTION_SMASHED_BY_SPRING, -1
8010   },
8011
8012   {
8013     Xalien,                             TRUE,   FALSE,
8014     EL_ROBOT,                           -1, -1
8015   },
8016   {
8017     Xalien_pause,                       FALSE,  FALSE,
8018     EL_ROBOT,                           -1, -1
8019   },
8020   {
8021     Yalien_n,                           FALSE,  FALSE,
8022     EL_ROBOT,                           ACTION_MOVING, MV_BIT_UP
8023   },
8024   {
8025     Yalien_nB,                          FALSE,  TRUE,
8026     EL_ROBOT,                           ACTION_MOVING, MV_BIT_UP
8027   },
8028   {
8029     Yalien_e,                           FALSE,  FALSE,
8030     EL_ROBOT,                           ACTION_MOVING, MV_BIT_RIGHT
8031   },
8032   {
8033     Yalien_eB,                          FALSE,  TRUE,
8034     EL_ROBOT,                           ACTION_MOVING, MV_BIT_RIGHT
8035   },
8036   {
8037     Yalien_s,                           FALSE,  FALSE,
8038     EL_ROBOT,                           ACTION_MOVING, MV_BIT_DOWN
8039   },
8040   {
8041     Yalien_sB,                          FALSE,  TRUE,
8042     EL_ROBOT,                           ACTION_MOVING, MV_BIT_DOWN
8043   },
8044   {
8045     Yalien_w,                           FALSE,  FALSE,
8046     EL_ROBOT,                           ACTION_MOVING, MV_BIT_LEFT
8047   },
8048   {
8049     Yalien_wB,                          FALSE,  TRUE,
8050     EL_ROBOT,                           ACTION_MOVING, MV_BIT_LEFT
8051   },
8052   {
8053     Yalien_stone,                       FALSE,  FALSE,
8054     EL_ROBOT,                           ACTION_SMASHED_BY_ROCK, -1
8055   },
8056   {
8057     Yalien_spring,                      FALSE,  FALSE,
8058     EL_ROBOT,                           ACTION_SMASHED_BY_SPRING, -1
8059   },
8060
8061   {
8062     Xbug_1_n,                           TRUE,   FALSE,
8063     EL_BUG_UP,                          -1, -1
8064   },
8065   {
8066     Xbug_1_e,                           TRUE,   FALSE,
8067     EL_BUG_RIGHT,                       -1, -1
8068   },
8069   {
8070     Xbug_1_s,                           TRUE,   FALSE,
8071     EL_BUG_DOWN,                        -1, -1
8072   },
8073   {
8074     Xbug_1_w,                           TRUE,   FALSE,
8075     EL_BUG_LEFT,                        -1, -1
8076   },
8077   {
8078     Xbug_2_n,                           FALSE,  FALSE,
8079     EL_BUG_UP,                          -1, -1
8080   },
8081   {
8082     Xbug_2_e,                           FALSE,  FALSE,
8083     EL_BUG_RIGHT,                       -1, -1
8084   },
8085   {
8086     Xbug_2_s,                           FALSE,  FALSE,
8087     EL_BUG_DOWN,                        -1, -1
8088   },
8089   {
8090     Xbug_2_w,                           FALSE,  FALSE,
8091     EL_BUG_LEFT,                        -1, -1
8092   },
8093   {
8094     Ybug_n,                             FALSE,  FALSE,
8095     EL_BUG,                             ACTION_MOVING, MV_BIT_UP
8096   },
8097   {
8098     Ybug_nB,                            FALSE,  TRUE,
8099     EL_BUG,                             ACTION_MOVING, MV_BIT_UP
8100   },
8101   {
8102     Ybug_e,                             FALSE,  FALSE,
8103     EL_BUG,                             ACTION_MOVING, MV_BIT_RIGHT
8104   },
8105   {
8106     Ybug_eB,                            FALSE,  TRUE,
8107     EL_BUG,                             ACTION_MOVING, MV_BIT_RIGHT
8108   },
8109   {
8110     Ybug_s,                             FALSE,  FALSE,
8111     EL_BUG,                             ACTION_MOVING, MV_BIT_DOWN
8112   },
8113   {
8114     Ybug_sB,                            FALSE,  TRUE,
8115     EL_BUG,                             ACTION_MOVING, MV_BIT_DOWN
8116   },
8117   {
8118     Ybug_w,                             FALSE,  FALSE,
8119     EL_BUG,                             ACTION_MOVING, MV_BIT_LEFT
8120   },
8121   {
8122     Ybug_wB,                            FALSE,  TRUE,
8123     EL_BUG,                             ACTION_MOVING, MV_BIT_LEFT
8124   },
8125   {
8126     Ybug_w_n,                           FALSE,  FALSE,
8127     EL_BUG,                             ACTION_TURNING_FROM_LEFT, MV_BIT_UP
8128   },
8129   {
8130     Ybug_n_e,                           FALSE,  FALSE,
8131     EL_BUG,                             ACTION_TURNING_FROM_UP, MV_BIT_RIGHT
8132   },
8133   {
8134     Ybug_e_s,                           FALSE,  FALSE,
8135     EL_BUG,                             ACTION_TURNING_FROM_RIGHT, MV_BIT_DOWN
8136   },
8137   {
8138     Ybug_s_w,                           FALSE,  FALSE,
8139     EL_BUG,                             ACTION_TURNING_FROM_DOWN, MV_BIT_LEFT
8140   },
8141   {
8142     Ybug_e_n,                           FALSE,  FALSE,
8143     EL_BUG,                             ACTION_TURNING_FROM_RIGHT, MV_BIT_UP
8144   },
8145   {
8146     Ybug_s_e,                           FALSE,  FALSE,
8147     EL_BUG,                             ACTION_TURNING_FROM_DOWN, MV_BIT_RIGHT
8148   },
8149   {
8150     Ybug_w_s,                           FALSE,  FALSE,
8151     EL_BUG,                             ACTION_TURNING_FROM_LEFT, MV_BIT_DOWN
8152   },
8153   {
8154     Ybug_n_w,                           FALSE,  FALSE,
8155     EL_BUG,                             ACTION_TURNING_FROM_UP, MV_BIT_LEFT
8156   },
8157   {
8158     Ybug_stone,                         FALSE,  FALSE,
8159     EL_BUG,                             ACTION_SMASHED_BY_ROCK, -1
8160   },
8161   {
8162     Ybug_spring,                        FALSE,  FALSE,
8163     EL_BUG,                             ACTION_SMASHED_BY_SPRING, -1
8164   },
8165
8166   {
8167     Xtank_1_n,                          TRUE,   FALSE,
8168     EL_SPACESHIP_UP,                    -1, -1
8169   },
8170   {
8171     Xtank_1_e,                          TRUE,   FALSE,
8172     EL_SPACESHIP_RIGHT,                 -1, -1
8173   },
8174   {
8175     Xtank_1_s,                          TRUE,   FALSE,
8176     EL_SPACESHIP_DOWN,                  -1, -1
8177   },
8178   {
8179     Xtank_1_w,                          TRUE,   FALSE,
8180     EL_SPACESHIP_LEFT,                  -1, -1
8181   },
8182   {
8183     Xtank_2_n,                          FALSE,  FALSE,
8184     EL_SPACESHIP_UP,                    -1, -1
8185   },
8186   {
8187     Xtank_2_e,                          FALSE,  FALSE,
8188     EL_SPACESHIP_RIGHT,                 -1, -1
8189   },
8190   {
8191     Xtank_2_s,                          FALSE,  FALSE,
8192     EL_SPACESHIP_DOWN,                  -1, -1
8193   },
8194   {
8195     Xtank_2_w,                          FALSE,  FALSE,
8196     EL_SPACESHIP_LEFT,                  -1, -1
8197   },
8198   {
8199     Ytank_n,                            FALSE,  FALSE,
8200     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_UP
8201   },
8202   {
8203     Ytank_nB,                           FALSE,  TRUE,
8204     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_UP
8205   },
8206   {
8207     Ytank_e,                            FALSE,  FALSE,
8208     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_RIGHT
8209   },
8210   {
8211     Ytank_eB,                           FALSE,  TRUE,
8212     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_RIGHT
8213   },
8214   {
8215     Ytank_s,                            FALSE,  FALSE,
8216     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_DOWN
8217   },
8218   {
8219     Ytank_sB,                           FALSE,  TRUE,
8220     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_DOWN
8221   },
8222   {
8223     Ytank_w,                            FALSE,  FALSE,
8224     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_LEFT
8225   },
8226   {
8227     Ytank_wB,                           FALSE,  TRUE,
8228     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_LEFT
8229   },
8230   {
8231     Ytank_w_n,                          FALSE,  FALSE,
8232     EL_SPACESHIP,                       ACTION_TURNING_FROM_LEFT, MV_BIT_UP
8233   },
8234   {
8235     Ytank_n_e,                          FALSE,  FALSE,
8236     EL_SPACESHIP,                       ACTION_TURNING_FROM_UP, MV_BIT_RIGHT
8237   },
8238   {
8239     Ytank_e_s,                          FALSE,  FALSE,
8240     EL_SPACESHIP,                       ACTION_TURNING_FROM_RIGHT, MV_BIT_DOWN
8241   },
8242   {
8243     Ytank_s_w,                          FALSE,  FALSE,
8244     EL_SPACESHIP,                       ACTION_TURNING_FROM_DOWN, MV_BIT_LEFT
8245   },
8246   {
8247     Ytank_e_n,                          FALSE,  FALSE,
8248     EL_SPACESHIP,                       ACTION_TURNING_FROM_RIGHT, MV_BIT_UP
8249   },
8250   {
8251     Ytank_s_e,                          FALSE,  FALSE,
8252     EL_SPACESHIP,                       ACTION_TURNING_FROM_DOWN, MV_BIT_RIGHT
8253   },
8254   {
8255     Ytank_w_s,                          FALSE,  FALSE,
8256     EL_SPACESHIP,                       ACTION_TURNING_FROM_LEFT, MV_BIT_DOWN
8257   },
8258   {
8259     Ytank_n_w,                          FALSE,  FALSE,
8260     EL_SPACESHIP,                       ACTION_TURNING_FROM_UP, MV_BIT_LEFT
8261   },
8262   {
8263     Ytank_stone,                        FALSE,  FALSE,
8264     EL_SPACESHIP,                       ACTION_SMASHED_BY_ROCK, -1
8265   },
8266   {
8267     Ytank_spring,                       FALSE,  FALSE,
8268     EL_SPACESHIP,                       ACTION_SMASHED_BY_SPRING, -1
8269   },
8270
8271   {
8272     Xemerald,                           TRUE,   FALSE,
8273     EL_EMERALD,                         -1, -1
8274   },
8275   {
8276     Xemerald_pause,                     FALSE,  FALSE,
8277     EL_EMERALD,                         -1, -1
8278   },
8279   {
8280     Xemerald_fall,                      FALSE,  FALSE,
8281     EL_EMERALD,                         -1, -1
8282   },
8283   {
8284     Xemerald_shine,                     FALSE,  FALSE,
8285     EL_EMERALD,                         ACTION_TWINKLING, -1
8286   },
8287   {
8288     Yemerald_s,                         FALSE,  FALSE,
8289     EL_EMERALD,                         ACTION_FALLING, -1
8290   },
8291   {
8292     Yemerald_sB,                        FALSE,  TRUE,
8293     EL_EMERALD,                         ACTION_FALLING, -1
8294   },
8295   {
8296     Yemerald_e,                         FALSE,  FALSE,
8297     EL_EMERALD,                         ACTION_MOVING, MV_BIT_RIGHT
8298   },
8299   {
8300     Yemerald_eB,                        FALSE,  TRUE,
8301     EL_EMERALD,                         ACTION_MOVING, MV_BIT_RIGHT
8302   },
8303   {
8304     Yemerald_w,                         FALSE,  FALSE,
8305     EL_EMERALD,                         ACTION_MOVING, MV_BIT_LEFT
8306   },
8307   {
8308     Yemerald_wB,                        FALSE,  TRUE,
8309     EL_EMERALD,                         ACTION_MOVING, MV_BIT_LEFT
8310   },
8311   {
8312     Yemerald_blank,                     FALSE,  FALSE,
8313     EL_EMERALD,                         ACTION_COLLECTING, -1
8314   },
8315
8316   {
8317     Xdiamond,                           TRUE,   FALSE,
8318     EL_DIAMOND,                         -1, -1
8319   },
8320   {
8321     Xdiamond_pause,                     FALSE,  FALSE,
8322     EL_DIAMOND,                         -1, -1
8323   },
8324   {
8325     Xdiamond_fall,                      FALSE,  FALSE,
8326     EL_DIAMOND,                         -1, -1
8327   },
8328   {
8329     Xdiamond_shine,                     FALSE,  FALSE,
8330     EL_DIAMOND,                         ACTION_TWINKLING, -1
8331   },
8332   {
8333     Ydiamond_s,                         FALSE,  FALSE,
8334     EL_DIAMOND,                         ACTION_FALLING, -1
8335   },
8336   {
8337     Ydiamond_sB,                        FALSE,  TRUE,
8338     EL_DIAMOND,                         ACTION_FALLING, -1
8339   },
8340   {
8341     Ydiamond_e,                         FALSE,  FALSE,
8342     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_RIGHT
8343   },
8344   {
8345     Ydiamond_eB,                        FALSE,  TRUE,
8346     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_RIGHT
8347   },
8348   {
8349     Ydiamond_w,                         FALSE,  FALSE,
8350     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_LEFT
8351   },
8352   {
8353     Ydiamond_wB,                        FALSE,  TRUE,
8354     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_LEFT
8355   },
8356   {
8357     Ydiamond_blank,                     FALSE,  FALSE,
8358     EL_DIAMOND,                         ACTION_COLLECTING, -1
8359   },
8360   {
8361     Ydiamond_stone,                     FALSE,  FALSE,
8362     EL_DIAMOND,                         ACTION_SMASHED_BY_ROCK, -1
8363   },
8364
8365   {
8366     Xstone,                             TRUE,   FALSE,
8367     EL_ROCK,                            -1, -1
8368   },
8369   {
8370     Xstone_pause,                       FALSE,  FALSE,
8371     EL_ROCK,                            -1, -1
8372   },
8373   {
8374     Xstone_fall,                        FALSE,  FALSE,
8375     EL_ROCK,                            -1, -1
8376   },
8377   {
8378     Ystone_s,                           FALSE,  FALSE,
8379     EL_ROCK,                            ACTION_FALLING, -1
8380   },
8381   {
8382     Ystone_sB,                          FALSE,  TRUE,
8383     EL_ROCK,                            ACTION_FALLING, -1
8384   },
8385   {
8386     Ystone_e,                           FALSE,  FALSE,
8387     EL_ROCK,                            ACTION_MOVING, MV_BIT_RIGHT
8388   },
8389   {
8390     Ystone_eB,                          FALSE,  TRUE,
8391     EL_ROCK,                            ACTION_MOVING, MV_BIT_RIGHT
8392   },
8393   {
8394     Ystone_w,                           FALSE,  FALSE,
8395     EL_ROCK,                            ACTION_MOVING, MV_BIT_LEFT
8396   },
8397   {
8398     Ystone_wB,                          FALSE,  TRUE,
8399     EL_ROCK,                            ACTION_MOVING, MV_BIT_LEFT
8400   },
8401
8402   {
8403     Xbomb,                              TRUE,   FALSE,
8404     EL_BOMB,                            -1, -1
8405   },
8406   {
8407     Xbomb_pause,                        FALSE,  FALSE,
8408     EL_BOMB,                            -1, -1
8409   },
8410   {
8411     Xbomb_fall,                         FALSE,  FALSE,
8412     EL_BOMB,                            -1, -1
8413   },
8414   {
8415     Ybomb_s,                            FALSE,  FALSE,
8416     EL_BOMB,                            ACTION_FALLING, -1
8417   },
8418   {
8419     Ybomb_sB,                           FALSE,  TRUE,
8420     EL_BOMB,                            ACTION_FALLING, -1
8421   },
8422   {
8423     Ybomb_e,                            FALSE,  FALSE,
8424     EL_BOMB,                            ACTION_MOVING, MV_BIT_RIGHT
8425   },
8426   {
8427     Ybomb_eB,                           FALSE,  TRUE,
8428     EL_BOMB,                            ACTION_MOVING, MV_BIT_RIGHT
8429   },
8430   {
8431     Ybomb_w,                            FALSE,  FALSE,
8432     EL_BOMB,                            ACTION_MOVING, MV_BIT_LEFT
8433   },
8434   {
8435     Ybomb_wB,                           FALSE,  TRUE,
8436     EL_BOMB,                            ACTION_MOVING, MV_BIT_LEFT
8437   },
8438   {
8439     Ybomb_blank,                        FALSE,  FALSE,
8440     EL_BOMB,                            ACTION_ACTIVATING, -1
8441   },
8442
8443   {
8444     Xnut,                               TRUE,   FALSE,
8445     EL_NUT,                             -1, -1
8446   },
8447   {
8448     Xnut_pause,                         FALSE,  FALSE,
8449     EL_NUT,                             -1, -1
8450   },
8451   {
8452     Xnut_fall,                          FALSE,  FALSE,
8453     EL_NUT,                             -1, -1
8454   },
8455   {
8456     Ynut_s,                             FALSE,  FALSE,
8457     EL_NUT,                             ACTION_FALLING, -1
8458   },
8459   {
8460     Ynut_sB,                            FALSE,  TRUE,
8461     EL_NUT,                             ACTION_FALLING, -1
8462   },
8463   {
8464     Ynut_e,                             FALSE,  FALSE,
8465     EL_NUT,                             ACTION_MOVING, MV_BIT_RIGHT
8466   },
8467   {
8468     Ynut_eB,                            FALSE,  TRUE,
8469     EL_NUT,                             ACTION_MOVING, MV_BIT_RIGHT
8470   },
8471   {
8472     Ynut_w,                             FALSE,  FALSE,
8473     EL_NUT,                             ACTION_MOVING, MV_BIT_LEFT
8474   },
8475   {
8476     Ynut_wB,                            FALSE,  TRUE,
8477     EL_NUT,                             ACTION_MOVING, MV_BIT_LEFT
8478   },
8479   {
8480     Ynut_stone,                         FALSE,  FALSE,
8481     EL_NUT,                             ACTION_BREAKING, -1
8482   },
8483
8484   {
8485     Xspring,                            TRUE,   FALSE,
8486     EL_SPRING,                          -1, -1
8487   },
8488   {
8489     Xspring_pause,                      FALSE,  FALSE,
8490     EL_SPRING,                          -1, -1
8491   },
8492   {
8493     Xspring_e,                          TRUE,   FALSE,
8494     EL_SPRING_RIGHT,                    -1, -1
8495   },
8496   {
8497     Xspring_w,                          TRUE,   FALSE,
8498     EL_SPRING_LEFT,                     -1, -1
8499   },
8500   {
8501     Xspring_fall,                       FALSE,  FALSE,
8502     EL_SPRING,                          -1, -1
8503   },
8504   {
8505     Yspring_s,                          FALSE,  FALSE,
8506     EL_SPRING,                          ACTION_FALLING, -1
8507   },
8508   {
8509     Yspring_sB,                         FALSE,  TRUE,
8510     EL_SPRING,                          ACTION_FALLING, -1
8511   },
8512   {
8513     Yspring_e,                          FALSE,  FALSE,
8514     EL_SPRING,                          ACTION_MOVING, MV_BIT_RIGHT
8515   },
8516   {
8517     Yspring_eB,                         FALSE,  TRUE,
8518     EL_SPRING,                          ACTION_MOVING, MV_BIT_RIGHT
8519   },
8520   {
8521     Yspring_w,                          FALSE,  FALSE,
8522     EL_SPRING,                          ACTION_MOVING, MV_BIT_LEFT
8523   },
8524   {
8525     Yspring_wB,                         FALSE,  TRUE,
8526     EL_SPRING,                          ACTION_MOVING, MV_BIT_LEFT
8527   },
8528   {
8529     Yspring_alien_e,                    FALSE,  FALSE,
8530     EL_SPRING,                          ACTION_EATING, MV_BIT_RIGHT
8531   },
8532   {
8533     Yspring_alien_eB,                   FALSE,  TRUE,
8534     EL_SPRING,                          ACTION_EATING, MV_BIT_RIGHT
8535   },
8536   {
8537     Yspring_alien_w,                    FALSE,  FALSE,
8538     EL_SPRING,                          ACTION_EATING, MV_BIT_LEFT
8539   },
8540   {
8541     Yspring_alien_wB,                   FALSE,  TRUE,
8542     EL_SPRING,                          ACTION_EATING, MV_BIT_LEFT
8543   },
8544
8545   {
8546     Xpush_emerald_e,                    FALSE,  FALSE,
8547     EL_EMERALD,                         -1, MV_BIT_RIGHT
8548   },
8549   {
8550     Xpush_emerald_w,                    FALSE,  FALSE,
8551     EL_EMERALD,                         -1, MV_BIT_LEFT
8552   },
8553   {
8554     Xpush_diamond_e,                    FALSE,  FALSE,
8555     EL_DIAMOND,                         -1, MV_BIT_RIGHT
8556   },
8557   {
8558     Xpush_diamond_w,                    FALSE,  FALSE,
8559     EL_DIAMOND,                         -1, MV_BIT_LEFT
8560   },
8561   {
8562     Xpush_stone_e,                      FALSE,  FALSE,
8563     EL_ROCK,                            -1, MV_BIT_RIGHT
8564   },
8565   {
8566     Xpush_stone_w,                      FALSE,  FALSE,
8567     EL_ROCK,                            -1, MV_BIT_LEFT
8568   },
8569   {
8570     Xpush_bomb_e,                       FALSE,  FALSE,
8571     EL_BOMB,                            -1, MV_BIT_RIGHT
8572   },
8573   {
8574     Xpush_bomb_w,                       FALSE,  FALSE,
8575     EL_BOMB,                            -1, MV_BIT_LEFT
8576   },
8577   {
8578     Xpush_nut_e,                        FALSE,  FALSE,
8579     EL_NUT,                             -1, MV_BIT_RIGHT
8580   },
8581   {
8582     Xpush_nut_w,                        FALSE,  FALSE,
8583     EL_NUT,                             -1, MV_BIT_LEFT
8584   },
8585   {
8586     Xpush_spring_e,                     FALSE,  FALSE,
8587     EL_SPRING_RIGHT,                    -1, MV_BIT_RIGHT
8588   },
8589   {
8590     Xpush_spring_w,                     FALSE,  FALSE,
8591     EL_SPRING_LEFT,                     -1, MV_BIT_LEFT
8592   },
8593
8594   {
8595     Xdynamite,                          TRUE,   FALSE,
8596     EL_EM_DYNAMITE,                     -1, -1
8597   },
8598   {
8599     Ydynamite_blank,                    FALSE,  FALSE,
8600     EL_EM_DYNAMITE,                     ACTION_COLLECTING, -1
8601   },
8602   {
8603     Xdynamite_1,                        TRUE,   FALSE,
8604     EL_EM_DYNAMITE_ACTIVE,              -1, -1
8605   },
8606   {
8607     Xdynamite_2,                        FALSE,  FALSE,
8608     EL_EM_DYNAMITE_ACTIVE,              -1, -1
8609   },
8610   {
8611     Xdynamite_3,                        FALSE,  FALSE,
8612     EL_EM_DYNAMITE_ACTIVE,              -1, -1
8613   },
8614   {
8615     Xdynamite_4,                        FALSE,  FALSE,
8616     EL_EM_DYNAMITE_ACTIVE,              -1, -1
8617   },
8618
8619   {
8620     Xkey_1,                             TRUE,   FALSE,
8621     EL_EM_KEY_1,                        -1, -1
8622   },
8623   {
8624     Xkey_2,                             TRUE,   FALSE,
8625     EL_EM_KEY_2,                        -1, -1
8626   },
8627   {
8628     Xkey_3,                             TRUE,   FALSE,
8629     EL_EM_KEY_3,                        -1, -1
8630   },
8631   {
8632     Xkey_4,                             TRUE,   FALSE,
8633     EL_EM_KEY_4,                        -1, -1
8634   },
8635   {
8636     Xkey_5,                             TRUE,   FALSE,
8637     EL_EMC_KEY_5,                       -1, -1
8638   },
8639   {
8640     Xkey_6,                             TRUE,   FALSE,
8641     EL_EMC_KEY_6,                       -1, -1
8642   },
8643   {
8644     Xkey_7,                             TRUE,   FALSE,
8645     EL_EMC_KEY_7,                       -1, -1
8646   },
8647   {
8648     Xkey_8,                             TRUE,   FALSE,
8649     EL_EMC_KEY_8,                       -1, -1
8650   },
8651
8652   {
8653     Xdoor_1,                            TRUE,   FALSE,
8654     EL_EM_GATE_1,                       -1, -1
8655   },
8656   {
8657     Xdoor_2,                            TRUE,   FALSE,
8658     EL_EM_GATE_2,                       -1, -1
8659   },
8660   {
8661     Xdoor_3,                            TRUE,   FALSE,
8662     EL_EM_GATE_3,                       -1, -1
8663   },
8664   {
8665     Xdoor_4,                            TRUE,   FALSE,
8666     EL_EM_GATE_4,                       -1, -1
8667   },
8668   {
8669     Xdoor_5,                            TRUE,   FALSE,
8670     EL_EMC_GATE_5,                      -1, -1
8671   },
8672   {
8673     Xdoor_6,                            TRUE,   FALSE,
8674     EL_EMC_GATE_6,                      -1, -1
8675   },
8676   {
8677     Xdoor_7,                            TRUE,   FALSE,
8678     EL_EMC_GATE_7,                      -1, -1
8679   },
8680   {
8681     Xdoor_8,                            TRUE,   FALSE,
8682     EL_EMC_GATE_8,                      -1, -1
8683   },
8684
8685   {
8686     Xfake_door_1,                       TRUE,   FALSE,
8687     EL_EM_GATE_1_GRAY,                  -1, -1
8688   },
8689   {
8690     Xfake_door_2,                       TRUE,   FALSE,
8691     EL_EM_GATE_2_GRAY,                  -1, -1
8692   },
8693   {
8694     Xfake_door_3,                       TRUE,   FALSE,
8695     EL_EM_GATE_3_GRAY,                  -1, -1
8696   },
8697   {
8698     Xfake_door_4,                       TRUE,   FALSE,
8699     EL_EM_GATE_4_GRAY,                  -1, -1
8700   },
8701   {
8702     Xfake_door_5,                       TRUE,   FALSE,
8703     EL_EMC_GATE_5_GRAY,                 -1, -1
8704   },
8705   {
8706     Xfake_door_6,                       TRUE,   FALSE,
8707     EL_EMC_GATE_6_GRAY,                 -1, -1
8708   },
8709   {
8710     Xfake_door_7,                       TRUE,   FALSE,
8711     EL_EMC_GATE_7_GRAY,                 -1, -1
8712   },
8713   {
8714     Xfake_door_8,                       TRUE,   FALSE,
8715     EL_EMC_GATE_8_GRAY,                 -1, -1
8716   },
8717
8718   {
8719     Xballoon,                           TRUE,   FALSE,
8720     EL_BALLOON,                         -1, -1
8721   },
8722   {
8723     Yballoon_n,                         FALSE,  FALSE,
8724     EL_BALLOON,                         ACTION_MOVING, MV_BIT_UP
8725   },
8726   {
8727     Yballoon_nB,                        FALSE,  TRUE,
8728     EL_BALLOON,                         ACTION_MOVING, MV_BIT_UP
8729   },
8730   {
8731     Yballoon_e,                         FALSE,  FALSE,
8732     EL_BALLOON,                         ACTION_MOVING, MV_BIT_RIGHT
8733   },
8734   {
8735     Yballoon_eB,                        FALSE,  TRUE,
8736     EL_BALLOON,                         ACTION_MOVING, MV_BIT_RIGHT
8737   },
8738   {
8739     Yballoon_s,                         FALSE,  FALSE,
8740     EL_BALLOON,                         ACTION_MOVING, MV_BIT_DOWN
8741   },
8742   {
8743     Yballoon_sB,                        FALSE,  TRUE,
8744     EL_BALLOON,                         ACTION_MOVING, MV_BIT_DOWN
8745   },
8746   {
8747     Yballoon_w,                         FALSE,  FALSE,
8748     EL_BALLOON,                         ACTION_MOVING, MV_BIT_LEFT
8749   },
8750   {
8751     Yballoon_wB,                        FALSE,  TRUE,
8752     EL_BALLOON,                         ACTION_MOVING, MV_BIT_LEFT
8753   },
8754
8755   {
8756     Xball_1,                            TRUE,   FALSE,
8757     EL_EMC_MAGIC_BALL,                  -1, -1
8758   },
8759   {
8760     Yball_1,                            FALSE,  FALSE,
8761     EL_EMC_MAGIC_BALL,                  ACTION_ACTIVE, -1
8762   },
8763   {
8764     Xball_2,                            FALSE,  FALSE,
8765     EL_EMC_MAGIC_BALL,                  ACTION_ACTIVE, -1
8766   },
8767   {
8768     Yball_2,                            FALSE,  FALSE,
8769     EL_EMC_MAGIC_BALL,                  ACTION_ACTIVE, -1
8770   },
8771   {
8772     Yball_blank,                        FALSE,  FALSE,
8773     EL_EMC_MAGIC_BALL,                  ACTION_DROPPING, -1
8774   },
8775
8776   {
8777     Xamoeba_1,                          TRUE,   FALSE,
8778     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
8779   },
8780   {
8781     Xamoeba_2,                          FALSE,  FALSE,
8782     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
8783   },
8784   {
8785     Xamoeba_3,                          FALSE,  FALSE,
8786     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
8787   },
8788   {
8789     Xamoeba_4,                          FALSE,  FALSE,
8790     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
8791   },
8792   {
8793     Xamoeba_5,                          TRUE,   FALSE,
8794     EL_AMOEBA_WET,                      ACTION_OTHER, -1
8795   },
8796   {
8797     Xamoeba_6,                          FALSE,  FALSE,
8798     EL_AMOEBA_WET,                      ACTION_OTHER, -1
8799   },
8800   {
8801     Xamoeba_7,                          FALSE,  FALSE,
8802     EL_AMOEBA_WET,                      ACTION_OTHER, -1
8803   },
8804   {
8805     Xamoeba_8,                          FALSE,  FALSE,
8806     EL_AMOEBA_WET,                      ACTION_OTHER, -1
8807   },
8808
8809   {
8810     Xdrip,                              TRUE,   FALSE,
8811     EL_AMOEBA_DROP,                     ACTION_GROWING, -1
8812   },
8813   {
8814     Xdrip_fall,                         FALSE,  FALSE,
8815     EL_AMOEBA_DROP,                     -1, -1
8816   },
8817   {
8818     Xdrip_stretch,                      FALSE,  FALSE,
8819     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
8820   },
8821   {
8822     Xdrip_stretchB,                     FALSE,  TRUE,
8823     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
8824   },
8825   {
8826     Ydrip_1_s,                          FALSE,  FALSE,
8827     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
8828   },
8829   {
8830     Ydrip_1_sB,                         FALSE,  TRUE,
8831     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
8832   },
8833   {
8834     Ydrip_2_s,                          FALSE,  FALSE,
8835     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
8836   },
8837   {
8838     Ydrip_2_sB,                         FALSE,  TRUE,
8839     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
8840   },
8841
8842   {
8843     Xwonderwall,                        TRUE,   FALSE,
8844     EL_MAGIC_WALL,                      -1, -1
8845   },
8846   {
8847     Ywonderwall,                        FALSE,  FALSE,
8848     EL_MAGIC_WALL,                      ACTION_ACTIVE, -1
8849   },
8850
8851   {
8852     Xwheel,                             TRUE,   FALSE,
8853     EL_ROBOT_WHEEL,                     -1, -1
8854   },
8855   {
8856     Ywheel,                             FALSE,  FALSE,
8857     EL_ROBOT_WHEEL,                     ACTION_ACTIVE, -1
8858   },
8859
8860   {
8861     Xswitch,                            TRUE,   FALSE,
8862     EL_EMC_MAGIC_BALL_SWITCH,           -1, -1
8863   },
8864   {
8865     Yswitch,                            FALSE,  FALSE,
8866     EL_EMC_MAGIC_BALL_SWITCH,           ACTION_ACTIVE, -1
8867   },
8868
8869   {
8870     Xbumper,                            TRUE,   FALSE,
8871     EL_EMC_SPRING_BUMPER,               -1, -1
8872   },
8873   {
8874     Ybumper,                            FALSE,  FALSE,
8875     EL_EMC_SPRING_BUMPER,               ACTION_ACTIVE, -1
8876   },
8877
8878   {
8879     Xacid_nw,                           TRUE,   FALSE,
8880     EL_ACID_POOL_TOPLEFT,               -1, -1
8881   },
8882   {
8883     Xacid_ne,                           TRUE,   FALSE,
8884     EL_ACID_POOL_TOPRIGHT,              -1, -1
8885   },
8886   {
8887     Xacid_sw,                           TRUE,   FALSE,
8888     EL_ACID_POOL_BOTTOMLEFT,            -1, -1
8889   },
8890   {
8891     Xacid_s,                            TRUE,   FALSE,
8892     EL_ACID_POOL_BOTTOM,                -1, -1
8893   },
8894   {
8895     Xacid_se,                           TRUE,   FALSE,
8896     EL_ACID_POOL_BOTTOMRIGHT,           -1, -1
8897   },
8898
8899   {
8900     Xfake_blank,                        TRUE,   FALSE,
8901     EL_INVISIBLE_WALL,                  -1, -1
8902   },
8903   {
8904     Yfake_blank,                        FALSE,  FALSE,
8905     EL_INVISIBLE_WALL,                  ACTION_ACTIVE, -1
8906   },
8907
8908   {
8909     Xfake_grass,                        TRUE,   FALSE,
8910     EL_EMC_FAKE_GRASS,                  -1, -1
8911   },
8912   {
8913     Yfake_grass,                        FALSE,  FALSE,
8914     EL_EMC_FAKE_GRASS,                  ACTION_ACTIVE, -1
8915   },
8916
8917   {
8918     Xfake_amoeba,                       TRUE,   FALSE,
8919     EL_EMC_DRIPPER,                     -1, -1
8920   },
8921   {
8922     Yfake_amoeba,                       FALSE,  FALSE,
8923     EL_EMC_DRIPPER,                     ACTION_ACTIVE, -1
8924   },
8925
8926   {
8927     Xlenses,                            TRUE,   FALSE,
8928     EL_EMC_LENSES,                      -1, -1
8929   },
8930
8931   {
8932     Xmagnify,                           TRUE,   FALSE,
8933     EL_EMC_MAGNIFIER,                   -1, -1
8934   },
8935
8936   {
8937     Xsand,                              TRUE,   FALSE,
8938     EL_QUICKSAND_EMPTY,                 -1, -1
8939   },
8940   {
8941     Xsand_stone,                        TRUE,   FALSE,
8942     EL_QUICKSAND_FULL,                  -1, -1
8943   },
8944   {
8945     Xsand_stonein_1,                    FALSE,  TRUE,
8946     EL_ROCK,                            ACTION_FILLING, -1
8947   },
8948   {
8949     Xsand_stonein_2,                    FALSE,  TRUE,
8950     EL_ROCK,                            ACTION_FILLING, -1
8951   },
8952   {
8953     Xsand_stonein_3,                    FALSE,  TRUE,
8954     EL_ROCK,                            ACTION_FILLING, -1
8955   },
8956   {
8957     Xsand_stonein_4,                    FALSE,  TRUE,
8958     EL_ROCK,                            ACTION_FILLING, -1
8959   },
8960   {
8961     Xsand_sandstone_1,                  FALSE,  FALSE,
8962     EL_QUICKSAND_FILLING,               -1, -1
8963   },
8964   {
8965     Xsand_sandstone_2,                  FALSE,  FALSE,
8966     EL_QUICKSAND_FILLING,               -1, -1
8967   },
8968   {
8969     Xsand_sandstone_3,                  FALSE,  FALSE,
8970     EL_QUICKSAND_FILLING,               -1, -1
8971   },
8972   {
8973     Xsand_sandstone_4,                  FALSE,  FALSE,
8974     EL_QUICKSAND_FILLING,               -1, -1
8975   },
8976   {
8977     Xsand_stonesand_1,                  FALSE,  FALSE,
8978     EL_QUICKSAND_EMPTYING,              -1, -1
8979   },
8980   {
8981     Xsand_stonesand_2,                  FALSE,  FALSE,
8982     EL_QUICKSAND_EMPTYING,              -1, -1
8983   },
8984   {
8985     Xsand_stonesand_3,                  FALSE,  FALSE,
8986     EL_QUICKSAND_EMPTYING,              -1, -1
8987   },
8988   {
8989     Xsand_stonesand_4,                  FALSE,  FALSE,
8990     EL_QUICKSAND_EMPTYING,              -1, -1
8991   },
8992   {
8993     Xsand_stoneout_1,                   FALSE,  FALSE,
8994     EL_ROCK,                            ACTION_EMPTYING, -1
8995   },
8996   {
8997     Xsand_stoneout_2,                   FALSE,  FALSE,
8998     EL_ROCK,                            ACTION_EMPTYING, -1
8999   },
9000   {
9001     Xsand_stonesand_quickout_1,         FALSE,  FALSE,
9002     EL_QUICKSAND_EMPTYING,              -1, -1
9003   },
9004   {
9005     Xsand_stonesand_quickout_2,         FALSE,  FALSE,
9006     EL_QUICKSAND_EMPTYING,              -1, -1
9007   },
9008
9009   {
9010     Xslide_ns,                          TRUE,   FALSE,
9011     EL_EXPANDABLE_WALL_VERTICAL,        -1, -1
9012   },
9013   {
9014     Yslide_ns_blank,                    FALSE,  FALSE,
9015     EL_EXPANDABLE_WALL_VERTICAL,        ACTION_GROWING, -1
9016   },
9017   {
9018     Xslide_ew,                          TRUE,   FALSE,
9019     EL_EXPANDABLE_WALL_HORIZONTAL,      -1, -1
9020   },
9021   {
9022     Yslide_ew_blank,                    FALSE,  FALSE,
9023     EL_EXPANDABLE_WALL_HORIZONTAL,      ACTION_GROWING, -1
9024   },
9025
9026   {
9027     Xwind_n,                            TRUE,   FALSE,
9028     EL_BALLOON_SWITCH_UP,               -1, -1
9029   },
9030   {
9031     Xwind_e,                            TRUE,   FALSE,
9032     EL_BALLOON_SWITCH_RIGHT,            -1, -1
9033   },
9034   {
9035     Xwind_s,                            TRUE,   FALSE,
9036     EL_BALLOON_SWITCH_DOWN,             -1, -1
9037   },
9038   {
9039     Xwind_w,                            TRUE,   FALSE,
9040     EL_BALLOON_SWITCH_LEFT,             -1, -1
9041   },
9042   {
9043     Xwind_any,                          TRUE,   FALSE,
9044     EL_BALLOON_SWITCH_ANY,              -1, -1
9045   },
9046   {
9047     Xwind_stop,                         TRUE,   FALSE,
9048     EL_BALLOON_SWITCH_NONE,             -1, -1
9049   },
9050
9051   {
9052     Xexit,                              TRUE,   FALSE,
9053     EL_EM_EXIT_CLOSED,                  -1, -1
9054   },
9055   {
9056     Xexit_1,                            TRUE,   FALSE,
9057     EL_EM_EXIT_OPEN,                    -1, -1
9058   },
9059   {
9060     Xexit_2,                            FALSE,  FALSE,
9061     EL_EM_EXIT_OPEN,                    -1, -1
9062   },
9063   {
9064     Xexit_3,                            FALSE,  FALSE,
9065     EL_EM_EXIT_OPEN,                    -1, -1
9066   },
9067
9068   {
9069     Xpause,                             FALSE,  FALSE,
9070     EL_EMPTY,                           -1, -1
9071   },
9072
9073   {
9074     Xwall_1,                            TRUE,   FALSE,
9075     EL_WALL,                            -1, -1
9076   },
9077   {
9078     Xwall_2,                            TRUE,   FALSE,
9079     EL_EMC_WALL_14,                     -1, -1
9080   },
9081   {
9082     Xwall_3,                            TRUE,   FALSE,
9083     EL_EMC_WALL_15,                     -1, -1
9084   },
9085   {
9086     Xwall_4,                            TRUE,   FALSE,
9087     EL_EMC_WALL_16,                     -1, -1
9088   },
9089
9090   {
9091     Xroundwall_1,                       TRUE,   FALSE,
9092     EL_WALL_SLIPPERY,                   -1, -1
9093   },
9094   {
9095     Xroundwall_2,                       TRUE,   FALSE,
9096     EL_EMC_WALL_SLIPPERY_2,             -1, -1
9097   },
9098   {
9099     Xroundwall_3,                       TRUE,   FALSE,
9100     EL_EMC_WALL_SLIPPERY_3,             -1, -1
9101   },
9102   {
9103     Xroundwall_4,                       TRUE,   FALSE,
9104     EL_EMC_WALL_SLIPPERY_4,             -1, -1
9105   },
9106
9107   {
9108     Xsteel_1,                           TRUE,   FALSE,
9109     EL_STEELWALL,                       -1, -1
9110   },
9111   {
9112     Xsteel_2,                           TRUE,   FALSE,
9113     EL_EMC_STEELWALL_2,                 -1, -1
9114   },
9115   {
9116     Xsteel_3,                           TRUE,   FALSE,
9117     EL_EMC_STEELWALL_3,                 -1, -1
9118   },
9119   {
9120     Xsteel_4,                           TRUE,   FALSE,
9121     EL_EMC_STEELWALL_4,                 -1, -1
9122   },
9123
9124   {
9125     Xdecor_1,                           TRUE,   FALSE,
9126     EL_EMC_WALL_8,                      -1, -1
9127   },
9128   {
9129     Xdecor_2,                           TRUE,   FALSE,
9130     EL_EMC_WALL_6,                      -1, -1
9131   },
9132   {
9133     Xdecor_3,                           TRUE,   FALSE,
9134     EL_EMC_WALL_4,                      -1, -1
9135   },
9136   {
9137     Xdecor_4,                           TRUE,   FALSE,
9138     EL_EMC_WALL_7,                      -1, -1
9139   },
9140   {
9141     Xdecor_5,                           TRUE,   FALSE,
9142     EL_EMC_WALL_5,                      -1, -1
9143   },
9144   {
9145     Xdecor_6,                           TRUE,   FALSE,
9146     EL_EMC_WALL_9,                      -1, -1
9147   },
9148   {
9149     Xdecor_7,                           TRUE,   FALSE,
9150     EL_EMC_WALL_10,                     -1, -1
9151   },
9152   {
9153     Xdecor_8,                           TRUE,   FALSE,
9154     EL_EMC_WALL_1,                      -1, -1
9155   },
9156   {
9157     Xdecor_9,                           TRUE,   FALSE,
9158     EL_EMC_WALL_2,                      -1, -1
9159   },
9160   {
9161     Xdecor_10,                          TRUE,   FALSE,
9162     EL_EMC_WALL_3,                      -1, -1
9163   },
9164   {
9165     Xdecor_11,                          TRUE,   FALSE,
9166     EL_EMC_WALL_11,                     -1, -1
9167   },
9168   {
9169     Xdecor_12,                          TRUE,   FALSE,
9170     EL_EMC_WALL_12,                     -1, -1
9171   },
9172
9173   {
9174     Xalpha_0,                           TRUE,   FALSE,
9175     EL_CHAR('0'),                       -1, -1
9176   },
9177   {
9178     Xalpha_1,                           TRUE,   FALSE,
9179     EL_CHAR('1'),                       -1, -1
9180   },
9181   {
9182     Xalpha_2,                           TRUE,   FALSE,
9183     EL_CHAR('2'),                       -1, -1
9184   },
9185   {
9186     Xalpha_3,                           TRUE,   FALSE,
9187     EL_CHAR('3'),                       -1, -1
9188   },
9189   {
9190     Xalpha_4,                           TRUE,   FALSE,
9191     EL_CHAR('4'),                       -1, -1
9192   },
9193   {
9194     Xalpha_5,                           TRUE,   FALSE,
9195     EL_CHAR('5'),                       -1, -1
9196   },
9197   {
9198     Xalpha_6,                           TRUE,   FALSE,
9199     EL_CHAR('6'),                       -1, -1
9200   },
9201   {
9202     Xalpha_7,                           TRUE,   FALSE,
9203     EL_CHAR('7'),                       -1, -1
9204   },
9205   {
9206     Xalpha_8,                           TRUE,   FALSE,
9207     EL_CHAR('8'),                       -1, -1
9208   },
9209   {
9210     Xalpha_9,                           TRUE,   FALSE,
9211     EL_CHAR('9'),                       -1, -1
9212   },
9213   {
9214     Xalpha_excla,                       TRUE,   FALSE,
9215     EL_CHAR('!'),                       -1, -1
9216   },
9217   {
9218     Xalpha_apost,                       TRUE,   FALSE,
9219     EL_CHAR('\''),                      -1, -1
9220   },
9221   {
9222     Xalpha_comma,                       TRUE,   FALSE,
9223     EL_CHAR(','),                       -1, -1
9224   },
9225   {
9226     Xalpha_minus,                       TRUE,   FALSE,
9227     EL_CHAR('-'),                       -1, -1
9228   },
9229   {
9230     Xalpha_perio,                       TRUE,   FALSE,
9231     EL_CHAR('.'),                       -1, -1
9232   },
9233   {
9234     Xalpha_colon,                       TRUE,   FALSE,
9235     EL_CHAR(':'),                       -1, -1
9236   },
9237   {
9238     Xalpha_quest,                       TRUE,   FALSE,
9239     EL_CHAR('?'),                       -1, -1
9240   },
9241   {
9242     Xalpha_a,                           TRUE,   FALSE,
9243     EL_CHAR('A'),                       -1, -1
9244   },
9245   {
9246     Xalpha_b,                           TRUE,   FALSE,
9247     EL_CHAR('B'),                       -1, -1
9248   },
9249   {
9250     Xalpha_c,                           TRUE,   FALSE,
9251     EL_CHAR('C'),                       -1, -1
9252   },
9253   {
9254     Xalpha_d,                           TRUE,   FALSE,
9255     EL_CHAR('D'),                       -1, -1
9256   },
9257   {
9258     Xalpha_e,                           TRUE,   FALSE,
9259     EL_CHAR('E'),                       -1, -1
9260   },
9261   {
9262     Xalpha_f,                           TRUE,   FALSE,
9263     EL_CHAR('F'),                       -1, -1
9264   },
9265   {
9266     Xalpha_g,                           TRUE,   FALSE,
9267     EL_CHAR('G'),                       -1, -1
9268   },
9269   {
9270     Xalpha_h,                           TRUE,   FALSE,
9271     EL_CHAR('H'),                       -1, -1
9272   },
9273   {
9274     Xalpha_i,                           TRUE,   FALSE,
9275     EL_CHAR('I'),                       -1, -1
9276   },
9277   {
9278     Xalpha_j,                           TRUE,   FALSE,
9279     EL_CHAR('J'),                       -1, -1
9280   },
9281   {
9282     Xalpha_k,                           TRUE,   FALSE,
9283     EL_CHAR('K'),                       -1, -1
9284   },
9285   {
9286     Xalpha_l,                           TRUE,   FALSE,
9287     EL_CHAR('L'),                       -1, -1
9288   },
9289   {
9290     Xalpha_m,                           TRUE,   FALSE,
9291     EL_CHAR('M'),                       -1, -1
9292   },
9293   {
9294     Xalpha_n,                           TRUE,   FALSE,
9295     EL_CHAR('N'),                       -1, -1
9296   },
9297   {
9298     Xalpha_o,                           TRUE,   FALSE,
9299     EL_CHAR('O'),                       -1, -1
9300   },
9301   {
9302     Xalpha_p,                           TRUE,   FALSE,
9303     EL_CHAR('P'),                       -1, -1
9304   },
9305   {
9306     Xalpha_q,                           TRUE,   FALSE,
9307     EL_CHAR('Q'),                       -1, -1
9308   },
9309   {
9310     Xalpha_r,                           TRUE,   FALSE,
9311     EL_CHAR('R'),                       -1, -1
9312   },
9313   {
9314     Xalpha_s,                           TRUE,   FALSE,
9315     EL_CHAR('S'),                       -1, -1
9316   },
9317   {
9318     Xalpha_t,                           TRUE,   FALSE,
9319     EL_CHAR('T'),                       -1, -1
9320   },
9321   {
9322     Xalpha_u,                           TRUE,   FALSE,
9323     EL_CHAR('U'),                       -1, -1
9324   },
9325   {
9326     Xalpha_v,                           TRUE,   FALSE,
9327     EL_CHAR('V'),                       -1, -1
9328   },
9329   {
9330     Xalpha_w,                           TRUE,   FALSE,
9331     EL_CHAR('W'),                       -1, -1
9332   },
9333   {
9334     Xalpha_x,                           TRUE,   FALSE,
9335     EL_CHAR('X'),                       -1, -1
9336   },
9337   {
9338     Xalpha_y,                           TRUE,   FALSE,
9339     EL_CHAR('Y'),                       -1, -1
9340   },
9341   {
9342     Xalpha_z,                           TRUE,   FALSE,
9343     EL_CHAR('Z'),                       -1, -1
9344   },
9345   {
9346     Xalpha_arrow_e,                     TRUE,   FALSE,
9347     EL_CHAR('>'),                       -1, -1
9348   },
9349   {
9350     Xalpha_arrow_w,                     TRUE,   FALSE,
9351     EL_CHAR('<'),                       -1, -1
9352   },
9353   {
9354     Xalpha_copyr,                       TRUE,   FALSE,
9355     EL_CHAR(CHAR_BYTE_COPYRIGHT),       -1, -1
9356   },
9357
9358   {
9359     Ykey_1_blank,                       FALSE,  FALSE,
9360     EL_EM_KEY_1,                        ACTION_COLLECTING, -1
9361   },
9362   {
9363     Ykey_2_blank,                       FALSE,  FALSE,
9364     EL_EM_KEY_2,                        ACTION_COLLECTING, -1
9365   },
9366   {
9367     Ykey_3_blank,                       FALSE,  FALSE,
9368     EL_EM_KEY_3,                        ACTION_COLLECTING, -1
9369   },
9370   {
9371     Ykey_4_blank,                       FALSE,  FALSE,
9372     EL_EM_KEY_4,                        ACTION_COLLECTING, -1
9373   },
9374   {
9375     Ykey_5_blank,                       FALSE,  FALSE,
9376     EL_EMC_KEY_5,                       ACTION_COLLECTING, -1
9377   },
9378   {
9379     Ykey_6_blank,                       FALSE,  FALSE,
9380     EL_EMC_KEY_6,                       ACTION_COLLECTING, -1
9381   },
9382   {
9383     Ykey_7_blank,                       FALSE,  FALSE,
9384     EL_EMC_KEY_7,                       ACTION_COLLECTING, -1
9385   },
9386   {
9387     Ykey_8_blank,                       FALSE,  FALSE,
9388     EL_EMC_KEY_8,                       ACTION_COLLECTING, -1
9389   },
9390   {
9391     Ylenses_blank,                      FALSE,  FALSE,
9392     EL_EMC_LENSES,                      ACTION_COLLECTING, -1
9393   },
9394   {
9395     Ymagnify_blank,                     FALSE,  FALSE,
9396     EL_EMC_MAGNIFIER,                   ACTION_COLLECTING, -1
9397   },
9398   {
9399     Ygrass_blank,                       FALSE,  FALSE,
9400     EL_EMC_GRASS,                       ACTION_SNAPPING, -1
9401   },
9402   {
9403     Ydirt_blank,                        FALSE,  FALSE,
9404     EL_SAND,                            ACTION_SNAPPING, -1
9405   },
9406
9407   {
9408     -1,                                 FALSE,  FALSE,
9409     -1,                                 -1, -1
9410   }
9411 };
9412
9413 static struct Mapping_EM_to_RND_player
9414 {
9415   int action_em;
9416   int player_nr;
9417
9418   int element_rnd;
9419   int action;
9420   int direction;
9421 }
9422 em_player_mapping_list[MAX_PLAYERS * PLY_MAX + 1] =
9423 {
9424   {
9425     PLY_walk_n,                         0,
9426     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_UP,
9427   },
9428   {
9429     PLY_walk_e,                         0,
9430     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_RIGHT,
9431   },
9432   {
9433     PLY_walk_s,                         0,
9434     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_DOWN,
9435   },
9436   {
9437     PLY_walk_w,                         0,
9438     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_LEFT,
9439   },
9440   {
9441     PLY_push_n,                         0,
9442     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_UP,
9443   },
9444   {
9445     PLY_push_e,                         0,
9446     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_RIGHT,
9447   },
9448   {
9449     PLY_push_s,                         0,
9450     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_DOWN,
9451   },
9452   {
9453     PLY_push_w,                         0,
9454     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_LEFT,
9455   },
9456   {
9457     PLY_shoot_n,                        0,
9458     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_UP,
9459   },
9460   {
9461     PLY_shoot_e,                        0,
9462     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_RIGHT,
9463   },
9464   {
9465     PLY_shoot_s,                        0,
9466     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_DOWN,
9467   },
9468   {
9469     PLY_shoot_w,                        0,
9470     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_LEFT,
9471   },
9472   {
9473     PLY_walk_n,                         1,
9474     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_UP,
9475   },
9476   {
9477     PLY_walk_e,                         1,
9478     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_RIGHT,
9479   },
9480   {
9481     PLY_walk_s,                         1,
9482     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_DOWN,
9483   },
9484   {
9485     PLY_walk_w,                         1,
9486     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_LEFT,
9487   },
9488   {
9489     PLY_push_n,                         1,
9490     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_UP,
9491   },
9492   {
9493     PLY_push_e,                         1,
9494     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_RIGHT,
9495   },
9496   {
9497     PLY_push_s,                         1,
9498     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_DOWN,
9499   },
9500   {
9501     PLY_push_w,                         1,
9502     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_LEFT,
9503   },
9504   {
9505     PLY_shoot_n,                        1,
9506     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_UP,
9507   },
9508   {
9509     PLY_shoot_e,                        1,
9510     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_RIGHT,
9511   },
9512   {
9513     PLY_shoot_s,                        1,
9514     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_DOWN,
9515   },
9516   {
9517     PLY_shoot_w,                        1,
9518     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_LEFT,
9519   },
9520   {
9521     PLY_still,                          0,
9522     EL_PLAYER_1,                        ACTION_DEFAULT, -1,
9523   },
9524   {
9525     PLY_still,                          1,
9526     EL_PLAYER_2,                        ACTION_DEFAULT, -1,
9527   },
9528   {
9529     PLY_walk_n,                         2,
9530     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_UP,
9531   },
9532   {
9533     PLY_walk_e,                         2,
9534     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_RIGHT,
9535   },
9536   {
9537     PLY_walk_s,                         2,
9538     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_DOWN,
9539   },
9540   {
9541     PLY_walk_w,                         2,
9542     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_LEFT,
9543   },
9544   {
9545     PLY_push_n,                         2,
9546     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_UP,
9547   },
9548   {
9549     PLY_push_e,                         2,
9550     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_RIGHT,
9551   },
9552   {
9553     PLY_push_s,                         2,
9554     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_DOWN,
9555   },
9556   {
9557     PLY_push_w,                         2,
9558     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_LEFT,
9559   },
9560   {
9561     PLY_shoot_n,                        2,
9562     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_UP,
9563   },
9564   {
9565     PLY_shoot_e,                        2,
9566     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_RIGHT,
9567   },
9568   {
9569     PLY_shoot_s,                        2,
9570     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_DOWN,
9571   },
9572   {
9573     PLY_shoot_w,                        2,
9574     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_LEFT,
9575   },
9576   {
9577     PLY_walk_n,                         3,
9578     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_UP,
9579   },
9580   {
9581     PLY_walk_e,                         3,
9582     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_RIGHT,
9583   },
9584   {
9585     PLY_walk_s,                         3,
9586     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_DOWN,
9587   },
9588   {
9589     PLY_walk_w,                         3,
9590     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_LEFT,
9591   },
9592   {
9593     PLY_push_n,                         3,
9594     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_UP,
9595   },
9596   {
9597     PLY_push_e,                         3,
9598     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_RIGHT,
9599   },
9600   {
9601     PLY_push_s,                         3,
9602     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_DOWN,
9603   },
9604   {
9605     PLY_push_w,                         3,
9606     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_LEFT,
9607   },
9608   {
9609     PLY_shoot_n,                        3,
9610     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_UP,
9611   },
9612   {
9613     PLY_shoot_e,                        3,
9614     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_RIGHT,
9615   },
9616   {
9617     PLY_shoot_s,                        3,
9618     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_DOWN,
9619   },
9620   {
9621     PLY_shoot_w,                        3,
9622     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_LEFT,
9623   },
9624   {
9625     PLY_still,                          2,
9626     EL_PLAYER_3,                        ACTION_DEFAULT, -1,
9627   },
9628   {
9629     PLY_still,                          3,
9630     EL_PLAYER_4,                        ACTION_DEFAULT, -1,
9631   },
9632
9633   {
9634     -1,                                 -1,
9635     -1,                                 -1, -1
9636   }
9637 };
9638
9639 int map_element_RND_to_EM_cave(int element_rnd)
9640 {
9641   static unsigned short mapping_RND_to_EM[NUM_FILE_ELEMENTS];
9642   static boolean mapping_initialized = FALSE;
9643
9644   if (!mapping_initialized)
9645   {
9646     int i;
9647
9648     // return "Xalpha_quest" for all undefined elements in mapping array
9649     for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9650       mapping_RND_to_EM[i] = Xalpha_quest;
9651
9652     for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
9653       if (em_object_mapping_list[i].is_rnd_to_em_mapping)
9654         mapping_RND_to_EM[em_object_mapping_list[i].element_rnd] =
9655           em_object_mapping_list[i].element_em;
9656
9657     mapping_initialized = TRUE;
9658   }
9659
9660   if (element_rnd < 0 || element_rnd >= NUM_FILE_ELEMENTS)
9661   {
9662     Warn("invalid RND level element %d", element_rnd);
9663
9664     return EL_UNKNOWN;
9665   }
9666
9667   return map_em_element_X_to_C(mapping_RND_to_EM[element_rnd]);
9668 }
9669
9670 int map_element_EM_to_RND_cave(int element_em_cave)
9671 {
9672   static unsigned short mapping_EM_to_RND[GAME_TILE_MAX];
9673   static boolean mapping_initialized = FALSE;
9674
9675   if (!mapping_initialized)
9676   {
9677     int i;
9678
9679     // return "EL_UNKNOWN" for all undefined elements in mapping array
9680     for (i = 0; i < GAME_TILE_MAX; i++)
9681       mapping_EM_to_RND[i] = EL_UNKNOWN;
9682
9683     for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
9684       mapping_EM_to_RND[em_object_mapping_list[i].element_em] =
9685         em_object_mapping_list[i].element_rnd;
9686
9687     mapping_initialized = TRUE;
9688   }
9689
9690   if (element_em_cave < 0 || element_em_cave >= CAVE_TILE_MAX)
9691   {
9692     Warn("invalid EM cave element %d", element_em_cave);
9693
9694     return EL_UNKNOWN;
9695   }
9696
9697   return mapping_EM_to_RND[map_em_element_C_to_X(element_em_cave)];
9698 }
9699
9700 int map_element_EM_to_RND_game(int element_em_game)
9701 {
9702   static unsigned short mapping_EM_to_RND[GAME_TILE_MAX];
9703   static boolean mapping_initialized = FALSE;
9704
9705   if (!mapping_initialized)
9706   {
9707     int i;
9708
9709     // return "EL_UNKNOWN" for all undefined elements in mapping array
9710     for (i = 0; i < GAME_TILE_MAX; i++)
9711       mapping_EM_to_RND[i] = EL_UNKNOWN;
9712
9713     for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
9714       mapping_EM_to_RND[em_object_mapping_list[i].element_em] =
9715         em_object_mapping_list[i].element_rnd;
9716
9717     mapping_initialized = TRUE;
9718   }
9719
9720   if (element_em_game < 0 || element_em_game >= GAME_TILE_MAX)
9721   {
9722     Warn("invalid EM game element %d", element_em_game);
9723
9724     return EL_UNKNOWN;
9725   }
9726
9727   return mapping_EM_to_RND[element_em_game];
9728 }
9729
9730 void map_android_clone_elements_RND_to_EM(struct LevelInfo *level)
9731 {
9732   struct LevelInfo_EM *level_em = level->native_em_level;
9733   struct CAVE *cav = level_em->cav;
9734   int i, j;
9735
9736   for (i = 0; i < GAME_TILE_MAX; i++)
9737     cav->android_array[i] = Cblank;
9738
9739   for (i = 0; i < level->num_android_clone_elements; i++)
9740   {
9741     int element_rnd = level->android_clone_element[i];
9742     int element_em_cave = map_element_RND_to_EM_cave(element_rnd);
9743
9744     for (j = 0; em_object_mapping_list[j].element_em != -1; j++)
9745       if (em_object_mapping_list[j].element_rnd == element_rnd)
9746         cav->android_array[em_object_mapping_list[j].element_em] =
9747           element_em_cave;
9748   }
9749 }
9750
9751 void map_android_clone_elements_EM_to_RND(struct LevelInfo *level)
9752 {
9753   struct LevelInfo_EM *level_em = level->native_em_level;
9754   struct CAVE *cav = level_em->cav;
9755   int i, j;
9756
9757   level->num_android_clone_elements = 0;
9758
9759   for (i = 0; i < GAME_TILE_MAX; i++)
9760   {
9761     int element_em_cave = cav->android_array[i];
9762     int element_rnd;
9763     boolean element_found = FALSE;
9764
9765     if (element_em_cave == Cblank)
9766       continue;
9767
9768     element_rnd = map_element_EM_to_RND_cave(element_em_cave);
9769
9770     for (j = 0; j < level->num_android_clone_elements; j++)
9771       if (level->android_clone_element[j] == element_rnd)
9772         element_found = TRUE;
9773
9774     if (!element_found)
9775     {
9776       level->android_clone_element[level->num_android_clone_elements++] =
9777         element_rnd;
9778
9779       if (level->num_android_clone_elements == MAX_ANDROID_ELEMENTS)
9780         break;
9781     }
9782   }
9783
9784   if (level->num_android_clone_elements == 0)
9785   {
9786     level->num_android_clone_elements = 1;
9787     level->android_clone_element[0] = EL_EMPTY;
9788   }
9789 }
9790
9791 int map_direction_RND_to_EM(int direction)
9792 {
9793   return (direction == MV_UP    ? 0 :
9794           direction == MV_RIGHT ? 1 :
9795           direction == MV_DOWN  ? 2 :
9796           direction == MV_LEFT  ? 3 :
9797           -1);
9798 }
9799
9800 int map_direction_EM_to_RND(int direction)
9801 {
9802   return (direction == 0 ? MV_UP    :
9803           direction == 1 ? MV_RIGHT :
9804           direction == 2 ? MV_DOWN  :
9805           direction == 3 ? MV_LEFT  :
9806           MV_NONE);
9807 }
9808
9809 int map_element_RND_to_SP(int element_rnd)
9810 {
9811   int element_sp = 0x20;        // map unknown elements to yellow "hardware"
9812
9813   if (element_rnd >= EL_SP_START &&
9814       element_rnd <= EL_SP_END)
9815     element_sp = element_rnd - EL_SP_START;
9816   else if (element_rnd == EL_EMPTY_SPACE)
9817     element_sp = 0x00;
9818   else if (element_rnd == EL_INVISIBLE_WALL)
9819     element_sp = 0x28;
9820
9821   return element_sp;
9822 }
9823
9824 int map_element_SP_to_RND(int element_sp)
9825 {
9826   int element_rnd = EL_UNKNOWN;
9827
9828   if (element_sp >= 0x00 &&
9829       element_sp <= 0x27)
9830     element_rnd = EL_SP_START + element_sp;
9831   else if (element_sp == 0x28)
9832     element_rnd = EL_INVISIBLE_WALL;
9833
9834   return element_rnd;
9835 }
9836
9837 int map_action_SP_to_RND(int action_sp)
9838 {
9839   switch (action_sp)
9840   {
9841     case actActive:             return ACTION_ACTIVE;
9842     case actImpact:             return ACTION_IMPACT;
9843     case actExploding:          return ACTION_EXPLODING;
9844     case actDigging:            return ACTION_DIGGING;
9845     case actSnapping:           return ACTION_SNAPPING;
9846     case actCollecting:         return ACTION_COLLECTING;
9847     case actPassing:            return ACTION_PASSING;
9848     case actPushing:            return ACTION_PUSHING;
9849     case actDropping:           return ACTION_DROPPING;
9850
9851     default:                    return ACTION_DEFAULT;
9852   }
9853 }
9854
9855 int map_element_RND_to_MM(int element_rnd)
9856 {
9857   return (element_rnd >= EL_MM_START_1 &&
9858           element_rnd <= EL_MM_END_1 ?
9859           EL_MM_START_1_NATIVE + element_rnd - EL_MM_START_1 :
9860
9861           element_rnd >= EL_MM_START_2 &&
9862           element_rnd <= EL_MM_END_2 ?
9863           EL_MM_START_2_NATIVE + element_rnd - EL_MM_START_2 :
9864
9865           element_rnd >= EL_MM_START_3 &&
9866           element_rnd <= EL_MM_END_3 ?
9867           EL_MM_START_3_NATIVE + element_rnd - EL_MM_START_3 :
9868
9869           element_rnd >= EL_CHAR_START &&
9870           element_rnd <= EL_CHAR_END ?
9871           EL_MM_CHAR_START_NATIVE + element_rnd - EL_CHAR_START :
9872
9873           element_rnd >= EL_MM_RUNTIME_START &&
9874           element_rnd <= EL_MM_RUNTIME_END ?
9875           EL_MM_RUNTIME_START_NATIVE + element_rnd - EL_MM_RUNTIME_START :
9876
9877           EL_MM_EMPTY_NATIVE);
9878 }
9879
9880 int map_element_MM_to_RND(int element_mm)
9881 {
9882   return (element_mm == EL_MM_EMPTY_NATIVE ||
9883           element_mm == EL_DF_EMPTY_NATIVE ?
9884           EL_EMPTY :
9885
9886           element_mm >= EL_MM_START_1_NATIVE &&
9887           element_mm <= EL_MM_END_1_NATIVE ?
9888           EL_MM_START_1 + element_mm - EL_MM_START_1_NATIVE :
9889
9890           element_mm >= EL_MM_START_2_NATIVE &&
9891           element_mm <= EL_MM_END_2_NATIVE ?
9892           EL_MM_START_2 + element_mm - EL_MM_START_2_NATIVE :
9893
9894           element_mm >= EL_MM_START_3_NATIVE &&
9895           element_mm <= EL_MM_END_3_NATIVE ?
9896           EL_MM_START_3 + element_mm - EL_MM_START_3_NATIVE :
9897
9898           element_mm >= EL_MM_CHAR_START_NATIVE &&
9899           element_mm <= EL_MM_CHAR_END_NATIVE ?
9900           EL_CHAR_START + element_mm - EL_MM_CHAR_START_NATIVE :
9901
9902           element_mm >= EL_MM_RUNTIME_START_NATIVE &&
9903           element_mm <= EL_MM_RUNTIME_END_NATIVE ?
9904           EL_MM_RUNTIME_START + element_mm - EL_MM_RUNTIME_START_NATIVE :
9905
9906           EL_EMPTY);
9907 }
9908
9909 int map_action_MM_to_RND(int action_mm)
9910 {
9911   // all MM actions are defined to exactly match their RND counterparts
9912   return action_mm;
9913 }
9914
9915 int map_sound_MM_to_RND(int sound_mm)
9916 {
9917   switch (sound_mm)
9918   {
9919     case SND_MM_GAME_LEVELTIME_CHARGING:
9920       return SND_GAME_LEVELTIME_CHARGING;
9921
9922     case SND_MM_GAME_HEALTH_CHARGING:
9923       return SND_GAME_HEALTH_CHARGING;
9924
9925     default:
9926       return SND_UNDEFINED;
9927   }
9928 }
9929
9930 int map_mm_wall_element(int element)
9931 {
9932   return (element >= EL_MM_STEEL_WALL_START &&
9933           element <= EL_MM_STEEL_WALL_END ?
9934           EL_MM_STEEL_WALL :
9935
9936           element >= EL_MM_WOODEN_WALL_START &&
9937           element <= EL_MM_WOODEN_WALL_END ?
9938           EL_MM_WOODEN_WALL :
9939
9940           element >= EL_MM_ICE_WALL_START &&
9941           element <= EL_MM_ICE_WALL_END ?
9942           EL_MM_ICE_WALL :
9943
9944           element >= EL_MM_AMOEBA_WALL_START &&
9945           element <= EL_MM_AMOEBA_WALL_END ?
9946           EL_MM_AMOEBA_WALL :
9947
9948           element >= EL_DF_STEEL_WALL_START &&
9949           element <= EL_DF_STEEL_WALL_END ?
9950           EL_DF_STEEL_WALL :
9951
9952           element >= EL_DF_WOODEN_WALL_START &&
9953           element <= EL_DF_WOODEN_WALL_END ?
9954           EL_DF_WOODEN_WALL :
9955
9956           element);
9957 }
9958
9959 int map_mm_wall_element_editor(int element)
9960 {
9961   switch (element)
9962   {
9963     case EL_MM_STEEL_WALL:      return EL_MM_STEEL_WALL_START;
9964     case EL_MM_WOODEN_WALL:     return EL_MM_WOODEN_WALL_START;
9965     case EL_MM_ICE_WALL:        return EL_MM_ICE_WALL_START;
9966     case EL_MM_AMOEBA_WALL:     return EL_MM_AMOEBA_WALL_START;
9967     case EL_DF_STEEL_WALL:      return EL_DF_STEEL_WALL_START;
9968     case EL_DF_WOODEN_WALL:     return EL_DF_WOODEN_WALL_START;
9969
9970     default:                    return element;
9971   }
9972 }
9973
9974 int get_next_element(int element)
9975 {
9976   switch (element)
9977   {
9978     case EL_QUICKSAND_FILLING:          return EL_QUICKSAND_FULL;
9979     case EL_QUICKSAND_EMPTYING:         return EL_QUICKSAND_EMPTY;
9980     case EL_QUICKSAND_FAST_FILLING:     return EL_QUICKSAND_FAST_FULL;
9981     case EL_QUICKSAND_FAST_EMPTYING:    return EL_QUICKSAND_FAST_EMPTY;
9982     case EL_MAGIC_WALL_FILLING:         return EL_MAGIC_WALL_FULL;
9983     case EL_MAGIC_WALL_EMPTYING:        return EL_MAGIC_WALL_ACTIVE;
9984     case EL_BD_MAGIC_WALL_FILLING:      return EL_BD_MAGIC_WALL_FULL;
9985     case EL_BD_MAGIC_WALL_EMPTYING:     return EL_BD_MAGIC_WALL_ACTIVE;
9986     case EL_DC_MAGIC_WALL_FILLING:      return EL_DC_MAGIC_WALL_FULL;
9987     case EL_DC_MAGIC_WALL_EMPTYING:     return EL_DC_MAGIC_WALL_ACTIVE;
9988     case EL_AMOEBA_DROPPING:            return EL_AMOEBA_WET;
9989
9990     default:                            return element;
9991   }
9992 }
9993
9994 int el2img_mm(int element_mm)
9995 {
9996   return el2img(map_element_MM_to_RND(element_mm));
9997 }
9998
9999 int el_act2img_mm(int element_mm, int action)
10000 {
10001   return el_act2img(map_element_MM_to_RND(element_mm), action);
10002 }
10003
10004 int el_act_dir2img(int element, int action, int direction)
10005 {
10006   element = GFX_ELEMENT(element);
10007   direction = MV_DIR_TO_BIT(direction); // default: MV_NONE => MV_DOWN
10008
10009   // direction_graphic[][] == graphic[] for undefined direction graphics
10010   return element_info[element].direction_graphic[action][direction];
10011 }
10012
10013 static int el_act_dir2crm(int element, int action, int direction)
10014 {
10015   element = GFX_ELEMENT(element);
10016   direction = MV_DIR_TO_BIT(direction); // default: MV_NONE => MV_DOWN
10017
10018   // direction_graphic[][] == graphic[] for undefined direction graphics
10019   return element_info[element].direction_crumbled[action][direction];
10020 }
10021
10022 int el_act2img(int element, int action)
10023 {
10024   element = GFX_ELEMENT(element);
10025
10026   return element_info[element].graphic[action];
10027 }
10028
10029 int el_act2crm(int element, int action)
10030 {
10031   element = GFX_ELEMENT(element);
10032
10033   return element_info[element].crumbled[action];
10034 }
10035
10036 int el_dir2img(int element, int direction)
10037 {
10038   element = GFX_ELEMENT(element);
10039
10040   return el_act_dir2img(element, ACTION_DEFAULT, direction);
10041 }
10042
10043 int el2baseimg(int element)
10044 {
10045   return element_info[element].graphic[ACTION_DEFAULT];
10046 }
10047
10048 int el2img(int element)
10049 {
10050   element = GFX_ELEMENT(element);
10051
10052   return element_info[element].graphic[ACTION_DEFAULT];
10053 }
10054
10055 int el2edimg(int element)
10056 {
10057   element = GFX_ELEMENT(element);
10058
10059   return element_info[element].special_graphic[GFX_SPECIAL_ARG_EDITOR];
10060 }
10061
10062 int el2preimg(int element)
10063 {
10064   element = GFX_ELEMENT(element);
10065
10066   return element_info[element].special_graphic[GFX_SPECIAL_ARG_PREVIEW];
10067 }
10068
10069 int el2panelimg(int element)
10070 {
10071   element = GFX_ELEMENT(element);
10072
10073   return element_info[element].special_graphic[GFX_SPECIAL_ARG_PANEL];
10074 }
10075
10076 int font2baseimg(int font_nr)
10077 {
10078   return font_info[font_nr].special_graphic[GFX_SPECIAL_ARG_DEFAULT];
10079 }
10080
10081 int getBeltNrFromBeltElement(int element)
10082 {
10083   return (element < EL_CONVEYOR_BELT_2_LEFT ? 0 :
10084           element < EL_CONVEYOR_BELT_3_LEFT ? 1 :
10085           element < EL_CONVEYOR_BELT_4_LEFT ? 2 : 3);
10086 }
10087
10088 int getBeltNrFromBeltActiveElement(int element)
10089 {
10090   return (element < EL_CONVEYOR_BELT_2_LEFT_ACTIVE ? 0 :
10091           element < EL_CONVEYOR_BELT_3_LEFT_ACTIVE ? 1 :
10092           element < EL_CONVEYOR_BELT_4_LEFT_ACTIVE ? 2 : 3);
10093 }
10094
10095 int getBeltNrFromBeltSwitchElement(int element)
10096 {
10097   return (element < EL_CONVEYOR_BELT_2_SWITCH_LEFT ? 0 :
10098           element < EL_CONVEYOR_BELT_3_SWITCH_LEFT ? 1 :
10099           element < EL_CONVEYOR_BELT_4_SWITCH_LEFT ? 2 : 3);
10100 }
10101
10102 int getBeltDirNrFromBeltElement(int element)
10103 {
10104   static int belt_base_element[4] =
10105   {
10106     EL_CONVEYOR_BELT_1_LEFT,
10107     EL_CONVEYOR_BELT_2_LEFT,
10108     EL_CONVEYOR_BELT_3_LEFT,
10109     EL_CONVEYOR_BELT_4_LEFT
10110   };
10111
10112   int belt_nr = getBeltNrFromBeltElement(element);
10113   int belt_dir_nr = element - belt_base_element[belt_nr];
10114
10115   return (belt_dir_nr % 3);
10116 }
10117
10118 int getBeltDirNrFromBeltSwitchElement(int element)
10119 {
10120   static int belt_base_element[4] =
10121   {
10122     EL_CONVEYOR_BELT_1_SWITCH_LEFT,
10123     EL_CONVEYOR_BELT_2_SWITCH_LEFT,
10124     EL_CONVEYOR_BELT_3_SWITCH_LEFT,
10125     EL_CONVEYOR_BELT_4_SWITCH_LEFT
10126   };
10127
10128   int belt_nr = getBeltNrFromBeltSwitchElement(element);
10129   int belt_dir_nr = element - belt_base_element[belt_nr];
10130
10131   return (belt_dir_nr % 3);
10132 }
10133
10134 int getBeltDirFromBeltElement(int element)
10135 {
10136   static int belt_move_dir[3] =
10137   {
10138     MV_LEFT,
10139     MV_NONE,
10140     MV_RIGHT
10141   };
10142
10143   int belt_dir_nr = getBeltDirNrFromBeltElement(element);
10144
10145   return belt_move_dir[belt_dir_nr];
10146 }
10147
10148 int getBeltDirFromBeltSwitchElement(int element)
10149 {
10150   static int belt_move_dir[3] =
10151   {
10152     MV_LEFT,
10153     MV_NONE,
10154     MV_RIGHT
10155   };
10156
10157   int belt_dir_nr = getBeltDirNrFromBeltSwitchElement(element);
10158
10159   return belt_move_dir[belt_dir_nr];
10160 }
10161
10162 int getBeltElementFromBeltNrAndBeltDirNr(int belt_nr, int belt_dir_nr)
10163 {
10164   static int belt_base_element[4] =
10165   {
10166     EL_CONVEYOR_BELT_1_LEFT,
10167     EL_CONVEYOR_BELT_2_LEFT,
10168     EL_CONVEYOR_BELT_3_LEFT,
10169     EL_CONVEYOR_BELT_4_LEFT
10170   };
10171
10172   return belt_base_element[belt_nr] + belt_dir_nr;
10173 }
10174
10175 int getBeltElementFromBeltNrAndBeltDir(int belt_nr, int belt_dir)
10176 {
10177   int belt_dir_nr = (belt_dir == MV_LEFT ? 0 : belt_dir == MV_RIGHT ? 2 : 1);
10178
10179   return getBeltElementFromBeltNrAndBeltDirNr(belt_nr, belt_dir_nr);
10180 }
10181
10182 int getBeltSwitchElementFromBeltNrAndBeltDirNr(int belt_nr, int belt_dir_nr)
10183 {
10184   static int belt_base_element[4] =
10185   {
10186     EL_CONVEYOR_BELT_1_SWITCH_LEFT,
10187     EL_CONVEYOR_BELT_2_SWITCH_LEFT,
10188     EL_CONVEYOR_BELT_3_SWITCH_LEFT,
10189     EL_CONVEYOR_BELT_4_SWITCH_LEFT
10190   };
10191
10192   return belt_base_element[belt_nr] + belt_dir_nr;
10193 }
10194
10195 int getBeltSwitchElementFromBeltNrAndBeltDir(int belt_nr, int belt_dir)
10196 {
10197   int belt_dir_nr = (belt_dir == MV_LEFT ? 0 : belt_dir == MV_RIGHT ? 2 : 1);
10198
10199   return getBeltSwitchElementFromBeltNrAndBeltDirNr(belt_nr, belt_dir_nr);
10200 }
10201
10202 boolean swapTiles_EM(boolean is_pre_emc_cave)
10203 {
10204   return is_pre_emc_cave && leveldir_current->use_emc_tiles;
10205 }
10206
10207 boolean getTeamMode_EM(void)
10208 {
10209   return game.team_mode || network_playing;
10210 }
10211
10212 boolean isActivePlayer_EM(int player_nr)
10213 {
10214   return stored_player[player_nr].active;
10215 }
10216
10217 unsigned int InitRND(int seed)
10218 {
10219   if (level.game_engine_type == GAME_ENGINE_TYPE_BD)
10220     return InitEngineRandom_BD(seed);
10221   else if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
10222     return InitEngineRandom_EM(seed);
10223   else if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
10224     return InitEngineRandom_SP(seed);
10225   else if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
10226     return InitEngineRandom_MM(seed);
10227   else
10228     return InitEngineRandom_RND(seed);
10229 }
10230
10231 static struct Mapping_BD_to_RND_object bd_object_mapping[O_MAX_ALL];
10232 static struct Mapping_EM_to_RND_object em_object_mapping[GAME_TILE_MAX];
10233 static struct Mapping_EM_to_RND_player em_player_mapping[MAX_PLAYERS][PLY_MAX];
10234
10235 static int get_effective_element_EM(int tile, int frame_em)
10236 {
10237   int element             = em_object_mapping[tile].element_rnd;
10238   int action              = em_object_mapping[tile].action;
10239   boolean is_backside     = em_object_mapping[tile].is_backside;
10240   boolean action_removing = (action == ACTION_DIGGING ||
10241                              action == ACTION_SNAPPING ||
10242                              action == ACTION_COLLECTING);
10243
10244   if (frame_em < 7)
10245   {
10246     switch (tile)
10247     {
10248       case Xsplash_e:
10249       case Xsplash_w:
10250         return (frame_em > 5 ? EL_EMPTY : element);
10251
10252       default:
10253         return element;
10254     }
10255   }
10256   else  // frame_em == 7
10257   {
10258     switch (tile)
10259     {
10260       case Xsplash_e:
10261       case Xsplash_w:
10262         return EL_EMPTY;
10263
10264       case Ynut_stone:
10265         return EL_EMERALD;
10266
10267       case Ydiamond_stone:
10268         return EL_ROCK;
10269
10270       case Xdrip_stretch:
10271       case Xdrip_stretchB:
10272       case Ydrip_1_s:
10273       case Ydrip_1_sB:
10274       case Yball_1:
10275       case Xball_2:
10276       case Yball_2:
10277       case Yball_blank:
10278       case Ykey_1_blank:
10279       case Ykey_2_blank:
10280       case Ykey_3_blank:
10281       case Ykey_4_blank:
10282       case Ykey_5_blank:
10283       case Ykey_6_blank:
10284       case Ykey_7_blank:
10285       case Ykey_8_blank:
10286       case Ylenses_blank:
10287       case Ymagnify_blank:
10288       case Ygrass_blank:
10289       case Ydirt_blank:
10290       case Xsand_stonein_1:
10291       case Xsand_stonein_2:
10292       case Xsand_stonein_3:
10293       case Xsand_stonein_4:
10294         return element;
10295
10296       default:
10297         return (is_backside || action_removing ? EL_EMPTY : element);
10298     }
10299   }
10300 }
10301
10302 static boolean check_linear_animation_EM(int tile)
10303 {
10304   switch (tile)
10305   {
10306     case Xsand_stonesand_1:
10307     case Xsand_stonesand_quickout_1:
10308     case Xsand_sandstone_1:
10309     case Xsand_stonein_1:
10310     case Xsand_stoneout_1:
10311     case Xboom_1:
10312     case Xdynamite_1:
10313     case Ybug_w_n:
10314     case Ybug_n_e:
10315     case Ybug_e_s:
10316     case Ybug_s_w:
10317     case Ybug_e_n:
10318     case Ybug_s_e:
10319     case Ybug_w_s:
10320     case Ybug_n_w:
10321     case Ytank_w_n:
10322     case Ytank_n_e:
10323     case Ytank_e_s:
10324     case Ytank_s_w:
10325     case Ytank_e_n:
10326     case Ytank_s_e:
10327     case Ytank_w_s:
10328     case Ytank_n_w:
10329     case Xsplash_e:
10330     case Xsplash_w:
10331     case Ynut_stone:
10332       return TRUE;
10333   }
10334
10335   return FALSE;
10336 }
10337
10338 static void set_crumbled_graphics_EM(struct GraphicInfo_EM *g_em,
10339                                      boolean has_crumbled_graphics,
10340                                      int crumbled, int sync_frame)
10341 {
10342   // if element can be crumbled, but certain action graphics are just empty
10343   // space (like instantly snapping sand to empty space in 1 frame), do not
10344   // treat these empty space graphics as crumbled graphics in EMC engine
10345   if (crumbled == IMG_EMPTY_SPACE)
10346     has_crumbled_graphics = FALSE;
10347
10348   if (has_crumbled_graphics)
10349   {
10350     struct GraphicInfo *g_crumbled = &graphic_info[crumbled];
10351     int frame_crumbled = getAnimationFrame(g_crumbled->anim_frames,
10352                                            g_crumbled->anim_delay,
10353                                            g_crumbled->anim_mode,
10354                                            g_crumbled->anim_start_frame,
10355                                            sync_frame);
10356
10357     getGraphicSource(crumbled, frame_crumbled, &g_em->crumbled_bitmap,
10358                      &g_em->crumbled_src_x, &g_em->crumbled_src_y);
10359
10360     g_em->crumbled_border_size = graphic_info[crumbled].border_size;
10361     g_em->crumbled_tile_size = graphic_info[crumbled].tile_size;
10362
10363     g_em->has_crumbled_graphics = TRUE;
10364   }
10365   else
10366   {
10367     g_em->crumbled_bitmap = NULL;
10368     g_em->crumbled_src_x = 0;
10369     g_em->crumbled_src_y = 0;
10370     g_em->crumbled_border_size = 0;
10371     g_em->crumbled_tile_size = 0;
10372
10373     g_em->has_crumbled_graphics = FALSE;
10374   }
10375 }
10376
10377 #if 0
10378 void ResetGfxAnimation_EM(int x, int y, int tile)
10379 {
10380   GfxFrame[x][y] = 0;
10381 }
10382 #endif
10383
10384 void SetGfxAnimation_EM(struct GraphicInfo_EM *g_em,
10385                         int tile, int frame_em, int x, int y)
10386 {
10387   int action = em_object_mapping[tile].action;
10388   int direction = em_object_mapping[tile].direction;
10389   int effective_element = get_effective_element_EM(tile, frame_em);
10390   int graphic = (direction == MV_NONE ?
10391                  el_act2img(effective_element, action) :
10392                  el_act_dir2img(effective_element, action, direction));
10393   struct GraphicInfo *g = &graphic_info[graphic];
10394   int sync_frame;
10395   boolean action_removing = (action == ACTION_DIGGING ||
10396                              action == ACTION_SNAPPING ||
10397                              action == ACTION_COLLECTING);
10398   boolean action_moving   = (action == ACTION_FALLING ||
10399                              action == ACTION_MOVING ||
10400                              action == ACTION_PUSHING ||
10401                              action == ACTION_EATING ||
10402                              action == ACTION_FILLING ||
10403                              action == ACTION_EMPTYING);
10404   boolean action_falling  = (action == ACTION_FALLING ||
10405                              action == ACTION_FILLING ||
10406                              action == ACTION_EMPTYING);
10407
10408   // special case: graphic uses "2nd movement tile" and has defined
10409   // 7 frames for movement animation (or less) => use default graphic
10410   // for last (8th) frame which ends the movement animation
10411   if (g->double_movement && g->anim_frames < 8 && frame_em == 7)
10412   {
10413     action = ACTION_DEFAULT;    // (keep action_* unchanged for now)
10414     graphic = (direction == MV_NONE ?
10415                el_act2img(effective_element, action) :
10416                el_act_dir2img(effective_element, action, direction));
10417
10418     g = &graphic_info[graphic];
10419   }
10420
10421   if ((action_removing || check_linear_animation_EM(tile)) && frame_em == 0)
10422   {
10423     GfxFrame[x][y] = 0;
10424   }
10425   else if (action_moving)
10426   {
10427     boolean is_backside = em_object_mapping[tile].is_backside;
10428
10429     if (is_backside)
10430     {
10431       int direction = em_object_mapping[tile].direction;
10432       int move_dir = (action_falling ? MV_DOWN : direction);
10433
10434       GfxFrame[x][y]++;
10435
10436 #if 1
10437       // !!! TEST !!! NEW !!! DOES NOT WORK RIGHT YET !!!
10438       if (g->double_movement && frame_em == 0)
10439         GfxFrame[x][y] = 0;
10440 #endif
10441
10442       if (move_dir == MV_LEFT)
10443         GfxFrame[x - 1][y] = GfxFrame[x][y];
10444       else if (move_dir == MV_RIGHT)
10445         GfxFrame[x + 1][y] = GfxFrame[x][y];
10446       else if (move_dir == MV_UP)
10447         GfxFrame[x][y - 1] = GfxFrame[x][y];
10448       else if (move_dir == MV_DOWN)
10449         GfxFrame[x][y + 1] = GfxFrame[x][y];
10450     }
10451   }
10452   else
10453   {
10454     GfxFrame[x][y]++;
10455
10456     // special case: animation for Xsand_stonesand_quickout_1/2 twice as fast
10457     if (tile == Xsand_stonesand_quickout_1 ||
10458         tile == Xsand_stonesand_quickout_2)
10459       GfxFrame[x][y]++;
10460   }
10461
10462   if (graphic_info[graphic].anim_global_sync)
10463     sync_frame = FrameCounter;
10464   else if (graphic_info[graphic].anim_global_anim_sync)
10465     sync_frame = getGlobalAnimSyncFrame();
10466   else if (IN_FIELD(x, y, MAX_LEV_FIELDX, MAX_LEV_FIELDY))
10467     sync_frame = GfxFrame[x][y];
10468   else
10469     sync_frame = 0;     // playfield border (pseudo steel)
10470
10471   SetRandomAnimationValue(x, y);
10472
10473   int frame = getAnimationFrame(g->anim_frames,
10474                                 g->anim_delay,
10475                                 g->anim_mode,
10476                                 g->anim_start_frame,
10477                                 sync_frame);
10478
10479   g_em->unique_identifier =
10480     (graphic << 16) | ((frame % 8) << 12) | (g_em->width << 6) | g_em->height;
10481 }
10482
10483 void getGraphicSourceObjectExt_EM(struct GraphicInfo_EM *g_em,
10484                                   int tile, int frame_em, int x, int y)
10485 {
10486   int action = em_object_mapping[tile].action;
10487   int direction = em_object_mapping[tile].direction;
10488   boolean is_backside = em_object_mapping[tile].is_backside;
10489   int effective_element = get_effective_element_EM(tile, frame_em);
10490   int effective_action = action;
10491   int graphic = (direction == MV_NONE ?
10492                  el_act2img(effective_element, effective_action) :
10493                  el_act_dir2img(effective_element, effective_action,
10494                                 direction));
10495   int crumbled = (direction == MV_NONE ?
10496                   el_act2crm(effective_element, effective_action) :
10497                   el_act_dir2crm(effective_element, effective_action,
10498                                  direction));
10499   int base_graphic = el_act2img(effective_element, ACTION_DEFAULT);
10500   int base_crumbled = el_act2crm(effective_element, ACTION_DEFAULT);
10501   boolean has_crumbled_graphics = (base_crumbled != base_graphic);
10502   struct GraphicInfo *g = &graphic_info[graphic];
10503   int sync_frame;
10504
10505   // special case: graphic uses "2nd movement tile" and has defined
10506   // 7 frames for movement animation (or less) => use default graphic
10507   // for last (8th) frame which ends the movement animation
10508   if (g->double_movement && g->anim_frames < 8 && frame_em == 7)
10509   {
10510     effective_action = ACTION_DEFAULT;
10511     graphic = (direction == MV_NONE ?
10512                el_act2img(effective_element, effective_action) :
10513                el_act_dir2img(effective_element, effective_action,
10514                               direction));
10515     crumbled = (direction == MV_NONE ?
10516                 el_act2crm(effective_element, effective_action) :
10517                 el_act_dir2crm(effective_element, effective_action,
10518                                direction));
10519
10520     g = &graphic_info[graphic];
10521   }
10522
10523   if (graphic_info[graphic].anim_global_sync)
10524     sync_frame = FrameCounter;
10525   else if (graphic_info[graphic].anim_global_anim_sync)
10526     sync_frame = getGlobalAnimSyncFrame();
10527   else if (IN_FIELD(x, y, MAX_LEV_FIELDX, MAX_LEV_FIELDY))
10528     sync_frame = GfxFrame[x][y];
10529   else
10530     sync_frame = 0;     // playfield border (pseudo steel)
10531
10532   SetRandomAnimationValue(x, y);
10533
10534   int frame = getAnimationFrame(g->anim_frames,
10535                                 g->anim_delay,
10536                                 g->anim_mode,
10537                                 g->anim_start_frame,
10538                                 sync_frame);
10539
10540   getGraphicSourceExt(graphic, frame, &g_em->bitmap, &g_em->src_x, &g_em->src_y,
10541                       g->double_movement && is_backside);
10542
10543   // (updating the "crumbled" graphic definitions is probably not really needed,
10544   // as animations for crumbled graphics can't be longer than one EMC cycle)
10545   set_crumbled_graphics_EM(g_em, has_crumbled_graphics, crumbled,
10546                            sync_frame);
10547 }
10548
10549 void getGraphicSourcePlayerExt_EM(struct GraphicInfo_EM *g_em,
10550                                   int player_nr, int anim, int frame_em)
10551 {
10552   int element   = em_player_mapping[player_nr][anim].element_rnd;
10553   int action    = em_player_mapping[player_nr][anim].action;
10554   int direction = em_player_mapping[player_nr][anim].direction;
10555   int graphic = (direction == MV_NONE ?
10556                  el_act2img(element, action) :
10557                  el_act_dir2img(element, action, direction));
10558   struct GraphicInfo *g = &graphic_info[graphic];
10559   int sync_frame;
10560
10561   InitPlayerGfxAnimation(&stored_player[player_nr], action, direction);
10562
10563   stored_player[player_nr].StepFrame = frame_em;
10564
10565   sync_frame = stored_player[player_nr].Frame;
10566
10567   int frame = getAnimationFrame(g->anim_frames,
10568                                 g->anim_delay,
10569                                 g->anim_mode,
10570                                 g->anim_start_frame,
10571                                 sync_frame);
10572
10573   getGraphicSourceExt(graphic, frame, &g_em->bitmap,
10574                       &g_em->src_x, &g_em->src_y, FALSE);
10575 }
10576
10577 #define BD_GFX_RANGE(a, n, i)           ((i) >= (a) && (i) < (a) + (n))
10578 #define BD_GFX_FRAME(b, i)              (((i) - (b)) * 8)
10579
10580 void InitGraphicInfo_BD(void)
10581 {
10582   int i, j;
10583
10584   // always start with reliable default values
10585   for (i = 0; i < O_MAX_ALL; i++)
10586   {
10587     bd_object_mapping[i].element_rnd = EL_UNKNOWN;
10588     bd_object_mapping[i].action = ACTION_DEFAULT;
10589     bd_object_mapping[i].direction = MV_NONE;
10590   }
10591
10592   for (i = 0; bd_object_mapping_list[i].element_bd != -1; i++)
10593   {
10594     int e = bd_object_mapping_list[i].element_bd;
10595
10596     bd_object_mapping[e].element_rnd = bd_object_mapping_list[i].element_rnd;
10597
10598     if (bd_object_mapping_list[i].action != -1)
10599       bd_object_mapping[e].action = bd_object_mapping_list[i].action;
10600
10601     if (bd_object_mapping_list[i].direction != -1)
10602       bd_object_mapping[e].direction =
10603         MV_DIR_FROM_BIT(bd_object_mapping_list[i].direction);
10604   }
10605
10606   for (i = 0; i < O_MAX_ALL; i++)
10607   {
10608     int element = bd_object_mapping[i].element_rnd;
10609     int action = bd_object_mapping[i].action;
10610     int direction = bd_object_mapping[i].direction;
10611
10612     for (j = 0; j < 8; j++)
10613     {
10614       int effective_element = element;
10615       int effective_action = action;
10616       int graphic = (el_act_dir2img(effective_element, effective_action,
10617                                     direction));
10618       struct GraphicInfo *g = &graphic_info[graphic];
10619       struct GraphicInfo_BD *g_bd = &graphic_info_bd_object[i][j];
10620       Bitmap *src_bitmap;
10621       int src_x, src_y;
10622       int sync_frame = (BD_GFX_RANGE(O_PRE_PL_1, 3, i)        ? BD_GFX_FRAME(O_PRE_PL_1, i) :
10623                         BD_GFX_RANGE(O_PRE_DIA_1, 5, i)       ? BD_GFX_FRAME(O_PRE_DIA_1, i) :
10624                         BD_GFX_RANGE(O_PRE_STONE_1, 4, i)     ? BD_GFX_FRAME(O_PRE_STONE_1, i) :
10625                         BD_GFX_RANGE(O_PRE_STEEL_1, 4, i)     ? BD_GFX_FRAME(O_PRE_STEEL_1, i) :
10626                         BD_GFX_RANGE(O_BOMB_TICK_1, 7, i)     ? BD_GFX_FRAME(O_BOMB_TICK_1, i) :
10627                         BD_GFX_RANGE(O_BOMB_EXPL_1, 4, i)     ? BD_GFX_FRAME(O_BOMB_EXPL_1, i) :
10628                         BD_GFX_RANGE(O_NUT_EXPL_1, 4, i)      ? BD_GFX_FRAME(O_NUT_EXPL_1, i) :
10629                         BD_GFX_RANGE(O_GHOST_EXPL_1, 4, i)    ? BD_GFX_FRAME(O_GHOST_EXPL_1, i) :
10630                         BD_GFX_RANGE(O_EXPLODE_1, 5, i)       ? BD_GFX_FRAME(O_EXPLODE_1, i) :
10631                         BD_GFX_RANGE(O_PRE_CLOCK_1, 4, i)     ? BD_GFX_FRAME(O_PRE_CLOCK_1, i) :
10632                         BD_GFX_RANGE(O_NITRO_EXPL_1, 4, i)    ? BD_GFX_FRAME(O_NITRO_EXPL_1, i) :
10633                         BD_GFX_RANGE(O_AMOEBA_2_EXPL_1, 4, i) ? BD_GFX_FRAME(O_AMOEBA_2_EXPL_1, i):
10634                         i == O_INBOX_OPEN || i == O_OUTBOX_OPEN ? j :
10635                         j * 2);
10636       int frame = getAnimationFrame(g->anim_frames,
10637                                     g->anim_delay,
10638                                     g->anim_mode,
10639                                     g->anim_start_frame,
10640                                     sync_frame);
10641
10642       getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, FALSE);
10643
10644       g_bd->bitmap = src_bitmap;
10645       g_bd->src_x  = src_x;
10646       g_bd->src_y  = src_y;
10647       g_bd->width  = TILEX;
10648       g_bd->height = TILEY;
10649
10650       g_bd->graphic = graphic;
10651       g_bd->frame = frame;
10652     }
10653   }
10654
10655   // game graphics template for level-specific colors for native BD levels
10656   int graphic = IMG_BD_GAME_GRAPHICS_COLOR_TEMPLATE;
10657   struct GraphicInfo_BD *g_bd = &graphic_info_bd_color_template;
10658   Bitmap *src_bitmap;
10659   int src_x, src_y;
10660
10661   getGraphicSourceExt(graphic, 0, &src_bitmap, &src_x, &src_y, FALSE);
10662
10663   g_bd->bitmap = src_bitmap;
10664   g_bd->src_x  = src_x;
10665   g_bd->src_y  = src_y;
10666   g_bd->width  = TILEX;
10667   g_bd->height = TILEY;
10668
10669   g_bd->graphic = graphic;
10670   g_bd->frame = 0;
10671 }
10672
10673 void InitGraphicInfo_EM(void)
10674 {
10675   int i, j, p;
10676
10677   // always start with reliable default values
10678   for (i = 0; i < GAME_TILE_MAX; i++)
10679   {
10680     em_object_mapping[i].element_rnd = EL_UNKNOWN;
10681     em_object_mapping[i].is_backside = FALSE;
10682     em_object_mapping[i].action = ACTION_DEFAULT;
10683     em_object_mapping[i].direction = MV_NONE;
10684   }
10685
10686   // always start with reliable default values
10687   for (p = 0; p < MAX_PLAYERS; p++)
10688   {
10689     for (i = 0; i < PLY_MAX; i++)
10690     {
10691       em_player_mapping[p][i].element_rnd = EL_UNKNOWN;
10692       em_player_mapping[p][i].action = ACTION_DEFAULT;
10693       em_player_mapping[p][i].direction = MV_NONE;
10694     }
10695   }
10696
10697   for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
10698   {
10699     int e = em_object_mapping_list[i].element_em;
10700
10701     em_object_mapping[e].element_rnd = em_object_mapping_list[i].element_rnd;
10702     em_object_mapping[e].is_backside = em_object_mapping_list[i].is_backside;
10703
10704     if (em_object_mapping_list[i].action != -1)
10705       em_object_mapping[e].action = em_object_mapping_list[i].action;
10706
10707     if (em_object_mapping_list[i].direction != -1)
10708       em_object_mapping[e].direction =
10709         MV_DIR_FROM_BIT(em_object_mapping_list[i].direction);
10710   }
10711
10712   for (i = 0; em_player_mapping_list[i].action_em != -1; i++)
10713   {
10714     int a = em_player_mapping_list[i].action_em;
10715     int p = em_player_mapping_list[i].player_nr;
10716
10717     em_player_mapping[p][a].element_rnd = em_player_mapping_list[i].element_rnd;
10718
10719     if (em_player_mapping_list[i].action != -1)
10720       em_player_mapping[p][a].action = em_player_mapping_list[i].action;
10721
10722     if (em_player_mapping_list[i].direction != -1)
10723       em_player_mapping[p][a].direction =
10724         MV_DIR_FROM_BIT(em_player_mapping_list[i].direction);
10725   }
10726
10727   for (i = 0; i < GAME_TILE_MAX; i++)
10728   {
10729     int element = em_object_mapping[i].element_rnd;
10730     int action = em_object_mapping[i].action;
10731     int direction = em_object_mapping[i].direction;
10732     boolean is_backside = em_object_mapping[i].is_backside;
10733     boolean action_exploding = ((action == ACTION_EXPLODING ||
10734                                  action == ACTION_SMASHED_BY_ROCK ||
10735                                  action == ACTION_SMASHED_BY_SPRING) &&
10736                                 element != EL_DIAMOND);
10737     boolean action_active = (action == ACTION_ACTIVE);
10738     boolean action_other = (action == ACTION_OTHER);
10739
10740     for (j = 0; j < 8; j++)
10741     {
10742       int effective_element = get_effective_element_EM(i, j);
10743       int effective_action = (j < 7 ? action :
10744                               i == Xdrip_stretch ? action :
10745                               i == Xdrip_stretchB ? action :
10746                               i == Ydrip_1_s ? action :
10747                               i == Ydrip_1_sB ? action :
10748                               i == Yball_1 ? action :
10749                               i == Xball_2 ? action :
10750                               i == Yball_2 ? action :
10751                               i == Yball_blank ? action :
10752                               i == Ykey_1_blank ? action :
10753                               i == Ykey_2_blank ? action :
10754                               i == Ykey_3_blank ? action :
10755                               i == Ykey_4_blank ? action :
10756                               i == Ykey_5_blank ? action :
10757                               i == Ykey_6_blank ? action :
10758                               i == Ykey_7_blank ? action :
10759                               i == Ykey_8_blank ? action :
10760                               i == Ylenses_blank ? action :
10761                               i == Ymagnify_blank ? action :
10762                               i == Ygrass_blank ? action :
10763                               i == Ydirt_blank ? action :
10764                               i == Xsand_stonein_1 ? action :
10765                               i == Xsand_stonein_2 ? action :
10766                               i == Xsand_stonein_3 ? action :
10767                               i == Xsand_stonein_4 ? action :
10768                               i == Xsand_stoneout_1 ? action :
10769                               i == Xsand_stoneout_2 ? action :
10770                               i == Xboom_android ? ACTION_EXPLODING :
10771                               action_exploding ? ACTION_EXPLODING :
10772                               action_active ? action :
10773                               action_other ? action :
10774                               ACTION_DEFAULT);
10775       int graphic = (el_act_dir2img(effective_element, effective_action,
10776                                     direction));
10777       int crumbled = (el_act_dir2crm(effective_element, effective_action,
10778                                      direction));
10779       int base_graphic = el_act2img(effective_element, ACTION_DEFAULT);
10780       int base_crumbled = el_act2crm(effective_element, ACTION_DEFAULT);
10781       boolean has_action_graphics = (graphic != base_graphic);
10782       boolean has_crumbled_graphics = (base_crumbled != base_graphic);
10783       struct GraphicInfo *g = &graphic_info[graphic];
10784       struct GraphicInfo_EM *g_em = &graphic_info_em_object[i][j];
10785       Bitmap *src_bitmap;
10786       int src_x, src_y;
10787       // ensure to get symmetric 3-frame, 2-delay animations as used in EM
10788       boolean special_animation = (action != ACTION_DEFAULT &&
10789                                    g->anim_frames == 3 &&
10790                                    g->anim_delay == 2 &&
10791                                    g->anim_mode & ANIM_LINEAR);
10792       int sync_frame = (i == Xdrip_stretch ? 7 :
10793                         i == Xdrip_stretchB ? 7 :
10794                         i == Ydrip_2_s ? j + 8 :
10795                         i == Ydrip_2_sB ? j + 8 :
10796                         i == Xacid_1 ? 0 :
10797                         i == Xacid_2 ? 10 :
10798                         i == Xacid_3 ? 20 :
10799                         i == Xacid_4 ? 30 :
10800                         i == Xacid_5 ? 40 :
10801                         i == Xacid_6 ? 50 :
10802                         i == Xacid_7 ? 60 :
10803                         i == Xacid_8 ? 70 :
10804                         i == Xfake_acid_1 ? 0 :
10805                         i == Xfake_acid_2 ? 10 :
10806                         i == Xfake_acid_3 ? 20 :
10807                         i == Xfake_acid_4 ? 30 :
10808                         i == Xfake_acid_5 ? 40 :
10809                         i == Xfake_acid_6 ? 50 :
10810                         i == Xfake_acid_7 ? 60 :
10811                         i == Xfake_acid_8 ? 70 :
10812                         i == Xfake_acid_1_player ? 0 :
10813                         i == Xfake_acid_2_player ? 10 :
10814                         i == Xfake_acid_3_player ? 20 :
10815                         i == Xfake_acid_4_player ? 30 :
10816                         i == Xfake_acid_5_player ? 40 :
10817                         i == Xfake_acid_6_player ? 50 :
10818                         i == Xfake_acid_7_player ? 60 :
10819                         i == Xfake_acid_8_player ? 70 :
10820                         i == Xball_2 ? 7 :
10821                         i == Yball_2 ? j + 8 :
10822                         i == Yball_blank ? j + 1 :
10823                         i == Ykey_1_blank ? j + 1 :
10824                         i == Ykey_2_blank ? j + 1 :
10825                         i == Ykey_3_blank ? j + 1 :
10826                         i == Ykey_4_blank ? j + 1 :
10827                         i == Ykey_5_blank ? j + 1 :
10828                         i == Ykey_6_blank ? j + 1 :
10829                         i == Ykey_7_blank ? j + 1 :
10830                         i == Ykey_8_blank ? j + 1 :
10831                         i == Ylenses_blank ? j + 1 :
10832                         i == Ymagnify_blank ? j + 1 :
10833                         i == Ygrass_blank ? j + 1 :
10834                         i == Ydirt_blank ? j + 1 :
10835                         i == Xamoeba_1 ? 0 :
10836                         i == Xamoeba_2 ? 1 :
10837                         i == Xamoeba_3 ? 2 :
10838                         i == Xamoeba_4 ? 3 :
10839                         i == Xamoeba_5 ? 0 :
10840                         i == Xamoeba_6 ? 1 :
10841                         i == Xamoeba_7 ? 2 :
10842                         i == Xamoeba_8 ? 3 :
10843                         i == Xexit_2 ? j + 8 :
10844                         i == Xexit_3 ? j + 16 :
10845                         i == Xdynamite_1 ? 0 :
10846                         i == Xdynamite_2 ? 8 :
10847                         i == Xdynamite_3 ? 16 :
10848                         i == Xdynamite_4 ? 24 :
10849                         i == Xsand_stonein_1 ? j + 1 :
10850                         i == Xsand_stonein_2 ? j + 9 :
10851                         i == Xsand_stonein_3 ? j + 17 :
10852                         i == Xsand_stonein_4 ? j + 25 :
10853                         i == Xsand_stoneout_1 && j == 0 ? 0 :
10854                         i == Xsand_stoneout_1 && j == 1 ? 0 :
10855                         i == Xsand_stoneout_1 && j == 2 ? 1 :
10856                         i == Xsand_stoneout_1 && j == 3 ? 2 :
10857                         i == Xsand_stoneout_1 && j == 4 ? 2 :
10858                         i == Xsand_stoneout_1 && j == 5 ? 3 :
10859                         i == Xsand_stoneout_1 && j == 6 ? 4 :
10860                         i == Xsand_stoneout_1 && j == 7 ? 4 :
10861                         i == Xsand_stoneout_2 && j == 0 ? 5 :
10862                         i == Xsand_stoneout_2 && j == 1 ? 6 :
10863                         i == Xsand_stoneout_2 && j == 2 ? 7 :
10864                         i == Xsand_stoneout_2 && j == 3 ? 8 :
10865                         i == Xsand_stoneout_2 && j == 4 ? 9 :
10866                         i == Xsand_stoneout_2 && j == 5 ? 11 :
10867                         i == Xsand_stoneout_2 && j == 6 ? 13 :
10868                         i == Xsand_stoneout_2 && j == 7 ? 15 :
10869                         i == Xboom_bug && j == 1 ? 2 :
10870                         i == Xboom_bug && j == 2 ? 2 :
10871                         i == Xboom_bug && j == 3 ? 4 :
10872                         i == Xboom_bug && j == 4 ? 4 :
10873                         i == Xboom_bug && j == 5 ? 2 :
10874                         i == Xboom_bug && j == 6 ? 2 :
10875                         i == Xboom_bug && j == 7 ? 0 :
10876                         i == Xboom_tank && j == 1 ? 2 :
10877                         i == Xboom_tank && j == 2 ? 2 :
10878                         i == Xboom_tank && j == 3 ? 4 :
10879                         i == Xboom_tank && j == 4 ? 4 :
10880                         i == Xboom_tank && j == 5 ? 2 :
10881                         i == Xboom_tank && j == 6 ? 2 :
10882                         i == Xboom_tank && j == 7 ? 0 :
10883                         i == Xboom_android && j == 7 ? 6 :
10884                         i == Xboom_1 && j == 1 ? 2 :
10885                         i == Xboom_1 && j == 2 ? 2 :
10886                         i == Xboom_1 && j == 3 ? 4 :
10887                         i == Xboom_1 && j == 4 ? 4 :
10888                         i == Xboom_1 && j == 5 ? 6 :
10889                         i == Xboom_1 && j == 6 ? 6 :
10890                         i == Xboom_1 && j == 7 ? 8 :
10891                         i == Xboom_2 && j == 0 ? 8 :
10892                         i == Xboom_2 && j == 1 ? 8 :
10893                         i == Xboom_2 && j == 2 ? 10 :
10894                         i == Xboom_2 && j == 3 ? 10 :
10895                         i == Xboom_2 && j == 4 ? 10 :
10896                         i == Xboom_2 && j == 5 ? 12 :
10897                         i == Xboom_2 && j == 6 ? 12 :
10898                         i == Xboom_2 && j == 7 ? 12 :
10899                         special_animation && j == 4 ? 3 :
10900                         effective_action != action ? 0 :
10901                         j);
10902       int frame = getAnimationFrame(g->anim_frames,
10903                                     g->anim_delay,
10904                                     g->anim_mode,
10905                                     g->anim_start_frame,
10906                                     sync_frame);
10907
10908       getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y,
10909                           g->double_movement && is_backside);
10910
10911       g_em->bitmap = src_bitmap;
10912       g_em->src_x = src_x;
10913       g_em->src_y = src_y;
10914       g_em->src_offset_x = 0;
10915       g_em->src_offset_y = 0;
10916       g_em->dst_offset_x = 0;
10917       g_em->dst_offset_y = 0;
10918       g_em->width  = TILEX;
10919       g_em->height = TILEY;
10920
10921       g_em->preserve_background = FALSE;
10922
10923       set_crumbled_graphics_EM(g_em, has_crumbled_graphics, crumbled,
10924                                sync_frame);
10925
10926       if ((!g->double_movement && (effective_action == ACTION_FALLING ||
10927                                    effective_action == ACTION_MOVING  ||
10928                                    effective_action == ACTION_PUSHING ||
10929                                    effective_action == ACTION_EATING)) ||
10930           (!has_action_graphics && (effective_action == ACTION_FILLING ||
10931                                     effective_action == ACTION_EMPTYING)))
10932       {
10933         int move_dir =
10934           (effective_action == ACTION_FALLING ||
10935            effective_action == ACTION_FILLING ||
10936            effective_action == ACTION_EMPTYING ? MV_DOWN : direction);
10937         int dx = (move_dir == MV_LEFT ? -1 : move_dir == MV_RIGHT ? 1 : 0);
10938         int dy = (move_dir == MV_UP   ? -1 : move_dir == MV_DOWN  ? 1 : 0);
10939         int num_steps = (i == Ydrip_1_s  ? 16 :
10940                          i == Ydrip_1_sB ? 16 :
10941                          i == Ydrip_2_s  ? 16 :
10942                          i == Ydrip_2_sB ? 16 :
10943                          i == Xsand_stonein_1 ? 32 :
10944                          i == Xsand_stonein_2 ? 32 :
10945                          i == Xsand_stonein_3 ? 32 :
10946                          i == Xsand_stonein_4 ? 32 :
10947                          i == Xsand_stoneout_1 ? 16 :
10948                          i == Xsand_stoneout_2 ? 16 : 8);
10949         int cx = ABS(dx) * (TILEX / num_steps);
10950         int cy = ABS(dy) * (TILEY / num_steps);
10951         int step_frame = (i == Ydrip_2_s        ? j + 8 :
10952                           i == Ydrip_2_sB       ? j + 8 :
10953                           i == Xsand_stonein_2  ? j + 8 :
10954                           i == Xsand_stonein_3  ? j + 16 :
10955                           i == Xsand_stonein_4  ? j + 24 :
10956                           i == Xsand_stoneout_2 ? j + 8 : j) + 1;
10957         int step = (is_backside ? step_frame : num_steps - step_frame);
10958
10959         if (is_backside)        // tile where movement starts
10960         {
10961           if (dx < 0 || dy < 0)
10962           {
10963             g_em->src_offset_x = cx * step;
10964             g_em->src_offset_y = cy * step;
10965           }
10966           else
10967           {
10968             g_em->dst_offset_x = cx * step;
10969             g_em->dst_offset_y = cy * step;
10970           }
10971         }
10972         else                    // tile where movement ends
10973         {
10974           if (dx < 0 || dy < 0)
10975           {
10976             g_em->dst_offset_x = cx * step;
10977             g_em->dst_offset_y = cy * step;
10978           }
10979           else
10980           {
10981             g_em->src_offset_x = cx * step;
10982             g_em->src_offset_y = cy * step;
10983           }
10984         }
10985
10986         g_em->width  = TILEX - cx * step;
10987         g_em->height = TILEY - cy * step;
10988       }
10989
10990       // create unique graphic identifier to decide if tile must be redrawn
10991       /* bit 31 - 16 (16 bit): EM style graphic
10992          bit 15 - 12 ( 4 bit): EM style frame
10993          bit 11 -  6 ( 6 bit): graphic width
10994          bit  5 -  0 ( 6 bit): graphic height */
10995       g_em->unique_identifier =
10996         (graphic << 16) | (frame << 12) | (g_em->width << 6) | g_em->height;
10997     }
10998   }
10999
11000   for (i = 0; i < GAME_TILE_MAX; i++)
11001   {
11002     for (j = 0; j < 8; j++)
11003     {
11004       int element = em_object_mapping[i].element_rnd;
11005       int action = em_object_mapping[i].action;
11006       int direction = em_object_mapping[i].direction;
11007       boolean is_backside = em_object_mapping[i].is_backside;
11008       int graphic_action  = el_act_dir2img(element, action, direction);
11009       int graphic_default = el_act_dir2img(element, ACTION_DEFAULT, direction);
11010
11011       if ((action == ACTION_SMASHED_BY_ROCK ||
11012            action == ACTION_SMASHED_BY_SPRING ||
11013            action == ACTION_EATING) &&
11014           graphic_action == graphic_default)
11015       {
11016         int e = (action == ACTION_SMASHED_BY_ROCK   ? Ystone_s  :
11017                  action == ACTION_SMASHED_BY_SPRING ? Yspring_s :
11018                  direction == MV_LEFT  ? (is_backside? Yspring_wB: Yspring_w) :
11019                  direction == MV_RIGHT ? (is_backside? Yspring_eB: Yspring_e) :
11020                  Xspring);
11021
11022         // no separate animation for "smashed by rock" -- use rock instead
11023         struct GraphicInfo_EM *g_em = &graphic_info_em_object[i][j];
11024         struct GraphicInfo_EM *g_xx = &graphic_info_em_object[e][j];
11025
11026         g_em->bitmap            = g_xx->bitmap;
11027         g_em->src_x             = g_xx->src_x;
11028         g_em->src_y             = g_xx->src_y;
11029         g_em->src_offset_x      = g_xx->src_offset_x;
11030         g_em->src_offset_y      = g_xx->src_offset_y;
11031         g_em->dst_offset_x      = g_xx->dst_offset_x;
11032         g_em->dst_offset_y      = g_xx->dst_offset_y;
11033         g_em->width             = g_xx->width;
11034         g_em->height            = g_xx->height;
11035         g_em->unique_identifier = g_xx->unique_identifier;
11036
11037         if (!is_backside)
11038           g_em->preserve_background = TRUE;
11039       }
11040     }
11041   }
11042
11043   for (p = 0; p < MAX_PLAYERS; p++)
11044   {
11045     for (i = 0; i < PLY_MAX; i++)
11046     {
11047       int element = em_player_mapping[p][i].element_rnd;
11048       int action = em_player_mapping[p][i].action;
11049       int direction = em_player_mapping[p][i].direction;
11050
11051       for (j = 0; j < 8; j++)
11052       {
11053         int effective_element = element;
11054         int effective_action = action;
11055         int graphic = (direction == MV_NONE ?
11056                        el_act2img(effective_element, effective_action) :
11057                        el_act_dir2img(effective_element, effective_action,
11058                                       direction));
11059         struct GraphicInfo *g = &graphic_info[graphic];
11060         struct GraphicInfo_EM *g_em = &graphic_info_em_player[p][i][j];
11061         Bitmap *src_bitmap;
11062         int src_x, src_y;
11063         int sync_frame = j;
11064         int frame = getAnimationFrame(g->anim_frames,
11065                                       g->anim_delay,
11066                                       g->anim_mode,
11067                                       g->anim_start_frame,
11068                                       sync_frame);
11069
11070         getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, FALSE);
11071
11072         g_em->bitmap = src_bitmap;
11073         g_em->src_x = src_x;
11074         g_em->src_y = src_y;
11075         g_em->src_offset_x = 0;
11076         g_em->src_offset_y = 0;
11077         g_em->dst_offset_x = 0;
11078         g_em->dst_offset_y = 0;
11079         g_em->width  = TILEX;
11080         g_em->height = TILEY;
11081       }
11082     }
11083   }
11084 }
11085
11086 static void CheckSaveEngineSnapshot_EM(int frame,
11087                                        boolean any_player_moving,
11088                                        boolean any_player_snapping,
11089                                        boolean any_player_dropping)
11090 {
11091   if (frame == 7 && !any_player_dropping)
11092   {
11093     if (!local_player->was_waiting)
11094     {
11095       if (!CheckSaveEngineSnapshotToList())
11096         return;
11097
11098       local_player->was_waiting = TRUE;
11099     }
11100   }
11101   else if (any_player_moving || any_player_snapping || any_player_dropping)
11102   {
11103     local_player->was_waiting = FALSE;
11104   }
11105 }
11106
11107 static void CheckSaveEngineSnapshot_SP(boolean murphy_is_waiting,
11108                                        boolean murphy_is_dropping)
11109 {
11110   if (murphy_is_waiting)
11111   {
11112     if (!local_player->was_waiting)
11113     {
11114       if (!CheckSaveEngineSnapshotToList())
11115         return;
11116
11117       local_player->was_waiting = TRUE;
11118     }
11119   }
11120   else
11121   {
11122     local_player->was_waiting = FALSE;
11123   }
11124 }
11125
11126 static void CheckSaveEngineSnapshot_MM(boolean element_clicked,
11127                                        boolean button_released)
11128 {
11129   if (button_released)
11130   {
11131     if (game.snapshot.mode == SNAPSHOT_MODE_EVERY_MOVE)
11132       CheckSaveEngineSnapshotToList();
11133   }
11134   else if (element_clicked)
11135   {
11136     if (game.snapshot.mode != SNAPSHOT_MODE_EVERY_MOVE)
11137       CheckSaveEngineSnapshotToList();
11138
11139     game.snapshot.changed_action = TRUE;
11140   }
11141 }
11142
11143 boolean CheckSingleStepMode_EM(int frame,
11144                                boolean any_player_moving,
11145                                boolean any_player_snapping,
11146                                boolean any_player_dropping)
11147 {
11148   if (tape.single_step && tape.recording && !tape.pausing)
11149     if (frame == 7 && !any_player_dropping && FrameCounter > 6)
11150       TapeTogglePause(TAPE_TOGGLE_AUTOMATIC);
11151
11152   CheckSaveEngineSnapshot_EM(frame, any_player_moving,
11153                              any_player_snapping, any_player_dropping);
11154
11155   return tape.pausing;
11156 }
11157
11158 void CheckSingleStepMode_SP(boolean murphy_is_waiting,
11159                             boolean murphy_is_dropping)
11160 {
11161   boolean murphy_starts_dropping = FALSE;
11162   int i;
11163
11164   for (i = 0; i < MAX_PLAYERS; i++)
11165     if (stored_player[i].force_dropping)
11166       murphy_starts_dropping = TRUE;
11167
11168   if (tape.single_step && tape.recording && !tape.pausing)
11169     if (murphy_is_waiting && !murphy_starts_dropping)
11170       TapeTogglePause(TAPE_TOGGLE_AUTOMATIC);
11171
11172   CheckSaveEngineSnapshot_SP(murphy_is_waiting, murphy_is_dropping);
11173 }
11174
11175 void CheckSingleStepMode_MM(boolean element_clicked,
11176                             boolean button_released)
11177 {
11178   if (tape.single_step && tape.recording && !tape.pausing)
11179     if (button_released)
11180       TapeTogglePause(TAPE_TOGGLE_AUTOMATIC);
11181
11182   CheckSaveEngineSnapshot_MM(element_clicked, button_released);
11183 }
11184
11185 void getGraphicSource_SP(struct GraphicInfo_SP *g_sp,
11186                          int graphic, int sync_frame)
11187 {
11188   int frame = getGraphicAnimationFrame(graphic, sync_frame);
11189
11190   getGraphicSource(graphic, frame, &g_sp->bitmap, &g_sp->src_x, &g_sp->src_y);
11191 }
11192
11193 boolean isNextAnimationFrame_SP(int graphic, int sync_frame)
11194 {
11195   return (IS_NEXT_FRAME(sync_frame, graphic));
11196 }
11197
11198 int getGraphicInfo_Delay(int graphic)
11199 {
11200   return graphic_info[graphic].anim_delay;
11201 }
11202
11203 boolean getGraphicInfo_NewFrame(int x, int y, int graphic)
11204 {
11205   if (!IS_NEW_FRAME(GfxFrame[x][y], graphic))
11206     return FALSE;
11207
11208   if (ANIM_MODE(graphic) & (ANIM_TILED | ANIM_RANDOM_STATIC))
11209     return FALSE;
11210
11211   return TRUE;
11212 }
11213
11214 void PlayMenuSoundExt(int sound)
11215 {
11216   if (sound == SND_UNDEFINED)
11217     return;
11218
11219   if ((!setup.sound_simple && !IS_LOOP_SOUND(sound)) ||
11220       (!setup.sound_loops && IS_LOOP_SOUND(sound)))
11221     return;
11222
11223   if (IS_LOOP_SOUND(sound))
11224     PlaySoundLoop(sound);
11225   else
11226     PlaySound(sound);
11227 }
11228
11229 void PlayMenuSound(void)
11230 {
11231   PlayMenuSoundExt(menu.sound[game_status]);
11232 }
11233
11234 void PlayMenuSoundStereo(int sound, int stereo_position)
11235 {
11236   if (sound == SND_UNDEFINED)
11237     return;
11238
11239   if ((!setup.sound_simple && !IS_LOOP_SOUND(sound)) ||
11240       (!setup.sound_loops && IS_LOOP_SOUND(sound)))
11241     return;
11242
11243   if (IS_LOOP_SOUND(sound))
11244     PlaySoundExt(sound, SOUND_MAX_VOLUME, stereo_position, SND_CTRL_PLAY_LOOP);
11245   else
11246     PlaySoundStereo(sound, stereo_position);
11247 }
11248
11249 void PlayMenuSoundIfLoopExt(int sound)
11250 {
11251   if (sound == SND_UNDEFINED)
11252     return;
11253
11254   if ((!setup.sound_simple && !IS_LOOP_SOUND(sound)) ||
11255       (!setup.sound_loops && IS_LOOP_SOUND(sound)))
11256     return;
11257
11258   if (IS_LOOP_SOUND(sound))
11259     PlaySoundLoop(sound);
11260 }
11261
11262 void PlayMenuSoundIfLoop(void)
11263 {
11264   PlayMenuSoundIfLoopExt(menu.sound[game_status]);
11265 }
11266
11267 void PlayMenuMusicExt(int music)
11268 {
11269   if (music == MUS_UNDEFINED)
11270     return;
11271
11272   if (!setup.sound_music)
11273     return;
11274
11275   if (IS_LOOP_MUSIC(music))
11276     PlayMusicLoop(music);
11277   else
11278     PlayMusic(music);
11279 }
11280
11281 void PlayMenuMusic(void)
11282 {
11283   char *curr_music = getCurrentlyPlayingMusicFilename();
11284   char *next_music = getMusicInfoEntryFilename(menu.music[game_status]);
11285
11286   if (!strEqual(curr_music, next_music))
11287     PlayMenuMusicExt(menu.music[game_status]);
11288 }
11289
11290 void PlayMenuSoundsAndMusic(void)
11291 {
11292   PlayMenuSound();
11293   PlayMenuMusic();
11294 }
11295
11296 static void FadeMenuSounds(void)
11297 {
11298   FadeSounds();
11299 }
11300
11301 static void FadeMenuMusic(void)
11302 {
11303   char *curr_music = getCurrentlyPlayingMusicFilename();
11304   char *next_music = getMusicInfoEntryFilename(menu.music[game_status]);
11305
11306   if (!strEqual(curr_music, next_music))
11307     FadeMusic();
11308 }
11309
11310 void FadeMenuSoundsAndMusic(void)
11311 {
11312   FadeMenuSounds();
11313   FadeMenuMusic();
11314 }
11315
11316 void PlaySoundActivating(void)
11317 {
11318 #if 0
11319   PlaySound(SND_MENU_ITEM_ACTIVATING);
11320 #endif
11321 }
11322
11323 void PlaySoundSelecting(void)
11324 {
11325 #if 0
11326   PlaySound(SND_MENU_ITEM_SELECTING);
11327 #endif
11328 }
11329
11330 void ToggleFullscreenIfNeeded(void)
11331 {
11332   // if setup and video fullscreen state are already matching, nothing do do
11333   if (setup.fullscreen == video.fullscreen_enabled ||
11334       !video.fullscreen_available)
11335     return;
11336
11337   SDLSetWindowFullscreen(setup.fullscreen);
11338
11339   // set setup value according to successfully changed fullscreen mode
11340   setup.fullscreen = video.fullscreen_enabled;
11341 }
11342
11343 void ChangeWindowScalingIfNeeded(void)
11344 {
11345   // if setup and video window scaling are already matching, nothing do do
11346   if (setup.window_scaling_percent == video.window_scaling_percent ||
11347       video.fullscreen_enabled)
11348     return;
11349
11350   SDLSetWindowScaling(setup.window_scaling_percent);
11351
11352   // set setup value according to successfully changed window scaling
11353   setup.window_scaling_percent = video.window_scaling_percent;
11354 }
11355
11356 void ChangeVsyncModeIfNeeded(void)
11357 {
11358   int setup_vsync_mode = VSYNC_MODE_STR_TO_INT(setup.vsync_mode);
11359   int video_vsync_mode = video.vsync_mode;
11360
11361   // if setup and video vsync mode are already matching, nothing do do
11362   if (setup_vsync_mode == video_vsync_mode)
11363     return;
11364
11365   // if renderer is using OpenGL, vsync mode can directly be changed
11366   SDLSetScreenVsyncMode(setup.vsync_mode);
11367
11368   // if vsync mode unchanged, try re-creating renderer to set vsync mode
11369   if (video.vsync_mode == video_vsync_mode)
11370   {
11371     Bitmap *tmp_backbuffer = CreateBitmap(WIN_XSIZE, WIN_YSIZE, DEFAULT_DEPTH);
11372
11373     // save backbuffer content which gets lost when re-creating screen
11374     BlitBitmap(backbuffer, tmp_backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
11375
11376     // force re-creating screen and renderer to set new vsync mode
11377     video.fullscreen_enabled = !setup.fullscreen;
11378
11379     // when creating new renderer, destroy textures linked to old renderer
11380     FreeAllImageTextures();     // needs old renderer to free the textures
11381
11382     // re-create screen and renderer (including change of vsync mode)
11383     ChangeVideoModeIfNeeded(setup.fullscreen);
11384
11385     // set setup value according to successfully changed fullscreen mode
11386     setup.fullscreen = video.fullscreen_enabled;
11387
11388     // restore backbuffer content from temporary backbuffer backup bitmap
11389     BlitBitmap(tmp_backbuffer, backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
11390     FreeBitmap(tmp_backbuffer);
11391
11392     // update visible window/screen
11393     BlitBitmap(backbuffer, window, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
11394
11395     // when changing vsync mode, re-create textures for new renderer
11396     InitImageTextures();
11397   }
11398
11399   // set setup value according to successfully changed vsync mode
11400   setup.vsync_mode = VSYNC_MODE_INT_TO_STR(video.vsync_mode);
11401 }
11402
11403 static void JoinRectangles(int *x, int *y, int *width, int *height,
11404                            int x2, int y2, int width2, int height2)
11405 {
11406   // do not join with "off-screen" rectangle
11407   if (x2 == -1 || y2 == -1)
11408     return;
11409
11410   *x = MIN(*x, x2);
11411   *y = MIN(*y, y2);
11412   *width = MAX(*width, width2);
11413   *height = MAX(*height, height2);
11414 }
11415
11416 void SetAnimStatus(int anim_status_new)
11417 {
11418   if (anim_status_new == GAME_MODE_MAIN)
11419     anim_status_new = GAME_MODE_PSEUDO_MAINONLY;
11420   else if (anim_status_new == GAME_MODE_NAMES)
11421     anim_status_new = GAME_MODE_PSEUDO_NAMESONLY;
11422   else if (anim_status_new == GAME_MODE_SCORES)
11423     anim_status_new = GAME_MODE_PSEUDO_SCORESOLD;
11424
11425   global.anim_status_next = anim_status_new;
11426
11427   // directly set screen modes that are entered without fading
11428   if ((global.anim_status      == GAME_MODE_PSEUDO_MAINONLY &&
11429        global.anim_status_next == GAME_MODE_PSEUDO_TYPENAME) ||
11430       (global.anim_status      == GAME_MODE_PSEUDO_TYPENAME &&
11431        global.anim_status_next == GAME_MODE_PSEUDO_MAINONLY) ||
11432       (global.anim_status      == GAME_MODE_PSEUDO_NAMESONLY &&
11433        global.anim_status_next == GAME_MODE_PSEUDO_TYPENAMES) ||
11434       (global.anim_status      == GAME_MODE_PSEUDO_TYPENAMES &&
11435        global.anim_status_next == GAME_MODE_PSEUDO_NAMESONLY))
11436     global.anim_status = global.anim_status_next;
11437 }
11438
11439 void SetGameStatus(int game_status_new)
11440 {
11441   if (game_status_new != game_status)
11442     game_status_last_screen = game_status;
11443
11444   game_status = game_status_new;
11445
11446   SetAnimStatus(game_status_new);
11447 }
11448
11449 void SetFontStatus(int game_status_new)
11450 {
11451   static int last_game_status = -1;
11452
11453   if (game_status_new != -1)
11454   {
11455     // set game status for font use after storing last game status
11456     last_game_status = game_status;
11457     game_status = game_status_new;
11458   }
11459   else
11460   {
11461     // reset game status after font use from last stored game status
11462     game_status = last_game_status;
11463   }
11464 }
11465
11466 void ResetFontStatus(void)
11467 {
11468   SetFontStatus(-1);
11469 }
11470
11471 void SetLevelSetInfo(char *identifier, int level_nr)
11472 {
11473   setString(&levelset.identifier, identifier);
11474
11475   levelset.level_nr = level_nr;
11476 }
11477
11478 boolean CheckIfAllViewportsHaveChanged(void)
11479 {
11480   // if game status has not changed, viewports have not changed either
11481   if (game_status == game_status_last)
11482     return FALSE;
11483
11484   // check if all viewports have changed with current game status
11485
11486   struct RectWithBorder *vp_playfield = &viewport.playfield[game_status];
11487   struct RectWithBorder *vp_door_1    = &viewport.door_1[game_status];
11488   struct RectWithBorder *vp_door_2    = &viewport.door_2[game_status];
11489   int new_real_sx       = vp_playfield->x;
11490   int new_real_sy       = vp_playfield->y;
11491   int new_full_sxsize   = vp_playfield->width;
11492   int new_full_sysize   = vp_playfield->height;
11493   int new_dx            = vp_door_1->x;
11494   int new_dy            = vp_door_1->y;
11495   int new_dxsize        = vp_door_1->width;
11496   int new_dysize        = vp_door_1->height;
11497   int new_vx            = vp_door_2->x;
11498   int new_vy            = vp_door_2->y;
11499   int new_vxsize        = vp_door_2->width;
11500   int new_vysize        = vp_door_2->height;
11501
11502   boolean playfield_viewport_has_changed =
11503     (new_real_sx != REAL_SX ||
11504      new_real_sy != REAL_SY ||
11505      new_full_sxsize != FULL_SXSIZE ||
11506      new_full_sysize != FULL_SYSIZE);
11507
11508   boolean door_1_viewport_has_changed =
11509     (new_dx != DX ||
11510      new_dy != DY ||
11511      new_dxsize != DXSIZE ||
11512      new_dysize != DYSIZE);
11513
11514   boolean door_2_viewport_has_changed =
11515     (new_vx != VX ||
11516      new_vy != VY ||
11517      new_vxsize != VXSIZE ||
11518      new_vysize != VYSIZE ||
11519      game_status_last == GAME_MODE_EDITOR);
11520
11521   return (playfield_viewport_has_changed &&
11522           door_1_viewport_has_changed &&
11523           door_2_viewport_has_changed);
11524 }
11525
11526 boolean CheckFadeAll(void)
11527 {
11528   return (CheckIfGlobalBorderHasChanged() ||
11529           CheckIfAllViewportsHaveChanged());
11530 }
11531
11532 void ChangeViewportPropertiesIfNeeded(void)
11533 {
11534   boolean use_mini_tilesize = (level.game_engine_type == GAME_ENGINE_TYPE_MM ?
11535                                FALSE : setup.small_game_graphics);
11536   int gfx_game_mode = getGlobalGameStatus(game_status);
11537   int gfx_game_mode2 = (gfx_game_mode == GAME_MODE_EDITOR ? GAME_MODE_DEFAULT :
11538                         gfx_game_mode);
11539   struct RectWithBorder *vp_window    = &viewport.window[gfx_game_mode];
11540   struct RectWithBorder *vp_playfield = &viewport.playfield[gfx_game_mode];
11541   struct RectWithBorder *vp_door_1    = &viewport.door_1[gfx_game_mode];
11542   struct RectWithBorder *vp_door_2    = &viewport.door_2[gfx_game_mode2];
11543   struct RectWithBorder *vp_door_3    = &viewport.door_2[GAME_MODE_EDITOR];
11544   int new_win_xsize     = vp_window->width;
11545   int new_win_ysize     = vp_window->height;
11546   int border_left       = vp_playfield->border_left;
11547   int border_right      = vp_playfield->border_right;
11548   int border_top        = vp_playfield->border_top;
11549   int border_bottom     = vp_playfield->border_bottom;
11550   int new_sx            = vp_playfield->x      + border_left;
11551   int new_sy            = vp_playfield->y      + border_top;
11552   int new_sxsize        = vp_playfield->width  - border_left - border_right;
11553   int new_sysize        = vp_playfield->height - border_top  - border_bottom;
11554   int new_real_sx       = vp_playfield->x;
11555   int new_real_sy       = vp_playfield->y;
11556   int new_full_sxsize   = vp_playfield->width;
11557   int new_full_sysize   = vp_playfield->height;
11558   int new_dx            = vp_door_1->x;
11559   int new_dy            = vp_door_1->y;
11560   int new_dxsize        = vp_door_1->width;
11561   int new_dysize        = vp_door_1->height;
11562   int new_vx            = vp_door_2->x;
11563   int new_vy            = vp_door_2->y;
11564   int new_vxsize        = vp_door_2->width;
11565   int new_vysize        = vp_door_2->height;
11566   int new_ex            = vp_door_3->x;
11567   int new_ey            = vp_door_3->y;
11568   int new_exsize        = vp_door_3->width;
11569   int new_eysize        = vp_door_3->height;
11570   int new_tilesize_var = (use_mini_tilesize ? MINI_TILESIZE : game.tile_size);
11571   int tilesize = (gfx_game_mode == GAME_MODE_PLAYING ? new_tilesize_var :
11572                   gfx_game_mode == GAME_MODE_EDITOR ? MINI_TILESIZE : TILESIZE);
11573   int new_scr_fieldx = new_sxsize / tilesize;
11574   int new_scr_fieldy = new_sysize / tilesize;
11575   int new_scr_fieldx_buffers = new_sxsize / new_tilesize_var;
11576   int new_scr_fieldy_buffers = new_sysize / new_tilesize_var;
11577   boolean init_gfx_buffers = FALSE;
11578   boolean init_video_buffer = FALSE;
11579   boolean init_gadgets_and_anims = FALSE;
11580   boolean init_bd_graphics = FALSE;
11581   boolean init_em_graphics = FALSE;
11582
11583   if (new_win_xsize != WIN_XSIZE ||
11584       new_win_ysize != WIN_YSIZE)
11585   {
11586     WIN_XSIZE = new_win_xsize;
11587     WIN_YSIZE = new_win_ysize;
11588
11589     init_video_buffer = TRUE;
11590     init_gfx_buffers = TRUE;
11591     init_gadgets_and_anims = TRUE;
11592
11593     // Debug("tools:viewport", "video: init_video_buffer, init_gfx_buffers");
11594   }
11595
11596   if (new_scr_fieldx != SCR_FIELDX ||
11597       new_scr_fieldy != SCR_FIELDY)
11598   {
11599     // this always toggles between MAIN and GAME when using small tile size
11600
11601     SCR_FIELDX = new_scr_fieldx;
11602     SCR_FIELDY = new_scr_fieldy;
11603
11604     // Debug("tools:viewport", "new_scr_fieldx != SCR_FIELDX ...");
11605   }
11606
11607   if (new_sx != SX ||
11608       new_sy != SY ||
11609       new_dx != DX ||
11610       new_dy != DY ||
11611       new_vx != VX ||
11612       new_vy != VY ||
11613       new_ex != EX ||
11614       new_ey != EY ||
11615       new_sxsize != SXSIZE ||
11616       new_sysize != SYSIZE ||
11617       new_dxsize != DXSIZE ||
11618       new_dysize != DYSIZE ||
11619       new_vxsize != VXSIZE ||
11620       new_vysize != VYSIZE ||
11621       new_exsize != EXSIZE ||
11622       new_eysize != EYSIZE ||
11623       new_real_sx != REAL_SX ||
11624       new_real_sy != REAL_SY ||
11625       new_full_sxsize != FULL_SXSIZE ||
11626       new_full_sysize != FULL_SYSIZE ||
11627       new_tilesize_var != TILESIZE_VAR
11628       )
11629   {
11630     // ------------------------------------------------------------------------
11631     // determine next fading area for changed viewport definitions
11632     // ------------------------------------------------------------------------
11633
11634     // start with current playfield area (default fading area)
11635     FADE_SX = REAL_SX;
11636     FADE_SY = REAL_SY;
11637     FADE_SXSIZE = FULL_SXSIZE;
11638     FADE_SYSIZE = FULL_SYSIZE;
11639
11640     // add new playfield area if position or size has changed
11641     if (new_real_sx != REAL_SX || new_real_sy != REAL_SY ||
11642         new_full_sxsize != FULL_SXSIZE || new_full_sysize != FULL_SYSIZE)
11643     {
11644       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
11645                      new_real_sx, new_real_sy, new_full_sxsize,new_full_sysize);
11646     }
11647
11648     // add current and new door 1 area if position or size has changed
11649     if (new_dx != DX || new_dy != DY ||
11650         new_dxsize != DXSIZE || new_dysize != DYSIZE)
11651     {
11652       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
11653                      DX, DY, DXSIZE, DYSIZE);
11654       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
11655                      new_dx, new_dy, new_dxsize, new_dysize);
11656     }
11657
11658     // add current and new door 2 area if position or size has changed
11659     if (new_vx != VX || new_vy != VY ||
11660         new_vxsize != VXSIZE || new_vysize != VYSIZE)
11661     {
11662       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
11663                      VX, VY, VXSIZE, VYSIZE);
11664       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
11665                      new_vx, new_vy, new_vxsize, new_vysize);
11666     }
11667
11668     // ------------------------------------------------------------------------
11669     // handle changed tile size
11670     // ------------------------------------------------------------------------
11671
11672     if (new_tilesize_var != TILESIZE_VAR)
11673     {
11674       // Debug("tools:viewport", "new_tilesize_var != TILESIZE_VAR");
11675
11676       // changing tile size invalidates scroll values of engine snapshots
11677       FreeEngineSnapshotSingle();
11678
11679       // changing tile size requires update of graphic mapping for BD/EM engine
11680       init_bd_graphics = TRUE;
11681       init_em_graphics = TRUE;
11682     }
11683
11684     SX = new_sx;
11685     SY = new_sy;
11686     DX = new_dx;
11687     DY = new_dy;
11688     VX = new_vx;
11689     VY = new_vy;
11690     EX = new_ex;
11691     EY = new_ey;
11692     SXSIZE = new_sxsize;
11693     SYSIZE = new_sysize;
11694     DXSIZE = new_dxsize;
11695     DYSIZE = new_dysize;
11696     VXSIZE = new_vxsize;
11697     VYSIZE = new_vysize;
11698     EXSIZE = new_exsize;
11699     EYSIZE = new_eysize;
11700     REAL_SX = new_real_sx;
11701     REAL_SY = new_real_sy;
11702     FULL_SXSIZE = new_full_sxsize;
11703     FULL_SYSIZE = new_full_sysize;
11704     TILESIZE_VAR = new_tilesize_var;
11705
11706     init_gfx_buffers = TRUE;
11707     init_gadgets_and_anims = TRUE;
11708
11709     // Debug("tools:viewport", "viewports: init_gfx_buffers");
11710     // Debug("tools:viewport", "viewports: init_gadgets_and_anims");
11711   }
11712
11713   if (init_gfx_buffers)
11714   {
11715     // Debug("tools:viewport", "init_gfx_buffers");
11716
11717     SCR_FIELDX = new_scr_fieldx_buffers;
11718     SCR_FIELDY = new_scr_fieldy_buffers;
11719
11720     InitGfxBuffers();
11721
11722     SCR_FIELDX = new_scr_fieldx;
11723     SCR_FIELDY = new_scr_fieldy;
11724
11725     SetDrawDeactivationMask(REDRAW_NONE);
11726     SetDrawBackgroundMask(REDRAW_FIELD);
11727   }
11728
11729   if (init_video_buffer)
11730   {
11731     // Debug("tools:viewport", "init_video_buffer");
11732
11733     FreeAllImageTextures();     // needs old renderer to free the textures
11734
11735     InitVideoBuffer(WIN_XSIZE, WIN_YSIZE, DEFAULT_DEPTH, setup.fullscreen);
11736     InitImageTextures();
11737   }
11738
11739   if (init_gadgets_and_anims)
11740   {
11741     // Debug("tools:viewport", "init_gadgets_and_anims");
11742
11743     InitGadgets();
11744     InitGlobalAnimations();
11745   }
11746
11747   if (init_bd_graphics)
11748   {
11749     InitGraphicInfo_BD();
11750   }
11751
11752   if (init_em_graphics)
11753   {
11754     InitGraphicInfo_EM();
11755   }
11756 }
11757
11758 void OpenURL(char *url)
11759 {
11760 #if SDL_VERSION_ATLEAST(2,0,14)
11761   SDL_OpenURL(url);
11762 #else
11763   Warn("SDL_OpenURL(\"%s\") not supported by SDL %d.%d.%d!",
11764        url, SDL_MAJOR_VERSION, SDL_MINOR_VERSION, SDL_PATCHLEVEL);
11765   Warn("Please upgrade to at least SDL 2.0.14 for URL support!");
11766 #endif
11767 }
11768
11769 void OpenURLFromHash(SetupFileHash *hash, int hash_key)
11770 {
11771   OpenURL(getHashEntry(hash, int2str(hash_key, 0)));
11772 }
11773
11774 char *getCurrentLevelsetName(void)
11775 {
11776   return leveldir_current->name;
11777 }
11778
11779
11780 // ============================================================================
11781 // tests
11782 // ============================================================================
11783
11784 #if defined(PLATFORM_WINDOWS)
11785 /* FILETIME of Jan 1 1970 00:00:00. */
11786 static const unsigned __int64 epoch = ((unsigned __int64) 116444736000000000ULL);
11787
11788 /*
11789  * timezone information is stored outside the kernel so tzp isn't used anymore.
11790  *
11791  * Note: this function is not for Win32 high precision timing purpose. See
11792  * elapsed_time().
11793  */
11794 static int gettimeofday_windows(struct timeval * tp, struct timezone * tzp)
11795 {
11796   FILETIME    file_time;
11797   SYSTEMTIME  system_time;
11798   ULARGE_INTEGER ularge;
11799
11800   GetSystemTime(&system_time);
11801   SystemTimeToFileTime(&system_time, &file_time);
11802   ularge.LowPart = file_time.dwLowDateTime;
11803   ularge.HighPart = file_time.dwHighDateTime;
11804
11805   tp->tv_sec = (long) ((ularge.QuadPart - epoch) / 10000000L);
11806   tp->tv_usec = (long) (system_time.wMilliseconds * 1000);
11807
11808   return 0;
11809 }
11810 #endif
11811
11812 static char *test_init_uuid_random_function_simple(void)
11813 {
11814   static char seed_text[100];
11815   unsigned int seed = InitSimpleRandom(NEW_RANDOMIZE);
11816
11817   sprintf(seed_text, "%d", seed);
11818
11819   return seed_text;
11820 }
11821
11822 static char *test_init_uuid_random_function_better(void)
11823 {
11824   static char seed_text[100];
11825   struct timeval current_time;
11826
11827   gettimeofday(&current_time, NULL);
11828
11829   prng_seed_bytes(&current_time, sizeof(current_time));
11830
11831   sprintf(seed_text, "%ld.%ld",
11832           (long)current_time.tv_sec,
11833           (long)current_time.tv_usec);
11834
11835   return seed_text;
11836 }
11837
11838 #if defined(PLATFORM_WINDOWS)
11839 static char *test_init_uuid_random_function_better_windows(void)
11840 {
11841   static char seed_text[100];
11842   struct timeval current_time;
11843
11844   gettimeofday_windows(&current_time, NULL);
11845
11846   prng_seed_bytes(&current_time, sizeof(current_time));
11847
11848   sprintf(seed_text, "%ld.%ld",
11849           (long)current_time.tv_sec,
11850           (long)current_time.tv_usec);
11851
11852   return seed_text;
11853 }
11854 #endif
11855
11856 static unsigned int test_uuid_random_function_simple(int max)
11857 {
11858   return GetSimpleRandom(max);
11859 }
11860
11861 static unsigned int test_uuid_random_function_better(int max)
11862 {
11863   return (max > 0 ? prng_get_uint() % max : 0);
11864 }
11865
11866 #if defined(PLATFORM_WINDOWS)
11867 #define NUM_UUID_TESTS                  3
11868 #else
11869 #define NUM_UUID_TESTS                  2
11870 #endif
11871
11872 static void TestGeneratingUUIDs_RunTest(int nr, int always_seed, int num_uuids)
11873 {
11874   HashTable *hash_seeds =
11875     create_hashtable(get_hash_from_string, hash_key_strings_are_equal, free, NULL);
11876   HashTable *hash_uuids =
11877     create_hashtable(get_hash_from_string, hash_key_strings_are_equal, free, NULL);
11878   static char message[100];
11879   int i;
11880
11881   char *random_name = (nr == 0 ? "simple" : "better");
11882   char *random_type = (always_seed ? "always" : "only once");
11883   char *(*init_random_function)(void) =
11884     (nr == 0 ?
11885      test_init_uuid_random_function_simple :
11886      test_init_uuid_random_function_better);
11887   unsigned int (*random_function)(int) =
11888     (nr == 0 ?
11889      test_uuid_random_function_simple :
11890      test_uuid_random_function_better);
11891   int xpos = 40;
11892
11893 #if defined(PLATFORM_WINDOWS)
11894   if (nr == 2)
11895   {
11896     random_name = "windows";
11897     init_random_function = test_init_uuid_random_function_better_windows;
11898   }
11899 #endif
11900
11901   ClearField();
11902
11903   DrawTextF(xpos, 40, FC_GREEN, "Test: Generating UUIDs");
11904   DrawTextF(xpos, 80, FC_YELLOW, "Test %d.%d:", nr + 1, always_seed + 1);
11905
11906   DrawTextF(xpos, 100, FC_YELLOW, "Random Generator Name: %s", random_name);
11907   DrawTextF(xpos, 120, FC_YELLOW, "Seeding Random Generator: %s", random_type);
11908   DrawTextF(xpos, 140, FC_YELLOW, "Number of UUIDs generated: %d", num_uuids);
11909
11910   DrawTextF(xpos, 180, FC_GREEN, "Please wait ...");
11911
11912   BackToFront();
11913
11914   // always initialize random number generator at least once
11915   init_random_function();
11916
11917   unsigned int time_start = SDL_GetTicks();
11918
11919   for (i = 0; i < num_uuids; i++)
11920   {
11921     if (always_seed)
11922     {
11923       char *seed = getStringCopy(init_random_function());
11924
11925       hashtable_remove(hash_seeds, seed);
11926       hashtable_insert(hash_seeds, seed, "1");
11927     }
11928
11929     char *uuid = getStringCopy(getUUIDExt(random_function));
11930
11931     hashtable_remove(hash_uuids, uuid);
11932     hashtable_insert(hash_uuids, uuid, "1");
11933   }
11934
11935   int num_unique_seeds = hashtable_count(hash_seeds);
11936   int num_unique_uuids = hashtable_count(hash_uuids);
11937
11938   unsigned int time_needed = SDL_GetTicks() - time_start;
11939
11940   DrawTextF(xpos, 220, FC_YELLOW, "Time needed: %d ms", time_needed);
11941
11942   DrawTextF(xpos, 240, FC_YELLOW, "Number of unique UUIDs: %d", num_unique_uuids);
11943
11944   if (always_seed)
11945     DrawTextF(xpos, 260, FC_YELLOW, "Number of unique seeds: %d", num_unique_seeds);
11946
11947   if (nr == NUM_UUID_TESTS - 1 && always_seed)
11948     DrawTextF(xpos, 300, FC_GREEN, "All tests done!");
11949   else
11950     DrawTextF(xpos, 300, FC_GREEN, "Confirm dialog for next test ...");
11951
11952   sprintf(message, "Test %d.%d finished!", nr + 1, always_seed + 1);
11953
11954   Request(message, REQ_CONFIRM);
11955
11956   hashtable_destroy(hash_seeds);
11957   hashtable_destroy(hash_uuids);
11958 }
11959
11960 void TestGeneratingUUIDs(void)
11961 {
11962   int num_uuids = 1000000;
11963   int i, j;
11964
11965   for (i = 0; i < NUM_UUID_TESTS; i++)
11966     for (j = 0; j < 2; j++)
11967       TestGeneratingUUIDs_RunTest(i, j, num_uuids);
11968
11969   CloseAllAndExit(0);
11970 }