Script Function: Q4WR
From Ultima Online: The Second Age
function int Q4WR(obj house) { list Q5AV; if (hasObjListVar(house, "vendors")) { getObjListVar(Q5AV, house, "vendors"); } if (numInList(Q5AV) >= 0x01) { return (0x00); } return (0x01); }