/*-------------------------------------------------------------------*/ /* Character Switcher for Central European Languages (C) Penzeng.de */ /*-------------------------------------------------------------------*/ /*------------------*/ /* Global Variables */ /*------------------*/ var Cdpg1250 = "%E2%82%AC%20%E2%80%9A%20%E2%80%9E%E2%80%A6%E2%80%A0%E2%80%A1%20%E2%80%B0%C5%A0%E2%80%B9%C5%9A%C5%A4%C5%BD%C5%B9%20%E2%80%98%E2%80%99%E2%80%9C%E2%80%9D%E2%80%A2%E2%80%93%E2%80%94%20%E2%84%A2%C5%A1%E2%80%BA%C5%9B%C5%A5%C5%BE%C5%BA%C2%A0%CB%87%CB%98%C5%81%C2%A4%C4%84%C2%A6%C2%A7%C2%A8%C2%A9%C5%9E%C2%AB%C2%AC%C2%AD%C2%AE%C5%BB%C2%B0%C2%B1%CB%9B%C5%82%C2%B4%C2%B5%C2%B6%C2%B7%C2%B8%C4%85%C5%9F%C2%BB%C5%B8%CB%9D%C4%BD%C5%BC%C5%94%C3%81%C3%82%C4%82%C3%84%C4%B9%C4%86%C3%87%C4%8C%C3%89%C4%98%C3%8B%C4%9A%C3%8D%C3%8E%C4%8E%C4%90%C5%83%C5%87%C3%93%C3%94%C5%90%C3%96%C3%97%C5%98%C5%AE%C3%9A%C5%B0%C3%9C%C3%9D%C5%A2%C3%9F%C5%95%C3%A1%C3%A2%C4%83%C3%A4%C4%BA%C4%87%C3%A7%C4%8D%C3%A9%C4%99%C3%AB%C4%9B%C3%AD%C3%AE%C4%8F%C4%91%C5%84%C5%88%C3%B3%C3%B4%C5%91%C3%B6%C3%B7%C5%99%C5%AF%C3%BA%C5%B1%C3%BC%C3%BD%C5%A3%CB%99"; var Cdpg88592 = "%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%20%C2%A0%C4%84%CB%98%C5%81%C2%A4%C4%BD%C5%9A%C2%A7%C2%A8%C5%A0%C5%9E%C5%A4%C5%B9%C2%AD%C5%BD%C5%BB%C2%B0%C4%85%CB%9B%C5%82%C2%B4%C4%BE%C5%9B%CB%87%C2%B8%C5%A1%C5%9F%C5%A5%C5%BA%CB%9D%C5%BE%C5%BC%C5%94%C3%81%C3%82%C4%82%C3%84%C4%B9%C4%86%C3%87%C4%8C%C3%89%C4%98%C3%8B%C4%9A%C3%8D%C3%8E%C4%8E%C4%90%C5%83%C5%87%C3%93%C3%94%C5%90%C3%96%C3%97%C5%98%C5%AE%C3%9A%C5%B0%C3%9C%C3%9D%C5%A2%C3%9F%C5%95%C3%A1%C3%A2%C4%83%C3%A4%C4%BA%C4%87%C3%A7%C4%8D%C3%A9%C4%99%C3%AB%C4%9B%C3%AD%C3%AE%C4%8F%C4%91%C5%84%C5%88%C3%B3%C3%B4%C5%91%C3%B6%C3%B7%C5%99%C5%AF%C3%BA%C5%B1%C3%BC%C3%BD%C5%A3%CB%99%0D%0A"; var Cdpg852 = "%C3%87%C3%BC%C3%A9%C3%A2%C3%A4%C5%AF%C4%87%C3%A7%C5%82%C3%AB%C5%90%C5%91%C3%AE%C5%B9%C3%84%C4%86%C3%89%C4%B9%C4%BA%C3%B4%C3%B6%C4%BD%C4%BE%C5%9A%C5%9B%C3%96%C3%9C%C5%A4%C5%A5%C5%81%C3%97%C4%8D%C3%A1%C3%AD%C3%B3%C3%BA%C4%84%C4%85%C5%BD%C5%BE%C4%98%C4%99%20%C5%BA%C4%8C%C5%9F%C2%AB%C2%BB%E2%96%91%E2%96%92%E2%96%93%E2%94%82%E2%94%A4%C3%81%C3%82%C4%9A%C5%9E%E2%95%A3%E2%95%91%E2%95%97%E2%95%9D%C5%BB%C5%BC%E2%94%90%E2%94%94%E2%94%B4%E2%94%AC%E2%94%9C%E2%94%80%E2%94%BC%C4%82%C4%83%E2%95%9A%E2%95%94%E2%95%A9%E2%95%A6%E2%95%A0%E2%95%90%E2%95%AC%C2%A4%C4%91%C4%90%C4%8E%C3%8B%C4%8F%C5%87%C3%8D%C3%8E%C4%9B%E2%94%98%E2%94%8C%E2%96%88%E2%96%84%C5%A2%C5%AE%E2%96%80%C3%93%C3%9F%C3%94%C5%83%C5%84%C5%88%C5%A0%C5%A1%C5%94%C3%9A%C5%95%C5%B0%C3%BD%C3%9D%C5%A3%C2%B4%C2%AD%CB%9D%CB%9B%CB%87%CB%98%C2%A7%C3%B7%C2%B8%C2%B0%C2%A8%CB%99%C5%B1%C5%98%C5%99%E2%96%A0%C2%A0"; var HtmlNames = ""34&38<60>62Â194â226´180Á193á225Æ198æ230À192à224Å197å229Ã195ã227Ä196ä228„8222Ç199ç231¸184¢162ˆ710É201é233Ê202ê234È200è232Ë203ë235€8364Í205í237Î206î238Ì204ì236Ï207ï239«171“8220‹8249‘8216 160Ó211ó243Ô212ô244Œ338œ339Ò210ò242Ø216ø248Õ213õ245Ö214ö246»187”8221›8250’8217‚8218Š352š353­173ß223Ú218ú250Û219û251Ù217ù249¨168Ü220ü252Ý221ý253Ÿ376ÿ255ℵ8501Α913α945∧8743∠8736'39≈8776Β914β946¦166•8226∩8745Χ935χ967♣9827≅8773©169↵8629∪8746¤164‡8225†8224⇓8659↓8595°176Δ916δ948♦9830÷247∅8709 8195 8194Ε917ε949≡8801Η919η951Ð208ð240∃8707ƒ402∀8704½189¼188¾190⁄8260Γ915γ947≥8805⇔8660↔8596♥9829…8230¡161ℑ8465∞8734∫8747Ι921ι953¿191∈8712Κ922κ954Λ923λ955⟨9001⇐8656←8592⌈8968≤8804⌊8970∗8727◊9674‎8206¯175—8212µ181·183−8722Μ924μ956∇8711–8211≠8800∋8715¬172∉8713⊄8836Ñ209ñ241Ν925ν957‾8254Ω937ω969Ο927ο959⊕8853∨8744ª170º186⊗8855¶182∂8706‰8240⊥8869Φ934φ966Π928π960ϖ982±177£163″8243′8242∏8719∝8733Ψ936ψ968√8730⟩9002⇒8658→8594⌉8969ℜ8476®174⌋8971Ρ929ρ961‏8207⋅8901§167Σ931σ963ς962∼8764♠9824⊂8834⊆8838∑8721⊃8835¹185²178³179⊇8839Τ932τ964∴8756Θ920θ952ϑ977 8201Þ222þ254˜732×215™8482⇑8657↑8593ϒ978Υ933υ965℘8472Ξ926ξ958¥165Ζ918ζ950‍8205‌8204&"; var ReplaceStd= "*#,f\"*##^*S<*#Z##''\"\"---~*s>* zY#!****|*\"*a****-****'*|.,******?AAAA*A*CEEEEIIII*NOOOO*xOUUU*Y**aaaa*a*ceeeeiiii*noooo*/ouuu*y*yAaAaAaCcCcCcCcDdDdEeEeEeEeEeGgGgGgGgHhHhIiIiIiIiIi**JjKkkLlLlLlLlLlNnNnNnnNnOoOoOo**RrRrRrSsSsSsSsTtTtTtUuUuUuUuUuUuWwYyYZzZzZzsbBBbbbCCcDDdddEeeFfGghIIKkllmNn*OoQqPpRSsSstTtTUuUUYyZzzzzzzSssp|||!*********AaIiOoUuUuUuUuUueAaAa**GgGgKkOoOoZzj***GgHPNnAa**OoAaAaEeEeIiIiOoOoRrRrUuUuSsTtZzHhnd88ZzAaEeOoOoOoOoYylntjbpACcLTszP##############aaabccddeeeeeegjggggghhhiiIllllmmmnnno*oorrrrrssRRsssssttuuuvwyYzzzzpqbCOBGGHjKLqpq*********w#hh"; var Previous = ""; /*-----------------------------------------------*/ /* Decoding Universal Resource Identifiers (URI) */ /*-----------------------------------------------*/ function DeURI() { var Str = document.ConvertForm.InputArea.value; Str = decodeURI(Str); document.ConvertForm.InputArea.value = Str; } /*-----------------------------------------------*/ /* Encoding Universal Resource Identifiers (URI) */ /*-----------------------------------------------*/ function EnURI() { var Str = document.ConvertForm.InputArea.value; Str = encodeURI(Str); document.ConvertForm.InputArea.value = Str; } /* ------------------------------------*/ /* Decoding UTF-8 multibyte characters */ /* ------------------------------------*/ function DeUTF8() { var Src = document.ConvertForm.InputArea.value; var SrcLen = Src.length; var Pos = 0; var Des = ""; while (Pos= 192 && Ch <= 223) { Ch2 = Src.charCodeAt(Pos+1); if (Ch2 >= 128 && Ch2 <= 191) { ChNew = (Ch-192)*64+(Ch2-128); Pos++; } else { if (Ch==196 && Ch2== 338) { ChNew = 268; Pos++; } if (Ch==196 && Ch2==8250) { ChNew = 283; Pos++; } if (Ch==197 && Ch2== 32) { ChNew = 352; Pos++; } if (Ch==197 && Ch2== 94) { ChNew = 328; Pos++; } if (Ch==197 && Ch2== 126) { ChNew = 344; Pos++; } if (Ch==197 && Ch2==8482) { ChNew = 345; Pos++; } } } if (Ch >= 224 && Ch <= 239) { Ch2 = Src.charCodeAt(Pos+1); Ch3 = Src.charCodeAt(Pos+2); if (Ch2 >= 128 && Ch2 <= 191 && Ch3 >= 128 && Ch3 <= 191) { ChNew = ((Ch-224)*64+(Ch2-128))*64+(Ch3-128); Pos += 2; } } Des = Des + String.fromCharCode(ChNew); Pos++; } document.ConvertForm.InputArea.value = Des; } /*----------------------*/ /* Decoding by codepage */ /*----------------------*/ function DeCdpg(Cdpg) { var Cdpg1 = decodeURI(Cdpg); var Src = document.ConvertForm.InputArea.value; var SrcLen = Src.length; var Pos = 0; var Des = ""; while (Pos 127 && Ch < 256) { var ChF = Cdpg1.substr(Ch-128, 1); if (ChF != " ") ChNew = ChF; } Des = Des + ChNew; Pos++; } document.ConvertForm.InputArea.value = Des; } /*----------------------*/ /* Encoding by codepage */ /*----------------------*/ function EnCdpg(Cdpg) { var Cdpg1 = decodeURI(Cdpg); var Src = document.ConvertForm.InputArea.value; var SrcLen = Src.length; var Pos = 0; var Des = ""; while (Pos 127) { var Found = Cdpg1.indexOf(ChNew); if (Found>-1) { ChNew = String.fromCharCode(Found+128); } } Des = Des + ChNew; Pos++; } document.ConvertForm.InputArea.value = Des; } /*--------------------------------------------*/ /* Decoding HTML named and Unicode characters */ /*--------------------------------------------*/ function DeHTML() { var Src = document.ConvertForm.InputArea.value; var SrcLen = Src.length; var z1 = 0; var Des = ""; while (z1-1) { var f2 = f1 + Expr.length; var f3 = HtmlNames.indexOf("&", f2); ChNStr = HtmlNames.substring(f2,f3); } } Des = Des + ((ChNStr == "") ? Expr : String.fromCharCode(parseInt(ChNStr))); z1 = z3; } document.ConvertForm.InputArea.value = Des; } /*--------------------*/ /* Encoding into HTML */ /*--------------------*/ function EnHTML(TagsToo) { var Src = document.ConvertForm.InputArea.value; var SrcLen = Src.length; var Pos = 0; var Des = ""; while (Pos 127) { var ChNStr = String(Ch); var f2 = HtmlNames.indexOf(";" + ChNStr + "&"); if (f2 > -1) { var f1 = f2 - 3; while (HtmlNames.charAt(f1) != "&") f1--; ChNew = HtmlNames.substring(f1, f2+1); } else { ChNew = "&#" + ChNStr + ";"; } } else if (TagsToo) { switch (Ch) { case 34: ChNew = """; break; case 38: ChNew = "&" ; break; case 60: ChNew = "<" ; break; case 62: ChNew = ">" ; break; } } Des = Des + ChNew; Pos++; } document.ConvertForm.InputArea.value = Des; } /*----------------------------------------------------------------*/ /* Standard: Call the most common decoding functions subsequently */ /* in order to simply decode any kind of text */ /*----------------------------------------------------------------*/ function De() { DeURI(); DeUTF8(); DeCdpg(Cdpg88592); DeHTML(); } /*-----------------------------------------------------------*/ /* Replace non-ASCII characters by standard ASCII characters */ /*-----------------------------------------------------------*/ function ReplaceByAscii(WesternToo) { var Src = document.ConvertForm.InputArea.value; var SrcLen = Src.length; var Pos = 0; var Des = ""; while (Pos 255 || (WesternToo && Ch > 127)) { var ChF = ReplaceStd.charAt(Ch-128); switch (ChF) { case "*": case "": switch(Ch) { case 128: case 8364: ChNew = "EUR"; break; case 133: case 0x2026: ChNew = "..."; break; case 137: case 0x2030: ChNew = "%o" ; break; case 140: case 214: case 338: ChNew = "OE" ; break; case 153: case 0x2122: ChNew = "(TM)";break; case 156: case 246: case 339: case 630: ChNew = "oe";break; case 162: ChNew = "ct" ; break; case 163: case 0x20A4: ChNew = "Pound";break; case 164: ChNew = "[currency]";break; case 165: ChNew = "Yen"; break; case 167: ChNew = "Paragraph";break; case 169: ChNew = "(C)"; break; case 170: ChNew = "-a" ; break; case 171: ChNew = "<<" ; break; case 172: ChNew = "not"; break; case 173: ChNew = "" ; break; case 174: ChNew = "(R)"; break; case 176: ChNew = "degrees";break; case 177: ChNew = "+/-"; break; case 178: ChNew = "^2" ; break; case 179: ChNew = "^3" ; break; case 180: ChNew = "mu" ; break; case 185: ChNew = "^1" ; break; case 186: ChNew = "-o" ; break; case 187: ChNew = ">>" ; break; case 188: ChNew = " 1/4";break; case 189: ChNew = " 1/2";break; case 190: ChNew = " 3/4";break; case 196: case 198: case 482: case 508: ChNew = "AE" ; break; case 208: ChNew = "DH" ; break; case 220: ChNew = "UE" ; break; case 222: case 415: ChNew = "TH" ; break; case 223: ChNew = "ss" ; break; case 228: case 230: case 483: case 509: ChNew = "ae" ; break; case 240: ChNew = "dh" ; break; case 252: ChNew = "ue" ; break; case 254: ChNew = "th" ; break; case 306: ChNew = "IJ" ; break; case 307: ChNew = "ij" ; break; case 452: case 497: ChNew = "DZ" ; break; case 453: case 498: ChNew = "Dz" ; break; case 454: case 499: case 675: case 676: case 677: ChNew = "dz" ; break; case 455: ChNew = "LJ" ; break; case 456: ChNew = "Lj" ; break; case 457: ChNew = "lj" ; break; case 458: ChNew = "NJ" ; break; case 459: ChNew = "Nj" ; break; case 460: ChNew = "nj" ; break; case 678: case 679: ChNew = "ts" ; break; case 680: ChNew = "tc" ; break; case 681: ChNew = "fn" ; break; case 682: ChNew = "ls" ; break; case 683: ChNew = "lz" ; break; case 0x2013: case 0x2014: case 0x2015: ChNew = "-"; break; case 0x2017: ChNew = "_" ; break; case 0x2018: case 0x2019: case 0x201A: case 0x201B: case 0x2032: ChNew = "'"; break; case 0x201C: case 0x201D: case 0x201E: case 0x2033: ChNew = "\""; break; case 0x2020: case 0x2021: ChNew = "|" ; break; case 0x2022: case 0x203E: ChNew = "-" ; break; case 0x2039: ChNew = "<" ; break; case 0x203A: ChNew = ">" ; break; case 0x203C: ChNew = "!!" ; break; case 0x2044: ChNew = "/" ; break; case 0x207F: ChNew = "-n" ; break; case 0x20A3: ChNew = "F" ; break; case 0x20A7: ChNew = "Pts"; break; case 0x20AA: ChNew = "NIS"; break; case 0x20AB: ChNew = "d" ; break; case 0x2105: ChNew = "c/o"; break; case 0x2113: ChNew = "l" ; break; case 0x2116: ChNew = "No."; break; case 0x2126: ChNew = "Omega";break; case 0x212E: ChNew = "e" ; break; case 0x2153: ChNew = " 1/3";break; case 0x2154: ChNew = " 2/3";break; case 0x215B: ChNew = " 1/8";break; case 0x215C: ChNew = " 3/8";break; case 0x215D: ChNew = " 5/8";break; case 0x215E: ChNew = " 7/8";break; case 0x2190: ChNew = " <-- ";break; case 0x2192: ChNew = " --> ";break; case 0x2194: ChNew = " <--> ";break; } break; case "#": ChNew = "?"; break; default: ChNew = ChF; break; } } Des = Des + ChNew; Pos++; } document.ConvertForm.InputArea.value = Des; } /*------------------------------------------------*/ /* Special encodings for web design of Penzeng.de */ /*------------------------------------------------*/ function EnPenzeng() { var Str = document.ConvertForm.InputArea.value; Str = Str.replace(/_\(D\)/g, "\"D\""); Str = Str.replace(/_\(PL\)/g, "\"PL\""); Str = Str.replace(/_\(CZ\)/g, "\"CZ\""); Str = Str.replace(/_\(EN\)/g, "\"EN\""); Str = Str.replace(/\(D\)/g, "\"D\""); Str = Str.replace(/\(PL\)/g, "\"PL\""); Str = Str.replace(/\(CZ\)/g, "\"CZ\""); Str = Str.replace(/ - /g, " – "); document.ConvertForm.InputArea.value = Str; document.ConvertForm.InputArea.select(); } /*---------------------------*/ /* Do/Convert button pressed */ /*---------------------------*/ function Do() { Previous = document.ConvertForm.InputArea.value; var Sel = document.ConvertForm.SelList.value; switch (Sel) { /* Decodings */ case "Std": De(); break; case "DeURI": DeURI(); break; case "DeUTF8": DeUTF8(); break; case "DeHTML": DeHTML(); break; case "De88592": DeCdpg(Cdpg88592); break; case "De1250": DeCdpg(Cdpg1250); break; case "De852": DeCdpg(Cdpg852); break; /* Replacements */ case "RNWest": ReplaceByAscii(false); break; case "RNStd": ReplaceByAscii(true); break; /* Encodings */ case "EnURI": EnURI(); break; case "EnHTML": EnHTML(false); break; case "EnHTML+": EnHTML(true); break; case "EnHTMLP": EnHTML(false); EnPenzeng(); break; case "En88592": EnCdpg(Cdpg88592); break; case "En1250": EnCdpg(Cdpg1250); break; case "En852": EnCdpg(Cdpg852); break; /* Other */ case "void": alert("Please select a convert function in the combo box."); document.ConvertForm.SelList.focus(); break; default: alert("Error - missing convert function:\n" + Sel); document.ConvertForm.SelList.focus(); break; } } /*-----------------------*/ /* Clearing the text box */ /*-----------------------*/ function Del() { document.ConvertForm.InputArea.value = ""; document.ConvertForm.InputArea.focus(); } /*-------------------------*/ /* Restoring previous text */ /*-------------------------*/ function Re() { document.ConvertForm.InputArea.value = Previous; }