function VBTcalculator()
	{
		var buf = document.getElementById('truba').value;
		var sep = buf.indexOf(':');
		var D_INT = buf.substr(0, sep);
		sep = sep+1;
		var A_kelly = buf.substr(sep, buf.length-sep);		
		var sep = A_kelly.indexOf('Ê');		
		if (sep == -1)
		{
			var sep = A_kelly.indexOf('Ø');
			var ch1="Ø";
		}
		else var ch1="Ê";
		if (sep != -1)
		{
			A_kelly = A_kelly.substr(0, sep);
			var A_kelly_orig = A_kelly+ch1;
			var Length = document.getElementById('VBTdlinat').value;
			Length = replace_string(Length, ',', '.');			
			var Length_ = document.getElementById('VBTinD3').value;					
			if (Length_==2)
				{Length=Math.round(conv(Length)*304.84);}			
			var REZBA_BOX = document.getElementById('VBTrezba').value;
			var REZBA_PIN = document.getElementById('typerezba').value;
			if (ch1 == "Ø")
				return IS_K_HEX(A_kelly_orig,D_INT,Length,REZBA_BOX,REZBA_PIN);
			else if (ch1 == "Ê")
				return IS_K_SQU(A_kelly_orig,D_INT,Length,REZBA_BOX,REZBA_PIN);
		}
	}
	
function IS_K_HEX(A_kelly,D_int,Length,Rezba_box,Rezba_pin){

var D=146.1;
var mrez=9.12;
var L1=150.6;
if(Rezba_box=='6.5/8"REG LH'){
        D=196.9;
        mrez=17.9;
        L1=161.2;
}

var m1=0.797*(Math.pow(10,-3))*3.14159*Math.pow(D,2)-mrez;
var D_box=D;
var L_box=L1;

        var L_pin=0;
        var r=0;
        var r1=0;
        var D_pin=0;

if(Rezba_pin=='NC26'){
        L_pin=76.2;
        r=33.9;
        r1=30.2;
        D_pin=95.3;
		}
if(Rezba_pin=='NC31'){
        L_pin=88.9;
        r=40.4;
        r1=35.6;
        D_pin=104.8;
		}
if(Rezba_pin=='NC38'){
        L_pin=101.6;
        r=48.4;
        r1=42.5;
        D_pin=120.7;
		}
if(Rezba_pin=='NC40'){
        L_pin=114.3;
        r=51.7;
        r1=44.9;
        D_pin=136.5;
		}
if(Rezba_pin=='NC46'){
        L_pin=114.3;
        r=58.7;
        r1=51.8;
        D_pin=158.8;
		}
if(Rezba_pin=='NC50'){
        L_pin=114.3;
        r=64;
        r1=57.1;
        D_pin=161.9;
		}
if(Rezba_pin=='NC56'){
        L_pin=127;
        r=71.3;
        r1=58.7;
        D_pin=177.8;
		}
if(Rezba_pin=='5.1/2"FH'){
        L_pin=127;
        r=71;
        r1=63.4;
        D_pin=177.8;
		}
if(Rezba_pin=='6.5/8"FH'){
        L_pin=127;
        r=82.8;
        r1=75;
        D_pin=203.2;
		}

var m2=udves*pi*(((Math.pow(D_pin,2))/4)*(508-L_pin)+L_pin/3*((Math.pow(r,2))+(Math.pow(r1,2))+r*r1));
if(A_kelly=='89Ø'){
        var A=88.9;
        var Dcc=100;
		}
if(A_kelly=='108Ø'){
        var A=108;
        var Dcc=121.44;
		}
if(A_kelly=='133Ø'){
        var A=133.4;
        var Dcc=149.86;
		}
if(A_kelly=='152Ø'){
        var A=152.4;
        var Dcc=173.02;
		}


var m3=udves*(3.464*(Math.pow(A,2))/4-1.5*Math.tan(60/180*pi)*(Math.pow((1.155*A-Dcc),2)))*(Length-1045);

var m4=udves*pi*(((Math.pow(D_box,2)+Math.pow(Dcc,2)+D_box*Dcc)/4)*(D_box-Dcc)/6+((Math.pow(Dcc,2))/4)*(96-(D_box-Dcc)/2));

var m5=udves*pi*(((Math.pow(D_pin,2)+Math.pow(Dcc,2)+D_pin*Dcc)/4)*(D_pin-Dcc)/6+((Math.pow(Dcc,2))/4)*(35-(D_pin-Dcc)/2));

var m6=udves*pi*(Math.pow(D_int,2))/4*(Length-L_box);

var m=m1+m2+m3+m4+m5-m6;
m=Math.round(m);
return m;
}


function IS_K_SQU(A_kelly,D_int,Length,Rezba_box,Rezba_pin){

var D=146.1;
var mrez=9.12;
var L1=150.6;
if(Rezba_box=='6.5/8"REG LH'){
        D=196.9;
        mrez=17.9;
        L1=161.2;
}

var m1=0.797*(Math.pow(10,-3))*pi*Math.pow(D,2)-mrez;
var D_box=D;
var L_box=L1;

        var L_pin=0;
        var r=0;
        var r1=0;
        var D_pin=0;

if(Rezba_pin=='NC26'){
        L_pin=76.2;
        r=33.9;
        r1=30.2;
        D_pin=95.3;
		}
if(Rezba_pin=='NC31'){
        L_pin=88.9;
        r=40.4;
        r1=35.6;
        D_pin=104.8;
		}
if(Rezba_pin=='NC38'){
        L_pin=101.6;
        r=48.4;
        r1=42.5;
        D_pin=120.7;
		}
if(Rezba_pin=='NC40'){
        L_pin=114.3;
        r=51.7;
        r1=44.9;
        D_pin=136.5;
		}
if(Rezba_pin=='NC46'){
        L_pin=114.3;
        r=58.7;
        r1=51.8;
        D_pin=158.8;
		}
if(Rezba_pin=='NC50'){
        L_pin=114.3;
        r=64;
        r1=57.1;
        D_pin=161.9;
		}
if(Rezba_pin=='NC56'){
        L_pin=127;
        r=71.3;
        r1=58.7;
        D_pin=177.8;
		}
if(Rezba_pin=='5.1/2"FH'){
        L_pin=127;
        r=71;
        r1=63.4;
        D_pin=177.8;
		}
if(Rezba_pin=='6.5/8"FH'){
        L_pin=127;
        r=82.8;
        r1=75;
        D_pin=203.2;
		}

var m2=udves*pi*(((Math.pow(D_pin,2))/4)*(508-L_pin)+L_pin/3*((Math.pow(r,2))+(Math.pow(r1,2))+r*r1));

if(A_kelly=='76Ê'){
        var A=76.2;
        var B=101.2;
        var Dcc=98.43;
		}
if(A_kelly=='80Ê'){
        var A=80;
        var B=167.3;
        var Dcc=98.43;
		}
if(A_kelly=='89Ê'){
        var A=88.9;
        var B=225.7;
        var Dcc=112.7;
		}
if(A_kelly=='108Ê'){
        var A=108;
        var B=241.3;
        var Dcc=139.7;
		}
if(A_kelly=='112Ê'){
        var A=112;
        var B=349.3;
        var Dcc=139.7;
		}
if(A_kelly=='133Ê'){
        var A=133.4;
        var B=378.5;
        var Dcc=171.5;
		}
if(A_kelly=='140Ê'){
        var A=140;
        var B=614.5;
        var Dcc=171.5;
		}
if(A_kelly=='152Ê'){
        var A=152.4;
        var B=393;
        var Dcc=196.9;
		}
if(A_kelly=='155Ê'){
        var A=155;
        var B=552;
        var Dcc=196.9;
		}
var m3=udves*((Math.pow(A,2))-B)*(Length-1042);

var m4=udves*((Math.pow(D_box,2)+Math.pow(Dcc,2)+D_box*Dcc)/4*pi*(D_box-Dcc)/6+(Math.pow(Dcc,2))*pi/4*(83-(D_box-Dcc)/2));

var m5=udves*((Math.pow(D_pin,2)+Math.pow(Dcc,2)+D_pin*Dcc)/4*pi*(D_pin-Dcc)/6+(Math.pow(Dcc,2))*pi/4*(45-(D_pin-Dcc)/2));

var m6=udves*pi*(Math.pow(D_int,2))/4*(Length-L_box);

var m=m1+m2+m3+m4+m5-m6;
m=Math.round(m);
return m;
}

	
	function VBTechoSizes(result)
	{
		var obj1 = document.getElementById('truba');
		while(obj1.options.length > 0) 
			obj1.options[0] = null;		
		var i=0;		
		obj1.options[i] = new Option();
		obj1.options[i].text = "âûáðàòü";
		obj1.options[i].value = "0:0:0:0";
		var sep = result.indexOf('#');
		while (sep>0)
		{
			var buf = result.substr(0, sep);
			sep=sep+1;
			if (result.length>=sep)
				result = result.substr(sep, result.length-sep);
			var sep = result.indexOf('#');
			var sep2 = buf.indexOf(':');
			var buf1 = buf.substr(0, sep2);
			sep2 = sep2+1;
			var buf6 = buf.substr(sep2, buf.length-sep2);
			var sep2 = buf6.indexOf(':');			
			var buf2 = buf6.substr(0, sep2);
			sep2 = sep2+1;
			var buf6 = buf6.substr(sep2, buf6.length-sep2);			
			var sep2 = buf6.indexOf(':');
			var buf3 = buf6.substr(0, sep2);
			sep2 = sep2+1;
			var buf6 = buf6.substr(sep2, buf6.length-sep2);			
			var sep2 = buf6.indexOf(':');
			var buf4 = buf6.substr(0, sep2);
			sep2 = sep2+1;			
			var buf6 = buf6.substr(sep2, buf6.length-sep2);						
			var sep2 = buf6.indexOf(':');
			var buf5 = buf6.substr(0, sep2);
			sep2 = sep2+1;			
			var buf6 = buf6.substr(sep2, buf6.length-sep2);						
			var text = buf1+" "+rovno(buf3, 5)+" "+rovno(buf4, 14)+" "+rovno(buf5, 10)+" "+buf6;
			var val = buf2+":"+buf3+":"+buf4+":"+buf5+":"+buf6;
			i++;
			obj1.options[i] = new Option();
			obj1.options[i].text = text;
			obj1.options[i].value = val;
		}
	}
	function VBTSelectTruba(truba)
	{
		var type_prod = document.getElementById('TYPE_PROD').value;
		var sep = truba.indexOf(':');
		var buf1 = truba.substr(0, sep);
		sep = sep+1;
		var buf3 = truba.substr(sep, truba.length-sep);		
		var sep = buf3.indexOf(':');		
		var buf2 = buf3.substr(0, sep);				
		sep = sep+1;
		var buf3 = buf3.substr(sep, buf3.length-sep);				
		var sep = buf3.indexOf(':');
		var buf3 = buf3.substr(0, sep);				
		document.getElementById('VBTinD3').value="1";
		JsHttpRequest.query('vbtpins.php',{rezba: buf3, type_prod: type_prod}, 
		function(result, errors) {VBTSelectTrubaShow(result, truba);}, true);
	}
	function HWSelectTruba(truba)
	{
		document.getElementById('HWinD').value="1";
		document.getElementById('HWboxD').value="1";			
		document.getElementById('HWinD2').value="1";			
		document.getElementById('HWinD3').value="1";						
		var sep = truba.indexOf(':');
		var buf1 = truba.substr(0, sep);
		sep = sep+1;
		var truba = truba.substr(sep, truba.length-sep);
		var sep = truba.indexOf(':');
		var buf2 = truba.substr(0, sep);
		sep = sep+1;
		var truba = truba.substr(sep, truba.length-sep);
		var sep = truba.indexOf(':');
		var buf3 = truba.substr(0, sep);
		sep = sep+1;
		var truba = truba.substr(sep, truba.length-sep);
		var sep = truba.indexOf(':');
		var buf4 = truba.substr(0, sep);
		sep = sep+1;
		var buf5 = truba.substr(sep, truba.length-sep);		
		document.getElementById('HWD').value = buf1;
		document.getElementById('HWbox').value = buf2;
		document.getElementById('HWD2').value = buf3;
		document.getElementById('HWrezba').value = buf4;
		document.getElementById('HWdlinat').value = buf5;
		HWcalculator();		
	}
	function VBTSelectTrubaShow(result, truba)
	{
		var sep = truba.indexOf(':');
		var buf1 = truba.substr(0, sep);
		sep = sep+1;
		var buf5 = truba.substr(sep, truba.length-sep);		
		var sep = buf5.indexOf(':');		
		var buf2 = buf5.substr(0, sep);	
		sep = sep+1;		
		var buf5 = buf5.substr(sep, buf5.length-sep);				
		var sep = buf5.indexOf(':');		
		var buf3 = buf5.substr(0, sep);	
		sep = sep+1;		
		var buf5 = buf5.substr(sep, buf5.length-sep);				
		var sep = buf5.indexOf(':');		
		var buf4 = buf5.substr(0, sep);	
		sep = sep+1;		
		var buf5 = buf5.substr(sep, buf5.length-sep);				
		document.getElementById('VBTrezba').value = buf3;
		document.getElementById('VBTdlinat').value = buf5;
		var obj1 = document.getElementById('typerezba');
		while(obj1.options.length > 0) 
			obj1.options[0] = null;		
		var i=0;		
		obj1.options[i] = new Option();
		obj1.options[i].text = "âûáðàòü";
		obj1.options[i].value = "0";
		var sep = result.indexOf('#');		
		while (sep>0)
		{
			var buf = result.substr(0, sep);
			sep=sep+1;
			if (result.length>=sep)
				result = result.substr(sep, result.length-sep);
			var sep = result.indexOf('#');
			i++;
			obj1.options[i] = new Option();
			obj1.options[i].text = buf;
			obj1.options[i].value = buf;
		}
		document.getElementById('typerezba').value = buf4;		
		VBTcalculator();				
	}

	function HWSpiral(D_centr,L_centr)
	{
		if(D_centr<=152.4)
		{
			s=965;
			h=5.6;
		}
		if(D_centr>152.4)
		{
			s=1065;
			h=7.1;
		}
		M=11.775*(Math.pow(10,-6))*(0.5*D_centr*Math.sqrt(4*h*(D_centr-h)+16/3*(Math.pow(h,2)))-2*Math.sqrt(h*(D_centr-h))*(0.5*D_centr-h))*(L_centr-150)/s*Math.sqrt((Math.pow((3.14159*D_centr),2))+(Math.pow(s,2)));
		return M;
	}
	
	function HWcalculator()
	{
		var D_ext = document.getElementById('HWD').value;		
		D_ext = replace_string(D_ext, ',', '.');
		var D_ext_ = document.getElementById('HWinD').value;				
		if (D_ext_==2)
			{D_ext=res=mm(D_ext);}
		var D_box = document.getElementById('HWbox').value;		
		D_box = replace_string(D_box, ',', '.');
		var D_box_ = document.getElementById('HWboxD').value;				
		if (D_box_==2)
			{D_box=res=mm(D_box);}
		var Length = document.getElementById('HWdlinat').value;
		Length = replace_string(Length, ',', '.');			
		var Length_ = document.getElementById('HWinD3').value;					
		if (Length_==2)
			{Length=Math.round(conv(Length)*304.84);}			
		D_int = document.getElementById('HWD2').value;		
		D_int = replace_string(D_int, ',', '.');				
		var D_int_ = document.getElementById('HWinD2').value;		
		if (D_int_==2)
			{D_int=res=mm(D_int);}
		var Rezba_ = document.getElementById('HWrezba').value;
		var M_bb = Bar(D_ext, Length) - Bar(D_int, Length);		
		var buf = document.getElementById('TYPE_PROD');
		
		var Typ_ = buf.value;
		L_box=535;
		L_pin =686;
		if (Typ_=='III') var L_centr=6500;
		if (Typ_=='II') var L_centr=1220;
		if (Typ_=='I') var L_centr=610;
		Lp=0;
		if (Rezba_!="")
		{
			if (D_box<=121) Lp=101.6;
			if (D_box>121 && D_box<=175) Lp=114.3;
			if (D_box>=175) Lp=127;
		}
		if (D_box<=121)
           D_centr = 101.6;
		if ((D_box>121) && (D_box<=134))
           D_centr = 114.3;
		if ((D_box>134) && (D_box<=159))
           D_centr = 127.0;
		if ((D_box>159) && (D_box<=166))
           D_centr = 139.7;
		if ((D_box>166) && (D_box<=169))
		{
			if (D_int<88) 
				D_centr = 139.7;
			else D_centr = 152.4;
		}
		if ((D_box>169) && (D_box<=178))
           D_centr = 152.4; 
		if ((D_box>178) && (D_box<=185))
           D_centr = 152.4;
	    if ((D_box>185) && (D_box<=204))
           D_centr = 177.8;
		if (D_box>205)
           D_centr = 184.2;

		if (D_centr<=102)
			D2_hw=92.1;
		if ((D_centr>102) && (D_centr<=115))
			D2_hw=104.8;
		if ((D_centr>115) && (D_centr<=128))
			D2_hw=117.5;
		if ((D_centr>128) && (D_centr<=140))
			D2_hw=130.2;
		if ((D_centr>140) && (D_centr<=153))
			D2_hw=144.5;
		if ((D_centr>153) && (D_centr<=178))
			D2_hw=171.5;
		if (D_centr>178)
			D2_hw=171.5;
		
		M=(Math.pow(D_box,2))/4*(L_box+L_pin-Lp)+(Math.pow(D_centr,2))/4*L_centr+(Math.pow(D_ext,2))/4*(Length-L_box-L_pin-L_centr-(D_centr-D_ext)/Math.tan(18/180*3.14159)-550);
		M=M+((D_centr-D_ext)*((Math.pow(D_centr,2))+(Math.pow(D_ext,2))+D_ext*D_centr)+(D_box-D2_hw)*((Math.pow(D_box,2))+(Math.pow(D2_hw,2))+D_box*D2_hw))/(12*Math.tan(18/180*3.14159));
		M=M+(Math.pow(D2_hw,2))/2*(275-(D_box-D2_hw)/(2*Math.tan(18/180*3.14159)))-(Math.pow(D_int,2))/4*Length;
		M=M*3.14159*7.85*Math.pow(10,-6);

		if (Typ_=='III') M=M-HWSpiral(D_centr,L_centr);
		M=Math.round(M);
		return M;			
	}