Begin_of_File while(! At_EoF){ Search("&", ERRBREAK) if (Match("Ä")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ä")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ö")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ö")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ß")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ü")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ü")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Á")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("á")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("À")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("à")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Â")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("â")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ã")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ã")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Å")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("å")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("&Aelig;")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("æ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ç")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ç")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("&Eth;")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ð")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("É")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("é")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("È")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("è")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ê")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ê")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ë")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ë")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Í")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("í")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ì")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ì")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Î")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("î")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ï")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ï")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ñ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ñ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ó")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ó")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ò")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ò")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ô")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ô")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Õ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("õ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ø")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ø")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("&Thorn;")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("þ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ú")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ú")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ù")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ù")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Û")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("û")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("Ý")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ý")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("ÿ")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match(""")==0) { Del_Char(Chars_Matched) IT('"') Continue } if (Match("&")==0) { Del_Char(Chars_Matched) IT("&") Continue } if (Match("<")==0) { Del_Char(Chars_Matched) IT("<") Continue } if (Match(">")==0) { Del_Char(Chars_Matched) IT(">") Continue } if (Match("©")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("®")==0) { Del_Char(Chars_Matched) IT("") Continue } if (Match("™")==0) { Del_Char(Chars_Matched) IT("TM") Continue } if (Match(" ")==0) { Del_Char(Chars_Matched) IT(" ") Continue } Char(1) } Begin_of_File