added always clearing player action when waiting for events to continue
[rocksndiamonds.git] / 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
169 // forward declaration for internal use
170 static void UnmapToolButtons(void);
171 static void HandleToolButtons(struct GadgetInfo *);
172 static int el_act_dir2crm(int, int, int);
173 static int el_act2crm(int, int);
174
175 static struct GadgetInfo *tool_gadget[NUM_TOOL_BUTTONS];
176 static int request_gadget_id = -1;
177
178 static char *print_if_not_empty(int element)
179 {
180   static char *s = NULL;
181   char *token_name = element_info[element].token_name;
182
183   if (s != NULL)
184     free(s);
185
186   s = checked_malloc(strlen(token_name) + 10 + 1);
187
188   if (element != EL_EMPTY)
189     sprintf(s, "%d\t['%s']", element, token_name);
190   else
191     sprintf(s, "%d", element);
192
193   return s;
194 }
195
196 int getFieldbufferOffsetX_RND(int dir, int pos)
197 {
198   int full_lev_fieldx = lev_fieldx + (BorderElement != EL_EMPTY ? 2 : 0);
199   int dx = (dir & MV_HORIZONTAL ? pos : 0);
200   int dx_var = dx * TILESIZE_VAR / TILESIZE;
201   int fx = FX;
202
203   if (EVEN(SCR_FIELDX))
204   {
205     int sbx_right = SBX_Right + (BorderElement != EL_EMPTY ? 1 : 0);
206     int ffx = (scroll_x - SBX_Left) * TILEX_VAR + dx_var;
207
208     if (ffx < sbx_right * TILEX_VAR + TILEX_VAR / 2)
209       fx += dx_var - MIN(ffx, TILEX_VAR / 2) + TILEX_VAR;
210     else
211       fx += (dx_var > 0 ? TILEX_VAR : 0);
212   }
213   else
214   {
215     fx += dx_var;
216   }
217
218   if (full_lev_fieldx <= SCR_FIELDX)
219   {
220     if (EVEN(SCR_FIELDX))
221       fx = 2 * TILEX_VAR - (ODD(lev_fieldx)  ? TILEX_VAR / 2 : 0);
222     else
223       fx = 2 * TILEX_VAR - (EVEN(lev_fieldx) ? TILEX_VAR / 2 : 0);
224   }
225
226   return fx;
227 }
228
229 int getFieldbufferOffsetY_RND(int dir, int pos)
230 {
231   int full_lev_fieldy = lev_fieldy + (BorderElement != EL_EMPTY ? 2 : 0);
232   int dy = (dir & MV_VERTICAL ? pos : 0);
233   int dy_var = dy * TILESIZE_VAR / TILESIZE;
234   int fy = FY;
235
236   if (EVEN(SCR_FIELDY))
237   {
238     int sby_lower = SBY_Lower + (BorderElement != EL_EMPTY ? 1 : 0);
239     int ffy = (scroll_y - SBY_Upper) * TILEY_VAR + dy_var;
240
241     if (ffy < sby_lower * TILEY_VAR + TILEY_VAR / 2)
242       fy += dy_var - MIN(ffy, TILEY_VAR / 2) + TILEY_VAR;
243     else
244       fy += (dy_var > 0 ? TILEY_VAR : 0);
245   }
246   else
247   {
248     fy += dy_var;
249   }
250
251   if (full_lev_fieldy <= SCR_FIELDY)
252   {
253     if (EVEN(SCR_FIELDY))
254       fy = 2 * TILEY_VAR - (ODD(lev_fieldy)  ? TILEY_VAR / 2 : 0);
255     else
256       fy = 2 * TILEY_VAR - (EVEN(lev_fieldy) ? TILEY_VAR / 2 : 0);
257   }
258
259   return fy;
260 }
261
262 static int getLevelFromScreenX_RND(int sx)
263 {
264   int fx = getFieldbufferOffsetX_RND(ScreenMovDir, ScreenGfxPos);
265   int dx = fx - FX;
266   int px = sx - SX;
267   int lx = LEVELX((px + dx) / TILESIZE_VAR);
268
269   return lx;
270 }
271
272 static int getLevelFromScreenY_RND(int sy)
273 {
274   int fy = getFieldbufferOffsetY_RND(ScreenMovDir, ScreenGfxPos);
275   int dy = fy - FY;
276   int py = sy - SY;
277   int ly = LEVELY((py + dy) / TILESIZE_VAR);
278
279   return ly;
280 }
281
282 static int getLevelFromScreenX_EM(int sx)
283 {
284   int level_xsize = level.native_em_level->cav->width;
285   int full_xsize = level_xsize * TILESIZE_VAR;
286
287   sx -= (full_xsize < SXSIZE ? (SXSIZE - full_xsize) / 2 : 0);
288
289   int fx = getFieldbufferOffsetX_EM();
290   int dx = fx;
291   int px = sx - SX;
292   int lx = LEVELX((px + dx) / TILESIZE_VAR);
293
294   return lx;
295 }
296
297 static int getLevelFromScreenY_EM(int sy)
298 {
299   int level_ysize = level.native_em_level->cav->height;
300   int full_ysize = level_ysize * TILESIZE_VAR;
301
302   sy -= (full_ysize < SYSIZE ? (SYSIZE - full_ysize) / 2 : 0);
303
304   int fy = getFieldbufferOffsetY_EM();
305   int dy = fy;
306   int py = sy - SY;
307   int ly = LEVELY((py + dy) / TILESIZE_VAR);
308
309   return ly;
310 }
311
312 static int getLevelFromScreenX_SP(int sx)
313 {
314   int menBorder = setup.sp_show_border_elements;
315   int level_xsize = level.native_sp_level->width;
316   int full_xsize = (level_xsize - (menBorder ? 0 : 1)) * TILESIZE_VAR;
317
318   sx += (full_xsize < SXSIZE ? (SXSIZE - full_xsize) / 2 : 0);
319
320   int fx = getFieldbufferOffsetX_SP();
321   int dx = fx - FX;
322   int px = sx - SX;
323   int lx = LEVELX((px + dx) / TILESIZE_VAR);
324
325   return lx;
326 }
327
328 static int getLevelFromScreenY_SP(int sy)
329 {
330   int menBorder = setup.sp_show_border_elements;
331   int level_ysize = level.native_sp_level->height;
332   int full_ysize = (level_ysize - (menBorder ? 0 : 1)) * TILESIZE_VAR;
333
334   sy += (full_ysize < SYSIZE ? (SYSIZE - full_ysize) / 2 : 0);
335
336   int fy = getFieldbufferOffsetY_SP();
337   int dy = fy - FY;
338   int py = sy - SY;
339   int ly = LEVELY((py + dy) / TILESIZE_VAR);
340
341   return ly;
342 }
343
344 static int getLevelFromScreenX_MM(int sx)
345 {
346   int level_xsize = level.native_mm_level->fieldx;
347   int full_xsize = level_xsize * TILESIZE_VAR;
348
349   sx -= (full_xsize < SXSIZE ? (SXSIZE - full_xsize) / 2 : 0);
350
351   int px = sx - SX;
352   int lx = (px + TILESIZE_VAR) / TILESIZE_VAR - 1;
353
354   return lx;
355 }
356
357 static int getLevelFromScreenY_MM(int sy)
358 {
359   int level_ysize = level.native_mm_level->fieldy;
360   int full_ysize = level_ysize * TILESIZE_VAR;
361
362   sy -= (full_ysize < SYSIZE ? (SYSIZE - full_ysize) / 2 : 0);
363
364   int py = sy - SY;
365   int ly = (py + TILESIZE_VAR) / TILESIZE_VAR - 1;
366
367   return ly;
368 }
369
370 int getLevelFromScreenX(int x)
371 {
372   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
373     return getLevelFromScreenX_EM(x);
374   if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
375     return getLevelFromScreenX_SP(x);
376   if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
377     return getLevelFromScreenX_MM(x);
378   else
379     return getLevelFromScreenX_RND(x);
380 }
381
382 int getLevelFromScreenY(int y)
383 {
384   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
385     return getLevelFromScreenY_EM(y);
386   if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
387     return getLevelFromScreenY_SP(y);
388   if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
389     return getLevelFromScreenY_MM(y);
390   else
391     return getLevelFromScreenY_RND(y);
392 }
393
394 void DumpTile(int x, int y)
395 {
396   int sx = SCREENX(x);
397   int sy = SCREENY(y);
398   char *token_name;
399
400   Info("---");
401   Info("Field Info: SCREEN(%d, %d), LEVEL(%d, %d)", sx, sy, x, y);
402   Info("---");
403
404   if (!IN_LEV_FIELD(x, y))
405   {
406     Info("(not in level field)");
407     Info("");
408
409     return;
410   }
411
412   token_name = element_info[Tile[x][y]].token_name;
413
414   Info("Tile:        %d\t['%s']",       Tile[x][y], token_name);
415   Info("Back:        %s",               print_if_not_empty(Back[x][y]));
416   Info("Store:       %s",               print_if_not_empty(Store[x][y]));
417   Info("Store2:      %s",               print_if_not_empty(Store2[x][y]));
418   Info("StorePlayer: %s",               print_if_not_empty(StorePlayer[x][y]));
419   Info("MovPos:      %d",               MovPos[x][y]);
420   Info("MovDir:      %d",               MovDir[x][y]);
421   Info("MovDelay:    %d",               MovDelay[x][y]);
422   Info("ChangeDelay: %d",               ChangeDelay[x][y]);
423   Info("CustomValue: %d",               CustomValue[x][y]);
424   Info("GfxElement:  %d",               GfxElement[x][y]);
425   Info("GfxAction:   %d",               GfxAction[x][y]);
426   Info("GfxFrame:    %d [%d]",          GfxFrame[x][y], FrameCounter);
427   Info("Player x/y:  %d, %d",           local_player->jx, local_player->jy);
428   Info("");
429 }
430
431 void DumpTileFromScreen(int sx, int sy)
432 {
433   int lx = getLevelFromScreenX(sx);
434   int ly = getLevelFromScreenY(sy);
435
436   DumpTile(lx, ly);
437 }
438
439 void SetDrawtoField(int mode)
440 {
441   if (mode == DRAW_TO_FIELDBUFFER)
442   {
443     FX = 2 * TILEX_VAR;
444     FY = 2 * TILEY_VAR;
445     BX1 = -2;
446     BY1 = -2;
447     BX2 = SCR_FIELDX + 1;
448     BY2 = SCR_FIELDY + 1;
449
450     drawto_field = fieldbuffer;
451   }
452   else  // DRAW_TO_BACKBUFFER
453   {
454     FX = SX;
455     FY = SY;
456     BX1 = 0;
457     BY1 = 0;
458     BX2 = SCR_FIELDX - 1;
459     BY2 = SCR_FIELDY - 1;
460
461     drawto_field = backbuffer;
462   }
463 }
464
465 static void RedrawPlayfield_RND(void)
466 {
467   if (game.envelope_active)
468     return;
469
470   DrawLevel(REDRAW_ALL);
471   DrawAllPlayers();
472 }
473
474 void RedrawPlayfield(void)
475 {
476   if (game_status != GAME_MODE_PLAYING)
477     return;
478
479   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
480     RedrawPlayfield_EM(TRUE);
481   else if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
482     RedrawPlayfield_SP(TRUE);
483   else if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
484     RedrawPlayfield_MM();
485   else if (level.game_engine_type == GAME_ENGINE_TYPE_RND)
486     RedrawPlayfield_RND();
487
488   BlitScreenToBitmap(backbuffer);
489
490   BlitBitmap(drawto, window, gfx.sx, gfx.sy, gfx.sxsize, gfx.sysize,
491              gfx.sx, gfx.sy);
492 }
493
494 static void DrawMaskedBorderExt_Rect(int x, int y, int width, int height,
495                                      int draw_target)
496 {
497   Bitmap *src_bitmap = getGlobalBorderBitmapFromStatus(global.border_status);
498   Bitmap *dst_bitmap = gfx.masked_border_bitmap_ptr;
499
500   if (x == -1 && y == -1)
501     return;
502
503   if (draw_target == DRAW_TO_SCREEN)
504     BlitToScreenMasked(src_bitmap, x, y, width, height, x, y);
505   else
506     BlitBitmapMasked(src_bitmap, dst_bitmap, x, y, width, height, x, y);
507 }
508
509 static void DrawMaskedBorderExt_FIELD(int draw_target)
510 {
511   if (global.border_status >= GAME_MODE_MAIN &&
512       global.border_status <= GAME_MODE_PLAYING &&
513       border.draw_masked[global.border_status])
514     DrawMaskedBorderExt_Rect(REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE,
515                              draw_target);
516 }
517
518 static void DrawMaskedBorderExt_DOOR_1(int draw_target)
519 {
520   // when drawing to backbuffer, never draw border over open doors
521   if (draw_target == DRAW_TO_BACKBUFFER &&
522       (GetDoorState() & DOOR_OPEN_1))
523     return;
524
525   if (border.draw_masked[GFX_SPECIAL_ARG_DOOR] &&
526       (global.border_status != GAME_MODE_EDITOR ||
527        border.draw_masked[GFX_SPECIAL_ARG_EDITOR]))
528     DrawMaskedBorderExt_Rect(DX, DY, DXSIZE, DYSIZE, draw_target);
529 }
530
531 static void DrawMaskedBorderExt_DOOR_2(int draw_target)
532 {
533   // when drawing to backbuffer, never draw border over open doors
534   if (draw_target == DRAW_TO_BACKBUFFER &&
535       (GetDoorState() & DOOR_OPEN_2))
536     return;
537
538   if (border.draw_masked[GFX_SPECIAL_ARG_DOOR] &&
539       global.border_status != GAME_MODE_EDITOR)
540     DrawMaskedBorderExt_Rect(VX, VY, VXSIZE, VYSIZE, draw_target);
541 }
542
543 static void DrawMaskedBorderExt_DOOR_3(int draw_target)
544 {
545   // currently not available
546 }
547
548 static void DrawMaskedBorderExt_ALL(int draw_target)
549 {
550   DrawMaskedBorderExt_FIELD(draw_target);
551   DrawMaskedBorderExt_DOOR_1(draw_target);
552   DrawMaskedBorderExt_DOOR_2(draw_target);
553   DrawMaskedBorderExt_DOOR_3(draw_target);
554 }
555
556 static void DrawMaskedBorderExt(int redraw_mask, int draw_target)
557 {
558   // never draw masked screen borders on borderless screens
559   if (global.border_status == GAME_MODE_LOADING ||
560       global.border_status == GAME_MODE_TITLE)
561     return;
562
563   if (redraw_mask & REDRAW_ALL)
564     DrawMaskedBorderExt_ALL(draw_target);
565   else
566   {
567     if (redraw_mask & REDRAW_FIELD)
568       DrawMaskedBorderExt_FIELD(draw_target);
569     if (redraw_mask & REDRAW_DOOR_1)
570       DrawMaskedBorderExt_DOOR_1(draw_target);
571     if (redraw_mask & REDRAW_DOOR_2)
572       DrawMaskedBorderExt_DOOR_2(draw_target);
573     if (redraw_mask & REDRAW_DOOR_3)
574       DrawMaskedBorderExt_DOOR_3(draw_target);
575   }
576 }
577
578 void DrawMaskedBorder_FIELD(void)
579 {
580   DrawMaskedBorderExt_FIELD(DRAW_TO_BACKBUFFER);
581 }
582
583 void DrawMaskedBorder(int redraw_mask)
584 {
585   DrawMaskedBorderExt(redraw_mask, DRAW_TO_BACKBUFFER);
586 }
587
588 void DrawMaskedBorderToTarget(int draw_target)
589 {
590   if (draw_target == DRAW_TO_BACKBUFFER ||
591       draw_target == DRAW_TO_SCREEN)
592   {
593     DrawMaskedBorderExt(REDRAW_ALL, draw_target);
594   }
595   else
596   {
597     int last_border_status = global.border_status;
598
599     if (draw_target == DRAW_TO_FADE_SOURCE)
600     {
601       global.border_status = gfx.fade_border_source_status;
602       gfx.masked_border_bitmap_ptr = gfx.fade_bitmap_source;
603     }
604     else if (draw_target == DRAW_TO_FADE_TARGET)
605     {
606       global.border_status = gfx.fade_border_target_status;
607       gfx.masked_border_bitmap_ptr = gfx.fade_bitmap_target;
608     }
609
610     DrawMaskedBorderExt(REDRAW_ALL, draw_target);
611
612     global.border_status = last_border_status;
613     gfx.masked_border_bitmap_ptr = backbuffer;
614   }
615 }
616
617 void DrawTileCursor(int draw_target)
618 {
619   Bitmap *fade_bitmap;
620   Bitmap *src_bitmap;
621   int src_x, src_y;
622   int dst_x, dst_y;
623   int graphic = IMG_GLOBAL_TILE_CURSOR;
624   int frame = 0;
625   int tilesize = TILESIZE_VAR;
626   int width = tilesize;
627   int height = tilesize;
628
629   if (game_status != GAME_MODE_PLAYING)
630     return;
631
632   if (!tile_cursor.enabled ||
633       !tile_cursor.active)
634     return;
635
636   if (tile_cursor.moving)
637   {
638     int step = TILESIZE_VAR / 4;
639     int dx = tile_cursor.target_x - tile_cursor.x;
640     int dy = tile_cursor.target_y - tile_cursor.y;
641
642     if (ABS(dx) < step)
643       tile_cursor.x = tile_cursor.target_x;
644     else
645       tile_cursor.x += SIGN(dx) * step;
646
647     if (ABS(dy) < step)
648       tile_cursor.y = tile_cursor.target_y;
649     else
650       tile_cursor.y += SIGN(dy) * step;
651
652     if (tile_cursor.x == tile_cursor.target_x &&
653         tile_cursor.y == tile_cursor.target_y)
654       tile_cursor.moving = FALSE;
655   }
656
657   dst_x = tile_cursor.x;
658   dst_y = tile_cursor.y;
659
660   frame = getGraphicAnimationFrame(graphic, -1);
661
662   getSizedGraphicSource(graphic, frame, tilesize, &src_bitmap, &src_x, &src_y);
663
664   fade_bitmap =
665     (draw_target == DRAW_TO_FADE_SOURCE ? gfx.fade_bitmap_source :
666      draw_target == DRAW_TO_FADE_TARGET ? gfx.fade_bitmap_target : NULL);
667
668   if (draw_target == DRAW_TO_SCREEN)
669     BlitToScreenMasked(src_bitmap, src_x, src_y, width, height, dst_x, dst_y);
670   else
671     BlitBitmapMasked(src_bitmap, fade_bitmap, src_x, src_y, width, height,
672                      dst_x, dst_y);
673 }
674
675 void BlitScreenToBitmapExt_RND(Bitmap *target_bitmap, int fx, int fy)
676 {
677   BlitBitmap(drawto_field, target_bitmap, fx, fy, SXSIZE, SYSIZE, SX, SY);
678 }
679
680 void BlitScreenToBitmap_RND(Bitmap *target_bitmap)
681 {
682   int fx = getFieldbufferOffsetX_RND(ScreenMovDir, ScreenGfxPos);
683   int fy = getFieldbufferOffsetY_RND(ScreenMovDir, ScreenGfxPos);
684
685   BlitScreenToBitmapExt_RND(target_bitmap, fx, fy);
686 }
687
688 void BlitScreenToBitmap(Bitmap *target_bitmap)
689 {
690   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
691     BlitScreenToBitmap_EM(target_bitmap);
692   else if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
693     BlitScreenToBitmap_SP(target_bitmap);
694   else if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
695     BlitScreenToBitmap_MM(target_bitmap);
696   else if (level.game_engine_type == GAME_ENGINE_TYPE_RND)
697     BlitScreenToBitmap_RND(target_bitmap);
698
699   redraw_mask |= REDRAW_FIELD;
700 }
701
702 static void DrawFramesPerSecond(void)
703 {
704   char text[100];
705   int font_nr = FONT_TEXT_2;
706   int font_width = getFontWidth(font_nr);
707   int draw_deactivation_mask = GetDrawDeactivationMask();
708   boolean draw_masked = (draw_deactivation_mask == REDRAW_NONE);
709
710   // draw FPS with leading space (needed if field buffer deactivated)
711   sprintf(text, " %04.1f fps", global.frames_per_second);
712
713   // override draw deactivation mask (required for invisible warp mode)
714   SetDrawDeactivationMask(REDRAW_NONE);
715
716   // draw opaque FPS if field buffer deactivated, else draw masked FPS
717   DrawTextExt(backbuffer, SX + SXSIZE - font_width * strlen(text), SY, text,
718               font_nr, (draw_masked ? BLIT_MASKED : BLIT_OPAQUE));
719
720   // set draw deactivation mask to previous value
721   SetDrawDeactivationMask(draw_deactivation_mask);
722
723   // force full-screen redraw in this frame
724   redraw_mask = REDRAW_ALL;
725 }
726
727 #if DEBUG_FRAME_TIME
728 static void PrintFrameTimeDebugging(void)
729 {
730   static unsigned int last_counter = 0;
731   unsigned int counter = Counter();
732   int diff_1 = counter - last_counter;
733   int diff_2 = diff_1 - GAME_FRAME_DELAY;
734   int diff_2_max = 20;
735   int diff_2_cut = MIN(ABS(diff_2), diff_2_max);
736   char diff_bar[2 * diff_2_max + 5];
737   int pos = 0;
738   int i;
739
740   diff_bar[pos++] = (diff_2 < -diff_2_max ? '<' : ' ');
741
742   for (i = 0; i < diff_2_max; i++)
743     diff_bar[pos++] = (diff_2 >= 0 ? ' ' :
744                        i >= diff_2_max - diff_2_cut ? '-' : ' ');
745
746   diff_bar[pos++] = '|';
747
748   for (i = 0; i < diff_2_max; i++)
749     diff_bar[pos++] = (diff_2 <= 0 ? ' ' : i < diff_2_cut ? '+' : ' ');
750
751   diff_bar[pos++] = (diff_2 > diff_2_max ? '>' : ' ');
752
753   diff_bar[pos++] = '\0';
754
755   Debug("time:frame", "%06d [%02d] [%c%02d] %s",
756         counter,
757         diff_1,
758         (diff_2 < 0 ? '-' : diff_2 > 0 ? '+' : ' '), ABS(diff_2),
759         diff_bar);
760
761   last_counter = counter;
762 }
763 #endif
764
765 static int unifiedRedrawMask(int mask)
766 {
767   if (mask & REDRAW_ALL)
768     return REDRAW_ALL;
769
770   if (mask & REDRAW_FIELD && mask & REDRAW_DOORS)
771     return REDRAW_ALL;
772
773   return mask;
774 }
775
776 static boolean equalRedrawMasks(int mask_1, int mask_2)
777 {
778   return unifiedRedrawMask(mask_1) == unifiedRedrawMask(mask_2);
779 }
780
781 void BackToFront(void)
782 {
783   static int last_redraw_mask = REDRAW_NONE;
784
785   // force screen redraw in every frame to continue drawing global animations
786   // (but always use the last redraw mask to prevent unwanted side effects)
787   if (redraw_mask == REDRAW_NONE)
788     redraw_mask = last_redraw_mask;
789
790   last_redraw_mask = redraw_mask;
791
792 #if 1
793   // masked border now drawn immediately when blitting backbuffer to window
794 #else
795   // draw masked border to all viewports, if defined
796   DrawMaskedBorder(redraw_mask);
797 #endif
798
799   // draw frames per second (only if debug mode is enabled)
800   if (redraw_mask & REDRAW_FPS)
801     DrawFramesPerSecond();
802
803   // remove playfield redraw before potentially merging with doors redraw
804   if (DrawingDeactivated(REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE))
805     redraw_mask &= ~REDRAW_FIELD;
806
807   // redraw complete window if both playfield and (some) doors need redraw
808   if (redraw_mask & REDRAW_FIELD && redraw_mask & REDRAW_DOORS)
809     redraw_mask = REDRAW_ALL;
810
811   /* although redrawing the whole window would be fine for normal gameplay,
812      being able to only redraw the playfield is required for deactivating
813      certain drawing areas (mainly playfield) to work, which is needed for
814      warp-forward to be fast enough (by skipping redraw of most frames) */
815
816   if (redraw_mask & REDRAW_ALL)
817   {
818     BlitBitmap(backbuffer, window, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
819   }
820   else if (redraw_mask & REDRAW_FIELD)
821   {
822     BlitBitmap(backbuffer, window,
823                REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE, REAL_SX, REAL_SY);
824   }
825   else if (redraw_mask & REDRAW_DOORS)
826   {
827     // merge door areas to prevent calling screen redraw more than once
828     int x1 = WIN_XSIZE;
829     int y1 = WIN_YSIZE;
830     int x2 = 0;
831     int y2 = 0;
832
833     if (redraw_mask & REDRAW_DOOR_1)
834     {
835       x1 = MIN(x1, DX);
836       y1 = MIN(y1, DY);
837       x2 = MAX(x2, DX + DXSIZE);
838       y2 = MAX(y2, DY + DYSIZE);
839     }
840
841     if (redraw_mask & REDRAW_DOOR_2)
842     {
843       x1 = MIN(x1, VX);
844       y1 = MIN(y1, VY);
845       x2 = MAX(x2, VX + VXSIZE);
846       y2 = MAX(y2, VY + VYSIZE);
847     }
848
849     if (redraw_mask & REDRAW_DOOR_3)
850     {
851       x1 = MIN(x1, EX);
852       y1 = MIN(y1, EY);
853       x2 = MAX(x2, EX + EXSIZE);
854       y2 = MAX(y2, EY + EYSIZE);
855     }
856
857     // make sure that at least one pixel is blitted, and inside the screen
858     // (else nothing is blitted, causing the animations not to be updated)
859     x1 = MIN(MAX(0, x1), WIN_XSIZE - 1);
860     y1 = MIN(MAX(0, y1), WIN_YSIZE - 1);
861     x2 = MIN(MAX(1, x2), WIN_XSIZE);
862     y2 = MIN(MAX(1, y2), WIN_YSIZE);
863
864     BlitBitmap(backbuffer, window, x1, y1, x2 - x1, y2 - y1, x1, y1);
865   }
866
867   redraw_mask = REDRAW_NONE;
868
869 #if DEBUG_FRAME_TIME
870   PrintFrameTimeDebugging();
871 #endif
872 }
873
874 void BackToFront_WithFrameDelay(unsigned int frame_delay_value)
875 {
876   unsigned int frame_delay_value_old = GetVideoFrameDelay();
877
878   SetVideoFrameDelay(frame_delay_value);
879
880   BackToFront();
881
882   SetVideoFrameDelay(frame_delay_value_old);
883 }
884
885 static int fade_type_skip = FADE_TYPE_NONE;
886
887 static void FadeExt(int fade_mask, int fade_mode, int fade_type)
888 {
889   void (*draw_border_function)(void) = NULL;
890   int x, y, width, height;
891   int fade_delay, post_delay;
892
893   if (fade_type == FADE_TYPE_FADE_OUT)
894   {
895     if (fade_type_skip != FADE_TYPE_NONE)
896     {
897       // skip all fade operations until specified fade operation
898       if (fade_type & fade_type_skip)
899         fade_type_skip = FADE_TYPE_NONE;
900
901       return;
902     }
903
904     if (fading.fade_mode & FADE_TYPE_TRANSFORM)
905       return;
906   }
907
908   redraw_mask |= fade_mask;
909
910   if (fade_type == FADE_TYPE_SKIP)
911   {
912     fade_type_skip = fade_mode;
913
914     return;
915   }
916
917   fade_delay = fading.fade_delay;
918   post_delay = (fade_mode == FADE_MODE_FADE_OUT ? fading.post_delay : 0);
919
920   if (fade_type_skip != FADE_TYPE_NONE)
921   {
922     // skip all fade operations until specified fade operation
923     if (fade_type & fade_type_skip)
924       fade_type_skip = FADE_TYPE_NONE;
925
926     fade_delay = 0;
927   }
928
929   if (global.autoplay_leveldir)
930   {
931     return;
932   }
933
934   if (fade_mask == REDRAW_FIELD)
935   {
936     x = FADE_SX;
937     y = FADE_SY;
938     width  = FADE_SXSIZE;
939     height = FADE_SYSIZE;
940
941     if (border.draw_masked_when_fading)
942       draw_border_function = DrawMaskedBorder_FIELD;    // update when fading
943     else
944       DrawMaskedBorder_FIELD();                         // draw once
945   }
946   else          // REDRAW_ALL
947   {
948     x = 0;
949     y = 0;
950     width  = WIN_XSIZE;
951     height = WIN_YSIZE;
952   }
953
954   // when switching screens without fading, set fade delay to zero
955   if (!setup.fade_screens || fading.fade_mode == FADE_MODE_NONE)
956     fade_delay = 0;
957
958   // do not display black frame when fading out without fade delay
959   if (fade_mode == FADE_MODE_FADE_OUT && fade_delay == 0)
960     return;
961
962   FadeRectangle(x, y, width, height, fade_mode, fade_delay, post_delay,
963                 draw_border_function);
964
965   redraw_mask &= ~fade_mask;
966
967   ClearAutoRepeatKeyEvents();
968 }
969
970 static void SetScreenStates_BeforeFadingIn(void)
971 {
972   // temporarily set screen mode for animations to screen after fading in
973   global.anim_status = global.anim_status_next;
974
975   // store backbuffer with all animations that will be started after fading in
976   PrepareFadeBitmap(DRAW_TO_FADE_TARGET);
977
978   // set screen mode for animations back to fading
979   global.anim_status = GAME_MODE_PSEUDO_FADING;
980 }
981
982 static void SetScreenStates_AfterFadingIn(void)
983 {
984   // store new source screen (to use correct masked border for fading)
985   gfx.fade_border_source_status = global.border_status;
986
987   global.anim_status = global.anim_status_next;
988 }
989
990 static void SetScreenStates_BeforeFadingOut(void)
991 {
992   // store new target screen (to use correct masked border for fading)
993   gfx.fade_border_target_status = game_status;
994
995   // set screen mode for animations to fading
996   global.anim_status = GAME_MODE_PSEUDO_FADING;
997
998   // store backbuffer with all animations that will be stopped for fading out
999   PrepareFadeBitmap(DRAW_TO_FADE_SOURCE);
1000 }
1001
1002 static void SetScreenStates_AfterFadingOut(void)
1003 {
1004   global.border_status = game_status;
1005 }
1006
1007 void FadeIn(int fade_mask)
1008 {
1009   SetScreenStates_BeforeFadingIn();
1010
1011 #if 1
1012   DrawMaskedBorder(REDRAW_ALL);
1013 #endif
1014
1015   if (fading.fade_mode & FADE_TYPE_TRANSFORM)
1016     FadeExt(fade_mask, fading.fade_mode, FADE_TYPE_FADE_IN);
1017   else
1018     FadeExt(fade_mask, FADE_MODE_FADE_IN, FADE_TYPE_FADE_IN);
1019
1020   FADE_SX = REAL_SX;
1021   FADE_SY = REAL_SY;
1022   FADE_SXSIZE = FULL_SXSIZE;
1023   FADE_SYSIZE = FULL_SYSIZE;
1024
1025   // activate virtual buttons depending on upcoming game status
1026   if (strEqual(setup.touch.control_type, TOUCH_CONTROL_VIRTUAL_BUTTONS) &&
1027       game_status == GAME_MODE_PLAYING && !tape.playing)
1028     SetOverlayActive(TRUE);
1029
1030   SetScreenStates_AfterFadingIn();
1031
1032   // force update of global animation status in case of rapid screen changes
1033   redraw_mask = REDRAW_ALL;
1034   BackToFront();
1035 }
1036
1037 void FadeOut(int fade_mask)
1038 {
1039   // update screen if areas covered by "fade_mask" and "redraw_mask" differ
1040   if (!equalRedrawMasks(fade_mask, redraw_mask) &&
1041       fade_type_skip != FADE_MODE_SKIP_FADE_OUT)
1042     BackToFront();
1043
1044   SetScreenStates_BeforeFadingOut();
1045
1046   SetTileCursorActive(FALSE);
1047   SetOverlayActive(FALSE);
1048
1049 #if 0
1050   DrawMaskedBorder(REDRAW_ALL);
1051 #endif
1052
1053   if (fading.fade_mode & FADE_TYPE_TRANSFORM)
1054     FadeExt(fade_mask, fading.fade_mode, FADE_TYPE_FADE_OUT);
1055   else
1056     FadeExt(fade_mask, FADE_MODE_FADE_OUT, FADE_TYPE_FADE_OUT);
1057
1058   SetScreenStates_AfterFadingOut();
1059 }
1060
1061 static void FadeSetLeaveNext(struct TitleFadingInfo fading_leave, boolean set)
1062 {
1063   static struct TitleFadingInfo fading_leave_stored;
1064
1065   if (set)
1066     fading_leave_stored = fading_leave;
1067   else
1068     fading = fading_leave_stored;
1069 }
1070
1071 void FadeSetEnterMenu(void)
1072 {
1073   fading = menu.enter_menu;
1074
1075   FadeSetLeaveNext(fading, TRUE);       // (keep same fade mode)
1076 }
1077
1078 void FadeSetLeaveMenu(void)
1079 {
1080   fading = menu.leave_menu;
1081
1082   FadeSetLeaveNext(fading, TRUE);       // (keep same fade mode)
1083 }
1084
1085 void FadeSetEnterScreen(void)
1086 {
1087   fading = menu.enter_screen[game_status];
1088
1089   FadeSetLeaveNext(menu.leave_screen[game_status], TRUE);       // store
1090 }
1091
1092 void FadeSetNextScreen(void)
1093 {
1094   fading = menu.next_screen[game_status];
1095
1096   // (do not overwrite fade mode set by FadeSetEnterScreen)
1097   // FadeSetLeaveNext(fading, TRUE);    // (keep same fade mode)
1098 }
1099
1100 void FadeSetLeaveScreen(void)
1101 {
1102   FadeSetLeaveNext(menu.leave_screen[game_status], FALSE);      // recall
1103 }
1104
1105 void FadeSetFromType(int type)
1106 {
1107   if (type & TYPE_ENTER_SCREEN)
1108     FadeSetEnterScreen();
1109   else if (type & TYPE_ENTER)
1110     FadeSetEnterMenu();
1111   else if (type & TYPE_LEAVE)
1112     FadeSetLeaveMenu();
1113 }
1114
1115 void FadeSetDisabled(void)
1116 {
1117   static struct TitleFadingInfo fading_none = { FADE_MODE_NONE, -1, -1, -1 };
1118
1119   fading = fading_none;
1120 }
1121
1122 void FadeSkipNextFadeIn(void)
1123 {
1124   FadeExt(0, FADE_MODE_SKIP_FADE_IN, FADE_TYPE_SKIP);
1125 }
1126
1127 void FadeSkipNextFadeOut(void)
1128 {
1129   FadeExt(0, FADE_MODE_SKIP_FADE_OUT, FADE_TYPE_SKIP);
1130 }
1131
1132 static Bitmap *getBitmapFromGraphicOrDefault(int graphic, int default_graphic)
1133 {
1134   if (graphic == IMG_UNDEFINED)
1135     return NULL;
1136
1137   boolean redefined = getImageListEntryFromImageID(graphic)->redefined;
1138
1139   return (graphic_info[graphic].bitmap != NULL || redefined ?
1140           graphic_info[graphic].bitmap :
1141           graphic_info[default_graphic].bitmap);
1142 }
1143
1144 static Bitmap *getBackgroundBitmap(int graphic)
1145 {
1146   return getBitmapFromGraphicOrDefault(graphic, IMG_BACKGROUND);
1147 }
1148
1149 static Bitmap *getGlobalBorderBitmap(int graphic)
1150 {
1151   return getBitmapFromGraphicOrDefault(graphic, IMG_GLOBAL_BORDER);
1152 }
1153
1154 Bitmap *getGlobalBorderBitmapFromStatus(int status)
1155 {
1156   int graphic =
1157     (status == GAME_MODE_MAIN ||
1158      status == GAME_MODE_PSEUDO_TYPENAME        ? IMG_GLOBAL_BORDER_MAIN :
1159      status == GAME_MODE_SCORES                 ? IMG_GLOBAL_BORDER_SCORES :
1160      status == GAME_MODE_EDITOR                 ? IMG_GLOBAL_BORDER_EDITOR :
1161      status == GAME_MODE_PLAYING                ? IMG_GLOBAL_BORDER_PLAYING :
1162      IMG_GLOBAL_BORDER);
1163
1164   return getGlobalBorderBitmap(graphic);
1165 }
1166
1167 void SetWindowBackgroundImageIfDefined(int graphic)
1168 {
1169   if (graphic_info[graphic].bitmap)
1170     SetWindowBackgroundBitmap(graphic_info[graphic].bitmap);
1171 }
1172
1173 void SetMainBackgroundImageIfDefined(int graphic)
1174 {
1175   if (graphic_info[graphic].bitmap)
1176     SetMainBackgroundBitmap(graphic_info[graphic].bitmap);
1177 }
1178
1179 void SetDoorBackgroundImageIfDefined(int graphic)
1180 {
1181   if (graphic_info[graphic].bitmap)
1182     SetDoorBackgroundBitmap(graphic_info[graphic].bitmap);
1183 }
1184
1185 void SetWindowBackgroundImage(int graphic)
1186 {
1187   SetWindowBackgroundBitmap(getBackgroundBitmap(graphic));
1188 }
1189
1190 void SetMainBackgroundImage(int graphic)
1191 {
1192   SetMainBackgroundBitmap(getBackgroundBitmap(graphic));
1193 }
1194
1195 void SetDoorBackgroundImage(int graphic)
1196 {
1197   SetDoorBackgroundBitmap(getBackgroundBitmap(graphic));
1198 }
1199
1200 void SetPanelBackground(void)
1201 {
1202   struct GraphicInfo *gfx = &graphic_info[IMG_BACKGROUND_PANEL];
1203
1204   BlitBitmapTiled(gfx->bitmap, bitmap_db_panel, gfx->src_x, gfx->src_y,
1205                   gfx->width, gfx->height, 0, 0, DXSIZE, DYSIZE);
1206
1207   SetDoorBackgroundBitmap(bitmap_db_panel);
1208 }
1209
1210 void DrawBackground(int x, int y, int width, int height)
1211 {
1212   // "drawto" might still point to playfield buffer here (hall of fame)
1213   ClearRectangleOnBackground(backbuffer, x, y, width, height);
1214
1215   if (IN_GFX_FIELD_FULL(x, y))
1216     redraw_mask |= REDRAW_FIELD;
1217   else if (IN_GFX_DOOR_1(x, y))
1218     redraw_mask |= REDRAW_DOOR_1;
1219   else if (IN_GFX_DOOR_2(x, y))
1220     redraw_mask |= REDRAW_DOOR_2;
1221   else if (IN_GFX_DOOR_3(x, y))
1222     redraw_mask |= REDRAW_DOOR_3;
1223 }
1224
1225 void DrawBackgroundForFont(int x, int y, int width, int height, int font_nr)
1226 {
1227   struct FontBitmapInfo *font = getFontBitmapInfo(font_nr);
1228
1229   if (font->bitmap == NULL)
1230     return;
1231
1232   DrawBackground(x, y, width, height);
1233 }
1234
1235 void DrawBackgroundForGraphic(int x, int y, int width, int height, int graphic)
1236 {
1237   struct GraphicInfo *g = &graphic_info[graphic];
1238
1239   if (g->bitmap == NULL)
1240     return;
1241
1242   DrawBackground(x, y, width, height);
1243 }
1244
1245 static int game_status_last = -1;
1246 static Bitmap *global_border_bitmap_last = NULL;
1247 static Bitmap *global_border_bitmap = NULL;
1248 static int real_sx_last = -1, real_sy_last = -1;
1249 static int full_sxsize_last = -1, full_sysize_last = -1;
1250 static int dx_last = -1, dy_last = -1;
1251 static int dxsize_last = -1, dysize_last = -1;
1252 static int vx_last = -1, vy_last = -1;
1253 static int vxsize_last = -1, vysize_last = -1;
1254 static int ex_last = -1, ey_last = -1;
1255 static int exsize_last = -1, eysize_last = -1;
1256
1257 boolean CheckIfGlobalBorderHasChanged(void)
1258 {
1259   // if game status has not changed, global border has not changed either
1260   if (game_status == game_status_last)
1261     return FALSE;
1262
1263   // determine and store new global border bitmap for current game status
1264   global_border_bitmap = getGlobalBorderBitmapFromStatus(game_status);
1265
1266   return (global_border_bitmap_last != global_border_bitmap);
1267 }
1268
1269 #define ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED             0
1270
1271 #if ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED
1272 static boolean CheckIfGlobalBorderRedrawIsNeeded(void)
1273 {
1274   // if game status has not changed, nothing has to be redrawn
1275   if (game_status == game_status_last)
1276     return FALSE;
1277
1278   // redraw if last screen was title screen
1279   if (game_status_last == GAME_MODE_TITLE)
1280     return TRUE;
1281
1282   // redraw if global screen border has changed
1283   if (CheckIfGlobalBorderHasChanged())
1284     return TRUE;
1285
1286   // redraw if position or size of playfield area has changed
1287   if (real_sx_last != REAL_SX || real_sy_last != REAL_SY ||
1288       full_sxsize_last != FULL_SXSIZE || full_sysize_last != FULL_SYSIZE)
1289     return TRUE;
1290
1291   // redraw if position or size of door area has changed
1292   if (dx_last != DX || dy_last != DY ||
1293       dxsize_last != DXSIZE || dysize_last != DYSIZE)
1294     return TRUE;
1295
1296   // redraw if position or size of tape area has changed
1297   if (vx_last != VX || vy_last != VY ||
1298       vxsize_last != VXSIZE || vysize_last != VYSIZE)
1299     return TRUE;
1300
1301   // redraw if position or size of editor area has changed
1302   if (ex_last != EX || ey_last != EY ||
1303       exsize_last != EXSIZE || eysize_last != EYSIZE)
1304     return TRUE;
1305
1306   return FALSE;
1307 }
1308 #endif
1309
1310 static void RedrawGlobalBorderFromBitmap(Bitmap *bitmap)
1311 {
1312   if (bitmap)
1313     BlitBitmap(bitmap, backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
1314   else
1315     ClearRectangle(backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE);
1316 }
1317
1318 void RedrawGlobalBorder(void)
1319 {
1320   Bitmap *bitmap = getGlobalBorderBitmapFromStatus(game_status);
1321
1322   RedrawGlobalBorderFromBitmap(bitmap);
1323
1324   redraw_mask = REDRAW_ALL;
1325 }
1326
1327 static void RedrawGlobalBorderIfNeeded(void)
1328 {
1329 #if ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED
1330   if (game_status == game_status_last)
1331     return;
1332 #endif
1333
1334   // copy current draw buffer to later copy back areas that have not changed
1335   if (game_status_last != GAME_MODE_TITLE)
1336     BlitBitmap(backbuffer, bitmap_db_store_1, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
1337
1338 #if ONLY_REDRAW_GLOBAL_BORDER_IF_NEEDED
1339   if (CheckIfGlobalBorderRedrawIsNeeded())
1340 #else
1341   // determine and store new global border bitmap for current game status
1342   global_border_bitmap = getGlobalBorderBitmapFromStatus(game_status);
1343 #endif
1344   {
1345     // redraw global screen border (or clear, if defined to be empty)
1346     RedrawGlobalBorderFromBitmap(global_border_bitmap);
1347
1348     if (game_status == GAME_MODE_EDITOR)
1349       DrawSpecialEditorDoor();
1350
1351     // copy previous playfield and door areas, if they are defined on both
1352     // previous and current screen and if they still have the same size
1353
1354     if (real_sx_last != -1 && real_sy_last != -1 &&
1355         REAL_SX != -1 && REAL_SY != -1 &&
1356         full_sxsize_last == FULL_SXSIZE && full_sysize_last == FULL_SYSIZE)
1357       BlitBitmap(bitmap_db_store_1, backbuffer,
1358                  real_sx_last, real_sy_last, FULL_SXSIZE, FULL_SYSIZE,
1359                  REAL_SX, REAL_SY);
1360
1361     if (dx_last != -1 && dy_last != -1 &&
1362         DX != -1 && DY != -1 &&
1363         dxsize_last == DXSIZE && dysize_last == DYSIZE)
1364       BlitBitmap(bitmap_db_store_1, backbuffer,
1365                  dx_last, dy_last, DXSIZE, DYSIZE, DX, DY);
1366
1367     if (game_status != GAME_MODE_EDITOR)
1368     {
1369       if (vx_last != -1 && vy_last != -1 &&
1370           VX != -1 && VY != -1 &&
1371           vxsize_last == VXSIZE && vysize_last == VYSIZE)
1372         BlitBitmap(bitmap_db_store_1, backbuffer,
1373                    vx_last, vy_last, VXSIZE, VYSIZE, VX, VY);
1374     }
1375     else
1376     {
1377       if (ex_last != -1 && ey_last != -1 &&
1378           EX != -1 && EY != -1 &&
1379           exsize_last == EXSIZE && eysize_last == EYSIZE)
1380         BlitBitmap(bitmap_db_store_1, backbuffer,
1381                    ex_last, ey_last, EXSIZE, EYSIZE, EX, EY);
1382     }
1383
1384     redraw_mask = REDRAW_ALL;
1385   }
1386
1387   game_status_last = game_status;
1388
1389   global_border_bitmap_last = global_border_bitmap;
1390
1391   real_sx_last = REAL_SX;
1392   real_sy_last = REAL_SY;
1393   full_sxsize_last = FULL_SXSIZE;
1394   full_sysize_last = FULL_SYSIZE;
1395   dx_last = DX;
1396   dy_last = DY;
1397   dxsize_last = DXSIZE;
1398   dysize_last = DYSIZE;
1399   vx_last = VX;
1400   vy_last = VY;
1401   vxsize_last = VXSIZE;
1402   vysize_last = VYSIZE;
1403   ex_last = EX;
1404   ey_last = EY;
1405   exsize_last = EXSIZE;
1406   eysize_last = EYSIZE;
1407 }
1408
1409 void ClearField(void)
1410 {
1411   RedrawGlobalBorderIfNeeded();
1412
1413   // !!! "drawto" might still point to playfield buffer here (see above) !!!
1414   // (when entering hall of fame after playing)
1415   DrawBackground(REAL_SX, REAL_SY, FULL_SXSIZE, FULL_SYSIZE);
1416
1417   // !!! maybe this should be done before clearing the background !!!
1418   if (game_status == GAME_MODE_PLAYING)
1419   {
1420     ClearRectangle(fieldbuffer, 0, 0, FXSIZE, FYSIZE);
1421     SetDrawtoField(DRAW_TO_FIELDBUFFER);
1422   }
1423   else
1424   {
1425     SetDrawtoField(DRAW_TO_BACKBUFFER);
1426   }
1427 }
1428
1429 void MarkTileDirty(int x, int y)
1430 {
1431   redraw_mask |= REDRAW_FIELD;
1432 }
1433
1434 void SetBorderElement(void)
1435 {
1436   int x, y;
1437
1438   BorderElement = EL_EMPTY;
1439
1440   // only the R'n'D game engine may use an additional steelwall border
1441   if (level.game_engine_type != GAME_ENGINE_TYPE_RND)
1442     return;
1443
1444   for (y = 0; y < lev_fieldy && BorderElement == EL_EMPTY; y++)
1445   {
1446     for (x = 0; x < lev_fieldx; x++)
1447     {
1448       if (!IS_INDESTRUCTIBLE(Tile[x][y]))
1449         BorderElement = EL_STEELWALL;
1450
1451       if (y != 0 && y != lev_fieldy - 1 && x != lev_fieldx - 1)
1452         x = lev_fieldx - 2;
1453     }
1454   }
1455 }
1456
1457 void FloodFillLevelExt(int from_x, int from_y, int fill_element,
1458                        int max_array_fieldx, int max_array_fieldy,
1459                        short field[max_array_fieldx][max_array_fieldy],
1460                        int max_fieldx, int max_fieldy)
1461 {
1462   int i,x,y;
1463   int old_element;
1464   static int check[4][2] = { { -1, 0 }, { 0, -1 }, { 1, 0 }, { 0, 1 } };
1465   static int safety = 0;
1466
1467   // check if starting field still has the desired content
1468   if (field[from_x][from_y] == fill_element)
1469     return;
1470
1471   safety++;
1472
1473   if (safety > max_fieldx * max_fieldy)
1474     Fail("Something went wrong in 'FloodFill()'. Please debug.");
1475
1476   old_element = field[from_x][from_y];
1477   field[from_x][from_y] = fill_element;
1478
1479   for (i = 0; i < 4; i++)
1480   {
1481     x = from_x + check[i][0];
1482     y = from_y + check[i][1];
1483
1484     if (IN_FIELD(x, y, max_fieldx, max_fieldy) && field[x][y] == old_element)
1485       FloodFillLevelExt(x, y, fill_element, max_array_fieldx, max_array_fieldy,
1486                         field, max_fieldx, max_fieldy);
1487   }
1488
1489   safety--;
1490 }
1491
1492 void FloodFillLevel(int from_x, int from_y, int fill_element,
1493                     short field[MAX_LEV_FIELDX][MAX_LEV_FIELDY],
1494                     int max_fieldx, int max_fieldy)
1495 {
1496   FloodFillLevelExt(from_x, from_y, fill_element,
1497                     MAX_LEV_FIELDX, MAX_LEV_FIELDY, field,
1498                     max_fieldx, max_fieldy);
1499 }
1500
1501 void SetRandomAnimationValue(int x, int y)
1502 {
1503   gfx.anim_random_frame = GfxRandom[x][y];
1504 }
1505
1506 int getGraphicAnimationFrame(int graphic, int sync_frame)
1507 {
1508   // animation synchronized with global frame counter, not move position
1509   if (graphic_info[graphic].anim_global_sync || sync_frame < 0)
1510     sync_frame = FrameCounter;
1511
1512   return getAnimationFrame(graphic_info[graphic].anim_frames,
1513                            graphic_info[graphic].anim_delay,
1514                            graphic_info[graphic].anim_mode,
1515                            graphic_info[graphic].anim_start_frame,
1516                            sync_frame);
1517 }
1518
1519 void getGraphicSourceBitmap(int graphic, int tilesize, Bitmap **bitmap)
1520 {
1521   struct GraphicInfo *g = &graphic_info[graphic];
1522   int tilesize_capped = MIN(MAX(1, tilesize), TILESIZE);
1523
1524   if (tilesize == gfx.standard_tile_size)
1525     *bitmap = g->bitmaps[IMG_BITMAP_STANDARD];
1526   else if (tilesize == game.tile_size)
1527     *bitmap = g->bitmaps[IMG_BITMAP_GAME];
1528   else
1529     *bitmap = g->bitmaps[IMG_BITMAP_1x1 - log_2(tilesize_capped)];
1530 }
1531
1532 void getGraphicSourceXY(int graphic, int frame, int *x, int *y,
1533                         boolean get_backside)
1534 {
1535   struct GraphicInfo *g = &graphic_info[graphic];
1536   int src_x = g->src_x + (get_backside ? g->offset2_x : 0);
1537   int src_y = g->src_y + (get_backside ? g->offset2_y : 0);
1538
1539   if (g->offset_y == 0)         // frames are ordered horizontally
1540   {
1541     int max_width = g->anim_frames_per_line * g->width;
1542     int pos = (src_y / g->height) * max_width + src_x + frame * g->offset_x;
1543
1544     *x = pos % max_width;
1545     *y = src_y % g->height + pos / max_width * g->height;
1546   }
1547   else if (g->offset_x == 0)    // frames are ordered vertically
1548   {
1549     int max_height = g->anim_frames_per_line * g->height;
1550     int pos = (src_x / g->width) * max_height + src_y + frame * g->offset_y;
1551
1552     *x = src_x % g->width + pos / max_height * g->width;
1553     *y = pos % max_height;
1554   }
1555   else                          // frames are ordered diagonally
1556   {
1557     *x = src_x + frame * g->offset_x;
1558     *y = src_y + frame * g->offset_y;
1559   }
1560 }
1561
1562 void getSizedGraphicSourceExt(int graphic, int frame, int tilesize,
1563                               Bitmap **bitmap, int *x, int *y,
1564                               boolean get_backside)
1565 {
1566   struct GraphicInfo *g = &graphic_info[graphic];
1567
1568   // if no graphics defined at all, use fallback graphics
1569   if (g->bitmaps == NULL)
1570     *g = graphic_info[IMG_CHAR_EXCLAM];
1571
1572   // if no in-game graphics defined, always use standard graphic size
1573   if (g->bitmaps[IMG_BITMAP_GAME] == NULL)
1574     tilesize = TILESIZE;
1575
1576   getGraphicSourceBitmap(graphic, tilesize, bitmap);
1577   getGraphicSourceXY(graphic, frame, x, y, get_backside);
1578
1579   *x = *x * tilesize / g->tile_size;
1580   *y = *y * tilesize / g->tile_size;
1581 }
1582
1583 void getSizedGraphicSource(int graphic, int frame, int tilesize,
1584                            Bitmap **bitmap, int *x, int *y)
1585 {
1586   getSizedGraphicSourceExt(graphic, frame, tilesize, bitmap, x, y, FALSE);
1587 }
1588
1589 void getFixedGraphicSource(int graphic, int frame,
1590                            Bitmap **bitmap, int *x, int *y)
1591 {
1592   getSizedGraphicSourceExt(graphic, frame, TILESIZE, bitmap, x, y, FALSE);
1593 }
1594
1595 void getMiniGraphicSource(int graphic, Bitmap **bitmap, int *x, int *y)
1596 {
1597   getSizedGraphicSource(graphic, 0, MINI_TILESIZE, bitmap, x, y);
1598 }
1599
1600 static void getGraphicSourceExt(int graphic, int frame, Bitmap **bitmap,
1601                                 int *x, int *y, boolean get_backside)
1602 {
1603   getSizedGraphicSourceExt(graphic, frame, TILESIZE_VAR, bitmap, x, y,
1604                            get_backside);
1605 }
1606
1607 void getGraphicSource(int graphic, int frame, Bitmap **bitmap, int *x, int *y)
1608 {
1609   getGraphicSourceExt(graphic, frame, bitmap, x, y, FALSE);
1610 }
1611
1612 void DrawGraphic(int x, int y, int graphic, int frame)
1613 {
1614 #if DEBUG
1615   if (!IN_SCR_FIELD(x, y))
1616   {
1617     Debug("draw:DrawGraphic", "x = %d, y = %d, graphic = %d", x, y, graphic);
1618     Debug("draw:DrawGraphic", "This should never happen!");
1619
1620     return;
1621   }
1622 #endif
1623
1624   DrawGraphicExt(drawto_field, FX + x * TILEX_VAR, FY + y * TILEY_VAR, graphic,
1625                  frame);
1626
1627   MarkTileDirty(x, y);
1628 }
1629
1630 void DrawFixedGraphic(int x, int y, int graphic, int frame)
1631 {
1632 #if DEBUG
1633   if (!IN_SCR_FIELD(x, y))
1634   {
1635     Debug("draw:DrawFixedGraphic", "x = %d, y = %d, graphic = %d",
1636           x, y, graphic);
1637     Debug("draw:DrawFixedGraphic", "This should never happen!");
1638
1639     return;
1640   }
1641 #endif
1642
1643   DrawFixedGraphicExt(drawto_field, FX + x * TILEX, FY + y * TILEY, graphic,
1644                       frame);
1645   MarkTileDirty(x, y);
1646 }
1647
1648 void DrawGraphicExt(DrawBuffer *dst_bitmap, int x, int y, int graphic,
1649                     int frame)
1650 {
1651   Bitmap *src_bitmap;
1652   int src_x, src_y;
1653
1654   getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1655
1656   BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, TILEX_VAR, TILEY_VAR, x, y);
1657 }
1658
1659 void DrawFixedGraphicExt(DrawBuffer *dst_bitmap, int x, int y, int graphic,
1660                          int frame)
1661 {
1662   Bitmap *src_bitmap;
1663   int src_x, src_y;
1664
1665   getFixedGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1666   BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, TILEX, TILEY, x, y);
1667 }
1668
1669 void DrawGraphicThruMask(int x, int y, int graphic, int frame)
1670 {
1671 #if DEBUG
1672   if (!IN_SCR_FIELD(x, y))
1673   {
1674     Debug("draw:DrawGraphicThruMask", "x = %d,y = %d, graphic = %d",
1675           x, y, graphic);
1676     Debug("draw:DrawGraphicThruMask", "This should never happen!");
1677
1678     return;
1679   }
1680 #endif
1681
1682   DrawGraphicThruMaskExt(drawto_field, FX + x * TILEX_VAR, FY + y * TILEY_VAR,
1683                          graphic, frame);
1684
1685   MarkTileDirty(x, y);
1686 }
1687
1688 void DrawFixedGraphicThruMask(int x, int y, int graphic, int frame)
1689 {
1690 #if DEBUG
1691   if (!IN_SCR_FIELD(x, y))
1692   {
1693     Debug("draw:DrawFixedGraphicThruMask", "x = %d,y = %d, graphic = %d",
1694           x, y, graphic);
1695     Debug("draw:DrawFixedGraphicThruMask", "This should never happen!");
1696
1697     return;
1698   }
1699 #endif
1700
1701   DrawFixedGraphicThruMaskExt(drawto_field, FX + x * TILEX, FY + y * TILEY,
1702                               graphic, frame);
1703   MarkTileDirty(x, y);
1704 }
1705
1706 void DrawGraphicThruMaskExt(DrawBuffer *d, int dst_x, int dst_y, int graphic,
1707                             int frame)
1708 {
1709   Bitmap *src_bitmap;
1710   int src_x, src_y;
1711
1712   getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1713
1714   BlitBitmapMasked(src_bitmap, d, src_x, src_y, TILEX_VAR, TILEY_VAR,
1715                    dst_x, dst_y);
1716 }
1717
1718 void DrawFixedGraphicThruMaskExt(DrawBuffer *d, int dst_x, int dst_y,
1719                                  int graphic, int frame)
1720 {
1721   Bitmap *src_bitmap;
1722   int src_x, src_y;
1723
1724   getFixedGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1725
1726   BlitBitmapMasked(src_bitmap, d, src_x, src_y, TILEX, TILEY,
1727                    dst_x, dst_y);
1728 }
1729
1730 void DrawSizedGraphic(int x, int y, int graphic, int frame, int tilesize)
1731 {
1732   DrawSizedGraphicExt(drawto, SX + x * tilesize, SY + y * tilesize, graphic,
1733                       frame, tilesize);
1734   MarkTileDirty(x / tilesize, y / tilesize);
1735 }
1736
1737 void DrawSizedGraphicThruMask(int x, int y, int graphic, int frame,
1738                               int tilesize)
1739 {
1740   DrawSizedGraphicThruMaskExt(drawto, SX + x * tilesize, SY + y * tilesize,
1741                               graphic, frame, tilesize);
1742   MarkTileDirty(x / tilesize, y / tilesize);
1743 }
1744
1745 void DrawSizedGraphicExt(DrawBuffer *d, int x, int y, int graphic, int frame,
1746                          int tilesize)
1747 {
1748   Bitmap *src_bitmap;
1749   int src_x, src_y;
1750
1751   getSizedGraphicSource(graphic, frame, tilesize, &src_bitmap, &src_x, &src_y);
1752   BlitBitmap(src_bitmap, d, src_x, src_y, tilesize, tilesize, x, y);
1753 }
1754
1755 void DrawSizedGraphicThruMaskExt(DrawBuffer *d, int x, int y, int graphic,
1756                                  int frame, int tilesize)
1757 {
1758   Bitmap *src_bitmap;
1759   int src_x, src_y;
1760
1761   getSizedGraphicSource(graphic, frame, tilesize, &src_bitmap, &src_x, &src_y);
1762   BlitBitmapMasked(src_bitmap, d, src_x, src_y, tilesize, tilesize, x, y);
1763 }
1764
1765 void DrawMiniGraphic(int x, int y, int graphic)
1766 {
1767   DrawMiniGraphicExt(drawto, SX + x * MINI_TILEX,SY + y * MINI_TILEY, graphic);
1768   MarkTileDirty(x / 2, y / 2);
1769 }
1770
1771 void DrawMiniGraphicExt(DrawBuffer *d, int x, int y, int graphic)
1772 {
1773   Bitmap *src_bitmap;
1774   int src_x, src_y;
1775
1776   getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
1777   BlitBitmap(src_bitmap, d, src_x, src_y, MINI_TILEX, MINI_TILEY, x, y);
1778 }
1779
1780 static void DrawGraphicShiftedNormal(int x, int y, int dx, int dy,
1781                                      int graphic, int frame,
1782                                      int cut_mode, int mask_mode)
1783 {
1784   Bitmap *src_bitmap;
1785   int src_x, src_y;
1786   int dst_x, dst_y;
1787   int width = TILEX, height = TILEY;
1788   int cx = 0, cy = 0;
1789
1790   if (dx || dy)                 // shifted graphic
1791   {
1792     if (x < BX1)                // object enters playfield from the left
1793     {
1794       x = BX1;
1795       width = dx;
1796       cx = TILEX - dx;
1797       dx = 0;
1798     }
1799     else if (x > BX2)           // object enters playfield from the right
1800     {
1801       x = BX2;
1802       width = -dx;
1803       dx = TILEX + dx;
1804     }
1805     else if (x == BX1 && dx < 0) // object leaves playfield to the left
1806     {
1807       width += dx;
1808       cx = -dx;
1809       dx = 0;
1810     }
1811     else if (x == BX2 && dx > 0) // object leaves playfield to the right
1812       width -= dx;
1813     else if (dx)                // general horizontal movement
1814       MarkTileDirty(x + SIGN(dx), y);
1815
1816     if (y < BY1)                // object enters playfield from the top
1817     {
1818       if (cut_mode == CUT_BELOW) // object completely above top border
1819         return;
1820
1821       y = BY1;
1822       height = dy;
1823       cy = TILEY - dy;
1824       dy = 0;
1825     }
1826     else if (y > BY2)           // object enters playfield from the bottom
1827     {
1828       y = BY2;
1829       height = -dy;
1830       dy = TILEY + dy;
1831     }
1832     else if (y == BY1 && dy < 0) // object leaves playfield to the top
1833     {
1834       height += dy;
1835       cy = -dy;
1836       dy = 0;
1837     }
1838     else if (dy > 0 && cut_mode == CUT_ABOVE)
1839     {
1840       if (y == BY2)             // object completely above bottom border
1841         return;
1842
1843       height = dy;
1844       cy = TILEY - dy;
1845       dy = TILEY;
1846       MarkTileDirty(x, y + 1);
1847     }                           // object leaves playfield to the bottom
1848     else if (dy > 0 && (y == BY2 || cut_mode == CUT_BELOW))
1849       height -= dy;
1850     else if (dy)                // general vertical movement
1851       MarkTileDirty(x, y + SIGN(dy));
1852   }
1853
1854 #if DEBUG
1855   if (!IN_SCR_FIELD(x, y))
1856   {
1857     Debug("draw:DrawGraphicShiftedNormal", "x = %d, y = %d, graphic = %d",
1858           x, y, graphic);
1859     Debug("draw:DrawGraphicShiftedNormal", "This should never happen!");
1860
1861     return;
1862   }
1863 #endif
1864
1865   width = width * TILESIZE_VAR / TILESIZE;
1866   height = height * TILESIZE_VAR / TILESIZE;
1867   cx = cx * TILESIZE_VAR / TILESIZE;
1868   cy = cy * TILESIZE_VAR / TILESIZE;
1869   dx = dx * TILESIZE_VAR / TILESIZE;
1870   dy = dy * TILESIZE_VAR / TILESIZE;
1871
1872   if (width > 0 && height > 0)
1873   {
1874     getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
1875
1876     src_x += cx;
1877     src_y += cy;
1878
1879     dst_x = FX + x * TILEX_VAR + dx;
1880     dst_y = FY + y * TILEY_VAR + dy;
1881
1882     if (mask_mode == USE_MASKING)
1883       BlitBitmapMasked(src_bitmap, drawto_field, src_x, src_y, width, height,
1884                        dst_x, dst_y);
1885     else
1886       BlitBitmap(src_bitmap, drawto_field, src_x, src_y, width, height,
1887                  dst_x, dst_y);
1888
1889     MarkTileDirty(x, y);
1890   }
1891 }
1892
1893 static void DrawGraphicShiftedDouble(int x, int y, int dx, int dy,
1894                                      int graphic, int frame,
1895                                      int cut_mode, int mask_mode)
1896 {
1897   Bitmap *src_bitmap;
1898   int src_x, src_y;
1899   int dst_x, dst_y;
1900   int width = TILEX_VAR, height = TILEY_VAR;
1901   int x1 = x;
1902   int y1 = y;
1903   int x2 = x + SIGN(dx);
1904   int y2 = y + SIGN(dy);
1905
1906   // movement with two-tile animations must be sync'ed with movement position,
1907   // not with current GfxFrame (which can be higher when using slow movement)
1908   int anim_pos = (dx ? ABS(dx) : ABS(dy));
1909   int anim_frames = graphic_info[graphic].anim_frames;
1910
1911   // (we also need anim_delay here for movement animations with less frames)
1912   int anim_delay = graphic_info[graphic].anim_delay;
1913   int sync_frame = anim_pos * anim_frames * anim_delay / TILESIZE;
1914
1915   boolean draw_start_tile = (cut_mode != CUT_ABOVE);    // only for falling!
1916   boolean draw_end_tile   = (cut_mode != CUT_BELOW);    // only for falling!
1917
1918   // re-calculate animation frame for two-tile movement animation
1919   frame = getGraphicAnimationFrame(graphic, sync_frame);
1920
1921   // check if movement start graphic inside screen area and should be drawn
1922   if (draw_start_tile && IN_SCR_FIELD(x1, y1))
1923   {
1924     getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, TRUE);
1925
1926     dst_x = FX + x1 * TILEX_VAR;
1927     dst_y = FY + y1 * TILEY_VAR;
1928
1929     if (mask_mode == USE_MASKING)
1930       BlitBitmapMasked(src_bitmap, drawto_field, src_x, src_y, width, height,
1931                        dst_x, dst_y);
1932     else
1933       BlitBitmap(src_bitmap, drawto_field, src_x, src_y, width, height,
1934                  dst_x, dst_y);
1935
1936     MarkTileDirty(x1, y1);
1937   }
1938
1939   // check if movement end graphic inside screen area and should be drawn
1940   if (draw_end_tile && IN_SCR_FIELD(x2, y2))
1941   {
1942     getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, FALSE);
1943
1944     dst_x = FX + x2 * TILEX_VAR;
1945     dst_y = FY + y2 * TILEY_VAR;
1946
1947     if (mask_mode == USE_MASKING)
1948       BlitBitmapMasked(src_bitmap, drawto_field, src_x, src_y, width, height,
1949                        dst_x, dst_y);
1950     else
1951       BlitBitmap(src_bitmap, drawto_field, src_x, src_y, width, height,
1952                  dst_x, dst_y);
1953
1954     MarkTileDirty(x2, y2);
1955   }
1956 }
1957
1958 static void DrawGraphicShifted(int x, int y, int dx, int dy,
1959                                int graphic, int frame,
1960                                int cut_mode, int mask_mode)
1961 {
1962   if (graphic < 0)
1963   {
1964     DrawGraphic(x, y, graphic, frame);
1965
1966     return;
1967   }
1968
1969   if (graphic_info[graphic].double_movement)    // EM style movement images
1970     DrawGraphicShiftedDouble(x, y, dx, dy, graphic, frame, cut_mode,mask_mode);
1971   else
1972     DrawGraphicShiftedNormal(x, y, dx, dy, graphic, frame, cut_mode,mask_mode);
1973 }
1974
1975 static void DrawGraphicShiftedThruMask(int x, int y, int dx, int dy,
1976                                        int graphic, int frame, int cut_mode)
1977 {
1978   DrawGraphicShifted(x, y, dx, dy, graphic, frame, cut_mode, USE_MASKING);
1979 }
1980
1981 void DrawScreenElementExt(int x, int y, int dx, int dy, int element,
1982                           int cut_mode, int mask_mode)
1983 {
1984   int lx = LEVELX(x), ly = LEVELY(y);
1985   int graphic;
1986   int frame;
1987
1988   if (IN_LEV_FIELD(lx, ly))
1989   {
1990     SetRandomAnimationValue(lx, ly);
1991
1992     graphic = el_act_dir2img(element, GfxAction[lx][ly], GfxDir[lx][ly]);
1993     frame = getGraphicAnimationFrame(graphic, GfxFrame[lx][ly]);
1994
1995     // do not use double (EM style) movement graphic when not moving
1996     if (graphic_info[graphic].double_movement && !dx && !dy)
1997     {
1998       graphic = el_act_dir2img(element, ACTION_DEFAULT, GfxDir[lx][ly]);
1999       frame = getGraphicAnimationFrame(graphic, GfxFrame[lx][ly]);
2000     }
2001   }
2002   else  // border element
2003   {
2004     graphic = el2img(element);
2005     frame = getGraphicAnimationFrame(graphic, -1);
2006   }
2007
2008   if (element == EL_EXPANDABLE_WALL)
2009   {
2010     boolean left_stopped = FALSE, right_stopped = FALSE;
2011
2012     if (!IN_LEV_FIELD(lx - 1, ly) || IS_WALL(Tile[lx - 1][ly]))
2013       left_stopped = TRUE;
2014     if (!IN_LEV_FIELD(lx + 1, ly) || IS_WALL(Tile[lx + 1][ly]))
2015       right_stopped = TRUE;
2016
2017     if (left_stopped && right_stopped)
2018       graphic = IMG_WALL;
2019     else if (left_stopped)
2020     {
2021       graphic = IMG_EXPANDABLE_WALL_GROWING_RIGHT;
2022       frame = graphic_info[graphic].anim_frames - 1;
2023     }
2024     else if (right_stopped)
2025     {
2026       graphic = IMG_EXPANDABLE_WALL_GROWING_LEFT;
2027       frame = graphic_info[graphic].anim_frames - 1;
2028     }
2029   }
2030
2031   if (dx || dy)
2032     DrawGraphicShifted(x, y, dx, dy, graphic, frame, cut_mode, mask_mode);
2033   else if (mask_mode == USE_MASKING)
2034     DrawGraphicThruMask(x, y, graphic, frame);
2035   else
2036     DrawGraphic(x, y, graphic, frame);
2037 }
2038
2039 void DrawLevelElementExt(int x, int y, int dx, int dy, int element,
2040                          int cut_mode, int mask_mode)
2041 {
2042   if (IN_LEV_FIELD(x, y) && IN_SCR_FIELD(SCREENX(x), SCREENY(y)))
2043     DrawScreenElementExt(SCREENX(x), SCREENY(y), dx, dy, element,
2044                          cut_mode, mask_mode);
2045 }
2046
2047 void DrawScreenElementShifted(int x, int y, int dx, int dy, int element,
2048                               int cut_mode)
2049 {
2050   DrawScreenElementExt(x, y, dx, dy, element, cut_mode, NO_MASKING);
2051 }
2052
2053 void DrawLevelElementShifted(int x, int y, int dx, int dy, int element,
2054                              int cut_mode)
2055 {
2056   DrawLevelElementExt(x, y, dx, dy, element, cut_mode, NO_MASKING);
2057 }
2058
2059 void DrawLevelElementThruMask(int x, int y, int element)
2060 {
2061   DrawLevelElementExt(x, y, 0, 0, element, NO_CUTTING, USE_MASKING);
2062 }
2063
2064 void DrawLevelFieldThruMask(int x, int y)
2065 {
2066   DrawLevelElementExt(x, y, 0, 0, Tile[x][y], NO_CUTTING, USE_MASKING);
2067 }
2068
2069 // !!! implementation of quicksand is totally broken !!!
2070 #define IS_CRUMBLED_TILE(x, y, e)                                       \
2071         (GFX_CRUMBLED(e) && (!IN_LEV_FIELD(x, y) ||                     \
2072                              !IS_MOVING(x, y) ||                        \
2073                              (e) == EL_QUICKSAND_EMPTYING ||            \
2074                              (e) == EL_QUICKSAND_FAST_EMPTYING))
2075
2076 static void DrawLevelFieldCrumbledInnerCorners(int x, int y, int dx, int dy,
2077                                                int graphic)
2078 {
2079   Bitmap *src_bitmap;
2080   int src_x, src_y;
2081   int width, height, cx, cy;
2082   int sx = SCREENX(x), sy = SCREENY(y);
2083   int crumbled_border_size = graphic_info[graphic].border_size;
2084   int crumbled_tile_size = graphic_info[graphic].tile_size;
2085   int crumbled_border_size_var =
2086     crumbled_border_size * TILESIZE_VAR / crumbled_tile_size;
2087   int i;
2088
2089   getGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
2090
2091   for (i = 1; i < 4; i++)
2092   {
2093     int dxx = (i & 1 ? dx : 0);
2094     int dyy = (i & 2 ? dy : 0);
2095     int xx = x + dxx;
2096     int yy = y + dyy;
2097     int element = (IN_LEV_FIELD(xx, yy) ? TILE_GFX_ELEMENT(xx, yy) :
2098                    BorderElement);
2099
2100     // check if neighbour field is of same crumble type
2101     boolean same = (IS_CRUMBLED_TILE(xx, yy, element) &&
2102                     graphic_info[graphic].class ==
2103                     graphic_info[el_act2crm(element, ACTION_DEFAULT)].class);
2104
2105     // return if check prevents inner corner
2106     if (same == (dxx == dx && dyy == dy))
2107       return;
2108   }
2109
2110   // if we reach this point, we have an inner corner
2111
2112   getGraphicSource(graphic, 1, &src_bitmap, &src_x, &src_y);
2113
2114   width  = crumbled_border_size_var;
2115   height = crumbled_border_size_var;
2116   cx = (dx > 0 ? TILESIZE_VAR - width  : 0);
2117   cy = (dy > 0 ? TILESIZE_VAR - height : 0);
2118
2119   BlitBitmap(src_bitmap, drawto_field, src_x + cx, src_y + cy,
2120              width, height, FX + sx * TILEX_VAR + cx, FY + sy * TILEY_VAR + cy);
2121 }
2122
2123 static void DrawLevelFieldCrumbledBorders(int x, int y, int graphic, int frame,
2124                                           int dir)
2125 {
2126   Bitmap *src_bitmap;
2127   int src_x, src_y;
2128   int width, height, bx, by, cx, cy;
2129   int sx = SCREENX(x), sy = SCREENY(y);
2130   int crumbled_border_size = graphic_info[graphic].border_size;
2131   int crumbled_tile_size = graphic_info[graphic].tile_size;
2132   int crumbled_border_size_var =
2133     crumbled_border_size * TILESIZE_VAR / crumbled_tile_size;
2134   int crumbled_border_pos_var = TILESIZE_VAR - crumbled_border_size_var;
2135   int i;
2136
2137   getGraphicSource(graphic, frame, &src_bitmap, &src_x, &src_y);
2138
2139   // draw simple, sloppy, non-corner-accurate crumbled border
2140
2141   width  = (dir == 1 || dir == 2 ? crumbled_border_size_var : TILESIZE_VAR);
2142   height = (dir == 0 || dir == 3 ? crumbled_border_size_var : TILESIZE_VAR);
2143   cx = (dir == 2 ? crumbled_border_pos_var : 0);
2144   cy = (dir == 3 ? crumbled_border_pos_var : 0);
2145
2146   BlitBitmap(src_bitmap, drawto_field, src_x + cx, src_y + cy, width, height,
2147              FX + sx * TILEX_VAR + cx,
2148              FY + sy * TILEY_VAR + cy);
2149
2150   // (remaining middle border part must be at least as big as corner part)
2151   if (!(graphic_info[graphic].style & STYLE_ACCURATE_BORDERS) ||
2152       crumbled_border_size_var >= TILESIZE_VAR / 3)
2153     return;
2154
2155   // correct corners of crumbled border, if needed
2156
2157   for (i = -1; i <= 1; i += 2)
2158   {
2159     int xx = x + (dir == 0 || dir == 3 ? i : 0);
2160     int yy = y + (dir == 1 || dir == 2 ? i : 0);
2161     int element = (IN_LEV_FIELD(xx, yy) ? TILE_GFX_ELEMENT(xx, yy) :
2162                    BorderElement);
2163
2164     // check if neighbour field is of same crumble type
2165     if (IS_CRUMBLED_TILE(xx, yy, element) &&
2166         graphic_info[graphic].class ==
2167         graphic_info[el_act2crm(element, ACTION_DEFAULT)].class)
2168     {
2169       // no crumbled corner, but continued crumbled border
2170
2171       int c1 = (dir == 2 || dir == 3 ? crumbled_border_pos_var : 0);
2172       int c2 = (i == 1 ? crumbled_border_pos_var : 0);
2173       int b1 = (i == 1 ? crumbled_border_size_var :
2174                 TILESIZE_VAR - 2 * crumbled_border_size_var);
2175
2176       width  = crumbled_border_size_var;
2177       height = crumbled_border_size_var;
2178
2179       if (dir == 1 || dir == 2)
2180       {
2181         cx = c1;
2182         cy = c2;
2183         bx = cx;
2184         by = b1;
2185       }
2186       else
2187       {
2188         cx = c2;
2189         cy = c1;
2190         bx = b1;
2191         by = cy;
2192       }
2193
2194       BlitBitmap(src_bitmap, drawto_field, src_x + bx, src_y + by,
2195                  width, height,
2196                  FX + sx * TILEX_VAR + cx,
2197                  FY + sy * TILEY_VAR + cy);
2198     }
2199   }
2200 }
2201
2202 static void DrawLevelFieldCrumbledExt(int x, int y, int graphic, int frame)
2203 {
2204   int sx = SCREENX(x), sy = SCREENY(y);
2205   int element;
2206   int i;
2207   static int xy[4][2] =
2208   {
2209     { 0, -1 },
2210     { -1, 0 },
2211     { +1, 0 },
2212     { 0, +1 }
2213   };
2214
2215   if (!IN_LEV_FIELD(x, y))
2216     return;
2217
2218   element = TILE_GFX_ELEMENT(x, y);
2219
2220   if (IS_CRUMBLED_TILE(x, y, element))          // crumble field itself
2221   {
2222     if (!IN_SCR_FIELD(sx, sy))
2223       return;
2224
2225     // crumble field borders towards direct neighbour fields
2226     for (i = 0; i < 4; i++)
2227     {
2228       int xx = x + xy[i][0];
2229       int yy = y + xy[i][1];
2230
2231       element = (IN_LEV_FIELD(xx, yy) ? TILE_GFX_ELEMENT(xx, yy) :
2232                  BorderElement);
2233
2234       // check if neighbour field is of same crumble type
2235       if (IS_CRUMBLED_TILE(xx, yy, element) &&
2236           graphic_info[graphic].class ==
2237           graphic_info[el_act2crm(element, ACTION_DEFAULT)].class)
2238         continue;
2239
2240       DrawLevelFieldCrumbledBorders(x, y, graphic, frame, i);
2241     }
2242
2243     // crumble inner field corners towards corner neighbour fields
2244     if ((graphic_info[graphic].style & STYLE_INNER_CORNERS) &&
2245         graphic_info[graphic].anim_frames == 2)
2246     {
2247       for (i = 0; i < 4; i++)
2248       {
2249         int dx = (i & 1 ? +1 : -1);
2250         int dy = (i & 2 ? +1 : -1);
2251
2252         DrawLevelFieldCrumbledInnerCorners(x, y, dx, dy, graphic);
2253       }
2254     }
2255
2256     MarkTileDirty(sx, sy);
2257   }
2258   else          // center field is not crumbled -- crumble neighbour fields
2259   {
2260     // crumble field borders of direct neighbour fields
2261     for (i = 0; i < 4; i++)
2262     {
2263       int xx = x + xy[i][0];
2264       int yy = y + xy[i][1];
2265       int sxx = sx + xy[i][0];
2266       int syy = sy + xy[i][1];
2267
2268       if (!IN_LEV_FIELD(xx, yy) ||
2269           !IN_SCR_FIELD(sxx, syy))
2270         continue;
2271
2272       // do not crumble fields that are being digged or snapped
2273       if (Tile[xx][yy] == EL_EMPTY ||
2274           Tile[xx][yy] == EL_ELEMENT_SNAPPING)
2275         continue;
2276
2277       element = TILE_GFX_ELEMENT(xx, yy);
2278
2279       if (!IS_CRUMBLED_TILE(xx, yy, element))
2280         continue;
2281
2282       graphic = el_act2crm(element, ACTION_DEFAULT);
2283
2284       DrawLevelFieldCrumbledBorders(xx, yy, graphic, 0, 3 - i);
2285
2286       MarkTileDirty(sxx, syy);
2287     }
2288
2289     // crumble inner field corners of corner neighbour fields
2290     for (i = 0; i < 4; i++)
2291     {
2292       int dx = (i & 1 ? +1 : -1);
2293       int dy = (i & 2 ? +1 : -1);
2294       int xx = x + dx;
2295       int yy = y + dy;
2296       int sxx = sx + dx;
2297       int syy = sy + dy;
2298
2299       if (!IN_LEV_FIELD(xx, yy) ||
2300           !IN_SCR_FIELD(sxx, syy))
2301         continue;
2302
2303       if (Tile[xx][yy] == EL_ELEMENT_SNAPPING)
2304         continue;
2305
2306       element = TILE_GFX_ELEMENT(xx, yy);
2307
2308       if (!IS_CRUMBLED_TILE(xx, yy, element))
2309         continue;
2310
2311       graphic = el_act2crm(element, ACTION_DEFAULT);
2312
2313       if ((graphic_info[graphic].style & STYLE_INNER_CORNERS) &&
2314           graphic_info[graphic].anim_frames == 2)
2315         DrawLevelFieldCrumbledInnerCorners(xx, yy, -dx, -dy, graphic);
2316
2317       MarkTileDirty(sxx, syy);
2318     }
2319   }
2320 }
2321
2322 void DrawLevelFieldCrumbled(int x, int y)
2323 {
2324   int graphic;
2325
2326   if (!IN_LEV_FIELD(x, y))
2327     return;
2328
2329   if (Tile[x][y] == EL_ELEMENT_SNAPPING &&
2330       GfxElement[x][y] != EL_UNDEFINED &&
2331       GFX_CRUMBLED(GfxElement[x][y]))
2332   {
2333     DrawLevelFieldCrumbledDigging(x, y, GfxDir[x][y], GfxFrame[x][y]);
2334
2335     return;
2336   }
2337
2338   graphic = el_act2crm(TILE_GFX_ELEMENT(x, y), ACTION_DEFAULT);
2339
2340   DrawLevelFieldCrumbledExt(x, y, graphic, 0);
2341 }
2342
2343 void DrawLevelFieldCrumbledDigging(int x, int y, int direction,
2344                                    int step_frame)
2345 {
2346   int graphic1 = el_act_dir2img(GfxElement[x][y], ACTION_DIGGING, direction);
2347   int graphic2 = el_act_dir2crm(GfxElement[x][y], ACTION_DIGGING, direction);
2348   int frame1 = getGraphicAnimationFrame(graphic1, step_frame);
2349   int frame2 = getGraphicAnimationFrame(graphic2, step_frame);
2350   int sx = SCREENX(x), sy = SCREENY(y);
2351
2352   DrawGraphic(sx, sy, graphic1, frame1);
2353   DrawLevelFieldCrumbledExt(x, y, graphic2, frame2);
2354 }
2355
2356 void DrawLevelFieldCrumbledNeighbours(int x, int y)
2357 {
2358   int sx = SCREENX(x), sy = SCREENY(y);
2359   static int xy[4][2] =
2360   {
2361     { 0, -1 },
2362     { -1, 0 },
2363     { +1, 0 },
2364     { 0, +1 }
2365   };
2366   int i;
2367
2368   // crumble direct neighbour fields (required for field borders)
2369   for (i = 0; i < 4; i++)
2370   {
2371     int xx = x + xy[i][0];
2372     int yy = y + xy[i][1];
2373     int sxx = sx + xy[i][0];
2374     int syy = sy + xy[i][1];
2375
2376     if (!IN_LEV_FIELD(xx, yy) ||
2377         !IN_SCR_FIELD(sxx, syy) ||
2378         !GFX_CRUMBLED(Tile[xx][yy]) ||
2379         IS_MOVING(xx, yy))
2380       continue;
2381
2382     DrawLevelField(xx, yy);
2383   }
2384
2385   // crumble corner neighbour fields (required for inner field corners)
2386   for (i = 0; i < 4; i++)
2387   {
2388     int dx = (i & 1 ? +1 : -1);
2389     int dy = (i & 2 ? +1 : -1);
2390     int xx = x + dx;
2391     int yy = y + dy;
2392     int sxx = sx + dx;
2393     int syy = sy + dy;
2394
2395     if (!IN_LEV_FIELD(xx, yy) ||
2396         !IN_SCR_FIELD(sxx, syy) ||
2397         !GFX_CRUMBLED(Tile[xx][yy]) ||
2398         IS_MOVING(xx, yy))
2399       continue;
2400
2401     int element = TILE_GFX_ELEMENT(xx, yy);
2402     int graphic = el_act2crm(element, ACTION_DEFAULT);
2403
2404     if ((graphic_info[graphic].style & STYLE_INNER_CORNERS) &&
2405         graphic_info[graphic].anim_frames == 2)
2406       DrawLevelField(xx, yy);
2407   }
2408 }
2409
2410 static int getBorderElement(int x, int y)
2411 {
2412   int border[7][2] =
2413   {
2414     { EL_STEELWALL_TOPLEFT,             EL_INVISIBLE_STEELWALL_TOPLEFT     },
2415     { EL_STEELWALL_TOPRIGHT,            EL_INVISIBLE_STEELWALL_TOPRIGHT    },
2416     { EL_STEELWALL_BOTTOMLEFT,          EL_INVISIBLE_STEELWALL_BOTTOMLEFT  },
2417     { EL_STEELWALL_BOTTOMRIGHT,         EL_INVISIBLE_STEELWALL_BOTTOMRIGHT },
2418     { EL_STEELWALL_VERTICAL,            EL_INVISIBLE_STEELWALL_VERTICAL    },
2419     { EL_STEELWALL_HORIZONTAL,          EL_INVISIBLE_STEELWALL_HORIZONTAL  },
2420     { EL_STEELWALL,                     EL_INVISIBLE_STEELWALL             }
2421   };
2422   int steel_type = (BorderElement == EL_STEELWALL ? 0 : 1);
2423   int steel_position = (x == -1         && y == -1              ? 0 :
2424                         x == lev_fieldx && y == -1              ? 1 :
2425                         x == -1         && y == lev_fieldy      ? 2 :
2426                         x == lev_fieldx && y == lev_fieldy      ? 3 :
2427                         x == -1         || x == lev_fieldx      ? 4 :
2428                         y == -1         || y == lev_fieldy      ? 5 : 6);
2429
2430   return border[steel_position][steel_type];
2431 }
2432
2433 void DrawScreenElement(int x, int y, int element)
2434 {
2435   DrawScreenElementExt(x, y, 0, 0, element, NO_CUTTING, NO_MASKING);
2436   DrawLevelFieldCrumbled(LEVELX(x), LEVELY(y));
2437 }
2438
2439 void DrawLevelElement(int x, int y, int element)
2440 {
2441   if (IN_LEV_FIELD(x, y) && IN_SCR_FIELD(SCREENX(x), SCREENY(y)))
2442     DrawScreenElement(SCREENX(x), SCREENY(y), element);
2443 }
2444
2445 void DrawScreenField(int x, int y)
2446 {
2447   int lx = LEVELX(x), ly = LEVELY(y);
2448   int element, content;
2449
2450   if (!IN_LEV_FIELD(lx, ly))
2451   {
2452     if (lx < -1 || lx > lev_fieldx || ly < -1 || ly > lev_fieldy)
2453       element = EL_EMPTY;
2454     else
2455       element = getBorderElement(lx, ly);
2456
2457     DrawScreenElement(x, y, element);
2458
2459     return;
2460   }
2461
2462   element = Tile[lx][ly];
2463   content = Store[lx][ly];
2464
2465   if (IS_MOVING(lx, ly))
2466   {
2467     int horiz_move = (MovDir[lx][ly] == MV_LEFT || MovDir[lx][ly] == MV_RIGHT);
2468     boolean cut_mode = NO_CUTTING;
2469
2470     if (element == EL_QUICKSAND_EMPTYING ||
2471         element == EL_QUICKSAND_FAST_EMPTYING ||
2472         element == EL_MAGIC_WALL_EMPTYING ||
2473         element == EL_BD_MAGIC_WALL_EMPTYING ||
2474         element == EL_DC_MAGIC_WALL_EMPTYING ||
2475         element == EL_AMOEBA_DROPPING)
2476       cut_mode = CUT_ABOVE;
2477     else if (element == EL_QUICKSAND_FILLING ||
2478              element == EL_QUICKSAND_FAST_FILLING ||
2479              element == EL_MAGIC_WALL_FILLING ||
2480              element == EL_BD_MAGIC_WALL_FILLING ||
2481              element == EL_DC_MAGIC_WALL_FILLING)
2482       cut_mode = CUT_BELOW;
2483
2484     if (cut_mode == CUT_ABOVE)
2485       DrawScreenElement(x, y, element);
2486     else
2487       DrawScreenElement(x, y, EL_EMPTY);
2488
2489     if (horiz_move)
2490       DrawScreenElementShifted(x, y, MovPos[lx][ly], 0, element, NO_CUTTING);
2491     else if (cut_mode == NO_CUTTING)
2492       DrawScreenElementShifted(x, y, 0, MovPos[lx][ly], element, cut_mode);
2493     else
2494     {
2495       DrawScreenElementShifted(x, y, 0, MovPos[lx][ly], content, cut_mode);
2496
2497       if (cut_mode == CUT_BELOW &&
2498           IN_LEV_FIELD(lx, ly + 1) && IN_SCR_FIELD(x, y + 1))
2499         DrawLevelElement(lx, ly + 1, element);
2500     }
2501
2502     if (content == EL_ACID)
2503     {
2504       int dir = MovDir[lx][ly];
2505       int newlx = lx + (dir == MV_LEFT ? -1 : dir == MV_RIGHT ? +1 : 0);
2506       int newly = ly + (dir == MV_UP   ? -1 : dir == MV_DOWN  ? +1 : 0);
2507
2508       DrawLevelElementThruMask(newlx, newly, EL_ACID);
2509
2510       // prevent target field from being drawn again (but without masking)
2511       // (this would happen if target field is scanned after moving element)
2512       Stop[newlx][newly] = TRUE;
2513     }
2514   }
2515   else if (IS_BLOCKED(lx, ly))
2516   {
2517     int oldx, oldy;
2518     int sx, sy;
2519     int horiz_move;
2520     boolean cut_mode = NO_CUTTING;
2521     int element_old, content_old;
2522
2523     Blocked2Moving(lx, ly, &oldx, &oldy);
2524     sx = SCREENX(oldx);
2525     sy = SCREENY(oldy);
2526     horiz_move = (MovDir[oldx][oldy] == MV_LEFT ||
2527                   MovDir[oldx][oldy] == MV_RIGHT);
2528
2529     element_old = Tile[oldx][oldy];
2530     content_old = Store[oldx][oldy];
2531
2532     if (element_old == EL_QUICKSAND_EMPTYING ||
2533         element_old == EL_QUICKSAND_FAST_EMPTYING ||
2534         element_old == EL_MAGIC_WALL_EMPTYING ||
2535         element_old == EL_BD_MAGIC_WALL_EMPTYING ||
2536         element_old == EL_DC_MAGIC_WALL_EMPTYING ||
2537         element_old == EL_AMOEBA_DROPPING)
2538       cut_mode = CUT_ABOVE;
2539
2540     DrawScreenElement(x, y, EL_EMPTY);
2541
2542     if (horiz_move)
2543       DrawScreenElementShifted(sx, sy, MovPos[oldx][oldy], 0, element_old,
2544                                NO_CUTTING);
2545     else if (cut_mode == NO_CUTTING)
2546       DrawScreenElementShifted(sx, sy, 0, MovPos[oldx][oldy], element_old,
2547                                cut_mode);
2548     else
2549       DrawScreenElementShifted(sx, sy, 0, MovPos[oldx][oldy], content_old,
2550                                cut_mode);
2551   }
2552   else if (IS_DRAWABLE(element))
2553     DrawScreenElement(x, y, element);
2554   else
2555     DrawScreenElement(x, y, EL_EMPTY);
2556 }
2557
2558 void DrawLevelField(int x, int y)
2559 {
2560   if (IN_SCR_FIELD(SCREENX(x), SCREENY(y)))
2561     DrawScreenField(SCREENX(x), SCREENY(y));
2562   else if (IS_MOVING(x, y))
2563   {
2564     int newx,newy;
2565
2566     Moving2Blocked(x, y, &newx, &newy);
2567     if (IN_SCR_FIELD(SCREENX(newx), SCREENY(newy)))
2568       DrawScreenField(SCREENX(newx), SCREENY(newy));
2569   }
2570   else if (IS_BLOCKED(x, y))
2571   {
2572     int oldx, oldy;
2573
2574     Blocked2Moving(x, y, &oldx, &oldy);
2575     if (IN_SCR_FIELD(SCREENX(oldx), SCREENY(oldy)))
2576       DrawScreenField(SCREENX(oldx), SCREENY(oldy));
2577   }
2578 }
2579
2580 static void DrawSizedWallExt_MM(int dst_x, int dst_y, int element, int tilesize,
2581                                 int (*el2img_function)(int), boolean masked,
2582                                 int element_bits_draw)
2583 {
2584   int element_base = map_mm_wall_element(element);
2585   int element_bits = (IS_DF_WALL(element) ?
2586                       element - EL_DF_WALL_START :
2587                       IS_MM_WALL(element) ?
2588                       element - EL_MM_WALL_START : EL_EMPTY) & 0x000f;
2589   int graphic = el2img_function(element_base);
2590   int tilesize_draw = tilesize / 2;
2591   Bitmap *src_bitmap;
2592   int src_x, src_y;
2593   int i;
2594
2595   getSizedGraphicSource(graphic, 0, tilesize_draw, &src_bitmap, &src_x, &src_y);
2596
2597   for (i = 0; i < 4; i++)
2598   {
2599     int dst_draw_x = dst_x + (i % 2) * tilesize_draw;
2600     int dst_draw_y = dst_y + (i / 2) * tilesize_draw;
2601
2602     if (!(element_bits_draw & (1 << i)))
2603       continue;
2604
2605     if (element_bits & (1 << i))
2606     {
2607       if (masked)
2608         BlitBitmapMasked(src_bitmap, drawto, src_x, src_y,
2609                          tilesize_draw, tilesize_draw, dst_draw_x, dst_draw_y);
2610       else
2611         BlitBitmap(src_bitmap, drawto, src_x, src_y,
2612                    tilesize_draw, tilesize_draw, dst_draw_x, dst_draw_y);
2613     }
2614     else
2615     {
2616       if (!masked)
2617         ClearRectangle(drawto, dst_draw_x, dst_draw_y,
2618                        tilesize_draw, tilesize_draw);
2619     }
2620   }
2621 }
2622
2623 void DrawSizedWallParts_MM(int x, int y, int element, int tilesize,
2624                            boolean masked, int element_bits_draw)
2625 {
2626   DrawSizedWallExt_MM(SX + x * tilesize, SY + y * tilesize,
2627                       element, tilesize, el2edimg, masked, element_bits_draw);
2628 }
2629
2630 static void DrawSizedWall_MM(int dst_x, int dst_y, int element, int tilesize,
2631                              int (*el2img_function)(int))
2632 {
2633   DrawSizedWallExt_MM(dst_x, dst_y, element, tilesize, el2img_function, FALSE,
2634                       0x000f);
2635 }
2636
2637 static void DrawSizedElementExt(int x, int y, int element, int tilesize,
2638                                 boolean masked)
2639 {
2640   if (IS_MM_WALL(element))
2641   {
2642     DrawSizedWallExt_MM(SX + x * tilesize, SY + y * tilesize,
2643                         element, tilesize, el2edimg, masked, 0x000f);
2644   }
2645   else
2646   {
2647     int graphic = el2edimg(element);
2648
2649     if (masked)
2650       DrawSizedGraphicThruMask(x, y, graphic, 0, tilesize);
2651     else
2652       DrawSizedGraphic(x, y, graphic, 0, tilesize);
2653   }
2654 }
2655
2656 void DrawSizedElement(int x, int y, int element, int tilesize)
2657 {
2658   DrawSizedElementExt(x, y, element, tilesize, FALSE);
2659 }
2660
2661 void DrawSizedElementThruMask(int x, int y, int element, int tilesize)
2662 {
2663   DrawSizedElementExt(x, y, element, tilesize, TRUE);
2664 }
2665
2666 void DrawMiniElement(int x, int y, int element)
2667 {
2668   int graphic;
2669
2670   graphic = el2edimg(element);
2671   DrawMiniGraphic(x, y, graphic);
2672 }
2673
2674 void DrawSizedElementOrWall(int sx, int sy, int scroll_x, int scroll_y,
2675                             int tilesize)
2676 {
2677   int x = sx + scroll_x, y = sy + scroll_y;
2678
2679   if (x < -1 || x > lev_fieldx || y < -1 || y > lev_fieldy)
2680     DrawSizedElement(sx, sy, EL_EMPTY, tilesize);
2681   else if (x > -1 && x < lev_fieldx && y > -1 && y < lev_fieldy)
2682     DrawSizedElement(sx, sy, Tile[x][y], tilesize);
2683   else
2684     DrawSizedGraphic(sx, sy, el2edimg(getBorderElement(x, y)), 0, tilesize);
2685 }
2686
2687 void DrawMiniElementOrWall(int sx, int sy, int scroll_x, int scroll_y)
2688 {
2689   int x = sx + scroll_x, y = sy + scroll_y;
2690
2691   if (x < -1 || x > lev_fieldx || y < -1 || y > lev_fieldy)
2692     DrawMiniElement(sx, sy, EL_EMPTY);
2693   else if (x > -1 && x < lev_fieldx && y > -1 && y < lev_fieldy)
2694     DrawMiniElement(sx, sy, Tile[x][y]);
2695   else
2696     DrawMiniGraphic(sx, sy, el2edimg(getBorderElement(x, y)));
2697 }
2698
2699 static void DrawEnvelopeBackgroundTiles(int graphic, int startx, int starty,
2700                                         int x, int y, int xsize, int ysize,
2701                                         int tile_width, int tile_height)
2702 {
2703   Bitmap *src_bitmap;
2704   int src_x, src_y;
2705   int dst_x = startx + x * tile_width;
2706   int dst_y = starty + y * tile_height;
2707   int width  = graphic_info[graphic].width;
2708   int height = graphic_info[graphic].height;
2709   int inner_width_raw  = MAX(width  - 2 * tile_width,  tile_width);
2710   int inner_height_raw = MAX(height - 2 * tile_height, tile_height);
2711   int inner_width  = inner_width_raw  - (inner_width_raw  % tile_width);
2712   int inner_height = inner_height_raw - (inner_height_raw % tile_height);
2713   int inner_sx = (width  >= 3 * tile_width  ? tile_width  : 0);
2714   int inner_sy = (height >= 3 * tile_height ? tile_height : 0);
2715   boolean draw_masked = graphic_info[graphic].draw_masked;
2716
2717   getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
2718
2719   if (src_bitmap == NULL || width < tile_width || height < tile_height)
2720   {
2721     ClearRectangle(drawto, dst_x, dst_y, tile_width, tile_height);
2722     return;
2723   }
2724
2725   src_x += (x == 0 ? 0 : x == xsize - 1 ? width  - tile_width  :
2726             inner_sx + (x - 1) * tile_width  % inner_width);
2727   src_y += (y == 0 ? 0 : y == ysize - 1 ? height - tile_height :
2728             inner_sy + (y - 1) * tile_height % inner_height);
2729
2730   if (draw_masked)
2731     BlitBitmapMasked(src_bitmap, drawto, src_x, src_y, tile_width, tile_height,
2732                      dst_x, dst_y);
2733   else
2734     BlitBitmap(src_bitmap, drawto, src_x, src_y, tile_width, tile_height,
2735                dst_x, dst_y);
2736 }
2737
2738 static void DrawEnvelopeBackground(int graphic, int startx, int starty,
2739                                    int x, int y, int xsize, int ysize,
2740                                    int font_nr)
2741 {
2742   int font_width  = getFontWidth(font_nr);
2743   int font_height = getFontHeight(font_nr);
2744
2745   DrawEnvelopeBackgroundTiles(graphic, startx, starty, x, y, xsize, ysize,
2746                               font_width, font_height);
2747 }
2748
2749 static void AnimateEnvelope(int envelope_nr, int anim_mode, int action)
2750 {
2751   int graphic = IMG_BACKGROUND_ENVELOPE_1 + envelope_nr;
2752   Bitmap *src_bitmap = graphic_info[graphic].bitmap;
2753   int mask_mode = (src_bitmap != NULL ? BLIT_MASKED : BLIT_ON_BACKGROUND);
2754   boolean ffwd_delay = (tape.playing && tape.fast_forward);
2755   boolean no_delay = (tape.warp_forward);
2756   unsigned int anim_delay = 0;
2757   int frame_delay_value = (ffwd_delay ? FfwdFrameDelay : GameFrameDelay);
2758   int anim_delay_value = MAX(1, (no_delay ? 0 : frame_delay_value) / 2);
2759   int font_nr = FONT_ENVELOPE_1 + envelope_nr;
2760   int font_width = getFontWidth(font_nr);
2761   int font_height = getFontHeight(font_nr);
2762   int max_xsize = level.envelope[envelope_nr].xsize;
2763   int max_ysize = level.envelope[envelope_nr].ysize;
2764   int xstart = (anim_mode & ANIM_VERTICAL ? max_xsize : 0);
2765   int ystart = (anim_mode & ANIM_HORIZONTAL ? max_ysize : 0);
2766   int xend = max_xsize;
2767   int yend = (anim_mode != ANIM_DEFAULT ? max_ysize : 0);
2768   int xstep = (xstart < xend ? 1 : 0);
2769   int ystep = (ystart < yend || xstep == 0 ? 1 : 0);
2770   int start = 0;
2771   int end = MAX(xend - xstart, yend - ystart);
2772   int i;
2773
2774   for (i = start; i <= end; i++)
2775   {
2776     int last_frame = end;       // last frame of this "for" loop
2777     int x = xstart + i * xstep;
2778     int y = ystart + i * ystep;
2779     int xsize = (action == ACTION_CLOSING ? xend - (x - xstart) : x) + 2;
2780     int ysize = (action == ACTION_CLOSING ? yend - (y - ystart) : y) + 2;
2781     int sx = SX + (SXSIZE - xsize * font_width)  / 2;
2782     int sy = SY + (SYSIZE - ysize * font_height) / 2;
2783     int xx, yy;
2784
2785     SetDrawtoField(DRAW_TO_FIELDBUFFER);
2786
2787     BlitScreenToBitmap(backbuffer);
2788
2789     SetDrawtoField(DRAW_TO_BACKBUFFER);
2790
2791     for (yy = 0; yy < ysize; yy++)
2792       for (xx = 0; xx < xsize; xx++)
2793         DrawEnvelopeBackground(graphic, sx, sy, xx, yy, xsize, ysize, font_nr);
2794
2795     DrawTextBuffer(sx + font_width, sy + font_height,
2796                    level.envelope[envelope_nr].text, font_nr, max_xsize,
2797                    xsize - 2, ysize - 2, 0, mask_mode,
2798                    level.envelope[envelope_nr].autowrap,
2799                    level.envelope[envelope_nr].centered, FALSE);
2800
2801     redraw_mask |= REDRAW_FIELD;
2802     BackToFront();
2803
2804     SkipUntilDelayReached(&anim_delay, anim_delay_value, &i, last_frame);
2805   }
2806
2807   ClearAutoRepeatKeyEvents();
2808 }
2809
2810 void ShowEnvelope(int envelope_nr)
2811 {
2812   int element = EL_ENVELOPE_1 + envelope_nr;
2813   int graphic = IMG_BACKGROUND_ENVELOPE_1 + envelope_nr;
2814   int sound_opening = element_info[element].sound[ACTION_OPENING];
2815   int sound_closing = element_info[element].sound[ACTION_CLOSING];
2816   boolean ffwd_delay = (tape.playing && tape.fast_forward);
2817   boolean no_delay = (tape.warp_forward);
2818   int normal_delay_value = ONE_SECOND_DELAY / (ffwd_delay ? 2 : 1);
2819   int wait_delay_value = (no_delay ? 0 : normal_delay_value);
2820   int anim_mode = graphic_info[graphic].anim_mode;
2821   int main_anim_mode = (anim_mode == ANIM_NONE ? ANIM_VERTICAL|ANIM_HORIZONTAL:
2822                         anim_mode == ANIM_DEFAULT ? ANIM_VERTICAL : anim_mode);
2823
2824   game.envelope_active = TRUE;  // needed for RedrawPlayfield() events
2825
2826   PlayMenuSoundStereo(sound_opening, SOUND_MIDDLE);
2827
2828   if (anim_mode == ANIM_DEFAULT)
2829     AnimateEnvelope(envelope_nr, ANIM_DEFAULT, ACTION_OPENING);
2830
2831   AnimateEnvelope(envelope_nr, main_anim_mode, ACTION_OPENING);
2832
2833   if (tape.playing)
2834     Delay_WithScreenUpdates(wait_delay_value);
2835   else
2836     WaitForEventToContinue();
2837
2838   PlayMenuSoundStereo(sound_closing, SOUND_MIDDLE);
2839
2840   if (anim_mode != ANIM_NONE)
2841     AnimateEnvelope(envelope_nr, main_anim_mode, ACTION_CLOSING);
2842
2843   if (anim_mode == ANIM_DEFAULT)
2844     AnimateEnvelope(envelope_nr, ANIM_DEFAULT, ACTION_CLOSING);
2845
2846   game.envelope_active = FALSE;
2847
2848   SetDrawtoField(DRAW_TO_FIELDBUFFER);
2849
2850   redraw_mask |= REDRAW_FIELD;
2851   BackToFront();
2852 }
2853
2854 static void setRequestBasePosition(int *x, int *y)
2855 {
2856   int sx_base, sy_base;
2857
2858   if (request.x != -1)
2859     sx_base = request.x;
2860   else if (request.align == ALIGN_LEFT)
2861     sx_base = SX;
2862   else if (request.align == ALIGN_RIGHT)
2863     sx_base = SX + SXSIZE;
2864   else
2865     sx_base = SX + SXSIZE / 2;
2866
2867   if (request.y != -1)
2868     sy_base = request.y;
2869   else if (request.valign == VALIGN_TOP)
2870     sy_base = SY;
2871   else if (request.valign == VALIGN_BOTTOM)
2872     sy_base = SY + SYSIZE;
2873   else
2874     sy_base = SY + SYSIZE / 2;
2875
2876   *x = sx_base;
2877   *y = sy_base;
2878 }
2879
2880 static void setRequestPositionExt(int *x, int *y, int width, int height,
2881                                   boolean add_border_size)
2882 {
2883   int border_size = request.border_size;
2884   int sx_base, sy_base;
2885   int sx, sy;
2886
2887   setRequestBasePosition(&sx_base, &sy_base);
2888
2889   if (request.align == ALIGN_LEFT)
2890     sx = sx_base;
2891   else if (request.align == ALIGN_RIGHT)
2892     sx = sx_base - width;
2893   else
2894     sx = sx_base - width  / 2;
2895
2896   if (request.valign == VALIGN_TOP)
2897     sy = sy_base;
2898   else if (request.valign == VALIGN_BOTTOM)
2899     sy = sy_base - height;
2900   else
2901     sy = sy_base - height / 2;
2902
2903   sx = MAX(0, MIN(sx, WIN_XSIZE - width));
2904   sy = MAX(0, MIN(sy, WIN_YSIZE - height));
2905
2906   if (add_border_size)
2907   {
2908     sx += border_size;
2909     sy += border_size;
2910   }
2911
2912   *x = sx;
2913   *y = sy;
2914 }
2915
2916 static void setRequestPosition(int *x, int *y, boolean add_border_size)
2917 {
2918   setRequestPositionExt(x, y, request.width, request.height, add_border_size);
2919 }
2920
2921 static void DrawEnvelopeRequest(char *text)
2922 {
2923   char *text_final = text;
2924   char *text_door_style = NULL;
2925   int graphic = IMG_BACKGROUND_REQUEST;
2926   Bitmap *src_bitmap = graphic_info[graphic].bitmap;
2927   int mask_mode = (src_bitmap != NULL ? BLIT_MASKED : BLIT_ON_BACKGROUND);
2928   int font_nr = FONT_REQUEST;
2929   int font_width = getFontWidth(font_nr);
2930   int font_height = getFontHeight(font_nr);
2931   int border_size = request.border_size;
2932   int line_spacing = request.line_spacing;
2933   int line_height = font_height + line_spacing;
2934   int max_text_width  = request.width  - 2 * border_size;
2935   int max_text_height = request.height - 2 * border_size;
2936   int line_length = max_text_width  / font_width;
2937   int max_lines   = max_text_height / line_height;
2938   int text_width = line_length * font_width;
2939   int width = request.width;
2940   int height = request.height;
2941   int tile_size = MAX(request.step_offset, 1);
2942   int x_steps = width  / tile_size;
2943   int y_steps = height / tile_size;
2944   int sx_offset = border_size;
2945   int sy_offset = border_size;
2946   int sx, sy;
2947   int i, x, y;
2948
2949   if (request.centered)
2950     sx_offset = (request.width - text_width) / 2;
2951
2952   if (request.wrap_single_words && !request.autowrap)
2953   {
2954     char *src_text_ptr, *dst_text_ptr;
2955
2956     text_door_style = checked_malloc(2 * strlen(text) + 1);
2957
2958     src_text_ptr = text;
2959     dst_text_ptr = text_door_style;
2960
2961     while (*src_text_ptr)
2962     {
2963       if (*src_text_ptr == ' ' ||
2964           *src_text_ptr == '?' ||
2965           *src_text_ptr == '!')
2966         *dst_text_ptr++ = '\n';
2967
2968       if (*src_text_ptr != ' ')
2969         *dst_text_ptr++ = *src_text_ptr;
2970
2971       src_text_ptr++;
2972     }
2973
2974     *dst_text_ptr = '\0';
2975
2976     text_final = text_door_style;
2977   }
2978
2979   setRequestPosition(&sx, &sy, FALSE);
2980
2981   ClearRectangle(backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE);
2982
2983   for (y = 0; y < y_steps; y++)
2984     for (x = 0; x < x_steps; x++)
2985       DrawEnvelopeBackgroundTiles(graphic, sx, sy,
2986                                   x, y, x_steps, y_steps,
2987                                   tile_size, tile_size);
2988
2989   // force DOOR font inside door area
2990   SetFontStatus(GAME_MODE_PSEUDO_DOOR);
2991
2992   DrawTextBuffer(sx + sx_offset, sy + sy_offset, text_final, font_nr,
2993                  line_length, -1, max_lines, line_spacing, mask_mode,
2994                  request.autowrap, request.centered, FALSE);
2995
2996   ResetFontStatus();
2997
2998   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
2999     RedrawGadget(tool_gadget[i]);
3000
3001   // store readily prepared envelope request for later use when animating
3002   BlitBitmap(backbuffer, bitmap_db_store_2, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
3003
3004   if (text_door_style)
3005     free(text_door_style);
3006 }
3007
3008 static void AnimateEnvelopeRequest(int anim_mode, int action)
3009 {
3010   int graphic = IMG_BACKGROUND_REQUEST;
3011   boolean draw_masked = graphic_info[graphic].draw_masked;
3012   int delay_value_normal = request.step_delay;
3013   int delay_value_fast = delay_value_normal / 2;
3014   boolean ffwd_delay = (tape.playing && tape.fast_forward);
3015   boolean no_delay = (tape.warp_forward);
3016   int delay_value = (ffwd_delay ? delay_value_fast : delay_value_normal);
3017   int anim_delay_value = MAX(1, (no_delay ? 0 : delay_value + 500 * 0) / 2);
3018   unsigned int anim_delay = 0;
3019
3020   int tile_size = MAX(request.step_offset, 1);
3021   int max_xsize = request.width  / tile_size;
3022   int max_ysize = request.height / tile_size;
3023   int max_xsize_inner = max_xsize - 2;
3024   int max_ysize_inner = max_ysize - 2;
3025
3026   int xstart = (anim_mode & ANIM_VERTICAL ? max_xsize_inner : 0);
3027   int ystart = (anim_mode & ANIM_HORIZONTAL ? max_ysize_inner : 0);
3028   int xend = max_xsize_inner;
3029   int yend = (anim_mode != ANIM_DEFAULT ? max_ysize_inner : 0);
3030   int xstep = (xstart < xend ? 1 : 0);
3031   int ystep = (ystart < yend || xstep == 0 ? 1 : 0);
3032   int start = 0;
3033   int end = MAX(xend - xstart, yend - ystart);
3034   int i;
3035
3036   if (setup.quick_doors)
3037   {
3038     xstart = xend;
3039     ystart = yend;
3040     end = 0;
3041   }
3042
3043   for (i = start; i <= end; i++)
3044   {
3045     int last_frame = end;       // last frame of this "for" loop
3046     int x = xstart + i * xstep;
3047     int y = ystart + i * ystep;
3048     int xsize = (action == ACTION_CLOSING ? xend - (x - xstart) : x) + 2;
3049     int ysize = (action == ACTION_CLOSING ? yend - (y - ystart) : y) + 2;
3050     int xsize_size_left = (xsize - 1) * tile_size;
3051     int ysize_size_top  = (ysize - 1) * tile_size;
3052     int max_xsize_pos = (max_xsize - 1) * tile_size;
3053     int max_ysize_pos = (max_ysize - 1) * tile_size;
3054     int width  = xsize * tile_size;
3055     int height = ysize * tile_size;
3056     int src_x, src_y;
3057     int dst_x, dst_y;
3058     int xx, yy;
3059
3060     setRequestPosition(&src_x, &src_y, FALSE);
3061     setRequestPositionExt(&dst_x, &dst_y, width, height, FALSE);
3062
3063     BlitBitmap(bitmap_db_store_1, backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
3064
3065     for (yy = 0; yy < 2; yy++)
3066     {
3067       for (xx = 0; xx < 2; xx++)
3068       {
3069         int src_xx = src_x + xx * max_xsize_pos;
3070         int src_yy = src_y + yy * max_ysize_pos;
3071         int dst_xx = dst_x + xx * xsize_size_left;
3072         int dst_yy = dst_y + yy * ysize_size_top;
3073         int xx_size = (xx ? tile_size : xsize_size_left);
3074         int yy_size = (yy ? tile_size : ysize_size_top);
3075
3076         if (draw_masked)
3077           BlitBitmapMasked(bitmap_db_store_2, backbuffer,
3078                            src_xx, src_yy, xx_size, yy_size, dst_xx, dst_yy);
3079         else
3080           BlitBitmap(bitmap_db_store_2, backbuffer,
3081                      src_xx, src_yy, xx_size, yy_size, dst_xx, dst_yy);
3082       }
3083     }
3084
3085     redraw_mask |= REDRAW_FIELD;
3086
3087     BackToFront();
3088
3089     SkipUntilDelayReached(&anim_delay, anim_delay_value, &i, last_frame);
3090   }
3091
3092   ClearAutoRepeatKeyEvents();
3093 }
3094
3095 static void ShowEnvelopeRequest(char *text, unsigned int req_state, int action)
3096 {
3097   int graphic = IMG_BACKGROUND_REQUEST;
3098   int sound_opening = SND_REQUEST_OPENING;
3099   int sound_closing = SND_REQUEST_CLOSING;
3100   int anim_mode_1 = request.anim_mode;                  // (higher priority)
3101   int anim_mode_2 = graphic_info[graphic].anim_mode;    // (lower priority)
3102   int anim_mode = (anim_mode_1 != ANIM_DEFAULT ? anim_mode_1 : anim_mode_2);
3103   int main_anim_mode = (anim_mode == ANIM_NONE ? ANIM_VERTICAL|ANIM_HORIZONTAL:
3104                         anim_mode == ANIM_DEFAULT ? ANIM_VERTICAL : anim_mode);
3105
3106   if (game_status == GAME_MODE_PLAYING)
3107     BlitScreenToBitmap(backbuffer);
3108
3109   SetDrawtoField(DRAW_TO_BACKBUFFER);
3110
3111   // SetDrawBackgroundMask(REDRAW_NONE);
3112
3113   if (action == ACTION_OPENING)
3114   {
3115     BlitBitmap(backbuffer, bitmap_db_store_1, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
3116
3117     if (req_state & REQ_ASK)
3118     {
3119       MapGadget(tool_gadget[TOOL_CTRL_ID_YES]);
3120       MapGadget(tool_gadget[TOOL_CTRL_ID_NO]);
3121       MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_YES]);
3122       MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_NO]);
3123     }
3124     else if (req_state & REQ_CONFIRM)
3125     {
3126       MapGadget(tool_gadget[TOOL_CTRL_ID_CONFIRM]);
3127       MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_CONFIRM]);
3128     }
3129     else if (req_state & REQ_PLAYER)
3130     {
3131       MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_1]);
3132       MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_2]);
3133       MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_3]);
3134       MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_4]);
3135     }
3136
3137     DrawEnvelopeRequest(text);
3138   }
3139
3140   game.envelope_active = TRUE;  // needed for RedrawPlayfield() events
3141
3142   if (action == ACTION_OPENING)
3143   {
3144     PlayMenuSoundStereo(sound_opening, SOUND_MIDDLE);
3145
3146     if (anim_mode == ANIM_DEFAULT)
3147       AnimateEnvelopeRequest(ANIM_DEFAULT, ACTION_OPENING);
3148
3149     AnimateEnvelopeRequest(main_anim_mode, ACTION_OPENING);
3150   }
3151   else
3152   {
3153     PlayMenuSoundStereo(sound_closing, SOUND_MIDDLE);
3154
3155     if (anim_mode != ANIM_NONE)
3156       AnimateEnvelopeRequest(main_anim_mode, ACTION_CLOSING);
3157
3158     if (anim_mode == ANIM_DEFAULT)
3159       AnimateEnvelopeRequest(ANIM_DEFAULT, ACTION_CLOSING);
3160   }
3161
3162   game.envelope_active = FALSE;
3163
3164   if (action == ACTION_CLOSING)
3165     BlitBitmap(bitmap_db_store_1, backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
3166
3167   // SetDrawBackgroundMask(last_draw_background_mask);
3168
3169   redraw_mask |= REDRAW_FIELD;
3170
3171   BackToFront();
3172
3173   if (action == ACTION_CLOSING &&
3174       game_status == GAME_MODE_PLAYING &&
3175       level.game_engine_type == GAME_ENGINE_TYPE_RND)
3176     SetDrawtoField(DRAW_TO_FIELDBUFFER);
3177 }
3178
3179 static void DrawPreviewElement(int dst_x, int dst_y, int element, int tilesize)
3180 {
3181   if (IS_MM_WALL(element))
3182   {
3183     DrawSizedWall_MM(dst_x, dst_y, element, tilesize, el2preimg);
3184   }
3185   else
3186   {
3187     Bitmap *src_bitmap;
3188     int src_x, src_y;
3189     int graphic = el2preimg(element);
3190
3191     getSizedGraphicSource(graphic, 0, tilesize, &src_bitmap, &src_x, &src_y);
3192     BlitBitmap(src_bitmap, drawto, src_x, src_y, tilesize, tilesize,
3193                dst_x, dst_y);
3194   }
3195 }
3196
3197 void DrawLevel(int draw_background_mask)
3198 {
3199   int x,y;
3200
3201   SetMainBackgroundImage(IMG_BACKGROUND_PLAYING);
3202   SetDrawBackgroundMask(draw_background_mask);
3203
3204   ClearField();
3205
3206   for (x = BX1; x <= BX2; x++)
3207     for (y = BY1; y <= BY2; y++)
3208       DrawScreenField(x, y);
3209
3210   redraw_mask |= REDRAW_FIELD;
3211 }
3212
3213 void DrawSizedLevel(int size_x, int size_y, int scroll_x, int scroll_y,
3214                     int tilesize)
3215 {
3216   int x,y;
3217
3218   for (x = 0; x < size_x; x++)
3219     for (y = 0; y < size_y; y++)
3220       DrawSizedElementOrWall(x, y, scroll_x, scroll_y, tilesize);
3221
3222   redraw_mask |= REDRAW_FIELD;
3223 }
3224
3225 void DrawMiniLevel(int size_x, int size_y, int scroll_x, int scroll_y)
3226 {
3227   int x,y;
3228
3229   for (x = 0; x < size_x; x++)
3230     for (y = 0; y < size_y; y++)
3231       DrawMiniElementOrWall(x, y, scroll_x, scroll_y);
3232
3233   redraw_mask |= REDRAW_FIELD;
3234 }
3235
3236 static void DrawPreviewLevelPlayfield(int from_x, int from_y)
3237 {
3238   boolean show_level_border = (BorderElement != EL_EMPTY);
3239   int level_xsize = lev_fieldx + (show_level_border ? 2 : 0);
3240   int level_ysize = lev_fieldy + (show_level_border ? 2 : 0);
3241   int tile_size = preview.tile_size;
3242   int preview_width  = preview.xsize * tile_size;
3243   int preview_height = preview.ysize * tile_size;
3244   int real_preview_xsize = MIN(level_xsize, preview.xsize);
3245   int real_preview_ysize = MIN(level_ysize, preview.ysize);
3246   int real_preview_width  = real_preview_xsize * tile_size;
3247   int real_preview_height = real_preview_ysize * tile_size;
3248   int dst_x = SX + ALIGNED_XPOS(preview.x, preview_width, preview.align);
3249   int dst_y = SY + ALIGNED_YPOS(preview.y, preview_height, preview.valign);
3250   int x, y;
3251
3252   if (!IN_GFX_FIELD_FULL(dst_x, dst_y + preview_height - 1))
3253     return;
3254
3255   DrawBackground(dst_x, dst_y, preview_width, preview_height);
3256
3257   dst_x += (preview_width  - real_preview_width)  / 2;
3258   dst_y += (preview_height - real_preview_height) / 2;
3259
3260   for (x = 0; x < real_preview_xsize; x++)
3261   {
3262     for (y = 0; y < real_preview_ysize; y++)
3263     {
3264       int lx = from_x + x + (show_level_border ? -1 : 0);
3265       int ly = from_y + y + (show_level_border ? -1 : 0);
3266       int element = (IN_LEV_FIELD(lx, ly) ? level.field[lx][ly] :
3267                      getBorderElement(lx, ly));
3268
3269       DrawPreviewElement(dst_x + x * tile_size, dst_y + y * tile_size,
3270                          element, tile_size);
3271     }
3272   }
3273
3274   redraw_mask |= REDRAW_FIELD;
3275 }
3276
3277 #define MICROLABEL_EMPTY                0
3278 #define MICROLABEL_LEVEL_NAME           1
3279 #define MICROLABEL_LEVEL_AUTHOR_HEAD    2
3280 #define MICROLABEL_LEVEL_AUTHOR         3
3281 #define MICROLABEL_IMPORTED_FROM_HEAD   4
3282 #define MICROLABEL_IMPORTED_FROM        5
3283 #define MICROLABEL_IMPORTED_BY_HEAD     6
3284 #define MICROLABEL_IMPORTED_BY          7
3285
3286 static int getMaxTextLength(struct TextPosInfo *pos, int font_nr)
3287 {
3288   int max_text_width = SXSIZE;
3289   int font_width = getFontWidth(font_nr);
3290
3291   if (pos->align == ALIGN_CENTER)
3292     max_text_width = (pos->x < SXSIZE / 2 ? pos->x * 2 : (SXSIZE - pos->x) * 2);
3293   else if (pos->align == ALIGN_RIGHT)
3294     max_text_width = pos->x;
3295   else
3296     max_text_width = SXSIZE - pos->x;
3297
3298   return max_text_width / font_width;
3299 }
3300
3301 static void DrawPreviewLevelLabelExt(int mode, struct TextPosInfo *pos)
3302 {
3303   char label_text[MAX_OUTPUT_LINESIZE + 1];
3304   int max_len_label_text;
3305   int font_nr = pos->font;
3306   int i;
3307
3308   if (!IN_GFX_FIELD_FULL(pos->x, pos->y + getFontHeight(pos->font)))
3309     return;
3310
3311   if (mode == MICROLABEL_LEVEL_AUTHOR_HEAD ||
3312       mode == MICROLABEL_IMPORTED_FROM_HEAD ||
3313       mode == MICROLABEL_IMPORTED_BY_HEAD)
3314     font_nr = pos->font_alt;
3315
3316   max_len_label_text = getMaxTextLength(pos, font_nr);
3317
3318   if (pos->size != -1)
3319     max_len_label_text = pos->size;
3320
3321   for (i = 0; i < max_len_label_text; i++)
3322     label_text[i] = ' ';
3323   label_text[max_len_label_text] = '\0';
3324
3325   if (strlen(label_text) > 0)
3326     DrawTextSAligned(pos->x, pos->y, label_text, font_nr, pos->align);
3327
3328   strncpy(label_text,
3329           (mode == MICROLABEL_LEVEL_NAME ? level.name :
3330            mode == MICROLABEL_LEVEL_AUTHOR_HEAD ? "created by" :
3331            mode == MICROLABEL_LEVEL_AUTHOR ? level.author :
3332            mode == MICROLABEL_IMPORTED_FROM_HEAD ? "imported from" :
3333            mode == MICROLABEL_IMPORTED_FROM ? leveldir_current->imported_from :
3334            mode == MICROLABEL_IMPORTED_BY_HEAD ? "imported by" :
3335            mode == MICROLABEL_IMPORTED_BY ? leveldir_current->imported_by :""),
3336           max_len_label_text);
3337   label_text[max_len_label_text] = '\0';
3338
3339   if (strlen(label_text) > 0)
3340     DrawTextSAligned(pos->x, pos->y, label_text, font_nr, pos->align);
3341
3342   redraw_mask |= REDRAW_FIELD;
3343 }
3344
3345 static void DrawPreviewLevelLabel(int mode)
3346 {
3347   DrawPreviewLevelLabelExt(mode, &menu.main.text.level_info_2);
3348 }
3349
3350 static void DrawPreviewLevelInfo(int mode)
3351 {
3352   if (mode == MICROLABEL_LEVEL_NAME)
3353     DrawPreviewLevelLabelExt(mode, &menu.main.text.level_name);
3354   else if (mode == MICROLABEL_LEVEL_AUTHOR)
3355     DrawPreviewLevelLabelExt(mode, &menu.main.text.level_author);
3356 }
3357
3358 static void DrawPreviewLevelExt(boolean restart)
3359 {
3360   static unsigned int scroll_delay = 0;
3361   static unsigned int label_delay = 0;
3362   static int from_x, from_y, scroll_direction;
3363   static int label_state, label_counter;
3364   unsigned int scroll_delay_value = preview.step_delay;
3365   boolean show_level_border = (BorderElement != EL_EMPTY);
3366   int level_xsize = lev_fieldx + (show_level_border ? 2 : 0);
3367   int level_ysize = lev_fieldy + (show_level_border ? 2 : 0);
3368
3369   if (restart)
3370   {
3371     from_x = 0;
3372     from_y = 0;
3373
3374     if (preview.anim_mode == ANIM_CENTERED)
3375     {
3376       if (level_xsize > preview.xsize)
3377         from_x = (level_xsize - preview.xsize) / 2;
3378       if (level_ysize > preview.ysize)
3379         from_y = (level_ysize - preview.ysize) / 2;
3380     }
3381
3382     from_x += preview.xoffset;
3383     from_y += preview.yoffset;
3384
3385     scroll_direction = MV_RIGHT;
3386     label_state = 1;
3387     label_counter = 0;
3388
3389     DrawPreviewLevelPlayfield(from_x, from_y);
3390     DrawPreviewLevelLabel(label_state);
3391
3392     DrawPreviewLevelInfo(MICROLABEL_LEVEL_NAME);
3393     DrawPreviewLevelInfo(MICROLABEL_LEVEL_AUTHOR);
3394
3395     // initialize delay counters
3396     DelayReached(&scroll_delay, 0);
3397     DelayReached(&label_delay, 0);
3398
3399     if (leveldir_current->name)
3400     {
3401       struct TextPosInfo *pos = &menu.main.text.level_info_1;
3402       char label_text[MAX_OUTPUT_LINESIZE + 1];
3403       int font_nr = pos->font;
3404       int max_len_label_text = getMaxTextLength(pos, font_nr);
3405
3406       if (pos->size != -1)
3407         max_len_label_text = pos->size;
3408
3409       strncpy(label_text, leveldir_current->name, max_len_label_text);
3410       label_text[max_len_label_text] = '\0';
3411
3412       if (IN_GFX_FIELD_FULL(pos->x, pos->y + getFontHeight(pos->font)))
3413         DrawTextSAligned(pos->x, pos->y, label_text, font_nr, pos->align);
3414     }
3415
3416     return;
3417   }
3418
3419   // scroll preview level, if needed
3420   if (preview.anim_mode != ANIM_NONE &&
3421       (level_xsize > preview.xsize || level_ysize > preview.ysize) &&
3422       DelayReached(&scroll_delay, scroll_delay_value))
3423   {
3424     switch (scroll_direction)
3425     {
3426       case MV_LEFT:
3427         if (from_x > 0)
3428         {
3429           from_x -= preview.step_offset;
3430           from_x = (from_x < 0 ? 0 : from_x);
3431         }
3432         else
3433           scroll_direction = MV_UP;
3434         break;
3435
3436       case MV_RIGHT:
3437         if (from_x < level_xsize - preview.xsize)
3438         {
3439           from_x += preview.step_offset;
3440           from_x = (from_x > level_xsize - preview.xsize ?
3441                     level_xsize - preview.xsize : from_x);
3442         }
3443         else
3444           scroll_direction = MV_DOWN;
3445         break;
3446
3447       case MV_UP:
3448         if (from_y > 0)
3449         {
3450           from_y -= preview.step_offset;
3451           from_y = (from_y < 0 ? 0 : from_y);
3452         }
3453         else
3454           scroll_direction = MV_RIGHT;
3455         break;
3456
3457       case MV_DOWN:
3458         if (from_y < level_ysize - preview.ysize)
3459         {
3460           from_y += preview.step_offset;
3461           from_y = (from_y > level_ysize - preview.ysize ?
3462                     level_ysize - preview.ysize : from_y);
3463         }
3464         else
3465           scroll_direction = MV_LEFT;
3466         break;
3467
3468       default:
3469         break;
3470     }
3471
3472     DrawPreviewLevelPlayfield(from_x, from_y);
3473   }
3474
3475   // !!! THIS ALL SUCKS -- SHOULD BE CLEANLY REWRITTEN !!!
3476   // redraw micro level label, if needed
3477   if (!strEqual(level.name, NAMELESS_LEVEL_NAME) &&
3478       !strEqual(level.author, ANONYMOUS_NAME) &&
3479       !strEqual(level.author, leveldir_current->name) &&
3480       DelayReached(&label_delay, MICROLEVEL_LABEL_DELAY))
3481   {
3482     int max_label_counter = 23;
3483
3484     if (leveldir_current->imported_from != NULL &&
3485         strlen(leveldir_current->imported_from) > 0)
3486       max_label_counter += 14;
3487     if (leveldir_current->imported_by != NULL &&
3488         strlen(leveldir_current->imported_by) > 0)
3489       max_label_counter += 14;
3490
3491     label_counter = (label_counter + 1) % max_label_counter;
3492     label_state = (label_counter >= 0 && label_counter <= 7 ?
3493                    MICROLABEL_LEVEL_NAME :
3494                    label_counter >= 9 && label_counter <= 12 ?
3495                    MICROLABEL_LEVEL_AUTHOR_HEAD :
3496                    label_counter >= 14 && label_counter <= 21 ?
3497                    MICROLABEL_LEVEL_AUTHOR :
3498                    label_counter >= 23 && label_counter <= 26 ?
3499                    MICROLABEL_IMPORTED_FROM_HEAD :
3500                    label_counter >= 28 && label_counter <= 35 ?
3501                    MICROLABEL_IMPORTED_FROM :
3502                    label_counter >= 37 && label_counter <= 40 ?
3503                    MICROLABEL_IMPORTED_BY_HEAD :
3504                    label_counter >= 42 && label_counter <= 49 ?
3505                    MICROLABEL_IMPORTED_BY : MICROLABEL_EMPTY);
3506
3507     if (leveldir_current->imported_from == NULL &&
3508         (label_state == MICROLABEL_IMPORTED_FROM_HEAD ||
3509          label_state == MICROLABEL_IMPORTED_FROM))
3510       label_state = (label_state == MICROLABEL_IMPORTED_FROM_HEAD ?
3511                      MICROLABEL_IMPORTED_BY_HEAD : MICROLABEL_IMPORTED_BY);
3512
3513     DrawPreviewLevelLabel(label_state);
3514   }
3515 }
3516
3517 void DrawPreviewPlayers(void)
3518 {
3519   if (game_status != GAME_MODE_MAIN)
3520     return;
3521
3522   // do not draw preview players if level preview redefined, but players aren't
3523   if (preview.redefined && !menu.main.preview_players.redefined)
3524     return;
3525
3526   boolean player_found[MAX_PLAYERS];
3527   int num_players = 0;
3528   int i, x, y;
3529
3530   for (i = 0; i < MAX_PLAYERS; i++)
3531     player_found[i] = FALSE;
3532
3533   // check which players can be found in the level (simple approach)
3534   for (x = 0; x < lev_fieldx; x++)
3535   {
3536     for (y = 0; y < lev_fieldy; y++)
3537     {
3538       int element = level.field[x][y];
3539
3540       if (ELEM_IS_PLAYER(element))
3541       {
3542         int player_nr = GET_PLAYER_NR(element);
3543
3544         player_nr = MIN(MAX(0, player_nr), MAX_PLAYERS - 1);
3545
3546         if (!player_found[player_nr])
3547           num_players++;
3548
3549         player_found[player_nr] = TRUE;
3550       }
3551     }
3552   }
3553
3554   struct TextPosInfo *pos = &menu.main.preview_players;
3555   int tile_size = pos->tile_size;
3556   int border_size = pos->border_size;
3557   int player_xoffset_raw = (pos->vertical ? 0 : tile_size + border_size);
3558   int player_yoffset_raw = (pos->vertical ? tile_size + border_size : 0);
3559   int player_xoffset = (pos->xoffset != -1 ? pos->xoffset : player_xoffset_raw);
3560   int player_yoffset = (pos->yoffset != -1 ? pos->yoffset : player_yoffset_raw);
3561   int max_players_width  = (MAX_PLAYERS - 1) * player_xoffset + tile_size;
3562   int max_players_height = (MAX_PLAYERS - 1) * player_yoffset + tile_size;
3563   int all_players_width  = (num_players - 1) * player_xoffset + tile_size;
3564   int all_players_height = (num_players - 1) * player_yoffset + tile_size;
3565   int max_xpos = SX + ALIGNED_XPOS(pos->x, max_players_width,  pos->align);
3566   int max_ypos = SY + ALIGNED_YPOS(pos->y, max_players_height, pos->valign);
3567   int xpos = SX + ALIGNED_XPOS(pos->x, all_players_width,  pos->align);
3568   int ypos = SY + ALIGNED_YPOS(pos->y, all_players_height, pos->valign);
3569
3570   // clear area in which the players will be drawn
3571   ClearRectangleOnBackground(drawto, max_xpos, max_ypos,
3572                              max_players_width, max_players_height);
3573
3574   if (!network.enabled && !setup.team_mode)
3575     return;
3576
3577   // only draw players if level is suited for team mode
3578   if (num_players < 2)
3579     return;
3580
3581   // draw all players that were found in the level
3582   for (i = 0; i < MAX_PLAYERS; i++)
3583   {
3584     if (player_found[i])
3585     {
3586       int graphic = el2img(EL_PLAYER_1 + i);
3587
3588       DrawSizedGraphicThruMaskExt(drawto, xpos, ypos, graphic, 0, tile_size);
3589
3590       xpos += player_xoffset;
3591       ypos += player_yoffset;
3592     }
3593   }
3594 }
3595
3596 void DrawPreviewLevelInitial(void)
3597 {
3598   DrawPreviewLevelExt(TRUE);
3599   DrawPreviewPlayers();
3600 }
3601
3602 void DrawPreviewLevelAnimation(void)
3603 {
3604   DrawPreviewLevelExt(FALSE);
3605 }
3606
3607 static void DrawNetworkPlayer(int x, int y, int player_nr, int tile_size,
3608                               int border_size, int font_nr)
3609 {
3610   int graphic = el2img(EL_PLAYER_1 + player_nr);
3611   int font_height = getFontHeight(font_nr);
3612   int player_height = MAX(tile_size, font_height);
3613   int xoffset_text = tile_size + border_size;
3614   int yoffset_text    = (player_height - font_height) / 2;
3615   int yoffset_graphic = (player_height - tile_size) / 2;
3616   char *player_name = getNetworkPlayerName(player_nr + 1);
3617
3618   DrawSizedGraphicThruMaskExt(drawto, x, y + yoffset_graphic, graphic, 0,
3619                               tile_size);
3620   DrawText(x + xoffset_text, y + yoffset_text, player_name, font_nr);
3621 }
3622
3623 static void DrawNetworkPlayersExt(boolean force)
3624 {
3625   if (game_status != GAME_MODE_MAIN)
3626     return;
3627
3628   if (!network.connected && !force)
3629     return;
3630
3631   // do not draw network players if level preview redefined, but players aren't
3632   if (preview.redefined && !menu.main.network_players.redefined)
3633     return;
3634
3635   int num_players = 0;
3636   int i;
3637
3638   for (i = 0; i < MAX_PLAYERS; i++)
3639     if (stored_player[i].connected_network)
3640       num_players++;
3641
3642   struct TextPosInfo *pos = &menu.main.network_players;
3643   int tile_size = pos->tile_size;
3644   int border_size = pos->border_size;
3645   int xoffset_text = tile_size + border_size;
3646   int font_nr = pos->font;
3647   int font_width = getFontWidth(font_nr);
3648   int font_height = getFontHeight(font_nr);
3649   int player_height = MAX(tile_size, font_height);
3650   int player_yoffset = player_height + border_size;
3651   int max_players_width = xoffset_text + MAX_PLAYER_NAME_LEN * font_width;
3652   int max_players_height = MAX_PLAYERS * player_yoffset - border_size;
3653   int all_players_height = num_players * player_yoffset - border_size;
3654   int max_xpos = SX + ALIGNED_XPOS(pos->x, max_players_width,  pos->align);
3655   int max_ypos = SY + ALIGNED_YPOS(pos->y, max_players_height, pos->valign);
3656   int ypos = SY + ALIGNED_YPOS(pos->y, all_players_height, pos->valign);
3657
3658   ClearRectangleOnBackground(drawto, max_xpos, max_ypos,
3659                              max_players_width, max_players_height);
3660
3661   // first draw local network player ...
3662   for (i = 0; i < MAX_PLAYERS; i++)
3663   {
3664     if (stored_player[i].connected_network &&
3665         stored_player[i].connected_locally)
3666     {
3667       char *player_name = getNetworkPlayerName(i + 1);
3668       int player_width = xoffset_text + getTextWidth(player_name, font_nr);
3669       int xpos = SX + ALIGNED_XPOS(pos->x, player_width,  pos->align);
3670
3671       DrawNetworkPlayer(xpos, ypos, i, tile_size, border_size, font_nr);
3672
3673       ypos += player_yoffset;
3674     }
3675   }
3676
3677   // ... then draw all other network players
3678   for (i = 0; i < MAX_PLAYERS; i++)
3679   {
3680     if (stored_player[i].connected_network &&
3681         !stored_player[i].connected_locally)
3682     {
3683       char *player_name = getNetworkPlayerName(i + 1);
3684       int player_width = xoffset_text + getTextWidth(player_name, font_nr);
3685       int xpos = SX + ALIGNED_XPOS(pos->x, player_width,  pos->align);
3686
3687       DrawNetworkPlayer(xpos, ypos, i, tile_size, border_size, font_nr);
3688
3689       ypos += player_yoffset;
3690     }
3691   }
3692 }
3693
3694 void DrawNetworkPlayers(void)
3695 {
3696   DrawNetworkPlayersExt(FALSE);
3697 }
3698
3699 void ClearNetworkPlayers(void)
3700 {
3701   DrawNetworkPlayersExt(TRUE);
3702 }
3703
3704 static void DrawGraphicAnimationExt(DrawBuffer *dst_bitmap, int x, int y,
3705                                     int graphic, int sync_frame,
3706                                     int mask_mode)
3707 {
3708   int frame = getGraphicAnimationFrame(graphic, sync_frame);
3709
3710   if (mask_mode == USE_MASKING)
3711     DrawGraphicThruMaskExt(dst_bitmap, x, y, graphic, frame);
3712   else
3713     DrawGraphicExt(dst_bitmap, x, y, graphic, frame);
3714 }
3715
3716 void DrawFixedGraphicAnimationExt(DrawBuffer *dst_bitmap, int x, int y,
3717                                   int graphic, int sync_frame, int mask_mode)
3718 {
3719   int frame = getGraphicAnimationFrame(graphic, sync_frame);
3720
3721   if (mask_mode == USE_MASKING)
3722     DrawFixedGraphicThruMaskExt(dst_bitmap, x, y, graphic, frame);
3723   else
3724     DrawFixedGraphicExt(dst_bitmap, x, y, graphic, frame);
3725 }
3726
3727 static void DrawGraphicAnimation(int x, int y, int graphic)
3728 {
3729   int lx = LEVELX(x), ly = LEVELY(y);
3730
3731   if (!IN_SCR_FIELD(x, y))
3732     return;
3733
3734   DrawGraphicAnimationExt(drawto_field, FX + x * TILEX_VAR, FY + y * TILEY_VAR,
3735                           graphic, GfxFrame[lx][ly], NO_MASKING);
3736
3737   MarkTileDirty(x, y);
3738 }
3739
3740 void DrawFixedGraphicAnimation(int x, int y, int graphic)
3741 {
3742   int lx = LEVELX(x), ly = LEVELY(y);
3743
3744   if (!IN_SCR_FIELD(x, y))
3745     return;
3746
3747   DrawGraphicAnimationExt(drawto_field, FX + x * TILEX, FY + y * TILEY,
3748                           graphic, GfxFrame[lx][ly], NO_MASKING);
3749   MarkTileDirty(x, y);
3750 }
3751
3752 void DrawLevelGraphicAnimation(int x, int y, int graphic)
3753 {
3754   DrawGraphicAnimation(SCREENX(x), SCREENY(y), graphic);
3755 }
3756
3757 void DrawLevelElementAnimation(int x, int y, int element)
3758 {
3759   int graphic = el_act_dir2img(element, GfxAction[x][y], GfxDir[x][y]);
3760
3761   DrawGraphicAnimation(SCREENX(x), SCREENY(y), graphic);
3762 }
3763
3764 void DrawLevelGraphicAnimationIfNeeded(int x, int y, int graphic)
3765 {
3766   int sx = SCREENX(x), sy = SCREENY(y);
3767
3768   if (!IN_LEV_FIELD(x, y) || !IN_SCR_FIELD(sx, sy))
3769     return;
3770
3771   if (!IS_NEW_FRAME(GfxFrame[x][y], graphic))
3772     return;
3773
3774   DrawGraphicAnimation(sx, sy, graphic);
3775
3776 #if 1
3777   if (GFX_CRUMBLED(TILE_GFX_ELEMENT(x, y)))
3778     DrawLevelFieldCrumbled(x, y);
3779 #else
3780   if (GFX_CRUMBLED(Tile[x][y]))
3781     DrawLevelFieldCrumbled(x, y);
3782 #endif
3783 }
3784
3785 void DrawLevelElementAnimationIfNeeded(int x, int y, int element)
3786 {
3787   int sx = SCREENX(x), sy = SCREENY(y);
3788   int graphic;
3789
3790   if (!IN_LEV_FIELD(x, y) || !IN_SCR_FIELD(sx, sy))
3791     return;
3792
3793   graphic = el_act_dir2img(element, GfxAction[x][y], GfxDir[x][y]);
3794
3795   if (!IS_NEW_FRAME(GfxFrame[x][y], graphic))
3796     return;
3797
3798   DrawGraphicAnimation(sx, sy, graphic);
3799
3800   if (GFX_CRUMBLED(element))
3801     DrawLevelFieldCrumbled(x, y);
3802 }
3803
3804 static int getPlayerGraphic(struct PlayerInfo *player, int move_dir)
3805 {
3806   if (player->use_murphy)
3807   {
3808     // this works only because currently only one player can be "murphy" ...
3809     static int last_horizontal_dir = MV_LEFT;
3810     int graphic = el_act_dir2img(EL_SP_MURPHY, player->GfxAction, move_dir);
3811
3812     if (move_dir == MV_LEFT || move_dir == MV_RIGHT)
3813       last_horizontal_dir = move_dir;
3814
3815     if (graphic == IMG_SP_MURPHY)       // undefined => use special graphic
3816     {
3817       int direction = (player->is_snapping ? move_dir : last_horizontal_dir);
3818
3819       graphic = el_act_dir2img(EL_SP_MURPHY, player->GfxAction, direction);
3820     }
3821
3822     return graphic;
3823   }
3824   else
3825     return el_act_dir2img(player->artwork_element, player->GfxAction,move_dir);
3826 }
3827
3828 static boolean equalGraphics(int graphic1, int graphic2)
3829 {
3830   struct GraphicInfo *g1 = &graphic_info[graphic1];
3831   struct GraphicInfo *g2 = &graphic_info[graphic2];
3832
3833   return (g1->bitmap      == g2->bitmap &&
3834           g1->src_x       == g2->src_x &&
3835           g1->src_y       == g2->src_y &&
3836           g1->anim_frames == g2->anim_frames &&
3837           g1->anim_delay  == g2->anim_delay &&
3838           g1->anim_mode   == g2->anim_mode);
3839 }
3840
3841 #define DRAW_PLAYER_OVER_PUSHED_ELEMENT 1
3842
3843 enum
3844 {
3845   DRAW_PLAYER_STAGE_INIT = 0,
3846   DRAW_PLAYER_STAGE_LAST_FIELD,
3847   DRAW_PLAYER_STAGE_FIELD_UNDER_PLAYER,
3848 #if DRAW_PLAYER_OVER_PUSHED_ELEMENT
3849   DRAW_PLAYER_STAGE_ELEMENT_PUSHED,
3850   DRAW_PLAYER_STAGE_PLAYER,
3851 #else
3852   DRAW_PLAYER_STAGE_PLAYER,
3853   DRAW_PLAYER_STAGE_ELEMENT_PUSHED,
3854 #endif
3855   DRAW_PLAYER_STAGE_ELEMENT_OVER_PLAYER,
3856   DRAW_PLAYER_STAGE_FIELD_OVER_PLAYER,
3857
3858   NUM_DRAW_PLAYER_STAGES
3859 };
3860
3861 static void DrawPlayerExt(struct PlayerInfo *player, int drawing_stage)
3862 {
3863   static int static_last_player_graphic[MAX_PLAYERS];
3864   static int static_last_player_frame[MAX_PLAYERS];
3865   static boolean static_player_is_opaque[MAX_PLAYERS];
3866   static boolean draw_player[MAX_PLAYERS];
3867   int pnr = player->index_nr;
3868
3869   if (drawing_stage == DRAW_PLAYER_STAGE_INIT)
3870   {
3871     static_last_player_graphic[pnr] = getPlayerGraphic(player, player->MovDir);
3872     static_last_player_frame[pnr] = player->Frame;
3873     static_player_is_opaque[pnr] = FALSE;
3874
3875     draw_player[pnr] = TRUE;
3876   }
3877
3878   if (!draw_player[pnr])
3879     return;
3880
3881 #if DEBUG
3882   if (!IN_LEV_FIELD(player->jx, player->jy))
3883   {
3884     Debug("draw:DrawPlayerExt", "x = %d, y = %d", player->jx, player->jy);
3885     Debug("draw:DrawPlayerExt", "This should never happen!");
3886
3887     draw_player[pnr] = FALSE;
3888
3889     return;
3890   }
3891 #endif
3892
3893   int last_player_graphic  = static_last_player_graphic[pnr];
3894   int last_player_frame    = static_last_player_frame[pnr];
3895   boolean player_is_opaque = static_player_is_opaque[pnr];
3896
3897   int jx = player->jx;
3898   int jy = player->jy;
3899   int move_dir = (player->is_waiting ? player->dir_waiting : player->MovDir);
3900   int dx = (move_dir == MV_LEFT ? -1 : move_dir == MV_RIGHT ? +1 : 0);
3901   int dy = (move_dir == MV_UP   ? -1 : move_dir == MV_DOWN  ? +1 : 0);
3902   int last_jx = (player->is_moving ? jx - dx : jx);
3903   int last_jy = (player->is_moving ? jy - dy : jy);
3904   int next_jx = jx + dx;
3905   int next_jy = jy + dy;
3906   boolean player_is_moving = (player->MovPos != 0 ? TRUE : FALSE);
3907   int sx = SCREENX(jx);
3908   int sy = SCREENY(jy);
3909   int sxx = (move_dir == MV_LEFT || move_dir == MV_RIGHT ? player->GfxPos : 0);
3910   int syy = (move_dir == MV_UP   || move_dir == MV_DOWN  ? player->GfxPos : 0);
3911   int element = Tile[jx][jy];
3912   int last_element = Tile[last_jx][last_jy];
3913   int action = (player->is_pushing    ? ACTION_PUSHING         :
3914                 player->is_digging    ? ACTION_DIGGING         :
3915                 player->is_collecting ? ACTION_COLLECTING      :
3916                 player->is_moving     ? ACTION_MOVING          :
3917                 player->is_snapping   ? ACTION_SNAPPING        :
3918                 player->is_dropping   ? ACTION_DROPPING        :
3919                 player->is_waiting    ? player->action_waiting :
3920                 ACTION_DEFAULT);
3921
3922   if (drawing_stage == DRAW_PLAYER_STAGE_INIT)
3923   {
3924     // ------------------------------------------------------------------------
3925     // initialize drawing the player
3926     // ------------------------------------------------------------------------
3927
3928     draw_player[pnr] = FALSE;
3929
3930     // GfxElement[][] is set to the element the player is digging or collecting;
3931     // remove also for off-screen player if the player is not moving anymore
3932     if (IN_LEV_FIELD(jx, jy) && !player_is_moving)
3933       GfxElement[jx][jy] = EL_UNDEFINED;
3934
3935     if (!player->active || !IN_SCR_FIELD(SCREENX(last_jx), SCREENY(last_jy)))
3936       return;
3937
3938     if (element == EL_EXPLOSION)
3939       return;
3940
3941     InitPlayerGfxAnimation(player, action, move_dir);
3942
3943     draw_player[pnr] = TRUE;
3944   }
3945   else if (drawing_stage == DRAW_PLAYER_STAGE_LAST_FIELD)
3946   {
3947     // ------------------------------------------------------------------------
3948     // draw things in the field the player is leaving, if needed
3949     // ------------------------------------------------------------------------
3950
3951     if (!IN_SCR_FIELD(sx, sy))
3952       draw_player[pnr] = FALSE;
3953
3954     if (!player->is_moving)
3955       return;
3956
3957     if (Back[last_jx][last_jy] && IS_DRAWABLE(last_element))
3958     {
3959       DrawLevelElement(last_jx, last_jy, Back[last_jx][last_jy]);
3960
3961       if (last_element == EL_DYNAMITE_ACTIVE ||
3962           last_element == EL_EM_DYNAMITE_ACTIVE ||
3963           last_element == EL_SP_DISK_RED_ACTIVE)
3964         DrawDynamite(last_jx, last_jy);
3965       else
3966         DrawLevelFieldThruMask(last_jx, last_jy);
3967     }
3968     else if (last_element == EL_DYNAMITE_ACTIVE ||
3969              last_element == EL_EM_DYNAMITE_ACTIVE ||
3970              last_element == EL_SP_DISK_RED_ACTIVE)
3971       DrawDynamite(last_jx, last_jy);
3972     else
3973       DrawLevelField(last_jx, last_jy);
3974
3975     if (player->is_pushing && IN_SCR_FIELD(SCREENX(next_jx), SCREENY(next_jy)))
3976       DrawLevelElement(next_jx, next_jy, EL_EMPTY);
3977   }
3978   else if (drawing_stage == DRAW_PLAYER_STAGE_FIELD_UNDER_PLAYER)
3979   {
3980     // ------------------------------------------------------------------------
3981     // draw things behind the player, if needed
3982     // ------------------------------------------------------------------------
3983
3984     if (Back[jx][jy])
3985     {
3986       DrawLevelElement(jx, jy, Back[jx][jy]);
3987
3988       return;
3989     }
3990
3991     if (IS_ACTIVE_BOMB(element))
3992     {
3993       DrawLevelElement(jx, jy, EL_EMPTY);
3994
3995       return;
3996     }
3997
3998     if (player_is_moving && GfxElement[jx][jy] != EL_UNDEFINED)
3999     {
4000       int old_element = GfxElement[jx][jy];
4001       int old_graphic = el_act_dir2img(old_element, action, move_dir);
4002       int frame = getGraphicAnimationFrame(old_graphic, player->StepFrame);
4003
4004       if (GFX_CRUMBLED(old_element))
4005         DrawLevelFieldCrumbledDigging(jx, jy, move_dir, player->StepFrame);
4006       else
4007         DrawGraphic(sx, sy, old_graphic, frame);
4008
4009       if (graphic_info[old_graphic].anim_mode & ANIM_OPAQUE_PLAYER)
4010         static_player_is_opaque[pnr] = TRUE;
4011     }
4012     else
4013     {
4014       GfxElement[jx][jy] = EL_UNDEFINED;
4015
4016       // make sure that pushed elements are drawn with correct frame rate
4017       int graphic = el_act_dir2img(element, ACTION_PUSHING, move_dir);
4018
4019       if (player->is_pushing && player->is_moving && !IS_ANIM_MODE_CE(graphic))
4020         GfxFrame[jx][jy] = player->StepFrame;
4021
4022       DrawLevelField(jx, jy);
4023     }
4024   }
4025   else if (drawing_stage == DRAW_PLAYER_STAGE_ELEMENT_PUSHED)
4026   {
4027     // ------------------------------------------------------------------------
4028     // draw things the player is pushing, if needed
4029     // ------------------------------------------------------------------------
4030
4031     if (!player->is_pushing || !player->is_moving)
4032       return;
4033
4034     int gfx_frame = GfxFrame[jx][jy];
4035
4036     if (!IS_MOVING(jx, jy))             // push movement already finished
4037     {
4038       element = Tile[next_jx][next_jy];
4039       gfx_frame = GfxFrame[next_jx][next_jy];
4040     }
4041
4042     int graphic = el_act_dir2img(element, ACTION_PUSHING, move_dir);
4043     int sync_frame = (IS_ANIM_MODE_CE(graphic) ? gfx_frame : player->StepFrame);
4044     int frame = getGraphicAnimationFrame(graphic, sync_frame);
4045
4046     // draw background element under pushed element (like the Sokoban field)
4047     if (game.use_masked_pushing && IS_MOVING(jx, jy))
4048     {
4049       // this allows transparent pushing animation over non-black background
4050
4051       if (Back[jx][jy])
4052         DrawLevelElement(jx, jy, Back[jx][jy]);
4053       else
4054         DrawLevelElement(jx, jy, EL_EMPTY);
4055
4056       if (Back[next_jx][next_jy])
4057         DrawLevelElement(next_jx, next_jy, Back[next_jx][next_jy]);
4058       else
4059         DrawLevelElement(next_jx, next_jy, EL_EMPTY);
4060     }
4061     else if (Back[next_jx][next_jy])
4062       DrawLevelElement(next_jx, next_jy, Back[next_jx][next_jy]);
4063
4064     int px = SCREENX(jx), py = SCREENY(jy);
4065     int pxx = (TILEX - ABS(sxx)) * dx;
4066     int pyy = (TILEY - ABS(syy)) * dy;
4067
4068 #if 1
4069     // do not draw (EM style) pushing animation when pushing is finished
4070     // (two-tile animations usually do not contain start and end frame)
4071     if (graphic_info[graphic].double_movement && !IS_MOVING(jx, jy))
4072       DrawLevelElement(next_jx, next_jy, Tile[next_jx][next_jy]);
4073     else
4074       DrawGraphicShiftedThruMask(px, py, pxx, pyy, graphic, frame, NO_CUTTING);
4075 #else
4076     // masked drawing is needed for EMC style (double) movement graphics
4077     // !!! (ONLY WHEN DRAWING PUSHED ELEMENT OVER THE PLAYER) !!!
4078     DrawGraphicShiftedThruMask(px, py, pxx, pyy, graphic, frame, NO_CUTTING);
4079 #endif
4080   }
4081   else if (drawing_stage == DRAW_PLAYER_STAGE_PLAYER)
4082   {
4083     // ------------------------------------------------------------------------
4084     // draw player himself
4085     // ------------------------------------------------------------------------
4086
4087     int graphic = getPlayerGraphic(player, move_dir);
4088
4089     // in the case of changed player action or direction, prevent the current
4090     // animation frame from being restarted for identical animations
4091     if (player->Frame == 0 && equalGraphics(graphic, last_player_graphic))
4092       player->Frame = last_player_frame;
4093
4094     int frame = getGraphicAnimationFrame(graphic, player->Frame);
4095
4096     if (player_is_opaque)
4097       DrawGraphicShifted(sx,sy, sxx,syy, graphic, frame, NO_CUTTING,NO_MASKING);
4098     else
4099       DrawGraphicShiftedThruMask(sx, sy, sxx, syy, graphic, frame, NO_CUTTING);
4100
4101     if (SHIELD_ON(player))
4102     {
4103       graphic = (player->shield_deadly_time_left ? IMG_SHIELD_DEADLY_ACTIVE :
4104                  IMG_SHIELD_NORMAL_ACTIVE);
4105       frame = getGraphicAnimationFrame(graphic, -1);
4106
4107       DrawGraphicShiftedThruMask(sx, sy, sxx, syy, graphic, frame, NO_CUTTING);
4108     }
4109   }
4110   else if (drawing_stage == DRAW_PLAYER_STAGE_ELEMENT_OVER_PLAYER)
4111   {
4112     // ------------------------------------------------------------------------
4113     // draw things in front of player (active dynamite or dynabombs)
4114     // ------------------------------------------------------------------------
4115
4116     if (IS_ACTIVE_BOMB(element))
4117     {
4118       int graphic = el2img(element);
4119       int frame = getGraphicAnimationFrame(graphic, GfxFrame[jx][jy]);
4120
4121       if (game.emulation == EMU_SUPAPLEX)
4122         DrawGraphic(sx, sy, IMG_SP_DISK_RED, frame);
4123       else
4124         DrawGraphicThruMask(sx, sy, graphic, frame);
4125     }
4126
4127     if (player_is_moving && last_element == EL_EXPLOSION)
4128     {
4129       int element = (GfxElement[last_jx][last_jy] != EL_UNDEFINED ?
4130                      GfxElement[last_jx][last_jy] :  EL_EMPTY);
4131       int graphic = el_act2img(element, ACTION_EXPLODING);
4132       int delay = (game.emulation == EMU_SUPAPLEX ? 3 : 2);
4133       int phase = ExplodePhase[last_jx][last_jy] - 1;
4134       int frame = getGraphicAnimationFrame(graphic, phase - delay);
4135
4136       if (phase >= delay)
4137         DrawGraphicThruMask(SCREENX(last_jx), SCREENY(last_jy), graphic, frame);
4138     }
4139   }
4140   else if (drawing_stage == DRAW_PLAYER_STAGE_FIELD_OVER_PLAYER)
4141   {
4142     // ------------------------------------------------------------------------
4143     // draw elements the player is just walking/passing through/under
4144     // ------------------------------------------------------------------------
4145
4146     if (player_is_moving)
4147     {
4148       // handle the field the player is leaving ...
4149       if (IS_ACCESSIBLE_INSIDE(last_element))
4150         DrawLevelField(last_jx, last_jy);
4151       else if (IS_ACCESSIBLE_UNDER(last_element))
4152         DrawLevelFieldThruMask(last_jx, last_jy);
4153     }
4154
4155     // do not redraw accessible elements if the player is just pushing them
4156     if (!player_is_moving || !player->is_pushing)
4157     {
4158       // ... and the field the player is entering
4159       if (IS_ACCESSIBLE_INSIDE(element))
4160         DrawLevelField(jx, jy);
4161       else if (IS_ACCESSIBLE_UNDER(element))
4162         DrawLevelFieldThruMask(jx, jy);
4163     }
4164
4165     MarkTileDirty(sx, sy);
4166   }
4167 }
4168
4169 void DrawPlayer(struct PlayerInfo *player)
4170 {
4171   int i;
4172
4173   for (i = 0; i < NUM_DRAW_PLAYER_STAGES; i++)
4174     DrawPlayerExt(player, i);
4175 }
4176
4177 void DrawAllPlayers(void)
4178 {
4179   int i, j;
4180
4181   for (i = 0; i < NUM_DRAW_PLAYER_STAGES; i++)
4182     for (j = 0; j < MAX_PLAYERS; j++)
4183       if (stored_player[j].active)
4184         DrawPlayerExt(&stored_player[j], i);
4185 }
4186
4187 void DrawPlayerField(int x, int y)
4188 {
4189   if (!IS_PLAYER(x, y))
4190     return;
4191
4192   DrawPlayer(PLAYERINFO(x, y));
4193 }
4194
4195 // ----------------------------------------------------------------------------
4196
4197 void WaitForEventToContinue(void)
4198 {
4199   boolean still_wait = TRUE;
4200
4201   if (program.headless)
4202     return;
4203
4204   // simulate releasing mouse button over last gadget, if still pressed
4205   if (button_status)
4206     HandleGadgets(-1, -1, 0);
4207
4208   button_status = MB_RELEASED;
4209
4210   ClearEventQueue();
4211   ClearPlayerAction();
4212
4213   while (still_wait)
4214   {
4215     Event event;
4216
4217     if (NextValidEvent(&event))
4218     {
4219       switch (event.type)
4220       {
4221         case EVENT_BUTTONRELEASE:
4222         case EVENT_KEYPRESS:
4223         case SDL_CONTROLLERBUTTONDOWN:
4224         case SDL_JOYBUTTONDOWN:
4225           still_wait = FALSE;
4226           break;
4227
4228         default:
4229           HandleOtherEvents(&event);
4230           break;
4231       }
4232     }
4233     else if (AnyJoystickButton() == JOY_BUTTON_NEW_PRESSED)
4234     {
4235       still_wait = FALSE;
4236     }
4237
4238     BackToFront();
4239   }
4240 }
4241
4242 #define MAX_REQUEST_LINES               13
4243 #define MAX_REQUEST_LINE_FONT1_LEN      7
4244 #define MAX_REQUEST_LINE_FONT2_LEN      10
4245
4246 static int RequestHandleEvents(unsigned int req_state)
4247 {
4248   boolean game_just_ended = (game_status == GAME_MODE_PLAYING &&
4249                              checkGameEnded());
4250   int width  = request.width;
4251   int height = request.height;
4252   int sx, sy;
4253   int result;
4254
4255   // when showing request dialog after game ended, deactivate game panel
4256   if (game_just_ended)
4257     game.panel.active = FALSE;
4258
4259   game.request_active = TRUE;
4260
4261   setRequestPosition(&sx, &sy, FALSE);
4262
4263   button_status = MB_RELEASED;
4264
4265   request_gadget_id = -1;
4266   result = -1;
4267
4268   while (result < 0)
4269   {
4270     if (game_just_ended)
4271     {
4272       // the MM game engine does not use a special (scrollable) field buffer
4273       if (level.game_engine_type != GAME_ENGINE_TYPE_MM)
4274         SetDrawtoField(DRAW_TO_FIELDBUFFER);
4275
4276       HandleGameActions();
4277
4278       SetDrawtoField(DRAW_TO_BACKBUFFER);
4279
4280       if (global.use_envelope_request)
4281       {
4282         // copy current state of request area to middle of playfield area
4283         BlitBitmap(bitmap_db_store_2, drawto, sx, sy, width, height, sx, sy);
4284       }
4285     }
4286
4287     if (PendingEvent())
4288     {
4289       Event event;
4290
4291       while (NextValidEvent(&event))
4292       {
4293         switch (event.type)
4294         {
4295           case EVENT_BUTTONPRESS:
4296           case EVENT_BUTTONRELEASE:
4297           case EVENT_MOTIONNOTIFY:
4298           {
4299             int mx, my;
4300
4301             if (event.type == EVENT_MOTIONNOTIFY)
4302             {
4303               if (!button_status)
4304                 continue;
4305
4306               motion_status = TRUE;
4307               mx = ((MotionEvent *) &event)->x;
4308               my = ((MotionEvent *) &event)->y;
4309             }
4310             else
4311             {
4312               motion_status = FALSE;
4313               mx = ((ButtonEvent *) &event)->x;
4314               my = ((ButtonEvent *) &event)->y;
4315               if (event.type == EVENT_BUTTONPRESS)
4316                 button_status = ((ButtonEvent *) &event)->button;
4317               else
4318                 button_status = MB_RELEASED;
4319             }
4320
4321             // this sets 'request_gadget_id'
4322             HandleGadgets(mx, my, button_status);
4323
4324             switch (request_gadget_id)
4325             {
4326               case TOOL_CTRL_ID_YES:
4327               case TOOL_CTRL_ID_TOUCH_YES:
4328                 result = TRUE;
4329                 break;
4330               case TOOL_CTRL_ID_NO:
4331               case TOOL_CTRL_ID_TOUCH_NO:
4332                 result = FALSE;
4333                 break;
4334               case TOOL_CTRL_ID_CONFIRM:
4335               case TOOL_CTRL_ID_TOUCH_CONFIRM:
4336                 result = TRUE | FALSE;
4337                 break;
4338
4339               case TOOL_CTRL_ID_PLAYER_1:
4340                 result = 1;
4341                 break;
4342               case TOOL_CTRL_ID_PLAYER_2:
4343                 result = 2;
4344                 break;
4345               case TOOL_CTRL_ID_PLAYER_3:
4346                 result = 3;
4347                 break;
4348               case TOOL_CTRL_ID_PLAYER_4:
4349                 result = 4;
4350                 break;
4351
4352               default:
4353                 // only check clickable animations if no request gadget clicked
4354                 HandleGlobalAnimClicks(mx, my, button_status, FALSE);
4355                 break;
4356             }
4357
4358             break;
4359           }
4360
4361           case SDL_WINDOWEVENT:
4362             HandleWindowEvent((WindowEvent *) &event);
4363             break;
4364
4365           case SDL_APP_WILLENTERBACKGROUND:
4366           case SDL_APP_DIDENTERBACKGROUND:
4367           case SDL_APP_WILLENTERFOREGROUND:
4368           case SDL_APP_DIDENTERFOREGROUND:
4369             HandlePauseResumeEvent((PauseResumeEvent *) &event);
4370             break;
4371
4372           case EVENT_KEYPRESS:
4373           {
4374             Key key = GetEventKey((KeyEvent *)&event, TRUE);
4375
4376             switch (key)
4377             {
4378               case KSYM_space:
4379                 if (req_state & REQ_CONFIRM)
4380                   result = 1;
4381                 break;
4382
4383               case KSYM_Return:
4384               case KSYM_y:
4385               case KSYM_Y:
4386               case KSYM_Select:
4387               case KSYM_Menu:
4388 #if defined(KSYM_Rewind)
4389               case KSYM_Rewind:         // for Amazon Fire TV remote
4390 #endif
4391                 result = 1;
4392                 break;
4393
4394               case KSYM_Escape:
4395               case KSYM_n:
4396               case KSYM_N:
4397               case KSYM_Back:
4398 #if defined(KSYM_FastForward)
4399               case KSYM_FastForward:    // for Amazon Fire TV remote
4400 #endif
4401                 result = 0;
4402                 break;
4403
4404               default:
4405                 HandleKeysDebug(key, KEY_PRESSED);
4406                 break;
4407             }
4408
4409             if (req_state & REQ_PLAYER)
4410             {
4411               int old_player_nr = setup.network_player_nr;
4412
4413               if (result != -1)
4414                 result = old_player_nr + 1;
4415
4416               switch (key)
4417               {
4418                 case KSYM_space:
4419                   result = old_player_nr + 1;
4420                   break;
4421
4422                 case KSYM_Up:
4423                 case KSYM_1:
4424                   result = 1;
4425                   break;
4426
4427                 case KSYM_Right:
4428                 case KSYM_2:
4429                   result = 2;
4430                   break;
4431
4432                 case KSYM_Down:
4433                 case KSYM_3:
4434                   result = 3;
4435                   break;
4436
4437                 case KSYM_Left:
4438                 case KSYM_4:
4439                   result = 4;
4440                   break;
4441
4442                 default:
4443                   break;
4444               }
4445             }
4446
4447             break;
4448           }
4449
4450           case EVENT_FINGERRELEASE:
4451           case EVENT_KEYRELEASE:
4452             ClearPlayerAction();
4453             break;
4454
4455           case SDL_CONTROLLERBUTTONDOWN:
4456             switch (event.cbutton.button)
4457             {
4458               case SDL_CONTROLLER_BUTTON_A:
4459               case SDL_CONTROLLER_BUTTON_X:
4460               case SDL_CONTROLLER_BUTTON_LEFTSHOULDER:
4461               case SDL_CONTROLLER_BUTTON_LEFTSTICK:
4462                 result = 1;
4463                 break;
4464
4465               case SDL_CONTROLLER_BUTTON_B:
4466               case SDL_CONTROLLER_BUTTON_Y:
4467               case SDL_CONTROLLER_BUTTON_RIGHTSHOULDER:
4468               case SDL_CONTROLLER_BUTTON_RIGHTSTICK:
4469               case SDL_CONTROLLER_BUTTON_BACK:
4470                 result = 0;
4471                 break;
4472             }
4473
4474             if (req_state & REQ_PLAYER)
4475             {
4476               int old_player_nr = setup.network_player_nr;
4477
4478               if (result != -1)
4479                 result = old_player_nr + 1;
4480
4481               switch (event.cbutton.button)
4482               {
4483                 case SDL_CONTROLLER_BUTTON_DPAD_UP:
4484                 case SDL_CONTROLLER_BUTTON_Y:
4485                   result = 1;
4486                   break;
4487
4488                 case SDL_CONTROLLER_BUTTON_DPAD_RIGHT:
4489                 case SDL_CONTROLLER_BUTTON_B:
4490                   result = 2;
4491                   break;
4492
4493                 case SDL_CONTROLLER_BUTTON_DPAD_DOWN:
4494                 case SDL_CONTROLLER_BUTTON_A:
4495                   result = 3;
4496                   break;
4497
4498                 case SDL_CONTROLLER_BUTTON_DPAD_LEFT:
4499                 case SDL_CONTROLLER_BUTTON_X:
4500                   result = 4;
4501                   break;
4502
4503                 default:
4504                   break;
4505               }
4506             }
4507
4508             break;
4509
4510           case SDL_CONTROLLERBUTTONUP:
4511             HandleJoystickEvent(&event);
4512             ClearPlayerAction();
4513             break;
4514
4515           default:
4516             HandleOtherEvents(&event);
4517             break;
4518         }
4519       }
4520     }
4521     else if (AnyJoystickButton() == JOY_BUTTON_NEW_PRESSED)
4522     {
4523       int joy = AnyJoystick();
4524
4525       if (joy & JOY_BUTTON_1)
4526         result = 1;
4527       else if (joy & JOY_BUTTON_2)
4528         result = 0;
4529     }
4530     else if (AnyJoystick())
4531     {
4532       int joy = AnyJoystick();
4533
4534       if (req_state & REQ_PLAYER)
4535       {
4536         if (joy & JOY_UP)
4537           result = 1;
4538         else if (joy & JOY_RIGHT)
4539           result = 2;
4540         else if (joy & JOY_DOWN)
4541           result = 3;
4542         else if (joy & JOY_LEFT)
4543           result = 4;
4544       }
4545     }
4546
4547     if (game_just_ended)
4548     {
4549       if (global.use_envelope_request)
4550       {
4551         // copy back current state of pressed buttons inside request area
4552         BlitBitmap(drawto, bitmap_db_store_2, sx, sy, width, height, sx, sy);
4553       }
4554     }
4555
4556     BackToFront();
4557   }
4558
4559   game.request_active = FALSE;
4560
4561   return result;
4562 }
4563
4564 static boolean RequestDoor(char *text, unsigned int req_state)
4565 {
4566   unsigned int old_door_state;
4567   int max_request_line_len = MAX_REQUEST_LINE_FONT1_LEN;
4568   int font_nr = FONT_TEXT_2;
4569   char *text_ptr;
4570   int result;
4571   int ty;
4572
4573   if (maxWordLengthInRequestString(text) > MAX_REQUEST_LINE_FONT1_LEN)
4574   {
4575     max_request_line_len = MAX_REQUEST_LINE_FONT2_LEN;
4576     font_nr = FONT_TEXT_1;
4577   }
4578
4579   if (game_status == GAME_MODE_PLAYING)
4580     BlitScreenToBitmap(backbuffer);
4581
4582   // disable deactivated drawing when quick-loading level tape recording
4583   if (tape.playing && tape.deactivate_display)
4584     TapeDeactivateDisplayOff(TRUE);
4585
4586   SetMouseCursor(CURSOR_DEFAULT);
4587
4588   // pause network game while waiting for request to answer
4589   if (network.enabled &&
4590       game_status == GAME_MODE_PLAYING &&
4591       !game.all_players_gone &&
4592       req_state & REQUEST_WAIT_FOR_INPUT)
4593     SendToServer_PausePlaying();
4594
4595   old_door_state = GetDoorState();
4596
4597   // simulate releasing mouse button over last gadget, if still pressed
4598   if (button_status)
4599     HandleGadgets(-1, -1, 0);
4600
4601   UnmapAllGadgets();
4602
4603   // draw released gadget before proceeding
4604   // BackToFront();
4605
4606   if (old_door_state & DOOR_OPEN_1)
4607   {
4608     CloseDoor(DOOR_CLOSE_1);
4609
4610     // save old door content
4611     BlitBitmap(bitmap_db_door_1, bitmap_db_door_1,
4612                0 * DXSIZE, 0, DXSIZE, DYSIZE, 1 * DXSIZE, 0);
4613   }
4614
4615   SetDoorBackgroundImage(IMG_BACKGROUND_DOOR);
4616   SetDrawBackgroundMask(REDRAW_FIELD | REDRAW_DOOR_1);
4617
4618   // clear door drawing field
4619   DrawBackground(DX, DY, DXSIZE, DYSIZE);
4620
4621   // force DOOR font inside door area
4622   SetFontStatus(GAME_MODE_PSEUDO_DOOR);
4623
4624   // write text for request
4625   for (text_ptr = text, ty = 0; ty < MAX_REQUEST_LINES; ty++)
4626   {
4627     char text_line[max_request_line_len + 1];
4628     int tx, tl, tc = 0;
4629
4630     if (!*text_ptr)
4631       break;
4632
4633     for (tl = 0, tx = 0; tx < max_request_line_len; tl++, tx++)
4634     {
4635       tc = *(text_ptr + tx);
4636       // if (!tc || tc == ' ')
4637       if (!tc || tc == ' ' || tc == '?' || tc == '!')
4638         break;
4639     }
4640
4641     if ((tc == '?' || tc == '!') && tl == 0)
4642       tl = 1;
4643
4644     if (!tl)
4645     { 
4646       text_ptr++; 
4647       ty--; 
4648       continue; 
4649     }
4650
4651     strncpy(text_line, text_ptr, tl);
4652     text_line[tl] = 0;
4653
4654     DrawText(DX + (DXSIZE - tl * getFontWidth(font_nr)) / 2,
4655              DY + 8 + ty * (getFontHeight(font_nr) + 2),
4656              text_line, font_nr);
4657
4658     text_ptr += tl + (tc == ' ' ? 1 : 0);
4659     // text_ptr += tl + (tc == ' ' || tc == '?' || tc == '!' ? 1 : 0);
4660   }
4661
4662   ResetFontStatus();
4663
4664   if (req_state & REQ_ASK)
4665   {
4666     MapGadget(tool_gadget[TOOL_CTRL_ID_YES]);
4667     MapGadget(tool_gadget[TOOL_CTRL_ID_NO]);
4668     MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_YES]);
4669     MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_NO]);
4670   }
4671   else if (req_state & REQ_CONFIRM)
4672   {
4673     MapGadget(tool_gadget[TOOL_CTRL_ID_CONFIRM]);
4674     MapGadget(tool_gadget[TOOL_CTRL_ID_TOUCH_CONFIRM]);
4675   }
4676   else if (req_state & REQ_PLAYER)
4677   {
4678     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_1]);
4679     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_2]);
4680     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_3]);
4681     MapGadget(tool_gadget[TOOL_CTRL_ID_PLAYER_4]);
4682   }
4683
4684   // copy request gadgets to door backbuffer
4685   BlitBitmap(drawto, bitmap_db_door_1, DX, DY, DXSIZE, DYSIZE, 0, 0);
4686
4687   OpenDoor(DOOR_OPEN_1);
4688
4689   if (!(req_state & REQUEST_WAIT_FOR_INPUT))
4690   {
4691     if (game_status == GAME_MODE_PLAYING)
4692     {
4693       SetPanelBackground();
4694       SetDrawBackgroundMask(REDRAW_DOOR_1);
4695     }
4696     else
4697     {
4698       SetDrawBackgroundMask(REDRAW_FIELD);
4699     }
4700
4701     return FALSE;
4702   }
4703
4704   SetDrawBackgroundMask(REDRAW_FIELD | REDRAW_DOOR_1);
4705
4706   // ---------- handle request buttons ----------
4707   result = RequestHandleEvents(req_state);
4708
4709   UnmapToolButtons();
4710
4711   if (!(req_state & REQ_STAY_OPEN))
4712   {
4713     CloseDoor(DOOR_CLOSE_1);
4714
4715     if (((old_door_state & DOOR_OPEN_1) && !(req_state & REQ_STAY_CLOSED)) ||
4716         (req_state & REQ_REOPEN))
4717       OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
4718   }
4719
4720   RemapAllGadgets();
4721
4722   if (game_status == GAME_MODE_PLAYING)
4723   {
4724     SetPanelBackground();
4725     SetDrawBackgroundMask(REDRAW_DOOR_1);
4726   }
4727   else
4728   {
4729     SetDrawBackgroundMask(REDRAW_FIELD);
4730   }
4731
4732   // continue network game after request
4733   if (network.enabled &&
4734       game_status == GAME_MODE_PLAYING &&
4735       !game.all_players_gone &&
4736       req_state & REQUEST_WAIT_FOR_INPUT)
4737     SendToServer_ContinuePlaying();
4738
4739   // restore deactivated drawing when quick-loading level tape recording
4740   if (tape.playing && tape.deactivate_display)
4741     TapeDeactivateDisplayOn();
4742
4743   return result;
4744 }
4745
4746 static boolean RequestEnvelope(char *text, unsigned int req_state)
4747 {
4748   int result;
4749
4750   if (game_status == GAME_MODE_PLAYING)
4751     BlitScreenToBitmap(backbuffer);
4752
4753   // disable deactivated drawing when quick-loading level tape recording
4754   if (tape.playing && tape.deactivate_display)
4755     TapeDeactivateDisplayOff(TRUE);
4756
4757   SetMouseCursor(CURSOR_DEFAULT);
4758
4759   // pause network game while waiting for request to answer
4760   if (network.enabled &&
4761       game_status == GAME_MODE_PLAYING &&
4762       !game.all_players_gone &&
4763       req_state & REQUEST_WAIT_FOR_INPUT)
4764     SendToServer_PausePlaying();
4765
4766   // simulate releasing mouse button over last gadget, if still pressed
4767   if (button_status)
4768     HandleGadgets(-1, -1, 0);
4769
4770   UnmapAllGadgets();
4771
4772   // (replace with setting corresponding request background)
4773   // SetDoorBackgroundImage(IMG_BACKGROUND_DOOR);
4774   // SetDrawBackgroundMask(REDRAW_FIELD | REDRAW_DOOR_1);
4775
4776   // clear door drawing field
4777   // DrawBackground(DX, DY, DXSIZE, DYSIZE);
4778
4779   ShowEnvelopeRequest(text, req_state, ACTION_OPENING);
4780
4781   if (!(req_state & REQUEST_WAIT_FOR_INPUT))
4782   {
4783     if (game_status == GAME_MODE_PLAYING)
4784     {
4785       SetPanelBackground();
4786       SetDrawBackgroundMask(REDRAW_DOOR_1);
4787     }
4788     else
4789     {
4790       SetDrawBackgroundMask(REDRAW_FIELD);
4791     }
4792
4793     return FALSE;
4794   }
4795
4796   SetDrawBackgroundMask(REDRAW_FIELD | REDRAW_DOOR_1);
4797
4798   // ---------- handle request buttons ----------
4799   result = RequestHandleEvents(req_state);
4800
4801   UnmapToolButtons();
4802
4803   ShowEnvelopeRequest(text, req_state, ACTION_CLOSING);
4804
4805   RemapAllGadgets();
4806
4807   if (game_status == GAME_MODE_PLAYING)
4808   {
4809     SetPanelBackground();
4810     SetDrawBackgroundMask(REDRAW_DOOR_1);
4811   }
4812   else
4813   {
4814     SetDrawBackgroundMask(REDRAW_FIELD);
4815   }
4816
4817   // continue network game after request
4818   if (network.enabled &&
4819       game_status == GAME_MODE_PLAYING &&
4820       !game.all_players_gone &&
4821       req_state & REQUEST_WAIT_FOR_INPUT)
4822     SendToServer_ContinuePlaying();
4823
4824   // restore deactivated drawing when quick-loading level tape recording
4825   if (tape.playing && tape.deactivate_display)
4826     TapeDeactivateDisplayOn();
4827
4828   return result;
4829 }
4830
4831 boolean Request(char *text, unsigned int req_state)
4832 {
4833   boolean overlay_enabled = GetOverlayEnabled();
4834   boolean result;
4835
4836   SetOverlayEnabled(FALSE);
4837
4838   if (global.use_envelope_request)
4839     result = RequestEnvelope(text, req_state);
4840   else
4841     result = RequestDoor(text, req_state);
4842
4843   SetOverlayEnabled(overlay_enabled);
4844
4845   return result;
4846 }
4847
4848 static int compareDoorPartOrderInfo(const void *object1, const void *object2)
4849 {
4850   const struct DoorPartOrderInfo *dpo1 = (struct DoorPartOrderInfo *)object1;
4851   const struct DoorPartOrderInfo *dpo2 = (struct DoorPartOrderInfo *)object2;
4852   int compare_result;
4853
4854   if (dpo1->sort_priority != dpo2->sort_priority)
4855     compare_result = dpo1->sort_priority - dpo2->sort_priority;
4856   else
4857     compare_result = dpo1->nr - dpo2->nr;
4858
4859   return compare_result;
4860 }
4861
4862 void InitGraphicCompatibilityInfo_Doors(void)
4863 {
4864   struct
4865   {
4866     int door_token;
4867     int part_1, part_8;
4868     struct DoorInfo *door;
4869   }
4870   doors[] =
4871   {
4872     { DOOR_1,   IMG_GFX_DOOR_1_PART_1,  IMG_GFX_DOOR_1_PART_8,  &door_1 },
4873     { DOOR_2,   IMG_GFX_DOOR_2_PART_1,  IMG_GFX_DOOR_2_PART_8,  &door_2 },
4874
4875     { -1,       -1,                     -1,                     NULL    }
4876   };
4877   struct Rect door_rect_list[] =
4878   {
4879     { DX, DY, DXSIZE, DYSIZE },
4880     { VX, VY, VXSIZE, VYSIZE }
4881   };
4882   int i, j;
4883
4884   for (i = 0; doors[i].door_token != -1; i++)
4885   {
4886     int door_token = doors[i].door_token;
4887     int door_index = DOOR_INDEX_FROM_TOKEN(door_token);
4888     int part_1 = doors[i].part_1;
4889     int part_8 = doors[i].part_8;
4890     int part_2 = part_1 + 1;
4891     int part_3 = part_1 + 2;
4892     struct DoorInfo *door = doors[i].door;
4893     struct Rect *door_rect = &door_rect_list[door_index];
4894     boolean door_gfx_redefined = FALSE;
4895
4896     // check if any door part graphic definitions have been redefined
4897
4898     for (j = 0; door_part_controls[j].door_token != -1; j++)
4899     {
4900       struct DoorPartControlInfo *dpc = &door_part_controls[j];
4901       struct FileInfo *fi = getImageListEntryFromImageID(dpc->graphic);
4902
4903       if (dpc->door_token == door_token && fi->redefined)
4904         door_gfx_redefined = TRUE;
4905     }
4906
4907     // check for old-style door graphic/animation modifications
4908
4909     if (!door_gfx_redefined)
4910     {
4911       if (door->anim_mode & ANIM_STATIC_PANEL)
4912       {
4913         door->panel.step_xoffset = 0;
4914         door->panel.step_yoffset = 0;
4915       }
4916
4917       if (door->anim_mode & (ANIM_HORIZONTAL | ANIM_VERTICAL))
4918       {
4919         struct GraphicInfo *g_part_1 = &graphic_info[part_1];
4920         struct GraphicInfo *g_part_2 = &graphic_info[part_2];
4921         int num_door_steps, num_panel_steps;
4922
4923         // remove door part graphics other than the two default wings
4924
4925         for (j = 0; door_part_controls[j].door_token != -1; j++)
4926         {
4927           struct DoorPartControlInfo *dpc = &door_part_controls[j];
4928           struct GraphicInfo *g = &graphic_info[dpc->graphic];
4929
4930           if (dpc->graphic >= part_3 &&
4931               dpc->graphic <= part_8)
4932             g->bitmap = NULL;
4933         }
4934
4935         // set graphics and screen positions of the default wings
4936
4937         g_part_1->width  = door_rect->width;
4938         g_part_1->height = door_rect->height;
4939         g_part_2->width  = door_rect->width;
4940         g_part_2->height = door_rect->height;
4941         g_part_2->src_x = door_rect->width;
4942         g_part_2->src_y = g_part_1->src_y;
4943
4944         door->part_2.x = door->part_1.x;
4945         door->part_2.y = door->part_1.y;
4946
4947         if (door->width != -1)
4948         {
4949           g_part_1->width = door->width;
4950           g_part_2->width = door->width;
4951
4952           // special treatment for graphics and screen position of right wing
4953           g_part_2->src_x += door_rect->width - door->width;
4954           door->part_2.x  += door_rect->width - door->width;
4955         }
4956
4957         if (door->height != -1)
4958         {
4959           g_part_1->height = door->height;
4960           g_part_2->height = door->height;
4961
4962           // special treatment for graphics and screen position of bottom wing
4963           g_part_2->src_y += door_rect->height - door->height;
4964           door->part_2.y  += door_rect->height - door->height;
4965         }
4966
4967         // set animation delays for the default wings and panels
4968
4969         door->part_1.step_delay = door->step_delay;
4970         door->part_2.step_delay = door->step_delay;
4971         door->panel.step_delay  = door->step_delay;
4972
4973         // set animation draw order for the default wings
4974
4975         door->part_1.sort_priority = 2; // draw left wing over ...
4976         door->part_2.sort_priority = 1; //          ... right wing
4977
4978         // set animation draw offset for the default wings
4979
4980         if (door->anim_mode & ANIM_HORIZONTAL)
4981         {
4982           door->part_1.step_xoffset = door->step_offset;
4983           door->part_1.step_yoffset = 0;
4984           door->part_2.step_xoffset = door->step_offset * -1;
4985           door->part_2.step_yoffset = 0;
4986
4987           num_door_steps = g_part_1->width / door->step_offset;
4988         }
4989         else    // ANIM_VERTICAL
4990         {
4991           door->part_1.step_xoffset = 0;
4992           door->part_1.step_yoffset = door->step_offset;
4993           door->part_2.step_xoffset = 0;
4994           door->part_2.step_yoffset = door->step_offset * -1;
4995
4996           num_door_steps = g_part_1->height / door->step_offset;
4997         }
4998
4999         // set animation draw offset for the default panels
5000
5001         if (door->step_offset > 1)
5002         {
5003           num_panel_steps = 2 * door_rect->height / door->step_offset;
5004           door->panel.start_step = num_panel_steps - num_door_steps;
5005           door->panel.start_step_closing = door->panel.start_step;
5006         }
5007         else
5008         {
5009           num_panel_steps = door_rect->height / door->step_offset;
5010           door->panel.start_step = num_panel_steps - num_door_steps / 2;
5011           door->panel.start_step_closing = door->panel.start_step;
5012           door->panel.step_delay *= 2;
5013         }
5014       }
5015     }
5016   }
5017 }
5018
5019 void InitDoors(void)
5020 {
5021   int i;
5022
5023   for (i = 0; door_part_controls[i].door_token != -1; i++)
5024   {
5025     struct DoorPartControlInfo *dpc = &door_part_controls[i];
5026     struct DoorPartOrderInfo *dpo = &door_part_order[i];
5027
5028     // initialize "start_step_opening" and "start_step_closing", if needed
5029     if (dpc->pos->start_step_opening == 0 &&
5030         dpc->pos->start_step_closing == 0)
5031     {
5032       // dpc->pos->start_step_opening = dpc->pos->start_step;
5033       dpc->pos->start_step_closing = dpc->pos->start_step;
5034     }
5035
5036     // fill structure for door part draw order (sorted below)
5037     dpo->nr = i;
5038     dpo->sort_priority = dpc->pos->sort_priority;
5039   }
5040
5041   // sort door part controls according to sort_priority and graphic number
5042   qsort(door_part_order, MAX_DOOR_PARTS,
5043         sizeof(struct DoorPartOrderInfo), compareDoorPartOrderInfo);
5044 }
5045
5046 unsigned int OpenDoor(unsigned int door_state)
5047 {
5048   if (door_state & DOOR_COPY_BACK)
5049   {
5050     if (door_state & DOOR_OPEN_1)
5051       BlitBitmap(bitmap_db_door_1, bitmap_db_door_1,
5052                  1 * DXSIZE, 0, DXSIZE, DYSIZE, 0 * DXSIZE, 0);
5053
5054     if (door_state & DOOR_OPEN_2)
5055       BlitBitmap(bitmap_db_door_2, bitmap_db_door_2,
5056                  1 * VXSIZE, 0, VXSIZE, VYSIZE, 0 * VXSIZE, 0);
5057
5058     door_state &= ~DOOR_COPY_BACK;
5059   }
5060
5061   return MoveDoor(door_state);
5062 }
5063
5064 unsigned int CloseDoor(unsigned int door_state)
5065 {
5066   unsigned int old_door_state = GetDoorState();
5067
5068   if (!(door_state & DOOR_NO_COPY_BACK))
5069   {
5070     if (old_door_state & DOOR_OPEN_1)
5071       BlitBitmap(backbuffer, bitmap_db_door_1,
5072                  DX, DY, DXSIZE, DYSIZE, 0, 0);
5073
5074     if (old_door_state & DOOR_OPEN_2)
5075       BlitBitmap(backbuffer, bitmap_db_door_2,
5076                  VX, VY, VXSIZE, VYSIZE, 0, 0);
5077
5078     door_state &= ~DOOR_NO_COPY_BACK;
5079   }
5080
5081   return MoveDoor(door_state);
5082 }
5083
5084 unsigned int GetDoorState(void)
5085 {
5086   return MoveDoor(DOOR_GET_STATE);
5087 }
5088
5089 unsigned int SetDoorState(unsigned int door_state)
5090 {
5091   return MoveDoor(door_state | DOOR_SET_STATE);
5092 }
5093
5094 static int euclid(int a, int b)
5095 {
5096   return (b ? euclid(b, a % b) : a);
5097 }
5098
5099 unsigned int MoveDoor(unsigned int door_state)
5100 {
5101   struct Rect door_rect_list[] =
5102   {
5103     { DX, DY, DXSIZE, DYSIZE },
5104     { VX, VY, VXSIZE, VYSIZE }
5105   };
5106   static int door1 = DOOR_CLOSE_1;
5107   static int door2 = DOOR_CLOSE_2;
5108   unsigned int door_delay = 0;
5109   unsigned int door_delay_value;
5110   int i;
5111
5112   if (door_state == DOOR_GET_STATE)
5113     return (door1 | door2);
5114
5115   if (door_state & DOOR_SET_STATE)
5116   {
5117     if (door_state & DOOR_ACTION_1)
5118       door1 = door_state & DOOR_ACTION_1;
5119     if (door_state & DOOR_ACTION_2)
5120       door2 = door_state & DOOR_ACTION_2;
5121
5122     return (door1 | door2);
5123   }
5124
5125   if (!(door_state & DOOR_FORCE_REDRAW))
5126   {
5127     if (door1 == DOOR_OPEN_1 && door_state & DOOR_OPEN_1)
5128       door_state &= ~DOOR_OPEN_1;
5129     else if (door1 == DOOR_CLOSE_1 && door_state & DOOR_CLOSE_1)
5130       door_state &= ~DOOR_CLOSE_1;
5131     if (door2 == DOOR_OPEN_2 && door_state & DOOR_OPEN_2)
5132       door_state &= ~DOOR_OPEN_2;
5133     else if (door2 == DOOR_CLOSE_2 && door_state & DOOR_CLOSE_2)
5134       door_state &= ~DOOR_CLOSE_2;
5135   }
5136
5137   if (global.autoplay_leveldir)
5138   {
5139     door_state |= DOOR_NO_DELAY;
5140     door_state &= ~DOOR_CLOSE_ALL;
5141   }
5142
5143   if (game_status == GAME_MODE_EDITOR && !(door_state & DOOR_FORCE_ANIM))
5144     door_state |= DOOR_NO_DELAY;
5145
5146   if (door_state & DOOR_ACTION)
5147   {
5148     boolean door_panel_drawn[NUM_DOORS];
5149     boolean panel_has_doors[NUM_DOORS];
5150     boolean door_part_skip[MAX_DOOR_PARTS];
5151     boolean door_part_done[MAX_DOOR_PARTS];
5152     boolean door_part_done_all;
5153     int num_steps[MAX_DOOR_PARTS];
5154     int max_move_delay = 0;     // delay for complete animations of all doors
5155     int max_step_delay = 0;     // delay (ms) between two animation frames
5156     int num_move_steps = 0;     // number of animation steps for all doors
5157     int max_move_delay_doors_only = 0;  // delay for doors only (no panel)
5158     int num_move_steps_doors_only = 0;  // steps for doors only (no panel)
5159     int current_move_delay = 0;
5160     int start = 0;
5161     int k;
5162
5163     for (i = 0; i < NUM_DOORS; i++)
5164       panel_has_doors[i] = FALSE;
5165
5166     for (i = 0; i < MAX_DOOR_PARTS; i++)
5167     {
5168       struct DoorPartControlInfo *dpc = &door_part_controls[i];
5169       struct GraphicInfo *g = &graphic_info[dpc->graphic];
5170       int door_token = dpc->door_token;
5171
5172       door_part_done[i] = FALSE;
5173       door_part_skip[i] = (!(door_state & door_token) ||
5174                            !g->bitmap);
5175     }
5176
5177     for (i = 0; i < MAX_DOOR_PARTS; i++)
5178     {
5179       int nr = door_part_order[i].nr;
5180       struct DoorPartControlInfo *dpc = &door_part_controls[nr];
5181       struct DoorPartPosInfo *pos = dpc->pos;
5182       struct GraphicInfo *g = &graphic_info[dpc->graphic];
5183       int door_token = dpc->door_token;
5184       int door_index = DOOR_INDEX_FROM_TOKEN(door_token);
5185       boolean is_panel = DOOR_PART_IS_PANEL(nr);
5186       int step_xoffset = ABS(pos->step_xoffset);
5187       int step_yoffset = ABS(pos->step_yoffset);
5188       int step_delay = pos->step_delay;
5189       int current_door_state = door_state & door_token;
5190       boolean door_opening = ((current_door_state & DOOR_OPEN)  != 0);
5191       boolean door_closing = ((current_door_state & DOOR_CLOSE) != 0);
5192       boolean part_opening = (is_panel ? door_closing : door_opening);
5193       int start_step = (part_opening ? pos->start_step_opening :
5194                         pos->start_step_closing);
5195       float move_xsize = (step_xoffset ? g->width  : 0);
5196       float move_ysize = (step_yoffset ? g->height : 0);
5197       int move_xsteps = (step_xoffset ? ceil(move_xsize / step_xoffset) : 0);
5198       int move_ysteps = (step_yoffset ? ceil(move_ysize / step_yoffset) : 0);
5199       int move_steps = (move_xsteps && move_ysteps ?
5200                         MIN(move_xsteps, move_ysteps) :
5201                         move_xsteps ? move_xsteps : move_ysteps) - start_step;
5202       int move_delay = move_steps * step_delay;
5203
5204       if (door_part_skip[nr])
5205         continue;
5206
5207       max_move_delay = MAX(max_move_delay, move_delay);
5208       max_step_delay = (max_step_delay == 0 ? step_delay :
5209                         euclid(max_step_delay, step_delay));
5210       num_steps[nr] = move_steps;
5211
5212       if (!is_panel)
5213       {
5214         max_move_delay_doors_only = MAX(max_move_delay_doors_only, move_delay);
5215
5216         panel_has_doors[door_index] = TRUE;
5217       }
5218     }
5219
5220     max_step_delay = MAX(1, max_step_delay);    // prevent division by zero
5221
5222     num_move_steps = max_move_delay / max_step_delay;
5223     num_move_steps_doors_only = max_move_delay_doors_only / max_step_delay;
5224
5225     door_delay_value = max_step_delay;
5226
5227     if ((door_state & DOOR_NO_DELAY) || setup.quick_doors)
5228     {
5229       start = num_move_steps - 1;
5230     }
5231     else
5232     {
5233       // opening door sound has priority over simultaneously closing door
5234       if (door_state & (DOOR_OPEN_1 | DOOR_OPEN_2))
5235       {
5236         PlayMenuSoundStereo(SND_DOOR_OPENING, SOUND_MIDDLE);
5237
5238         if (door_state & DOOR_OPEN_1)
5239           PlayMenuSoundStereo(SND_DOOR_1_OPENING, SOUND_MIDDLE);
5240         if (door_state & DOOR_OPEN_2)
5241           PlayMenuSoundStereo(SND_DOOR_2_OPENING, SOUND_MIDDLE);
5242       }
5243       else if (door_state & (DOOR_CLOSE_1 | DOOR_CLOSE_2))
5244       {
5245         PlayMenuSoundStereo(SND_DOOR_CLOSING, SOUND_MIDDLE);
5246
5247         if (door_state & DOOR_CLOSE_1)
5248           PlayMenuSoundStereo(SND_DOOR_1_CLOSING, SOUND_MIDDLE);
5249         if (door_state & DOOR_CLOSE_2)
5250           PlayMenuSoundStereo(SND_DOOR_2_CLOSING, SOUND_MIDDLE);
5251       }
5252     }
5253
5254     for (k = start; k < num_move_steps; k++)
5255     {
5256       int last_frame = num_move_steps - 1;      // last frame of this "for" loop
5257
5258       door_part_done_all = TRUE;
5259
5260       for (i = 0; i < NUM_DOORS; i++)
5261         door_panel_drawn[i] = FALSE;
5262
5263       for (i = 0; i < MAX_DOOR_PARTS; i++)
5264       {
5265         int nr = door_part_order[i].nr;
5266         struct DoorPartControlInfo *dpc = &door_part_controls[nr];
5267         struct DoorPartPosInfo *pos = dpc->pos;
5268         struct GraphicInfo *g = &graphic_info[dpc->graphic];
5269         int door_token = dpc->door_token;
5270         int door_index = DOOR_INDEX_FROM_TOKEN(door_token);
5271         boolean is_panel = DOOR_PART_IS_PANEL(nr);
5272         boolean is_panel_and_door_has_closed = FALSE;
5273         struct Rect *door_rect = &door_rect_list[door_index];
5274         Bitmap *bitmap_db_door = (door_token == DOOR_1 ? bitmap_db_door_1 :
5275                                   bitmap_db_door_2);
5276         Bitmap *bitmap = (is_panel ? bitmap_db_door : g->bitmap);
5277         int current_door_state = door_state & door_token;
5278         boolean door_opening = ((current_door_state & DOOR_OPEN)  != 0);
5279         boolean door_closing = !door_opening;
5280         boolean part_opening = (is_panel ? door_closing : door_opening);
5281         boolean part_closing = !part_opening;
5282         int start_step = (part_opening ? pos->start_step_opening :
5283                           pos->start_step_closing);
5284         int step_delay = pos->step_delay;
5285         int step_factor = step_delay / max_step_delay;
5286         int k1 = (step_factor ? k / step_factor + 1 : k);
5287         int k2 = (part_opening ? k1 + start_step : num_steps[nr] - k1);
5288         int kk = MAX(0, k2);
5289         int g_src_x = 0;
5290         int g_src_y = 0;
5291         int src_x, src_y, src_xx, src_yy;
5292         int dst_x, dst_y, dst_xx, dst_yy;
5293         int width, height;
5294
5295         if (door_part_skip[nr])
5296           continue;
5297
5298         if (!(door_state & door_token))
5299           continue;
5300
5301         if (!g->bitmap)
5302           continue;
5303
5304         if (!is_panel)
5305         {
5306           int k2_door = (door_opening ? k : num_move_steps_doors_only - k - 1);
5307           int kk_door = MAX(0, k2_door);
5308           int sync_frame = kk_door * door_delay_value;
5309           int frame = getGraphicAnimationFrame(dpc->graphic, sync_frame);
5310
5311           getFixedGraphicSource(dpc->graphic, frame, &bitmap,
5312                                 &g_src_x, &g_src_y);
5313         }
5314
5315         // draw door panel
5316
5317         if (!door_panel_drawn[door_index])
5318         {
5319           ClearRectangle(drawto, door_rect->x, door_rect->y,
5320                          door_rect->width, door_rect->height);
5321
5322           door_panel_drawn[door_index] = TRUE;
5323         }
5324
5325         // draw opening or closing door parts
5326
5327         if (pos->step_xoffset < 0)      // door part on right side
5328         {
5329           src_xx = 0;
5330           dst_xx = pos->x + ABS(kk * pos->step_xoffset);
5331           width = g->width;
5332
5333           if (dst_xx + width > door_rect->width)
5334             width = door_rect->width - dst_xx;
5335         }
5336         else                            // door part on left side
5337         {
5338           src_xx = 0;
5339           dst_xx = pos->x - kk * pos->step_xoffset;
5340
5341           if (dst_xx < 0)
5342           {
5343             src_xx = ABS(dst_xx);
5344             dst_xx = 0;
5345           }
5346
5347           width = g->width - src_xx;
5348
5349           if (width > door_rect->width)
5350             width = door_rect->width;
5351
5352           // Debug("tools:MoveDoor", "k == %d [%d]", k, start_step);
5353         }
5354
5355         if (pos->step_yoffset < 0)      // door part on bottom side
5356         {
5357           src_yy = 0;
5358           dst_yy = pos->y + ABS(kk * pos->step_yoffset);
5359           height = g->height;
5360
5361           if (dst_yy + height > door_rect->height)
5362             height = door_rect->height - dst_yy;
5363         }
5364         else                            // door part on top side
5365         {
5366           src_yy = 0;
5367           dst_yy = pos->y - kk * pos->step_yoffset;
5368
5369           if (dst_yy < 0)
5370           {
5371             src_yy = ABS(dst_yy);
5372             dst_yy = 0;
5373           }
5374
5375           height = g->height - src_yy;
5376         }
5377
5378         src_x = g_src_x + src_xx;
5379         src_y = g_src_y + src_yy;
5380
5381         dst_x = door_rect->x + dst_xx;
5382         dst_y = door_rect->y + dst_yy;
5383
5384         is_panel_and_door_has_closed =
5385           (is_panel &&
5386            door_closing &&
5387            panel_has_doors[door_index] &&
5388            k >= num_move_steps_doors_only - 1);
5389
5390         if (width  >= 0 && width  <= g->width &&
5391             height >= 0 && height <= g->height &&
5392             !is_panel_and_door_has_closed)
5393         {
5394           if (is_panel || !pos->draw_masked)
5395             BlitBitmap(bitmap, drawto, src_x, src_y, width, height,
5396                        dst_x, dst_y);
5397           else
5398             BlitBitmapMasked(bitmap, drawto, src_x, src_y, width, height,
5399                              dst_x, dst_y);
5400         }
5401
5402         redraw_mask |= REDRAW_DOOR_FROM_TOKEN(door_token);
5403
5404         if ((part_opening && (width < 0         || height < 0)) ||
5405             (part_closing && (width >= g->width && height >= g->height)))
5406           door_part_done[nr] = TRUE;
5407
5408         // continue door part animations, but not panel after door has closed
5409         if (!door_part_done[nr] && !is_panel_and_door_has_closed)
5410           door_part_done_all = FALSE;
5411       }
5412
5413       if (!(door_state & DOOR_NO_DELAY))
5414       {
5415         BackToFront();
5416
5417         SkipUntilDelayReached(&door_delay, door_delay_value, &k, last_frame);
5418
5419         current_move_delay += max_step_delay;
5420
5421         // prevent OS (Windows) from complaining about program not responding
5422         CheckQuitEvent();
5423       }
5424
5425       if (door_part_done_all)
5426         break;
5427     }
5428
5429     if (!(door_state & DOOR_NO_DELAY))
5430     {
5431       // wait for specified door action post delay
5432       if (door_state & DOOR_ACTION_1 && door_state & DOOR_ACTION_2)
5433         door_delay_value = MAX(door_1.post_delay, door_2.post_delay);
5434       else if (door_state & DOOR_ACTION_1)
5435         door_delay_value = door_1.post_delay;
5436       else if (door_state & DOOR_ACTION_2)
5437         door_delay_value = door_2.post_delay;
5438
5439       while (!DelayReached(&door_delay, door_delay_value))
5440         BackToFront();
5441     }
5442   }
5443
5444   if (door_state & DOOR_ACTION_1)
5445     door1 = door_state & DOOR_ACTION_1;
5446   if (door_state & DOOR_ACTION_2)
5447     door2 = door_state & DOOR_ACTION_2;
5448
5449   // draw masked border over door area
5450   DrawMaskedBorder(REDRAW_DOOR_1);
5451   DrawMaskedBorder(REDRAW_DOOR_2);
5452
5453   ClearAutoRepeatKeyEvents();
5454
5455   return (door1 | door2);
5456 }
5457
5458 static boolean useSpecialEditorDoor(void)
5459 {
5460   int graphic = IMG_GLOBAL_BORDER_EDITOR;
5461   boolean redefined = getImageListEntryFromImageID(graphic)->redefined;
5462
5463   // do not draw special editor door if editor border defined or redefined
5464   if (graphic_info[graphic].bitmap != NULL || redefined)
5465     return FALSE;
5466
5467   // do not draw special editor door if global border defined to be empty
5468   if (graphic_info[IMG_GLOBAL_BORDER].bitmap == NULL)
5469     return FALSE;
5470
5471   // do not draw special editor door if viewport definitions do not match
5472   if (EX != VX ||
5473       EY >= VY ||
5474       EXSIZE != VXSIZE ||
5475       EY + EYSIZE != VY + VYSIZE)
5476     return FALSE;
5477
5478   return TRUE;
5479 }
5480
5481 void DrawSpecialEditorDoor(void)
5482 {
5483   struct GraphicInfo *gfx1 = &graphic_info[IMG_DOOR_2_TOP_BORDER_CORRECTION];
5484   int top_border_width = gfx1->width;
5485   int top_border_height = gfx1->height;
5486   int outer_border = viewport.door_2[GAME_MODE_EDITOR].border_size;
5487   int ex = EX - outer_border;
5488   int ey = EY - outer_border;
5489   int vy = VY - outer_border;
5490   int exsize = EXSIZE + 2 * outer_border;
5491
5492   if (!useSpecialEditorDoor())
5493     return;
5494
5495   // draw bigger level editor toolbox window
5496   BlitBitmap(gfx1->bitmap, drawto, gfx1->src_x, gfx1->src_y,
5497              top_border_width, top_border_height, ex, ey - top_border_height);
5498   BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, drawto, ex, vy,
5499              exsize, EYSIZE - VYSIZE + outer_border, ex, ey);
5500
5501   redraw_mask |= REDRAW_ALL;
5502 }
5503
5504 void UndrawSpecialEditorDoor(void)
5505 {
5506   struct GraphicInfo *gfx1 = &graphic_info[IMG_DOOR_2_TOP_BORDER_CORRECTION];
5507   int top_border_width = gfx1->width;
5508   int top_border_height = gfx1->height;
5509   int outer_border = viewport.door_2[GAME_MODE_EDITOR].border_size;
5510   int ex = EX - outer_border;
5511   int ey = EY - outer_border;
5512   int ey_top = ey - top_border_height;
5513   int exsize = EXSIZE + 2 * outer_border;
5514   int eysize = EYSIZE + 2 * outer_border;
5515
5516   if (!useSpecialEditorDoor())
5517     return;
5518
5519   // draw normal tape recorder window
5520   if (graphic_info[IMG_GLOBAL_BORDER].bitmap)
5521   {
5522     BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, drawto,
5523                ex, ey_top, top_border_width, top_border_height,
5524                ex, ey_top);
5525     BlitBitmap(graphic_info[IMG_GLOBAL_BORDER].bitmap, drawto,
5526                ex, ey, exsize, eysize, ex, ey);
5527   }
5528   else
5529   {
5530     // if screen background is set to "[NONE]", clear editor toolbox window
5531     ClearRectangle(drawto, ex, ey_top, top_border_width, top_border_height);
5532     ClearRectangle(drawto, ex, ey, exsize, eysize);
5533   }
5534
5535   redraw_mask |= REDRAW_ALL;
5536 }
5537
5538
5539 // ---------- new tool button stuff -------------------------------------------
5540
5541 static struct
5542 {
5543   int graphic;
5544   struct TextPosInfo *pos;
5545   int gadget_id;
5546   boolean is_touch_button;
5547   char *infotext;
5548 } toolbutton_info[NUM_TOOL_BUTTONS] =
5549 {
5550   {
5551     IMG_GFX_REQUEST_BUTTON_YES,         &request.button.yes,
5552     TOOL_CTRL_ID_YES, FALSE,            "yes"
5553   },
5554   {
5555     IMG_GFX_REQUEST_BUTTON_NO,          &request.button.no,
5556     TOOL_CTRL_ID_NO, FALSE,             "no"
5557   },
5558   {
5559     IMG_GFX_REQUEST_BUTTON_CONFIRM,     &request.button.confirm,
5560     TOOL_CTRL_ID_CONFIRM, FALSE,        "confirm"
5561   },
5562   {
5563     IMG_GFX_REQUEST_BUTTON_PLAYER_1,    &request.button.player_1,
5564     TOOL_CTRL_ID_PLAYER_1, FALSE,       "player 1"
5565   },
5566   {
5567     IMG_GFX_REQUEST_BUTTON_PLAYER_2,    &request.button.player_2,
5568     TOOL_CTRL_ID_PLAYER_2, FALSE,       "player 2"
5569   },
5570   {
5571     IMG_GFX_REQUEST_BUTTON_PLAYER_3,    &request.button.player_3,
5572     TOOL_CTRL_ID_PLAYER_3, FALSE,       "player 3"
5573   },
5574   {
5575     IMG_GFX_REQUEST_BUTTON_PLAYER_4,    &request.button.player_4,
5576     TOOL_CTRL_ID_PLAYER_4, FALSE,       "player 4"
5577   },
5578   {
5579     IMG_GFX_REQUEST_BUTTON_TOUCH_YES,   &request.button.touch_yes,
5580     TOOL_CTRL_ID_TOUCH_YES, TRUE,       "yes"
5581   },
5582   {
5583     IMG_GFX_REQUEST_BUTTON_TOUCH_NO,    &request.button.touch_no,
5584     TOOL_CTRL_ID_TOUCH_NO, TRUE,        "no"
5585   },
5586   {
5587     IMG_GFX_REQUEST_BUTTON_TOUCH_CONFIRM, &request.button.touch_confirm,
5588     TOOL_CTRL_ID_TOUCH_CONFIRM, TRUE,   "confirm"
5589   }
5590 };
5591
5592 void CreateToolButtons(void)
5593 {
5594   int i;
5595
5596   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
5597   {
5598     int graphic = toolbutton_info[i].graphic;
5599     struct GraphicInfo *gfx = &graphic_info[graphic];
5600     struct TextPosInfo *pos = toolbutton_info[i].pos;
5601     struct GadgetInfo *gi;
5602     Bitmap *deco_bitmap = None;
5603     int deco_x = 0, deco_y = 0, deco_xpos = 0, deco_ypos = 0;
5604     unsigned int event_mask = GD_EVENT_RELEASED;
5605     boolean is_touch_button = toolbutton_info[i].is_touch_button;
5606     int base_x = (is_touch_button ? 0 : DX);
5607     int base_y = (is_touch_button ? 0 : DY);
5608     int gd_x = gfx->src_x;
5609     int gd_y = gfx->src_y;
5610     int gd_xp = gfx->src_x + gfx->pressed_xoffset;
5611     int gd_yp = gfx->src_y + gfx->pressed_yoffset;
5612     int x = pos->x;
5613     int y = pos->y;
5614     int id = i;
5615
5616     if (global.use_envelope_request && !is_touch_button)
5617     {
5618       setRequestPosition(&base_x, &base_y, TRUE);
5619
5620       // check if request buttons are outside of envelope and fix, if needed
5621       if (x < 0 || x + gfx->width  > request.width ||
5622           y < 0 || y + gfx->height > request.height)
5623       {
5624         if (id == TOOL_CTRL_ID_YES)
5625         {
5626           x = 0;
5627           y = request.height - 2 * request.border_size - gfx->height;
5628         }
5629         else if (id == TOOL_CTRL_ID_NO)
5630         {
5631           x = request.width  - 2 * request.border_size - gfx->width;
5632           y = request.height - 2 * request.border_size - gfx->height;
5633         }
5634         else if (id == TOOL_CTRL_ID_CONFIRM)
5635         {
5636           x = (request.width - 2 * request.border_size - gfx->width) / 2;
5637           y = request.height - 2 * request.border_size - gfx->height;
5638         }
5639         else if (id >= TOOL_CTRL_ID_PLAYER_1 && id <= TOOL_CTRL_ID_PLAYER_4)
5640         {
5641           int player_nr = id - TOOL_CTRL_ID_PLAYER_1;
5642
5643           x = (request.width - 2 * request.border_size - gfx->width) / 2;
5644           y = request.height - 2 * request.border_size - gfx->height * 2;
5645
5646           x += (player_nr == 3 ? -1 : player_nr == 1 ? +1 : 0) * gfx->width;
5647           y += (player_nr == 0 ? -1 : player_nr == 2 ? +1 : 0) * gfx->height;
5648         }
5649       }
5650     }
5651
5652     if (id >= TOOL_CTRL_ID_PLAYER_1 && id <= TOOL_CTRL_ID_PLAYER_4)
5653     {
5654       int player_nr = id - TOOL_CTRL_ID_PLAYER_1;
5655
5656       getSizedGraphicSource(PLAYER_NR_GFX(IMG_PLAYER_1, player_nr), 0,
5657                             pos->size, &deco_bitmap, &deco_x, &deco_y);
5658       deco_xpos = (gfx->width  - pos->size) / 2;
5659       deco_ypos = (gfx->height - pos->size) / 2;
5660     }
5661
5662     gi = CreateGadget(GDI_CUSTOM_ID, id,
5663                       GDI_IMAGE_ID, graphic,
5664                       GDI_INFO_TEXT, toolbutton_info[i].infotext,
5665                       GDI_X, base_x + x,
5666                       GDI_Y, base_y + y,
5667                       GDI_WIDTH, gfx->width,
5668                       GDI_HEIGHT, gfx->height,
5669                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
5670                       GDI_STATE, GD_BUTTON_UNPRESSED,
5671                       GDI_DESIGN_UNPRESSED, gfx->bitmap, gd_x, gd_y,
5672                       GDI_DESIGN_PRESSED, gfx->bitmap, gd_xp, gd_yp,
5673                       GDI_DECORATION_DESIGN, deco_bitmap, deco_x, deco_y,
5674                       GDI_DECORATION_POSITION, deco_xpos, deco_ypos,
5675                       GDI_DECORATION_SIZE, pos->size, pos->size,
5676                       GDI_DECORATION_SHIFTING, 1, 1,
5677                       GDI_DIRECT_DRAW, FALSE,
5678                       GDI_OVERLAY_TOUCH_BUTTON, is_touch_button,
5679                       GDI_EVENT_MASK, event_mask,
5680                       GDI_CALLBACK_ACTION, HandleToolButtons,
5681                       GDI_END);
5682
5683     if (gi == NULL)
5684       Fail("cannot create gadget");
5685
5686     tool_gadget[id] = gi;
5687   }
5688 }
5689
5690 void FreeToolButtons(void)
5691 {
5692   int i;
5693
5694   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
5695     FreeGadget(tool_gadget[i]);
5696 }
5697
5698 static void UnmapToolButtons(void)
5699 {
5700   int i;
5701
5702   for (i = 0; i < NUM_TOOL_BUTTONS; i++)
5703     UnmapGadget(tool_gadget[i]);
5704 }
5705
5706 static void HandleToolButtons(struct GadgetInfo *gi)
5707 {
5708   request_gadget_id = gi->custom_id;
5709 }
5710
5711 static struct Mapping_EM_to_RND_object
5712 {
5713   int element_em;
5714   boolean is_rnd_to_em_mapping;         // unique mapping EM <-> RND
5715   boolean is_backside;                  // backside of moving element
5716
5717   int element_rnd;
5718   int action;
5719   int direction;
5720 }
5721 em_object_mapping_list[GAME_TILE_MAX + 1] =
5722 {
5723   {
5724     Zborder,                            FALSE,  FALSE,
5725     EL_EMPTY,                           -1, -1
5726   },
5727   {
5728     Zplayer,                            FALSE,  FALSE,
5729     EL_EMPTY,                           -1, -1
5730   },
5731
5732   {
5733     Zbug,                               FALSE,  FALSE,
5734     EL_EMPTY,                           -1, -1
5735   },
5736   {
5737     Ztank,                              FALSE,  FALSE,
5738     EL_EMPTY,                           -1, -1
5739   },
5740   {
5741     Zeater,                             FALSE,  FALSE,
5742     EL_EMPTY,                           -1, -1
5743   },
5744   {
5745     Zdynamite,                          FALSE,  FALSE,
5746     EL_EMPTY,                           -1, -1
5747   },
5748   {
5749     Zboom,                              FALSE,  FALSE,
5750     EL_EMPTY,                           -1, -1
5751   },
5752
5753   {
5754     Xchain,                             FALSE,  FALSE,
5755     EL_DEFAULT,                         ACTION_EXPLODING, -1
5756   },
5757   {
5758     Xboom_bug,                          FALSE,  FALSE,
5759     EL_BUG,                             ACTION_EXPLODING, -1
5760   },
5761   {
5762     Xboom_tank,                         FALSE,  FALSE,
5763     EL_SPACESHIP,                       ACTION_EXPLODING, -1
5764   },
5765   {
5766     Xboom_android,                      FALSE,  FALSE,
5767     EL_EMC_ANDROID,                     ACTION_OTHER, -1
5768   },
5769   {
5770     Xboom_1,                            FALSE,  FALSE,
5771     EL_DEFAULT,                         ACTION_EXPLODING, -1
5772   },
5773   {
5774     Xboom_2,                            FALSE,  FALSE,
5775     EL_DEFAULT,                         ACTION_EXPLODING, -1
5776   },
5777
5778   {
5779     Xblank,                             TRUE,   FALSE,
5780     EL_EMPTY,                           -1, -1
5781   },
5782
5783   {
5784     Xsplash_e,                          FALSE,  FALSE,
5785     EL_ACID_SPLASH_RIGHT,               -1, -1
5786   },
5787   {
5788     Xsplash_w,                          FALSE,  FALSE,
5789     EL_ACID_SPLASH_LEFT,                -1, -1
5790   },
5791
5792   {
5793     Xplant,                             TRUE,   FALSE,
5794     EL_EMC_PLANT,                       -1, -1
5795   },
5796   {
5797     Yplant,                             FALSE,  FALSE,
5798     EL_EMC_PLANT,                       -1, -1
5799   },
5800
5801   {
5802     Xacid_1,                            TRUE,   FALSE,
5803     EL_ACID,                            -1, -1
5804   },
5805   {
5806     Xacid_2,                            FALSE,  FALSE,
5807     EL_ACID,                            -1, -1
5808   },
5809   {
5810     Xacid_3,                            FALSE,  FALSE,
5811     EL_ACID,                            -1, -1
5812   },
5813   {
5814     Xacid_4,                            FALSE,  FALSE,
5815     EL_ACID,                            -1, -1
5816   },
5817   {
5818     Xacid_5,                            FALSE,  FALSE,
5819     EL_ACID,                            -1, -1
5820   },
5821   {
5822     Xacid_6,                            FALSE,  FALSE,
5823     EL_ACID,                            -1, -1
5824   },
5825   {
5826     Xacid_7,                            FALSE,  FALSE,
5827     EL_ACID,                            -1, -1
5828   },
5829   {
5830     Xacid_8,                            FALSE,  FALSE,
5831     EL_ACID,                            -1, -1
5832   },
5833
5834   {
5835     Xfake_acid_1,                       TRUE,   FALSE,
5836     EL_EMC_FAKE_ACID,                   -1, -1
5837   },
5838   {
5839     Xfake_acid_2,                       FALSE,  FALSE,
5840     EL_EMC_FAKE_ACID,                   -1, -1
5841   },
5842   {
5843     Xfake_acid_3,                       FALSE,  FALSE,
5844     EL_EMC_FAKE_ACID,                   -1, -1
5845   },
5846   {
5847     Xfake_acid_4,                       FALSE,  FALSE,
5848     EL_EMC_FAKE_ACID,                   -1, -1
5849   },
5850   {
5851     Xfake_acid_5,                       FALSE,  FALSE,
5852     EL_EMC_FAKE_ACID,                   -1, -1
5853   },
5854   {
5855     Xfake_acid_6,                       FALSE,  FALSE,
5856     EL_EMC_FAKE_ACID,                   -1, -1
5857   },
5858   {
5859     Xfake_acid_7,                       FALSE,  FALSE,
5860     EL_EMC_FAKE_ACID,                   -1, -1
5861   },
5862   {
5863     Xfake_acid_8,                       FALSE,  FALSE,
5864     EL_EMC_FAKE_ACID,                   -1, -1
5865   },
5866
5867   {
5868     Xgrass,                             TRUE,   FALSE,
5869     EL_EMC_GRASS,                       -1, -1
5870   },
5871   {
5872     Ygrass_nB,                          FALSE,  FALSE,
5873     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_UP
5874   },
5875   {
5876     Ygrass_eB,                          FALSE,  FALSE,
5877     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_RIGHT
5878   },
5879   {
5880     Ygrass_sB,                          FALSE,  FALSE,
5881     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_DOWN
5882   },
5883   {
5884     Ygrass_wB,                          FALSE,  FALSE,
5885     EL_EMC_GRASS,                       ACTION_DIGGING, MV_BIT_LEFT
5886   },
5887
5888   {
5889     Xdirt,                              TRUE,   FALSE,
5890     EL_SAND,                            -1, -1
5891   },
5892   {
5893     Ydirt_nB,                           FALSE,  FALSE,
5894     EL_SAND,                            ACTION_DIGGING, MV_BIT_UP
5895   },
5896   {
5897     Ydirt_eB,                           FALSE,  FALSE,
5898     EL_SAND,                            ACTION_DIGGING, MV_BIT_RIGHT
5899   },
5900   {
5901     Ydirt_sB,                           FALSE,  FALSE,
5902     EL_SAND,                            ACTION_DIGGING, MV_BIT_DOWN
5903   },
5904   {
5905     Ydirt_wB,                           FALSE,  FALSE,
5906     EL_SAND,                            ACTION_DIGGING, MV_BIT_LEFT
5907   },
5908
5909   {
5910     Xandroid,                           TRUE,   FALSE,
5911     EL_EMC_ANDROID,                     ACTION_ACTIVE, -1
5912   },
5913   {
5914     Xandroid_1_n,                       FALSE,  FALSE,
5915     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_UP
5916   },
5917   {
5918     Xandroid_2_n,                       FALSE,  FALSE,
5919     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_UP
5920   },
5921   {
5922     Xandroid_1_e,                       FALSE,  FALSE,
5923     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_RIGHT
5924   },
5925   {
5926     Xandroid_2_e,                       FALSE,  FALSE,
5927     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_RIGHT
5928   },
5929   {
5930     Xandroid_1_w,                       FALSE,  FALSE,
5931     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_LEFT
5932   },
5933   {
5934     Xandroid_2_w,                       FALSE,  FALSE,
5935     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_LEFT
5936   },
5937   {
5938     Xandroid_1_s,                       FALSE,  FALSE,
5939     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_DOWN
5940   },
5941   {
5942     Xandroid_2_s,                       FALSE,  FALSE,
5943     EL_EMC_ANDROID,                     ACTION_ACTIVE, MV_BIT_DOWN
5944   },
5945   {
5946     Yandroid_n,                         FALSE,  FALSE,
5947     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_UP
5948   },
5949   {
5950     Yandroid_nB,                        FALSE,  TRUE,
5951     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_UP
5952   },
5953   {
5954     Yandroid_ne,                        FALSE,  FALSE,
5955     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_UPRIGHT
5956   },
5957   {
5958     Yandroid_neB,                       FALSE,  TRUE,
5959     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_UPRIGHT
5960   },
5961   {
5962     Yandroid_e,                         FALSE,  FALSE,
5963     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_RIGHT
5964   },
5965   {
5966     Yandroid_eB,                        FALSE,  TRUE,
5967     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_RIGHT
5968   },
5969   {
5970     Yandroid_se,                        FALSE,  FALSE,
5971     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_DOWNRIGHT
5972   },
5973   {
5974     Yandroid_seB,                       FALSE,  TRUE,
5975     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_DOWNRIGHT
5976   },
5977   {
5978     Yandroid_s,                         FALSE,  FALSE,
5979     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_DOWN
5980   },
5981   {
5982     Yandroid_sB,                        FALSE,  TRUE,
5983     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_DOWN
5984   },
5985   {
5986     Yandroid_sw,                        FALSE,  FALSE,
5987     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_DOWNLEFT
5988   },
5989   {
5990     Yandroid_swB,                       FALSE,  TRUE,
5991     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_DOWNLEFT
5992   },
5993   {
5994     Yandroid_w,                         FALSE,  FALSE,
5995     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_LEFT
5996   },
5997   {
5998     Yandroid_wB,                        FALSE,  TRUE,
5999     EL_EMC_ANDROID,                     ACTION_MOVING, MV_BIT_LEFT
6000   },
6001   {
6002     Yandroid_nw,                        FALSE,  FALSE,
6003     EL_EMC_ANDROID,                     ACTION_GROWING, MV_BIT_UPLEFT
6004   },
6005   {
6006     Yandroid_nwB,                       FALSE,  TRUE,
6007     EL_EMC_ANDROID,                     ACTION_SHRINKING, MV_BIT_UPLEFT
6008   },
6009
6010   {
6011     Xeater_n,                           TRUE,   FALSE,
6012     EL_YAMYAM_UP,                       -1, -1
6013   },
6014   {
6015     Xeater_e,                           TRUE,   FALSE,
6016     EL_YAMYAM_RIGHT,                    -1, -1
6017   },
6018   {
6019     Xeater_w,                           TRUE,   FALSE,
6020     EL_YAMYAM_LEFT,                     -1, -1
6021   },
6022   {
6023     Xeater_s,                           TRUE,   FALSE,
6024     EL_YAMYAM_DOWN,                     -1, -1
6025   },
6026   {
6027     Yeater_n,                           FALSE,  FALSE,
6028     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_UP
6029   },
6030   {
6031     Yeater_nB,                          FALSE,  TRUE,
6032     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_UP
6033   },
6034   {
6035     Yeater_e,                           FALSE,  FALSE,
6036     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_RIGHT
6037   },
6038   {
6039     Yeater_eB,                          FALSE,  TRUE,
6040     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_RIGHT
6041   },
6042   {
6043     Yeater_s,                           FALSE,  FALSE,
6044     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_DOWN
6045   },
6046   {
6047     Yeater_sB,                          FALSE,  TRUE,
6048     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_DOWN
6049   },
6050   {
6051     Yeater_w,                           FALSE,  FALSE,
6052     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_LEFT
6053   },
6054   {
6055     Yeater_wB,                          FALSE,  TRUE,
6056     EL_YAMYAM,                          ACTION_MOVING, MV_BIT_LEFT
6057   },
6058   {
6059     Yeater_stone,                       FALSE,  FALSE,
6060     EL_YAMYAM,                          ACTION_SMASHED_BY_ROCK, -1
6061   },
6062   {
6063     Yeater_spring,                      FALSE,  FALSE,
6064     EL_YAMYAM,                          ACTION_SMASHED_BY_SPRING, -1
6065   },
6066
6067   {
6068     Xalien,                             TRUE,   FALSE,
6069     EL_ROBOT,                           -1, -1
6070   },
6071   {
6072     Xalien_pause,                       FALSE,  FALSE,
6073     EL_ROBOT,                           -1, -1
6074   },
6075   {
6076     Yalien_n,                           FALSE,  FALSE,
6077     EL_ROBOT,                           ACTION_MOVING, MV_BIT_UP
6078   },
6079   {
6080     Yalien_nB,                          FALSE,  TRUE,
6081     EL_ROBOT,                           ACTION_MOVING, MV_BIT_UP
6082   },
6083   {
6084     Yalien_e,                           FALSE,  FALSE,
6085     EL_ROBOT,                           ACTION_MOVING, MV_BIT_RIGHT
6086   },
6087   {
6088     Yalien_eB,                          FALSE,  TRUE,
6089     EL_ROBOT,                           ACTION_MOVING, MV_BIT_RIGHT
6090   },
6091   {
6092     Yalien_s,                           FALSE,  FALSE,
6093     EL_ROBOT,                           ACTION_MOVING, MV_BIT_DOWN
6094   },
6095   {
6096     Yalien_sB,                          FALSE,  TRUE,
6097     EL_ROBOT,                           ACTION_MOVING, MV_BIT_DOWN
6098   },
6099   {
6100     Yalien_w,                           FALSE,  FALSE,
6101     EL_ROBOT,                           ACTION_MOVING, MV_BIT_LEFT
6102   },
6103   {
6104     Yalien_wB,                          FALSE,  TRUE,
6105     EL_ROBOT,                           ACTION_MOVING, MV_BIT_LEFT
6106   },
6107   {
6108     Yalien_stone,                       FALSE,  FALSE,
6109     EL_ROBOT,                           ACTION_SMASHED_BY_ROCK, -1
6110   },
6111   {
6112     Yalien_spring,                      FALSE,  FALSE,
6113     EL_ROBOT,                           ACTION_SMASHED_BY_SPRING, -1
6114   },
6115
6116   {
6117     Xbug_1_n,                           TRUE,   FALSE,
6118     EL_BUG_UP,                          -1, -1
6119   },
6120   {
6121     Xbug_1_e,                           TRUE,   FALSE,
6122     EL_BUG_RIGHT,                       -1, -1
6123   },
6124   {
6125     Xbug_1_s,                           TRUE,   FALSE,
6126     EL_BUG_DOWN,                        -1, -1
6127   },
6128   {
6129     Xbug_1_w,                           TRUE,   FALSE,
6130     EL_BUG_LEFT,                        -1, -1
6131   },
6132   {
6133     Xbug_2_n,                           FALSE,  FALSE,
6134     EL_BUG_UP,                          -1, -1
6135   },
6136   {
6137     Xbug_2_e,                           FALSE,  FALSE,
6138     EL_BUG_RIGHT,                       -1, -1
6139   },
6140   {
6141     Xbug_2_s,                           FALSE,  FALSE,
6142     EL_BUG_DOWN,                        -1, -1
6143   },
6144   {
6145     Xbug_2_w,                           FALSE,  FALSE,
6146     EL_BUG_LEFT,                        -1, -1
6147   },
6148   {
6149     Ybug_n,                             FALSE,  FALSE,
6150     EL_BUG,                             ACTION_MOVING, MV_BIT_UP
6151   },
6152   {
6153     Ybug_nB,                            FALSE,  TRUE,
6154     EL_BUG,                             ACTION_MOVING, MV_BIT_UP
6155   },
6156   {
6157     Ybug_e,                             FALSE,  FALSE,
6158     EL_BUG,                             ACTION_MOVING, MV_BIT_RIGHT
6159   },
6160   {
6161     Ybug_eB,                            FALSE,  TRUE,
6162     EL_BUG,                             ACTION_MOVING, MV_BIT_RIGHT
6163   },
6164   {
6165     Ybug_s,                             FALSE,  FALSE,
6166     EL_BUG,                             ACTION_MOVING, MV_BIT_DOWN
6167   },
6168   {
6169     Ybug_sB,                            FALSE,  TRUE,
6170     EL_BUG,                             ACTION_MOVING, MV_BIT_DOWN
6171   },
6172   {
6173     Ybug_w,                             FALSE,  FALSE,
6174     EL_BUG,                             ACTION_MOVING, MV_BIT_LEFT
6175   },
6176   {
6177     Ybug_wB,                            FALSE,  TRUE,
6178     EL_BUG,                             ACTION_MOVING, MV_BIT_LEFT
6179   },
6180   {
6181     Ybug_w_n,                           FALSE,  FALSE,
6182     EL_BUG,                             ACTION_TURNING_FROM_LEFT, MV_BIT_UP
6183   },
6184   {
6185     Ybug_n_e,                           FALSE,  FALSE,
6186     EL_BUG,                             ACTION_TURNING_FROM_UP, MV_BIT_RIGHT
6187   },
6188   {
6189     Ybug_e_s,                           FALSE,  FALSE,
6190     EL_BUG,                             ACTION_TURNING_FROM_RIGHT, MV_BIT_DOWN
6191   },
6192   {
6193     Ybug_s_w,                           FALSE,  FALSE,
6194     EL_BUG,                             ACTION_TURNING_FROM_DOWN, MV_BIT_LEFT
6195   },
6196   {
6197     Ybug_e_n,                           FALSE,  FALSE,
6198     EL_BUG,                             ACTION_TURNING_FROM_RIGHT, MV_BIT_UP
6199   },
6200   {
6201     Ybug_s_e,                           FALSE,  FALSE,
6202     EL_BUG,                             ACTION_TURNING_FROM_DOWN, MV_BIT_RIGHT
6203   },
6204   {
6205     Ybug_w_s,                           FALSE,  FALSE,
6206     EL_BUG,                             ACTION_TURNING_FROM_LEFT, MV_BIT_DOWN
6207   },
6208   {
6209     Ybug_n_w,                           FALSE,  FALSE,
6210     EL_BUG,                             ACTION_TURNING_FROM_UP, MV_BIT_LEFT
6211   },
6212   {
6213     Ybug_stone,                         FALSE,  FALSE,
6214     EL_BUG,                             ACTION_SMASHED_BY_ROCK, -1
6215   },
6216   {
6217     Ybug_spring,                        FALSE,  FALSE,
6218     EL_BUG,                             ACTION_SMASHED_BY_SPRING, -1
6219   },
6220
6221   {
6222     Xtank_1_n,                          TRUE,   FALSE,
6223     EL_SPACESHIP_UP,                    -1, -1
6224   },
6225   {
6226     Xtank_1_e,                          TRUE,   FALSE,
6227     EL_SPACESHIP_RIGHT,                 -1, -1
6228   },
6229   {
6230     Xtank_1_s,                          TRUE,   FALSE,
6231     EL_SPACESHIP_DOWN,                  -1, -1
6232   },
6233   {
6234     Xtank_1_w,                          TRUE,   FALSE,
6235     EL_SPACESHIP_LEFT,                  -1, -1
6236   },
6237   {
6238     Xtank_2_n,                          FALSE,  FALSE,
6239     EL_SPACESHIP_UP,                    -1, -1
6240   },
6241   {
6242     Xtank_2_e,                          FALSE,  FALSE,
6243     EL_SPACESHIP_RIGHT,                 -1, -1
6244   },
6245   {
6246     Xtank_2_s,                          FALSE,  FALSE,
6247     EL_SPACESHIP_DOWN,                  -1, -1
6248   },
6249   {
6250     Xtank_2_w,                          FALSE,  FALSE,
6251     EL_SPACESHIP_LEFT,                  -1, -1
6252   },
6253   {
6254     Ytank_n,                            FALSE,  FALSE,
6255     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_UP
6256   },
6257   {
6258     Ytank_nB,                           FALSE,  TRUE,
6259     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_UP
6260   },
6261   {
6262     Ytank_e,                            FALSE,  FALSE,
6263     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_RIGHT
6264   },
6265   {
6266     Ytank_eB,                           FALSE,  TRUE,
6267     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_RIGHT
6268   },
6269   {
6270     Ytank_s,                            FALSE,  FALSE,
6271     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_DOWN
6272   },
6273   {
6274     Ytank_sB,                           FALSE,  TRUE,
6275     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_DOWN
6276   },
6277   {
6278     Ytank_w,                            FALSE,  FALSE,
6279     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_LEFT
6280   },
6281   {
6282     Ytank_wB,                           FALSE,  TRUE,
6283     EL_SPACESHIP,                       ACTION_MOVING, MV_BIT_LEFT
6284   },
6285   {
6286     Ytank_w_n,                          FALSE,  FALSE,
6287     EL_SPACESHIP,                       ACTION_TURNING_FROM_LEFT, MV_BIT_UP
6288   },
6289   {
6290     Ytank_n_e,                          FALSE,  FALSE,
6291     EL_SPACESHIP,                       ACTION_TURNING_FROM_UP, MV_BIT_RIGHT
6292   },
6293   {
6294     Ytank_e_s,                          FALSE,  FALSE,
6295     EL_SPACESHIP,                       ACTION_TURNING_FROM_RIGHT, MV_BIT_DOWN
6296   },
6297   {
6298     Ytank_s_w,                          FALSE,  FALSE,
6299     EL_SPACESHIP,                       ACTION_TURNING_FROM_DOWN, MV_BIT_LEFT
6300   },
6301   {
6302     Ytank_e_n,                          FALSE,  FALSE,
6303     EL_SPACESHIP,                       ACTION_TURNING_FROM_RIGHT, MV_BIT_UP
6304   },
6305   {
6306     Ytank_s_e,                          FALSE,  FALSE,
6307     EL_SPACESHIP,                       ACTION_TURNING_FROM_DOWN, MV_BIT_RIGHT
6308   },
6309   {
6310     Ytank_w_s,                          FALSE,  FALSE,
6311     EL_SPACESHIP,                       ACTION_TURNING_FROM_LEFT, MV_BIT_DOWN
6312   },
6313   {
6314     Ytank_n_w,                          FALSE,  FALSE,
6315     EL_SPACESHIP,                       ACTION_TURNING_FROM_UP, MV_BIT_LEFT
6316   },
6317   {
6318     Ytank_stone,                        FALSE,  FALSE,
6319     EL_SPACESHIP,                       ACTION_SMASHED_BY_ROCK, -1
6320   },
6321   {
6322     Ytank_spring,                       FALSE,  FALSE,
6323     EL_SPACESHIP,                       ACTION_SMASHED_BY_SPRING, -1
6324   },
6325
6326   {
6327     Xemerald,                           TRUE,   FALSE,
6328     EL_EMERALD,                         -1, -1
6329   },
6330   {
6331     Xemerald_pause,                     FALSE,  FALSE,
6332     EL_EMERALD,                         -1, -1
6333   },
6334   {
6335     Xemerald_fall,                      FALSE,  FALSE,
6336     EL_EMERALD,                         -1, -1
6337   },
6338   {
6339     Xemerald_shine,                     FALSE,  FALSE,
6340     EL_EMERALD,                         ACTION_TWINKLING, -1
6341   },
6342   {
6343     Yemerald_s,                         FALSE,  FALSE,
6344     EL_EMERALD,                         ACTION_FALLING, -1
6345   },
6346   {
6347     Yemerald_sB,                        FALSE,  TRUE,
6348     EL_EMERALD,                         ACTION_FALLING, -1
6349   },
6350   {
6351     Yemerald_e,                         FALSE,  FALSE,
6352     EL_EMERALD,                         ACTION_MOVING, MV_BIT_RIGHT
6353   },
6354   {
6355     Yemerald_eB,                        FALSE,  TRUE,
6356     EL_EMERALD,                         ACTION_MOVING, MV_BIT_RIGHT
6357   },
6358   {
6359     Yemerald_w,                         FALSE,  FALSE,
6360     EL_EMERALD,                         ACTION_MOVING, MV_BIT_LEFT
6361   },
6362   {
6363     Yemerald_wB,                        FALSE,  TRUE,
6364     EL_EMERALD,                         ACTION_MOVING, MV_BIT_LEFT
6365   },
6366   {
6367     Yemerald_blank,                     FALSE,  FALSE,
6368     EL_EMERALD,                         ACTION_COLLECTING, -1
6369   },
6370
6371   {
6372     Xdiamond,                           TRUE,   FALSE,
6373     EL_DIAMOND,                         -1, -1
6374   },
6375   {
6376     Xdiamond_pause,                     FALSE,  FALSE,
6377     EL_DIAMOND,                         -1, -1
6378   },
6379   {
6380     Xdiamond_fall,                      FALSE,  FALSE,
6381     EL_DIAMOND,                         -1, -1
6382   },
6383   {
6384     Xdiamond_shine,                     FALSE,  FALSE,
6385     EL_DIAMOND,                         ACTION_TWINKLING, -1
6386   },
6387   {
6388     Ydiamond_s,                         FALSE,  FALSE,
6389     EL_DIAMOND,                         ACTION_FALLING, -1
6390   },
6391   {
6392     Ydiamond_sB,                        FALSE,  TRUE,
6393     EL_DIAMOND,                         ACTION_FALLING, -1
6394   },
6395   {
6396     Ydiamond_e,                         FALSE,  FALSE,
6397     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_RIGHT
6398   },
6399   {
6400     Ydiamond_eB,                        FALSE,  TRUE,
6401     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_RIGHT
6402   },
6403   {
6404     Ydiamond_w,                         FALSE,  FALSE,
6405     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_LEFT
6406   },
6407   {
6408     Ydiamond_wB,                        FALSE,  TRUE,
6409     EL_DIAMOND,                         ACTION_MOVING, MV_BIT_LEFT
6410   },
6411   {
6412     Ydiamond_blank,                     FALSE,  FALSE,
6413     EL_DIAMOND,                         ACTION_COLLECTING, -1
6414   },
6415   {
6416     Ydiamond_stone,                     FALSE,  FALSE,
6417     EL_DIAMOND,                         ACTION_SMASHED_BY_ROCK, -1
6418   },
6419
6420   {
6421     Xstone,                             TRUE,   FALSE,
6422     EL_ROCK,                            -1, -1
6423   },
6424   {
6425     Xstone_pause,                       FALSE,  FALSE,
6426     EL_ROCK,                            -1, -1
6427   },
6428   {
6429     Xstone_fall,                        FALSE,  FALSE,
6430     EL_ROCK,                            -1, -1
6431   },
6432   {
6433     Ystone_s,                           FALSE,  FALSE,
6434     EL_ROCK,                            ACTION_FALLING, -1
6435   },
6436   {
6437     Ystone_sB,                          FALSE,  TRUE,
6438     EL_ROCK,                            ACTION_FALLING, -1
6439   },
6440   {
6441     Ystone_e,                           FALSE,  FALSE,
6442     EL_ROCK,                            ACTION_MOVING, MV_BIT_RIGHT
6443   },
6444   {
6445     Ystone_eB,                          FALSE,  TRUE,
6446     EL_ROCK,                            ACTION_MOVING, MV_BIT_RIGHT
6447   },
6448   {
6449     Ystone_w,                           FALSE,  FALSE,
6450     EL_ROCK,                            ACTION_MOVING, MV_BIT_LEFT
6451   },
6452   {
6453     Ystone_wB,                          FALSE,  TRUE,
6454     EL_ROCK,                            ACTION_MOVING, MV_BIT_LEFT
6455   },
6456
6457   {
6458     Xbomb,                              TRUE,   FALSE,
6459     EL_BOMB,                            -1, -1
6460   },
6461   {
6462     Xbomb_pause,                        FALSE,  FALSE,
6463     EL_BOMB,                            -1, -1
6464   },
6465   {
6466     Xbomb_fall,                         FALSE,  FALSE,
6467     EL_BOMB,                            -1, -1
6468   },
6469   {
6470     Ybomb_s,                            FALSE,  FALSE,
6471     EL_BOMB,                            ACTION_FALLING, -1
6472   },
6473   {
6474     Ybomb_sB,                           FALSE,  TRUE,
6475     EL_BOMB,                            ACTION_FALLING, -1
6476   },
6477   {
6478     Ybomb_e,                            FALSE,  FALSE,
6479     EL_BOMB,                            ACTION_MOVING, MV_BIT_RIGHT
6480   },
6481   {
6482     Ybomb_eB,                           FALSE,  TRUE,
6483     EL_BOMB,                            ACTION_MOVING, MV_BIT_RIGHT
6484   },
6485   {
6486     Ybomb_w,                            FALSE,  FALSE,
6487     EL_BOMB,                            ACTION_MOVING, MV_BIT_LEFT
6488   },
6489   {
6490     Ybomb_wB,                           FALSE,  TRUE,
6491     EL_BOMB,                            ACTION_MOVING, MV_BIT_LEFT
6492   },
6493   {
6494     Ybomb_blank,                        FALSE,  FALSE,
6495     EL_BOMB,                            ACTION_ACTIVATING, -1
6496   },
6497
6498   {
6499     Xnut,                               TRUE,   FALSE,
6500     EL_NUT,                             -1, -1
6501   },
6502   {
6503     Xnut_pause,                         FALSE,  FALSE,
6504     EL_NUT,                             -1, -1
6505   },
6506   {
6507     Xnut_fall,                          FALSE,  FALSE,
6508     EL_NUT,                             -1, -1
6509   },
6510   {
6511     Ynut_s,                             FALSE,  FALSE,
6512     EL_NUT,                             ACTION_FALLING, -1
6513   },
6514   {
6515     Ynut_sB,                            FALSE,  TRUE,
6516     EL_NUT,                             ACTION_FALLING, -1
6517   },
6518   {
6519     Ynut_e,                             FALSE,  FALSE,
6520     EL_NUT,                             ACTION_MOVING, MV_BIT_RIGHT
6521   },
6522   {
6523     Ynut_eB,                            FALSE,  TRUE,
6524     EL_NUT,                             ACTION_MOVING, MV_BIT_RIGHT
6525   },
6526   {
6527     Ynut_w,                             FALSE,  FALSE,
6528     EL_NUT,                             ACTION_MOVING, MV_BIT_LEFT
6529   },
6530   {
6531     Ynut_wB,                            FALSE,  TRUE,
6532     EL_NUT,                             ACTION_MOVING, MV_BIT_LEFT
6533   },
6534   {
6535     Ynut_stone,                         FALSE,  FALSE,
6536     EL_NUT,                             ACTION_BREAKING, -1
6537   },
6538
6539   {
6540     Xspring,                            TRUE,   FALSE,
6541     EL_SPRING,                          -1, -1
6542   },
6543   {
6544     Xspring_pause,                      FALSE,  FALSE,
6545     EL_SPRING,                          -1, -1
6546   },
6547   {
6548     Xspring_e,                          TRUE,   FALSE,
6549     EL_SPRING_RIGHT,                    -1, -1
6550   },
6551   {
6552     Xspring_w,                          TRUE,   FALSE,
6553     EL_SPRING_LEFT,                     -1, -1
6554   },
6555   {
6556     Xspring_fall,                       FALSE,  FALSE,
6557     EL_SPRING,                          -1, -1
6558   },
6559   {
6560     Yspring_s,                          FALSE,  FALSE,
6561     EL_SPRING,                          ACTION_FALLING, -1
6562   },
6563   {
6564     Yspring_sB,                         FALSE,  TRUE,
6565     EL_SPRING,                          ACTION_FALLING, -1
6566   },
6567   {
6568     Yspring_e,                          FALSE,  FALSE,
6569     EL_SPRING,                          ACTION_MOVING, MV_BIT_RIGHT
6570   },
6571   {
6572     Yspring_eB,                         FALSE,  TRUE,
6573     EL_SPRING,                          ACTION_MOVING, MV_BIT_RIGHT
6574   },
6575   {
6576     Yspring_w,                          FALSE,  FALSE,
6577     EL_SPRING,                          ACTION_MOVING, MV_BIT_LEFT
6578   },
6579   {
6580     Yspring_wB,                         FALSE,  TRUE,
6581     EL_SPRING,                          ACTION_MOVING, MV_BIT_LEFT
6582   },
6583   {
6584     Yspring_alien_e,                    FALSE,  FALSE,
6585     EL_SPRING,                          ACTION_EATING, MV_BIT_RIGHT
6586   },
6587   {
6588     Yspring_alien_eB,                   FALSE,  TRUE,
6589     EL_SPRING,                          ACTION_EATING, MV_BIT_RIGHT
6590   },
6591   {
6592     Yspring_alien_w,                    FALSE,  FALSE,
6593     EL_SPRING,                          ACTION_EATING, MV_BIT_LEFT
6594   },
6595   {
6596     Yspring_alien_wB,                   FALSE,  TRUE,
6597     EL_SPRING,                          ACTION_EATING, MV_BIT_LEFT
6598   },
6599
6600   {
6601     Xpush_emerald_e,                    FALSE,  FALSE,
6602     EL_EMERALD,                         -1, MV_BIT_RIGHT
6603   },
6604   {
6605     Xpush_emerald_w,                    FALSE,  FALSE,
6606     EL_EMERALD,                         -1, MV_BIT_LEFT
6607   },
6608   {
6609     Xpush_diamond_e,                    FALSE,  FALSE,
6610     EL_DIAMOND,                         -1, MV_BIT_RIGHT
6611   },
6612   {
6613     Xpush_diamond_w,                    FALSE,  FALSE,
6614     EL_DIAMOND,                         -1, MV_BIT_LEFT
6615   },
6616   {
6617     Xpush_stone_e,                      FALSE,  FALSE,
6618     EL_ROCK,                            -1, MV_BIT_RIGHT
6619   },
6620   {
6621     Xpush_stone_w,                      FALSE,  FALSE,
6622     EL_ROCK,                            -1, MV_BIT_LEFT
6623   },
6624   {
6625     Xpush_bomb_e,                       FALSE,  FALSE,
6626     EL_BOMB,                            -1, MV_BIT_RIGHT
6627   },
6628   {
6629     Xpush_bomb_w,                       FALSE,  FALSE,
6630     EL_BOMB,                            -1, MV_BIT_LEFT
6631   },
6632   {
6633     Xpush_nut_e,                        FALSE,  FALSE,
6634     EL_NUT,                             -1, MV_BIT_RIGHT
6635   },
6636   {
6637     Xpush_nut_w,                        FALSE,  FALSE,
6638     EL_NUT,                             -1, MV_BIT_LEFT
6639   },
6640   {
6641     Xpush_spring_e,                     FALSE,  FALSE,
6642     EL_SPRING_RIGHT,                    -1, MV_BIT_RIGHT
6643   },
6644   {
6645     Xpush_spring_w,                     FALSE,  FALSE,
6646     EL_SPRING_LEFT,                     -1, MV_BIT_LEFT
6647   },
6648
6649   {
6650     Xdynamite,                          TRUE,   FALSE,
6651     EL_EM_DYNAMITE,                     -1, -1
6652   },
6653   {
6654     Ydynamite_blank,                    FALSE,  FALSE,
6655     EL_EM_DYNAMITE,                     ACTION_COLLECTING, -1
6656   },
6657   {
6658     Xdynamite_1,                        TRUE,   FALSE,
6659     EL_EM_DYNAMITE_ACTIVE,              -1, -1
6660   },
6661   {
6662     Xdynamite_2,                        FALSE,  FALSE,
6663     EL_EM_DYNAMITE_ACTIVE,              -1, -1
6664   },
6665   {
6666     Xdynamite_3,                        FALSE,  FALSE,
6667     EL_EM_DYNAMITE_ACTIVE,              -1, -1
6668   },
6669   {
6670     Xdynamite_4,                        FALSE,  FALSE,
6671     EL_EM_DYNAMITE_ACTIVE,              -1, -1
6672   },
6673
6674   {
6675     Xkey_1,                             TRUE,   FALSE,
6676     EL_EM_KEY_1,                        -1, -1
6677   },
6678   {
6679     Xkey_2,                             TRUE,   FALSE,
6680     EL_EM_KEY_2,                        -1, -1
6681   },
6682   {
6683     Xkey_3,                             TRUE,   FALSE,
6684     EL_EM_KEY_3,                        -1, -1
6685   },
6686   {
6687     Xkey_4,                             TRUE,   FALSE,
6688     EL_EM_KEY_4,                        -1, -1
6689   },
6690   {
6691     Xkey_5,                             TRUE,   FALSE,
6692     EL_EMC_KEY_5,                       -1, -1
6693   },
6694   {
6695     Xkey_6,                             TRUE,   FALSE,
6696     EL_EMC_KEY_6,                       -1, -1
6697   },
6698   {
6699     Xkey_7,                             TRUE,   FALSE,
6700     EL_EMC_KEY_7,                       -1, -1
6701   },
6702   {
6703     Xkey_8,                             TRUE,   FALSE,
6704     EL_EMC_KEY_8,                       -1, -1
6705   },
6706
6707   {
6708     Xdoor_1,                            TRUE,   FALSE,
6709     EL_EM_GATE_1,                       -1, -1
6710   },
6711   {
6712     Xdoor_2,                            TRUE,   FALSE,
6713     EL_EM_GATE_2,                       -1, -1
6714   },
6715   {
6716     Xdoor_3,                            TRUE,   FALSE,
6717     EL_EM_GATE_3,                       -1, -1
6718   },
6719   {
6720     Xdoor_4,                            TRUE,   FALSE,
6721     EL_EM_GATE_4,                       -1, -1
6722   },
6723   {
6724     Xdoor_5,                            TRUE,   FALSE,
6725     EL_EMC_GATE_5,                      -1, -1
6726   },
6727   {
6728     Xdoor_6,                            TRUE,   FALSE,
6729     EL_EMC_GATE_6,                      -1, -1
6730   },
6731   {
6732     Xdoor_7,                            TRUE,   FALSE,
6733     EL_EMC_GATE_7,                      -1, -1
6734   },
6735   {
6736     Xdoor_8,                            TRUE,   FALSE,
6737     EL_EMC_GATE_8,                      -1, -1
6738   },
6739
6740   {
6741     Xfake_door_1,                       TRUE,   FALSE,
6742     EL_EM_GATE_1_GRAY,                  -1, -1
6743   },
6744   {
6745     Xfake_door_2,                       TRUE,   FALSE,
6746     EL_EM_GATE_2_GRAY,                  -1, -1
6747   },
6748   {
6749     Xfake_door_3,                       TRUE,   FALSE,
6750     EL_EM_GATE_3_GRAY,                  -1, -1
6751   },
6752   {
6753     Xfake_door_4,                       TRUE,   FALSE,
6754     EL_EM_GATE_4_GRAY,                  -1, -1
6755   },
6756   {
6757     Xfake_door_5,                       TRUE,   FALSE,
6758     EL_EMC_GATE_5_GRAY,                 -1, -1
6759   },
6760   {
6761     Xfake_door_6,                       TRUE,   FALSE,
6762     EL_EMC_GATE_6_GRAY,                 -1, -1
6763   },
6764   {
6765     Xfake_door_7,                       TRUE,   FALSE,
6766     EL_EMC_GATE_7_GRAY,                 -1, -1
6767   },
6768   {
6769     Xfake_door_8,                       TRUE,   FALSE,
6770     EL_EMC_GATE_8_GRAY,                 -1, -1
6771   },
6772
6773   {
6774     Xballoon,                           TRUE,   FALSE,
6775     EL_BALLOON,                         -1, -1
6776   },
6777   {
6778     Yballoon_n,                         FALSE,  FALSE,
6779     EL_BALLOON,                         ACTION_MOVING, MV_BIT_UP
6780   },
6781   {
6782     Yballoon_nB,                        FALSE,  TRUE,
6783     EL_BALLOON,                         ACTION_MOVING, MV_BIT_UP
6784   },
6785   {
6786     Yballoon_e,                         FALSE,  FALSE,
6787     EL_BALLOON,                         ACTION_MOVING, MV_BIT_RIGHT
6788   },
6789   {
6790     Yballoon_eB,                        FALSE,  TRUE,
6791     EL_BALLOON,                         ACTION_MOVING, MV_BIT_RIGHT
6792   },
6793   {
6794     Yballoon_s,                         FALSE,  FALSE,
6795     EL_BALLOON,                         ACTION_MOVING, MV_BIT_DOWN
6796   },
6797   {
6798     Yballoon_sB,                        FALSE,  TRUE,
6799     EL_BALLOON,                         ACTION_MOVING, MV_BIT_DOWN
6800   },
6801   {
6802     Yballoon_w,                         FALSE,  FALSE,
6803     EL_BALLOON,                         ACTION_MOVING, MV_BIT_LEFT
6804   },
6805   {
6806     Yballoon_wB,                        FALSE,  TRUE,
6807     EL_BALLOON,                         ACTION_MOVING, MV_BIT_LEFT
6808   },
6809
6810   {
6811     Xball_1,                            TRUE,   FALSE,
6812     EL_EMC_MAGIC_BALL,                  -1, -1
6813   },
6814   {
6815     Yball_1,                            FALSE,  FALSE,
6816     EL_EMC_MAGIC_BALL,                  ACTION_ACTIVE, -1
6817   },
6818   {
6819     Xball_2,                            FALSE,  FALSE,
6820     EL_EMC_MAGIC_BALL,                  ACTION_ACTIVE, -1
6821   },
6822   {
6823     Yball_2,                            FALSE,  FALSE,
6824     EL_EMC_MAGIC_BALL,                  ACTION_ACTIVE, -1
6825   },
6826   {
6827     Yball_blank,                        FALSE,  FALSE,
6828     EL_EMC_MAGIC_BALL,                  ACTION_DROPPING, -1
6829   },
6830
6831   {
6832     Xamoeba_1,                          TRUE,   FALSE,
6833     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
6834   },
6835   {
6836     Xamoeba_2,                          FALSE,  FALSE,
6837     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
6838   },
6839   {
6840     Xamoeba_3,                          FALSE,  FALSE,
6841     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
6842   },
6843   {
6844     Xamoeba_4,                          FALSE,  FALSE,
6845     EL_AMOEBA_DRY,                      ACTION_OTHER, -1
6846   },
6847   {
6848     Xamoeba_5,                          TRUE,   FALSE,
6849     EL_AMOEBA_WET,                      ACTION_OTHER, -1
6850   },
6851   {
6852     Xamoeba_6,                          FALSE,  FALSE,
6853     EL_AMOEBA_WET,                      ACTION_OTHER, -1
6854   },
6855   {
6856     Xamoeba_7,                          FALSE,  FALSE,
6857     EL_AMOEBA_WET,                      ACTION_OTHER, -1
6858   },
6859   {
6860     Xamoeba_8,                          FALSE,  FALSE,
6861     EL_AMOEBA_WET,                      ACTION_OTHER, -1
6862   },
6863
6864   {
6865     Xdrip,                              TRUE,   FALSE,
6866     EL_AMOEBA_DROP,                     ACTION_GROWING, -1
6867   },
6868   {
6869     Xdrip_fall,                         FALSE,  FALSE,
6870     EL_AMOEBA_DROP,                     -1, -1
6871   },
6872   {
6873     Xdrip_stretch,                      FALSE,  FALSE,
6874     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
6875   },
6876   {
6877     Xdrip_stretchB,                     FALSE,  TRUE,
6878     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
6879   },
6880   {
6881     Ydrip_1_s,                          FALSE,  FALSE,
6882     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
6883   },
6884   {
6885     Ydrip_1_sB,                         FALSE,  TRUE,
6886     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
6887   },
6888   {
6889     Ydrip_2_s,                          FALSE,  FALSE,
6890     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
6891   },
6892   {
6893     Ydrip_2_sB,                         FALSE,  TRUE,
6894     EL_AMOEBA_DROP,                     ACTION_FALLING, -1
6895   },
6896
6897   {
6898     Xwonderwall,                        TRUE,   FALSE,
6899     EL_MAGIC_WALL,                      -1, -1
6900   },
6901   {
6902     Ywonderwall,                        FALSE,  FALSE,
6903     EL_MAGIC_WALL,                      ACTION_ACTIVE, -1
6904   },
6905
6906   {
6907     Xwheel,                             TRUE,   FALSE,
6908     EL_ROBOT_WHEEL,                     -1, -1
6909   },
6910   {
6911     Ywheel,                             FALSE,  FALSE,
6912     EL_ROBOT_WHEEL,                     ACTION_ACTIVE, -1
6913   },
6914
6915   {
6916     Xswitch,                            TRUE,   FALSE,
6917     EL_EMC_MAGIC_BALL_SWITCH,           -1, -1
6918   },
6919   {
6920     Yswitch,                            FALSE,  FALSE,
6921     EL_EMC_MAGIC_BALL_SWITCH,           ACTION_ACTIVE, -1
6922   },
6923
6924   {
6925     Xbumper,                            TRUE,   FALSE,
6926     EL_EMC_SPRING_BUMPER,               -1, -1
6927   },
6928   {
6929     Ybumper,                            FALSE,  FALSE,
6930     EL_EMC_SPRING_BUMPER,               ACTION_ACTIVE, -1
6931   },
6932
6933   {
6934     Xacid_nw,                           TRUE,   FALSE,
6935     EL_ACID_POOL_TOPLEFT,               -1, -1
6936   },
6937   {
6938     Xacid_ne,                           TRUE,   FALSE,
6939     EL_ACID_POOL_TOPRIGHT,              -1, -1
6940   },
6941   {
6942     Xacid_sw,                           TRUE,   FALSE,
6943     EL_ACID_POOL_BOTTOMLEFT,            -1, -1
6944   },
6945   {
6946     Xacid_s,                            TRUE,   FALSE,
6947     EL_ACID_POOL_BOTTOM,                -1, -1
6948   },
6949   {
6950     Xacid_se,                           TRUE,   FALSE,
6951     EL_ACID_POOL_BOTTOMRIGHT,           -1, -1
6952   },
6953
6954   {
6955     Xfake_blank,                        TRUE,   FALSE,
6956     EL_INVISIBLE_WALL,                  -1, -1
6957   },
6958   {
6959     Yfake_blank,                        FALSE,  FALSE,
6960     EL_INVISIBLE_WALL,                  ACTION_ACTIVE, -1
6961   },
6962
6963   {
6964     Xfake_grass,                        TRUE,   FALSE,
6965     EL_EMC_FAKE_GRASS,                  -1, -1
6966   },
6967   {
6968     Yfake_grass,                        FALSE,  FALSE,
6969     EL_EMC_FAKE_GRASS,                  ACTION_ACTIVE, -1
6970   },
6971
6972   {
6973     Xfake_amoeba,                       TRUE,   FALSE,
6974     EL_EMC_DRIPPER,                     -1, -1
6975   },
6976   {
6977     Yfake_amoeba,                       FALSE,  FALSE,
6978     EL_EMC_DRIPPER,                     ACTION_ACTIVE, -1
6979   },
6980
6981   {
6982     Xlenses,                            TRUE,   FALSE,
6983     EL_EMC_LENSES,                      -1, -1
6984   },
6985
6986   {
6987     Xmagnify,                           TRUE,   FALSE,
6988     EL_EMC_MAGNIFIER,                   -1, -1
6989   },
6990
6991   {
6992     Xsand,                              TRUE,   FALSE,
6993     EL_QUICKSAND_EMPTY,                 -1, -1
6994   },
6995   {
6996     Xsand_stone,                        TRUE,   FALSE,
6997     EL_QUICKSAND_FULL,                  -1, -1
6998   },
6999   {
7000     Xsand_stonein_1,                    FALSE,  TRUE,
7001     EL_ROCK,                            ACTION_FILLING, -1
7002   },
7003   {
7004     Xsand_stonein_2,                    FALSE,  TRUE,
7005     EL_ROCK,                            ACTION_FILLING, -1
7006   },
7007   {
7008     Xsand_stonein_3,                    FALSE,  TRUE,
7009     EL_ROCK,                            ACTION_FILLING, -1
7010   },
7011   {
7012     Xsand_stonein_4,                    FALSE,  TRUE,
7013     EL_ROCK,                            ACTION_FILLING, -1
7014   },
7015   {
7016     Xsand_sandstone_1,                  FALSE,  FALSE,
7017     EL_QUICKSAND_FILLING,               -1, -1
7018   },
7019   {
7020     Xsand_sandstone_2,                  FALSE,  FALSE,
7021     EL_QUICKSAND_FILLING,               -1, -1
7022   },
7023   {
7024     Xsand_sandstone_3,                  FALSE,  FALSE,
7025     EL_QUICKSAND_FILLING,               -1, -1
7026   },
7027   {
7028     Xsand_sandstone_4,                  FALSE,  FALSE,
7029     EL_QUICKSAND_FILLING,               -1, -1
7030   },
7031   {
7032     Xsand_stonesand_1,                  FALSE,  FALSE,
7033     EL_QUICKSAND_EMPTYING,              -1, -1
7034   },
7035   {
7036     Xsand_stonesand_2,                  FALSE,  FALSE,
7037     EL_QUICKSAND_EMPTYING,              -1, -1
7038   },
7039   {
7040     Xsand_stonesand_3,                  FALSE,  FALSE,
7041     EL_QUICKSAND_EMPTYING,              -1, -1
7042   },
7043   {
7044     Xsand_stonesand_4,                  FALSE,  FALSE,
7045     EL_QUICKSAND_EMPTYING,              -1, -1
7046   },
7047   {
7048     Xsand_stoneout_1,                   FALSE,  FALSE,
7049     EL_ROCK,                            ACTION_EMPTYING, -1
7050   },
7051   {
7052     Xsand_stoneout_2,                   FALSE,  FALSE,
7053     EL_ROCK,                            ACTION_EMPTYING, -1
7054   },
7055   {
7056     Xsand_stonesand_quickout_1,         FALSE,  FALSE,
7057     EL_QUICKSAND_EMPTYING,              -1, -1
7058   },
7059   {
7060     Xsand_stonesand_quickout_2,         FALSE,  FALSE,
7061     EL_QUICKSAND_EMPTYING,              -1, -1
7062   },
7063
7064   {
7065     Xslide_ns,                          TRUE,   FALSE,
7066     EL_EXPANDABLE_WALL_VERTICAL,        -1, -1
7067   },
7068   {
7069     Yslide_ns_blank,                    FALSE,  FALSE,
7070     EL_EXPANDABLE_WALL_VERTICAL,        ACTION_GROWING, -1
7071   },
7072   {
7073     Xslide_ew,                          TRUE,   FALSE,
7074     EL_EXPANDABLE_WALL_HORIZONTAL,      -1, -1
7075   },
7076   {
7077     Yslide_ew_blank,                    FALSE,  FALSE,
7078     EL_EXPANDABLE_WALL_HORIZONTAL,      ACTION_GROWING, -1
7079   },
7080
7081   {
7082     Xwind_n,                            TRUE,   FALSE,
7083     EL_BALLOON_SWITCH_UP,               -1, -1
7084   },
7085   {
7086     Xwind_e,                            TRUE,   FALSE,
7087     EL_BALLOON_SWITCH_RIGHT,            -1, -1
7088   },
7089   {
7090     Xwind_s,                            TRUE,   FALSE,
7091     EL_BALLOON_SWITCH_DOWN,             -1, -1
7092   },
7093   {
7094     Xwind_w,                            TRUE,   FALSE,
7095     EL_BALLOON_SWITCH_LEFT,             -1, -1
7096   },
7097   {
7098     Xwind_any,                          TRUE,   FALSE,
7099     EL_BALLOON_SWITCH_ANY,              -1, -1
7100   },
7101   {
7102     Xwind_stop,                         TRUE,   FALSE,
7103     EL_BALLOON_SWITCH_NONE,             -1, -1
7104   },
7105
7106   {
7107     Xexit,                              TRUE,   FALSE,
7108     EL_EM_EXIT_CLOSED,                  -1, -1
7109   },
7110   {
7111     Xexit_1,                            TRUE,   FALSE,
7112     EL_EM_EXIT_OPEN,                    -1, -1
7113   },
7114   {
7115     Xexit_2,                            FALSE,  FALSE,
7116     EL_EM_EXIT_OPEN,                    -1, -1
7117   },
7118   {
7119     Xexit_3,                            FALSE,  FALSE,
7120     EL_EM_EXIT_OPEN,                    -1, -1
7121   },
7122
7123   {
7124     Xpause,                             FALSE,  FALSE,
7125     EL_EMPTY,                           -1, -1
7126   },
7127
7128   {
7129     Xwall_1,                            TRUE,   FALSE,
7130     EL_WALL,                            -1, -1
7131   },
7132   {
7133     Xwall_2,                            TRUE,   FALSE,
7134     EL_EMC_WALL_14,                     -1, -1
7135   },
7136   {
7137     Xwall_3,                            TRUE,   FALSE,
7138     EL_EMC_WALL_15,                     -1, -1
7139   },
7140   {
7141     Xwall_4,                            TRUE,   FALSE,
7142     EL_EMC_WALL_16,                     -1, -1
7143   },
7144
7145   {
7146     Xroundwall_1,                       TRUE,   FALSE,
7147     EL_WALL_SLIPPERY,                   -1, -1
7148   },
7149   {
7150     Xroundwall_2,                       TRUE,   FALSE,
7151     EL_EMC_WALL_SLIPPERY_2,             -1, -1
7152   },
7153   {
7154     Xroundwall_3,                       TRUE,   FALSE,
7155     EL_EMC_WALL_SLIPPERY_3,             -1, -1
7156   },
7157   {
7158     Xroundwall_4,                       TRUE,   FALSE,
7159     EL_EMC_WALL_SLIPPERY_4,             -1, -1
7160   },
7161
7162   {
7163     Xsteel_1,                           TRUE,   FALSE,
7164     EL_STEELWALL,                       -1, -1
7165   },
7166   {
7167     Xsteel_2,                           TRUE,   FALSE,
7168     EL_EMC_STEELWALL_2,                 -1, -1
7169   },
7170   {
7171     Xsteel_3,                           TRUE,   FALSE,
7172     EL_EMC_STEELWALL_3,                 -1, -1
7173   },
7174   {
7175     Xsteel_4,                           TRUE,   FALSE,
7176     EL_EMC_STEELWALL_4,                 -1, -1
7177   },
7178
7179   {
7180     Xdecor_1,                           TRUE,   FALSE,
7181     EL_EMC_WALL_8,                      -1, -1
7182   },
7183   {
7184     Xdecor_2,                           TRUE,   FALSE,
7185     EL_EMC_WALL_6,                      -1, -1
7186   },
7187   {
7188     Xdecor_3,                           TRUE,   FALSE,
7189     EL_EMC_WALL_4,                      -1, -1
7190   },
7191   {
7192     Xdecor_4,                           TRUE,   FALSE,
7193     EL_EMC_WALL_7,                      -1, -1
7194   },
7195   {
7196     Xdecor_5,                           TRUE,   FALSE,
7197     EL_EMC_WALL_5,                      -1, -1
7198   },
7199   {
7200     Xdecor_6,                           TRUE,   FALSE,
7201     EL_EMC_WALL_9,                      -1, -1
7202   },
7203   {
7204     Xdecor_7,                           TRUE,   FALSE,
7205     EL_EMC_WALL_10,                     -1, -1
7206   },
7207   {
7208     Xdecor_8,                           TRUE,   FALSE,
7209     EL_EMC_WALL_1,                      -1, -1
7210   },
7211   {
7212     Xdecor_9,                           TRUE,   FALSE,
7213     EL_EMC_WALL_2,                      -1, -1
7214   },
7215   {
7216     Xdecor_10,                          TRUE,   FALSE,
7217     EL_EMC_WALL_3,                      -1, -1
7218   },
7219   {
7220     Xdecor_11,                          TRUE,   FALSE,
7221     EL_EMC_WALL_11,                     -1, -1
7222   },
7223   {
7224     Xdecor_12,                          TRUE,   FALSE,
7225     EL_EMC_WALL_12,                     -1, -1
7226   },
7227
7228   {
7229     Xalpha_0,                           TRUE,   FALSE,
7230     EL_CHAR('0'),                       -1, -1
7231   },
7232   {
7233     Xalpha_1,                           TRUE,   FALSE,
7234     EL_CHAR('1'),                       -1, -1
7235   },
7236   {
7237     Xalpha_2,                           TRUE,   FALSE,
7238     EL_CHAR('2'),                       -1, -1
7239   },
7240   {
7241     Xalpha_3,                           TRUE,   FALSE,
7242     EL_CHAR('3'),                       -1, -1
7243   },
7244   {
7245     Xalpha_4,                           TRUE,   FALSE,
7246     EL_CHAR('4'),                       -1, -1
7247   },
7248   {
7249     Xalpha_5,                           TRUE,   FALSE,
7250     EL_CHAR('5'),                       -1, -1
7251   },
7252   {
7253     Xalpha_6,                           TRUE,   FALSE,
7254     EL_CHAR('6'),                       -1, -1
7255   },
7256   {
7257     Xalpha_7,                           TRUE,   FALSE,
7258     EL_CHAR('7'),                       -1, -1
7259   },
7260   {
7261     Xalpha_8,                           TRUE,   FALSE,
7262     EL_CHAR('8'),                       -1, -1
7263   },
7264   {
7265     Xalpha_9,                           TRUE,   FALSE,
7266     EL_CHAR('9'),                       -1, -1
7267   },
7268   {
7269     Xalpha_excla,                       TRUE,   FALSE,
7270     EL_CHAR('!'),                       -1, -1
7271   },
7272   {
7273     Xalpha_apost,                       TRUE,   FALSE,
7274     EL_CHAR('\''),                      -1, -1
7275   },
7276   {
7277     Xalpha_comma,                       TRUE,   FALSE,
7278     EL_CHAR(','),                       -1, -1
7279   },
7280   {
7281     Xalpha_minus,                       TRUE,   FALSE,
7282     EL_CHAR('-'),                       -1, -1
7283   },
7284   {
7285     Xalpha_perio,                       TRUE,   FALSE,
7286     EL_CHAR('.'),                       -1, -1
7287   },
7288   {
7289     Xalpha_colon,                       TRUE,   FALSE,
7290     EL_CHAR(':'),                       -1, -1
7291   },
7292   {
7293     Xalpha_quest,                       TRUE,   FALSE,
7294     EL_CHAR('?'),                       -1, -1
7295   },
7296   {
7297     Xalpha_a,                           TRUE,   FALSE,
7298     EL_CHAR('A'),                       -1, -1
7299   },
7300   {
7301     Xalpha_b,                           TRUE,   FALSE,
7302     EL_CHAR('B'),                       -1, -1
7303   },
7304   {
7305     Xalpha_c,                           TRUE,   FALSE,
7306     EL_CHAR('C'),                       -1, -1
7307   },
7308   {
7309     Xalpha_d,                           TRUE,   FALSE,
7310     EL_CHAR('D'),                       -1, -1
7311   },
7312   {
7313     Xalpha_e,                           TRUE,   FALSE,
7314     EL_CHAR('E'),                       -1, -1
7315   },
7316   {
7317     Xalpha_f,                           TRUE,   FALSE,
7318     EL_CHAR('F'),                       -1, -1
7319   },
7320   {
7321     Xalpha_g,                           TRUE,   FALSE,
7322     EL_CHAR('G'),                       -1, -1
7323   },
7324   {
7325     Xalpha_h,                           TRUE,   FALSE,
7326     EL_CHAR('H'),                       -1, -1
7327   },
7328   {
7329     Xalpha_i,                           TRUE,   FALSE,
7330     EL_CHAR('I'),                       -1, -1
7331   },
7332   {
7333     Xalpha_j,                           TRUE,   FALSE,
7334     EL_CHAR('J'),                       -1, -1
7335   },
7336   {
7337     Xalpha_k,                           TRUE,   FALSE,
7338     EL_CHAR('K'),                       -1, -1
7339   },
7340   {
7341     Xalpha_l,                           TRUE,   FALSE,
7342     EL_CHAR('L'),                       -1, -1
7343   },
7344   {
7345     Xalpha_m,                           TRUE,   FALSE,
7346     EL_CHAR('M'),                       -1, -1
7347   },
7348   {
7349     Xalpha_n,                           TRUE,   FALSE,
7350     EL_CHAR('N'),                       -1, -1
7351   },
7352   {
7353     Xalpha_o,                           TRUE,   FALSE,
7354     EL_CHAR('O'),                       -1, -1
7355   },
7356   {
7357     Xalpha_p,                           TRUE,   FALSE,
7358     EL_CHAR('P'),                       -1, -1
7359   },
7360   {
7361     Xalpha_q,                           TRUE,   FALSE,
7362     EL_CHAR('Q'),                       -1, -1
7363   },
7364   {
7365     Xalpha_r,                           TRUE,   FALSE,
7366     EL_CHAR('R'),                       -1, -1
7367   },
7368   {
7369     Xalpha_s,                           TRUE,   FALSE,
7370     EL_CHAR('S'),                       -1, -1
7371   },
7372   {
7373     Xalpha_t,                           TRUE,   FALSE,
7374     EL_CHAR('T'),                       -1, -1
7375   },
7376   {
7377     Xalpha_u,                           TRUE,   FALSE,
7378     EL_CHAR('U'),                       -1, -1
7379   },
7380   {
7381     Xalpha_v,                           TRUE,   FALSE,
7382     EL_CHAR('V'),                       -1, -1
7383   },
7384   {
7385     Xalpha_w,                           TRUE,   FALSE,
7386     EL_CHAR('W'),                       -1, -1
7387   },
7388   {
7389     Xalpha_x,                           TRUE,   FALSE,
7390     EL_CHAR('X'),                       -1, -1
7391   },
7392   {
7393     Xalpha_y,                           TRUE,   FALSE,
7394     EL_CHAR('Y'),                       -1, -1
7395   },
7396   {
7397     Xalpha_z,                           TRUE,   FALSE,
7398     EL_CHAR('Z'),                       -1, -1
7399   },
7400   {
7401     Xalpha_arrow_e,                     TRUE,   FALSE,
7402     EL_CHAR('>'),                       -1, -1
7403   },
7404   {
7405     Xalpha_arrow_w,                     TRUE,   FALSE,
7406     EL_CHAR('<'),                       -1, -1
7407   },
7408   {
7409     Xalpha_copyr,                       TRUE,   FALSE,
7410     EL_CHAR(CHAR_BYTE_COPYRIGHT),       -1, -1
7411   },
7412
7413   {
7414     Ykey_1_blank,                       FALSE,  FALSE,
7415     EL_EM_KEY_1,                        ACTION_COLLECTING, -1
7416   },
7417   {
7418     Ykey_2_blank,                       FALSE,  FALSE,
7419     EL_EM_KEY_2,                        ACTION_COLLECTING, -1
7420   },
7421   {
7422     Ykey_3_blank,                       FALSE,  FALSE,
7423     EL_EM_KEY_3,                        ACTION_COLLECTING, -1
7424   },
7425   {
7426     Ykey_4_blank,                       FALSE,  FALSE,
7427     EL_EM_KEY_4,                        ACTION_COLLECTING, -1
7428   },
7429   {
7430     Ykey_5_blank,                       FALSE,  FALSE,
7431     EL_EMC_KEY_5,                       ACTION_COLLECTING, -1
7432   },
7433   {
7434     Ykey_6_blank,                       FALSE,  FALSE,
7435     EL_EMC_KEY_6,                       ACTION_COLLECTING, -1
7436   },
7437   {
7438     Ykey_7_blank,                       FALSE,  FALSE,
7439     EL_EMC_KEY_7,                       ACTION_COLLECTING, -1
7440   },
7441   {
7442     Ykey_8_blank,                       FALSE,  FALSE,
7443     EL_EMC_KEY_8,                       ACTION_COLLECTING, -1
7444   },
7445   {
7446     Ylenses_blank,                      FALSE,  FALSE,
7447     EL_EMC_LENSES,                      ACTION_COLLECTING, -1
7448   },
7449   {
7450     Ymagnify_blank,                     FALSE,  FALSE,
7451     EL_EMC_MAGNIFIER,                   ACTION_COLLECTING, -1
7452   },
7453   {
7454     Ygrass_blank,                       FALSE,  FALSE,
7455     EL_EMC_GRASS,                       ACTION_SNAPPING, -1
7456   },
7457   {
7458     Ydirt_blank,                        FALSE,  FALSE,
7459     EL_SAND,                            ACTION_SNAPPING, -1
7460   },
7461
7462   {
7463     -1,                                 FALSE,  FALSE,
7464     -1,                                 -1, -1
7465   }
7466 };
7467
7468 static struct Mapping_EM_to_RND_player
7469 {
7470   int action_em;
7471   int player_nr;
7472
7473   int element_rnd;
7474   int action;
7475   int direction;
7476 }
7477 em_player_mapping_list[MAX_PLAYERS * PLY_MAX + 1] =
7478 {
7479   {
7480     PLY_walk_n,                         0,
7481     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_UP,
7482   },
7483   {
7484     PLY_walk_e,                         0,
7485     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_RIGHT,
7486   },
7487   {
7488     PLY_walk_s,                         0,
7489     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_DOWN,
7490   },
7491   {
7492     PLY_walk_w,                         0,
7493     EL_PLAYER_1,                        ACTION_MOVING, MV_BIT_LEFT,
7494   },
7495   {
7496     PLY_push_n,                         0,
7497     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_UP,
7498   },
7499   {
7500     PLY_push_e,                         0,
7501     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_RIGHT,
7502   },
7503   {
7504     PLY_push_s,                         0,
7505     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_DOWN,
7506   },
7507   {
7508     PLY_push_w,                         0,
7509     EL_PLAYER_1,                        ACTION_PUSHING, MV_BIT_LEFT,
7510   },
7511   {
7512     PLY_shoot_n,                        0,
7513     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_UP,
7514   },
7515   {
7516     PLY_shoot_e,                        0,
7517     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_RIGHT,
7518   },
7519   {
7520     PLY_shoot_s,                        0,
7521     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_DOWN,
7522   },
7523   {
7524     PLY_shoot_w,                        0,
7525     EL_PLAYER_1,                        ACTION_SNAPPING, MV_BIT_LEFT,
7526   },
7527   {
7528     PLY_walk_n,                         1,
7529     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_UP,
7530   },
7531   {
7532     PLY_walk_e,                         1,
7533     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_RIGHT,
7534   },
7535   {
7536     PLY_walk_s,                         1,
7537     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_DOWN,
7538   },
7539   {
7540     PLY_walk_w,                         1,
7541     EL_PLAYER_2,                        ACTION_MOVING, MV_BIT_LEFT,
7542   },
7543   {
7544     PLY_push_n,                         1,
7545     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_UP,
7546   },
7547   {
7548     PLY_push_e,                         1,
7549     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_RIGHT,
7550   },
7551   {
7552     PLY_push_s,                         1,
7553     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_DOWN,
7554   },
7555   {
7556     PLY_push_w,                         1,
7557     EL_PLAYER_2,                        ACTION_PUSHING, MV_BIT_LEFT,
7558   },
7559   {
7560     PLY_shoot_n,                        1,
7561     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_UP,
7562   },
7563   {
7564     PLY_shoot_e,                        1,
7565     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_RIGHT,
7566   },
7567   {
7568     PLY_shoot_s,                        1,
7569     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_DOWN,
7570   },
7571   {
7572     PLY_shoot_w,                        1,
7573     EL_PLAYER_2,                        ACTION_SNAPPING, MV_BIT_LEFT,
7574   },
7575   {
7576     PLY_still,                          0,
7577     EL_PLAYER_1,                        ACTION_DEFAULT, -1,
7578   },
7579   {
7580     PLY_still,                          1,
7581     EL_PLAYER_2,                        ACTION_DEFAULT, -1,
7582   },
7583   {
7584     PLY_walk_n,                         2,
7585     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_UP,
7586   },
7587   {
7588     PLY_walk_e,                         2,
7589     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_RIGHT,
7590   },
7591   {
7592     PLY_walk_s,                         2,
7593     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_DOWN,
7594   },
7595   {
7596     PLY_walk_w,                         2,
7597     EL_PLAYER_3,                        ACTION_MOVING, MV_BIT_LEFT,
7598   },
7599   {
7600     PLY_push_n,                         2,
7601     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_UP,
7602   },
7603   {
7604     PLY_push_e,                         2,
7605     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_RIGHT,
7606   },
7607   {
7608     PLY_push_s,                         2,
7609     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_DOWN,
7610   },
7611   {
7612     PLY_push_w,                         2,
7613     EL_PLAYER_3,                        ACTION_PUSHING, MV_BIT_LEFT,
7614   },
7615   {
7616     PLY_shoot_n,                        2,
7617     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_UP,
7618   },
7619   {
7620     PLY_shoot_e,                        2,
7621     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_RIGHT,
7622   },
7623   {
7624     PLY_shoot_s,                        2,
7625     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_DOWN,
7626   },
7627   {
7628     PLY_shoot_w,                        2,
7629     EL_PLAYER_3,                        ACTION_SNAPPING, MV_BIT_LEFT,
7630   },
7631   {
7632     PLY_walk_n,                         3,
7633     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_UP,
7634   },
7635   {
7636     PLY_walk_e,                         3,
7637     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_RIGHT,
7638   },
7639   {
7640     PLY_walk_s,                         3,
7641     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_DOWN,
7642   },
7643   {
7644     PLY_walk_w,                         3,
7645     EL_PLAYER_4,                        ACTION_MOVING, MV_BIT_LEFT,
7646   },
7647   {
7648     PLY_push_n,                         3,
7649     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_UP,
7650   },
7651   {
7652     PLY_push_e,                         3,
7653     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_RIGHT,
7654   },
7655   {
7656     PLY_push_s,                         3,
7657     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_DOWN,
7658   },
7659   {
7660     PLY_push_w,                         3,
7661     EL_PLAYER_4,                        ACTION_PUSHING, MV_BIT_LEFT,
7662   },
7663   {
7664     PLY_shoot_n,                        3,
7665     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_UP,
7666   },
7667   {
7668     PLY_shoot_e,                        3,
7669     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_RIGHT,
7670   },
7671   {
7672     PLY_shoot_s,                        3,
7673     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_DOWN,
7674   },
7675   {
7676     PLY_shoot_w,                        3,
7677     EL_PLAYER_4,                        ACTION_SNAPPING, MV_BIT_LEFT,
7678   },
7679   {
7680     PLY_still,                          2,
7681     EL_PLAYER_3,                        ACTION_DEFAULT, -1,
7682   },
7683   {
7684     PLY_still,                          3,
7685     EL_PLAYER_4,                        ACTION_DEFAULT, -1,
7686   },
7687
7688   {
7689     -1,                                 -1,
7690     -1,                                 -1, -1
7691   }
7692 };
7693
7694 int map_element_RND_to_EM_cave(int element_rnd)
7695 {
7696   static unsigned short mapping_RND_to_EM[NUM_FILE_ELEMENTS];
7697   static boolean mapping_initialized = FALSE;
7698
7699   if (!mapping_initialized)
7700   {
7701     int i;
7702
7703     // return "Xalpha_quest" for all undefined elements in mapping array
7704     for (i = 0; i < NUM_FILE_ELEMENTS; i++)
7705       mapping_RND_to_EM[i] = Xalpha_quest;
7706
7707     for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
7708       if (em_object_mapping_list[i].is_rnd_to_em_mapping)
7709         mapping_RND_to_EM[em_object_mapping_list[i].element_rnd] =
7710           em_object_mapping_list[i].element_em;
7711
7712     mapping_initialized = TRUE;
7713   }
7714
7715   if (element_rnd < 0 || element_rnd >= NUM_FILE_ELEMENTS)
7716   {
7717     Warn("invalid RND level element %d", element_rnd);
7718
7719     return EL_UNKNOWN;
7720   }
7721
7722   return map_em_element_X_to_C(mapping_RND_to_EM[element_rnd]);
7723 }
7724
7725 int map_element_EM_to_RND_cave(int element_em_cave)
7726 {
7727   static unsigned short mapping_EM_to_RND[GAME_TILE_MAX];
7728   static boolean mapping_initialized = FALSE;
7729
7730   if (!mapping_initialized)
7731   {
7732     int i;
7733
7734     // return "EL_UNKNOWN" for all undefined elements in mapping array
7735     for (i = 0; i < GAME_TILE_MAX; i++)
7736       mapping_EM_to_RND[i] = EL_UNKNOWN;
7737
7738     for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
7739       mapping_EM_to_RND[em_object_mapping_list[i].element_em] =
7740         em_object_mapping_list[i].element_rnd;
7741
7742     mapping_initialized = TRUE;
7743   }
7744
7745   if (element_em_cave < 0 || element_em_cave >= CAVE_TILE_MAX)
7746   {
7747     Warn("invalid EM cave element %d", element_em_cave);
7748
7749     return EL_UNKNOWN;
7750   }
7751
7752   return mapping_EM_to_RND[map_em_element_C_to_X(element_em_cave)];
7753 }
7754
7755 int map_element_EM_to_RND_game(int element_em_game)
7756 {
7757   static unsigned short mapping_EM_to_RND[GAME_TILE_MAX];
7758   static boolean mapping_initialized = FALSE;
7759
7760   if (!mapping_initialized)
7761   {
7762     int i;
7763
7764     // return "EL_UNKNOWN" for all undefined elements in mapping array
7765     for (i = 0; i < GAME_TILE_MAX; i++)
7766       mapping_EM_to_RND[i] = EL_UNKNOWN;
7767
7768     for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
7769       mapping_EM_to_RND[em_object_mapping_list[i].element_em] =
7770         em_object_mapping_list[i].element_rnd;
7771
7772     mapping_initialized = TRUE;
7773   }
7774
7775   if (element_em_game < 0 || element_em_game >= GAME_TILE_MAX)
7776   {
7777     Warn("invalid EM game element %d", element_em_game);
7778
7779     return EL_UNKNOWN;
7780   }
7781
7782   return mapping_EM_to_RND[element_em_game];
7783 }
7784
7785 void map_android_clone_elements_RND_to_EM(struct LevelInfo *level)
7786 {
7787   struct LevelInfo_EM *level_em = level->native_em_level;
7788   struct CAVE *cav = level_em->cav;
7789   int i, j;
7790
7791   for (i = 0; i < GAME_TILE_MAX; i++)
7792     cav->android_array[i] = Cblank;
7793
7794   for (i = 0; i < level->num_android_clone_elements; i++)
7795   {
7796     int element_rnd = level->android_clone_element[i];
7797     int element_em_cave = map_element_RND_to_EM_cave(element_rnd);
7798
7799     for (j = 0; em_object_mapping_list[j].element_em != -1; j++)
7800       if (em_object_mapping_list[j].element_rnd == element_rnd)
7801         cav->android_array[em_object_mapping_list[j].element_em] =
7802           element_em_cave;
7803   }
7804 }
7805
7806 void map_android_clone_elements_EM_to_RND(struct LevelInfo *level)
7807 {
7808   struct LevelInfo_EM *level_em = level->native_em_level;
7809   struct CAVE *cav = level_em->cav;
7810   int i, j;
7811
7812   level->num_android_clone_elements = 0;
7813
7814   for (i = 0; i < GAME_TILE_MAX; i++)
7815   {
7816     int element_em_cave = cav->android_array[i];
7817     int element_rnd;
7818     boolean element_found = FALSE;
7819
7820     if (element_em_cave == Cblank)
7821       continue;
7822
7823     element_rnd = map_element_EM_to_RND_cave(element_em_cave);
7824
7825     for (j = 0; j < level->num_android_clone_elements; j++)
7826       if (level->android_clone_element[j] == element_rnd)
7827         element_found = TRUE;
7828
7829     if (!element_found)
7830     {
7831       level->android_clone_element[level->num_android_clone_elements++] =
7832         element_rnd;
7833
7834       if (level->num_android_clone_elements == MAX_ANDROID_ELEMENTS)
7835         break;
7836     }
7837   }
7838
7839   if (level->num_android_clone_elements == 0)
7840   {
7841     level->num_android_clone_elements = 1;
7842     level->android_clone_element[0] = EL_EMPTY;
7843   }
7844 }
7845
7846 int map_direction_RND_to_EM(int direction)
7847 {
7848   return (direction == MV_UP    ? 0 :
7849           direction == MV_RIGHT ? 1 :
7850           direction == MV_DOWN  ? 2 :
7851           direction == MV_LEFT  ? 3 :
7852           -1);
7853 }
7854
7855 int map_direction_EM_to_RND(int direction)
7856 {
7857   return (direction == 0 ? MV_UP    :
7858           direction == 1 ? MV_RIGHT :
7859           direction == 2 ? MV_DOWN  :
7860           direction == 3 ? MV_LEFT  :
7861           MV_NONE);
7862 }
7863
7864 int map_element_RND_to_SP(int element_rnd)
7865 {
7866   int element_sp = 0x20;        // map unknown elements to yellow "hardware"
7867
7868   if (element_rnd >= EL_SP_START &&
7869       element_rnd <= EL_SP_END)
7870     element_sp = element_rnd - EL_SP_START;
7871   else if (element_rnd == EL_EMPTY_SPACE)
7872     element_sp = 0x00;
7873   else if (element_rnd == EL_INVISIBLE_WALL)
7874     element_sp = 0x28;
7875
7876   return element_sp;
7877 }
7878
7879 int map_element_SP_to_RND(int element_sp)
7880 {
7881   int element_rnd = EL_UNKNOWN;
7882
7883   if (element_sp >= 0x00 &&
7884       element_sp <= 0x27)
7885     element_rnd = EL_SP_START + element_sp;
7886   else if (element_sp == 0x28)
7887     element_rnd = EL_INVISIBLE_WALL;
7888
7889   return element_rnd;
7890 }
7891
7892 int map_action_SP_to_RND(int action_sp)
7893 {
7894   switch (action_sp)
7895   {
7896     case actActive:             return ACTION_ACTIVE;
7897     case actImpact:             return ACTION_IMPACT;
7898     case actExploding:          return ACTION_EXPLODING;
7899     case actDigging:            return ACTION_DIGGING;
7900     case actSnapping:           return ACTION_SNAPPING;
7901     case actCollecting:         return ACTION_COLLECTING;
7902     case actPassing:            return ACTION_PASSING;
7903     case actPushing:            return ACTION_PUSHING;
7904     case actDropping:           return ACTION_DROPPING;
7905
7906     default:                    return ACTION_DEFAULT;
7907   }
7908 }
7909
7910 int map_element_RND_to_MM(int element_rnd)
7911 {
7912   return (element_rnd >= EL_MM_START_1 &&
7913           element_rnd <= EL_MM_END_1 ?
7914           EL_MM_START_1_NATIVE + element_rnd - EL_MM_START_1 :
7915
7916           element_rnd >= EL_MM_START_2 &&
7917           element_rnd <= EL_MM_END_2 ?
7918           EL_MM_START_2_NATIVE + element_rnd - EL_MM_START_2 :
7919
7920           element_rnd >= EL_CHAR_START &&
7921           element_rnd <= EL_CHAR_END ?
7922           EL_MM_CHAR_START_NATIVE + element_rnd - EL_CHAR_START :
7923
7924           element_rnd >= EL_MM_RUNTIME_START &&
7925           element_rnd <= EL_MM_RUNTIME_END ?
7926           EL_MM_RUNTIME_START_NATIVE + element_rnd - EL_MM_RUNTIME_START :
7927
7928           element_rnd >= EL_MM_DUMMY_START &&
7929           element_rnd <= EL_MM_DUMMY_END ?
7930           EL_MM_DUMMY_START_NATIVE + element_rnd - EL_MM_DUMMY_START :
7931
7932           EL_MM_EMPTY_NATIVE);
7933 }
7934
7935 int map_element_MM_to_RND(int element_mm)
7936 {
7937   return (element_mm == EL_MM_EMPTY_NATIVE ||
7938           element_mm == EL_DF_EMPTY_NATIVE ?
7939           EL_EMPTY :
7940
7941           element_mm >= EL_MM_START_1_NATIVE &&
7942           element_mm <= EL_MM_END_1_NATIVE ?
7943           EL_MM_START_1 + element_mm - EL_MM_START_1_NATIVE :
7944
7945           element_mm >= EL_MM_START_2_NATIVE &&
7946           element_mm <= EL_MM_END_2_NATIVE ?
7947           EL_MM_START_2 + element_mm - EL_MM_START_2_NATIVE :
7948
7949           element_mm >= EL_MM_CHAR_START_NATIVE &&
7950           element_mm <= EL_MM_CHAR_END_NATIVE ?
7951           EL_CHAR_START + element_mm - EL_MM_CHAR_START_NATIVE :
7952
7953           element_mm >= EL_MM_RUNTIME_START_NATIVE &&
7954           element_mm <= EL_MM_RUNTIME_END_NATIVE ?
7955           EL_MM_RUNTIME_START + element_mm - EL_MM_RUNTIME_START_NATIVE :
7956
7957           element_mm >= EL_MM_DUMMY_START_NATIVE &&
7958           element_mm <= EL_MM_DUMMY_END_NATIVE ?
7959           EL_MM_DUMMY_START + element_mm - EL_MM_DUMMY_START_NATIVE :
7960
7961           EL_EMPTY);
7962 }
7963
7964 int map_action_MM_to_RND(int action_mm)
7965 {
7966   // all MM actions are defined to exactly match their RND counterparts
7967   return action_mm;
7968 }
7969
7970 int map_sound_MM_to_RND(int sound_mm)
7971 {
7972   switch (sound_mm)
7973   {
7974     case SND_MM_GAME_LEVELTIME_CHARGING:
7975       return SND_GAME_LEVELTIME_CHARGING;
7976
7977     case SND_MM_GAME_HEALTH_CHARGING:
7978       return SND_GAME_HEALTH_CHARGING;
7979
7980     default:
7981       return SND_UNDEFINED;
7982   }
7983 }
7984
7985 int map_mm_wall_element(int element)
7986 {
7987   return (element >= EL_MM_STEEL_WALL_START &&
7988           element <= EL_MM_STEEL_WALL_END ?
7989           EL_MM_STEEL_WALL :
7990
7991           element >= EL_MM_WOODEN_WALL_START &&
7992           element <= EL_MM_WOODEN_WALL_END ?
7993           EL_MM_WOODEN_WALL :
7994
7995           element >= EL_MM_ICE_WALL_START &&
7996           element <= EL_MM_ICE_WALL_END ?
7997           EL_MM_ICE_WALL :
7998
7999           element >= EL_MM_AMOEBA_WALL_START &&
8000           element <= EL_MM_AMOEBA_WALL_END ?
8001           EL_MM_AMOEBA_WALL :
8002
8003           element >= EL_DF_STEEL_WALL_START &&
8004           element <= EL_DF_STEEL_WALL_END ?
8005           EL_DF_STEEL_WALL :
8006
8007           element >= EL_DF_WOODEN_WALL_START &&
8008           element <= EL_DF_WOODEN_WALL_END ?
8009           EL_DF_WOODEN_WALL :
8010
8011           element);
8012 }
8013
8014 int map_mm_wall_element_editor(int element)
8015 {
8016   switch (element)
8017   {
8018     case EL_MM_STEEL_WALL:      return EL_MM_STEEL_WALL_START;
8019     case EL_MM_WOODEN_WALL:     return EL_MM_WOODEN_WALL_START;
8020     case EL_MM_ICE_WALL:        return EL_MM_ICE_WALL_START;
8021     case EL_MM_AMOEBA_WALL:     return EL_MM_AMOEBA_WALL_START;
8022     case EL_DF_STEEL_WALL:      return EL_DF_STEEL_WALL_START;
8023     case EL_DF_WOODEN_WALL:     return EL_DF_WOODEN_WALL_START;
8024
8025     default:                    return element;
8026   }
8027 }
8028
8029 int get_next_element(int element)
8030 {
8031   switch (element)
8032   {
8033     case EL_QUICKSAND_FILLING:          return EL_QUICKSAND_FULL;
8034     case EL_QUICKSAND_EMPTYING:         return EL_QUICKSAND_EMPTY;
8035     case EL_QUICKSAND_FAST_FILLING:     return EL_QUICKSAND_FAST_FULL;
8036     case EL_QUICKSAND_FAST_EMPTYING:    return EL_QUICKSAND_FAST_EMPTY;
8037     case EL_MAGIC_WALL_FILLING:         return EL_MAGIC_WALL_FULL;
8038     case EL_MAGIC_WALL_EMPTYING:        return EL_MAGIC_WALL_ACTIVE;
8039     case EL_BD_MAGIC_WALL_FILLING:      return EL_BD_MAGIC_WALL_FULL;
8040     case EL_BD_MAGIC_WALL_EMPTYING:     return EL_BD_MAGIC_WALL_ACTIVE;
8041     case EL_DC_MAGIC_WALL_FILLING:      return EL_DC_MAGIC_WALL_FULL;
8042     case EL_DC_MAGIC_WALL_EMPTYING:     return EL_DC_MAGIC_WALL_ACTIVE;
8043     case EL_AMOEBA_DROPPING:            return EL_AMOEBA_WET;
8044
8045     default:                            return element;
8046   }
8047 }
8048
8049 int el2img_mm(int element_mm)
8050 {
8051   return el2img(map_element_MM_to_RND(element_mm));
8052 }
8053
8054 int el_act_dir2img(int element, int action, int direction)
8055 {
8056   element = GFX_ELEMENT(element);
8057   direction = MV_DIR_TO_BIT(direction); // default: MV_NONE => MV_DOWN
8058
8059   // direction_graphic[][] == graphic[] for undefined direction graphics
8060   return element_info[element].direction_graphic[action][direction];
8061 }
8062
8063 static int el_act_dir2crm(int element, int action, int direction)
8064 {
8065   element = GFX_ELEMENT(element);
8066   direction = MV_DIR_TO_BIT(direction); // default: MV_NONE => MV_DOWN
8067
8068   // direction_graphic[][] == graphic[] for undefined direction graphics
8069   return element_info[element].direction_crumbled[action][direction];
8070 }
8071
8072 int el_act2img(int element, int action)
8073 {
8074   element = GFX_ELEMENT(element);
8075
8076   return element_info[element].graphic[action];
8077 }
8078
8079 int el_act2crm(int element, int action)
8080 {
8081   element = GFX_ELEMENT(element);
8082
8083   return element_info[element].crumbled[action];
8084 }
8085
8086 int el_dir2img(int element, int direction)
8087 {
8088   element = GFX_ELEMENT(element);
8089
8090   return el_act_dir2img(element, ACTION_DEFAULT, direction);
8091 }
8092
8093 int el2baseimg(int element)
8094 {
8095   return element_info[element].graphic[ACTION_DEFAULT];
8096 }
8097
8098 int el2img(int element)
8099 {
8100   element = GFX_ELEMENT(element);
8101
8102   return element_info[element].graphic[ACTION_DEFAULT];
8103 }
8104
8105 int el2edimg(int element)
8106 {
8107   element = GFX_ELEMENT(element);
8108
8109   return element_info[element].special_graphic[GFX_SPECIAL_ARG_EDITOR];
8110 }
8111
8112 int el2preimg(int element)
8113 {
8114   element = GFX_ELEMENT(element);
8115
8116   return element_info[element].special_graphic[GFX_SPECIAL_ARG_PREVIEW];
8117 }
8118
8119 int el2panelimg(int element)
8120 {
8121   element = GFX_ELEMENT(element);
8122
8123   return element_info[element].special_graphic[GFX_SPECIAL_ARG_PANEL];
8124 }
8125
8126 int font2baseimg(int font_nr)
8127 {
8128   return font_info[font_nr].special_graphic[GFX_SPECIAL_ARG_DEFAULT];
8129 }
8130
8131 int getBeltNrFromBeltElement(int element)
8132 {
8133   return (element < EL_CONVEYOR_BELT_2_LEFT ? 0 :
8134           element < EL_CONVEYOR_BELT_3_LEFT ? 1 :
8135           element < EL_CONVEYOR_BELT_4_LEFT ? 2 : 3);
8136 }
8137
8138 int getBeltNrFromBeltActiveElement(int element)
8139 {
8140   return (element < EL_CONVEYOR_BELT_2_LEFT_ACTIVE ? 0 :
8141           element < EL_CONVEYOR_BELT_3_LEFT_ACTIVE ? 1 :
8142           element < EL_CONVEYOR_BELT_4_LEFT_ACTIVE ? 2 : 3);
8143 }
8144
8145 int getBeltNrFromBeltSwitchElement(int element)
8146 {
8147   return (element < EL_CONVEYOR_BELT_2_SWITCH_LEFT ? 0 :
8148           element < EL_CONVEYOR_BELT_3_SWITCH_LEFT ? 1 :
8149           element < EL_CONVEYOR_BELT_4_SWITCH_LEFT ? 2 : 3);
8150 }
8151
8152 int getBeltDirNrFromBeltElement(int element)
8153 {
8154   static int belt_base_element[4] =
8155   {
8156     EL_CONVEYOR_BELT_1_LEFT,
8157     EL_CONVEYOR_BELT_2_LEFT,
8158     EL_CONVEYOR_BELT_3_LEFT,
8159     EL_CONVEYOR_BELT_4_LEFT
8160   };
8161
8162   int belt_nr = getBeltNrFromBeltElement(element);
8163   int belt_dir_nr = element - belt_base_element[belt_nr];
8164
8165   return (belt_dir_nr % 3);
8166 }
8167
8168 int getBeltDirNrFromBeltSwitchElement(int element)
8169 {
8170   static int belt_base_element[4] =
8171   {
8172     EL_CONVEYOR_BELT_1_SWITCH_LEFT,
8173     EL_CONVEYOR_BELT_2_SWITCH_LEFT,
8174     EL_CONVEYOR_BELT_3_SWITCH_LEFT,
8175     EL_CONVEYOR_BELT_4_SWITCH_LEFT
8176   };
8177
8178   int belt_nr = getBeltNrFromBeltSwitchElement(element);
8179   int belt_dir_nr = element - belt_base_element[belt_nr];
8180
8181   return (belt_dir_nr % 3);
8182 }
8183
8184 int getBeltDirFromBeltElement(int element)
8185 {
8186   static int belt_move_dir[3] =
8187   {
8188     MV_LEFT,
8189     MV_NONE,
8190     MV_RIGHT
8191   };
8192
8193   int belt_dir_nr = getBeltDirNrFromBeltElement(element);
8194
8195   return belt_move_dir[belt_dir_nr];
8196 }
8197
8198 int getBeltDirFromBeltSwitchElement(int element)
8199 {
8200   static int belt_move_dir[3] =
8201   {
8202     MV_LEFT,
8203     MV_NONE,
8204     MV_RIGHT
8205   };
8206
8207   int belt_dir_nr = getBeltDirNrFromBeltSwitchElement(element);
8208
8209   return belt_move_dir[belt_dir_nr];
8210 }
8211
8212 int getBeltElementFromBeltNrAndBeltDirNr(int belt_nr, int belt_dir_nr)
8213 {
8214   static int belt_base_element[4] =
8215   {
8216     EL_CONVEYOR_BELT_1_LEFT,
8217     EL_CONVEYOR_BELT_2_LEFT,
8218     EL_CONVEYOR_BELT_3_LEFT,
8219     EL_CONVEYOR_BELT_4_LEFT
8220   };
8221
8222   return belt_base_element[belt_nr] + belt_dir_nr;
8223 }
8224
8225 int getBeltElementFromBeltNrAndBeltDir(int belt_nr, int belt_dir)
8226 {
8227   int belt_dir_nr = (belt_dir == MV_LEFT ? 0 : belt_dir == MV_RIGHT ? 2 : 1);
8228
8229   return getBeltElementFromBeltNrAndBeltDirNr(belt_nr, belt_dir_nr);
8230 }
8231
8232 int getBeltSwitchElementFromBeltNrAndBeltDirNr(int belt_nr, int belt_dir_nr)
8233 {
8234   static int belt_base_element[4] =
8235   {
8236     EL_CONVEYOR_BELT_1_SWITCH_LEFT,
8237     EL_CONVEYOR_BELT_2_SWITCH_LEFT,
8238     EL_CONVEYOR_BELT_3_SWITCH_LEFT,
8239     EL_CONVEYOR_BELT_4_SWITCH_LEFT
8240   };
8241
8242   return belt_base_element[belt_nr] + belt_dir_nr;
8243 }
8244
8245 int getBeltSwitchElementFromBeltNrAndBeltDir(int belt_nr, int belt_dir)
8246 {
8247   int belt_dir_nr = (belt_dir == MV_LEFT ? 0 : belt_dir == MV_RIGHT ? 2 : 1);
8248
8249   return getBeltSwitchElementFromBeltNrAndBeltDirNr(belt_nr, belt_dir_nr);
8250 }
8251
8252 boolean swapTiles_EM(boolean is_pre_emc_cave)
8253 {
8254   return is_pre_emc_cave && leveldir_current->use_emc_tiles;
8255 }
8256
8257 boolean getTeamMode_EM(void)
8258 {
8259   return game.team_mode || network_playing;
8260 }
8261
8262 boolean isActivePlayer_EM(int player_nr)
8263 {
8264   return stored_player[player_nr].active;
8265 }
8266
8267 unsigned int InitRND(int seed)
8268 {
8269   if (level.game_engine_type == GAME_ENGINE_TYPE_EM)
8270     return InitEngineRandom_EM(seed);
8271   else if (level.game_engine_type == GAME_ENGINE_TYPE_SP)
8272     return InitEngineRandom_SP(seed);
8273   else if (level.game_engine_type == GAME_ENGINE_TYPE_MM)
8274     return InitEngineRandom_MM(seed);
8275   else
8276     return InitEngineRandom_RND(seed);
8277 }
8278
8279 static struct Mapping_EM_to_RND_object object_mapping[GAME_TILE_MAX];
8280 static struct Mapping_EM_to_RND_player player_mapping[MAX_PLAYERS][PLY_MAX];
8281
8282 static int get_effective_element_EM(int tile, int frame_em)
8283 {
8284   int element             = object_mapping[tile].element_rnd;
8285   int action              = object_mapping[tile].action;
8286   boolean is_backside     = object_mapping[tile].is_backside;
8287   boolean action_removing = (action == ACTION_DIGGING ||
8288                              action == ACTION_SNAPPING ||
8289                              action == ACTION_COLLECTING);
8290
8291   if (frame_em < 7)
8292   {
8293     switch (tile)
8294     {
8295       case Xsplash_e:
8296       case Xsplash_w:
8297         return (frame_em > 5 ? EL_EMPTY : element);
8298
8299       default:
8300         return element;
8301     }
8302   }
8303   else  // frame_em == 7
8304   {
8305     switch (tile)
8306     {
8307       case Xsplash_e:
8308       case Xsplash_w:
8309         return EL_EMPTY;
8310
8311       case Ynut_stone:
8312         return EL_EMERALD;
8313
8314       case Ydiamond_stone:
8315         return EL_ROCK;
8316
8317       case Xdrip_stretch:
8318       case Xdrip_stretchB:
8319       case Ydrip_1_s:
8320       case Ydrip_1_sB:
8321       case Yball_1:
8322       case Xball_2:
8323       case Yball_2:
8324       case Yball_blank:
8325       case Ykey_1_blank:
8326       case Ykey_2_blank:
8327       case Ykey_3_blank:
8328       case Ykey_4_blank:
8329       case Ykey_5_blank:
8330       case Ykey_6_blank:
8331       case Ykey_7_blank:
8332       case Ykey_8_blank:
8333       case Ylenses_blank:
8334       case Ymagnify_blank:
8335       case Ygrass_blank:
8336       case Ydirt_blank:
8337       case Xsand_stonein_1:
8338       case Xsand_stonein_2:
8339       case Xsand_stonein_3:
8340       case Xsand_stonein_4:
8341         return element;
8342
8343       default:
8344         return (is_backside || action_removing ? EL_EMPTY : element);
8345     }
8346   }
8347 }
8348
8349 static boolean check_linear_animation_EM(int tile)
8350 {
8351   switch (tile)
8352   {
8353     case Xsand_stonesand_1:
8354     case Xsand_stonesand_quickout_1:
8355     case Xsand_sandstone_1:
8356     case Xsand_stonein_1:
8357     case Xsand_stoneout_1:
8358     case Xboom_1:
8359     case Xdynamite_1:
8360     case Ybug_w_n:
8361     case Ybug_n_e:
8362     case Ybug_e_s:
8363     case Ybug_s_w:
8364     case Ybug_e_n:
8365     case Ybug_s_e:
8366     case Ybug_w_s:
8367     case Ybug_n_w:
8368     case Ytank_w_n:
8369     case Ytank_n_e:
8370     case Ytank_e_s:
8371     case Ytank_s_w:
8372     case Ytank_e_n:
8373     case Ytank_s_e:
8374     case Ytank_w_s:
8375     case Ytank_n_w:
8376     case Xsplash_e:
8377     case Xsplash_w:
8378     case Ynut_stone:
8379       return TRUE;
8380   }
8381
8382   return FALSE;
8383 }
8384
8385 static void set_crumbled_graphics_EM(struct GraphicInfo_EM *g_em,
8386                                      boolean has_crumbled_graphics,
8387                                      int crumbled, int sync_frame)
8388 {
8389   // if element can be crumbled, but certain action graphics are just empty
8390   // space (like instantly snapping sand to empty space in 1 frame), do not
8391   // treat these empty space graphics as crumbled graphics in EMC engine
8392   if (crumbled == IMG_EMPTY_SPACE)
8393     has_crumbled_graphics = FALSE;
8394
8395   if (has_crumbled_graphics)
8396   {
8397     struct GraphicInfo *g_crumbled = &graphic_info[crumbled];
8398     int frame_crumbled = getAnimationFrame(g_crumbled->anim_frames,
8399                                            g_crumbled->anim_delay,
8400                                            g_crumbled->anim_mode,
8401                                            g_crumbled->anim_start_frame,
8402                                            sync_frame);
8403
8404     getGraphicSource(crumbled, frame_crumbled, &g_em->crumbled_bitmap,
8405                      &g_em->crumbled_src_x, &g_em->crumbled_src_y);
8406
8407     g_em->crumbled_border_size = graphic_info[crumbled].border_size;
8408     g_em->crumbled_tile_size = graphic_info[crumbled].tile_size;
8409
8410     g_em->has_crumbled_graphics = TRUE;
8411   }
8412   else
8413   {
8414     g_em->crumbled_bitmap = NULL;
8415     g_em->crumbled_src_x = 0;
8416     g_em->crumbled_src_y = 0;
8417     g_em->crumbled_border_size = 0;
8418     g_em->crumbled_tile_size = 0;
8419
8420     g_em->has_crumbled_graphics = FALSE;
8421   }
8422 }
8423
8424 #if 0
8425 void ResetGfxAnimation_EM(int x, int y, int tile)
8426 {
8427   GfxFrame[x][y] = 0;
8428 }
8429 #endif
8430
8431 void SetGfxAnimation_EM(struct GraphicInfo_EM *g_em,
8432                         int tile, int frame_em, int x, int y)
8433 {
8434   int action = object_mapping[tile].action;
8435   int direction = object_mapping[tile].direction;
8436   int effective_element = get_effective_element_EM(tile, frame_em);
8437   int graphic = (direction == MV_NONE ?
8438                  el_act2img(effective_element, action) :
8439                  el_act_dir2img(effective_element, action, direction));
8440   struct GraphicInfo *g = &graphic_info[graphic];
8441   int sync_frame;
8442   boolean action_removing = (action == ACTION_DIGGING ||
8443                              action == ACTION_SNAPPING ||
8444                              action == ACTION_COLLECTING);
8445   boolean action_moving   = (action == ACTION_FALLING ||
8446                              action == ACTION_MOVING ||
8447                              action == ACTION_PUSHING ||
8448                              action == ACTION_EATING ||
8449                              action == ACTION_FILLING ||
8450                              action == ACTION_EMPTYING);
8451   boolean action_falling  = (action == ACTION_FALLING ||
8452                              action == ACTION_FILLING ||
8453                              action == ACTION_EMPTYING);
8454
8455   // special case: graphic uses "2nd movement tile" and has defined
8456   // 7 frames for movement animation (or less) => use default graphic
8457   // for last (8th) frame which ends the movement animation
8458   if (g->double_movement && g->anim_frames < 8 && frame_em == 7)
8459   {
8460     action = ACTION_DEFAULT;    // (keep action_* unchanged for now)
8461     graphic = (direction == MV_NONE ?
8462                el_act2img(effective_element, action) :
8463                el_act_dir2img(effective_element, action, direction));
8464
8465     g = &graphic_info[graphic];
8466   }
8467
8468   if ((action_removing || check_linear_animation_EM(tile)) && frame_em == 0)
8469   {
8470     GfxFrame[x][y] = 0;
8471   }
8472   else if (action_moving)
8473   {
8474     boolean is_backside = object_mapping[tile].is_backside;
8475
8476     if (is_backside)
8477     {
8478       int direction = object_mapping[tile].direction;
8479       int move_dir = (action_falling ? MV_DOWN : direction);
8480
8481       GfxFrame[x][y]++;
8482
8483 #if 1
8484       // !!! TEST !!! NEW !!! DOES NOT WORK RIGHT YET !!!
8485       if (g->double_movement && frame_em == 0)
8486         GfxFrame[x][y] = 0;
8487 #endif
8488
8489       if (move_dir == MV_LEFT)
8490         GfxFrame[x - 1][y] = GfxFrame[x][y];
8491       else if (move_dir == MV_RIGHT)
8492         GfxFrame[x + 1][y] = GfxFrame[x][y];
8493       else if (move_dir == MV_UP)
8494         GfxFrame[x][y - 1] = GfxFrame[x][y];
8495       else if (move_dir == MV_DOWN)
8496         GfxFrame[x][y + 1] = GfxFrame[x][y];
8497     }
8498   }
8499   else
8500   {
8501     GfxFrame[x][y]++;
8502
8503     // special case: animation for Xsand_stonesand_quickout_1/2 twice as fast
8504     if (tile == Xsand_stonesand_quickout_1 ||
8505         tile == Xsand_stonesand_quickout_2)
8506       GfxFrame[x][y]++;
8507   }
8508
8509   if (graphic_info[graphic].anim_global_sync)
8510     sync_frame = FrameCounter;
8511   else if (IN_FIELD(x, y, MAX_LEV_FIELDX, MAX_LEV_FIELDY))
8512     sync_frame = GfxFrame[x][y];
8513   else
8514     sync_frame = 0;     // playfield border (pseudo steel)
8515
8516   SetRandomAnimationValue(x, y);
8517
8518   int frame = getAnimationFrame(g->anim_frames,
8519                                 g->anim_delay,
8520                                 g->anim_mode,
8521                                 g->anim_start_frame,
8522                                 sync_frame);
8523
8524   g_em->unique_identifier =
8525     (graphic << 16) | ((frame % 8) << 12) | (g_em->width << 6) | g_em->height;
8526 }
8527
8528 void getGraphicSourceObjectExt_EM(struct GraphicInfo_EM *g_em,
8529                                   int tile, int frame_em, int x, int y)
8530 {
8531   int action = object_mapping[tile].action;
8532   int direction = object_mapping[tile].direction;
8533   boolean is_backside = object_mapping[tile].is_backside;
8534   int effective_element = get_effective_element_EM(tile, frame_em);
8535   int effective_action = action;
8536   int graphic = (direction == MV_NONE ?
8537                  el_act2img(effective_element, effective_action) :
8538                  el_act_dir2img(effective_element, effective_action,
8539                                 direction));
8540   int crumbled = (direction == MV_NONE ?
8541                   el_act2crm(effective_element, effective_action) :
8542                   el_act_dir2crm(effective_element, effective_action,
8543                                  direction));
8544   int base_graphic = el_act2img(effective_element, ACTION_DEFAULT);
8545   int base_crumbled = el_act2crm(effective_element, ACTION_DEFAULT);
8546   boolean has_crumbled_graphics = (base_crumbled != base_graphic);
8547   struct GraphicInfo *g = &graphic_info[graphic];
8548   int sync_frame;
8549
8550   // special case: graphic uses "2nd movement tile" and has defined
8551   // 7 frames for movement animation (or less) => use default graphic
8552   // for last (8th) frame which ends the movement animation
8553   if (g->double_movement && g->anim_frames < 8 && frame_em == 7)
8554   {
8555     effective_action = ACTION_DEFAULT;
8556     graphic = (direction == MV_NONE ?
8557                el_act2img(effective_element, effective_action) :
8558                el_act_dir2img(effective_element, effective_action,
8559                               direction));
8560     crumbled = (direction == MV_NONE ?
8561                 el_act2crm(effective_element, effective_action) :
8562                 el_act_dir2crm(effective_element, effective_action,
8563                                direction));
8564
8565     g = &graphic_info[graphic];
8566   }
8567
8568   if (graphic_info[graphic].anim_global_sync)
8569     sync_frame = FrameCounter;
8570   else if (IN_FIELD(x, y, MAX_LEV_FIELDX, MAX_LEV_FIELDY))
8571     sync_frame = GfxFrame[x][y];
8572   else
8573     sync_frame = 0;     // playfield border (pseudo steel)
8574
8575   SetRandomAnimationValue(x, y);
8576
8577   int frame = getAnimationFrame(g->anim_frames,
8578                                 g->anim_delay,
8579                                 g->anim_mode,
8580                                 g->anim_start_frame,
8581                                 sync_frame);
8582
8583   getGraphicSourceExt(graphic, frame, &g_em->bitmap, &g_em->src_x, &g_em->src_y,
8584                       g->double_movement && is_backside);
8585
8586   // (updating the "crumbled" graphic definitions is probably not really needed,
8587   // as animations for crumbled graphics can't be longer than one EMC cycle)
8588   set_crumbled_graphics_EM(g_em, has_crumbled_graphics, crumbled,
8589                            sync_frame);
8590 }
8591
8592 void getGraphicSourcePlayerExt_EM(struct GraphicInfo_EM *g_em,
8593                                   int player_nr, int anim, int frame_em)
8594 {
8595   int element   = player_mapping[player_nr][anim].element_rnd;
8596   int action    = player_mapping[player_nr][anim].action;
8597   int direction = player_mapping[player_nr][anim].direction;
8598   int graphic = (direction == MV_NONE ?
8599                  el_act2img(element, action) :
8600                  el_act_dir2img(element, action, direction));
8601   struct GraphicInfo *g = &graphic_info[graphic];
8602   int sync_frame;
8603
8604   InitPlayerGfxAnimation(&stored_player[player_nr], action, direction);
8605
8606   stored_player[player_nr].StepFrame = frame_em;
8607
8608   sync_frame = stored_player[player_nr].Frame;
8609
8610   int frame = getAnimationFrame(g->anim_frames,
8611                                 g->anim_delay,
8612                                 g->anim_mode,
8613                                 g->anim_start_frame,
8614                                 sync_frame);
8615
8616   getGraphicSourceExt(graphic, frame, &g_em->bitmap,
8617                       &g_em->src_x, &g_em->src_y, FALSE);
8618 }
8619
8620 void InitGraphicInfo_EM(void)
8621 {
8622   int i, j, p;
8623
8624   // always start with reliable default values
8625   for (i = 0; i < GAME_TILE_MAX; i++)
8626   {
8627     object_mapping[i].element_rnd = EL_UNKNOWN;
8628     object_mapping[i].is_backside = FALSE;
8629     object_mapping[i].action = ACTION_DEFAULT;
8630     object_mapping[i].direction = MV_NONE;
8631   }
8632
8633   // always start with reliable default values
8634   for (p = 0; p < MAX_PLAYERS; p++)
8635   {
8636     for (i = 0; i < PLY_MAX; i++)
8637     {
8638       player_mapping[p][i].element_rnd = EL_UNKNOWN;
8639       player_mapping[p][i].action = ACTION_DEFAULT;
8640       player_mapping[p][i].direction = MV_NONE;
8641     }
8642   }
8643
8644   for (i = 0; em_object_mapping_list[i].element_em != -1; i++)
8645   {
8646     int e = em_object_mapping_list[i].element_em;
8647
8648     object_mapping[e].element_rnd = em_object_mapping_list[i].element_rnd;
8649     object_mapping[e].is_backside = em_object_mapping_list[i].is_backside;
8650
8651     if (em_object_mapping_list[i].action != -1)
8652       object_mapping[e].action = em_object_mapping_list[i].action;
8653
8654     if (em_object_mapping_list[i].direction != -1)
8655       object_mapping[e].direction =
8656         MV_DIR_FROM_BIT(em_object_mapping_list[i].direction);
8657   }
8658
8659   for (i = 0; em_player_mapping_list[i].action_em != -1; i++)
8660   {
8661     int a = em_player_mapping_list[i].action_em;
8662     int p = em_player_mapping_list[i].player_nr;
8663
8664     player_mapping[p][a].element_rnd = em_player_mapping_list[i].element_rnd;
8665
8666     if (em_player_mapping_list[i].action != -1)
8667       player_mapping[p][a].action = em_player_mapping_list[i].action;
8668
8669     if (em_player_mapping_list[i].direction != -1)
8670       player_mapping[p][a].direction =
8671         MV_DIR_FROM_BIT(em_player_mapping_list[i].direction);
8672   }
8673
8674   for (i = 0; i < GAME_TILE_MAX; i++)
8675   {
8676     int element = object_mapping[i].element_rnd;
8677     int action = object_mapping[i].action;
8678     int direction = object_mapping[i].direction;
8679     boolean is_backside = object_mapping[i].is_backside;
8680     boolean action_exploding = ((action == ACTION_EXPLODING ||
8681                                  action == ACTION_SMASHED_BY_ROCK ||
8682                                  action == ACTION_SMASHED_BY_SPRING) &&
8683                                 element != EL_DIAMOND);
8684     boolean action_active = (action == ACTION_ACTIVE);
8685     boolean action_other = (action == ACTION_OTHER);
8686
8687     for (j = 0; j < 8; j++)
8688     {
8689       int effective_element = get_effective_element_EM(i, j);
8690       int effective_action = (j < 7 ? action :
8691                               i == Xdrip_stretch ? action :
8692                               i == Xdrip_stretchB ? action :
8693                               i == Ydrip_1_s ? action :
8694                               i == Ydrip_1_sB ? action :
8695                               i == Yball_1 ? action :
8696                               i == Xball_2 ? action :
8697                               i == Yball_2 ? action :
8698                               i == Yball_blank ? action :
8699                               i == Ykey_1_blank ? action :
8700                               i == Ykey_2_blank ? action :
8701                               i == Ykey_3_blank ? action :
8702                               i == Ykey_4_blank ? action :
8703                               i == Ykey_5_blank ? action :
8704                               i == Ykey_6_blank ? action :
8705                               i == Ykey_7_blank ? action :
8706                               i == Ykey_8_blank ? action :
8707                               i == Ylenses_blank ? action :
8708                               i == Ymagnify_blank ? action :
8709                               i == Ygrass_blank ? action :
8710                               i == Ydirt_blank ? action :
8711                               i == Xsand_stonein_1 ? action :
8712                               i == Xsand_stonein_2 ? action :
8713                               i == Xsand_stonein_3 ? action :
8714                               i == Xsand_stonein_4 ? action :
8715                               i == Xsand_stoneout_1 ? action :
8716                               i == Xsand_stoneout_2 ? action :
8717                               i == Xboom_android ? ACTION_EXPLODING :
8718                               action_exploding ? ACTION_EXPLODING :
8719                               action_active ? action :
8720                               action_other ? action :
8721                               ACTION_DEFAULT);
8722       int graphic = (el_act_dir2img(effective_element, effective_action,
8723                                     direction));
8724       int crumbled = (el_act_dir2crm(effective_element, effective_action,
8725                                      direction));
8726       int base_graphic = el_act2img(effective_element, ACTION_DEFAULT);
8727       int base_crumbled = el_act2crm(effective_element, ACTION_DEFAULT);
8728       boolean has_action_graphics = (graphic != base_graphic);
8729       boolean has_crumbled_graphics = (base_crumbled != base_graphic);
8730       struct GraphicInfo *g = &graphic_info[graphic];
8731       struct GraphicInfo_EM *g_em = &graphic_info_em_object[i][j];
8732       Bitmap *src_bitmap;
8733       int src_x, src_y;
8734       // ensure to get symmetric 3-frame, 2-delay animations as used in EM
8735       boolean special_animation = (action != ACTION_DEFAULT &&
8736                                    g->anim_frames == 3 &&
8737                                    g->anim_delay == 2 &&
8738                                    g->anim_mode & ANIM_LINEAR);
8739       int sync_frame = (i == Xdrip_stretch ? 7 :
8740                         i == Xdrip_stretchB ? 7 :
8741                         i == Ydrip_2_s ? j + 8 :
8742                         i == Ydrip_2_sB ? j + 8 :
8743                         i == Xacid_1 ? 0 :
8744                         i == Xacid_2 ? 10 :
8745                         i == Xacid_3 ? 20 :
8746                         i == Xacid_4 ? 30 :
8747                         i == Xacid_5 ? 40 :
8748                         i == Xacid_6 ? 50 :
8749                         i == Xacid_7 ? 60 :
8750                         i == Xacid_8 ? 70 :
8751                         i == Xfake_acid_1 ? 0 :
8752                         i == Xfake_acid_2 ? 10 :
8753                         i == Xfake_acid_3 ? 20 :
8754                         i == Xfake_acid_4 ? 30 :
8755                         i == Xfake_acid_5 ? 40 :
8756                         i == Xfake_acid_6 ? 50 :
8757                         i == Xfake_acid_7 ? 60 :
8758                         i == Xfake_acid_8 ? 70 :
8759                         i == Xball_2 ? 7 :
8760                         i == Yball_2 ? j + 8 :
8761                         i == Yball_blank ? j + 1 :
8762                         i == Ykey_1_blank ? j + 1 :
8763                         i == Ykey_2_blank ? j + 1 :
8764                         i == Ykey_3_blank ? j + 1 :
8765                         i == Ykey_4_blank ? j + 1 :
8766                         i == Ykey_5_blank ? j + 1 :
8767                         i == Ykey_6_blank ? j + 1 :
8768                         i == Ykey_7_blank ? j + 1 :
8769                         i == Ykey_8_blank ? j + 1 :
8770                         i == Ylenses_blank ? j + 1 :
8771                         i == Ymagnify_blank ? j + 1 :
8772                         i == Ygrass_blank ? j + 1 :
8773                         i == Ydirt_blank ? j + 1 :
8774                         i == Xamoeba_1 ? 0 :
8775                         i == Xamoeba_2 ? 1 :
8776                         i == Xamoeba_3 ? 2 :
8777                         i == Xamoeba_4 ? 3 :
8778                         i == Xamoeba_5 ? 0 :
8779                         i == Xamoeba_6 ? 1 :
8780                         i == Xamoeba_7 ? 2 :
8781                         i == Xamoeba_8 ? 3 :
8782                         i == Xexit_2 ? j + 8 :
8783                         i == Xexit_3 ? j + 16 :
8784                         i == Xdynamite_1 ? 0 :
8785                         i == Xdynamite_2 ? 8 :
8786                         i == Xdynamite_3 ? 16 :
8787                         i == Xdynamite_4 ? 24 :
8788                         i == Xsand_stonein_1 ? j + 1 :
8789                         i == Xsand_stonein_2 ? j + 9 :
8790                         i == Xsand_stonein_3 ? j + 17 :
8791                         i == Xsand_stonein_4 ? j + 25 :
8792                         i == Xsand_stoneout_1 && j == 0 ? 0 :
8793                         i == Xsand_stoneout_1 && j == 1 ? 0 :
8794                         i == Xsand_stoneout_1 && j == 2 ? 1 :
8795                         i == Xsand_stoneout_1 && j == 3 ? 2 :
8796                         i == Xsand_stoneout_1 && j == 4 ? 2 :
8797                         i == Xsand_stoneout_1 && j == 5 ? 3 :
8798                         i == Xsand_stoneout_1 && j == 6 ? 4 :
8799                         i == Xsand_stoneout_1 && j == 7 ? 4 :
8800                         i == Xsand_stoneout_2 && j == 0 ? 5 :
8801                         i == Xsand_stoneout_2 && j == 1 ? 6 :
8802                         i == Xsand_stoneout_2 && j == 2 ? 7 :
8803                         i == Xsand_stoneout_2 && j == 3 ? 8 :
8804                         i == Xsand_stoneout_2 && j == 4 ? 9 :
8805                         i == Xsand_stoneout_2 && j == 5 ? 11 :
8806                         i == Xsand_stoneout_2 && j == 6 ? 13 :
8807                         i == Xsand_stoneout_2 && j == 7 ? 15 :
8808                         i == Xboom_bug && j == 1 ? 2 :
8809                         i == Xboom_bug && j == 2 ? 2 :
8810                         i == Xboom_bug && j == 3 ? 4 :
8811                         i == Xboom_bug && j == 4 ? 4 :
8812                         i == Xboom_bug && j == 5 ? 2 :
8813                         i == Xboom_bug && j == 6 ? 2 :
8814                         i == Xboom_bug && j == 7 ? 0 :
8815                         i == Xboom_tank && j == 1 ? 2 :
8816                         i == Xboom_tank && j == 2 ? 2 :
8817                         i == Xboom_tank && j == 3 ? 4 :
8818                         i == Xboom_tank && j == 4 ? 4 :
8819                         i == Xboom_tank && j == 5 ? 2 :
8820                         i == Xboom_tank && j == 6 ? 2 :
8821                         i == Xboom_tank && j == 7 ? 0 :
8822                         i == Xboom_android && j == 7 ? 6 :
8823                         i == Xboom_1 && j == 1 ? 2 :
8824                         i == Xboom_1 && j == 2 ? 2 :
8825                         i == Xboom_1 && j == 3 ? 4 :
8826                         i == Xboom_1 && j == 4 ? 4 :
8827                         i == Xboom_1 && j == 5 ? 6 :
8828                         i == Xboom_1 && j == 6 ? 6 :
8829                         i == Xboom_1 && j == 7 ? 8 :
8830                         i == Xboom_2 && j == 0 ? 8 :
8831                         i == Xboom_2 && j == 1 ? 8 :
8832                         i == Xboom_2 && j == 2 ? 10 :
8833                         i == Xboom_2 && j == 3 ? 10 :
8834                         i == Xboom_2 && j == 4 ? 10 :
8835                         i == Xboom_2 && j == 5 ? 12 :
8836                         i == Xboom_2 && j == 6 ? 12 :
8837                         i == Xboom_2 && j == 7 ? 12 :
8838                         special_animation && j == 4 ? 3 :
8839                         effective_action != action ? 0 :
8840                         j);
8841       int frame = getAnimationFrame(g->anim_frames,
8842                                     g->anim_delay,
8843                                     g->anim_mode,
8844                                     g->anim_start_frame,
8845                                     sync_frame);
8846
8847       getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y,
8848                           g->double_movement && is_backside);
8849
8850       g_em->bitmap = src_bitmap;
8851       g_em->src_x = src_x;
8852       g_em->src_y = src_y;
8853       g_em->src_offset_x = 0;
8854       g_em->src_offset_y = 0;
8855       g_em->dst_offset_x = 0;
8856       g_em->dst_offset_y = 0;
8857       g_em->width  = TILEX;
8858       g_em->height = TILEY;
8859
8860       g_em->preserve_background = FALSE;
8861
8862       set_crumbled_graphics_EM(g_em, has_crumbled_graphics, crumbled,
8863                                sync_frame);
8864
8865       if ((!g->double_movement && (effective_action == ACTION_FALLING ||
8866                                    effective_action == ACTION_MOVING  ||
8867                                    effective_action == ACTION_PUSHING ||
8868                                    effective_action == ACTION_EATING)) ||
8869           (!has_action_graphics && (effective_action == ACTION_FILLING ||
8870                                     effective_action == ACTION_EMPTYING)))
8871       {
8872         int move_dir =
8873           (effective_action == ACTION_FALLING ||
8874            effective_action == ACTION_FILLING ||
8875            effective_action == ACTION_EMPTYING ? MV_DOWN : direction);
8876         int dx = (move_dir == MV_LEFT ? -1 : move_dir == MV_RIGHT ? 1 : 0);
8877         int dy = (move_dir == MV_UP   ? -1 : move_dir == MV_DOWN  ? 1 : 0);
8878         int num_steps = (i == Ydrip_1_s  ? 16 :
8879                          i == Ydrip_1_sB ? 16 :
8880                          i == Ydrip_2_s  ? 16 :
8881                          i == Ydrip_2_sB ? 16 :
8882                          i == Xsand_stonein_1 ? 32 :
8883                          i == Xsand_stonein_2 ? 32 :
8884                          i == Xsand_stonein_3 ? 32 :
8885                          i == Xsand_stonein_4 ? 32 :
8886                          i == Xsand_stoneout_1 ? 16 :
8887                          i == Xsand_stoneout_2 ? 16 : 8);
8888         int cx = ABS(dx) * (TILEX / num_steps);
8889         int cy = ABS(dy) * (TILEY / num_steps);
8890         int step_frame = (i == Ydrip_2_s        ? j + 8 :
8891                           i == Ydrip_2_sB       ? j + 8 :
8892                           i == Xsand_stonein_2  ? j + 8 :
8893                           i == Xsand_stonein_3  ? j + 16 :
8894                           i == Xsand_stonein_4  ? j + 24 :
8895                           i == Xsand_stoneout_2 ? j + 8 : j) + 1;
8896         int step = (is_backside ? step_frame : num_steps - step_frame);
8897
8898         if (is_backside)        // tile where movement starts
8899         {
8900           if (dx < 0 || dy < 0)
8901           {
8902             g_em->src_offset_x = cx * step;
8903             g_em->src_offset_y = cy * step;
8904           }
8905           else
8906           {
8907             g_em->dst_offset_x = cx * step;
8908             g_em->dst_offset_y = cy * step;
8909           }
8910         }
8911         else                    // tile where movement ends
8912         {
8913           if (dx < 0 || dy < 0)
8914           {
8915             g_em->dst_offset_x = cx * step;
8916             g_em->dst_offset_y = cy * step;
8917           }
8918           else
8919           {
8920             g_em->src_offset_x = cx * step;
8921             g_em->src_offset_y = cy * step;
8922           }
8923         }
8924
8925         g_em->width  = TILEX - cx * step;
8926         g_em->height = TILEY - cy * step;
8927       }
8928
8929       // create unique graphic identifier to decide if tile must be redrawn
8930       /* bit 31 - 16 (16 bit): EM style graphic
8931          bit 15 - 12 ( 4 bit): EM style frame
8932          bit 11 -  6 ( 6 bit): graphic width
8933          bit  5 -  0 ( 6 bit): graphic height */
8934       g_em->unique_identifier =
8935         (graphic << 16) | (frame << 12) | (g_em->width << 6) | g_em->height;
8936     }
8937   }
8938
8939   for (i = 0; i < GAME_TILE_MAX; i++)
8940   {
8941     for (j = 0; j < 8; j++)
8942     {
8943       int element = object_mapping[i].element_rnd;
8944       int action = object_mapping[i].action;
8945       int direction = object_mapping[i].direction;
8946       boolean is_backside = object_mapping[i].is_backside;
8947       int graphic_action  = el_act_dir2img(element, action, direction);
8948       int graphic_default = el_act_dir2img(element, ACTION_DEFAULT, direction);
8949
8950       if ((action == ACTION_SMASHED_BY_ROCK ||
8951            action == ACTION_SMASHED_BY_SPRING ||
8952            action == ACTION_EATING) &&
8953           graphic_action == graphic_default)
8954       {
8955         int e = (action == ACTION_SMASHED_BY_ROCK   ? Ystone_s  :
8956                  action == ACTION_SMASHED_BY_SPRING ? Yspring_s :
8957                  direction == MV_LEFT  ? (is_backside? Yspring_wB: Yspring_w) :
8958                  direction == MV_RIGHT ? (is_backside? Yspring_eB: Yspring_e) :
8959                  Xspring);
8960
8961         // no separate animation for "smashed by rock" -- use rock instead
8962         struct GraphicInfo_EM *g_em = &graphic_info_em_object[i][j];
8963         struct GraphicInfo_EM *g_xx = &graphic_info_em_object[e][j];
8964
8965         g_em->bitmap            = g_xx->bitmap;
8966         g_em->src_x             = g_xx->src_x;
8967         g_em->src_y             = g_xx->src_y;
8968         g_em->src_offset_x      = g_xx->src_offset_x;
8969         g_em->src_offset_y      = g_xx->src_offset_y;
8970         g_em->dst_offset_x      = g_xx->dst_offset_x;
8971         g_em->dst_offset_y      = g_xx->dst_offset_y;
8972         g_em->width             = g_xx->width;
8973         g_em->height            = g_xx->height;
8974         g_em->unique_identifier = g_xx->unique_identifier;
8975
8976         if (!is_backside)
8977           g_em->preserve_background = TRUE;
8978       }
8979     }
8980   }
8981
8982   for (p = 0; p < MAX_PLAYERS; p++)
8983   {
8984     for (i = 0; i < PLY_MAX; i++)
8985     {
8986       int element = player_mapping[p][i].element_rnd;
8987       int action = player_mapping[p][i].action;
8988       int direction = player_mapping[p][i].direction;
8989
8990       for (j = 0; j < 8; j++)
8991       {
8992         int effective_element = element;
8993         int effective_action = action;
8994         int graphic = (direction == MV_NONE ?
8995                        el_act2img(effective_element, effective_action) :
8996                        el_act_dir2img(effective_element, effective_action,
8997                                       direction));
8998         struct GraphicInfo *g = &graphic_info[graphic];
8999         struct GraphicInfo_EM *g_em = &graphic_info_em_player[p][i][j];
9000         Bitmap *src_bitmap;
9001         int src_x, src_y;
9002         int sync_frame = j;
9003         int frame = getAnimationFrame(g->anim_frames,
9004                                       g->anim_delay,
9005                                       g->anim_mode,
9006                                       g->anim_start_frame,
9007                                       sync_frame);
9008
9009         getGraphicSourceExt(graphic, frame, &src_bitmap, &src_x, &src_y, FALSE);
9010
9011         g_em->bitmap = src_bitmap;
9012         g_em->src_x = src_x;
9013         g_em->src_y = src_y;
9014         g_em->src_offset_x = 0;
9015         g_em->src_offset_y = 0;
9016         g_em->dst_offset_x = 0;
9017         g_em->dst_offset_y = 0;
9018         g_em->width  = TILEX;
9019         g_em->height = TILEY;
9020       }
9021     }
9022   }
9023 }
9024
9025 static void CheckSaveEngineSnapshot_EM(byte action[MAX_PLAYERS], int frame,
9026                                        boolean any_player_moving,
9027                                        boolean any_player_snapping,
9028                                        boolean any_player_dropping)
9029 {
9030   if (frame == 7 && !any_player_dropping)
9031   {
9032     if (!local_player->was_waiting)
9033     {
9034       if (!CheckSaveEngineSnapshotToList())
9035         return;
9036
9037       local_player->was_waiting = TRUE;
9038     }
9039   }
9040   else if (any_player_moving || any_player_snapping || any_player_dropping)
9041   {
9042     local_player->was_waiting = FALSE;
9043   }
9044 }
9045
9046 static void CheckSaveEngineSnapshot_SP(boolean murphy_is_waiting,
9047                                        boolean murphy_is_dropping)
9048 {
9049   if (murphy_is_waiting)
9050   {
9051     if (!local_player->was_waiting)
9052     {
9053       if (!CheckSaveEngineSnapshotToList())
9054         return;
9055
9056       local_player->was_waiting = TRUE;
9057     }
9058   }
9059   else
9060   {
9061     local_player->was_waiting = FALSE;
9062   }
9063 }
9064
9065 static void CheckSaveEngineSnapshot_MM(boolean element_clicked,
9066                                        boolean button_released)
9067 {
9068   if (button_released)
9069   {
9070     if (game.snapshot.mode == SNAPSHOT_MODE_EVERY_MOVE)
9071       CheckSaveEngineSnapshotToList();
9072   }
9073   else if (element_clicked)
9074   {
9075     if (game.snapshot.mode != SNAPSHOT_MODE_EVERY_MOVE)
9076       CheckSaveEngineSnapshotToList();
9077
9078     game.snapshot.changed_action = TRUE;
9079   }
9080 }
9081
9082 boolean CheckSingleStepMode_EM(byte action[MAX_PLAYERS], int frame,
9083                                boolean any_player_moving,
9084                                boolean any_player_snapping,
9085                                boolean any_player_dropping)
9086 {
9087   if (tape.single_step && tape.recording && !tape.pausing)
9088     if (frame == 7 && !any_player_dropping)
9089       TapeTogglePause(TAPE_TOGGLE_AUTOMATIC);
9090
9091   CheckSaveEngineSnapshot_EM(action, frame, any_player_moving,
9092                              any_player_snapping, any_player_dropping);
9093
9094   return tape.pausing;
9095 }
9096
9097 void CheckSingleStepMode_SP(boolean murphy_is_waiting,
9098                             boolean murphy_is_dropping)
9099 {
9100   boolean murphy_starts_dropping = FALSE;
9101   int i;
9102
9103   for (i = 0; i < MAX_PLAYERS; i++)
9104     if (stored_player[i].force_dropping)
9105       murphy_starts_dropping = TRUE;
9106
9107   if (tape.single_step && tape.recording && !tape.pausing)
9108     if (murphy_is_waiting && !murphy_starts_dropping)
9109       TapeTogglePause(TAPE_TOGGLE_AUTOMATIC);
9110
9111   CheckSaveEngineSnapshot_SP(murphy_is_waiting, murphy_is_dropping);
9112 }
9113
9114 void CheckSingleStepMode_MM(boolean element_clicked,
9115                             boolean button_released)
9116 {
9117   if (tape.single_step && tape.recording && !tape.pausing)
9118     if (button_released)
9119       TapeTogglePause(TAPE_TOGGLE_AUTOMATIC);
9120
9121   CheckSaveEngineSnapshot_MM(element_clicked, button_released);
9122 }
9123
9124 void getGraphicSource_SP(struct GraphicInfo_SP *g_sp,
9125                          int graphic, int sync_frame, int x, int y)
9126 {
9127   int frame = getGraphicAnimationFrame(graphic, sync_frame);
9128
9129   getGraphicSource(graphic, frame, &g_sp->bitmap, &g_sp->src_x, &g_sp->src_y);
9130 }
9131
9132 boolean isNextAnimationFrame_SP(int graphic, int sync_frame)
9133 {
9134   return (IS_NEXT_FRAME(sync_frame, graphic));
9135 }
9136
9137 int getGraphicInfo_Delay(int graphic)
9138 {
9139   return graphic_info[graphic].anim_delay;
9140 }
9141
9142 void PlayMenuSoundExt(int sound)
9143 {
9144   if (sound == SND_UNDEFINED)
9145     return;
9146
9147   if ((!setup.sound_simple && !IS_LOOP_SOUND(sound)) ||
9148       (!setup.sound_loops && IS_LOOP_SOUND(sound)))
9149     return;
9150
9151   if (IS_LOOP_SOUND(sound))
9152     PlaySoundLoop(sound);
9153   else
9154     PlaySound(sound);
9155 }
9156
9157 void PlayMenuSound(void)
9158 {
9159   PlayMenuSoundExt(menu.sound[game_status]);
9160 }
9161
9162 void PlayMenuSoundStereo(int sound, int stereo_position)
9163 {
9164   if (sound == SND_UNDEFINED)
9165     return;
9166
9167   if ((!setup.sound_simple && !IS_LOOP_SOUND(sound)) ||
9168       (!setup.sound_loops && IS_LOOP_SOUND(sound)))
9169     return;
9170
9171   if (IS_LOOP_SOUND(sound))
9172     PlaySoundExt(sound, SOUND_MAX_VOLUME, stereo_position, SND_CTRL_PLAY_LOOP);
9173   else
9174     PlaySoundStereo(sound, stereo_position);
9175 }
9176
9177 void PlayMenuSoundIfLoopExt(int sound)
9178 {
9179   if (sound == SND_UNDEFINED)
9180     return;
9181
9182   if ((!setup.sound_simple && !IS_LOOP_SOUND(sound)) ||
9183       (!setup.sound_loops && IS_LOOP_SOUND(sound)))
9184     return;
9185
9186   if (IS_LOOP_SOUND(sound))
9187     PlaySoundLoop(sound);
9188 }
9189
9190 void PlayMenuSoundIfLoop(void)
9191 {
9192   PlayMenuSoundIfLoopExt(menu.sound[game_status]);
9193 }
9194
9195 void PlayMenuMusicExt(int music)
9196 {
9197   if (music == MUS_UNDEFINED)
9198     return;
9199
9200   if (!setup.sound_music)
9201     return;
9202
9203   if (IS_LOOP_MUSIC(music))
9204     PlayMusicLoop(music);
9205   else
9206     PlayMusic(music);
9207 }
9208
9209 void PlayMenuMusic(void)
9210 {
9211   char *curr_music = getCurrentlyPlayingMusicFilename();
9212   char *next_music = getMusicInfoEntryFilename(menu.music[game_status]);
9213
9214   if (!strEqual(curr_music, next_music))
9215     PlayMenuMusicExt(menu.music[game_status]);
9216 }
9217
9218 void PlayMenuSoundsAndMusic(void)
9219 {
9220   PlayMenuSound();
9221   PlayMenuMusic();
9222 }
9223
9224 static void FadeMenuSounds(void)
9225 {
9226   FadeSounds();
9227 }
9228
9229 static void FadeMenuMusic(void)
9230 {
9231   char *curr_music = getCurrentlyPlayingMusicFilename();
9232   char *next_music = getMusicInfoEntryFilename(menu.music[game_status]);
9233
9234   if (!strEqual(curr_music, next_music))
9235     FadeMusic();
9236 }
9237
9238 void FadeMenuSoundsAndMusic(void)
9239 {
9240   FadeMenuSounds();
9241   FadeMenuMusic();
9242 }
9243
9244 void PlaySoundActivating(void)
9245 {
9246 #if 0
9247   PlaySound(SND_MENU_ITEM_ACTIVATING);
9248 #endif
9249 }
9250
9251 void PlaySoundSelecting(void)
9252 {
9253 #if 0
9254   PlaySound(SND_MENU_ITEM_SELECTING);
9255 #endif
9256 }
9257
9258 void ToggleFullscreenIfNeeded(void)
9259 {
9260   // if setup and video fullscreen state are already matching, nothing do do
9261   if (setup.fullscreen == video.fullscreen_enabled ||
9262       !video.fullscreen_available)
9263     return;
9264
9265   SDLSetWindowFullscreen(setup.fullscreen);
9266
9267   // set setup value according to successfully changed fullscreen mode
9268   setup.fullscreen = video.fullscreen_enabled;
9269 }
9270
9271 void ChangeWindowScalingIfNeeded(void)
9272 {
9273   // if setup and video window scaling are already matching, nothing do do
9274   if (setup.window_scaling_percent == video.window_scaling_percent ||
9275       video.fullscreen_enabled)
9276     return;
9277
9278   SDLSetWindowScaling(setup.window_scaling_percent);
9279
9280   // set setup value according to successfully changed window scaling
9281   setup.window_scaling_percent = video.window_scaling_percent;
9282 }
9283
9284 void ChangeVsyncModeIfNeeded(void)
9285 {
9286   int setup_vsync_mode = VSYNC_MODE_STR_TO_INT(setup.vsync_mode);
9287   int video_vsync_mode = video.vsync_mode;
9288
9289   // if setup and video vsync mode are already matching, nothing do do
9290   if (setup_vsync_mode == video_vsync_mode)
9291     return;
9292
9293   // if renderer is using OpenGL, vsync mode can directly be changed
9294   SDLSetScreenVsyncMode(setup.vsync_mode);
9295
9296   // if vsync mode unchanged, try re-creating renderer to set vsync mode
9297   if (video.vsync_mode == video_vsync_mode)
9298   {
9299     Bitmap *tmp_backbuffer = CreateBitmap(WIN_XSIZE, WIN_YSIZE, DEFAULT_DEPTH);
9300
9301     // save backbuffer content which gets lost when re-creating screen
9302     BlitBitmap(backbuffer, tmp_backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
9303
9304     // force re-creating screen and renderer to set new vsync mode
9305     video.fullscreen_enabled = !setup.fullscreen;
9306
9307     // when creating new renderer, destroy textures linked to old renderer
9308     FreeAllImageTextures();     // needs old renderer to free the textures
9309
9310     // re-create screen and renderer (including change of vsync mode)
9311     ChangeVideoModeIfNeeded(setup.fullscreen);
9312
9313     // set setup value according to successfully changed fullscreen mode
9314     setup.fullscreen = video.fullscreen_enabled;
9315
9316     // restore backbuffer content from temporary backbuffer backup bitmap
9317     BlitBitmap(tmp_backbuffer, backbuffer, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
9318     FreeBitmap(tmp_backbuffer);
9319
9320     // update visible window/screen
9321     BlitBitmap(backbuffer, window, 0, 0, WIN_XSIZE, WIN_YSIZE, 0, 0);
9322
9323     // when changing vsync mode, re-create textures for new renderer
9324     InitImageTextures();
9325   }
9326
9327   // set setup value according to successfully changed vsync mode
9328   setup.vsync_mode = VSYNC_MODE_INT_TO_STR(video.vsync_mode);
9329 }
9330
9331 static void JoinRectangles(int *x, int *y, int *width, int *height,
9332                            int x2, int y2, int width2, int height2)
9333 {
9334   // do not join with "off-screen" rectangle
9335   if (x2 == -1 || y2 == -1)
9336     return;
9337
9338   *x = MIN(*x, x2);
9339   *y = MIN(*y, y2);
9340   *width = MAX(*width, width2);
9341   *height = MAX(*height, height2);
9342 }
9343
9344 void SetAnimStatus(int anim_status_new)
9345 {
9346   if (anim_status_new == GAME_MODE_MAIN)
9347     anim_status_new = GAME_MODE_PSEUDO_MAINONLY;
9348   else if (anim_status_new == GAME_MODE_SCORES)
9349     anim_status_new = GAME_MODE_PSEUDO_SCORESOLD;
9350
9351   global.anim_status_next = anim_status_new;
9352
9353   // directly set screen modes that are entered without fading
9354   if ((global.anim_status      == GAME_MODE_PSEUDO_MAINONLY &&
9355        global.anim_status_next == GAME_MODE_PSEUDO_TYPENAME) ||
9356       (global.anim_status      == GAME_MODE_PSEUDO_TYPENAME &&
9357        global.anim_status_next == GAME_MODE_PSEUDO_MAINONLY))
9358     global.anim_status = global.anim_status_next;
9359 }
9360
9361 void SetGameStatus(int game_status_new)
9362 {
9363   if (game_status_new != game_status)
9364     game_status_last_screen = game_status;
9365
9366   game_status = game_status_new;
9367
9368   SetAnimStatus(game_status_new);
9369 }
9370
9371 void SetFontStatus(int game_status_new)
9372 {
9373   static int last_game_status = -1;
9374
9375   if (game_status_new != -1)
9376   {
9377     // set game status for font use after storing last game status
9378     last_game_status = game_status;
9379     game_status = game_status_new;
9380   }
9381   else
9382   {
9383     // reset game status after font use from last stored game status
9384     game_status = last_game_status;
9385   }
9386 }
9387
9388 void ResetFontStatus(void)
9389 {
9390   SetFontStatus(-1);
9391 }
9392
9393 void SetLevelSetInfo(char *identifier, int level_nr)
9394 {
9395   setString(&levelset.identifier, identifier);
9396
9397   levelset.level_nr = level_nr;
9398 }
9399
9400 boolean CheckIfAllViewportsHaveChanged(void)
9401 {
9402   // if game status has not changed, viewports have not changed either
9403   if (game_status == game_status_last)
9404     return FALSE;
9405
9406   // check if all viewports have changed with current game status
9407
9408   struct RectWithBorder *vp_playfield = &viewport.playfield[game_status];
9409   struct RectWithBorder *vp_door_1    = &viewport.door_1[game_status];
9410   struct RectWithBorder *vp_door_2    = &viewport.door_2[game_status];
9411   int new_real_sx       = vp_playfield->x;
9412   int new_real_sy       = vp_playfield->y;
9413   int new_full_sxsize   = vp_playfield->width;
9414   int new_full_sysize   = vp_playfield->height;
9415   int new_dx            = vp_door_1->x;
9416   int new_dy            = vp_door_1->y;
9417   int new_dxsize        = vp_door_1->width;
9418   int new_dysize        = vp_door_1->height;
9419   int new_vx            = vp_door_2->x;
9420   int new_vy            = vp_door_2->y;
9421   int new_vxsize        = vp_door_2->width;
9422   int new_vysize        = vp_door_2->height;
9423
9424   boolean playfield_viewport_has_changed =
9425     (new_real_sx != REAL_SX ||
9426      new_real_sy != REAL_SY ||
9427      new_full_sxsize != FULL_SXSIZE ||
9428      new_full_sysize != FULL_SYSIZE);
9429
9430   boolean door_1_viewport_has_changed =
9431     (new_dx != DX ||
9432      new_dy != DY ||
9433      new_dxsize != DXSIZE ||
9434      new_dysize != DYSIZE);
9435
9436   boolean door_2_viewport_has_changed =
9437     (new_vx != VX ||
9438      new_vy != VY ||
9439      new_vxsize != VXSIZE ||
9440      new_vysize != VYSIZE ||
9441      game_status_last == GAME_MODE_EDITOR);
9442
9443   return (playfield_viewport_has_changed &&
9444           door_1_viewport_has_changed &&
9445           door_2_viewport_has_changed);
9446 }
9447
9448 boolean CheckFadeAll(void)
9449 {
9450   return (CheckIfGlobalBorderHasChanged() ||
9451           CheckIfAllViewportsHaveChanged());
9452 }
9453
9454 void ChangeViewportPropertiesIfNeeded(void)
9455 {
9456   boolean use_mini_tilesize = (level.game_engine_type == GAME_ENGINE_TYPE_MM ?
9457                                FALSE : setup.small_game_graphics);
9458   int gfx_game_mode = game_status;
9459   int gfx_game_mode2 = (game_status == GAME_MODE_EDITOR ? GAME_MODE_DEFAULT :
9460                         game_status);
9461   struct RectWithBorder *vp_window    = &viewport.window[gfx_game_mode];
9462   struct RectWithBorder *vp_playfield = &viewport.playfield[gfx_game_mode];
9463   struct RectWithBorder *vp_door_1    = &viewport.door_1[gfx_game_mode];
9464   struct RectWithBorder *vp_door_2    = &viewport.door_2[gfx_game_mode2];
9465   struct RectWithBorder *vp_door_3    = &viewport.door_2[GAME_MODE_EDITOR];
9466   int new_win_xsize     = vp_window->width;
9467   int new_win_ysize     = vp_window->height;
9468   int border_left       = vp_playfield->border_left;
9469   int border_right      = vp_playfield->border_right;
9470   int border_top        = vp_playfield->border_top;
9471   int border_bottom     = vp_playfield->border_bottom;
9472   int new_sx            = vp_playfield->x      + border_left;
9473   int new_sy            = vp_playfield->y      + border_top;
9474   int new_sxsize        = vp_playfield->width  - border_left - border_right;
9475   int new_sysize        = vp_playfield->height - border_top  - border_bottom;
9476   int new_real_sx       = vp_playfield->x;
9477   int new_real_sy       = vp_playfield->y;
9478   int new_full_sxsize   = vp_playfield->width;
9479   int new_full_sysize   = vp_playfield->height;
9480   int new_dx            = vp_door_1->x;
9481   int new_dy            = vp_door_1->y;
9482   int new_dxsize        = vp_door_1->width;
9483   int new_dysize        = vp_door_1->height;
9484   int new_vx            = vp_door_2->x;
9485   int new_vy            = vp_door_2->y;
9486   int new_vxsize        = vp_door_2->width;
9487   int new_vysize        = vp_door_2->height;
9488   int new_ex            = vp_door_3->x;
9489   int new_ey            = vp_door_3->y;
9490   int new_exsize        = vp_door_3->width;
9491   int new_eysize        = vp_door_3->height;
9492   int new_tilesize_var = (use_mini_tilesize ? MINI_TILESIZE : game.tile_size);
9493   int tilesize = (gfx_game_mode == GAME_MODE_PLAYING ? new_tilesize_var :
9494                   gfx_game_mode == GAME_MODE_EDITOR ? MINI_TILESIZE : TILESIZE);
9495   int new_scr_fieldx = new_sxsize / tilesize;
9496   int new_scr_fieldy = new_sysize / tilesize;
9497   int new_scr_fieldx_buffers = new_sxsize / new_tilesize_var;
9498   int new_scr_fieldy_buffers = new_sysize / new_tilesize_var;
9499   boolean init_gfx_buffers = FALSE;
9500   boolean init_video_buffer = FALSE;
9501   boolean init_gadgets_and_anims = FALSE;
9502   boolean init_em_graphics = FALSE;
9503
9504   if (new_win_xsize != WIN_XSIZE ||
9505       new_win_ysize != WIN_YSIZE)
9506   {
9507     WIN_XSIZE = new_win_xsize;
9508     WIN_YSIZE = new_win_ysize;
9509
9510     init_video_buffer = TRUE;
9511     init_gfx_buffers = TRUE;
9512     init_gadgets_and_anims = TRUE;
9513
9514     // Debug("tools:viewport", "video: init_video_buffer, init_gfx_buffers");
9515   }
9516
9517   if (new_scr_fieldx != SCR_FIELDX ||
9518       new_scr_fieldy != SCR_FIELDY)
9519   {
9520     // this always toggles between MAIN and GAME when using small tile size
9521
9522     SCR_FIELDX = new_scr_fieldx;
9523     SCR_FIELDY = new_scr_fieldy;
9524
9525     // Debug("tools:viewport", "new_scr_fieldx != SCR_FIELDX ...");
9526   }
9527
9528   if (new_sx != SX ||
9529       new_sy != SY ||
9530       new_dx != DX ||
9531       new_dy != DY ||
9532       new_vx != VX ||
9533       new_vy != VY ||
9534       new_ex != EX ||
9535       new_ey != EY ||
9536       new_sxsize != SXSIZE ||
9537       new_sysize != SYSIZE ||
9538       new_dxsize != DXSIZE ||
9539       new_dysize != DYSIZE ||
9540       new_vxsize != VXSIZE ||
9541       new_vysize != VYSIZE ||
9542       new_exsize != EXSIZE ||
9543       new_eysize != EYSIZE ||
9544       new_real_sx != REAL_SX ||
9545       new_real_sy != REAL_SY ||
9546       new_full_sxsize != FULL_SXSIZE ||
9547       new_full_sysize != FULL_SYSIZE ||
9548       new_tilesize_var != TILESIZE_VAR
9549       )
9550   {
9551     // ------------------------------------------------------------------------
9552     // determine next fading area for changed viewport definitions
9553     // ------------------------------------------------------------------------
9554
9555     // start with current playfield area (default fading area)
9556     FADE_SX = REAL_SX;
9557     FADE_SY = REAL_SY;
9558     FADE_SXSIZE = FULL_SXSIZE;
9559     FADE_SYSIZE = FULL_SYSIZE;
9560
9561     // add new playfield area if position or size has changed
9562     if (new_real_sx != REAL_SX || new_real_sy != REAL_SY ||
9563         new_full_sxsize != FULL_SXSIZE || new_full_sysize != FULL_SYSIZE)
9564     {
9565       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
9566                      new_real_sx, new_real_sy, new_full_sxsize,new_full_sysize);
9567     }
9568
9569     // add current and new door 1 area if position or size has changed
9570     if (new_dx != DX || new_dy != DY ||
9571         new_dxsize != DXSIZE || new_dysize != DYSIZE)
9572     {
9573       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
9574                      DX, DY, DXSIZE, DYSIZE);
9575       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
9576                      new_dx, new_dy, new_dxsize, new_dysize);
9577     }
9578
9579     // add current and new door 2 area if position or size has changed
9580     if (new_vx != VX || new_vy != VY ||
9581         new_vxsize != VXSIZE || new_vysize != VYSIZE)
9582     {
9583       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
9584                      VX, VY, VXSIZE, VYSIZE);
9585       JoinRectangles(&FADE_SX, &FADE_SY, &FADE_SXSIZE, &FADE_SYSIZE,
9586                      new_vx, new_vy, new_vxsize, new_vysize);
9587     }
9588
9589     // ------------------------------------------------------------------------
9590     // handle changed tile size
9591     // ------------------------------------------------------------------------
9592
9593     if (new_tilesize_var != TILESIZE_VAR)
9594     {
9595       // Debug("tools:viewport", "new_tilesize_var != TILESIZE_VAR");
9596
9597       // changing tile size invalidates scroll values of engine snapshots
9598       FreeEngineSnapshotSingle();
9599
9600       // changing tile size requires update of graphic mapping for EM engine
9601       init_em_graphics = TRUE;
9602     }
9603
9604     SX = new_sx;
9605     SY = new_sy;
9606     DX = new_dx;
9607     DY = new_dy;
9608     VX = new_vx;
9609     VY = new_vy;
9610     EX = new_ex;
9611     EY = new_ey;
9612     SXSIZE = new_sxsize;
9613     SYSIZE = new_sysize;
9614     DXSIZE = new_dxsize;
9615     DYSIZE = new_dysize;
9616     VXSIZE = new_vxsize;
9617     VYSIZE = new_vysize;
9618     EXSIZE = new_exsize;
9619     EYSIZE = new_eysize;
9620     REAL_SX = new_real_sx;
9621     REAL_SY = new_real_sy;
9622     FULL_SXSIZE = new_full_sxsize;
9623     FULL_SYSIZE = new_full_sysize;
9624     TILESIZE_VAR = new_tilesize_var;
9625
9626     init_gfx_buffers = TRUE;
9627     init_gadgets_and_anims = TRUE;
9628
9629     // Debug("tools:viewport", "viewports: init_gfx_buffers");
9630     // Debug("tools:viewport", "viewports: init_gadgets_and_anims");
9631   }
9632
9633   if (init_gfx_buffers)
9634   {
9635     // Debug("tools:viewport", "init_gfx_buffers");
9636
9637     SCR_FIELDX = new_scr_fieldx_buffers;
9638     SCR_FIELDY = new_scr_fieldy_buffers;
9639
9640     InitGfxBuffers();
9641
9642     SCR_FIELDX = new_scr_fieldx;
9643     SCR_FIELDY = new_scr_fieldy;
9644
9645     SetDrawDeactivationMask(REDRAW_NONE);
9646     SetDrawBackgroundMask(REDRAW_FIELD);
9647   }
9648
9649   if (init_video_buffer)
9650   {
9651     // Debug("tools:viewport", "init_video_buffer");
9652
9653     FreeAllImageTextures();     // needs old renderer to free the textures
9654
9655     InitVideoBuffer(WIN_XSIZE, WIN_YSIZE, DEFAULT_DEPTH, setup.fullscreen);
9656     InitImageTextures();
9657   }
9658
9659   if (init_gadgets_and_anims)
9660   {
9661     // Debug("tools:viewport", "init_gadgets_and_anims");
9662
9663     InitGadgets();
9664     InitGlobalAnimations();
9665   }
9666
9667   if (init_em_graphics)
9668   {
9669     InitGraphicInfo_EM();
9670   }
9671 }