Script Function: Q4CI

 function string Q4CI(obj this, list args)
 {
   int Q65M;
   int Q4QI = 0x00;
   string name;
   list Q5B5;
   int i;
   obj Q4WD;
   string Q58D;
   if (!hasObjVar(this, "questFetchObjType"))
   {
     return (Q58D);
   }
   Q65M = getObjVar(this, "questFetchObjType");
   Q4QI = 0x00;
   name = getNameByType(Q65M);
   split(Q5B5, name);
   for(i = 0x00; i < numInList(Q5B5); i++)
   {
     name = Q5B5[i];
     if (isInList(args, name))
     {
       Q4QI = 0x01;
     }
   }
   if (Q4QI)
   {
     name = getObjVar(this, "questFetchReason");
     if (hasObjVar(this, "questItemHolder"))
     {
       Q4WD = getObjVar(this, "questItemHolder");
       name = getName(Q4WD);
       Q58D = getNameByType(Q65M) + "s? Hast thou spoken to " + name + "? " + Q4RP(this);
     }
     else
     {
       Q58D = getNameByType(Q65M) + "s? " + name + "one. " + Q4RP(this);
     }
     toUpper(Q58D, 0x00, 0x01);
     Q58D = Q58D + " ";
   }
   return (Q58D);
 }