Script Function: Q4BW
From Ultima Online: The Second Age
function int Q4BW(string arg, obj speaker, obj this) { list text; split(text, arg); int Q4QI = 0x00; int Q618 = 0x00; string Q698; list Q4W5 = "hire", "hireling", "hiring", "mercenary", "servant", "work"; for(int i = 0x00; i < numInList(text); i++) { Q698 = text[i]; if (isInList(Q4W5, Q698)) { return (0x01); } } return (0x00); }