--- a/gm-identify.tf	Wed Feb 13 01:34:34 2013 +0200
+++ b/gm-identify.tf	Wed Feb 13 01:48:25 2013 +0200
@@ -54,13 +54,15 @@
 	/elseif ({1}=~"repaired a few times")		/return "bad(?)"%;\
 	/else /return {1}%;/endif
 
-
 /def -i gidentify_sep =\
 	/msw +$[strrep("-",idc_width+2)]+
 
 /def -i gidentify_sep2 =\
 	/msw +-| @{BCgreen}%{1}@{n} |$[strrep("-",idc_width-strlen({1})-3)]+
 
+/def -i gidentify_idc_add =\
+	/set idc_st=$[idc_st+1]%;/set idc_imp=%{idc_imp} $[replace(" ","_",{1})]
+
 
 /def -i -F -p9999 -mregexp -t"^The following messages seem to vibrate from (.+):$" gidentify_start =\
 	/msq Collecting information ...%;\
@@ -83,8 +85,10 @@
 	/set idc_st=$[idc_st+1]%;/set idc_slots=%{P1}
 
 /def -i -F -Eidc_st>=2 -p9999 -mregexp -t"^It will (.+)\.$" gidentify_sksp =\
-	/set idc_st=$[idc_st+1]%;/set idc_imp=%{idc_imp} $[replace(" ","_",{P1})]
+	/test gidentify_idc_add({P1})
 
+/def -i -F -Eidc_st>=2 -p9999 -mregexp -t"^(A halo of purity surrounds it|An aura of blackness surrounds it)\." gidentify_specials =\
+	/test gidentify_idc_add({P1})
 
 /def -i -F -Eidc_st>=2 -p9999 -mregexp -t"^([A-Z][A-Za-z, ]+) did the heroic deed to bring" gidentify_i1 =\
 	/set idc_names=%{P1}
@@ -110,6 +114,9 @@
 /def -i -F -Eidc_st>=2 -p9999 -mregexp -t"featherweighted for (.+), worth" gidentify_i8 =\
 	/set idc_fwd=%{P1}
 
+/def -i -F -Eidc_st>=2 -p9999 -mregexp -t", (sheds light|emits darkness)," gidentify_i9 =\
+	/test gidentify_idc_add(strcat("It ",{P1}))
+
 /def -i -F -Eidc_st>=2 -p9999 -mregexp -t"^It (has|hasn't) been (worn|wielded) by (.+)\.$" gidentify_worn1 =\
 	/if ({P1}=~"has") /set idc_%{P2}=%{P3}%;/endif%;\