Code:
	if($timer eq "DT") {	
   			quest::shout("Testing");
		  my $list_check = 0;
		  for ($list_check = 0; $list_check < 1500; $list_check++) {
          $client_search = $entity_list->GetClientByID($list_check);     
			if ($client_search) {    
			my $ClID = $client_search->GetID();
			$npc->CastSpell(982,$ClID);
			my $x;
			my $y;
			my $z;
			my $h;
			$spawner = $ClID->CastToMob();
			$x = $spawner->GetX();
			$y = $spawner->GetY();
			$z = $spawner->GetZ();
			$h = $spawner->GetHeading();			
			quest::spawn2(99999,0,0,$x,$y,$z,$h);
			$counter = 0;
			}
		  }
	}
 here's what I've been testing with & doesn't work so the CastTo isn't taking I don't think.