rnd-20041129-1-src
[rocksndiamonds.git] / src / game_em / graphics.c
index 70c45c5393c897cdbce907ec87d7defc02cbc936..bdb40a02f722216fc250130c90b85ac126d61d82 100644 (file)
@@ -3,52 +3,18 @@
  * graphics manipulation crap
  */
 
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-
 #include "global.h"
 #include "display.h"
 #include "level.h"
 
-#include <stdio.h>
-
 
-#if defined(TARGET_X11)
-
-unsigned int frame; /* current frame */
-unsigned int screen_x; /* current scroll position */
+unsigned int frame;            /* current screen frame */
+unsigned int screen_x;         /* current scroll position */
 unsigned int screen_y;
 
 /* tiles currently on screen */
-static unsigned short screentiles[MAX_BUF_YSIZE][MAX_BUF_XSIZE];
-
-static unsigned int colours[8];
-static unsigned int colour_anim;
-
-static void xdebug(char *msg)
-{
-#if 0
-  XSync(display, False);
-  printf("EM DEBUG: %s\n", msg);
-#endif
-}
-
-static void colour_shuffle(void)
-{
-  unsigned int i, j, k;
-
-  for (i = 0; i < 8; i++)
-    colours[i] = i;
-
-  for (i = 0; i < 8; i++)
-  {
-    Random = Random * 129 + 1;
-    j = (Random >> 10) & 7;
-    k = colours[i];
-    colours[i] = colours[j];
-    colours[j] = k;
-  }
-}
+static unsigned int screentiles[MAX_BUF_YSIZE][MAX_BUF_XSIZE];
+static unsigned int crumbled_state[MAX_BUF_YSIZE][MAX_BUF_XSIZE];
 
 
 /* copy the entire screen to the window at the scroll position
@@ -61,16 +27,6 @@ void blitscreen(void)
   unsigned int x = screen_x % (MAX_BUF_XSIZE * TILEX);
   unsigned int y = screen_y % (MAX_BUF_YSIZE * TILEY);
 
-  xdebug("blitscreen");
-
-  if (em_game_status == EM_GAME_STATUS_MENU)
-  {
-    ClearRectangle(screenBitmap, 0, SCR_MENUY * TILEY,
-                  SCR_FIELDX * TILEX, (17 - SCR_MENUY) * TILEY);
-    BlitBitmap(scoreBitmap, screenBitmap, 0, 0, SCR_MENUX * TILEX, SCOREY,
-              0, SCR_MENUY * TILEY);
-  }
-
   if (x < 2 * TILEX && y < 2 * TILEY)
   {
     BlitBitmap(screenBitmap, window, x, y,
@@ -109,16 +65,6 @@ void blitscreen(void)
               x - 2 * TILEX, y - 2 * TILEY,
               SX + MAX_BUF_XSIZE * TILEX - x, SY + MAX_BUF_YSIZE * TILEY - y);
   }
-
-  /* draw either the main menu footer or the in-game time/gems/score values */
-
-  if (em_game_status == EM_GAME_STATUS_PLAY)
-    BlitBitmap(scoreBitmap, window, 0, 0, SCR_FIELDX * TILEX, SCOREY,
-              SX, SY + SCR_FIELDY * TILEY - SCOREY);
-
-  XFlush(display);
-
-  xdebug("blitscreen - done");
 }
 
 
@@ -131,28 +77,195 @@ void blitscreen(void)
 
 static void animscreen(void)
 {
-  unsigned int x, y, dx, dy;
-  unsigned short obj;
+  unsigned int x, y, i;
   unsigned int left = screen_x / TILEX;
   unsigned int top = screen_y / TILEY;
-
-  xdebug("animscreen");
+  static int xy[4][2] =
+  {
+    { 0, -1 },
+    { -1, 0 },
+    { +1, 0 },
+    { 0, +1 }
+  };
 
   for (y = top; y < top + MAX_BUF_YSIZE; y++)
   {
-    dy = y % MAX_BUF_YSIZE;
     for (x = left; x < left + MAX_BUF_XSIZE; x++)
     {
-      dx = x % MAX_BUF_XSIZE;
-      obj = map_obj[frame][Draw[y][x]];
+      int dx = x % MAX_BUF_XSIZE;
+      int dy = y % MAX_BUF_YSIZE;    
+      int tile = Draw[y][x];
+      struct GraphicInfo_EM *g = &graphic_info_em_object[tile][frame];
+      unsigned int obj;
+      unsigned int crm = 0;
 
-      if (screentiles[dy][dx] != obj)
+#if 1
+
+#if 1
+      /* re-calculate crumbled state of this tile */
+      if (g->has_crumbled_graphics)
+      {
+       for (i = 0; i < 4; i++)
+       {
+         int xx = x + xy[i][0];
+         int yy = y + xy[i][1];
+         int tile_next;
+
+         if (xx < 0 || xx >= EM_MAX_CAVE_WIDTH ||
+             yy < 0 || yy >= EM_MAX_CAVE_HEIGHT)
+           continue;
+
+         tile_next = Draw[yy][xx];
+
+         if (!graphic_info_em_object[tile_next][frame].has_crumbled_graphics)
+           crm |= (1 << i);
+       }
+      }
+#else
+      /* re-calculate crumbled state of this tile */
+      if (tile == Xgrass ||
+         tile == Xdirt ||
+         tile == Xfake_grass ||
+         tile == Xfake_grassB)
       {
+       for (i = 0; i < 4; i++)
+       {
+         int xx = x + xy[i][0];
+         int yy = y + xy[i][1];
+         int tile2;
+
+         if (xx < 0 || xx >= EM_MAX_CAVE_WIDTH ||
+             yy < 0 || yy >= EM_MAX_CAVE_HEIGHT)
+           continue;
+
+         tile2 = Draw[yy][xx];
+
+         if (tile2 == Xgrass ||
+             tile2 == Xdirt ||
+             tile2 == Xfake_grass ||
+             tile2 == Xfake_grassB ||
+             tile2 == Ygrass_nB ||
+             tile2 == Ygrass_eB ||
+             tile2 == Ygrass_sB ||
+             tile2 == Ygrass_wB ||
+             tile2 == Ydirt_nB ||
+             tile2 == Ydirt_eB ||
+             tile2 == Ydirt_sB ||
+             tile2 == Ydirt_wB)
+           continue;
+
+         crm |= (1 << i);
+       }
+      }
+#endif
+
+      /* create unique graphic identifier to decide if tile must be redrawn */
+      obj = g->unique_identifier;
+
+      if (screentiles[dy][dx] != obj || crumbled_state[dy][dx] != crm)
+      {
+       int dst_x = dx * TILEX;
+       int dst_y = dy * TILEY;
+
+       if (g->width != TILEX || g->height != TILEY)
+         ClearRectangle(screenBitmap, dst_x, dst_y, TILEX, TILEY);
+
+       if (g->width > 0 && g->height > 0)
+         BlitBitmap(g->bitmap, screenBitmap,
+                    g->src_x + g->src_offset_x, g->src_y + g->src_offset_y,
+                    g->width, g->height,
+                    dst_x + g->dst_offset_x, dst_y + g->dst_offset_y);
+
+#if 1
+       /* add crumbling graphic, if needed */
+       if (crm)
+       {
+         for (i = 0; i < 4; i++)
+         {
+           if (crm & (1 << i))
+           {
+             int width, height, cx, cy;
+
+             if (i == 1 || i == 2)
+             {
+               width = g->crumbled_border_size;
+               height = TILEY;
+               cx = (i == 2 ? TILEX - g->crumbled_border_size : 0);
+               cy = 0;
+             }
+             else
+             {
+               width = TILEX;
+               height = g->crumbled_border_size;
+               cx = 0;
+               cy = (i == 3 ? TILEY - g->crumbled_border_size : 0);
+             }
+
+             if (width > 0 && height > 0)
+               BlitBitmap(g->crumbled_bitmap, screenBitmap,
+                          g->crumbled_src_x + cx, g->crumbled_src_y + cy,
+                          width, height, dst_x + cx, dst_y + cy);
+           }
+         }
+       }
+#else
+       /* add crumbling graphic, if needed */
+       if (crm)
+       {
+         int crumbled_border_size;
+
+         tile = (tile == Xgrass ? Ygrass_crumbled :
+                 tile == Xdirt ? Ydirt_crumbled :
+                 tile == Xfake_grass ? Yfake_grass_crumbled :
+                 tile == Xfake_grassB ? Yfake_grassB_crumbled : 0);
+         g = &graphic_info_em_object[tile][frame];
+         crumbled_border_size = g->border_size;
+
+         for (i = 0; i < 4; i++)
+         {
+           if (crm & (1 << i))
+           {
+             int width, height, cx, cy;
+
+             if (i == 1 || i == 2)
+             {
+               width = crumbled_border_size;
+               height = TILEY;
+               cx = (i == 2 ? TILEX - crumbled_border_size : 0);
+               cy = 0;
+             }
+             else
+             {
+               width = TILEX;
+               height = crumbled_border_size;
+               cx = 0;
+               cy = (i == 3 ? TILEY - crumbled_border_size : 0);
+             }
+
+             if (width > 0 && height > 0)
+               BlitBitmap(g->bitmap, screenBitmap,
+                          g->src_x + cx, g->src_y + cy, width, height,
+                          dst_x + cx, dst_y + cy);
+           }
+         }
+       }
+#endif
+
        screentiles[dy][dx] = obj;
+       crumbled_state[dy][dx] = crm;
+      }
+#else
+      obj = map_obj[frame][tile];
+
+      if (screentiles[dy][dx] != obj)
+      {
        BlitBitmap(objBitmap, screenBitmap,
                   (obj / 512) * TILEX, (obj % 512) * TILEY / 16,
                   TILEX, TILEY, dx * TILEX, dy * TILEY);
+
+       screentiles[dy][dx] = obj;
       }
+#endif
     }
   }
 }
@@ -165,264 +278,223 @@ static void animscreen(void)
 
 static void blitplayer(struct PLAYER *ply)
 {
-  unsigned int x, y, dx, dy;
+  int dx, dy;
+  int old_x, old_y, new_x, new_y;
+  int src_x, src_y, dst_x, dst_y;
+  unsigned int x1, y1, x2, y2;
+#if 1
+  unsigned short spr;
+#else
   unsigned short obj, spr;
+#endif
 
-  xdebug("blitplayer");
-
-  if (ply->alive)
+  if (!ply->alive)
+    return;
+
+  /* some casts to "int" are needed because of negative calculation values */
+  dx = (int)ply->x - (int)ply->oldx;
+  dy = (int)ply->y - (int)ply->oldy;
+  old_x = (int)ply->oldx + (7 - (int)frame) * dx / 8;
+  old_y = (int)ply->oldy + (7 - (int)frame) * dy / 8;
+  new_x = old_x + SIGN(dx);
+  new_y = old_y + SIGN(dy);
+
+  /* x1/y1 are left/top and x2/y2 are right/down part of the player movement */
+  x1 = (frame * ply->oldx + (8 - frame) * ply->x) * TILEX / 8;
+  y1 = (frame * ply->oldy + (8 - frame) * ply->y) * TILEY / 8;
+  x2 = x1 + TILEX - 1;
+  y2 = y1 + TILEY - 1;
+
+  if ((unsigned int)(x2 - screen_x) < ((MAX_BUF_XSIZE - 1) * TILEX - 1) &&
+      (unsigned int)(y2 - screen_y) < ((MAX_BUF_YSIZE - 1) * TILEY - 1))
   {
-    x = (frame * ply->oldx + (8 - frame) * ply->x) * TILEX / 8;
-    y = (frame * ply->oldy + (8 - frame) * ply->y) * TILEY / 8;
-    dx = x + TILEX - 1;
-    dy = y + TILEY - 1;
+    struct GraphicInfo_EM *g;
+    int tile;
 
-    if ((unsigned int)(dx - screen_x) < ((MAX_BUF_XSIZE - 1) * TILEX - 1) &&
-       (unsigned int)(dy - screen_y) < ((MAX_BUF_YSIZE - 1) * TILEY - 1))
-    {
-      spr = map_spr[ply->num][frame][ply->anim];
-      x  %= MAX_BUF_XSIZE * TILEX;
-      y  %= MAX_BUF_YSIZE * TILEY;
-      dx %= MAX_BUF_XSIZE * TILEX;
-      dy %= MAX_BUF_YSIZE * TILEY;
+    spr = map_spr[ply->num][frame][ply->anim];
+    x1 %= MAX_BUF_XSIZE * TILEX;
+    y1 %= MAX_BUF_YSIZE * TILEY;
+    x2 %= MAX_BUF_XSIZE * TILEX;
+    y2 %= MAX_BUF_YSIZE * TILEY;
 
-      if (objmaskBitmap)
-      {
-       obj = screentiles[y / TILEY][x / TILEX];
-       XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
-                 (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
-                 -(x % TILEX), -(y % TILEY));
-
-       obj = screentiles[dy / TILEY][dx / TILEX];
-       XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
-                 (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
-                 (MAX_BUF_XSIZE * TILEX - x) % TILEX,
-                 (MAX_BUF_YSIZE * TILEY - y) % TILEY);
-      }
-      else if (sprmaskBitmap)
-      {
-       XCopyArea(display, sprmaskBitmap, spriteBitmap, spriteGC,
-                 (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY, 0, 0);
-      }
-      else
-      {
-       XFillRectangle(display, spriteBitmap, spriteGC, 0, 0, TILEX, TILEY);
-      }
-
-      screentiles[y / TILEY][x / TILEX] = -1; /* mark screen as dirty */
-      screentiles[dy / TILEY][dx / TILEX] = -1;
+#if 1
 
 #if 1
+    g = &graphic_info_em_player[ply->num][ply->anim][frame];
+
+    /* draw the player to current location */
+    BlitBitmap(g->bitmap, screenBitmap,
+              g->src_x, g->src_y, TILEX, TILEY,
+              x1, y1);
+
+    /* draw the player to opposite wrap-around column */
+    BlitBitmap(g->bitmap, screenBitmap,
+              g->src_x, g->src_y, TILEX, TILEY,
+              x1 - MAX_BUF_XSIZE * TILEX, y1);
+
+    /* draw the player to opposite wrap-around row */
+    BlitBitmap(g->bitmap, screenBitmap,
+              g->src_x, g->src_y, TILEX, TILEY,
+              x1, y1 - MAX_BUF_YSIZE * TILEY);
+#else
+    /* draw the player to current location */
+    BlitBitmap(sprBitmap, screenBitmap,
+              (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+              x1, y1);
+
+    /* draw the player to opposite wrap-around column */
+    BlitBitmap(sprBitmap, screenBitmap,
+              (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+              x1 - MAX_BUF_XSIZE * TILEX, y1);
+
+    /* draw the player to opposite wrap-around row */
+    BlitBitmap(sprBitmap, screenBitmap,
+              (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+              x1, y1 - MAX_BUF_YSIZE * TILEY);
+#endif
 
+    /* draw the field the player is moving from (masked over the player) */
+#if 0
+    obj = screentiles[y1 / TILEY][x1 / TILEX];
+    src_x = (obj / 512) * TILEX;
+    src_y = (obj % 512) * TILEY / 16;
+    dst_x = (x1 / TILEX) * TILEX;
+    dst_y = (y1 / TILEY) * TILEY;
+#endif
 
 #if 1
+    tile = Draw[old_y][old_x];
+    g = &graphic_info_em_object[tile][frame];
 
-      SetClipMask(sprBitmap, sprBitmap->stored_clip_gc, spriteBitmap);
-
-      SetClipOrigin(sprBitmap, sprBitmap->stored_clip_gc, x, y);
-      BlitBitmapMasked(sprBitmap, screenBitmap,
-                      (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-                      x, y);
+    if (g->width > 0 && g->height > 0)
+    {
+      src_x = g->src_x + g->src_offset_x;
+      src_y = g->src_y + g->src_offset_y;
+      dst_x = old_x % MAX_BUF_XSIZE * TILEX + g->dst_offset_x;
+      dst_y = old_y % MAX_BUF_YSIZE * TILEY + g->dst_offset_y;
+
+      SetClipOrigin(g->bitmap, g->bitmap->stored_clip_gc,
+                   dst_x - src_x, dst_y - src_y);
+      BlitBitmapMasked(g->bitmap, screenBitmap,
+                      src_x, src_y, g->width, g->height, dst_x, dst_y);
+    }
+#else
+    SetClipOrigin(objBitmap, objBitmap->stored_clip_gc,
+                 dst_x - src_x, dst_y - src_y);
+    BlitBitmapMasked(objBitmap, screenBitmap,
+                    src_x, src_y, TILEX, TILEY, dst_x, dst_y);
+#endif
 
-      SetClipOrigin(sprBitmap, sprBitmap->stored_clip_gc,
-                   x - MAX_BUF_XSIZE * TILEX, y);
-      BlitBitmapMasked(sprBitmap, screenBitmap,
-                      (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-                      x - MAX_BUF_XSIZE * TILEX, y);
+    /* draw the field the player is moving to (masked over the player) */
+#if 0
+    obj = screentiles[y2 / TILEY][x2 / TILEX];
+    src_x = (obj / 512) * TILEX;
+    src_y = (obj % 512) * TILEY / 16;
+    dst_x = (x2 / TILEX) * TILEX;
+    dst_y = (y2 / TILEY) * TILEY;
+#endif
 
-      SetClipOrigin(sprBitmap, sprBitmap->stored_clip_gc,
-                   x, y - MAX_BUF_YSIZE * TILEY);
-      BlitBitmapMasked(sprBitmap, screenBitmap,
-                      (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-                      x, y - MAX_BUF_YSIZE * TILEY);
+#if 1
+    tile = Draw[new_y][new_x];
+    g = &graphic_info_em_object[tile][frame];
 
-      SetClipMask(sprBitmap, sprBitmap->stored_clip_gc, None);
+    if (g->width > 0 && g->height > 0)
+    {
+      src_x = g->src_x + g->src_offset_x;
+      src_y = g->src_y + g->src_offset_y;
+      dst_x = new_x % MAX_BUF_XSIZE * TILEX + g->dst_offset_x;
+      dst_y = new_y % MAX_BUF_YSIZE * TILEY + g->dst_offset_y;
+
+      SetClipOrigin(g->bitmap, g->bitmap->stored_clip_gc,
+                   dst_x - src_x, dst_y - src_y);
+      BlitBitmapMasked(g->bitmap, screenBitmap,
+                      src_x, src_y, g->width, g->height, dst_x, dst_y);
+    }
+#else
+    SetClipOrigin(objBitmap, objBitmap->stored_clip_gc,
+                 dst_x - src_x, dst_y - src_y);
+    BlitBitmapMasked(objBitmap, screenBitmap,
+                    src_x, src_y, TILEX, TILEY, dst_x, dst_y);
+#endif
 
 #else
 
-      XSetClipMask(display, sprBitmap->stored_clip_gc, spriteBitmap);
+    if (objmaskBitmap)
+    {
+      obj = screentiles[y1 / TILEY][x1 / TILEX];
+      XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
+               (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
+               -(x1 % TILEX), -(y1 % TILEY));
+
+      obj = screentiles[y2 / TILEY][x2 / TILEX];
+      XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
+               (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
+               (MAX_BUF_XSIZE * TILEX - x1) % TILEX,
+               (MAX_BUF_YSIZE * TILEY - y1) % TILEY);
+    }
+    else if (sprmaskBitmap)
+    {
+      XCopyArea(display, sprmaskBitmap, spriteBitmap, spriteGC,
+               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY, 0, 0);
+    }
+    else
+    {
+      XFillRectangle(display, spriteBitmap, spriteGC, 0, 0, TILEX, TILEY);
+    }
 
-      XSetClipOrigin(display, sprBitmap->stored_clip_gc, x, y);
-      XCopyArea(display, sprBitmap->drawable, screenBitmap->drawable,
-               sprBitmap->stored_clip_gc,
-               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-               x, y);
+    SetClipMask(sprBitmap, sprBitmap->stored_clip_gc, spriteBitmap);
 
-      XSetClipOrigin(display, sprBitmap->stored_clip_gc,
-                    x - MAX_BUF_XSIZE * TILEX, y);
-      XCopyArea(display, sprBitmap->drawable, screenBitmap->drawable,
-               sprBitmap->stored_clip_gc,
-               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-               x - MAX_BUF_XSIZE * TILEX, y);
+    SetClipOrigin(sprBitmap, sprBitmap->stored_clip_gc, x, y);
+    BlitBitmapMasked(sprBitmap, screenBitmap,
+                    (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+                    x1, y1);
 
-      XSetClipOrigin(display, sprBitmap->stored_clip_gc,
-                    x, y - MAX_BUF_YSIZE * TILEY);
-      XCopyArea(display, sprBitmap->drawable, screenBitmap->drawable,
-               sprBitmap->stored_clip_gc,
-               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-               x, y - MAX_BUF_YSIZE * TILEY);
+    SetClipOrigin(sprBitmap, sprBitmap->stored_clip_gc,
+                 x - MAX_BUF_XSIZE * TILEX, y);
+    BlitBitmapMasked(sprBitmap, screenBitmap,
+                    (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+                    x1 - MAX_BUF_XSIZE * TILEX, y1);
 
-      XSetClipMask(display, sprBitmap->stored_clip_gc, None);
+    SetClipOrigin(sprBitmap, sprBitmap->stored_clip_gc,
+                 x1, y1 - MAX_BUF_YSIZE * TILEY);
+    BlitBitmapMasked(sprBitmap, screenBitmap,
+                    (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+                    x1, y1 - MAX_BUF_YSIZE * TILEY);
 
+    SetClipMask(sprBitmap, sprBitmap->stored_clip_gc, None);
 #endif
 
-#else
-
-      XSetClipMask(display, screenGC, spriteBitmap);
-      XSetClipOrigin(display, screenGC, x, y);
-      XCopyArea(display, sprPixmap, screenPixmap, screenGC,
-               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-               x, y);
-      XSetClipOrigin(display, screenGC, x - MAX_BUF_XSIZE * TILEX, y);
-      XCopyArea(display, sprPixmap, screenPixmap, screenGC,
-               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-               x - MAX_BUF_XSIZE * TILEX, y);
-      XSetClipOrigin(display, screenGC, x, y - MAX_BUF_YSIZE * TILEY);
-      XCopyArea(display, sprPixmap, screenPixmap, screenGC,
-               (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
-               x, y - MAX_BUF_YSIZE * TILEY);
-      XSetClipMask(display, screenGC, None);
-
-#endif
-    }
+    /* mark screen tiles as dirty */
+    screentiles[y1 / TILEY][x1 / TILEX] = -1;
+    screentiles[y2 / TILEY][x2 / TILEX] = -1;
   }
 }
 
-
-/* draw static text for time, gems and score counter */
-
 void game_initscreen(void)
 {
   unsigned int x,y;
 
-  xdebug("game_initscreen");
-
   frame = 6;
   screen_x = 0;
   screen_y = 0;
 
   for (y = 0; y < MAX_BUF_YSIZE; y++)
-    for (x = 0; x < MAX_BUF_XSIZE; x++)
-      screentiles[y][x] = -1;
-
-  colour_shuffle();
-  colours[0] += 16;
-  colours[1] += 16;
-  colours[2] += 16;
-  colour_anim = 0;
-
-  ClearRectangle(scoreBitmap, 0, 0, SCR_FIELDX * TILEX, SCOREY);
-  BlitBitmap(botBitmap, scoreBitmap,
-            11 * SCOREX, colours[0] * SCOREY, 3 * SCOREX, SCOREY,
-            1 * SCOREX, 0);                            /* 0-63 time */
-  BlitBitmap(botBitmap, scoreBitmap,
-            18 * SCOREX, colours[0] * SCOREY, 6 * SCOREX, SCOREY,
-            11 * SCOREX, 0);                           /* 112-207 diamonds */
-  BlitBitmap(botBitmap, scoreBitmap,
-            14 * SCOREX, colours[0] * SCOREY, 4 * SCOREX, SCOREY,
-            24 * SCOREX, 0);                           /* 256-319 score */
-}
-
-
-/* draw current values for time, gems and score counter */
-
-void game_blitscore(void)
-{
-  unsigned int i;
-
-  xdebug("game_blitscore");
-
-  i = (lev.time + 4) / 5;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            7 * SCOREX, 0); i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            6 * SCOREX, 0); i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            5 * SCOREX, 0); i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            4 * SCOREX, 0);
-
-  i = lev.score;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            31 * SCOREX, 0); i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            30 * SCOREX, 0); i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            29 * SCOREX, 0); i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            28 * SCOREX, 0);
-
-  if (lev.home == 0)
   {
-    BlitBitmap(botBitmap, scoreBitmap,
-              12 * SCOREX, 24 * SCOREY, 12 * SCOREX, SCOREY,
-              14 * SCOREX, 0); /* relax */
-
-    goto done;
-  }
-
-  if (ply1.alive + ply2.alive >= lev.home && lev.required == 0)
-  {
-    BlitBitmap(botBitmap, scoreBitmap,
-              24 * SCOREX, colours[2] * SCOREY, 12 * SCOREX, SCOREY,
-              14 * SCOREX, 0); /* find the exit */
-
-    goto done;
-  }
-
-  if (ply1.alive + ply2.alive < lev.home)
-  {
-    if (++colour_anim > 11)
-      colour_anim = 0;
-
-    if (colour_anim < 6)
+    for (x = 0; x < MAX_BUF_XSIZE; x++)
     {
-      BlitBitmap(botBitmap, scoreBitmap,
-                0, 24 * SCOREY, 12 * SCOREX, SCOREY,
-                14 * SCOREX, 0); /* forget it */
-
-      goto done;
+      screentiles[y][x] = -1;
+      crumbled_state[y][x] = 0;
     }
-
-    BlitBitmap(botBitmap, scoreBitmap,
-              18 * SCOREX, colours[0] * SCOREY, 6 * SCOREX, SCOREY,
-              15 * SCOREX, 0); /* diamonds */
   }
 
-  i = lev.required;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            20 * SCOREX, 0);
-  i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            19 * SCOREX, 0);
-  i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            18 * SCOREX, 0);
-  i /= 10;
-  BlitBitmap(botBitmap, scoreBitmap,
-            (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY,
-            17 * SCOREX, 0);
-
- done:
+  DrawGameDoorValues_EM(lev.required, ply1.dynamite, lev.score,
+                       DISPLAY_TIME(lev.time + 4));
 }
 
 void game_animscreen(void)
 {
   unsigned int x,y;
 
-  xdebug("game_animscreen");
-
   x = (frame * ply1.oldx + (8 - frame) * ply1.x) * TILEX / 8
     + ((SCR_FIELDX - 1) * TILEX) / 2;
   y = (frame * ply1.oldy + (8 - frame) * ply1.y) * TILEY / 8
@@ -446,207 +518,5 @@ void game_animscreen(void)
   blitplayer(&ply2);
   blitscreen();
 
-  XFlush(display);
-
-  Random = Random * 129 + 1;
-}
-
-
-/* draw main menu background and copyright note */
-
-void title_initscreen(void)
-{
-  xdebug("title_initscreen");
-
-  screen_x = 0;
-  screen_y = 0;
-
-  colour_shuffle();
-  colours[1] += 8;
-  colour_anim = 0;
-
-#if 1
-
-  /* draw title screen on menu background */
-
-  BlitBitmap(ttlBitmap, screenBitmap, ORIG_MENU_SX, ORIG_MENU_SY,
-            SCR_MENUX * TILEX, SCR_MENUY * TILEY, 0, 0);
-
-  /* draw copyright note at footer */
-
-  if (botmaskBitmap)
-  {
-    BlitBitmap(botBitmap, scoreBitmap, 0, colours[1] * SCOREY,
-              SCR_MENUX * TILEX, SCOREY, 0, 0);
-
-    SetClipOrigin(botBitmap, botBitmap->stored_clip_gc,
-                 0, 0 - colours[0] * SCOREY);
-  }
-
-  BlitBitmapMasked(botBitmap, scoreBitmap, 0, colours[0] * SCOREY,
-                  SCR_MENUX * TILEX, SCOREY, 0, 0);
-
-#else
-
-  XCopyArea(display, ttlPixmap, screenPixmap, screenGC,
-           0, 0, SCR_MENUX * TILEX, SCR_MENUY * TILEY, 0, 0);
-
-  if (botmaskBitmap)
-  {
-    XCopyArea(display, botPixmap, scorePixmap, scoreGC,
-             0, colours[1] * SCOREY, SCR_MENUX * TILEX, SCOREY, 0, 0);
-    XSetClipMask(display, scoreGC, botmaskBitmap);
-    XSetClipOrigin(display, scoreGC, 0, 0 - colours[0] * SCOREY);
-  }
-
-  XCopyArea(display, botPixmap, scorePixmap, scoreGC,
-           0, colours[0] * SCOREY, SCR_MENUX * TILEX, SCOREY, 0, 0);
-
-  if (botmaskBitmap)
-    XSetClipMask(display, scoreGC, None);
-
-#endif
-}
-
-
-/* draw bouncing ball on main menu footer */
-
-void title_blitscore(void)
-{
-  unsigned int x, y, i;
-
-  xdebug("title_blitscore");
-
-  if (++colour_anim > 30)
-    colour_anim = 0;
-
-  i = colour_anim >= 16 ? 31 - colour_anim : colour_anim;
-  x = (i / 8 + 18) * 2 * SCOREX;
-  y = (i % 8 + 16) * SCOREY;
-
-#if 1
-  if (botmaskBitmap)
-  {
-    BlitBitmap(botBitmap, scoreBitmap,
-              32 * SCOREX, colours[1] * SCOREY, 2 * SCOREX, SCOREY,
-              32 * SCOREX, 0);
-
-    SetClipOrigin(botBitmap, botBitmap->stored_clip_gc,
-                 32 * SCOREX - x, 0 - y);
-  }
-
-  BlitBitmapMasked(botBitmap, scoreBitmap,
-                  x, y, 2 * SCOREX, SCOREY, 32 * SCOREX, 0);
-
-#else
-
-  if (botmaskBitmap)
-  {
-    XCopyArea(display, botPixmap, scorePixmap, scoreGC,
-             32 * SCOREX, colours[1] * SCOREY, 2 * SCOREX, SCOREY,
-             32 * SCOREX, 0);
-    XSetClipMask(display, scoreGC, botmaskBitmap);
-    XSetClipOrigin(display, scoreGC, 32 * SCOREX - x, 0 - y);
-  }
-
-  XCopyArea(display, botPixmap, scorePixmap, scoreGC,
-           x, y, 2 * SCOREX, SCOREY, 32 * SCOREX, 0);
-
-  if (botmaskBitmap)
-    XSetClipMask(display, scoreGC, None);
-#endif
-}
-
-void title_blitants(unsigned int y)
-{
-  static const char ants_dashes[2] = { 8, 7 };
-
-  xdebug("title_blitants");
-
-  XSetDashes(display, antsGC, colour_anim, ants_dashes, 2);
-  XDrawRectangle(display, screenPixmap, antsGC,
-                0, y * TILEY, SCR_MENUX * TILEX - 1, TILEY - 1);
-}
-
-void title_animscreen(void)
-{
-  blitscreen();
-  XFlush(display);
-
-  Random = Random * 129 + 1;
-}
-
-static int ttl_map[] =
-{
-  -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-  -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
-  -1,0,-1,-1,-1,-1,-1,1,-1,-1,-1,-1,2,3,4,-1,      /* !',-. */
-  5,6,7,8,9,10,11,12,13,14,15,-1,-1,-1,-1,16,      /* 0123456789:? */
-  -1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* ABCDEFGHIJKLMNO */
-  32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1, /* PQRSTUVWXYZ */
-  -1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* abcdefghijklmno */
-  32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1  /* pqrstuvwxyz */
-};
-
-void title_string(unsigned int y, unsigned int left, unsigned int right,
-                 char *string)
-{
-  int i;
-  unsigned int x;
-
-  xdebug("title_string");
-
-  y *= TILEY;
-  left *= SCOREX;
-  right *= SCOREX;
-
-  x = (left + right - strlen(string) * MENUFONTX) / 2;
-  if (x < left || x >= right)
-    x = left;
-
-  /* restore background graphic where text will be drawn */
-  BlitBitmap(ttlBitmap, screenBitmap, ORIG_MENU_SX + left, ORIG_MENU_SY + y,
-            right - left, MENUFONTY, left, y);
-
-#if 1
-#else
-  if (ttlmaskBitmap)
-    XSetClipMask(display, screenGC, ttlmaskBitmap);
-#endif
-
-  for (i = 0; string[i] && x < right; i++)
-  {
-    int ch_pos, ch_x, ch_y;
-
-    ch_pos = ttl_map[string[i] & 127];
-
-    if (ch_pos == -1 || ch_pos > 22 * 2)
-      continue;                                /* no graphic for this character */
-
-    ch_x = (ch_pos % 22) * GFXMENUFONTX;
-    ch_y = (ch_pos / 22 + 12) * TILEY;
-
-#if 1
-    SetClipOrigin(ttlBitmap, ttlBitmap->stored_clip_gc,
-                 x - ORIG_MENU_SX - ch_x, y - ORIG_MENU_SY - ch_y);
-
-    BlitBitmapMasked(ttlBitmap, screenBitmap, ch_x, ch_y, MENUFONTX, MENUFONTY,
-                    x - ORIG_MENU_SX, y - ORIG_MENU_SY);
-#else
-    if (ttlmaskBitmap)
-      XSetClipOrigin(display, screenGC, x - ch_x, y - ch_y);
-
-    XCopyArea(display, ttlPixmap, screenPixmap, screenGC,
-             ch_x, ch_y, MENUFONTX, MENUFONTY, x, y);
-#endif
-
-    x += MENUFONTX;
-  }
-
-#if 1
-#else
-  XSetClipMask(display, screenGC, None);
-#endif
+  FlushDisplay();
 }
-
-#endif