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

Comparing deliantra/server/server/player.C (file contents):
Revision 1.278 by root, Sun May 9 22:33:29 2010 UTC vs.
Revision 1.291 by root, Mon Nov 12 03:14:33 2012 UTC

 /*
  * This file is part of Deliantra, the Roguelike Realtime MMORPG.
  *
- * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
+ * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
  * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
  * Copyright (©) 1992 Frank Tore Johansen
  *
  * Deliantra is free software: you can redistribute it and/or modify it under
  * the terms of the Affero GNU General Public License as published by 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
  * GNU General Public License for more details.
  *
  * You should have received a copy of the Affero GNU General Public License
  * and the GNU General Public License along with this program. If not, see
  * <http://www.gnu.org/licenses/>.
  *
  * The authors can be reached via e-mail to <support@deliantra.net>
  */
 //+GPL
+#include <algorithm>
+#include <functional>
 #include <global.h>
 #include <sproto.h>
 #include <sounds.h>
 #include <living.h>
 #include <object.h>
 #include <spells.h>
 #include <skills.h>
-#include <algorithm>
-#include <functional>
 playervec players;
 /* This loads the first map an puts the player on it. */
 static void
 set_first_map (object *op)
 player::set_object (object *op)
 {
   ob = observe = viewpoint = op;
   ob->contr = this;              /* this aren't yet in archetype */
-  ob->set_speed (1.0f);
+  ob->speed = 1.0f; // object still inactive, keep it that way
   ob->speed_left = 0.5f;
   ob->direction  = 5;            /* So player faces south */
 }
  */
 int
 path_to_player (object *mon, object *pl, unsigned mindiff)
 {
   rv_vector rv;
-  int dir, i, diff, firstdir = 0, lastdir, max = MAX_SPACES, mflags, blocked;
+  int dir, i, diff, firstdir = 0, lastdir, max = MAX_SPACES;
   get_rangevector (mon, pl, &rv, 0);
   if (rv.distance < mindiff)
     return 0;
             }
         }
       /* Here we remove duplicated skills (as duplicated spell objects have
        * _very_ confusing effects for players), which could for instance be
-       * generated by bad treasurelists. - elmex
+       * generated by multiple treasurelists specifying the same skills.
        */
       if (op->type == SKILL)
         {
           for (object *tmp = op->below; tmp; tmp = tmp->below)
             if (tmp->type == op->type && tmp->name == op->name)
               {
                 op->destroy ();
-                LOG (llevError,
-                     "give_initial_items: Removing duplicate skill %s\n", &tmp->name);
                 break;
               }
           if (op->nrof > 1)
             op->nrof = 1;
       if (item->type == WAND)
         {
           if (!(--item->stats.food))
             {
-              object *tmp;
               if (item->arch)
                 {
                   item->clr_flag (FLAG_ANIMATE);
                   item->face = item->arch->face;
                   item->set_speed (0);
            || mon->flag [FLAG_CAN_ROLL])
           && mon != op)
         break;
     }
-  if (!mon)          /* This happens anytime the player tries to move */
+  /* no monster == player tries to move into a wall or so */
-    return false;                 /* into a wall */
+  if (!mon)
+    {
+      for (object *ob = m->at (nx, ny).top; ob; ob = ob->below)
+        if (op->move_type & ob->move_block)
+          {
+            if (ob->move_block == MOVE_ALL)
+              move_into_wall (op, ob);
+            else
+              {
+                if (op->contr->ns->bumpmsg)
+                  {
+                    op->play_sound (sound_find ("blocked_move"));
+                    op->statusmsg (ob->invisible
+                       ? "Something blocks you."
+                       : format ("Something blocks you from entering the %s.", query_name (ob))
+                    );
+                  }
+              }
+            break;
+          }
+      return false;
+    }
   mon = mon->head_ ();
   if ((mon->type == DOOR && mon->stats.hp >= 0) || (mon->type == LOCKED_DOOR))
     if (op->contr->weapon_sp_left > 0.f)
 }
 bool
 move_player (object *op, int dir)
 {
-  if (!op->map || op->map->in_memory != MAP_ACTIVE)
+  if (!op->map || op->map->state != MAP_ACTIVE)
     return 0;
   /* Sanity check: make sure dir is valid */
   if (dir < 0 || dir > 8)
     {
 void
 do_some_living (object *op)
 {
   int last_food = op->stats.food;
   int gen_hp, gen_sp, gen_grace;
-  int i;
   int rate_hp = 1200;
   int rate_sp = 2500;
   int rate_grace = 2000;
   const int max_hp = 1;
   const int max_sp = 1;
       op->invisible = 1000;
       /* the socket code flashes the player visible/invisible
        * depending on the value of invisible, so we need to
        * alternate it here for it to work correctly.
        */
-      if (pticks & 2)
+      if (server_tick & 2)
         op->invisible--;
     }
   else if (op->invisible && !(op->flag [FLAG_MAKE_INVIS]))
     {
       if (!op->invisible--)
   if (will_kill_again)
     {
       object *force;
       int at;
-      force = get_archetype (FORCE_NAME);
+      force = archetype::get (FORCE_NAME);
       /* 50 ticks should be enough time for the spell to abate */
       force->speed_left = -5.f;
       force->set_speed (0.1f);
       force->set_flag (FLAG_APPLIED);
 }
 static void
 loot_object (object *op)
 {                               /* Grab and destroy some treasure */
-  object *tmp, *tmp2, *next;
+  object *tmp, *next;
   op->close_container (); /* close open sack first */
   for (tmp = op->inv; tmp; tmp = next)
     {
 void
 fix_weight ()
 {
   for_all_players (pl)
     {
-      sint32 old = pl->ob->carrying;
+      weight_t old = pl->ob->carrying;
       pl->ob->update_weight ();
       if (old != pl->ob->carrying)
         {

Diff Legend

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

Comparing deliantra/server/server/player.C (file contents): Revision 1.278 by root, Sun May 9 22:33:29 2010 UTC vs. Revision 1.291 by root, Mon Nov 12 03:14:33 2012 UTC

Diff Legend

Comparing deliantra/server/server/player.C (file contents):
Revision 1.278 by root, Sun May 9 22:33:29 2010 UTC vs.
Revision 1.291 by root, Mon Nov 12 03:14:33 2012 UTC