sub ForensicEvaluation() var count=0 uo.print('Please Change Dead Creature...') uo.exec('addobject ForensicAnimal') while uo.targeting() wait(100) wend UO.DeleteJournal() repeat uo.waittargetobject('ForensicAnimal') UO.Useskill('Forensic Evaluation') while not UO.InJournal("unsure") and not UO.InJournal("looks") and not UO.InJournal("perform") and count<60 wait(35) count=count+1 wend wait(35) count=0 UO.DeleteJournal() until UO.Dead() end sub