function init() {
	tinyMCEPopup.resizeToInnerSize();
	window.resizeBy(200, 200);
}

var charmap = new Array();

// for mor details please see w3c.org
// now here is the complete list ;)

charmap = [
	[' ',    ' ',  true, 'no-break space'],
	['&',     '&',   true, 'ampersand'],
	['"',    '"',   true, 'quotation mark'],
// finance
	['¢',    '¢',  true, 'cent sign'],
	['€',    '€', true, 'euro sign'],
	['£',   '£',  true, 'pound sign'],
	['¥',     '¥',  true, 'yen sign'],
// signs
	['©',    '©',  true, 'copyright sign'],
	['®',     '®',  true, 'registered sign'],
	['™',   '™', true, 'trade mark sign'],
	['‰',  '‰', true, 'per mille sign'],
	['µ',   'µ',  true, 'micro sign'],
	['·',  '·',  true, 'middle dot'],
	['•',    '•', true, 'bullet'],
	['…',  '…', true, 'three dot leader'],
	['′',   '′', true, 'minutes / feet'],
	['″',   '″', true, 'seconds / inches'],
	['§',    '§',  true, 'section sign'],
	['¶',    '¶',  true, 'paragraph sign'],
	['ß',   'ß',  true, 'sharp s / ess-zed'],
// quotations
	['‹',  '‹', true, 'single left-pointing angle quotation mark'],
	['›',  '›', true, 'single right-pointing angle quotation mark'],
	['«',   '«',  true, 'left pointing guillemet'],
	['»',   '»',  true, 'right pointing guillemet'],
	['‘',   '‘', true, 'left single quotation mark'],
	['’',   '’', true, 'right single quotation mark'],
	['“',   '“', true, 'left double quotation mark'],
	['”',   '”', true, 'right double quotation mark'],
	['‚',   '‚', true, 'single low-9 quotation mark'],
	['„',   '„', true, 'double low-9 quotation mark'],
	['<',      '<',   true, 'less-than sign'],
	['>',      '>',   true, 'greater-than sign'],
	['≤',      '≤', true, 'less-than or equal to'],
	['≥',      '≥', true, 'greater-than or equal to'],
	['–',   '–', true, 'en dash'],
	['—',   '—', true, 'em dash'],
	['¯',    '¯',  true, 'macron'],
	['‾',   '‾', true, 'overline'],
	['¤',  '¤',  true, 'currency sign'],
	['¦',  '¦',  true, 'broken bar'],
	['¨',     '¨',  true, 'diaeresis'],
	['¡',   '¡',  true, 'inverted exclamation mark'],
	['¿',  '¿',  true, 'turned question mark'],
	['ˆ',    'ˆ',  true, 'circumflex accent'],
	['˜',   '˜',  true, 'small tilde'],
	['°',     '°',  true, 'degree sign'],
	['−',   '−', true, 'minus sign'],
	['±',  '±',  true, 'plus-minus sign'],
	['÷',  '÷',  true, 'division sign'],
	['⁄',   '⁄', true, 'fraction slash'],
	['×',   '×',  true, 'multiplication sign'],
	['¹',    '¹',  true, 'superscript one'],
	['²',    '²',  true, 'superscript two'],
	['³',    '³',  true, 'superscript three'],
	['¼',  '¼',  true, 'fraction one quarter'],
	['½',  '½',  true, 'fraction one half'],
	['¾',  '¾',  true, 'fraction three quarters'],
// math / logical

// undefined
	['´',   '´',  true, 'acute accent'],
	['¸',   '¸',  true, 'cedilla'],
	['ª',    'ª',  true, 'feminine ordinal indicator'],
	['º',    'º',  true, 'masculine ordinal indicator'],
	['†',  '†', true, 'dagger'],
	['‡',  '‡', true, 'double dagger'],
// alphabetical special chars
	['À',  'À',  true, 'A - grave'],
	['Á',  'Á',  true, 'A - acute'],
	['Â',   'Â',  true, 'A - circumflex'],
	['Ã',  'Ã',  true, 'A - tilde'],
	['Ä',    'Ä',  true, 'A - diaeresis'],
	['Å',   'Å',  true, 'A - ring above'],
	['Æ',   'Æ',  true, 'ligature AE'],
	['Ç',  'Ç',  true, 'C - cedilla'],
	['È',  'È',  true, 'E - grave'],
	['É',  'É',  true, 'E - acute'],
	['Ê',   'Ê',  true, 'E - circumflex'],
	['Ë',    'Ë',  true, 'E - diaeresis'],
	['Ì',  'Ì',  true, 'I - grave'],
	['Í',  'Í',  true, 'I - acute'],
	['Î',   'Î',  true, 'I - circumflex'],
	['Ï',    'Ï',  true, 'I - diaeresis'],
	['Ð',     'Ð',  true, 'ETH'],
	['Ñ',  'Ñ',  true, 'N - tilde'],
	['Ò',  'Ò',  true, 'O - grave'],
	['Ó',  'Ó',  true, 'O - acute'],
	['Ô',   'Ô',  true, 'O - circumflex'],
	['Õ',  'Õ',  true, 'O - tilde'],
	['Ö',    'Ö',  true, 'O - diaeresis'],
	['Ø',  'Ø',  true, 'O - slash'],
	['Œ',   'Œ',  true, 'ligature OE'],
	['Š',  'Š',  true, 'S - caron'],
	['Ù',  'Ù',  true, 'U - grave'],
	['Ú',  'Ú',  true, 'U - acute'],
	['Û',   'Û',  true, 'U - circumflex'],
	['Ü',    'Ü',  true, 'U - diaeresis'],
	['Ý',  'Ý',  true, 'Y - acute'],
	['Ÿ',    'Ÿ',  true, 'Y - diaeresis'],
	['Þ',   'Þ',  true, 'THORN'],
	['à',  'à',  true, 'a - grave'],
	['á',  'á',  true, 'a - acute'],
	['â',   'â',  true, 'a - circumflex'],
	['ã',  'ã',  true, 'a - tilde'],
	['ä',    'ä',  true, 'a - diaeresis'],
	['å',   'å',  true, 'a - ring above'],
	['æ',   'æ',  true, 'ligature ae'],
	['ç',  'ç',  true, 'c - cedilla'],
	['è',  'è',  true, 'e - grave'],
	['é',  'é',  true, 'e - acute'],
	['ê',   'ê',  true, 'e - circumflex'],
	['ë',    'ë',  true, 'e - diaeresis'],
	['ì',  'ì',  true, 'i - grave'],
	['í',  'í',  true, 'i - acute'],
	['î',   'î',  true, 'i - circumflex'],
	['ï',    'ï',  true, 'i - diaeresis'],
	['ð',     'ð',  true, 'eth'],
	['ñ',  'ñ',  true, 'n - tilde'],
	['ò',  'ò',  true, 'o - grave'],
	['ó',  'ó',  true, 'o - acute'],
	['ô',   'ô',  true, 'o - circumflex'],
	['õ',  'õ',  true, 'o - tilde'],
	['ö',    'ö',  true, 'o - diaeresis'],
	['ø',  'ø',  true, 'o slash'],
	['œ',   'œ',  true, 'ligature oe'],
	['š',  'š',  true, 's - caron'],
	['ù',  'ù',  true, 'u - grave'],
	['ú',  'ú',  true, 'u - acute'],
	['û',   'û',  true, 'u - circumflex'],
	['ü',    'ü',  true, 'u - diaeresis'],
	['ý',  'ý',  true, 'y - acute'],
	['þ',   'þ',  true, 'thorn'],
	['ÿ',    'ÿ',  true, 'y - diaeresis'],
// ['Α',   'Α',  true, 'Alpha'],
	['Β',    'Β',  true, 'Beta'],
	['Γ',   'Γ',  true, 'Gamma'],
	['Δ',   'Δ',  true, 'Delta'],
	['Ε', 'Ε',  true, 'Epsilon'],
	['Ζ',    'Ζ',  true, 'Zeta'],
	['Η',     'Η',  true, 'Eta'],
	['Θ',   'Θ',  true, 'Theta'],
	['Ι',    'Ι',  true, 'Iota'],
	['Κ',   'Κ',  true, 'Kappa'],
	['Λ',  'Λ',  true, 'Lambda'],
	['Μ',      'Μ',  true, 'Mu'],
	['Ν',      'Ν',  true, 'Nu'],
	['Ξ',      'Ξ',  true, 'Xi'],
	['Ο', 'Ο',  true, 'Omicron'],
	['Π',      'Π',  true, 'Pi'],
	['Ρ',     'Ρ',  true, 'Rho'],
	['Σ',   'Σ',  true, 'Sigma'],
	['Τ',     'Τ',  true, 'Tau'],
	['Υ', 'Υ',  true, 'Upsilon'],
	['Φ',     'Φ',  true, 'Phi'],
	['Χ',     'Χ',  true, 'Chi'],
	['Ψ',     'Ψ',  true, 'Psi'],
	['Ω',   'Ω',  true, 'Omega'],
	['α',   'α',  true, 'alpha'],
	['β',    'β',  true, 'beta'],
	['γ',   'γ',  true, 'gamma'],
	['δ',   'δ',  true, 'delta'],
	['ε', 'ε',  true, 'epsilon'],
	['ζ',    'ζ',  true, 'zeta'],
	['η',     'η',  true, 'eta'],
	['θ',   'θ',  true, 'theta'],
	['ι',    'ι',  true, 'iota'],
	['κ',   'κ',  true, 'kappa'],
	['λ',  'λ',  true, 'lambda'],
	['μ',      'μ',  true, 'mu'],
	['ν',      'ν',  true, 'nu'],
	['ξ',      'ξ',  true, 'xi'],
	['ο', 'ο',  true, 'omicron'],
	['π',      'π',  true, 'pi'],
	['ρ',     'ρ',  true, 'rho'],
	['ς',  'ς',  true, 'final sigma'],
	['σ',   'σ',  true, 'sigma'],
	['τ',     'τ',  true, 'tau'],
	['υ', 'υ',  true, 'upsilon'],
	['φ',     'φ',  true, 'phi'],
	['χ',     'χ',  true, 'chi'],
	['ψ',     'ψ',  true, 'psi'],
	['ω',   'ω',  true, 'omega'],
// symbols
	['ℵ', 'ℵ', true,'alef symbol'],
	['ϖ',     'ϖ',  true,'pi symbol'],
	['ℜ',    'ℜ', true,'real part symbol'],
	['ϑ','ϑ',  true,'theta symbol'],
	['ϒ',   'ϒ',  true,'upsilon - hook symbol'],
	['℘',  '℘', true,'Weierstrass p'],
	['ℑ',   'ℑ', true,'imaginary part'],
// arrows
	['←',    '←', true, 'leftwards arrow'],
	['↑',    '↑', true, 'upwards arrow'],
	['→',    '→', true, 'rightwards arrow'],
	['↓',    '↓', true, 'downwards arrow'],
	['↔',    '↔', true, 'left right arrow'],
	['↵',   '↵', true,'carriage return'],
	['⇐',    '⇐', true,'leftwards double arrow'],
	['⇑',    '⇑', true,'upwards double arrow'],
	['⇒',    '⇒', true,'rightwards double arrow'],
	['⇓',    '⇓', true,'downwards double arrow'],
	['⇔',    '⇔', true,'left right double arrow'],
	['∴',  '∴', true,'therefore'],
	['⊂',     '⊂', true,'subset of'],
	['⊃',     '⊃', true,'superset of'],
	['⊄',    '⊄', true,'not a subset of'],
	['⊆',    '⊆', true,'subset of or equal to'],
	['⊇',    '⊇', true,'superset of or equal to'],
	['⊕',   '⊕', true,'circled plus'],
	['⊗',  '⊗', true,'circled times'],
	['⊥',    '⊥', true,'perpendicular'],
	['⋅',    '⋅', true,'dot operator'],
	['⌈',   '⌈', true,'left ceiling'],
	['⌉',   '⌉', true,'right ceiling'],
	['⌊',  '⌊', true,'left floor'],
	['⌋',  '⌋', true,'right floor'],
	['⟨',    '〈', true,'left-pointing angle bracket'],
	['⟩',    '〉', true,'right-pointing angle bracket'],
	['◊',     '◊', true,'lozenge'],
	['♠',  '♠', true,'black spade suit'],
	['♣',   '♣', true, 'black club suit'],
	['♥',  '♥', true, 'black heart suit'],
	['♦',   '♦', true, 'black diamond suit'],
	[' ',    ' ', true,'en space'],
	[' ',    ' ', true,'em space'],
	[' ',  ' ', true,'thin space'],
	['‌',    '‌', true,'zero width non-joiner'],
	['‍',     '‍', true,'zero width joiner'],
	['‎',     '‎', true,'left-to-right mark'],
	['‏',     '‏', true,'right-to-left mark'],
	['­',     '­',  true,'soft hyphen'],
//Greek Extended Block of Unicode
	['',		'ἀ', true, ''],
	['',		'ἁ', true, ''],
	['',		'ἂ', true, ''],
	['',		'ἃ', true, ''],
	['',		'ἄ', true, ''],
	['',		'ἅ', true, ''],
	['',		'ἆ', true, ''],
	['',		'ἇ', true, ''],
	['',		'Ἀ', true, ''],
	['',		'Ἁ', true, ''],
	['',		'Ἂ', true, ''],
	['',		'Ἃ', true, ''],
	['',		'Ἄ', true, ''],		
	['',		'Ἅ', true, ''],
	['',		'Ἆ', true, ''],
	['',		'Ἇ', true, ''],
	['',		'ἐ', true, ''],
	['',		'ἑ', true, ''],
	['',		'ἒ', true, ''],
	['',		'ἓ', true, ''],
	['',		'ἔ', true, ''],
	['',		'ἕ', true, ''],
	['',		'Ἐ', true, ''],
	['',		'Ἑ', true, ''],
	['',		'Ἒ', true, ''],
	['',		'Ἓ', true, ''],
	['',		'Ἔ', true, ''],
	['',		'Ἕ', true, ''],
	['',		'ἠ', true, ''],
	['',		'ἡ', true, ''],
	['',		'ἢ', true, ''],
	['',		'ἣ', true, ''],
	['',		'ἤ', true, ''],
	['',		'ἥ', true, ''],
	['',		'ἦ', true, ''],
	['',		'ἧ', true, ''],
	['',		'Ἠ', true, ''],
	['',		'Ἡ', true, ''],
	['',		'Ἢ', true, ''],
	['',		'Ἣ', true, ''],
	['',		'Ἤ', true, ''],
	['',		'Ἥ', true, ''],
	['',		'Ἦ', true, ''],
	['',		'Ἧ', true, ''],
	['',		'ἰ', true, ''],
	['',		'ἱ', true, ''],
	['',		'ἲ', true, ''],
	['',		'ἳ', true, ''],
	['',		'ἴ', true, ''],
	['',		'ἵ', true, ''],
	['',		'ἶ', true, ''],
	['',		'ἷ', true, ''],
	['',		'Ἰ', true, ''],
	['',		'Ἱ', true, ''],
	['',		'Ἲ', true, ''],
	['',		'Ἳ', true, ''],
	['',		'Ἴ', true, ''],
	['',		'Ἵ', true, ''],
	['',		'Ἶ', true, ''],
	['',		'Ἷ', true, ''],
	['',		'ὀ', true, ''],
	['',		'ὁ', true, ''],
	['',		'ὂ', true, ''],
	['',		'ὃ', true, ''],
	['',		'ὄ', true, ''],
	['',		'ὅ', true, ''],
	['',		'Ὀ', true, ''],
	['',		'Ὁ', true, ''],
	['',		'Ὂ', true, ''],
	['',		'Ὃ', true, ''],
	['',		'Ὄ', true, ''],
	['',		'Ὅ', true, ''],
	['',		'ὐ', true, ''],
	['',		'ὑ', true, ''],
	['',		'ὒ', true, ''],
	['',		'ὓ', true, ''],
	['',		'ὔ', true, ''],
	['',		'ὕ', true, ''],
	['',		'ὖ', true, ''],
	['',		'ὗ', true, ''],
	['',		'Ὑ', true, ''],
	['',		'Ὓ', true, ''],
	['',		'Ὕ', true, ''],
	['',		'Ὗ', true, ''],
	['',		'ὠ', true, ''],
	['',		'ὡ', true, ''],
	['',		'ὢ', true, ''],
	['',		'ὣ', true, ''],
	['',		'ὤ', true, ''],
	['',		'ὥ', true, ''],
['', 'ὦ', true, ''],
['', 'ὧ', true, ''],
['', 'Ὠ', true, ''],
['', 'Ὡ', true, ''],
['', 'Ὢ', true, ''],
['', 'Ὣ', true, ''],
['', 'Ὤ', true, ''],
['', 'Ὥ', true, ''],
['', 'Ὦ', true, ''],
['', 'Ὧ', true, ''],
['', 'ὰ', true, ''],
['', 'ά', true, ''],
['', 'ὲ', true, ''],
['', 'έ', true, ''],
['', 'ὴ', true, ''],
['', 'ή', true, ''],
['', 'ὶ', true, ''],
['', 'ί', true, ''],
['', 'ὸ', true, ''],
['', 'ό', true, ''],
['', 'ὺ', true, ''],
['', 'ύ', true, ''],
['', 'ὼ', true, ''],
['', 'ώ', true, ''],
['', 'ᾀ', true, ''],
['', 'ᾁ', true, ''],
['', 'ᾂ', true, ''],
['', 'ᾃ', true, ''],
['', 'ᾄ', true, ''],
['', 'ᾅ', true, ''],
['', 'ᾆ', true, ''],
['', 'ᾇ', true, ''],
['', 'ᾈ', true, ''],
['', 'ᾉ', true, ''],
['', 'ᾊ', true, ''],
['', 'ᾋ', true, ''],
['', 'ᾌ', true, ''],
['', 'ᾍ', true, ''],
['', 'ᾎ', true, ''],
['', 'ᾏ', true, ''],
['', 'ᾐ', true, ''],
['', 'ᾑ', true, ''],
['', 'ᾒ', true, ''],
['', 'ᾓ', true, ''],
['', 'ᾔ', true, ''],
['', 'ᾕ', true, ''],
['', 'ᾖ', true, ''],
['', 'ᾗ', true, ''],
['', 'ᾘ', true, ''],
['', 'ᾙ', true, ''],
['', 'ᾚ', true, ''],
['', 'ᾛ', true, ''],
['', 'ᾜ', true, ''],
['', 'ᾝ', true, ''],
['', 'ᾞ', true, ''],
['', 'ᾟ', true, ''],
['', 'ᾠ', true, ''],
['', 'ᾡ', true, ''],
['', 'ᾢ', true, ''],
['', 'ᾣ', true, ''],
['', 'ᾤ', true, ''],
['', 'ᾥ', true, ''],
['', 'ᾦ', true, ''],
['', 'ᾧ', true, ''],
['', 'ᾨ', true, ''],
['', 'ᾩ', true, ''],
['', 'ᾪ', true, ''],
['', 'ᾫ', true, ''],
['', 'ᾬ', true, ''],
['', 'ᾭ', true, ''],
['', 'ᾮ', true, ''],
['', 'ᾯ', true, ''],
['', 'ᾰ', true, ''],
['', 'ᾱ', true, ''],
['', 'ᾲ', true, ''],
['', 'ᾳ', true, ''],
['', 'ᾴ', true, ''],
['', 'ᾶ', true, ''],
['', 'ᾷ', true, ''],
['', 'Ᾰ', true, ''],
['', 'Ᾱ', true, ''],
['', 'Ὰ', true, ''],
['', 'Ά', true, ''],
['', 'ᾼ', true, ''],
['', '᾽', true, ''],
['', 'ι', true, ''],
['', '᾿', true, ''],
['', '῀', true, ''],
['', '῁', true, ''],
['', 'ῂ', true, ''],
['', 'ῃ', true, ''],
['', 'ῄ', true, ''],
['', 'ῆ', true, ''],
['', 'ῇ', true, ''],
['', 'Ὲ', true, ''],
['', 'Έ', true, ''],
['', 'Ὴ', true, ''],
['', 'Ή', true, ''],
['', 'ῌ', true, ''],
['', '῍', true, ''],
['', '῎', true, ''],
['', '῏', true, ''],
['', 'ῐ', true, ''],
['', 'ῑ', true, ''],
['', 'ῒ', true, ''],
['', 'ΐ', true, ''],
['', 'ῖ', true, ''],
['', 'ῗ', true, ''],
['', 'Ῐ', true, ''],
['', 'Ῑ', true, ''],
['', 'Ὶ', true, ''],
['', 'Ί', true, ''],
['', '῝', true, ''],
['', '῞', true, ''],
['', '῟', true, ''],
['', 'ῠ', true, ''],
['', 'ῡ', true, ''],
['', 'ῢ', true, ''],
['', 'ΰ', true, ''],
['', 'ῤ', true, ''],
['', 'ῥ', true, ''],
['', 'ῦ', true, ''],
['', 'ῧ', true, ''],
['', 'Ῠ', true, ''],
['', 'Ῡ', true, ''],
['', 'Ὺ', true, ''],
['', 'Ύ', true, ''],
['', 'Ῥ', true, ''],
['', '῭', true, ''],
['', '΅', true, ''],
['', '`', true, ''],
['', 'ῲ', true, ''],
['', 'ῳ', true, ''],
['', 'ῴ', true, ''],
['', 'ῶ', true, ''],
['', 'ῷ', true, ''],
['', 'Ὸ', true, ''],
['', 'Ό', true, ''],
['', 'Ὼ', true, ''],
['', 'Ώ', true, ''],
['', 'ῼ', true, ''],
['', '´', true, ''],
['', '῾', true, '']	
];

function renderCharMapHTML() {
	var charsPerRow = 30, tdWidth=20, tdHeight=20;
	var html = '<table border="0" cellspacing="1" cellpadding="0" width="' + (tdWidth*charsPerRow) + '"><tr height="' + tdHeight + '">';
	var cols=-1;
	for (var i=0; i<charmap.length; i++) {
		if (charmap[i][2]==true) {
			cols++;
			html += ''
				+ '<td width="' + tdWidth + '" height="' + tdHeight + '" class="charmap"'
				+ ' onmouseover="tinyMCE.switchClass(this,\'charmapOver\');'
				+ 'previewChar(\'' + charmap[i][1].substring(1,charmap[i][1].length) + '\',\'' + charmap[i][0].substring(1,charmap[i][0].length) + '\',\'' + charmap[i][3] + '\');"'
				+ ' onmouseout="tinyMCE.restoreClass(this,\'charmapOver\');"'
				+ ' nowrap="nowrap" onclick="insertChar(\'' + charmap[i][1].substring(2,charmap[i][1].length-1) + '\');"><a style="text-decoration: none;" onfocus="previewChar(\'' + charmap[i][1].substring(1,charmap[i][1].length) + '\',\'' + charmap[i][0].substring(1,charmap[i][0].length) + '\',\'' + charmap[i][3] + '\');" href="javascript:insertChar(\'' + charmap[i][1].substring(2,charmap[i][1].length-1) + '\');" onclick="return false;" onmousedown="return false;" title="' + charmap[i][3] + '">'
				+ charmap[i][1]
				+ '</a></td>';
			if ((cols+1) % charsPerRow == 0)
				html += '</tr><tr height="' + tdHeight + '">';
		}
	 }
	if (cols % charsPerRow > 0) {
		var padd = charsPerRow - (cols % charsPerRow);
		for (var i=0; i<padd-1; i++)
			html += '<td width="' + tdWidth + '" height="' + tdHeight + '" class="charmap">&nbsp;</td>';
	}
	html += '</tr></table>';
	document.write(html);

}

function insertChar(chr) {
	tinyMCEPopup.execCommand('mceInsertContent', false, '\&#' + chr + ';');

	// Refocus in window
	if (tinyMCEPopup.isWindow) 
		window.focus();
		


}

function previewChar(codeA, codeB, codeN) {
	var elmA = document.getElementById('codeA');
	var elmB = document.getElementById('codeB');
	var elmV = document.getElementById('codeV');
	var elmN = document.getElementById('codeN');

	if (codeA=='#160;') {
		elmV.innerHTML = '__';
	} else {
		elmV.innerHTML = '&' + codeA;
	}

	elmB.innerHTML = '&amp;' + codeA;
	elmA.innerHTML = '&amp;' + codeB;
	elmN.innerHTML = codeN;
}