This function will return the name of the item equipped in the specified
equipment slot on the invoking character. Almost identical to 'getequipid', good
for an NPC to state what your are wearing, or maybe saving as a string variable.
See 'getequipid' for a full list of valid equipment slots.

if (getequipname(1)==0) goto L_No_HeadGear;
mes "So you are wearing a "+getequipname(1)+" on your head";
close;
L_No_HeadGear:
mes "You are not wearing any head gear";
close;