var input_obj;
var vkb_obj;

function vkb(letter){
	switch(letter){
		case 'back':
		 input_obj.value = input_obj.value.substr(0,input_obj.value.length - 1);
			break;
		case 'space':
			input_obj.value = input_obj.value + " ";
			break;
		case 'clear':
			input_obj.value = "";
			break;
		case 'EN':
			layout('en');
			break;
		case 'HE':
			layout('he');
			break;
		default:
		input_obj.value = input_obj.value + letter;
	}
}

function attach_input(obj){
	input_obj = obj;
}

function layout(lang){
	switch(lang){
	case 'en':
	str = "<table cellpadding='0' cellspacing='0' border='0'  dir='ltr' onselectstart='return false;'>" +
		"<tr>" +
		"<td align='center'>" +
		"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
			"<td><a class=num_btn onmousedown=\"vkb('1');return false;\">1</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('2');return false;\">2</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('3');return false;\">3</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('4');return false;\">4</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('5');return false;\">5</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('6');return false;\">6</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('7');return false;\">7</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('8');return false;\">8</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('9');return false;\">9</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('0');return false;\">0</a></td> " +
		"</tr></table>" +
		"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a onmousedown=\"vkb('q');return false;\">q</a></td> " +
				"<td><a onmousedown=\"vkb('w');return false;\">w</a></td> " +
				"<td><a onmousedown=\"vkb('e');return false;\">e</a></td> " +
				"<td><a onmousedown=\"vkb('r');return false;\">r</a></td> " +
				"<td><a onmousedown=\"vkb('t');return false;\">t</a></td> " +
				"<td><a onmousedown=\"vkb('y');return false;\">y</a></td> " +
				"<td><a onmousedown=\"vkb('u');return false;\">u</a></td> " +
				"<td><a onmousedown=\"vkb('i');return false;\">i</a></td> " +
				"<td><a onmousedown=\"vkb('o');return false;\">o</a></td> " +
				"<td><a onmousedown=\"vkb('p');return false;\">p</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a onmousedown=\"vkb('a');return false;\">a</a></td> " +
				"<td><a onmousedown=\"vkb('s');return false;\">s</a></td> " +
				"<td><a onmousedown=\"vkb('d');return false;\">d</a></td> " +
				"<td><a onmousedown=\"vkb('f');return false;\">f</a></td> " +
				"<td><a onmousedown=\"vkb('g');return false;\">g</a></td> " +
				"<td><a onmousedown=\"vkb('h');return false;\">h</a></td> " +
				"<td><a onmousedown=\"vkb('j');return false;\">j</a></td> " +
				"<td><a onmousedown=\"vkb('k');return false;\">k</a></td> " +
				"<td><a onmousedown=\"vkb('l');return false;\">l</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a onmousedown=\"vkb('z');return false;\">z</a></td> " +
				"<td><a onmousedown=\"vkb('x');return false;\">x</a></td> " +
				"<td><a onmousedown=\"vkb('c');return false;\">c</a></td> " +
				"<td><a onmousedown=\"vkb('v');return false;\">v</a></td> " +
				"<td><a onmousedown=\"vkb('b');return false;\">b</a></td> " +
				"<td><a onmousedown=\"vkb('n');return false;\">n</a></td> " +
				"<td><a onmousedown=\"vkb('m');return false;\">m</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0' dir='rtl'><tr>" +
				"<td><a style='width:80px;'  onmousedown=\"vkb('back');return false;\">מחק</a></td> " +
				"<td><a style='width:250px;' onmousedown=\"vkb('space');return false;\">&nbsp;</a></td> " +
				"<td><a style='width:80px;'  onmousedown=\"vkb('clear');return false;\">נקה</a></td> " +
				"<td><a style='width:80px;'  onmousedown=\"vkb('HE');return false;\">עב</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"</table>";
	break;
	
	case 'he':		
	default:		
	str = "<table cellpadding='0' cellspacing='0' border='0' onselectstart='return false;'>" +
		"<tr>" +
		"<td align='center'>" +
		"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
			"<td><a class=num_btn onmousedown=\"vkb('0');return false;\">0</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('9');return false;\">9</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('8');return false;\">8</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('7');return false;\">7</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('6');return false;\">6</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('5');return false;\">5</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('4');return false;\">4</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('3');return false;\">3</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('2');return false;\">2</a></td> " +
			"<td><a class=num_btn onmousedown=\"vkb('1');return false;\">1</a></td> " +
		"</tr></table>" +
		"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a onmousedown=\"vkb('פ');return false;\">פ</a></td> " +
				"<td><a onmousedown=\"vkb('ם');return false;\">ם</a></td> " +
				"<td><a onmousedown=\"vkb('ן');return false;\">ן</a></td> " +
				"<td><a onmousedown=\"vkb('ו');return false;\">ו</a></td> " +
				"<td><a onmousedown=\"vkb('ט');return false;\">ט</a></td> " +
				"<td><a onmousedown=\"vkb('א');return false;\">א</a></td> " +
				"<td><a onmousedown=\"vkb('ר');return false;\">ר</a></td> " +
				"<td><a onmousedown=\"vkb('ק');return false;\">ק</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a onmousedown=\"vkb('ף');return false;\">ף</a></td> " +
				"<td><a onmousedown=\"vkb('ך');return false;\">ך</a></td> " +
				"<td><a onmousedown=\"vkb('ל');return false;\">ל</a></td> " +
				"<td><a onmousedown=\"vkb('ח');return false;\">ח</a></td> " +
				"<td><a onmousedown=\"vkb('י');return false;\">י</a></td> " +
				"<td><a onmousedown=\"vkb('ע');return false;\">ע</a></td> " +
				"<td><a onmousedown=\"vkb('כ');return false;\">כ</a></td> " +
				"<td><a onmousedown=\"vkb('ג');return false;\">ג</a></td> " +
				"<td><a onmousedown=\"vkb('ד');return false;\">ד</a></td> " +
				"<td><a onmousedown=\"vkb('ש');return false;\">ש</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a onmousedown=\"vkb('ץ');return false;\">ץ</a></td> " +
				"<td><a onmousedown=\"vkb('ת');return false;\">ת</a></td> " +
				"<td><a onmousedown=\"vkb('צ');return false;\">צ</a></td> " +
				"<td><a onmousedown=\"vkb('מ');return false;\">מ</a></td> " +
				"<td><a onmousedown=\"vkb('נ');return false;\">נ</a></td> " +
				"<td><a onmousedown=\"vkb('ה');return false;\">ה</a></td> " +
				"<td><a onmousedown=\"vkb('ב');return false;\">ב</a></td> " +
				"<td><a onmousedown=\"vkb('ס');return false;\">ס</a></td> " +
				"<td><a onmousedown=\"vkb('ז');return false;\">ז</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"<tr>" +
			"<td align='center'>" +
			"<table cellpadding='0' cellspacing='0' border='0'><tr>" +
				"<td><a style='width:80px;'  onmousedown=\"vkb('back');return false;\">מחק</a></td> " +
				"<td><a style='width:250px;' onmousedown=\"vkb('space');return false;\">&nbsp;</a></td> " +
				"<td><a style='width:80px;'  onmousedown=\"vkb('clear');return false;\">נקה</a></td> " +
				"<td><a style='width:80px;'  onmousedown=\"vkb('EN');return false;\">EN</a></td> " +
			"</tr></table>" +
			"</td>" +
		"</tr>" +
		"</table>";
	}
	vkb_obj.innerHTML = str;
}