--- deliantra/server/common/loader.C	2008/11/16 03:52:12	1.125
+++ deliantra/server/common/loader.C	2009/09/17 01:57:31	1.132
@@ -1,7 +1,7 @@
 /*
  * This file is part of Deliantra, the Roguelike Realtime MMORPG.
  * 
- * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
+ * Copyright (©) 2005,2006,2007,2008,2009 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
  * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
  * Copyright (©) 1992,2007 Frank Tore Johansen
  * 
@@ -341,8 +341,8 @@
     {
       if (!skill)
         LOG (llevError, "ITEMBUG: weapon %s lacks a skill.\n", debug_desc ());
-      else if ((!strcmp (skill, "one handed weapons") && slot[body_arm].info != -1) ||
-               (!strcmp (skill, "two handed weapons") && slot[body_arm].info != -2))
+      else if ((skill == shstr_one_handed_weapons && slot[body_arm].info != -1) ||
+               (skill == shstr_two_handed_weapons && slot[body_arm].info != -2))
         LOG (llevError, "ITEMBUG: weapon %s arm usage does not match skill: %d, %s\n", debug_desc (), slot[body_arm].info, &skill);
     }
 
@@ -463,6 +463,19 @@
             move_type = MOVE_WALK;
         }
     }
+
+  // if the object has an animation, try to provide a default face
+  if (has_anim ())
+    {
+      const animation &anim_ob = anim ();
+
+      if (anim_speed)
+        // if this item is time-animated, force the last frame
+        animate_object (this, 0);
+      else if (flag [FLAG_MONSTER])
+        // if it is a monster, set appropriate facing
+        animate_object (this, direction);
+    }
 }
 
 static void
@@ -929,7 +942,7 @@
           case KW_will_apply:           f.get (will_apply); break;
           case KW_attack_movement:      f.get (attack_movement); break;
           case KW_move_state:           f.get (move_status); break;
-          case KW_expmul:               f.get (expmul); break;
+          //case KW_expmul:               f.get (expmul); break;//D declared const for the time being
           case KW_glow_radius:          f.get (glow_radius); break;
           case KW_weapontype:           f.get (weapontype); break;
           case KW_casting_time:         f.get (casting_time); break;
@@ -965,7 +978,12 @@
             break;
 
           case KW_connected:
-            add_button_link (this, map, f.get_sint32 ());
+            {
+              shstr connected;
+
+              f.get (connected);
+              add_link (map, connected);
+            }
             break;
 
           case KW_randomitems:
@@ -1312,8 +1330,8 @@
   if (op->sound_destroy != tmp->sound_destroy) f.put (KW_sound_destroy, op->sound_destroy ? &faces [op->sound_destroy] : 0);
 
   if (op->animation_id != tmp->animation_id)
-    if (op->animation_id)
-      f.put (KW_animation, animations[GET_ANIM_ID (op)].name);
+    if (op->has_anim ())
+      f.put (KW_animation, op->anim ().name);
     else
       {
         f.put (KW_animation, (const char *)0);
@@ -1380,8 +1398,8 @@
   CMP_OUT (glow_radius);
 
   if (op->flag [FLAG_IS_LINKED])
-    if (int i = get_button_value (op))
-      f.put (KW_connected, i);
+    if (auto (ol, op->find_link ()))
+      f.put (KW_connected, ol->id);
 
   CMP_OUT (randomitems);
   CMP_OUT2 (container, weight_limit);
@@ -1427,10 +1445,16 @@
 bool
 object::write (object_freezer &f)
 {
-  archetype *at = arch ? arch : archetype::empty;
-
-  f.put (KW_arch, at->archname);
-  write_diff (f, this, at);
+  if (is_arch ())
+    {
+      f.put (KW_object, arch->archname);
+      write_diff (f, this, archetype::empty);
+    }
+  else
+    {
+      f.put (KW_arch, arch->archname);
+      write_diff (f, this, arch);
+    }
 
   for (object *tmp = inv; tmp; tmp = tmp->below)
     tmp->write (f);