;====================================================== 
; Script Name: JEBBITS IDOC 
; Author: Jebbit 
; Version: 1.0 
; Client Tested with: 4.0.0q 
; EUO version tested with: 1.4 (005b) 
; Shard OSI / FS: OSI 
; Revision Date: 
; Public Release:1-18-04 
; Find houses in their different stages of collaps and display the 
;appropriate stage in a private message above your head. 
;============================================== 

INITEVENTS
set %id #charid
top:
finditem MRE_AKE_ULE_KOE_KLE_WJE_GNE_MKE_UKE_EKE_GLE_
+CKE_ILE_IKE_YJE_CRE_GRE_OLE_IRE_GNE_INE_SNE_UNE_ONE_
+QNE_AOE_COE_ERE_WNE_YNE_IOE_EOE_GOE_SJE_UJE_OJE_QJE_
+SLE_QNE_QJE_ALE_ARE_CLE_ELE_GKE_KRE_MLE_OKE_QKE_QJE_
+QLE_QNE_SKE_WKE_WLE_YLE_YKE_YQE_KKE G_7
wait 10
event property #findid
wait 10
if slightly IN #property
event exmsg %id 0 100 Slightly Worn
if danger IN #property
event exmsg %id 0 100 House In Danger
if greatly IN #property
event exmsg %id 0 100 Greatly Worn
if fairly IN #property
event exmsg %id 0 100 Fairly Worn
if somewhat IN #property
event exmsg %id 0 100 Somewhat
if #findid <> x
ignoreitem #findid
if #findid = x
ignoreitem reset
goto top