[NatedogEZ]

Try this maybe...

	if($timer eq "damage") {
		my @hatelist = $npc->GetHateList();	#Get every entity on hatelist
		foreach $ent (@hatelist) {
			my $h_ent = $ent->GetEnt();
			my $h_dmg = $ent->GetDamage();
			my $h_hate = $ent->GetHate();
			if($h_ent) {
				my $h_ent_name = $h_ent->GetName();
				if($h_ent->IsClient())
				{
					my $HCLIENT = $h_ent->CastToClient();
					quest::say("$h_ent_name is on my hate list with $h_hate hate and $h_dmg damage."); #For quest debugging/testing purposes
					quest::say("Doing $h_dmg to $HCLIENT");  
					$npc->Damage($HCLIENT, $h_dmg, 0, 1, true, -1, false);
				}
				else
				{
					my $HNPC = $h_ent->CastToNPC();
					quest::say("$h_ent_name is on my hate list with $h_hate hate and $h_dmg damage."); #For quest debugging/testing purposes
					quest::say("Doing $h_dmg to $HNPC");  
					$npc->Damage($HNPC, $h_dmg, 0, 1, true, -1, false);
				}
				
			}
		}
		$npc->CastSpell(21789,$NPC_ID); #Flusterbolt Memblur Effect, 100% memblur on self
		quest::settimer("damage",20); #every 20 seconds
	}