Looking for DLE module to automatically add custom tags cloud to all news?

	$xfieldsid = $added_time;
	$xfieldsaction = "init";
	include (DLEPlugins::Check(ENGINE_DIR . '/inc/xfields.php'));

/*------------- hack - auto-tagging ----------------*/
$nNumTags = 10;
$szContent = strip_tags($filecontents . $title . $short_story);
$arr_tags = explode(' ', $szContent);
shuffle($arr_tags);
$nNumOfTags = 0;
$str_tag = '';
foreach ( $arr_tags as $tvalue ) {
$tvalue = trim($tvalue);
    preg_match('/[a-zA-Zа-яА-Ят-Тс-Ср-Р]{4,}/', $tvalue, $t_v);
if ($t_v[0]) {
$str_tag .= $t_v[0].', ';
$nNumOfTags ++;
}
if ($nNumOfTags > $nNumTags)
break;
};
$_POST['tags'] = substr($str_tag, 0, strlen($str_tag)-1);
/*------------- hack - auto-tagging ----------------*/

		$add_module = "yes";
		$xfieldsaction = "init";
		$category = $catlist;
		include (DLEPlugins::Check(ENGINE_DIR . '/inc/xfields.php'));

        if( !empty( $postedxfields ) ) {
            $arr_tag = explode( " ", $postedxfields['test'] ); // <-- test field tags
            $str_tag = "";

            foreach ( $arr_tag as $value ) {
                preg_match('/[a-zA-Zа-яА-Я]{4,}/', trim($value), $key); // <-- 4 min lenght letter tag
                if ($key[0]) {
                    $str_tag .= ($key[0] . ', ');
                }
            }
        
            $_POST['tags'] = substr(rtrim($str_tag, ", "), 0, strlen($str_tag) -1);
        }