Script Function: Q4TF
From Ultima Online: The Second Age
function int Q4TF(obj Q57Q) { int Q63U = 0x00; list metal; clearList(metal); Q4S8(metal, Q57Q); for(int num = numInList(metal); num > 0x00; num--) { int Q56Z; int Q4Q1 = getResource(Q56Z, metal[0x00], "metal", 0x03, 0x02); Q63U = Q63U + Q56Z; removeItem(metal, 0x00); } return (Q63U); }