Script Function: Q4BM
From Ultima Online: The Second Age
function int Q4BM(obj it) { if (isMobile(it)) { list Q4O4; getEquipment(Q4O4, it); obj bank = getItemAtSlot(it, 0x1D); if (bank != NULL()) { appendToList(Q4O4, bank); } if (Q4CB(it, Q4O4)) { return (0x01); } } if (isContainer(it)) { list Q4E4; getContents(Q4E4, it); if (Q4CB(it, Q4E4)) { return (0x01); } } if (!isMobile(it)) { if (Q4CA(it)) { return (0x01); } } return (0x00); }