alias -l feedtextconvert {
var %tempvar,%feedconverted = $1-
%feedconverted = $replace(%feedconverted,$chr(9),$chr(32))
%tempvar = $regsub(%feedconverted,/"/g,",%feedconverted)
%tempvar = $regsub(%feedconverted,/</g,<,%feedconverted)
%tempvar = $regsub(%feedconverted,/>/g,>,%feedconverted)
%tempvar = $regsub(%feedconverted,/ /g,$chr(32),%feedconverted)
%tempvar = $regsub(%feedconverted,/ä/g,ä,%feedconverted)
%tempvar = $regsub(%feedconverted,/ü/g,ü,%feedconverted)
%tempvar = $regsub(%feedconverted,/ö/g,ö,%feedconverted)
%tempvar = $regsub(%feedconverted,/Ä/g,Ä,%feedconverted)
%tempvar = $regsub(%feedconverted,/Ü/g,Ü,%feedconverted)
%tempvar = $regsub(%feedconverted,/Ö/g,Ö,%feedconverted)
%tempvar = $regsub(%feedconverted,/ß/g,ß,%feedconverted)
%tempvar = $regsub(%feedconverted,/&(\S*);/g,,%feedconverted)
if ($isutf(%feedconverted)) { %feedconverted = $utfdecode(%feedconverted,0) }
%tempvar = $regsub(%feedconverted,/<br( \/)?>/g,\\n,%feedconverted)
%feedconverted = $regsubex(%feedconverted,/<a (\s|\S|=|\")*>(\s|\S|=|\")*<\/a>/g,\2)
%feedconverted = $regsubex(%feedconverted,/<img(\s|\S|=|\")* alt=\"(\s|\S)\"(\s|\S|=|\")*( \/)?>/g,\2)
%tempvar = $regsub(%feedconverted,/<(\/?)(\S*)>/g,,%feedconverted)
return %feedconverted
}