//TURFTIMES 新聞社買い目用IPAT連動
//App:ttkim015,ttssh110
//scriptversion=20040531;

var bet_tan=0;
var sel_tan="";
var bet_fk=0;
var sel_fk="";
var bet_ur=0;
var sel_ur="";
var bet_wid=0;
var sel_wid="";
var bet_ut=0;
var sel_ut="";
var bet_wr=0;
var sel_wr="";
var bet_srf=0;
var sel_srf="";
var kounyu=0;
var wr_bak=new Array();
var ur_bak=new Array();
var ut_bak=new Array();

function chk_tan(form){
  bet_tan=0;
  esc_tan=Array();
  sel_tan=esc_tan.join(",");
}
function chk_fk(form){
  bet_fk=0;
  esc_fk=Array();
  sel_fk=esc_fk.join(",");
}
function chk_wid(form){
  bet_wid=0;
  esc_wid=Array();
  sel_wid=esc_wid.join(",");
}
//馬連重複チェック	
function chk_ur(form){
  bet_ur=0;
  sel_ur="";
  esc_ur=Array();
  for(var i=0;i<form.ur.length;i++){
    if(ur_bak[i]!=form.ur[i].checked){
      for(var j=0;j<form.ur.length;j++){
        if(form.ur[i].value==form.ur[j].value){
          form.ur[j].checked = form.ur[i].checked
        }
      }
    }
  }
  for(var i=0;i<form.ur.length;i++){
    if(form.ur[i].checked==true){
      esc_ur[bet_ur]=form.ur[i].value;
      bet_ur++;
    }
    ur_bak[i]=form.ur[i].checked;
  }
  for(var i=0;i<esc_ur.length;i++){
    for(var j=i+1;j<esc_ur.length;j++){
      if(i==j){continue;}
      if(esc_ur[i]==esc_ur[j]){
        esc_ur[j]=esc_ur[esc_ur.length-1];
        esc_ur.pop();
        bet_ur--;
        j--;
      }
    }
  }
	sel_ur=esc_ur.join(",");
}
//馬単重複チェック	
function chk_ut(form){
  bet_ut=0;
  sel_ut="";
  esc_ut=Array();
  for(var i=0;i<form.ut.length;i++){
    if(ut_bak[i]!=form.ut[i].checked){
      for(var j=0;j<form.ut.length;j++){
        if(form.ut[i].value==form.ut[j].value){
          form.ut[j].checked = form.ut[i].checked
        }
      }
    }
  }
  for(var i=0;i<form.ut.length;i++){
    if(form.ut[i].checked==true){
      esc_ut[bet_ut]=form.ut[i].value;
      bet_ut++;
    }
    ut_bak[i]=form.ut[i].checked;
  }
  for(var i=0;i<esc_ut.length;i++){
    for(var j=i+1;j<esc_ut.length;j++){
      if(i==j){continue;}
      if(esc_ut[i]==esc_ut[j]){
        esc_ut[j]=esc_ut[esc_ut.length-1];
        esc_ut.pop();
        bet_ut--;
        j--;
      }
    }
  }
  sel_ut=esc_ut.join(",");
}
function chk_wr(form){
  bet_wr=0;
  sel_wr="";
  esc_wr=Array();
  for(var i=0;i<form.wr.length;i++){
    if(wr_bak[i]!=form.wr[i].checked){
      for(var j=0;j<form.wr.length;j++){
        if(form.wr[i].value==form.wr[j].value){
          form.wr[j].checked = form.wr[i].checked
        }
      }
    }
  }
  for(var i=0;i<form.wr.length;i++){
    if(form.wr[i].checked==true){
      esc_wr[bet_wr]=form.wr[i].value;
      bet_wr++;
    }
    wr_bak[i]=form.wr[i].checked;
  }
  for(var i=0;i<esc_wr.length;i++){
    for(var j=i+1;j<esc_wr.length;j++){
      if(i==j){continue;}
      if(esc_wr[i]==esc_wr[j]){
        esc_wr[j]=esc_wr[esc_wr.length-1];
        esc_wr.pop();
        bet_wr--;
        j--;
      }
    }
  }
  sel_wr=esc_wr.join(",");
}
function chk_srf(form){
  bet_srf=0;
  esc_srf=Array();
  sel_srf=esc_srf.join(",");
}
//購入チェック
function ct_chk(form){
  chk_tan(form)
  chk_fk(form)
  chk_ur(form)
  chk_wid(form)
  chk_ut(form)
  chk_wr(form)
  chk_srf(form)
  kounyu=eval(bet_tan)+eval(bet_fk)+eval(bet_ur)+eval(bet_wid)+eval(bet_ut)+eval(bet_wr)+eval(bet_srf);
  if(kounyu==0){
    alert("選択がありません");
  }else if(kounyu>60){
    alert("表示できる組合せの合計は６０件までです");
  }else{
    touhyou();
  }
}
function touhyou(){
  document.sel.tan.value=sel_tan;
  document.sel.fuk.value=sel_fk;
  document.sel.ur.value=sel_ur;
  document.sel.wd.value=sel_wid;
  document.sel.ut.value=sel_ut;
  document.sel.wr.value=sel_wr;
  document.sel.srf.value=sel_srf;
  document.sel.tan_cnt.value=bet_tan;
  document.sel.fuk_cnt.value=bet_fk;
  document.sel.ur_cnt.value=bet_ur;
  document.sel.wd_cnt.value=bet_wid;
  document.sel.ut_cnt.value=bet_ut;
  document.sel.wr_cnt.value=bet_wr;
  document.sel.srf_cnt.value=bet_srf;
  document.sel.kounyu.value=kounyu;
  window.open("","select","resizable=1,menubar=0,toolbar=0,scrollbars=1,directories=0,status=0,location=0,width=700,height=600");
  document.sel.submit();
}
function cls_all(form){
  bet_tan=0;
  sel_tan="";
  bet_fk=0;
  sel_fk="";
  bet_ur=0;
  sel_ur="";
  bet_wid=0;
  sel_wid="";
  bet_ut=0;
  sel_ut="";
  bet_wr=0;
  sel_wr="";
  bet_srf=0;
  sel_srf="";
  kounyu=0;
  for(var i=0;i<form.wr.length;i++){
    wr_bak[i]=false;
  }
}

//単複オッズ(出走表用)
function dispTF(uno){
	var str;
	var tan = 0;
	tan = math(tf[uno-1][0]) * 10;
	if(tan>0 && tan<100){
		str = "<font color=\"#ff0000\">" + math(tf[uno-1][0]) + "</font>";
	}else if(tan>=1000){
		str = "<font color=\"#0000ff\">" + math(tf[uno-1][0]) + "</font>";
	}else if(tan>=0){	//0.0以上
		str = math(tf[uno-1][0]);
	}else if(eval(tan)==-10){
		str = "<font color=\"#ff0000\">取消</font>";
	}else{
		str = "　";
	}
	str += "<br>";
	if( math(tf[uno-1][1]) >=0 ){
		str+= math(tf[uno-1][1]);
	}else{
		str += "-";
		//str += "　";
	}
	str +="<br>";
	if( math(tf[uno-1][2]) >=0 ){
		 str += math(tf[uno-1][2]);
	}else{
		str += "-";
		//str += "　";
	}
	document.open();
	document.write(str);
	document.close();
}
//枠連
function dispWR(u1,u2){
var od = math(wr[wro(u1,u2)]);
	document.open();
	if(od==-1){
		document.write("<font color=\"#ff0000\">取消</font>");
		outWR(""+u1 + "-" + u2);
	}else{
		document.write(od);
	}
	document.close();
}
//馬連
function dispUR(u1,u2){
	var n = urwo(u1,u2);
	var od = math(urw[n][0]);
	document.open();
	if(od==-1){
		document.write("<font color=\"#ff0000\">取消</font>");
		outUR(""+u1 + "-" + u2);
	}else{
		document.write(od);
	}
	document.close();
}
//馬単
function dispUT(u1,u2){

var od = math(ut[uto(u1,u2)]);
	document.open();
	if(od==-1){
		document.write("<font color=\"#ff0000\">取消</font>");
		outUT(""+u1 + "-" + u2);
	}else{
		document.write(od);
	}
	document.close();
}
//枠複オッズの位置を返す
function wro(wn1,wn2){
  var no=0;
  no=((wn1-1)*8);
  no-=(((wn1-1)*(wn1-2))/2);
  no+=(wn2-wn1);
  return no;
}
//馬複、ワイドの位置を返す
function urwo(un1,un2){
	var no=0;
	no=(un1-1)*17;
  no-=(((un1-1)*(un1-2))/2);
  no+=(un2-un1-1);
  return no;
}
//馬単オッズの位置を返す
function uto(un1,un2){
  no=((un1-1)*17)+un2-2;
  if(un1>un2){
    no+=1;
  }
  return no;
}
//オッズを返す
function math(odds) {
  if(odds<0){
		odds = -1;
    //odds="&nbsp;";
  }else if(odds%10==0){
    odds=eval(odds/10) + ".0";
  }else{
    odds=eval(odds/10);
  }
  return(odds);
}

//枠連取消
function outWR(val){
  for(var i=0;i<document.forms[0].wr.length;i++){
    if(val==document.forms[0].wr[i].value){
				document.forms[0].wr[i].disabled="true";
    }
  }
}
//馬連取消
function outUR(val){
  for(var i=0;i<document.forms[0].ur.length;i++){
    if(val==document.forms[0].ur[i].value){
				document.forms[0].ur[i].disabled="true";
    }
  }
}
//馬単取消
function outUT(val){
  for(var i=0;i<document.forms[0].ut.length;i++){
    if(val==document.forms[0].ut[i].value){
				document.forms[0].ut[i].disabled="true";
    }
  }
}

