Script Function: Q5S1

 function int Q5S1(obj house, obj Q5HY)
 {
   if (!hasObjVar(house, "myhousedoors"))
   {
     return (0x00);
   }
   list doors;
   getObjListVar(doors, house, "myhousedoors");
   if (numInList(doors) < 0x01)
   {
     return (0x00);
   }
   obj Q5AB = doors[0x00];
   obj Q5NC = mobileHasObjWithListObjOfObj(Q5HY, "whatIUnlock", Q5AB);
   if (Q5NC == NULL())
   {
     return (0x00);
   }
   return (0x01);
 }