//		<!--	Copyright © 2001-2007 Peyknet Ltd   www.peyknet.com	-->
//		<!--			Web Keyboard Version 1.3.0		-->
var je="N";
var shftO=0;
var shftU=0;
var altG=0;
var ctrl=0;
var anf=52;
var el=0;
var vrt=1;
var shftUU=0;
var sondernZ=0;
var F1g;
var Frm;
var FrmA;
var Feld_1Typ="I";
var cP;
var anfang=0;
document.onkeydown=tastd;
document.onkeyup=tastu;
map=new Array(60);
key=new Array(60);
function stIdx (objTmp){
if(F1g &&  objTmp.name == F1g.name && el !=0)	return el;
var form=objTmp.form;
form = typeof form == 'string' ? document[form] : form;
var fd = false;
for (var i = 0; i < form.elements.length; i++)
if ((fd = form.elements[i].name == objTmp.name)) break;
F1g=form.elements[i];
el=i;
return fd ? i : -1;
}
function merke2(){
Feld_1Typ="I";
if(F1g)F1g.name="";
cP = FrmA.selection.createRange().duplicate();
chkRicht();
}
function merke(textE1l){
F1g=textE1l;
Feld_1Typ="T";
stIdx(F1g);
chkRicht();
if(F1g.createTextRange)cP=document.selection.createRange().duplicate();
}
function einfuege(txt){
var x=txt.charCodeAt(0);
if(vrt==0||vrt==6||vrt==9||vrt==18||vrt==19||vrt==20){
	var f=txt.charCodeAt(0);
	if(f==40)txt=P9(41);
	else if(f==41)txt=P9(40);
	else if(f==123)txt=P9(125);
	else if(f==125)txt=P9(123);
	else if(f==91)txt=P9(93);
	else if(f==93)txt=P9(91);
	else if(f==60)txt=P9(62);
	else if(f==62)txt=P9(60);
	else if(f==187)txt=P9(171);
	else if(f==171)txt=P9(187);

}

else if(!(vrt==3||vrt==21)  ){
  if ((sondernZ==0)&&((x==94)||(x==96)||(x==168)||(x==176)||(x==180)||(x==184)||(x==711)||(x==728) ||(x==729)||(x==731) ||(x==733))){
  	sondernZ=x;
  	return false;
  }else if(sondernZ!=0&&x!=0){
	if((x==94)||(x==96)||(x==168)||(x==176)||(x==180)||(x==184)||(x==711)||(x==728)||(x==729)||(x==731)||(x==733)){
		txt=P9(sondernZ);
		sondernZ=x;
	}
	else{

		txt=behandlesZ(txt);
		sondernZ=0;
	}
 }
}
 einfuege2(txt);
}
function einfuege2(txI){
if(Feld_1Typ=="I"){
	cP=FrmA.selection.createRange().duplicate();
	if(cP.parentElement().tagName=='INPUT')alert("Click on the button!");
	else cP.pasteHTML(txI);
	FrmA.body.focus();
}else{
	if(cP)cP.text = cP.text.charAt(cP.text.length - 1) == ' ' ? txI + ' ' : txI;
	else F1g.value=txI;
	F1g.focus();
}
/*if(vrt==6){
	if(je=="J")besetige(txI);
	else if(txI.charCodeAt(0)==1740)je="J";
}*/
}
function besetige(tx){
je="N";
if(!chasb(tx))return;
var tr;
if(Feld_1Typ=="I")tr = FrmA.selection.createRange();
else tr = cP;
var tr2 = tr;
tr2=tr.moveStart('character', -2);
tr.select();
tr.execCommand("Delete");
tr.select();
var txI=P9(1610)+tx;
if(Feld_1Typ=="I"){
	cP=FrmA.selection.createRange().duplicate();
	cP.pasteHTML(txI);
	FrmA.body.focus();
}else{
	if(cP)cP.text = cP.text.charAt(cP.text.length - 1) == ' ' ? txI + ' ' : txI;
	else F1g.value=txI;
	F1g.focus();
}
}
function chasb(txt){
var x=txt.charCodeAt(0);
if( (x>1568 && x<1611) || (x>1648 && x<1750) )return true;
else return false;
}
function map2(ch){
for ( i=0;i<map.length;i++){
if( map[i]==ch )
	return (key[i]);
}
}
function tastd(){
setRicht2();
if(Feld_1Typ!="I" &&(F1g.name=="frommail"||F1g.name=="tomail"||F1g.name=="tomailBCC"||F1g.name=="tomailCC")) return true;
	var ii="";
	var ev="";
	var nach;

	if(Feld_1Typ=="I")ev=frames.PeyknetEditor.event;
	else  ev= window.event;

	if(!ev)	ev= window.event;
	ii=ev.keyCode;
	//alert(ii);

	if(ii==16){shiftUnten("T","D");return false;}
	if (ii==17&& ev.ctrlKey==true){
		ctrl =1;
		if(ev.ctrlLeft)ktrl('L');
		else ktrl('R');
		return true;
	}
	if(ii==18&& ev.altLeft==true)return true;
	if(ii==18&& ev.altKey==true){
		altGr("T","D");
		return false;
	}
	if(ii==8||ii==13||(ii>31&&ii<41)||ii==45||ii==46) return true;
	if (ii==9){
		if(Feld_1Typ=="I") einfuege("&nbsp; &nbsp; &nbsp;");
		else einfuege("     ");
	}
	if (ii==20) caps();
	if(ctrl ==1 && ev.ctrlKey) return true;
	nach=map2(ii);
	einfuege(P9(nach));
	return false; //Scroller!!
}
function tastu(){
if(Feld_1Typ!="I" &&(F1g.name=="frommail"||F1g.name=="tomail"||F1g.name=="tomailCC"||F1g.name=="tomailBCC")) return true;
	var ii="";
	var ev="";
	if(Feld_1Typ=="I")ev=frames.PeyknetEditor.event;
	else  ev= window.event;
	ii=ev.keyCode;

if(ii ==17){
	if(altG==1)altGr("T","U");
}
if(ctrl ==1 && ev.ctrlKey ==false){ctrl =0;ktrl('U');}
if( ii ==16){shiftUnten("T","U"); return false;}

}
function ktrl(FL){
	var f1='#BBBBBB';
	var f2='#DDDDDD';
	var V="";
if(ctrl==0){
	V=f1;
	Frm.elements[55 + anf].runtimeStyle.backgroundColor=V;
	Frm.elements[62 + anf].runtimeStyle.backgroundColor=V;
}
else if(ctrl==1){
	V=f2;
	if(FL=='L')
		Frm.elements[55 + anf].runtimeStyle.backgroundColor=V;
	if(FL=='R')
		Frm.elements[62 + anf].runtimeStyle.backgroundColor=V;
}
}

function altGr(TM,DU){
var f1='#BBBBBB';
var f2='#DDDDDD';
var V="";
if(TM=="M"&&DU=="C"){
	if(altG==1){
		if(event.altKey ==true )return false;
		V=f1;
		altG=0;
	}
}else if(TM=='M' && DU=='E'){
	if(altG==0){
		V=f2;
		altG=1;
	}else{
		V=f1;
		altG=0;
	}
}else if(TM=="T"&&DU=="D"){
	V=f2;
	altG=1;
}
else if(TM=="T"&&DU=="U"){
	V=f1;
	altG=0;
}

Frm.elements[59 + anf].runtimeStyle.backgroundColor=V;
auswahlv();
frames.PeyknetEditor.focus();
}
function shiftUnten(TM,DU){
var f1='#BBBBBB';
var f2='#DDDDDD';
var V="";
if(TM=='M' && DU=='C'){
	if(shftU==1){
		if(event.shiftKey ==true )return false;

		V=f1;
		shftUU=0;
		shftU=0;
	}
}
else if(TM=='M' && DU=='E'){
	if(shftU==1){
		V=f1;
		shftUU=0;
		shftU=0;
	}else{
		V=f2;
		shftUU=1;
		shftU=1;
	}
}
else if(TM=="T"&&DU=="D"){
	V=f2;
	shftUU=1;
	shftU=1;
}
else if(TM=="T"&&DU=="U"){
	V=f1;
	shftUU=0;
	shftU=0;
}else if(TM=="T"&&DU=="U"){
	V=f1;
	shftUU=0;
	shftU=0;
}
	Frm.elements[42 + anf].runtimeStyle.backgroundColor=V;
	Frm.elements[54 + anf].runtimeStyle.backgroundColor=V;
auswahlv();
frames.PeyknetEditor.focus();
}
function caps(){
	var obj=Frm.elements[28 + anf];
	if(shftO==1){
		obj.runtimeStyle.backgroundColor='#BBBBBB';
		shftO=0;
	}
	else{
		obj.runtimeclassName = 'radioBoxDefault';
		shftO=1;
	}
auswahlv();
frames.PeyknetEditor.focus();
}
function delVor(){
	var tr;
	if(Feld_1Typ=="I")tr = FrmA.selection.createRange();
	else tr = cP;
	var tr2 = tr;
	tr2=tr.moveStart('character', -1);
	tr.select();
	tr.execCommand("Delete");
	tr.select();
}
function delNach(){}
function setLng(nr){
vrt=nr;
var obj=Frm.lng;
for (var r=0; r < obj.length; r++)
	if (obj[r].checked) obj[r].sclassName = 'radioBoxchecked';
	else obj[r].className = 'radioBoxDefault';
	auswahlv();
	setRicht();
}
function setRicht2(){
if(anfang<2){
anfang++;
if(Frm.richtung[0].checked == true) Frm.richtung[0].click();
if(Frm.richtung[1].checked == true) Frm.richtung[1].click();
}
}
function setRicht(){
	var tr;
	if(vrt==0||vrt==6||vrt==9||vrt==18||vrt==19||vrt==20){
		if(Feld_1Typ=="I"){
		tr = FrmA.selection.createRange();
		tr.execCommand('JustifyRight');	//TODO hidden L2R
		PeyknetEditor.document.body.innerHTML='<FONT size=6><P align=right> </P></FONT>';
		PeyknetEditor.document.body.dir='rtl';
		tr.select();
		frames.PeyknetEditor.focus();
		Frm.richtung[0].checked  =true;
		}else F1g.dir = "rtl";


	}
	else{
		if(Feld_1Typ=="I"){
		tr = FrmA.selection.createRange();
		tr.execCommand('JustifyLeft');
		PeyknetEditor.document.body.dir='ltr';
		tr.select();
		frames.PeyknetEditor.focus();
		Frm.richtung[1].checked  =true;
		}else F1g.dir = "ltr";
	}
}
function chkRicht(){

if(Feld_1Typ=="I" &&PeyknetEditor.document.body.dir=='ltr' )Frm.richtung[1].checked  =true;
else if(Feld_1Typ=="I" &&PeyknetEditor.document.body.dir=='rtl' )Frm.richtung[0].checked  =true;

if (F1g && F1g.dir == "rtl") Frm.richtung[0].checked  =true;
else if (F1g && F1g.dir == "ltr") Frm.richtung[1].checked  =true;

}
function auswahlv(){
	init( (document.JML.retStrvirt(vrt, shftO, shftU, shftUU, altG) ).split(","));
}
function kopy(u){
 for(i=0;i< (u.length );i++)
	map[i]=u[i];
}
function auswahlo(){
	var or=Frm.origin.selectedIndex;
	kopy( (document.JML.retStrOrig(or) ).split(","));
}
function init(ff){
for(i=0;i< ff.length ; i++){
	Frm.elements[i+ anf].value=P9(ff[i]);
	key[i]=ff[i];
}
Frm.elements[13 + anf].value ="BS";
Frm.elements[14 + anf].value="Tab";
Frm.elements[27 + anf].value="Enter";
Frm.elements[28 + anf].value="Caps";
Frm.elements[41 + anf].value="Enter";
Frm.elements[42 + anf].value="shift";
Frm.elements[54 + anf].value="shft";
Frm.elements[55 + anf].value="Ctrl";
Frm.elements[59 + anf].value="Alt Gr";
Frm.elements[57 + anf].value="Alt";
Frm.elements[62 + anf].value="Ctrl";

}
function chgFnt(){
F1g.style.fontSize =Frm.fontt.value + 'px';
}
function fenster(){
	initAll();
	auswahlo();
	auswahlv();
	if(Frm.Feld_1.value.length<1){
		if(Feld_1Typ=="I" &&PeyknetEditor.document.body.dir=='rtl' )
			Frm.Feld_1.value='<p align=right><font size=4></font></p>';
		else
			Frm.Feld_1.value='<p align=left><font size=4></font></p>';
	}
	FrmA.body.innerHTML= Frm.Feld_1.value;
	frames.PeyknetEditor.focus();
}
function reset2(){
	var obj=Frm.lng;
	for (var r=0; r < obj.length; r++){
		obj[r].className = 'radioBoxDefault';
		obj[r].checked  =false;
	}
}
function initEl(){
	Frm = window.document.EmailForm;
	FrmA=frames.PeyknetEditor.document;
	if(Frm.Feld_1)F1g= Frm.Feld_1;
	Feld_1Typ="I";
	var obj=Frm.lng;
	for (var r=0; r < obj.length; r++)
		if (obj[r].checked){
			vrt=obj[r].value;
			obj[r].sclassName = 'radioBoxchecked';
		}
		else obj[r].className = 'radioBoxDefault';
}
function initAll(){
initEl();
findKey();
initForm();
}

function initForm(){
FrmA.body.focus();
cP = FrmA.selection.createRange().duplicate();
setRicht();
einfuege("");
FrmA.body.focus();
cP=FrmA.selection.createRange().duplicate();
FrmA.body.style.fontSize='14pt';
setRicht();
}
function findKey(){
var syslng= navigator.systemLanguage ;
syslng=syslng.substring(0,2);
var optionNr=0;
if( syslng=="ar") optionNr=0;
else if( syslng=="am") optionNr=1;
else if( syslng=="da") optionNr=2;
else if( syslng=="en") optionNr=3;
else if( syslng=="de") optionNr=4;
else if( syslng=="nl") optionNr=5;
else if( syslng=="fa") optionNr=6;
else if( syslng=="fr") optionNr=7;
else if( syslng=="el") optionNr=8;
else if( syslng=="he") optionNr=9;
else if( syslng=="hi") optionNr=10;
else if( syslng=="it") optionNr=11;
else if( syslng=="sr") optionNr=12;
else if( syslng=="ru") optionNr=13;
else if( syslng=="es") optionNr=14;
else if( syslng=="sv") optionNr=15;
else if( syslng=="tr") optionNr=16;
else if( syslng=="cs") optionNr=17;
else if( syslng=="ur") optionNr=18;
else if( syslng=="pa") optionNr=19;
else  optionNr=3;
Frm.origin.selectedIndex= optionNr;
}
function kl(z){
setRicht2();
if(z=='Enter'){
einfuege2("<br/>");
return false;
}
if(z=='Tab'){
einfuege2(" &nbsp; &nbsp; ");
return false;
}

if ( z.charCodeAt(0)==84 )z=P9(9);
if ( z.charCodeAt(0)==69 )z=P9(10);
if(z.charCodeAt(0)==32){
	if(Feld_1Typ=="I")z="&nbsp;";
	else z=" ";
}
einfuege(z);
if(shftU==1)shiftUnten('M','C');
else if(altG==1)altGr('M','C');
}
function l2r(){
	if(F1g) F1g.dir='ltr';
	if(Feld_1Typ=="I"){
		var tr = FrmA.selection.createRange();
		tr.execCommand('JustifyLeft');
		tr.select();
		frames.PeyknetEditor.focus();
		Frm.richtung[1].checked  =true;
	}
}
function r2l(){
	if(F1g) F1g.dir='rtl';
	if(Feld_1Typ=="I"){
		var tr = FrmA.selection.createRange();
		tr.execCommand('JustifyRight');
		tr.select();
		frames.PeyknetEditor.focus();
		Frm.richtung[0].checked  =true;
	}
}
function clearX(){
var s1=confirm("Delete All! Are You sure?");
if(s1==false)return false;
if(Frm.emailName)Frm.emailName.value ="";
if(Frm.emailSubject)Frm.emailSubject.value ="";
if(Frm.frommail)Frm.frommail.value ="";
if(Frm.tomail)Frm.tomail.value ="";
if(Frm.tomailBCC)Frm.tomailBCC.value ="";
if(Frm.tomailCC)Frm.tomailCC.value ="";
PeyknetEditor.document.body.innerText ="";
setRicht();
return true;
}
function versteckBCC(object){

	if (document.getElementById('teilBCC').style.display=="block" ){
		document.getElementById('teilBCC').style.display="none";

	}
	else {
		document.getElementById('teilBCC').style.display="block";

	}
}

function versteck(object){
	if (document.getElementById('teil3').style.display=="block" ){
		document.getElementById('teil3').style.display="none";
		Frm.keybdImg.title="Multilingual Text Editor";
		Frm.keybdImg.src="./pics/htmlMod.gif";
	}
	else {
		document.getElementById('teil3').style.display="block";
		Frm.keybdImg.title="Online HTML Editor";
		Frm.keybdImg.src="./pics/textMod.gif";
	}
}
function utf(){
var flag=true;
//alert(Frm.tomailCC.value);
flag =mailktrl1(); if(flag==false) return false;
flag =mailktrl2(); if(flag==false) return false;
if(Frm.EmailFormat[0].checked==true) Frm.emailText.value =PeyknetEditor.document.body.innerHTML;
else Frm.emailText.value =PeyknetEditor.document.body.innerText;
/*var xy= document.JML.testConnection();
if(xy=='ERR'){
	alert('No Connection to Internet');
	return false;
}*/
//return true;
}
function utf2(){
Frm.emailText.value =PeyknetEditor.document.body.innerHTML;
return true;
}
function mailktrl1(){
var ra_email= /^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/;
var tomail=Frm.tomail.value;
/*
if ( ra_email.test(tomail)==false){
alert(" Reciever email is wrong ");
Frm.tomail.focus();
Frm.tomail.select();
return false;
}*/
}
function mailktrl2(){
var ra_email= /^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/;
var frommail=Frm.frommail.value;
if ( ra_email.test(frommail)==false){
alert(" Sender email is wrong ");
Frm.frommail.focus();
Frm.frommail.select();
return false;
}}
function P9(z){
	return String.fromCharCode(z);
}
function behandlesZ(z){
	var sZ=z.charCodeAt(0);
	var xy= document.JML.behandlesZ(sondernZ,sZ);
	if(xy==0)xy=P9(sondernZ)+z;
	else xy=P9(xy);
	return xy;
}