Script Function: Q5V4
From Ultima Online: The Second Age
function void Q5V4(obj user, obj Q5V7, string Q5BX, int Q5V6, int Q5UA) { loc Q5V8 = getLocation(Q5V7); loc Q5BZ = Q5V8; int Q5GS; obj Q68I; int Q5BP; int Q5V9 = getObjType(Q5V7); switch (Q5V9) { case 0x1015 Q5GS = 0x1015; Q68I = Q5V7; setType(Q68I, 0x1016); break; case 0x1019 Q5GS = 0x1019; Q68I = Q5V7; setType(Q68I, 0x101A); break; case 0x101C Q5GS = 0x101C; Q68I = Q5V7; setType(Q68I, 0x101D); break; } setObjVar(Q68I, "SOURCE", this); setObjVar(Q68I, "CREATE_THIS", Q5BX); setObjVar(Q68I, "HUE", Q5UA); setObjVar(Q68I, "USER", user); setObjVar(Q68I, "ORIGINAL_TYPE", Q5GS); setObjVar(Q68I, "SPINVALUE", Q5V6); callback(Q68I, 0x05, 0x20); return (); }