Script Function: Q4BJ
From Ultima Online: The Second Age
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); }