Checks if the character has anything equipped in the given wearID position     of the equipped inventory. If something is found then 1 is returned,     otherwise 0 is returned. Character entity may be a character pointer or     keyword. Following is a list of IDs and the position they represent:
          1 - light               10 - hands         2 - left finger         11 - arms         3 - right finger        12 - shield         4 - neck 1              13 - about body         5 - neck 2              14 - waist         6 - body                15 - left wrist         7 - head                16 - right wrist         8 - legs                17 - wielded         9 - feet                18 - held
      Example:
      if( %equipped( @n, 16 ) )     {         %purge( %getEquippedItem( @n, 16 ) )     }     endif  |