function new_window(url,w,h){
	size = "width=" + w + ",height=" + h + ",scrollbars=yes";
	window.open(url,"Newwindow",size);
}


// set_color(Object documentForm,
//           String colorName,
//           String targetFormName)
function set_color(p,color,name){

  for(j = 0; j < p.length; j++){
    if(p.elements[j].name == name){
      p.elements[j].value = color;
    }
  }

}

// set_color2(Object documentForm,
//            String colorName)
//
function set_color2(p,color){

  for(i = 0; i < p.chelper.length; i++){
    if(p.chelper[i].checked){
      target = p.chelper[i].value;
     }
  }
  for(j = 0; j < p.length; j++){
    if(p.elements[j].name == target){
      p.elements[j].value = color;
    }
  }

}

function selectcolor(fdoc , x , y){
	w=192;
	h=32;
	
	red = getcolor('r' , w , h , x , y);
	green = getcolor('g' , w , h , x , y);
	blue = getcolor('b' , w , h , x , y);
	
	fdoc.value = '#' + red  + green + blue;
}

function getcolor(mode , w , h , x , y){
	if(mode == 'g'){
		x -= w/3;
		if(x<=0){x += w;}
	}else if(mode == 'b'){
		x -= w*2/3;
		if(x<=0){x += w;}
	}

		if((x>=1 && x<=w/6)||(x>=w*5/6+1 && x<=w)){
			if(y>=1 && y<=h/2){
				col=256-1;
			}else{
				col=256-(256/(h/2))*(y-(h/2));
			}
		}else if(x>=w/3+1 && x<=w*2/3){
			if(y>=1 && y<=h/2){
				col=256-(256/(h/2))*(y-1)-1;
			}else{
				col=0;
			}
		}else if(x>=w/6+1 && x<=w*1/3){
			if(y>=1 && y<=h/2){
				migi=256-(256/(h/2))*(y-1)-1;
			}else{
				migi=0;
			}
			
			if(y>=1 && y<=h/2){
				hidari=256-1;
			}else{
				hidari=256-(256/(h/2))*(y-(h/2));
			}
			
			col = Math.floor((x - w/6)*((migi-hidari)/(w/6))+hidari);
		}else if(x>=w*2/3+1 && x<=w*5/6){
			if(y>=1 && y<=h/2){
				migi=256-1;
			}else{
				migi=256-(256/(h/2))*(y-(h/2));;
			}
			
			if(y>=1 && y<=h/2){
				hidari=256-(256/(h/2))*(y-1)-1;
			}else{
				hidari=0;
			}
			
			col = Math.floor((x - w*2/3)*((migi-hidari)/(w/6))+hidari);
		}
		col2 = change10to16(col);
	return col2;
}


function change10to16(col){
i=0;
ret='';
 cha_hairetu = new Array('' , '');
 x=col;
 cha=new Array('a','b','c','d','e','f');
	while (col>=Math.pow(16,i)){
	x = Math.floor(col/Math.pow(16,i))%16;

	if (x >= 10){x = cha[x-10];}
	cha_hairetu[i] = x;
	i++;
	}
	for (ix = 0; ix <= 1 ; ix++){
	if(cha_hairetu[ix] == ''){cha_hairetu[ix] = '0';}
	ret = cha_hairetu[ix]+ret;
	}
return ret;
}