rnd-20030702-1-src
[rocksndiamonds.git] / src / game.c
index b51a18739ef7ed2f4dd3092b061f9b3c5c9e0d2b..6326b223d920bae9a0879b70c65ecbf9ee31a9d8 100644 (file)
@@ -163,9 +163,11 @@ static void CloseAllOpenTimegates(void);
 static void CheckGravityMovement(struct PlayerInfo *);
 static void KillHeroUnlessProtected(int, int);
 
-static void CheckTriggeredElementChange(int, int);
-static void CheckPlayerElementChange(int, int, int, int);
-static void ChangeElementDoIt(int, int, int);
+static void TestIfPlayerTouchesCustomElement(int, int);
+
+static boolean CheckTriggeredElementChange(int, int);
+static boolean CheckElementChange(int, int, int, int);
+static void ChangeElementNow(int, int, int);
 
 static void PlaySoundLevel(int, int, int);
 static void PlaySoundLevelNearest(int, int, int);
@@ -202,8 +204,8 @@ static void RunTimegateWheel(int x, int y);
 
 struct ChangingElementInfo
 {
-  int base_element;
-  int next_element;
+  int element;
+  int target_element;
   int change_delay;
   void (*pre_change_function)(int x, int y);
   void (*change_function)(int x, int y);
@@ -375,7 +377,7 @@ struct
   int element;
   int gem_count;
 }
-collect_gem_count_list[] =
+gem_count_list[] =
 {
   { EL_EMERALD,                1 },
   { EL_BD_DIAMOND,     1 },
@@ -390,10 +392,10 @@ collect_gem_count_list[] =
   { EL_UNDEFINED,      0 },
 };
 
-static struct ChangingElementInfo changing_element[MAX_NUM_ELEMENTS];
+static boolean changing_element[MAX_NUM_ELEMENTS];
 static unsigned long trigger_events[MAX_NUM_ELEMENTS];
 
-#define IS_AUTO_CHANGING(e)  (changing_element[e].base_element != EL_UNDEFINED)
+#define IS_AUTO_CHANGING(e)    (changing_element[e])
 #define IS_JUST_CHANGING(x, y) (ChangeDelay[x][y] != 0)
 #define IS_CHANGING(x, y)      (IS_AUTO_CHANGING(Feld[x][y]) || \
                                 IS_JUST_CHANGING(x, y))
@@ -742,42 +744,75 @@ static void InitGameEngine()
   /* initialize changing elements information */
   for (i=0; i<MAX_NUM_ELEMENTS; i++)
   {
+#if 1
+    element_info[i].change.pre_change_function = NULL;
+    element_info[i].change.change_function = NULL;
+    element_info[i].change.post_change_function = NULL;
+
+    if (!IS_CUSTOM_ELEMENT(i))
+    {
+      element_info[i].change.target_element = EL_EMPTY_SPACE;
+      element_info[i].change.delay_fixed = 0;
+      element_info[i].change.delay_random = 0;
+      element_info[i].change.delay_frames = 1;
+    }
+
+    changing_element[i] = FALSE;
+#else
     changing_element[i].base_element = EL_UNDEFINED;
     changing_element[i].next_element = EL_UNDEFINED;
     changing_element[i].change_delay = -1;
     changing_element[i].pre_change_function = NULL;
     changing_element[i].change_function = NULL;
     changing_element[i].post_change_function = NULL;
+#endif
   }
 
   /* add changing elements from pre-defined list */
-  for (i=0; changing_element_list[i].base_element != EL_UNDEFINED; i++)
+  for (i=0; changing_element_list[i].element != EL_UNDEFINED; i++)
   {
+    int element = changing_element_list[i].element;
     struct ChangingElementInfo *ce = &changing_element_list[i];
-    int element = ce->base_element;
+    struct ElementChangeInfo *change = &element_info[element].change;
 
+#if 1
+    change->target_element       = ce->target_element;
+    change->delay_fixed          = ce->change_delay;
+    change->pre_change_function  = ce->pre_change_function;
+    change->change_function      = ce->change_function;
+    change->post_change_function = ce->post_change_function;
+
+    changing_element[element] = TRUE;
+#else
     changing_element[element].base_element         = ce->base_element;
     changing_element[element].next_element         = ce->next_element;
     changing_element[element].change_delay         = ce->change_delay;
     changing_element[element].pre_change_function  = ce->pre_change_function;
     changing_element[element].change_function      = ce->change_function;
     changing_element[element].post_change_function = ce->post_change_function;
+#endif
   }
 
   /* add changing elements from custom element configuration */
   for (i=0; i < NUM_CUSTOM_ELEMENTS; i++)
   {
     int element = EL_CUSTOM_START + i;
+#if 0
     struct ElementChangeInfo *change = &element_info[element].change;
+#endif
 
     /* only add custom elements that change after fixed/random frame delay */
     if (!CAN_CHANGE(element) || !HAS_CHANGE_EVENT(element, CE_DELAY))
       continue;
 
+#if 1
+    changing_element[element] = TRUE;
+#else
     changing_element[element].base_element = element;
-    changing_element[element].next_element = change->successor;
+    changing_element[element].next_element = change->target_element;
     changing_element[element].change_delay = (change->delay_fixed *
                                              change->delay_frames);
+#endif
   }
 
   /* ---------- initialize trigger events ---------------------------------- */
@@ -818,12 +853,12 @@ static void InitGameEngine()
   /* initialize gem count values for each element */
   for (i=0; i<MAX_NUM_ELEMENTS; i++)
     if (!IS_CUSTOM_ELEMENT(i))
-      element_info[i].collect_gem_count = 0;
+      element_info[i].gem_count = 0;
 
   /* add gem count values for all elements from pre-defined list */
-  for (i=0; collect_gem_count_list[i].element != EL_UNDEFINED; i++)
-    element_info[collect_gem_count_list[i].element].collect_gem_count =
-      collect_gem_count_list[i].gem_count;
+  for (i=0; gem_count_list[i].element != EL_UNDEFINED; i++)
+    element_info[gem_count_list[i].element].gem_count =
+      gem_count_list[i].gem_count;
 }
 
 
@@ -1673,19 +1708,26 @@ static int MovingOrBlocked2ElementIfNotLeaving(int x, int y)
 static void RemoveField(int x, int y)
 {
   Feld[x][y] = EL_EMPTY;
-  GfxElement[x][y] = EL_UNDEFINED;
+
   MovPos[x][y] = 0;
   MovDir[x][y] = 0;
   MovDelay[x][y] = 0;
+
+  AmoebaNr[x][y] = 0;
   ChangeDelay[x][y] = 0;
   Pushed[x][y] = FALSE;
+
+  GfxElement[x][y] = EL_UNDEFINED;
+  GfxAction[x][y] = ACTION_DEFAULT;
 }
 
 void RemoveMovingField(int x, int y)
 {
   int oldx = x, oldy = y, newx = x, newy = y;
+  int element = Feld[x][y];
+  int next_element = EL_UNDEFINED;
 
-  if (Feld[x][y] != EL_BLOCKED && !IS_MOVING(x, y))
+  if (element != EL_BLOCKED && !IS_MOVING(x, y))
     return;
 
   if (IS_MOVING(x, y))
@@ -1694,29 +1736,27 @@ void RemoveMovingField(int x, int y)
     if (Feld[newx][newy] != EL_BLOCKED)
       return;
   }
-  else if (Feld[x][y] == EL_BLOCKED)
+  else if (element == EL_BLOCKED)
   {
     Blocked2Moving(x, y, &oldx, &oldy);
     if (!IS_MOVING(oldx, oldy))
       return;
   }
 
-  if (Feld[x][y] == EL_BLOCKED &&
+  if (element == EL_BLOCKED &&
       (Feld[oldx][oldy] == EL_QUICKSAND_EMPTYING ||
        Feld[oldx][oldy] == EL_MAGIC_WALL_EMPTYING ||
        Feld[oldx][oldy] == EL_BD_MAGIC_WALL_EMPTYING ||
        Feld[oldx][oldy] == EL_AMOEBA_DROPPING))
-    Feld[oldx][oldy] = get_next_element(Feld[oldx][oldy]);
-  else
-    Feld[oldx][oldy] = EL_EMPTY;
+    next_element = get_next_element(Feld[oldx][oldy]);
+
+  RemoveField(oldx, oldy);
+  RemoveField(newx, newy);
 
   Store[oldx][oldy] = Store2[oldx][oldy] = 0;
 
-  Feld[newx][newy] = EL_EMPTY;
-  MovPos[oldx][oldy] = MovDir[oldx][oldy] = MovDelay[oldx][oldy] = 0;
-  MovPos[newx][newy] = MovDir[newx][newy] = MovDelay[newx][newy] = 0;
-  ChangeDelay[oldx][oldy] = ChangeDelay[newx][newy] = 0;
-  GfxAction[oldx][oldy] = GfxAction[newx][newy] = ACTION_DEFAULT;
+  if (next_element != EL_UNDEFINED)
+    Feld[oldx][oldy] = next_element;
 
   DrawLevelField(oldx, oldy);
   DrawLevelField(newx, newy);
@@ -1863,6 +1903,19 @@ void Explode(int ex, int ey, int phase, int mode)
       if (element == EL_EXPLOSION)
        element = Store2[x][y];
 
+#if 1
+      if (AmoebaNr[x][y] &&
+         (element == EL_AMOEBA_FULL ||
+          element == EL_BD_AMOEBA ||
+          element == EL_AMOEBA_GROWING))
+      {
+       AmoebaCnt[AmoebaNr[x][y]]--;
+       AmoebaCnt2[AmoebaNr[x][y]]--;
+      }
+
+      RemoveField(x, y);
+#endif
+
       if (IS_PLAYER(ex, ey) && !PLAYER_PROTECTED(ex, ey))
       {
        switch(StorePlayer[ex][ey])
@@ -1926,6 +1979,7 @@ void Explode(int ex, int ey, int phase, int mode)
          center_element == EL_AMOEBA_TO_DIAMOND || mode == EX_BORDER)
        Store2[x][y] = element;
 
+#if 0
       if (AmoebaNr[x][y] &&
          (element == EL_AMOEBA_FULL ||
           element == EL_BD_AMOEBA ||
@@ -1935,14 +1989,21 @@ void Explode(int ex, int ey, int phase, int mode)
        AmoebaCnt2[AmoebaNr[x][y]]--;
       }
 
+#if 1
+      RemoveField(x, y);
+#else
+      MovDir[x][y] = MovPos[x][y] = 0;
+      AmoebaNr[x][y] = 0;
+#endif
+#endif
+
       Feld[x][y] = EL_EXPLOSION;
 #if 1
       GfxElement[x][y] = center_element;
 #else
       GfxElement[x][y] = EL_UNDEFINED;
 #endif
-      MovDir[x][y] = MovPos[x][y] = 0;
-      AmoebaNr[x][y] = 0;
+
       ExplodePhase[x][y] = 1;
       Stop[x][y] = TRUE;
     }
@@ -2094,7 +2155,11 @@ void DynaExplode(int ex, int ey)
 
 void Bang(int x, int y)
 {
+#if 1
+  int element = MovingOrBlocked2Element(x, y);
+#else
   int element = Feld[x][y];
+#endif
 
   if (IS_PLAYER(x, y))
   {
@@ -2530,15 +2595,24 @@ void Impact(int x, int y)
     PlaySoundLevel(x, y, SND_PEARL_BREAKING);
     return;
   }
+#if 1
+  else if (impact && CheckElementChange(x, y, element, ACTION_IMPACT))
+  {
+    PlaySoundLevelElementAction(x, y, element, ACTION_IMPACT);
+
+    return;
+  }
+#else
   else if (impact && CAN_CHANGE(element) &&
           HAS_CHANGE_EVENT(element, CE_IMPACT))
   {
     PlaySoundLevelElementAction(x, y, element, ACTION_IMPACT);
 
-    ChangeElementDoIt(x, y, element_info[element].change.successor);
+    ChangeElementNow(x, y, element);
 
     return;
   }
+#endif
 
   if (impact && element == EL_AMOEBA_DROP)
   {
@@ -2663,11 +2737,21 @@ void Impact(int x, int y)
        {
          ToggleLightSwitch(x, y + 1);
        }
-       else if (CAN_CHANGE(smashed) &&
-                HAS_CHANGE_EVENT(smashed, CE_SMASHED))
+#if 1
+       else
+       {
+         CheckElementChange(x, y + 1, smashed, CE_SMASHED);
+       }
+#else
+       else if (CAN_CHANGE(smashed) && HAS_CHANGE_EVENT(smashed, CE_SMASHED))
        {
-         ChangeElementDoIt(x, y + 1, element_info[smashed].change.successor);
+         ChangeElementNow(x, y + 1, smashed);
        }
+#endif
+      }
+      else
+      {
+       CheckElementChange(x, y + 1, smashed, CE_SMASHED);
       }
     }
   }
@@ -3884,6 +3968,7 @@ void ContinueMoving(int x, int y)
   int dy = (direction == MV_UP   ? -1 : direction == MV_DOWN  ? +1 : 0);
   int horiz_move = (dx != 0);
   int newx = x + dx, newy = y + dy;
+  int nextx = newx + dx, nexty = newy + dy;
   int step = (horiz_move ? dx : dy) * TILEX / MOVE_DELAY_NORMAL_SPEED;
 #if 1
   boolean pushed = Pushed[x][y];
@@ -4111,6 +4196,20 @@ void ContinueMoving(int x, int y)
     if (CAN_SMASH(element) && direction == MV_DOWN &&
        (newy == lev_fieldy - 1 || !IS_FREE(x, newy + 1)))
       Impact(x, newy);
+#endif
+
+#if 0
+    if (!IN_LEV_FIELD(nextx, nexty) || !IS_FREE(nextx, nexty))
+      CheckTriggeredElementChange(element, CE_COLLISION);
+#else
+#if 1
+    if (!IN_LEV_FIELD(nextx, nexty) || !IS_FREE(nextx, nexty))
+      CheckElementChange(newx, newy, element, CE_COLLISION);
+#else
+    if ((!IN_LEV_FIELD(nextx, nexty) || !IS_FREE(nextx, nexty)) &&
+       CAN_CHANGE(element) && HAS_CHANGE_EVENT(element, CE_COLLISION))
+      ChangeElementNow(newx, newy, element);
+#endif
 #endif
   }
   else                         /* still moving on */
@@ -5003,12 +5102,16 @@ static void ChangeActiveTrap(int x, int y)
     DrawLevelFieldCrumbledSand(x, y);
 }
 
-static void ChangeElementDoIt(int x, int y, int element_new)
+static void ChangeElementNowExt(int x, int y, int target_element)
 {
-  CheckTriggeredElementChange(Feld[x][y], CE_OTHER_CHANGING);
+  if (IS_PLAYER(x, y) && !IS_ACCESSIBLE(target_element))
+  {
+    Bang(x, y);
+    return;
+  }
 
   RemoveField(x, y);
-  Feld[x][y] = element_new;
+  Feld[x][y] = target_element;
 
   ResetGfxAnimation(x, y);
   ResetRandomAnimationValue(x, y);
@@ -5049,12 +5152,108 @@ static void ChangeElementDoIt(int x, int y, int element_new)
   }
 }
 
+static void ChangeElementNow(int x, int y, int element)
+{
+  struct ElementChangeInfo *change = &element_info[element].change;
+
+  CheckTriggeredElementChange(Feld[x][y], CE_OTHER_CHANGING);
+
+  if (change->explode)
+  {
+    Bang(x, y);
+    return;
+  }
+
+  if (change->use_content)
+  {
+    boolean complete_change = TRUE;
+    boolean can_change[3][3];
+    int xx, yy;
+
+    for (yy = 0; yy < 3; yy++) for(xx = 0; xx < 3 ; xx++)
+    {
+      boolean half_destructible;
+      int ex = x + xx - 1;
+      int ey = y + yy - 1;
+      int e;
+
+      can_change[xx][yy] = TRUE;
+
+      if (ex == x && ey == y)  /* do not check changing element itself */
+       continue;
+
+      if (change->content[xx][yy] == EL_EMPTY_SPACE)
+      {
+       can_change[xx][yy] = FALSE;     /* do not change empty borders */
+
+       continue;
+      }
+
+      if (!IN_LEV_FIELD(ex, ey))
+      {
+       can_change[xx][yy] = FALSE;
+       complete_change = FALSE;
+
+       continue;
+      }
+
+      e = Feld[ex][ey];
+
+      half_destructible = (IS_FREE(ex, ey) || IS_DIGGABLE(e));
+
+      if ((change->power <= CP_NON_DESTRUCTIVE  && !IS_FREE(ex, ey)) ||
+         (change->power <= CP_HALF_DESTRUCTIVE && !half_destructible) ||
+         (change->power <= CP_FULL_DESTRUCTIVE && IS_INDESTRUCTIBLE(e)))
+      {
+       can_change[xx][yy] = FALSE;
+       complete_change = FALSE;
+      }
+    }
+
+    if (!change->only_complete || complete_change)
+    {
+      if (change->only_complete && change->use_random_change &&
+         RND(change->random) != 0)
+       return;
+
+      for (yy = 0; yy < 3; yy++) for(xx = 0; xx < 3 ; xx++)
+      {
+       int ex = x + xx - 1;
+       int ey = y + yy - 1;
+
+       if (can_change[xx][yy] && (!change->use_random_change ||
+                                  RND(change->random) == 0))
+       {
+         ChangeElementNowExt(ex, ey, change->content[xx][yy]);
+
+         /* for symmetry reasons, stop newly created border elements */
+         if (ex != x || ey != y)
+           Stop[ex][ey] = TRUE;
+       }
+      }
+
+      return;
+    }
+  }
+
+  ChangeElementNowExt(x, y, change->target_element);
+}
+
 static void ChangeElement(int x, int y)
 {
+#if 1
+  int element = MovingOrBlocked2Element(x, y);
+#else
   int element = Feld[x][y];
+#endif
+  struct ElementChangeInfo *change = &element_info[element].change;
 
   if (ChangeDelay[x][y] == 0)          /* initialize element change */
   {
+#if 1
+    ChangeDelay[x][y] = (    change->delay_fixed  * change->delay_frames +
+                        RND(change->delay_random * change->delay_frames)) + 1;
+#else
     ChangeDelay[x][y] = changing_element[element].change_delay + 1;
 
     if (IS_CUSTOM_ELEMENT(element) && HAS_CHANGE_EVENT(element, CE_DELAY))
@@ -5064,12 +5263,18 @@ static void ChangeElement(int x, int y)
 
       ChangeDelay[x][y] += RND(max_random_delay * delay_frames);
     }
+#endif
 
     ResetGfxAnimation(x, y);
     ResetRandomAnimationValue(x, y);
 
+#if 1
+    if (change->pre_change_function)
+      change->pre_change_function(x, y);
+#else
     if (changing_element[element].pre_change_function)
       changing_element[element].pre_change_function(x, y);
+#endif
   }
 
   ChangeDelay[x][y]--;
@@ -5081,12 +5286,19 @@ static void ChangeElement(int x, int y)
     if (IS_ANIMATED(graphic))
       DrawLevelGraphicAnimationIfNeeded(x, y, graphic);
 
+#if 1
+    if (change->change_function)
+      change->change_function(x, y);
+#else
     if (changing_element[element].change_function)
       changing_element[element].change_function(x, y);
+#endif
   }
   else                                 /* finish element change */
   {
+#if 0
     int next_element = changing_element[element].next_element;
+#endif
 
     if (IS_MOVING(x, y))               /* never change a running system ;-) */
     {
@@ -5095,22 +5307,30 @@ static void ChangeElement(int x, int y)
       return;
     }
 
+#if 1
+    ChangeElementNow(x, y, element);
+
+    if (change->post_change_function)
+      change->post_change_function(x, y);
+#else
     if (next_element != EL_UNDEFINED)
-      ChangeElementDoIt(x, y, next_element);
+      ChangeElementNow(x, y, next_element);
     else
-      ChangeElementDoIt(x, y, element_info[element].change.successor);
+      ChangeElementNow(x, y, element_info[element].change.target_element);
 
     if (changing_element[element].post_change_function)
       changing_element[element].post_change_function(x, y);
+#endif
   }
 }
 
-static void CheckTriggeredElementChange(int trigger_element, int trigger_event)
+static boolean CheckTriggeredElementChange(int trigger_element,
+                                          int trigger_event)
 {
   int i, x, y;
 
   if (!(trigger_events[trigger_element] & CH_EVENT_BIT(trigger_event)))
-    return;
+    return FALSE;
 
   for (i=0; i<MAX_NUM_ELEMENTS; i++)
   {
@@ -5127,20 +5347,22 @@ static void CheckTriggeredElementChange(int trigger_element, int trigger_event)
       }
     }
   }
+
+  return TRUE;
 }
 
-static void CheckPlayerElementChange(int x, int y, int element,
-                                    int trigger_event)
+static boolean CheckElementChange(int x, int y, int element, int trigger_event)
 {
   if (!CAN_CHANGE(element) || !HAS_CHANGE_EVENT(element, trigger_event))
-    return;
+    return FALSE;
+
+  if (Feld[x][y] == EL_BLOCKED)
+    Blocked2Moving(x, y, &x, &y);
 
-#if 1
   ChangeDelay[x][y] = 1;
   ChangeElement(x, y);
-#else
-  ChangeElementDoIt(x, y, element_info[element].change.successor);
-#endif
+
+  return TRUE;
 }
 
 static void PlayerActions(struct PlayerInfo *player, byte player_action)
@@ -6071,6 +6293,7 @@ boolean MoveFigure(struct PlayerInfo *player, int dx, int dy)
   }
 
   TestIfHeroTouchesBadThing(jx, jy);
+  TestIfPlayerTouchesCustomElement(jx, jy);
 
   if (!player->active)
     RemoveHero(player);
@@ -6171,6 +6394,31 @@ void ScrollScreen(struct PlayerInfo *player, int mode)
     ScreenMovDir = MV_NO_MOVING;
 }
 
+void TestIfPlayerTouchesCustomElement(int x, int y)
+{
+  static int xy[4][2] =
+  {
+    { 0, -1 },
+    { -1, 0 },
+    { +1, 0 },
+    { 0, +1 }
+  };
+  boolean center_is_player = (IS_PLAYER(x, y));
+  int i;
+
+  for (i=0; i<4; i++)
+  {
+    int xx = x + xy[i][0];
+    int yy = y + xy[i][1];
+
+    if (center_is_player && IN_LEV_FIELD(xx, yy))
+    {
+      CheckTriggeredElementChange(Feld[xx][yy], CE_OTHER_TOUCHING);
+      CheckElementChange(xx, yy, Feld[xx][yy], CE_TOUCHED_BY_PLAYER);
+    }
+  }
+}
+
 void TestIfGoodThingHitsBadThing(int good_x, int good_y, int good_move_dir)
 {
   int i, kill_x = -1, kill_y = -1;
@@ -6904,10 +7152,10 @@ int DigField(struct PlayerInfo *player,
                             el2edimg(EL_KEY_1 + key_nr));
          redraw_mask |= REDRAW_DOOR_1;
        }
-       else if (element_info[element].collect_gem_count > 0)
+       else if (element_info[element].gem_count > 0)
        {
          local_player->gems_still_needed -=
-           element_info[element].collect_gem_count;
+           element_info[element].gem_count;
          if (local_player->gems_still_needed < 0)
            local_player->gems_still_needed = 0;
 
@@ -7009,13 +7257,14 @@ int DigField(struct PlayerInfo *player,
          player->push_delay_value = GET_NEW_PUSH_DELAY(element);
 
        CheckTriggeredElementChange(element, CE_OTHER_PUSHING);
-       CheckPlayerElementChange(x, y, element, CE_PUSHED_BY_PLAYER);
+       CheckElementChange(x, y, element, CE_PUSHED_BY_PLAYER);
 
        break;
       }
       else
       {
-       CheckPlayerElementChange(x, y, element, CE_PRESSED_BY_PLAYER);
+       CheckTriggeredElementChange(element, CE_OTHER_PRESSING);
+       CheckElementChange(x, y, element, CE_PRESSED_BY_PLAYER);
       }
 
       return MF_NO_ACTION;
@@ -7326,7 +7575,7 @@ void RaiseScoreElement(int element)
       RaiseScore(level.score[SC_KEY]);
       break;
     default:
-      RaiseScore(element_info[element].collect_score);
+      RaiseScore(element_info[element].score);
       break;
   }
 }