Script Function: Q51T
From Ultima Online: The Second Age
function int Q51T(obj Q5NV, obj user) { obj container = getItemAtSlot(user, 0x15); if (container == NULL()) { return (0x01); } if (!isContainer(container)) { return (0x01); } list Q51V; getContents(Q51V, Q5NV); int num = numInList(Q51V); for(int Q4EJ = 0x00; Q4EJ < num; Q4EJ++) { obj Q51R = Q51V[Q4EJ]; int Q5NC = putObjContainer(Q51R, container); } Q51S(Q5NV, 0x00); systemMessage(user, "You open the keyring."); return (0x01); }