Script Function: Q657

 function int Q657(obj user, int objtype, loc place, int Q67X, int Q5EC, int walldur, int Q4UK, int Q4H9)
 {
   if (!canSeeLoc(user, place))
   {
     return (0x00);
   }
   if (Q509(place, 0x03))
   {
     return (0x00);
   }
   obj Q4EZ = Q4EQ(objtype, place);
   if (Q4EZ != NULL())
   {
     Q5RC(Q4EZ, user);
     copyControllerInfo(Q4EZ, user);
     setObjVar(Q4EZ, "newType", Q67X);
     setObjVar(Q4EZ, "walltype", Q5EC);
     setObjVar(Q4EZ, "walldur", walldur);
     attachScript(Q4EZ, "crtwall");
     shortcallback(Q4EZ, Q4H9, 0x2E);
     if (!getCompileFlag(0x01))
     {
       if (Q4UK)
       {
         Q5UL(user, place, 0x01, 0x00);
       }
     }
     return (0x01);
   }
   return (0x00);
 }