rocks_n_diamonds-1.0
[rocksndiamonds.git] / src / tools.c
index f1d2e259dcef0db190018ebd09d7c329a69c9b98..63c027fa2f78858941d83e50be2361ff72bc6bb3 100644 (file)
 *               q99492@pbhrzx.uni-paderborn.de             *
 *----------------------------------------------------------*
 *  tools.c                                                 *
-*                                                          *
-*  Letzte Aenderung: 15.06.1995                            *
 ***********************************************************/
 
+#ifdef __FreeBSD__
+#include <machine/joystick.h>
+#endif
+
 #include "tools.h"
 #include "game.h"
 #include "events.h"
 #include "sound.h"
-#include "screens.h"
 #include "misc.h"
+#include "buttons.h"
+#include <math.h>
 
 void BackToFront()
 {
@@ -112,10 +115,42 @@ void BackToFront()
 
 void FadeToFront()
 {
+
+/*
   long fading_delay = 300000;
 
   if (fading_on && (redraw_mask & REDRAW_FIELD))
   {
+*/
+
+/*
+    int x,y;
+
+    XFillRectangle(display,window,gc,
+                  REAL_SX,REAL_SY,FULL_SXSIZE,FULL_SYSIZE);
+    XFlush(display);
+
+    for(i=0;i<2*FULL_SYSIZE;i++)
+    {
+      for(y=0;y<FULL_SYSIZE;y++)
+      {
+       XCopyArea(display,backbuffer,window,gc,
+                 REAL_SX,REAL_SY+i, FULL_SXSIZE,1, REAL_SX,REAL_SY+i);
+      }
+      XFlush(display);
+      Delay(10000);
+    }
+*/
+
+/*
+    for(i=1;i<FULL_SYSIZE;i+=2)
+      XCopyArea(display,backbuffer,window,gc,
+               REAL_SX,REAL_SY+i, FULL_SXSIZE,1, REAL_SX,REAL_SY+i);
+    XFlush(display);
+    Delay(fading_delay);
+*/
+
+/*
     XSetClipOrigin(display,clip_gc[PIX_FADEMASK],0,0);
     XCopyArea(display,backbuffer,window,clip_gc[PIX_FADEMASK],
              REAL_SX,REAL_SY, FULL_SXSIZE,FULL_SYSIZE, REAL_SX,REAL_SY);
@@ -142,6 +177,7 @@ void FadeToFront()
 
     redraw_mask &= ~REDRAW_MAIN;
   }
+*/
 
   BackToFront();
 }
@@ -153,7 +189,7 @@ void ClearWindow()
                 REAL_SX,REAL_SY,FULL_SXSIZE,FULL_SYSIZE);
   redraw_mask|=REDRAW_FIELD;
 
-  if (game_status==PLAYING && direct_draw_on)
+  if (direct_draw_on && game_status==PLAYING)
   {
     drawto_field = window;
     XFillRectangle(display,drawto_field,gc,
@@ -215,6 +251,24 @@ void DrawTextExt(Drawable d, GC gc, int x, int y,
   }
 }
 
+void DrawGraphicAnimation(int x, int y, int graphic,
+                         int frames, int delay, int mode)
+{
+  int phase;
+
+  if (mode == ANIM_OSCILLATE)
+  {
+    int max_anim_frames = frames*2 - 2;
+    phase = (FrameCounter % (delay * max_anim_frames)) / delay;
+    phase = (phase < frames ? phase : max_anim_frames - phase);
+  }
+  else
+    phase = (FrameCounter % (delay * frames)) / delay;
+
+  if (!(FrameCounter % delay) && IN_SCR_FIELD(SCROLLX(x),SCROLLY(y)))
+    DrawGraphic(SCROLLX(x),SCROLLY(y), graphic + phase);
+}
+
 void DrawGraphic(int x, int y, int graphic)
 {
   DrawGraphicExt(drawto_field, gc, x, y, graphic);
@@ -310,95 +364,6 @@ void DrawMiniGraphicExtHiRes(Drawable d, GC gc, int x, int y, int graphic)
   }
 }
 
-int el2gfx(int element)
-{
-  switch(element)
-  {
-    case EL_LEERRAUM:          return(-1);
-    case EL_ERDREICH:          return(GFX_ERDREICH);
-    case EL_MAUERWERK:         return(GFX_MAUERWERK);
-    case EL_FELSBODEN:         return(GFX_FELSBODEN);
-    case EL_FELSBROCKEN:       return(GFX_FELSBROCKEN);
-    case EL_SCHLUESSEL:                return(GFX_SCHLUESSEL);
-    case EL_EDELSTEIN:         return(GFX_EDELSTEIN);
-    case EL_AUSGANG_ZU:                return(GFX_AUSGANG_ZU);
-    case EL_AUSGANG_ACT:       return(GFX_AUSGANG_ACT);
-    case EL_AUSGANG_AUF:       return(GFX_AUSGANG_AUF);
-    case EL_SPIELFIGUR:                return(GFX_SPIELFIGUR);
-    case EL_SPIELER1:          return(GFX_SPIELER1);
-    case EL_SPIELER2:          return(GFX_SPIELER2);
-    case EL_SPIELER3:          return(GFX_SPIELER3);
-    case EL_SPIELER4:          return(GFX_SPIELER4);
-    case EL_KAEFER:            return(GFX_KAEFER);
-    case EL_KAEFER_R:          return(GFX_KAEFER_R);
-    case EL_KAEFER_O:          return(GFX_KAEFER_O);
-    case EL_KAEFER_L:          return(GFX_KAEFER_L);
-    case EL_KAEFER_U:          return(GFX_KAEFER_U);
-    case EL_FLIEGER:           return(GFX_FLIEGER);
-    case EL_FLIEGER_R:         return(GFX_FLIEGER_R);
-    case EL_FLIEGER_O:         return(GFX_FLIEGER_O);
-    case EL_FLIEGER_L:         return(GFX_FLIEGER_L);
-    case EL_FLIEGER_U:         return(GFX_FLIEGER_U);
-    case EL_MAMPFER:           return(GFX_MAMPFER);
-    case EL_ZOMBIE:            return(GFX_ZOMBIE);
-    case EL_BETON:             return(GFX_BETON);
-    case EL_DIAMANT:           return(GFX_DIAMANT);
-    case EL_MORAST_LEER:       return(GFX_MORAST_LEER);
-    case EL_MORAST_VOLL:       return(GFX_MORAST_VOLL);
-    case EL_TROPFEN:           return(GFX_TROPFEN);
-    case EL_BOMBE:             return(GFX_BOMBE);
-    case EL_SIEB_LEER:         return(GFX_SIEB_LEER);
-    case EL_SIEB_VOLL:         return(GFX_SIEB_VOLL);
-    case EL_SIEB_TOT:          return(GFX_SIEB_TOT);
-    case EL_SALZSAEURE:                return(GFX_SALZSAEURE);
-    case EL_AMOEBE1:           return(GFX_AMOEBE1);
-    case EL_AMOEBE2:           return(GFX_AMOEBE2);
-    case EL_AMOEBE3:           return(GFX_AMOEBE3);
-    case EL_KOKOSNUSS:         return(GFX_KOKOSNUSS);
-    case EL_LIFE:              return(GFX_LIFE);
-    case EL_LIFE_ASYNC:                return(GFX_LIFE_ASYNC);
-    case EL_DYNAMIT:           return(GFX_DYNAMIT);
-    case EL_BADEWANNE:         return(GFX_BADEWANNE);
-    case EL_BADEWANNE1:                return(GFX_BADEWANNE1);
-    case EL_BADEWANNE2:                return(GFX_BADEWANNE2);
-    case EL_BADEWANNE3:                return(GFX_BADEWANNE3);
-    case EL_BADEWANNE4:                return(GFX_BADEWANNE4);
-    case EL_BADEWANNE5:                return(GFX_BADEWANNE5);
-    case EL_ABLENK_AUS:                return(GFX_ABLENK_AUS);
-    case EL_ABLENK_EIN:                return(GFX_ABLENK_EIN);
-    case EL_SCHLUESSEL1:       return(GFX_SCHLUESSEL1);
-    case EL_SCHLUESSEL2:       return(GFX_SCHLUESSEL2);
-    case EL_SCHLUESSEL3:       return(GFX_SCHLUESSEL3);
-    case EL_SCHLUESSEL4:       return(GFX_SCHLUESSEL4);
-    case EL_PFORTE1:           return(GFX_PFORTE1);
-    case EL_PFORTE2:           return(GFX_PFORTE2);
-    case EL_PFORTE3:           return(GFX_PFORTE3);
-    case EL_PFORTE4:           return(GFX_PFORTE4);
-    case EL_PFORTE1X:          return(GFX_PFORTE1X);
-    case EL_PFORTE2X:          return(GFX_PFORTE2X);
-    case EL_PFORTE3X:          return(GFX_PFORTE3X);
-    case EL_PFORTE4X:          return(GFX_PFORTE4X);
-    case EL_DYNAMIT_AUS:       return(GFX_DYNAMIT_AUS);
-    case EL_PACMAN:            return(GFX_PACMAN);
-    case EL_PACMAN_R:          return(GFX_PACMAN_R);
-    case EL_PACMAN_O:          return(GFX_PACMAN_O);
-    case EL_PACMAN_L:          return(GFX_PACMAN_L);
-    case EL_PACMAN_U:          return(GFX_PACMAN_U);
-    case EL_UNSICHTBAR:                return(GFX_UNSICHTBAR);
-    case EL_ERZ_1:             return(GFX_ERZ_1);
-    case EL_ERZ_2:             return(GFX_ERZ_2);
-    case EL_BIRNE_AUS:         return(GFX_BIRNE_AUS);
-    case EL_BIRNE_EIN:         return(GFX_BIRNE_EIN);
-    default:
-    {
-      if (IS_CHAR(element))
-       return(GFX_CHAR_START + (element-EL_CHAR_START));
-      else
-       return(-1);
-    }
-  }
-}
-
 void DrawGraphicShifted(int x,int y, int dx,int dy, int graphic, int cut_mode)
 {
   int width = TILEX, height = TILEY;
@@ -490,43 +455,61 @@ void DrawElementShifted(int x, int y, int dx, int dy, int element,int cut_mode)
   int graphic = el2gfx(element);
   int phase = ABS(MovPos[ux][uy])/(TILEX/2);
   int dir = MovDir[ux][uy];
+
+/*
   int horiz_move = (dir==MV_LEFT || dir==MV_RIGHT);
+*/
 
   if (element==EL_PACMAN ||
       element==EL_KAEFER ||
-      element==EL_FLIEGER)
+      element==EL_FLIEGER ||
+      element==EL_BUTTERFLY ||
+      element==EL_FIREFLY)
   {
-    if (element==EL_PACMAN)
-      graphic = GFX_PACMAN + 4*!phase;
+    if (element==EL_BUTTERFLY || element==EL_FIREFLY)
+      graphic += !phase;
     else
+    {
       graphic += 4*!phase;
 
-    if (dir==MV_UP)
-      graphic += 1;
-    else if (dir==MV_LEFT)
-      graphic += 2;
-    else if (dir==MV_DOWN)
-      graphic += 3;
+      if (dir==MV_UP)
+       graphic += 1;
+      else if (dir==MV_LEFT)
+       graphic += 2;
+      else if (dir==MV_DOWN)
+       graphic += 3;
+    }
   }
-  else if ((element==EL_FELSBROCKEN ||
-           element==EL_EDELSTEIN ||
-           element==EL_DIAMANT) && horiz_move && phase)
+  else if ((element==EL_FELSBROCKEN || IS_GEM(element)) && !cut_mode)
   {
-    if (element==EL_FELSBROCKEN)
-      graphic += 2;
-    else
-      graphic += 1;
+    graphic += phase * (element==EL_FELSBROCKEN ? 2 : 1);
   }
-  else if ((element==EL_SIEB_LEER ||
-           element==EL_SIEB_VOLL) && SiebAktiv)
+  else if ((element==EL_SIEB_LEER || element==EL_SIEB2_LEER ||
+           element==EL_SIEB_VOLL || element==EL_SIEB2_VOLL) && SiebAktiv)
   {
     graphic += 3-(SiebAktiv%8)/2;
   }
   else if (IS_AMOEBOID(element))
   {
-    graphic = (element==EL_AMOEBE1 ? GFX_AMOEBE_TOT : GFX_AMOEBE_LEBT);
+    graphic = (element==EL_AMOEBE_TOT ? GFX_AMOEBE_TOT : GFX_AMOEBE_LEBT);
     graphic += (x+2*y) % 4;
   }
+  else if (element==EL_MAUER_LEBT)
+  {
+    BOOL links_massiv = FALSE, rechts_massiv = FALSE;
+
+    if (!IN_LEV_FIELD(ux-1,uy) || IS_MAUER(Feld[ux-1][uy]))
+      links_massiv = TRUE;
+    if (!IN_LEV_FIELD(ux+1,uy) || IS_MAUER(Feld[ux+1][uy]))
+      rechts_massiv = TRUE;
+
+    if (links_massiv && rechts_massiv)
+      graphic = GFX_MAUERWERK;
+    else if (links_massiv)
+      graphic = GFX_MAUER_R;
+    else if (rechts_massiv)
+      graphic = GFX_MAUER_L;
+  }
 
   if (dx || dy)
     DrawGraphicShifted(x,y, dx,dy, graphic, cut_mode);
@@ -542,10 +525,10 @@ void ErdreichAnbroeckeln(int x, int y)
   int snip = 4;
   static int xy[4][2] =
   {
-    0,-1,
-    -1,0,
-    +1,0,
-    0,+1
+    { 0,-1 },
+    { -1,0 },
+    { +1,0 },
+    { 0,+1 }
   };
 
   if (!IN_LEV_FIELD(ux,uy))
@@ -682,10 +665,12 @@ void DrawScreenField(int x, int y)
 
     if (Store[ux][uy]==EL_MORAST_LEER ||
        Store[ux][uy]==EL_SIEB_LEER ||
-       Store[ux][uy]==EL_AMOEBE2)
+       Store[ux][uy]==EL_SIEB2_LEER ||
+       Store[ux][uy]==EL_AMOEBE_NASS)
       cut_mode = CUT_ABOVE;
     else if (Store[ux][uy]==EL_MORAST_VOLL ||
        Store[ux][uy]==EL_SIEB_VOLL ||
+       Store[ux][uy]==EL_SIEB2_VOLL ||
        Store[ux][uy]==EL_SALZSAEURE)
       cut_mode = CUT_BELOW;
 
@@ -713,7 +698,8 @@ void DrawScreenField(int x, int y)
 
     if (Store[oldx][oldy]==EL_MORAST_LEER ||
        Store[oldx][oldy]==EL_SIEB_LEER ||
-       Store[oldx][oldy]==EL_AMOEBE2)
+       Store[oldx][oldy]==EL_SIEB2_LEER ||
+       Store[oldx][oldy]==EL_AMOEBE_NASS)
       cut_mode = CUT_ABOVE;
 
     DrawScreenElement(x,y,EL_LEERRAUM);
@@ -831,6 +817,10 @@ void DrawMicroLevel(int xpos, int ypos)
                 xpos-MICRO_TILEX,ypos-MICRO_TILEY,
                 MICRO_TILEX*(STD_LEV_FIELDX+2),
                 MICRO_TILEY*(STD_LEV_FIELDY+2));
+  if (lev_fieldx < STD_LEV_FIELDX)
+    xpos += (STD_LEV_FIELDX - lev_fieldx)/2 * MICRO_TILEX;
+  if (lev_fieldy < STD_LEV_FIELDY)
+    ypos += (STD_LEV_FIELDY - lev_fieldy)/2 * MICRO_TILEY;
 
   for(x=-1;x<=STD_LEV_FIELDX;x++)
     for(y=-1;y<=STD_LEV_FIELDY;y++)
@@ -870,6 +860,9 @@ int AYS_in_range(int x, int y)
 BOOL AreYouSure(char *text, unsigned int ays_state)
 {
   int mx,my, ty, result = -1;
+  unsigned int old_door_state;
+
+  old_door_state = GetDoorState();
 
   CloseDoor(DOOR_CLOSE_1);
 
@@ -920,11 +913,12 @@ BOOL AreYouSure(char *text, unsigned int ays_state)
              DOOR_GFX_PAGEX1,CONFIRM_BUTTON_YPOS);
 
   OpenDoor(DOOR_OPEN_1);
+  ClearEventQueue();
 
   if (!(ays_state & AYS_ASK) && !(ays_state & AYS_CONFIRM))
     return(FALSE);
 
-  if (game_status!=MAINMENU)
+  if (game_status != MAINMENU)
     InitAnimation();
 
   button_status = MB_RELEASED;
@@ -953,7 +947,7 @@ BOOL AreYouSure(char *text, unsigned int ays_state)
        {
          int choice;
 
-         if (event.type==MotionNotify)
+         if (event.type == MotionNotify)
          {
            motion_status = TRUE;
            mx = ((XMotionEvent *) &event)->x;
@@ -992,7 +986,6 @@ BOOL AreYouSure(char *text, unsigned int ays_state)
          break;
        }
        case KeyPress:
-         key_status = KEY_PRESSED;
          switch(XLookupKeysym((XKeyEvent *)&event,
                               ((XKeyEvent *)&event)->state))
          {
@@ -1014,7 +1007,7 @@ BOOL AreYouSure(char *text, unsigned int ays_state)
          break;
       }
     }
-    else if (JoystickButton()==JOY_BUTTON_NEW_PRESSED)
+    else if (JoystickButton() == JOY_BUTTON_NEW_PRESSED)
     {
       int joy=Joystick();
 
@@ -1025,15 +1018,14 @@ BOOL AreYouSure(char *text, unsigned int ays_state)
     }
   }
 
-  if (game_status!=MAINMENU)
+  if (game_status != MAINMENU)
     StopAnimation();
 
   if (!(ays_state & AYS_STAY_OPEN))
   {
     CloseDoor(DOOR_CLOSE_1);
 
-    if (!(ays_state & AYS_STAY_CLOSED) &&
-       (game_status==PLAYING || game_status==LEVELED))
+    if (!(ays_state & AYS_STAY_CLOSED) && (old_door_state & DOOR_OPEN_1))
     {
       XCopyArea(display,pix[PIX_DB_DOOR],pix[PIX_DB_DOOR],gc,
                DOOR_GFX_PAGEX2,DOOR_GFX_PAGEY1, DXSIZE,DYSIZE,
@@ -1045,8 +1037,10 @@ BOOL AreYouSure(char *text, unsigned int ays_state)
   return(result);
 }
 
-void OpenDoor(unsigned int door_state)
+unsigned int OpenDoor(unsigned int door_state)
 {
+  unsigned int new_door_state;
+
   if (door_state & DOOR_COPY_BACK)
   {
     XCopyArea(display,pix[PIX_DB_DOOR],pix[PIX_DB_DOOR],gc,
@@ -1055,26 +1049,46 @@ void OpenDoor(unsigned int door_state)
     door_state &= ~DOOR_COPY_BACK;
   }
 
-  MoveDoor(door_state);
+  new_door_state = MoveDoor(door_state);
+
+/*
   ClearEventQueue();
+*/
+
+  return(new_door_state);
 }
 
-void CloseDoor(unsigned int door_state)
+unsigned int CloseDoor(unsigned int door_state)
 {
+  unsigned int new_door_state;
+
   XCopyArea(display,backbuffer,pix[PIX_DB_DOOR],gc,
            DX,DY, DXSIZE,DYSIZE, DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY1);
   XCopyArea(display,backbuffer,pix[PIX_DB_DOOR],gc,
            VX,VY, VXSIZE,VYSIZE, DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
 
-  MoveDoor(door_state);
+  new_door_state = MoveDoor(door_state);
+
+/*
   ClearEventQueue();
+*/
+
+  return(new_door_state);
+}
+
+unsigned int GetDoorState()
+{
+  return(MoveDoor(DOOR_GET_STATE));
 }
 
-void MoveDoor(unsigned int door_state)
+unsigned int MoveDoor(unsigned int door_state)
 {
-  static int door1 = DOOR_CLOSE_1;
-  static int door2 = DOOR_OPEN_2;
-  int x, start, stepsize = 4;
+  static unsigned int door1 = DOOR_OPEN_1;
+  static unsigned int door2 = DOOR_CLOSE_2;
+  int x, start, stepsize = 4, door_anim_delay = stepsize*5000;
+
+  if (door_state == DOOR_GET_STATE)
+    return(door1 | door2);
 
   if (door1==DOOR_OPEN_1 && door_state & DOOR_OPEN_1)
     door_state &= ~DOOR_OPEN_1;
@@ -1085,31 +1099,15 @@ void MoveDoor(unsigned int door_state)
   else if (door2==DOOR_CLOSE_2 && door_state & DOOR_CLOSE_2)
     door_state &= ~DOOR_CLOSE_2;
 
-  if (door_state & DOOR_ACTION)
+  if (quick_doors)
   {
-    if (door_state & DOOR_OPEN_1)
-    {
-      XCopyArea(display,pix[PIX_DOOR],pix[PIX_DOOR],gc,
-               104,136, 8,8, 146,136);
-      if (!(door_state & DOOR_NO_DELAY))
-      {
-       int i;
-
-       XCopyArea(display,pix[PIX_DOOR],window,gc,
-                 104,136, 8,8, DX+46,DY+136);
-       XFlush(display);
-       for(i=0;i<30;i++)
-       {
-         if (game_status==MAINMENU)
-           DoAnimation();
-         Delay(10000);
-       }
-      }
-    }
-    else if (door_state & DOOR_CLOSE_1)
-      XCopyArea(display,pix[PIX_DOOR],pix[PIX_DOOR],gc,
-               88,136, 8,8, 146,136);
+    stepsize = 20;
+    door_anim_delay = 0;
+    StopSound(SND_OEFFNEN);
+  }
 
+  if (door_state & DOOR_ACTION)
+  {
     if (!(door_state & DOOR_NO_DELAY))
       PlaySoundStereo(SND_OEFFNEN,PSND_MAX_RIGHT);
 
@@ -1120,6 +1118,7 @@ void MoveDoor(unsigned int door_state)
       if (door_state & DOOR_ACTION_1)
       {
        int i = (door_state & DOOR_OPEN_1 ? DXSIZE-x : x);
+       int j = (DXSIZE - i)/3;
 
        XCopyArea(display,pix[PIX_DB_DOOR],drawto,gc,
                  DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY1+i/2,
@@ -1127,31 +1126,41 @@ void MoveDoor(unsigned int door_state)
 
        XFillRectangle(display,drawto,gc,DX,DY+DYSIZE-i/2,DXSIZE,i/2);
 
-       XSetClipOrigin(display,clip_gc[PIX_DOOR],DX-DXSIZE+i,DY);
+       XSetClipOrigin(display,clip_gc[PIX_DOOR],
+                      DX-i,(DY+j)-DOOR_GFX_PAGEY1);
        XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                 DXSIZE-i,0, i,30, DX,DY);
+                 DXSIZE,DOOR_GFX_PAGEY1, i,77, DX+DXSIZE-i,DY+j);
        XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                 DXSIZE-i,DYSIZE-30, i,30, DX,DY+DYSIZE-30);
-       XSetClipOrigin(display,clip_gc[PIX_DOOR],DX-i,DY);
+                 DXSIZE,DOOR_GFX_PAGEY1+140, i,63, DX+DXSIZE-i,DY+140+j);
+       XSetClipOrigin(display,clip_gc[PIX_DOOR],
+                      DX-DXSIZE+i,DY-(DOOR_GFX_PAGEY1+j));
        XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                 DXSIZE,0, i,30, DX+DXSIZE-i,DY);
+                 DXSIZE-i,DOOR_GFX_PAGEY1+j, i,77-j, DX,DY);
        XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                 DXSIZE,DYSIZE-30, i,30, DX+DXSIZE-i,DY+DYSIZE-30);
-       if (i>14)
-       {
-         XSetClipOrigin(display,clip_gc[PIX_DOOR],DX-i,DY);
-         XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                   DXSIZE+14,30,i-14,DYSIZE-60,DX+DXSIZE+14-i,DY+30);
-         XSetClipOrigin(display,clip_gc[PIX_DOOR],DX-DXSIZE+i,DY);
-         XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                   DXSIZE-i,30,i-14,DYSIZE-60,DX,DY+30);
-       }
+                 DXSIZE-i,DOOR_GFX_PAGEY1+140, i,63, DX,DY+140-j);
+
+       XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
+                 DXSIZE-i,DOOR_GFX_PAGEY1+77, i,63,
+                 DX,DY+77-j);
+       XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
+                 DXSIZE-i,DOOR_GFX_PAGEY1+203, i,77,
+                 DX,DY+203-j);
+       XSetClipOrigin(display,clip_gc[PIX_DOOR],
+                      DX-i,(DY+j)-DOOR_GFX_PAGEY1);
+       XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
+                 DXSIZE,DOOR_GFX_PAGEY1+77, i,63,
+                 DX+DXSIZE-i,DY+77+j);
+       XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
+                 DXSIZE,DOOR_GFX_PAGEY1+203, i,77-j,
+                 DX+DXSIZE-i,DY+203+j);
+
        redraw_mask |= REDRAW_DOOR_1;
       }
 
       if (door_state & DOOR_ACTION_2)
       {
        int i = (door_state & DOOR_OPEN_2 ? VXSIZE-x : x);
+       int j = (VXSIZE - i)/3;
 
        XCopyArea(display,pix[PIX_DB_DOOR],drawto,gc,
                  DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2+i/2,
@@ -1160,19 +1169,28 @@ void MoveDoor(unsigned int door_state)
        XFillRectangle(display,drawto,gc,VX,VY+VYSIZE-i/2,VXSIZE,i/2);
 
        XSetClipOrigin(display,clip_gc[PIX_DOOR],
-                      VX-VXSIZE+i,VY-DOOR_GFX_PAGEY2);
+                      VX-i,(VY+j)-DOOR_GFX_PAGEY2);
+       XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
+                 VXSIZE,DOOR_GFX_PAGEY2, i,VYSIZE/2, VX+VXSIZE-i,VY+j);
+       XSetClipOrigin(display,clip_gc[PIX_DOOR],
+                      VX-VXSIZE+i,VY-(DOOR_GFX_PAGEY2+j));
+       XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
+                 VXSIZE-i,DOOR_GFX_PAGEY2+j, i,VYSIZE/2-j, VX,VY);
+
        XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                 VXSIZE-i,DOOR_GFX_PAGEY2, i,VYSIZE, VX,VY);
+                 VXSIZE-i,DOOR_GFX_PAGEY2+VYSIZE/2, i,VYSIZE/2,
+                 VX,VY+VYSIZE/2-j);
        XSetClipOrigin(display,clip_gc[PIX_DOOR],
-                      VX-i,VY-DOOR_GFX_PAGEY2);
+                      VX-i,(VY+j)-DOOR_GFX_PAGEY2);
        XCopyArea(display,pix[PIX_DOOR],drawto,clip_gc[PIX_DOOR],
-                 VXSIZE,DOOR_GFX_PAGEY2, i,VYSIZE, VX+VXSIZE-i,VY);
+                 VXSIZE,DOOR_GFX_PAGEY2+VYSIZE/2, i,VYSIZE/2-j,
+                 VX+VXSIZE-i,VY+VYSIZE/2+j);
 
        redraw_mask |= REDRAW_DOOR_2;
       }
 
       BackToFront();
-      Delay(stepsize*5000);
+      Delay(door_anim_delay);
 
       if (game_status==MAINMENU)
        DoAnimation();
@@ -1183,74 +1201,8 @@ void MoveDoor(unsigned int door_state)
     door1 = door_state & DOOR_ACTION_1;
   if (door_state & DOOR_ACTION_2)
     door2 = door_state & DOOR_ACTION_2;
-}
-
-long mainCounter(int mode)
-{
-  static struct timeval base_time = { 0, 0 };
-  struct timeval current_time;
-  long counter_ms;
-
-  gettimeofday(&current_time,NULL);
-  if (mode==0 || current_time.tv_sec<base_time.tv_sec)
-    base_time = current_time;
-
-  counter_ms = (current_time.tv_sec - base_time.tv_sec)*1000
-             + (current_time.tv_usec - base_time.tv_usec)/1000;
-
-  if (mode==1)
-    return(counter_ms/10);     /* return 1/100 secs since last init */
-  else
-    return(counter_ms);                /* return 1/1000 secs since last init */
-}
-
-void InitCounter() /* set counter back to zero */
-{
-  mainCounter(0);
-}
 
-long Counter() /* returns 1/100 secs since last call of InitCounter() */
-{
-  return(mainCounter(1));
-}
-
-long Counter2()        /* returns 1/1000 secs since last call of InitCounter() */
-{
-  return(mainCounter(2));
-}
-
-void WaitCounter(long value)   /* wait for counter to reach value */
-{
-  long wait;
-
-  while((wait=value-Counter())>0)
-    microsleep(wait*10000);
-}
-
-void WaitCounter2(long value)  /* wait for counter to reach value */
-{
-  long wait;
-
-  while((wait=value-Counter2())>0)
-    microsleep(wait*1000);
-}
-
-void Delay(long value)
-{
-  microsleep(value);
-}
-
-BOOL DelayReached(long *counter_var, int delay)
-{
-  long actual_counter = Counter();
-
-  if (actual_counter>*counter_var+delay || actual_counter<*counter_var)
-  {
-    *counter_var = actual_counter;
-    return(TRUE);
-  }
-  else
-    return(FALSE);
+  return(door1 | door2);
 }
 
 int ReadPixel(Drawable d, int x, int y)
@@ -1261,78 +1213,6 @@ int ReadPixel(Drawable d, int x, int y)
   return(XGetPixel(pixelimage,0,0));
 }
 
-static struct JoystickInfo joystick[2] =
-{
-  JOYSTICK_XLEFT, JOYSTICK_XRIGHT, JOYSTICK_XMIDDLE,
-  JOYSTICK_YUPPER, JOYSTICK_YLOWER, JOYSTICK_YMIDDLE,
-
-  JOYSTICK_XLEFT, JOYSTICK_XRIGHT, JOYSTICK_XMIDDLE,
-  JOYSTICK_YUPPER, JOYSTICK_YLOWER, JOYSTICK_YMIDDLE
-};
-
-void LoadJoystickData()
-{
-  int i;
-  char cookie[256];
-  FILE *file;
-
-  if (joystick_status==JOYSTICK_OFF)
-    return;
-
-  if (!(file=fopen(JOYDAT_FILE,"r")))
-    return;
-
-  fscanf(file,"%s",cookie);
-  if (strcmp(cookie,JOYSTICK_COOKIE))  /* ungültiges Format? */
-  {
-    fprintf(stderr,"%s: wrong format of joystick file!\n",progname);
-    fclose(file);
-    return;
-  }
-
-  for(i=0;i<2;i++)
-  {
-    fscanf(file,"%s",cookie);
-    fscanf(file, "%d %d %d \n",
-          &joystick[i].xleft, &joystick[i].xmiddle, &joystick[i].xright);
-    fscanf(file, "%d %d %d \n",
-          &joystick[i].yupper, &joystick[i].ymiddle, &joystick[i].ylower);
-  }
-  fclose(file);
-
-  CheckJoystickData();
-}
-
-void SaveJoystickData()
-{
-  int i;
-  FILE *file;
-
-  if (joystick_status==JOYSTICK_OFF)
-    return;
-
-  CheckJoystickData();
-
-  if (!(file=fopen(JOYDAT_FILE,"w")))
-  {
-    fprintf(stderr,"%s: cannot save joystick calibration data!\n",progname);
-    return;
-  }
-
-  fprintf(file,"%s\n",JOYSTICK_COOKIE);        /* Formatkennung */
-  for(i=0;i<2;i++)
-  {
-    fprintf(file,"JOYSTICK_%d_DATA\n",i);
-    fprintf(file, "%d %d %d \n",
-           joystick[i].xleft, joystick[i].xmiddle, joystick[i].xright);
-    fprintf(file, "%d %d %d \n",
-           joystick[i].yupper, joystick[i].ymiddle, joystick[i].ylower);
-  }
-  fclose(file);
-
-  chmod(JOYDAT_FILE, JOYDAT_PERMS);
-}
-
 void CheckJoystickData()
 {
   int i;
@@ -1367,23 +1247,27 @@ int JoystickPosition(int middle, int margin, int actual)
   if (margin>middle && actual<middle)
     return(0);
 
-  range=ABS(margin-middle);
-  pos=ABS(actual-middle);
-  percentage=(int)(pos*100/range);
+  range = ABS(margin-middle);
+  pos = ABS(actual-middle);
+  percentage = (int)(pos*100/range);
   if (percentage>100)
-    percentage=100;
+    percentage = 100;
 
   return(percentage);
 }
 
 int Joystick()
 {
+#ifdef __FreeBSD__
+  struct joystick joy_ctrl;
+#else
   struct joystick_control
   {
     int buttons;
     int x;
     int y;
   } joy_ctrl;
+#endif
 
   int js_x,js_y, js_b1,js_b2;
   int left, right, up, down;
@@ -1394,15 +1278,21 @@ int Joystick()
 
   if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
   {
-    fprintf(stderr,"%s: cannot read joystick settings - no joystick support\n",progname);
+    fprintf(stderr,"%s: cannot read joystick settings - no joystick support\n",
+           progname);
     joystick_status = JOYSTICK_OFF;
     return(0);
   }
 
   js_x  = joy_ctrl.x;
   js_y  = joy_ctrl.y;
+#ifdef __FreeBSD__
+  js_b1 = joy_ctrl.b1;
+  js_b2 = joy_ctrl.b2;
+#else
   js_b1 = joy_ctrl.buttons & 1;
   js_b2 = joy_ctrl.buttons & 2;
+#endif
 
   left = JoystickPosition(joystick[joystick_nr].xmiddle,
                          joystick[joystick_nr].xleft,  js_x);
@@ -1431,124 +1321,149 @@ int Joystick()
 
 int JoystickButton()
 {
-  static int last_joy_button=0;
-  int joy_button=(Joystick() & JOY_BUTTON);
+  static int last_joy_button = 0;
+  int joy_button = (Joystick() & JOY_BUTTON);
   int result;
 
   if (joy_button)
   {
     if (last_joy_button)
-      result=JOY_BUTTON_PRESSED;
+      result = JOY_BUTTON_PRESSED;
     else
-      result=JOY_BUTTON_NEW_PRESSED;
+      result = JOY_BUTTON_NEW_PRESSED;
   }
   else
   {
     if (last_joy_button)
-      result=JOY_BUTTON_NEW_RELEASED;
+      result = JOY_BUTTON_NEW_RELEASED;
     else
-      result=JOY_BUTTON_NOT_PRESSED;
+      result = JOY_BUTTON_NOT_PRESSED;
   }
 
   last_joy_button = joy_button;
   return(result);
 }
 
-void CalibrateJoystick()
+int el2gfx(int element)
 {
-  struct joystick_control
-  {
-    int buttons;
-    int x;
-    int y;
-  } joy_ctrl;
-
-  int new_joystick_xleft, new_joystick_xright, new_joystick_xmiddle;
-  int new_joystick_yupper, new_joystick_ylower, new_joystick_ymiddle;
-
-  if (joystick_status==JOYSTICK_OFF)
-    goto error_out;
-
-  ClearWindow();
-  DrawText(SX+16, SY+7*32, "MOVE JOYSTICK TO",FS_BIG,FC_YELLOW);
-  DrawText(SX+16, SY+8*32, " THE UPPER LEFT ",FS_BIG,FC_YELLOW);
-  DrawText(SX+16, SY+9*32, "AND PRESS BUTTON",FS_BIG,FC_YELLOW);
-  BackToFront();
-
-  joy_ctrl.buttons = 0;
-  while(Joystick() & JOY_BUTTON);
-  while(!joy_ctrl.buttons)
-  {
-    if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
-    {
-      joystick_status=JOYSTICK_OFF;
-      goto error_out;
-    }
-    Delay(10000);
-  }
-
-  new_joystick_xleft = joy_ctrl.x;
-  new_joystick_yupper = joy_ctrl.y;
-
-  ClearWindow();
-  DrawText(SX+16, SY+7*32, "MOVE JOYSTICK TO",FS_BIG,FC_YELLOW);
-  DrawText(SX+32, SY+8*32, "THE LOWER RIGHT",FS_BIG,FC_YELLOW);
-  DrawText(SX+16, SY+9*32, "AND PRESS BUTTON",FS_BIG,FC_YELLOW);
-  BackToFront();
-
-  joy_ctrl.buttons = 0;
-  while(Joystick() & JOY_BUTTON);
-  while(!joy_ctrl.buttons)
-  {
-    if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
-    {
-      joystick_status=JOYSTICK_OFF;
-      goto error_out;
-    }
-    Delay(10000);
-  }
-
-  new_joystick_xright = joy_ctrl.x;
-  new_joystick_ylower = joy_ctrl.y;
-
-  ClearWindow();
-  DrawText(SX+32, SY+16+7*32, "CENTER JOYSTICK",FS_BIG,FC_YELLOW);
-  DrawText(SX+16, SY+16+8*32, "AND PRESS BUTTON",FS_BIG,FC_YELLOW);
-  BackToFront();
-
-  joy_ctrl.buttons = 0;
-  while(Joystick() & JOY_BUTTON);
-  while(!joy_ctrl.buttons)
+  switch(element)
   {
-    if (read(joystick_device, &joy_ctrl, sizeof(joy_ctrl)) != sizeof(joy_ctrl))
+    case EL_LEERRAUM:          return(-1);
+    case EL_ERDREICH:          return(GFX_ERDREICH);
+    case EL_MAUERWERK:         return(GFX_MAUERWERK);
+    case EL_FELSBODEN:         return(GFX_FELSBODEN);
+    case EL_FELSBROCKEN:       return(GFX_FELSBROCKEN);
+    case EL_SCHLUESSEL:                return(GFX_SCHLUESSEL);
+    case EL_EDELSTEIN:         return(GFX_EDELSTEIN);
+    case EL_AUSGANG_ZU:                return(GFX_AUSGANG_ZU);
+    case EL_AUSGANG_ACT:       return(GFX_AUSGANG_ACT);
+    case EL_AUSGANG_AUF:       return(GFX_AUSGANG_AUF);
+    case EL_SPIELFIGUR:                return(GFX_SPIELFIGUR);
+    case EL_SPIELER1:          return(GFX_SPIELER1);
+    case EL_SPIELER2:          return(GFX_SPIELER2);
+    case EL_SPIELER3:          return(GFX_SPIELER3);
+    case EL_SPIELER4:          return(GFX_SPIELER4);
+    case EL_KAEFER:            return(GFX_KAEFER);
+    case EL_KAEFER_R:          return(GFX_KAEFER_R);
+    case EL_KAEFER_O:          return(GFX_KAEFER_O);
+    case EL_KAEFER_L:          return(GFX_KAEFER_L);
+    case EL_KAEFER_U:          return(GFX_KAEFER_U);
+    case EL_FLIEGER:           return(GFX_FLIEGER);
+    case EL_FLIEGER_R:         return(GFX_FLIEGER_R);
+    case EL_FLIEGER_O:         return(GFX_FLIEGER_O);
+    case EL_FLIEGER_L:         return(GFX_FLIEGER_L);
+    case EL_FLIEGER_U:         return(GFX_FLIEGER_U);
+    case EL_BUTTERFLY:         return(GFX_BUTTERFLY);
+    case EL_BUTTERFLY_R:       return(GFX_BUTTERFLY_R);
+    case EL_BUTTERFLY_O:       return(GFX_BUTTERFLY_O);
+    case EL_BUTTERFLY_L:       return(GFX_BUTTERFLY_L);
+    case EL_BUTTERFLY_U:       return(GFX_BUTTERFLY_U);
+    case EL_FIREFLY:           return(GFX_FIREFLY);
+    case EL_FIREFLY_R:         return(GFX_FIREFLY_R);
+    case EL_FIREFLY_O:         return(GFX_FIREFLY_O);
+    case EL_FIREFLY_L:         return(GFX_FIREFLY_L);
+    case EL_FIREFLY_U:         return(GFX_FIREFLY_U);
+    case EL_MAMPFER:           return(GFX_MAMPFER);
+    case EL_ZOMBIE:            return(GFX_ZOMBIE);
+    case EL_BETON:             return(GFX_BETON);
+    case EL_DIAMANT:           return(GFX_DIAMANT);
+    case EL_MORAST_LEER:       return(GFX_MORAST_LEER);
+    case EL_MORAST_VOLL:       return(GFX_MORAST_VOLL);
+    case EL_TROPFEN:           return(GFX_TROPFEN);
+    case EL_BOMBE:             return(GFX_BOMBE);
+    case EL_SIEB_LEER:         return(GFX_SIEB_LEER);
+    case EL_SIEB_VOLL:         return(GFX_SIEB_VOLL);
+    case EL_SIEB_TOT:          return(GFX_SIEB_TOT);
+    case EL_SALZSAEURE:                return(GFX_SALZSAEURE);
+    case EL_AMOEBE_TOT:                return(GFX_AMOEBE_TOT);
+    case EL_AMOEBE_NASS:       return(GFX_AMOEBE_NASS);
+    case EL_AMOEBE_NORM:       return(GFX_AMOEBE_NORM);
+    case EL_AMOEBE_VOLL:       return(GFX_AMOEBE_VOLL);
+    case EL_AMOEBE_BD:         return(GFX_AMOEBE_BD);
+    case EL_AMOEBA2DIAM:       return(GFX_AMOEBA2DIAM);
+    case EL_KOKOSNUSS:         return(GFX_KOKOSNUSS);
+    case EL_LIFE:              return(GFX_LIFE);
+    case EL_LIFE_ASYNC:                return(GFX_LIFE_ASYNC);
+    case EL_DYNAMIT:           return(GFX_DYNAMIT);
+    case EL_BADEWANNE:         return(GFX_BADEWANNE);
+    case EL_BADEWANNE1:                return(GFX_BADEWANNE1);
+    case EL_BADEWANNE2:                return(GFX_BADEWANNE2);
+    case EL_BADEWANNE3:                return(GFX_BADEWANNE3);
+    case EL_BADEWANNE4:                return(GFX_BADEWANNE4);
+    case EL_BADEWANNE5:                return(GFX_BADEWANNE5);
+    case EL_ABLENK_AUS:                return(GFX_ABLENK_AUS);
+    case EL_ABLENK_EIN:                return(GFX_ABLENK_EIN);
+    case EL_SCHLUESSEL1:       return(GFX_SCHLUESSEL1);
+    case EL_SCHLUESSEL2:       return(GFX_SCHLUESSEL2);
+    case EL_SCHLUESSEL3:       return(GFX_SCHLUESSEL3);
+    case EL_SCHLUESSEL4:       return(GFX_SCHLUESSEL4);
+    case EL_PFORTE1:           return(GFX_PFORTE1);
+    case EL_PFORTE2:           return(GFX_PFORTE2);
+    case EL_PFORTE3:           return(GFX_PFORTE3);
+    case EL_PFORTE4:           return(GFX_PFORTE4);
+    case EL_PFORTE1X:          return(GFX_PFORTE1X);
+    case EL_PFORTE2X:          return(GFX_PFORTE2X);
+    case EL_PFORTE3X:          return(GFX_PFORTE3X);
+    case EL_PFORTE4X:          return(GFX_PFORTE4X);
+    case EL_DYNAMIT_AUS:       return(GFX_DYNAMIT_AUS);
+    case EL_PACMAN:            return(GFX_PACMAN);
+    case EL_PACMAN_R:          return(GFX_PACMAN_R);
+    case EL_PACMAN_O:          return(GFX_PACMAN_O);
+    case EL_PACMAN_L:          return(GFX_PACMAN_L);
+    case EL_PACMAN_U:          return(GFX_PACMAN_U);
+    case EL_UNSICHTBAR:                return(GFX_UNSICHTBAR);
+    case EL_ERZ_EDEL:          return(GFX_ERZ_EDEL);
+    case EL_ERZ_DIAM:          return(GFX_ERZ_DIAM);
+    case EL_BIRNE_AUS:         return(GFX_BIRNE_AUS);
+    case EL_BIRNE_EIN:         return(GFX_BIRNE_EIN);
+    case EL_ZEIT_VOLL:         return(GFX_ZEIT_VOLL);
+    case EL_ZEIT_LEER:         return(GFX_ZEIT_LEER);
+    case EL_MAUER_LEBT:                return(GFX_MAUER_LEBT);
+    case EL_EDELSTEIN_BD:      return(GFX_EDELSTEIN_BD);
+    case EL_EDELSTEIN_GELB:    return(GFX_EDELSTEIN_GELB);
+    case EL_EDELSTEIN_ROT:     return(GFX_EDELSTEIN_ROT);
+    case EL_EDELSTEIN_LILA:    return(GFX_EDELSTEIN_LILA);
+    case EL_ERZ_EDEL_BD:       return(GFX_ERZ_EDEL_BD);
+    case EL_ERZ_EDEL_GELB:     return(GFX_ERZ_EDEL_GELB);
+    case EL_ERZ_EDEL_ROT:      return(GFX_ERZ_EDEL_ROT);
+    case EL_ERZ_EDEL_LILA:     return(GFX_ERZ_EDEL_LILA);
+    case EL_MAMPFER2:          return(GFX_MAMPFER2);
+    case EL_SIEB2_LEER:                return(GFX_SIEB2_LEER);
+    case EL_SIEB2_VOLL:                return(GFX_SIEB2_VOLL);
+    case EL_SIEB2_TOT:         return(GFX_SIEB2_TOT);
+    case EL_DYNABOMB:          return(GFX_DYNABOMB);
+    case EL_DYNABOMB_NR:       return(GFX_DYNABOMB_NR);
+    case EL_DYNABOMB_SZ:       return(GFX_DYNABOMB_SZ);
+    case EL_DYNABOMB_XL:       return(GFX_DYNABOMB_XL);
+    case EL_SOKOBAN_OBJEKT:    return(GFX_SOKOBAN_OBJEKT);
+    case EL_SOKOBAN_FELD_LEER: return(GFX_SOKOBAN_FELD_LEER);
+    case EL_SOKOBAN_FELD_VOLL: return(GFX_SOKOBAN_FELD_VOLL);
+    default:
     {
-      joystick_status=JOYSTICK_OFF;
-      goto error_out;
+      if (IS_CHAR(element))
+       return(GFX_CHAR_START + (element-EL_CHAR_START));
+      else
+       return(-1);
     }
-    Delay(10000);
   }
-
-  new_joystick_xmiddle = joy_ctrl.x;
-  new_joystick_ymiddle = joy_ctrl.y;
-
-  joystick[joystick_nr].xleft = new_joystick_xleft;
-  joystick[joystick_nr].yupper = new_joystick_yupper;
-  joystick[joystick_nr].xright = new_joystick_xright;
-  joystick[joystick_nr].ylower = new_joystick_ylower;
-  joystick[joystick_nr].xmiddle = new_joystick_xmiddle;
-  joystick[joystick_nr].ymiddle = new_joystick_ymiddle;
-
-  CheckJoystickData();
-
-  DrawSetupScreen();
-  while(Joystick() & JOY_BUTTON);
-  return;
-
-  error_out:
-
-  ClearWindow();
-  DrawText(SX+16, SY+16, "NO JOYSTICK",FS_BIG,FC_YELLOW);
-  DrawText(SX+16, SY+48, " AVAILABLE ",FS_BIG,FC_YELLOW);
-  Delay(3000000);
-  DrawSetupScreen();
 }