// Переменные активирование  серисных услуг для сайта
var ActiveSyntError = true;
var ActiveFriend = true;
var ActiveSubsc =true;
var ActiveNextStr =true;
// Переменные фона всплывающего  окна
var WbgColor = "#FFFFFF";	var iFiBgColor = ""; 
// Размеры окна ссылка другу
var WFheight = 400; var WFwidth = 240;
// для окна требуються изображения (sys/gif/pix.gif; sys/gif/xpect.gif; изоб. оконтовки окна с тенями)

if (ActiveSyntError || ActiveNextStr){
	// Переменная для хранения текста ошибок
	var TextError = "";
	window.onload = KeyEvent;
}
if (ActiveFriend || ActiveSyntError || ActiveSubsc){
// Кэш картинок тени
if (document.images){
	var images = new Object();
	images["ugol_verh_lev"] = new Image();
	images["ugol_verh_lev"].src = "../../../../sys/png/"+iFiBgColor+"ugol_verh_lev.png";
	images["verh_vertikal"] = new Image();
	images["verh_vertikal"].src = "../../../../sys/png/"+iFiBgColor+"verh_vertikal.png";
	images["ugol_verh_prav"] = new Image();
	images["ugol_verh_prav"].src = "../../../../sys/png/"+iFiBgColor+"ugol_verh_prav.png";
	images["lev_goriz"] = new Image();
	images["lev_goriz"].src = "../../../../sys/png/"+iFiBgColor+"lev_goriz.png";
	images["prav_goriz"] = new Image();
	images["prav_goriz"].src = "../../../../sys/png/"+iFiBgColor+"prav_goriz.png";
	images["ugol_niz_lev"] = new Image();
	images["ugol_niz_lev"].src = "../../../../sys/png/"+iFiBgColor+"ugol_niz_lev.png";
	images["niz_vertikal"] = new Image();
	images["niz_vertikal"].src = "../../../../sys/png/"+iFiBgColor+"niz_vertikal.png";
	images["ugol_niz_prav"] = new Image();
	images["ugol_niz_prav"].src = "../../../../sys/png/"+iFiBgColor+"ugol_niz_prav.png";
	images["pix"] = new Image();
	images["pix"].src = "../../../../sys/gif/pix.gif";
	images["xpect"] = new Image();
	images["xpect"].src = "../../../../sys/gif/xpect.gif";
	images["arrow"] = new Image();	
	images["arrow"].src = "../../../../sys/png/"+iFiBgColor+"arrow.png";
}
}
// Тип браузера
var BrouX = 0;	
mlBrStr = navigator.userAgent.toLowerCase();	
if (document.all){				// ("Explorer 4.x" and "Opera 4.x")
	if (mlBrStr.indexOf('oper')==-1){
		BrouX = 1;
	}else{
		BrouX = 4;
	}
}else{
	if (document.layers){		// ("Netscape old 4.x")
	}else {						// ("Netscape New 6.x")	// Mac Os
		if (mlBrStr.indexOf('mac')==-1){	
			BrouX = 3;
		}else{
			BrouX = 5;
		}
	}
}

function BrowserXObj(mlObj){
	if (document.all){
		mlObjX = document.all[mlObj];
	}else {
		if (document.layers){
		}else{
	   		mlObjX = document.getElementById(mlObj);
		}
	}
	return mlObjX;
}
function KeyPrece(evt){
	evt = (evt) ? evt : event;
	if (evt){
	// Ctrl + K
		if (evt.ctrlKey && evt.keyCode == 75){
			if (BrouX == 1){
				TextError = document.selection.createRange();
			}else{
				TextError = window.getSelection();
			}
			MesError();
			// запрет передачи события mousemove далее...
			evt.cancelBubble = true;
		}else{
		  if (evt.ctrlKey && evt.keyCode == 37){
			mlHerf="";
			if(document.getElementById("PageLink_P") != null){mlHerf = "PageLink_P";}
			if(document.getElementById("PageLink_PAn") != null){mlHerf = "PageLink_PAn";}
			location.href = (mlHerf==="")? location.href : document.getElementById(mlHerf);
		  }else{
		  	if (evt.ctrlKey && evt.keyCode == 39){
			  mlHerf="";
			  if(document.getElementById("PageLink_N") != null){mlHerf = "PageLink_N";}
			  if(document.getElementById("PageLink_NAn") != null){mlHerf = "PageLink_NAn";}
			  location.href = (mlHerf==="")? location.href : document.getElementById(mlHerf);
		    }
		  }
		}
	}
}

function KeyEvent(){
	// события модели W3C
	if(document.body && document.body.addEventListener){	
		document.addEventListener("keydown", KeyPrece, true);
	}else{
		document.onkeydown=KeyPrece;
	}
}

// Тени для окон Блок №1
if (BrouX != 1){
	var schadow_block1_1 = '<tr><td valign="bottom" width="20" height="20"><img src="../../../../sys/png/'+iFiBgColor+'ugol_verh_lev.png" width="20" height="20"></td>';
	var schadow_block1_2 = '<td valign="top" width="100%" height="20"><table align="center" width="100%" border="0" cellpadding="0" cellspacing="0"><tr>'+
	'<td valign="bottom"  height="20"><img src="../../../../sys/png/'+iFiBgColor+'verh_vertikal.png" width="100%" height="20"></td>';
	var schadow_block1_2_2 = '<td valign="bottom" height="20"><img src="../../../../sys/png/'+iFiBgColor+'verh_vertikal.png" width="100%" height="20"></td>';
	var schadow_block1_2_3 = '<td valign="bottom"  width="120" height="20"><img src="../../../../sys/png/'+iFiBgColor+'verh_vertikal.png" width="100%" height="20"></td>'+
	'</tr></table></td>';
	var schadow_block1_3 = '<td valign="bottom" width="20" height="20"><img src="../../../../sys/png/'+iFiBgColor+'ugol_verh_prav.png" width="20" height="20"></td></tr>'+
	'<tr><td align="left" valign="top" width="20" height="100%"><img src="../../../../sys/png/'+iFiBgColor+'lev_goriz1.png" width="20" height="100%"></td>';
	var schadow_block2_1 = '<td valign="top" width="20" height="100%"><img src="../../../../sys/png/'+iFiBgColor+'prav_goriz1.png" width="20" height="100%"></td></tr>'+
'<tr><td valign="top" width="20" height="20"><img src="../../../../sys/png/'+iFiBgColor+'ugol_niz_lev.png" width="20" height="20"></td>';
	var schadow_block2_2 = '<td><table align="center" width="100%" border="0" cellpadding="0" cellspacing="0"><tr>'+
'<td><img src="../../../../sys/png/'+iFiBgColor+'niz_vertikal.png" width="100%" height="20"></td>'+
'<td><img src="../../../../sys/png/'+iFiBgColor+'niz_vertikal.png" width="100%" height="20"></td>'+
'<td><img src="../../../../sys/png/'+iFiBgColor+'niz_vertikal.png" width="100%" height="20"></td>'+
'</tr></table></td>';
	var schadow_block2_3 = '<td valign=top width="20" height="20"><img src="../../../../sys/png/'+iFiBgColor+'ugol_niz_prav.png" width="20" height="20"></td></tr>';

}else{

	var schadow_block1_1 = '<tr><td valign="bottom" width="20"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'ugol_verh_lev.png\',sizingMethod=\'scale\');" width="20" height="20"></td>';
	var schadow_block1_2 = '<td valign="top">'+
	'<table align="center" width="100%" border="0" cellpadding="0" cellspacing="0"><tr>'+
	'<td valign="bottom"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'verh_vertikal.png\',sizingMethod=\'scale\');" width="100%" height="20"></td>';
	var schadow_block1_2_2 = '<td valign="bottom" width="31"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'verh_vertikal.png\',sizingMethod=\'scale\');" width="100%" height="20"></td>';
	var schadow_block1_2_3 = '<td valign="bottom" width="120"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'verh_vertikal.png\',sizingMethod=\'scale\');" width="100%" height="20"></td>'+
	'</tr></table></td>';
	var schadow_block1_3 = '<td valign="bottom" width="20"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'ugol_verh_prav.png\',sizingMethod=\'scale\');" width="20" height="20"></td></tr>'	+
	'<tr><td align="left" valign="top" width="20" height="100%"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'lev_goriz1.png\',sizingMethod=\'scale\');" width="20" height="100%"></td>';
	var schadow_block2_1 = '<td valign="top" width="20" height="100%"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'prav_goriz1.png\',sizingMethod=\'scale\');" width="20" height="100%"></td></tr>'+
'<tr><td valign="top" width="20" height="20"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'ugol_niz_lev.png\',sizingMethod=\'scale\');" width="20" height="20"></td>';
	var schadow_block2_2 = '<td>'+
'<table align="center" width="100%" border="0" cellpadding="0" cellspacing="0"><tr>'+
'<td><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'niz_vertikal.png\',sizingMethod=\'scale\');" width="100%" height="20"></td>'+
'<td><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'niz_vertikal.png\',sizingMethod=\'scale\');" width="100%" height="20"></td>'+
'<td><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'niz_vertikal.png\',sizingMethod=\'scale\');" width="100%" height="20"></td>'+
'</tr></table></td>';
var schadow_block2_3 = '<td valign=top width="20" height="20"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/'+iFiBgColor+'ugol_niz_prav.png\',sizingMethod=\'scale\');" width="20" height="20"></td></tr>';
}

function creatWindow(innerHTML_, SizeWinWidth, SizeWinHeight, onScroll, Prop, posx, posy, Type_){
	return;

    if(typeof posx=="undefined"){posx = false;}
	if(typeof onScroll=="undefined"){onScroll = true;}
	if(typeof innerHTML_=="undefined"){innerHTML_ = "&nbsp;";}
	if(typeof SizeWinWidth=="undefined"){SizeWinWidth = 100;}
	if(typeof SizeWinHeight=="undefined"){SizeWinHeight = 100;}
	if(typeof Type_=="undefined"){Type_ = 1;}	// 1-стандартное окно 2-окно типа меню 3-модальное окно
	mlHeightPlus=40; mlWidthPlus=40; mlHPlus0=0;
	// имя окна
	if(Prop.IdWindowDiv){
		defaultIDDiv = Prop.IdWindowDiv;
	}else{
		defaultIDDiv = 'windowsys';
	}
	// прерывание ситемы (id: "порядковый номер",idIRQ: системный код IRQ)
	if(Prop.IRQ_){
		SWizard_IRQ[Prop.IRQ_.id].active = 1;
		SWizard_IRQ[Prop.IRQ_.id].IDIRQ = Prop.IRQ_.idIRQ;
	}
	ObjW_0 = BrowserXObj(defaultIDDiv);

	ObjW_0.Type = Type_;
	ObjW_0.Prop_ = Prop;
	if(Type_==2){
		posx=(posx-9);	posy=(posy-7);
		mlStBL1 = schadow_block1_1.indexOf("ugol_verh_lev.png");
		if (mlStBL1){
			mlSchadow_block1 = schadow_block1_1.substr(0,mlStBL1) + iFiBgColor + "ugol_verh_lev_.png" + schadow_block1_1.substr((mlStBL1+17));
		}	
	}else{
		mlSchadow_block1 = schadow_block1_1;
	}
	// кнопка закрытия окна
	if(ObjW_0.Prop_.ButCloseWin){
		if(ObjW_0.Prop_.ButCloseWin == true){
		innerHTML_ = '<table width="100%" height="22" border="0" cellpadding="0" cellspacing="0">'+
		'<tr><td bgcolor="#FF8F0E" height="22" align="right">'+
		'<a onclick="offWindow_(\''+defaultIDDiv+'\');" style="cursor:pointer; padding-right: 5px;">'+
		'<img src="../../../../sys/gif/xpect.gif"></a></td></tr></table>'+	
		innerHTML_;
		mlHPlus0 = 22;
		}
	}	
	if(posx){}else{
		posx = ((document.body.clientWidth)-(SizeWinWidth+mlWidthPlus))/2; 
		posy = ((document.body.clientHeight)-(SizeWinHeight+mlHeightPlus+mlHPlus0))/2;
		if(posy>100){posy=100;}
	}
	if(Prop.Arrow_){
		schadow_block1_2_2 = Prop.Arrow_;
	}
	// Выравнивание по центру блокировка объектов HTML страницы
	mlBlock1 = '<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"><tr><td>';
	mlBlock2 = "</td></tr></table>";

ObjW_0.innerHTML = mlBlock1+
'<div id="windowframe" '+
'style="left: '+posx+'px; top: '+posy+'px; width: '+SizeWinWidth+'px; height: '+(SizeWinHeight+mlHPlus0+mlWidthPlus)+'px; '+
'z-index: 6; position: absolute;">'+
'<table width="'+SizeWinWidth+'" height="'+(SizeWinHeight+mlHPlus0+mlHeightPlus)+'" border="0" cellpadding="0" cellspacing="0">'+ mlSchadow_block1+schadow_block1_2+schadow_block1_2_2+schadow_block1_2_3+schadow_block1_3+'<td bgcolor='+WbgColor+'>'+innerHTML_+'</td>'+
schadow_block2_1+schadow_block2_2+schadow_block2_3+"</table>"+
'</div>'+mlBlock2;

	ObjW_0.Prop_.Close = 0;
	ObjW_0.style.width = document.body.clientWidth;	// ширина HTML страницы
	if(onScroll){	
		// Исключаем передергивание окна
		ObjW_0.style.top= document.body.scrollTop;
		ObjW_0.style.left= document.body.scrollLeft;
		ObjW_0.style.height = document.body.clientHeight;
	}else{
		ObjW_0.style.top="0px";
		ObjW_0.style.left="0px";
		// PosiMes = positionObj("EndHtml"); - в коде функция отсутсвует
		//ObjW_0.style.height = PosiMes.Top;	// высота HTML страницы
		ObjW_0.style.height = document.body.clientHeight;	// высота HTML страницы
	}
	// свойство - загрузка окна в память с отображением или без
	if(typeof ObjW_0.Prop_.onLoad != "undefined" && ObjW_0.Prop_.onLoad== false){return;}
	// исправление глюка с Selectom+Flash
	seekSelect_off();
	// свойство - перевод фокуса на объект в окне
	ObjW_0.style.display = "block";
	if(ObjW_0.Prop_.ObjFocus){document.getElementById(ObjW_0.Prop_.ObjFocus).focus();}
	// Режим слежения за скролингом в Браузере
	 if(onScroll){setTimeout("pos_l('"+defaultIDDiv+"')",200);}
}

// Опрос размещения окна (сообщения) в пространстве
function pos_l(NamObj){
	ObjMes = BrowserXObj(NamObj);
	ObjMes.style.top= document.body.scrollTop;
	ObjMes.style.left= document.body.scrollLeft;
	if(ObjMes.Prop_.Close==1){
		return;
	}else{
		setTimeout("pos_l('"+NamObj+"')",200);
	}
}

// Отключение опроса размещения окна в пространстве
function offWindow_(NamObj, UserClick){
	if(typeof UserClick == "undefined"){UserClick == false;}
	ObjWin = BrowserXObj(NamObj);
	ObjWin.style.display="none";
	ObjWin.Prop_.UserClickValue = UserClick;
	ObjWin.Prop_.Close=1;
	if(typeof ObjWin.Prop_.onLoad == "undefined" || ObjWin.Prop_.onLoad == true){seekSelect_off();}
	// если пользователь просто нажал геде нибудь на блокировке объектов HTML страницы,
	// то необходимо попробывать передовать фокус, но только не при активном модальном окне
	if(typeof ObjWin.Prop_.IRQ_!="undefined" && SWizard_IRQ[ObjWin.Prop.IRQ_.id].active == 1){
		IRQ_Event(SWizard_IRQ[ObjWin.Prop.IRQ_.id].IDIRQ, UserClick);
	}
}

// Отключение в IE объектов select
function seekSelect_off(){
  	ObjectAll = (document.all) ? document.all : document.getElementsByTagName("*");
	if(BrouX == 1){
		AllNodes = ObjectAll.length;
		for (ind = 0; ind  < AllNodes; ind++){
			if(ObjectAll[ind].getAttribute("options") || 
				(ObjectAll[ind].getAttribute("classid") && ObjectAll[ind].classid=="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000")){
				ObjBody = ObjectAll[ind];
				styleV = ObjStyle_("", "visibility", "visibility", ObjBody);
				if(ObjBody.disabled == true && styleV=='hidden'){
					ObjBody.style.visibility = 'visible';
					ObjBody.disabled = false;
				}else{
					if(ObjBody.disabled == false && styleV != 'hidden'){
						ObjBody.style.visibility = 'hidden';
						ObjBody.disabled = true;
					}
				}
			}
		}
	}else{
		AllNodes = ObjectAll.length;
		for (ind = 0; ind  < AllNodes; ind++){
			if(ObjectAll[ind].tagName == "OBJECT"){
				ObjBody = ObjectAll[ind];
				Allchil = ObjectAll[ind].childNodes.length;
				for( l = 0; l  < Allchil; l++){
					if(BrouX == 4 || ObjectAll[ind].childNodes[l].src){
						styleV = ObjStyle_("", "visibility", "visibility", ObjBody);
						if( typeof ObjBody.disabled !="undefined" && ObjBody.disabled == true && styleV=='hidden'){
							ObjBody.style.visibility = 'visible';
							ObjBody.disabled = false;
						}else{
							if( (typeof ObjBody.disabled == "undefined" || ObjBody.disabled == false) && styleV != 'hidden'){
								ObjBody.style.visibility = 'hidden';
								ObjBody.disabled = true;
							}
						}
						break;
					}
					
				}
			}
		}
	}
}

// Определение значения стиля объекта
function ObjStyle_(ObjID, CSSStyle, IEStyle, linkObj){
	if (typeof linkObj == "undefined") {
		Objfunc = document.getElementById(ObjID);
	}else{Objfunc = linkObj;}	
	if(Objfunc.currentStyle){
		return Objfunc.currentStyle[IEStyle];
	}else{
		if(window.getComputedStyle){
			ObjStyle = window.getComputedStyle(Objfunc, "");
			return ObjStyle.getPropertyValue(CSSStyle);
		}
	}
	return "";
}


function Friend_(){
	mlLenAr = 44; if(BrouX == 4){mlLenAr = 46;} if(BrouX == 1){mlLenAr = 47;}
	mlStr = '<iframe id="bodysend" width="400" height="400" scrolling="No" frameborder="0" src="../../../../sys/mechan/messager/friend.html?link='+window.location.href+'"></iframe>';
	creatWindow(mlStr, WFheight, WFwidth, true, {ButCloseWin: true}, false, false, 3);
}

// var 
function Forum_(){
	mlLenAr = 44;
	if(BrouX == 4){mlLenAr = 46;}
	if(BrouX == 1){mlLenAr = 47;} 
	mlStr = '<table width="100%" height="22" border="0" bgcolor="#FF8F0E" cellpadding="0" cellspacing="0">'+
		'<tr><td  height="22" align="right">'+
		'<a onclick="offWindow_(\''+defaultIDDiv+'\');" style="cursor:pointer; padding-right: 5px;">'+
		'<img src="gif/xpect.gif" width="12" height="13" alt="" /></a></td></tr></table>'+
		'<iframe id="bodysend" width="470" height="400" scrolling="No" frameborder="0" src="../../../../forum_/?quick_forum"></iframe>';
	mlArrow_ =	(BrouX != 1)? '<td valign="bottom" width="31"><img src="../../../../sys/png/arrow.png"  width="31" height="50"></td>' : '<td valign="bottom" width="31"><img src="../../../../sys/gif/pix.gif" style = "filter: progid:DXImageTransform.Microsoft.AlphaImageLoader(src=\'../../../../sys/png/arrow.png\',sizingMethod=\'scale\');" width="31" height="50"></td>';
	creatWindow(mlStr, 480, 400, true, {IdWindowDiv: "forum_quick", Arrow_: mlArrow_ ,ButCloseWin: false}, 100, 30, 3);
}

function MesError(){
	mlLenAr = 44; if(BrouX == 4){mlLenAr = 46;} if(BrouX == 1){mlLenAr = 47;}
	mlStr = '<iframe id="s_bodysend" width="300" height="150" scrolling="No" frameborder="0" src="../../../../sys/mechan/messager/errors.html"></iframe>';
	creatWindow(mlStr, 320, 155, true, {ButCloseWin: true, onLoad: false}, 10, 10, 2);
}

function synterr(){
	if (BrouX == 1){
		document.frames["s_bodysend"].document.getElementById("s_link").value = document.location.href;
		document.frames["s_bodysend"].document.getElementById("s_text_err").value = TextError.text;
		document.frames["s_bodysend"].document.danni.submit();
	}else{
		document.getElementById("s_bodysend").contentWindow.document.getElementById("s_link").value = document.location.href;	document.getElementById("s_bodysend").contentWindow.document.getElementById("s_text_err").value = TextError;
		document.getElementById("s_bodysend").contentWindow.document.danni.submit();
	}
}
// Feedback
function proverka()
{
	// Имя
	ml_imya = new String(document.danni.imya.value);
	nullAr11 = new String(ml_imya.match(/[ ]*\S{3,}/ig));
	nullAr12 = new String(ml_imya.match(/\d+/ig));
	// Почтовый адрес
	ml_mail = new String(document.danni.mail.value);
	nullAr41 = new String(ml_mail.match(/^[a-z0-9\._-]{1,20}@(([a-z0-9-]+\.)+(com|net|org|mil|edu|gov|arpa|info|biz|inc|name|[a-z]{2})|[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})$/i));
    // Сообщение
	ml_message1 = new String(document.danni.message1.value);
	nullAr31 = new String(ml_message1.match(/\S{4,}/ig));

	if(nullAr11 == "null" || nullAr12 != "null" || nullAr31 == "null" || nullAr41 == "null")
	{
		mlAlert = "Ошибка заполнения полей! \r\n Перечень полей:";
		if (nullAr11 == "null" || nullAr12 != "null"){
		 mlAlert += "\r\n - 'Имя'";
		}
		if (nullAr41 == "null"){
		 mlAlert += "\r\n - 'Почтовый адрес'";
		}
		if (nullAr31 == "null"){
		 mlAlert += "\r\n - 'Сообщение'";
		}
		alert (mlAlert);
		return;
	}
	// alert("Данные верны!");
	document.danni.submit();
}
var NameForm_ = "danni";

function type_object(ml_StrObj,ReaWri,Value_){
	if(document.getElementById(ml_StrObj) == null){return false;}
	if(typeof ReaWri == "undefined"){ReaWri="1";}
	switch(document.getElementById(ml_StrObj).type){
	case "hidden": 
		return (ReaWri==1) ? document.getElementById(ml_StrObj).value : document.getElementById(ml_StrObj).value=Value_ ; break;
	case "text": 
		return (ReaWri==1) ? document.getElementById(ml_StrObj).value : document.getElementById(ml_StrObj).value=Value_ ; break;
	case "radio": 
		return (ReaWri==1) ? get_radiobox(ml_StrObj) : set_radiobox(ml_StrObj,Value_);	break;
	case "select-one": 
		ObjSel = document.getElementById(ml_StrObj);
		return (ReaWri==1) ? ObjSel.options[ObjSel.selectedIndex].value : ""; break;
	case "select-multiple": break;
	case "checkbox":
		return (ReaWri==1) ? ((document.getElementById(ml_StrObj).checked)? 1 : 0) : document.getElementById(ml_StrObj).checked = (Value_==1)? true : false;	break;
	case "textarea":
		return (ReaWri==1) ? document.getElementById(ml_StrObj).value : document.getElementById(ml_StrObj).value=Value_ ; break;
	}
	return false;
}
function get_radiobox(ml_StrObj, This_){
	mlObj = document.getElementById(ml_StrObj);
	// document.forms[mlObj.form].elements[ml_StrObj];
	Vibor_box = (ml_StrObj=="")? This_ : mlObj.form.elements[ml_StrObj];	ar_count = Vibor_box.length;
	// document.danni.elements[ml_StrObj]
	for(i = 0; i < ar_count; i++){
		if(Vibor_box[i].checked){return Vibor_box[i].value;}
	}
	return -1;
}