Script Function: Q4JM
From Ultima Online: The Second Age
function string Q4JM(obj user, obj usedon) { string name; name = Q4XP(usedon); if (name == "") { doLookAt(user, usedon); return (name); } else { if (hasObjVar(usedon, "charges")) { int charges = getObjVar(usedon, "charges"); if (charges > 0x00) { name = name + " with " + charges + " charges"; } } if (!(hasObjVar(usedon, "appraising"))) { systemMessage(user, "It is: " + name); } setObjVar(usedon, "beenIdentified", 0x01); setObjVar(usedon, "owner", user); setObjVar(usedon, "lookAtText2", name); attachScript(usedon, "magicitem"); removeObjVar(usedon, "appraising"); } return (name); }