Re: [TxMt] Again: Text to HTML translation

Detlef Hoge info@detlefhoge.de wrote:

Hi there,

Is there a translationscript for Text to HTML like in BBEdit (Translate) and ignore < and /> ? Example: ö -> &ouml;

If this can help you : years ago, I was using this AppleScript (Copy-Launch Script-Paste)

8<-- considering case

set Original to {"à", "À", "á", "Á", "â", "Â", "ä", "Ä", "ã", "Ã", "å", "Å", "æ", "Æ", "ç", "Ç", "è", "È", "é", "É", "ê", "Ê", "ë", "Ë", "ì", "Ì", "í", "Í", "î", "Î", "ï", "Ï", "ñ", "Ñ", "Ò", "Ò", "ó", "Ó", "ô", "Ô", "ø", "Ø", "œ", "Œ", "ù", "Ù", "ú", "Ú", "û", "Û", "ü", "Ü", "ÿ", "Ÿ", "ß", "€", "©", "®"}

set Modifie to {"&agrave;", "&Agrave;", "&aacute;", "&Aacute;", "&acirc;", "&Acirc;", "&auml;", "&Auml;", "&atilde;", "&Atilde;", "&aring;", "&Aring;", "&aelig;", "&AElig;", "&ccedil;", "&Ccedil;", "&egrave;", "&Egrave;", "&eacute;", "&Eacute;", "&ecirc;", "&Ecirc;", "&euml;", "&Euml;", "&igrave;", "&Igrave;", "&iacute;", "&Iacute;", "&icirc;", "&Icirc;", "&iuml;", "&Iuml;", "&ntilde;", "&Ntilde;", "&Ograve;", "&Ograve;", "&oacute;", "&Oacute;", "&ocirc;", "&Ocirc;", "&oslash;", "&Oslash;", "&#156;", "&#140;", "&ugrave;", "&Ugrave;", "&uacute;", "&Uacute;", "&ucirc;", "&Ucirc;", "&uuml;", "&Uuml;", "&#255;", "&#159;", "&szlig;", "&euro;", "&copy;", "&reg;}

set ull1 to the clipboard

set ull2 to "" repeat with i from 1 to (the number of characters of ull1) set mychar to character i of ull1 repeat with j from 1 to (count items of Original) if item j of Original = character i of ull1 then set mychar to (item j of Modifie) end if end repeat set ull2 to ull2 & mychar end repeat

set the clipboard to ull2 as text end considering

8<--