Script Function: Q5SK
From Ultima Online: The Second Age
function int Q5SK(obj house, obj Q5HY) { obj Q5AB = NULL(); if (hasObjListVar(house, "myhousedoors")) { list doors; getObjListVar(doors, house, "myhousedoors"); if (numInList(doors) > 0x00) { Q5AB = doors[0x00]; } } else { if (hasObjVar(house, "myhousedoor")) { Q5AB = getObjVar(house, "myhousedoor"); } } if (Q5AB == NULL()) { return (0x00); } obj Q5NC = mobileHasObjWithListObjOfObj(Q5HY, "whatIUnlock", Q5AB); if (Q5NC == NULL()) { return (0x00); } return (0x01); }