--- deliantra/server/common/object.C	2007/04/21 16:56:29	1.138
+++ deliantra/server/common/object.C	2007/05/15 19:07:15	1.150
@@ -1,5 +1,5 @@
 /*
- * CrossFire, A Multiplayer game for X-windows
+ * CrossFire, A Multiplayer game
  * 
  * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
  * Copyright (C) 2001 Mark Wedel & Crossfire Development Team
@@ -31,6 +31,7 @@
 #include <sys/uio.h>
 #include <object.h>
 #include <funcpoint.h>
+#include <sproto.h>
 #include <loader.h>
 
 #include <bitset>
@@ -326,10 +327,11 @@
   long sum;
   object *inv;
 
-  for (sum = 0, inv = op->inv; inv != NULL; inv = inv->below)
+  for (sum = 0, inv = op->inv; inv; inv = inv->below)
     {
       if (inv->inv)
         sum_weight (inv);
+
       sum += inv->carrying + inv->weight * (inv->nrof ? inv->nrof : 1);
     }
 
@@ -450,6 +452,71 @@
   this->owner = owner;
 }
 
+int
+object::slottype () const
+{
+  if (type == SKILL)
+    {
+      if (IS_COMBAT_SKILL (subtype)) return slot_combat;
+      if (IS_RANGED_SKILL (subtype)) return slot_ranged;
+    }
+  else
+    {
+      if (slot [body_combat].info) return slot_combat;
+      if (slot [body_range ].info) return slot_ranged;
+    }
+  
+  return slot_none;
+}
+
+bool
+object::change_weapon (object *ob)
+{
+  if (current_weapon == ob)
+    return true;
+
+  if (chosen_skill)
+    chosen_skill->flag [FLAG_APPLIED] = false;
+
+  current_weapon = ob;
+  chosen_skill = !ob || ob->type == SKILL ? ob : find_skill_by_name (this, ob->skill);
+
+  if (chosen_skill)
+    chosen_skill->flag [FLAG_APPLIED] = true;
+
+  if (ob && !ob->flag [FLAG_APPLIED])
+    {
+      LOG (llevError | logBacktrace, "%s changed to unapplied weapon %s",
+           &name, ob->debug_desc ());
+      return false;
+    }
+
+  update_stats ();
+
+  if (ob)
+    {
+      // now check wether any body locations became invalid, in which case
+      // we cannot apply the weapon at the moment.
+      for (int i = 0; i < NUM_BODY_LOCATIONS; ++i)
+        if (slot[i].used < 0)
+          {
+            current_weapon = chosen_skill = 0;
+            update_stats ();
+
+            new_draw_info_format (NDI_UNIQUE, 0, this,
+                                  "You try to balance your applied items all at once, but the %s is too much. "
+                                  "You need to unapply some items first.", &ob->name);
+            return false;
+          }
+
+      //new_draw_info_format (NDI_UNIQUE, 0, this, "You switch to your %s.", &ob->name);
+    }
+  else
+    ;//new_draw_info_format (NDI_UNIQUE, 0, this, "You unwield your weapons.");
+
+  return true;
+}
+
 /* Zero the key_values on op, decrementing the shared-string
  * refcounts and freeing the links. 
  */
@@ -539,7 +606,8 @@
    * values for the body_used info, so when items are created 
    * for it, they can be properly equipped.
    */
-  memcpy (body_used, body_info, sizeof (body_used));
+  for (int i = NUM_BODY_LOCATIONS; i--; )
+    slot[i].used = slot[i].info;
 
   attachable::instantiate ();
 }
@@ -837,15 +905,7 @@
     remove_button_link (this);
 
   if (flag [FLAG_FRIENDLY])
-    {
-      remove_friendly_object (this);
-
-      if (type == GOLEM
-          && owner
-          && owner->type == PLAYER
-          && owner->contr->ranges[range_golem] == this)
-        owner->contr->ranges[range_golem] = 0;
-    }
+    remove_friendly_object (this);
 
   if (!flag [FLAG_REMOVED])
     remove ();
@@ -1182,11 +1242,13 @@
 
   op->remove ();
 
+#if 0
   if (!m->active != !op->active)
     if (m->active)
       op->activate_recursive ();
     else
       op->deactivate_recursive ();
+#endif
 
   if (out_of_map (m, op->x, op->y))
     {
@@ -2591,15 +2653,10 @@
 const char *
 object::debug_desc () const
 {
-  static char info[256 * 4];
-  return debug_desc (info);
-}
+  static char info[3][256 * 4];
+  static int info_idx;
 
-const char *
-object::debug_desc2 () const
-{
-  static char info[256 * 4];
-  return debug_desc (info);
+  return debug_desc (info [++info_idx % 3]);
 }
 
 struct region *