Script Function: Q4BJ

From Ultima Online: The Second Age
Jump to: navigation, search
 function string Q4BJ(obj this, list args)
 {
   string name;
   string Q69A;
   list Q5B5;
   string Q58D;
   obj Q61K;
   string Q59W;
   obj Q59I;
   int Q65M = 0x00;
   if (hasObjVar(this, "questDeliverObject"))
   {
     Q61K = getObjVar(this, "questDeliverObject");
     Q59W = getObjVar(this, "questDeliverReason");
     Q59I = getObjVar(this, "questItemDestination");
     Q65M = 0x01;
   }
   if (hasObjVar(this, "questDeliverObjectRec"))
   {
     Q61K = getObjVar(this, "questDeliverObjectRec");
   }
   if (Q61K == NULL())
   {
     return (Q58D);
   }
   name = getName(Q61K);
   split(Q5B5, name);
   int Q4QI = 0x00;
   for(int i = 0x00; i < numInList(Q5B5); i++)
   {
     Q69A = Q5B5[i];
     if (isInList(args, Q69A))
     {
       Q4QI = 0x01;
     }
   }
   if (!Q4QI)
   {
     return (Q58D);
   }
   Q58D = "Ah, " + name + ". ";
   if (Q65M)
   {
     Q58D = Q58D + Q59W + name + ". Couldst thou take this one to " + getName(Q59I) + "? " + Q4RP(Q59I);
   }
   else
   {
     Q58D = Q58D + "I am expecting one delivered.";
   }
   return (Q58D);
 }