[ViewVC] Diff of: cvs/deliantra/server/server/time.C

Comparing deliantra/server/server/time.C (file contents):
Revision 1.51 by root, Fri May 18 20:45:37 2007 UTC vs.
Revision 1.62 by elmex, Sat Aug 4 21:04:24 2007 UTC

 /*
- * CrossFire, A Multiplayer game
+ * This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
  *
- * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
+ * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
- * Copyright (C) 2002 Mark Wedel & Crossfire Development Team
+ * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
- * Copyright (C) 1992 Frank Tore Johansen
+ * Copyright (©) 1992,2007 Frank Tore Johansen
  *
- * This program is free software; you can redistribute it and/or modify
+ * Crossfire TRT is free software: you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation, either version 3 of the License, or
  * (at your option) any later version.
  *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  * GNU General Public License for more details.
  *
  * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  *
- * The authors can be reached via e-mail at <crossfire@schmorp.de>
+ * The authors can be reached via e-mail to <crossfire@schmorp.de>
  */
 /*
  * Routines that is executed from objects based on their speed have been
  * collected in this file.
   object *op;
   if (QUERY_FLAG (gen, FLAG_CONTENT_ON_GEN))
     {
-      // either copy one item form the inventory...
+      // either copy one item from the inventory...
       if (!gen->inv)
         return;
       // first select one item from the inventory
       int index = 0;
       op = object_create_clone (op);
       CLEAR_FLAG (op, FLAG_IS_A_TEMPLATE);
       unflag_inv (op, FLAG_IS_A_TEMPLATE);
     }
+  else if (gen->other_arch)
+    {
+      // ...or use other_arch
+      op = arch_to_object (gen->other_arch);
+    }
   else
-    {
-      // ...or use other_arch
-      if (archetype *at = gen->other_arch)
-        op = arch_to_object (at);
-      else
-        return;
+    return;
-    }
   op->expand_tail ();
   int i = find_free_spot (op, gen->map, gen->x, gen->y, 1, 9);
   if (i >= 0)
   if (op->value)
     {
       if (--op->stats.wc <= 0)
         {                       /* Reached bottom, let's stop */
           op->stats.wc = 0;
-          if (op->arch->clone.speed)
+          if (op->arch->speed)
             op->value = 0;
           else
             op->set_speed (0);
         }
         if (!QUERY_FLAG (tmp, FLAG_NO_PICK) || QUERY_FLAG (tmp, FLAG_CAN_ROLL) || QUERY_FLAG (tmp, FLAG_ALIVE))
           break;
       if (tmp == NULL)
         {
-          if (op->arch->clone.speed)
+          if (op->arch->speed)
             op->value = 1;
           else
             op->set_speed (0);
           return;
               op->stats.food = 1;
             }
           else
             {
               op->move_block = MOVE_ALL;
-              if (!op->arch->clone.stats.ac)
+              if (!op->arch->stats.ac)
                 SET_FLAG (op, FLAG_BLOCKSVIEW);
               update_all_los (op->map, op->x, op->y);
             }
         }                       /* gate is halfway up */
   op->spellarg = NULL;
   op->stats.sp = 0;
   op->stats.hp = 0;
   op->stats.grace = 0;
   op->level = 0;
-  op->face = op->arch->clone.face;
+  op->face = op->arch->face;
   op->owner = NULL;             /* So that stopped arrows will be saved */
   update_object (op, UP_OBJ_CHANGE);
   return op;
 }
     move_teleporter (op->more);
   if (op->head)
     head = op->head;
-  for (tmp = op->above; tmp != NULL; tmp = tmp->above)
+  for (tmp = op->above; tmp; tmp = tmp->above)
     if (!QUERY_FLAG (tmp, FLAG_IS_FLOOR))
       break;
   /* If nothing above us to move, nothing to do */
   if (!tmp || QUERY_FLAG (tmp, FLAG_WIZPASS))
       if (INVOKE_OBJECT (TRIGGER, op, ARG_OBJECT (tmp)))
         return;
       teleport (head, TELEPORTER, tmp);
     }
 }
 /*  This object will teleport someone to a different map
     and will also apply changes to the player from its inventory.
     This was invented for giving classes, but there's no reason it
     can't be generalized.
     return;                     /* dm has created a firewall in his inventory */
   spell = op->inv;
   if (!spell || spell->type != SPELL)
-    spell = &op->other_arch->clone;
+    spell = op->other_arch;
   if (!spell)
     {
       LOG (llevError, "move_firewall: no spell specified (%s, %s, %d, %d)\n", &op->name, &op->map->name, op->x, op->y);
       return;
                    * is cleared, otherwise the player will get stuck in
                    * place.  This can happen if the player used a spell to
                    * get to this space.
                    */
                   victim->contr->fire_on = 0;
-                  victim->speed_left = 0.f;
+                  victim->speed_left = 1.f;
                   move_player (victim, dir);
                 }
               else
                 return;
             }
   if (op->above == NULL)
     return;
   for (tmp = op->above; tmp; tmp = tmp->above)
     {
-      if (op->other_arch->name == tmp->arch->name)
+      if (op->other_arch->archname == tmp->arch->archname)
         {
           if (op->level <= 0)
             tmp->destroy ();
           else
             {
     {
       new_ob->destroy ();
       return;
     }
+  // for now lets try to identify everything generated here, it mostly
+  // happens automated, so this will at least fix many identify-experience holes
+  SET_FLAG (new_ob, FLAG_IDENTIFIED);
   insert_ob_in_map_at (new_ob, creator->map, creator, 0, creator->x, creator->y);
   if (QUERY_FLAG (new_ob, FLAG_FREED))
     return;
   if (creator->slaying)
 void
 move_marker (object *op)
 {
   if (object *tmp = op->ms ().player ())
     {
-      object *tmp2;
       /* remove an old force with a slaying field == op->name */
-      for (tmp2 = tmp->inv; tmp2; tmp2 = tmp2->below)
+      if (object *force = tmp->force_find (op->name))
-        if (tmp2->type == FORCE && tmp2->slaying && tmp2->slaying == op->name)
+        force->destroy ();
+      if (!tmp->force_find (op->slaying))
-          {
+        {
-            tmp2->destroy ();
+          tmp->force_add (op->slaying, op->stats.food);
-            break;
-          }
-      /* cycle through his inventory to look for the MARK we want to
-       * place
-       */
-      for (tmp2 = tmp->inv; tmp2; tmp2 = tmp2->below)
-        if (tmp2->type == FORCE && tmp2->slaying && tmp2->slaying == op->slaying)
-          break;
-      /* if we didn't find our own MARK */
-      if (!tmp2)
-        {
-          object *force = get_archetype (FORCE_NAME);
-          if (op->stats.food)
-            {
-              force->set_speed (0.01);
-              force->speed_left = -op->stats.food;
-            }
-          else
-            force->set_speed (0);
-          /* put in the lock code */
-          force->slaying = op->slaying;
-          if (op->lore)
-            force->lore = op->lore;
-          insert_ob_in_ob (force, tmp);
           if (op->msg)
             new_draw_info (NDI_UNIQUE | NDI_NAVY, 0, tmp, op->msg);
           if (op->stats.hp > 0)
             {
               op->stats.hp--;
               if (op->stats.hp == 0)
                 {
                   /* marker expires--granted mark number limit */
                   op->destroy ();
                   return;
 }
 void
 process_object (object *op)
 {
-  if (QUERY_FLAG (op, FLAG_IS_A_TEMPLATE))
+  if (expect_false (QUERY_FLAG (op, FLAG_IS_A_TEMPLATE)))
     return;
-  if (INVOKE_OBJECT (TICK, op))
+  if (expect_false (INVOKE_OBJECT (TICK, op)))
     return;
   if (QUERY_FLAG (op, FLAG_MONSTER))
     if (move_monster (op) || QUERY_FLAG (op, FLAG_FREED))
       return;
       if (QUERY_FLAG (op, FLAG_SEE_ANYWHERE))
         make_sure_seen (op);
     }
+  if (expect_false (
-  if (op->flag [FLAG_GENERATOR]
+        op->flag [FLAG_GENERATOR]
-      || op->flag [FLAG_CHANGING]
+        || op->flag [FLAG_CHANGING]
-      || op->flag [FLAG_IS_USED_UP])
+        || op->flag [FLAG_IS_USED_UP]
+     ))
     {
       if (QUERY_FLAG (op, FLAG_CHANGING) && !op->state)
         {
           change_object (op);
           return;

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/server/server/time.C (file contents): Revision 1.51 by root, Fri May 18 20:45:37 2007 UTC vs. Revision 1.62 by elmex, Sat Aug 4 21:04:24 2007 UTC

Diff Legend

Comparing deliantra/server/server/time.C (file contents):
Revision 1.51 by root, Fri May 18 20:45:37 2007 UTC vs.
Revision 1.62 by elmex, Sat Aug 4 21:04:24 2007 UTC