var VKID="VirtualKeyId", oVK = null, elVKObj, gbUpper=false, gbRusLat=false;
var iSmallBtnWidth=23, iSmallBtnHeight=19, iHSpace=3, iVSpace=4, iKeyCode=1;

function makeArea(x1,y1,x2,y2,x){
	return ("<AREA SHAPE='rect' COORDS='"+x1+","+y1+","+x2+","+y2+"' onclick='insSymbol("+x+");'>");
}

function makeMap(){
	function calcW(x){return(iSmallBtnWidth*x+iHSpace*x);}
	function calcH(x){return(iSmallBtnHeight*x+iVSpace*x);}

	var xArea="",iX1=0,iY1=0,iX2=0,iY2=0,scoords;

	for(var j=0;j<5;j++){
		iY1 = calcH(j);
		iY2 = iSmallBtnHeight + j*(iSmallBtnHeight+3);
		switch(j){
			case 0:;case 3:;case 4:
				var iStart = (j==4) ? 2 : 0
				for(var i=iStart;i<12;i++){
					iX1=calcW(i);
					iX2=iX1+iSmallBtnWidth;
					xArea+=makeArea(iX1,iY1,iX2,iY2,iKeyCode++);
				}
				break;
			case 1:;case 2:
				for(var i=0;i<13;i++){
					iX1=calcW(i);
					iX2=iX1+iSmallBtnWidth;
					xArea+=makeArea(iX1,iY1,iX2,iY2,iKeyCode++);
				}
				break;
		}
	}
	var iTX1 =  calcW(12), iTX2 = calcW(13), iTX3 = calcW(11), iTX4 = calcW(2),
		iTY1 =  calcH(1), iTY2 = calcH(3), iTY3 = calcH(4),iTY4 = calcH(5);
	xArea+=makeArea(0,iY1,49,iY2,100);
	xArea+=makeArea(iTX1,0,iTX1+49,iSmallBtnHeight,101);
	xArea+=makeArea(iTX2,iTY1,iTX2+iSmallBtnWidth,iTY2,102);
	xArea+=makeArea(iTX3,iTY2,iTX2+49,iTY3,102);
	xArea+=makeArea(iTX4,iSmallBtnHeight*5+iVSpace*5,iTX4+231,iSmallBtnHeight*6 + iVSpace*5,61);
	xArea+=makeArea(312,92,360,110,103);

	return('<MAP NAME="VKMap">'+xArea+'</MAP>');
}

function positionVK(){
	if(!oVK)return;
	
	var t=320;
	el=$(w, 'LoginTbl');
	if(el){
		t=el.offsetTop+el.clientHeight;
		while(el.parent!=null){
			el=el.parent;
			t+=el.offsetTop;
		}
	}else{t=320;}
	t+=Math.round(Math.random()*60)+55;
	oVK.style.top=t+"px";
	
	t=(screen.availWidth-400);
	t-=Math.round(Math.random()*t)+5;
	oVK.style.left=t+"px";
}

function showVK(o, UseStKeybrd){
	if(!oVK){
		var ColorScheme=(colorstyle==''?'':colorstyle+'/');
		oVK = d.createElement('DIV');
		oVK.innerHTML+="<P>"+Top.VirtKeys+"</P>";
		oVK.innerHTML+="<DIV onclick='insSymbol(0);'>"+Top.LRSClear+"</DIV>";
		oVK.innerHTML+="<IMG SRC='../img/virtualkey/"+ColorScheme+"vk_lat_lower.gif' ID='gLatLower' class='keys' USEMAP='#VKMap'>";
		oVK.innerHTML+="<IMG SRC='../img/virtualkey/"+ColorScheme+"vk_lat_upper.gif' ID='gLatUpper' class='keys' USEMAP='#VKMap' style='display: none'>";
		oVK.innerHTML+="<IMG SRC='../img/virtualkey/"+ColorScheme+"vk_rus_lower.gif' ID='gRusLower' class='keys' USEMAP='#VKMap' style='display: none'>";
		oVK.innerHTML+="<IMG SRC='../img/virtualkey/"+ColorScheme+"vk_rus_upper.gif' ID='gRusUpper' class='keys' USEMAP='#VKMap' style='display: none'>";
		oVK.innerHTML+=makeMap();
		oVK.id=VKID;
		oVK.className=VKID;
		d.body.appendChild(oVK);
		w.onresize=positionVK;
	}
	elVKObj = o;
	
	if(UseStKeybrd){
		if(w.attachEvent){
			oVK.attachEvent("onkeyup",VK_KeyUp);
			elVKObj.attachEvent("onkeyup",VK_KeyUp)
		}else{
			oVK.addEventListener("keyup",VK_KeyUp,false);
			elVKObj.addEventListener("keyup",VK_KeyUp,false);
		}
	}
	
	positionVK();
	oVK.style.display = 'block';
	elVKObj.style.border="1px solid #DF272C";
}

function VK_KeyUp(e){
	if(!e)e=window.event;
	kC=e.keyCode;
	switch(kC){			
			case 13:fnOnEnter(w);break;
			case 33:;case 34:;case 88:;case 27:;case 32:;case 35:
			case 37:;case 38:;case 39:;case 40:;case 9:; case 8:;case 36: return;
			default: Top.fn_alert(w,Top.AuthErr9,2);e=null;return false;
		}
}

function hideVK(){
	if(!oVK)return;
	try{
		oVK.style.display='none';
		elVKObj.style.border="1px solid #046695";
		elVKObj=null;
	}catch(e){}
}

function getSmbl(x){
	if(x<10)return x;
	var sV_lat={10:"0",11:"-",12:"=",
				13:"!",14:"@",15:"#",16:"$",17:"%",18:"^",19:"&",20:"*",21:"(",22:")",23:"_",24:"+",25:"|",
				26:"q",27:"w",28:"e",29:"r",30:"t",31:"y",32:"u",33:"i",34:"o",35:"p",36:"[",37:"]",38:"`",
				39:"a",40:"s",41:"d",42:"f",43:"g",44:"h",45:"j",46:"k",47:"l",48:";",49:"'",50:"/",
				51:"z",52:"x",53:"c",54:"v",55:"b",56:"n",57:"m",58:",",59:".",60:"?",
				61:" ",
				62:"{",63:"}",64:"~",65:":",66:'"',67:"\\",68:"<",69:">"}

	var sV_rus={10:"0",11:"-",12:"=",
				13:"!",14:'"',15:"¹",16:";",17:"%",18:":",19:"?",20:"*",21:"(",22:")",23:"_",24:"+",25:"|",
				26:"é",27:"ö",28:"ó",29:"ê",30:"å",31:"í",32:"ã",33:"ø",34:"ù",35:"ç",36:"õ",37:"ú",38:"¸",
				39:"ô",40:"û",41:"â",42:"à",43:"ï",44:"ð",45:"î",46:"ë",47:"ä",48:"æ",49:"ý",50:"\\",
				51:"ÿ",52:"÷",53:"ñ",54:"ì",55:"è",56:"ò",57:"ü",58:"á",59:"þ",60:".",
				61:" ",
				62:"/", 63:","}
	var sSmbl='';
		
	switch(x){
		case 36:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[62]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 37:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[63]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 38:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[64]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 48:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[65]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 49:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[66]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 50:	sSmbl=(gbRusLat)?(gbUpper)?sV_rus[x]:sV_rus[62]:(gbUpper)?sV_lat[67]:sV_lat[x];break;
		case 58:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[68]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 59:	sSmbl=(!gbRusLat)?(gbUpper)?sV_lat[69]:sV_lat[x]:(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x];break;
		case 60:	sSmbl=(gbRusLat)?(gbUpper)?sV_rus[63]:sV_rus[x]:sV_lat[x];break;
		default:	sSmbl=(gbRusLat)?(gbUpper)?sV_rus[x].toUpperCase():sV_rus[x]:(gbUpper)?sV_lat[x].toUpperCase():sV_lat[x];
	}
	return(sSmbl);
}

function insSymbol(x){
	var iL=parseInt(elVKObj.getAttribute('MAXLENGTH'),10);
	switch(x){
		case 0  :	elVKObj.value='';break;
		case 100:	gbUpper = !gbUpper;
					var elName=gbRusLat?'gRus':'gLat';
					w.d.getElementById(elName+'Lower').style.display=(gbUpper) ? "none":"block";
					w.d.getElementById(elName+'Upper').style.display=(gbUpper) ? "block":"none";
					break;
		case 101:
			var xv=elVKObj.value;
			elVKObj.value=xv.substr(0,xv.length-1);
			break;
		case 102:
			hideVK();
			break;
		case 103:	gbRusLat = !gbRusLat;
					w.d.getElementById('gLatLower').style.display=(gbRusLat)?"none":(gbUpper)?"none":"block";
					w.d.getElementById('gLatUpper').style.display=(gbRusLat)?"none":(gbUpper)?"block":"none";
					w.d.getElementById('gRusLower').style.display=(gbRusLat)?(gbUpper)?"none":"block":"none";
					w.d.getElementById('gRusUpper').style.display=(gbRusLat)?(gbUpper)?"block":"none":"none";
					break;
		default:
			if ((elVKObj.value.length+1)>iL){
				Top.fn_alert(w,Top.AuthErr10,2);
				return
			}
			elVKObj.value+=getSmbl(x);
	}
}