var BASEURL;
BASEURL="http://nrv.jinr.ru/nrv/webnrv/";
var CE=new Array("n","H","He","Li","Be",
"B","C","N","O","F","Ne","Na","Mg","Al","Si",
"P","S","Cl","Ar","K","Ca","Sc","Ti","V","Cr",
"Mn","Fe","Co","Ni","Cu","Zn","Ga","Ge","As","Se",
"Br","Kr","Rb","Sr","Y","Zr","Nb","Mo","Tc","Ru",
"Rh","Pd","Ag","Cd","In","Sn","Sb","Te","I","Xe",
"Cs","Ba","La","Ce","Pr","Nd","Pm","Sm","Eu","Gd",
"Tb","Dy","Ho","Er","Tm","Yb","Lu","Hf","Ta","W",
"Re","Os","Ir","Pt","Au","Hg","Tl","Pb","Bi","Po",
"At","Rn","Fr","Ra","Ac","Th","Pa","U","Np","Pu",
"Am","Cm","Bk","Cf","Es","Fm","Md","No","Lr","Rf",
"Db","Sg","Bh","Hs","Mt","Ds","Rg","Cn","[113]","Fl",
"[115]","Lv","[117]","[118]","[119]","[120]",
"[121]","[122]","[123]","[124]","[125]","[126]",
"[127]","[128]","[129]","[130]");

function get_cookie(name){
cookie_name = name + "=";
cookie_length = document.cookie.length;
cookie_begin = 0;
while (cookie_begin < cookie_length) {
	value_begin = cookie_begin + cookie_name.length;
	if (document.cookie.substring(cookie_begin, value_begin) == cookie_name){
		var value_end = document.cookie.indexOf (";", value_begin);
		if (value_end == -1) value_end = cookie_length;
		return unescape(document.cookie.substring(value_begin, value_end));
	}
	cookie_begin = document.cookie.indexOf(" ", cookie_begin) + 1;
	if (cookie_begin == 0) break;
}
return null;
}

function check_value(min,max,type,def,varname,redraw) {
// type 0-int, 1-float
// redraw 1-redraw_applet();
var w,v;
v="w="+varname+".value";
eval(v);
if (isNaN(w)) w=def; else if (w=="") w=def;
if (w<min) w=min;
if (w>max) w=max;
if (type==0) w=Math.floor(w);
//v="document.f1."+varname+".value=w";
v=varname+".value=w";
eval(v);
draw_main();
}

function change_projectile(zname,aname,picname,whatchanged) {
var a,u,s,z,v,res;
c=document.f1;
d=document;
// Находим z
v="z="+zname+".selectedIndex;"; eval(v);
// Находим a
v="a="+aname+".selectedIndex;"; eval(v); a=1*a+1;
// Проверяем все ли в норме
if (whatchanged==0) {
  a=Math.round(2*z+6.38e-3*z*z);
}
else {
  if (z>a) z=Math.round(a/2);
}
// Присваиваем z
v=zname+".selectedIndex=z;"; eval(v);
// Присваиваем a
v=aname+".selectedIndex=a-1;"; eval(v);
// Меняем картинку
v=picname+".src='"+BASEURL+"common/show_pic.php?Z="+z+"&A="+a+"';"; eval(v);
v=picname+".width=10;"; eval(v);
v=picname+".height=10;"; eval(v);
// Находим спин основного состояния и четность, а также информацию по энергиям
//document.IF.location.href="http://nrv.jinr.ru/nrv/webnrv/beta_decay/read_data.php?Z="+z+"&A="+a;
document.getElementById('MyFrame1').src="http://nrv.jinr.ru/nrv/webnrv/beta_decay/read_data.php?Z="+z+"&A="+a;
s=parent.document.getElementById('n1');
s.innerHTML="<sup>"+a+"</sup>"+CE[1*z+1];
s=parent.document.getElementById('n2');
s.innerHTML="<sup>"+a+"</sup>"+CE[z-1];
s=parent.document.getElementById('n0');
s.innerHTML="<sup>"+a+"</sup>"+CE[z];

def_values(aname,zname);
def_check_gsTOgs();
draw_main();
}

function def_values(aname,zname) {
	document.f1.T01.value=5.7; 	document.f1.T02.value=7.5;
	document.f1.T11.value=5.7; 	document.f1.T12.value=7.5;
	document.f1.T21.value=12.1; 	document.f1.T22.value=8.5;
	document.f1.T31.value=11.7; 	document.f1.T32.value=18.2;
	document.f1.T41.value=22.7; 	document.f1.T42.value=15.2;

	var A,Z,delta,v;
	c=document.f1;
	d=document;
	// ϟаϺϟϟиϟ z
	v="Z="+zname+".selectedIndex;"; eval(v);
	// ϟаϺϟϟиϟ a
	v="A="+aname+".selectedIndex;"; eval(v); A=1*A+1;

	delta = Math.abs(A - 2.0*Z);
	if(delta<3)
	{
	  document.f1.T01.value=3.5;
	  document.f1.T11.value=3.5;
	}
	else if(delta<10)
	{
	  document.f1.T01.value=Math.round((3.5 + 1.2*Math.sin(3.14159*(delta-2.0)/16.0)*Math.sin(3.14159*(delta-2.0)/16.0))*100.)/100;
	  document.f1.T11.value=Math.round((3.5 + 1.2*Math.sin(3.14159*(delta-2.0)/16.0)*Math.sin(3.14159*(delta-2.0)/16.0))*100.)/100;
	}
	else
	{
	  document.f1.T01.value=4.7;
	  document.f1.T11.value=4.7;
	}


	draw_main();
}

function init() {
for (i=0;i<130;i++) {
		var newOpt=document.f1.Z.appendChild(document.createElement('option'));
    newOpt.text=CE[i];
}
for (i=1;i<=300;i++) {
		var newOpt=document.f1.A.appendChild(document.createElement('option'));
    newOpt.text=i;
}
document.f1.Z.selectedIndex=22;
document.f1.A.selectedIndex=50;
def_values('document.f1.A','document.f1.Z');
change_projectile('document.f1.Z','document.f1.A','document.PIC',1);
show_hide(0,1);
show_hide(1,1);
show_hide(2,1);
}

function show_hide(a,b) {
	if ((a==0)&&(b==1)) {
		obj1=document.getElementById("a0"); obj1.style.display="block";
		obj2=document.getElementById("m0"); obj2.style.display="none";
		draw_applet(0); draw_main();
	}
	if ((a==0)&&(b==2)) {
		obj1=document.getElementById("a0"); obj1.style.display="none";
		obj2=document.getElementById("m0"); obj2.style.display="block";
	}
	if ((a==1)&&(b==1)) {
		obj1=document.getElementById("a1"); obj1.style.display="block";
		obj2=document.getElementById("m1"); obj2.style.display="none";
		draw_applet(1); draw_main();
	}
	if ((a==1)&&(b==2)) {
		obj1=document.getElementById("a1"); obj1.style.display="none";
		obj2=document.getElementById("m1"); obj2.style.display="block";
	}
	if ((a==2)&&(b==1)) {
		obj1=document.getElementById("a2"); obj1.style.display="block";
		obj2=document.getElementById("m2"); obj2.style.display="none";
		draw_applet(2); draw_main();
	}
	if ((a==2)&&(b==2)) {
		obj1=document.getElementById("a2"); obj1.style.display="none";
		obj2=document.getElementById("m2"); obj2.style.display="block";
	}
}

function draw_applet(p) {
if (p==0) { s=document.getElementById("a0"); line=document.f1.t0.value.split("\n"); }
else if (p==1) { s=document.getElementById("a1"); line=document.f1.t1.value.split("\n"); }
else { s=document.getElementById("a2"); line=document.f1.t2.value.split("\n"); }
res="<APPLET CODE=denikinpackage.Levels.class ARCHIVE=levels.jar WIDTH=250 HEIGHT=300>\n";
num=0; 
for (i=0;i<line.length;i++) {
	if (line[i].length>1) {
		str=line[i].split(" ");
		if (str.length==1) str[1]=" ";
		res=res+"<param name=P"+(1*num+1)+" value='"+str[0]+"|keV|"+str[1]+"|-1'>\n";
		num++;
	}
}
if (p==0) el=(1*document.f1.A.selectedIndex+1)+CE[document.f1.Z.selectedIndex*1];
else if (p==1) el=(1*document.f1.A.selectedIndex+1)+CE[document.f1.Z.selectedIndex*1+1];
else el=(1*document.f1.A.selectedIndex+1)+CE[document.f1.Z.selectedIndex*1-1];
res=res+"<param name=NUMBER value="+num+">\n"
	+"<param name=ID value='"+get_cookie('ID')+"'>\n"
	+"<param name=NAME value='"+el+"'>\n"
	+"</APPLET>\n";
//alert(res);
for (i=0;i<100000;i++) a=Math.sin(i);
s.innerHTML=res;
}

function getSpin(a) {
	// Например (5/2,3/2) дает 5, а 1+ дает 2
	// Удаляем скобки
	a=a.replace("(","");
	a=a.replace(")","");
	// Разбиваем по запятым
	b=a.split(",");
	c=b[0];
	// Удаляем четность + или -
	c=c.replace("+","");
	c=c.replace("-","");
	// Находим дробный спин или целый
	p=c.indexOf("/");
	if (p==-1) r=2*c; // Умножаем на два
	else r=c.substring(0,p);
//alert(r);
	// Возвращаем результат
	return(r);
}

function getParity(a) {
	// Например (5/2-,3/2) дает -1, а 1+ дает +1
	// Удаляем скобки
	a=a.replace("(","");
	a=a.replace(")","");
	// Разбиваем по запятым
	b=a.split(",");
	c=b[0];
	// Удаляем четность + или -
	p=c.indexOf("-");
	if (p==-1) return("1");
	else return("-1");
}
function getSpinmn(v) {
p=v.indexOf("/");
if (p==-1) return(2*v);
else return(v.substring(0,p));
}

function draw_main() {
if (!flag) {return; }
s=document.getElementById("main");
res="<APPLET CODE=BetaDecay.Image_test.class ARCHIVE=BetaDecay.jar WIDTH=800 HEIGHT=400>\n"
	+"<param name=ID value='"+get_cookie('ID')+"'>\n"
	+"<param name=A value='"+(document.f1.A.selectedIndex*1+1)+"'>\n"
	+"<param name=Z value='"+document.f1.Z.selectedIndex+"'>\n"
	//+"<param name=spin_mn value='"+document.f1.I.value+"'>\n"
	//+"<param name=parity_mn value='"+1*document.f1.P.value+"'>\n"
	+"<param name=Qbm value='"+document.f1.BM.value+"'>\n"
	+"<param name=Qbp value='"+document.f1.BP.value+"'>\n"
	+"<param name=Qec value='"+document.f1.EC.value+"'>\n"
	+"<param name=T value='"+document.f1.T.value+"'>\n"
	+"<param name=Int_betam value='"+document.f1.Int_betam.value+"'>\n"
	+"<param name=Int_betap value='"+document.f1.Int_betap.value+"'>\n";
//-- mather nuclei------
line1=document.f1.t0.value.split("\n");
str1=line1[0].split(" ");
if (str1.length>1) {
	if (str1[1].length>1) 
	{
		spin_MN=getSpin(str1[1]);
		parity_MN=getParity(str1[1]);
		res=res + "<param name=spin_mn value='"+spin_MN+"'>\n"
		        + "<param name=parity_mn value='"+1*parity_MN+"'>\n"
		
	}
}
//----------------------
// b+
line=document.f1.t2.value.split("\n");
num=0; w="";
for (i=0;i<line.length;i++) {
	str=line[i].split(" ");
	if (str.length>1) {
		if ((str[1].length>1)&&(1*str[0]<1*document.f1.EC.value)) {
			spin=getSpin(str[1]);
			parity=getParity(str[1]);
			w=w+str[0]+" "+spin+" "+parity+" ";
			num++;
		}
	}
}
res=res+"<param name=levels_beta_p value='"+w+"'>\n"+"<param name=n_levels_beta_p value="+num+">\n";
// b-
line=document.f1.t1.value.split("\n");
num=0; w="";
for (i=0;i<line.length;i++) {
	str=line[i].split(" ");
	if (str.length>1) {
		if ((str[1].length>1)&&(1*str[0]<1*document.f1.BM.value)) {
			spin=getSpin(str[1]);
			parity=getParity(str[1]);
			w=w+str[0]+" "+spin+" "+parity+" ";
			num++;
		}
	}
}
res=res+"<param name=levels_beta_m value='"+w+"'>\n"+"<param name=n_levels_beta_m value="+num+">\n";
res=res+"<param name=log_f0t value='"
	+document.f1.T01.value+" "+document.f1.T02.value+" "
	+document.f1.T11.value+" "+document.f1.T12.value+" "
	+document.f1.T21.value+" "+document.f1.T22.value+" "
	+document.f1.T31.value+" "+document.f1.T32.value+" "
	+document.f1.T41.value+" "+document.f1.T42.value+"'>\n";
if (document.getElementById('gs_to_gs').checked) document.getElementById('gs_to_gs').value=1; else document.getElementById('gs_to_gs').value=0;
res=res+"<param name=checkFlag value='"+document.getElementById('gs_to_gs').value+"'>\n"
res=res+"</APPLET>\n";
//alert(res);
s.innerHTML=res;
}

//----------------------------------------
function def_check_gsTOgs()
{
	document.getElementById("gs_to_gs").click();
	document.getElementById('gs_to_gs').checked=false;
	document.getElementById('gs_to_gs').value=0;
	document.f1.T12.disabled = false;
	document.f1.T21.disabled = false;
	document.f1.T31.disabled = false;
	document.f1.T41.disabled = false;
	document.f1.T02.disabled = false;
	document.f1.T22.disabled = false;
	document.f1.T32.disabled = false;
	document.f1.T42.disabled = false;
}
function check_gsTOgs(redraw) {
	var c = document.f1.querySelector('#gs_to_gs');
	c.onclick = function() {
	 if (c.checked) {
		 document.getElementById('gs_to_gs').value=1;
		 document.f1.T12.disabled = true;
		 document.f1.T21.disabled = true;
		 document.f1.T31.disabled = true;
		 document.f1.T41.disabled = true;
		 document.f1.T02.disabled = true;
		 document.f1.T22.disabled = true;
		 document.f1.T32.disabled = true;
		 document.f1.T42.disabled = true;
	 }
	 else{
		 document.getElementById('gs_to_gs').value=0;
		 document.f1.T12.disabled = false;
		 document.f1.T21.disabled = false;
		 document.f1.T31.disabled = false;
		 document.f1.T41.disabled = false;
		 document.f1.T02.disabled = false;
		 document.f1.T22.disabled = false;
		 document.f1.T32.disabled = false;
		 document.f1.T42.disabled = false;
	 }
	 draw_main();
	}	
}
//--------------------------------------------