function radio_aktiv(rn,a)
{	
	n=window.document.getElementsByName(rn).length;	 
	if(a==0) r=true; else r=false;
	for(i=0; i<n; i++) window.document.getElementsByName(rn)[i].disabled=r;	
}

function blok_aktiv(a){
	radio_aktiv('r6',a)
	radio_aktiv('r7',a)
	radio_aktiv('r9',a)
	radio_aktiv('r10',a)
}

function radio_value(i)
{
	rn="r"+i;
	n=window.document.getElementsByName(rn).length; 	
	r = 0;
	for(i=0; i < n; i++) {
		v = window.document.getElementsByName(rn)[i].checked;
		d = window.document.getElementsByName(rn)[i].disabled;
		if(v && !d) 
		{
			r = i+1;
			break;
		}
	}
	return 	r;
}

function radio_value_all(){
	erg="";
	for(i=1; i < 16; i++)
	{
		erg = erg + radio_value(i)+"#";
	}
    return erg;
}

function radio_aktiv(rn,a)
{	
	n=window.document.getElementsByName(rn).length;	 
	if(a==0) r=true; else r=false;
	for(i=0; i<n; i++) window.document.getElementsByName(rn)[i].disabled=r;	
}

function blok_aktiv(a){
	radio_aktiv('r6',a)
	radio_aktiv('r7',a)
	radio_aktiv('r9',a)
	radio_aktiv('r10',a)
}

function radio_value(i)
{
	rn="r"+i;
	n=window.document.getElementsByName(rn).length; 	
	r = 0;
	for(i=0; i < n; i++) {
		v = window.document.getElementsByName(rn)[i].checked;
		d = window.document.getElementsByName(rn)[i].disabled;
		if(v && !d) 
		{
			r = i+1;
			break;
		}
	}
	return 	r;
}
//----------------------------------------
function radio_value_str(rn){	
	
	var str_radio = "";
	n=window.document.getElementsByName(rn).length; 	
	for(i=0; i < n; i++) {
		v = window.document.getElementsByName(rn)[i].checked;
		d = window.document.getElementsByName(rn)[i].disabled;
		val = window.document.getElementsByName(rn)[i].value;
		if( i > 0 ) str_radio = str_radio + "~";
		if(v && !d)		
		{			
			str_radio = str_radio + val;			
		}
		
	}	
	return 	str_radio;
}
//----------------------------------------
function check_2_grupp_radio(r1,r2,n1,n2){	
	s1 = radio_value_str(r1);
	s1_array = s1.split("~");
	s2 = radio_value_str(r2);	
	s2_array = s2.split("~");	
	erg = false;
	
	m1 = s1_array.length; 
	m2 = s2_array.length; 

if(n1 == -1 && n2 == -1)
{	
	i1 = -1;	
	for(i=0; i < m1; i++) {		
		if(s1_array[i] != "" )
		{
			i1 = i;
			break;
		}
	}	
	
	i2 = -1;
	for(i=0; i < m2; i++) {
		if(s2_array[i] != "" )
		{
			i2 = i;
			break;
		}
	}
	if(i1 == -1 && i2 == -1) erg = true;
	
}

else 
{
	i1 = -1;	
	for(i=0; i < m1; i++) {
		if(s1_array[i] == n1 )
		{
			i1 = i;
			break;
		}
	}	
	
	i2 = -1;
	for(i=0; i < m2; i++) {
		if(s2_array[i] == n2 )
		{
			i2 = i;
			break;
		}
	}
	//alert(i1 + "/" + i2 + "/" +s2+ "/" +n2)
	if( n1==i1 && n2 == i2) erg= true;	
 }			
	return erg;	
}
//----------------------------------------