Script Function: Q4IZ

 function int Q4IZ(obj user, loc place)
 {
   int Q5NC = 0x00;
   int damage;
   loc Q4VS = getLocation(user);
   faceHere(user, getDirectionInternal(Q4VS, place));
   list Q5FG;
   getObjectsAt(Q5FG, place);
   if (numInList(Q5FG) == 0x00)
   {
     doLocAnimation(place, 0x3728, 0x0A, 0x0A, 0x00, 0x00);
     Q57L = user;
     Q4E1 = place;
     if (!getCompileFlag(0x01))
     {
       Q5UL(user, place, 0x02, 0x00);
     }
     obj Q5VB = Q553(Q4E1, this, user);
     if (isValid(Q5VB))
     {
       Q5NC = 0x01;
     }
   }
   else
   {
     barkTo(user, user, "That location is blocked.");
   }
   Q5UQ(this);
   return (Q5NC);
 }