Script Function: Q5SK

 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);
 }

 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);
 }