Script Function: Q4CH

 function int Q4CH(obj this, list args)
 {
   int Q4QI = 0x00;
   if (isInList(args, getName(this)))
   {
     Q4QI = 0x01;
   }
   if (isShopkeeper(this))
   {
     if (isInList(args, "shopkeep"))
     {
       Q4QI = 0x01;
     }
     if (isInList(args, "shopkeeper"))
     {
       Q4QI = 0x01;
     }
     if (isInList(args, "merchant"))
     {
       Q4QI = 0x01;
     }
     if (isInList(args, "vendor"))
     {
       Q4QI = 0x01;
     }
     if (isInList(args, "vender"))
     {
       Q4QI = 0x01;
     }
   }
   if (isGuard(this))
   {
     if (isInList(args, "guard"))
     {
       Q4QI = 0x01;
     }
   }
   return (Q4QI);
 }