var iChessVersion="1.0";var PgnFileName="pgn/ichess.pgn";var PostingFileName="pgn/postings.html"
var AddPostsFileName="pgn/ichess.php"
var UpdateInterval=5;var InitialClock="1:30:00";var IsDemo=0;var AllowPostings=1;var PieceName="KQRBNP";var ShowPieceName="KDTLSB";var Scale=0.6;var Rows=1;var Cols=2;var AlternateColors='';var DisplayPostings="b";var PostingHeight=10;var Author=" Rev:"+iChessVersion+" (c) Felix Fuernhammer <a href='http://ichess.de'>iChess.de</a>";var DisableURI=false;var ScrollIntoView=false;var TimeCountDown=true;var OneMovePerLine=false;var NoFooter=false;var NoButtons=false;var NoGameSelectForm=false;var CookiesAllowed=false;var FontSize=12;var Size=56;var TimeOut=400;var gImagePath="png/";var SkipRefresh=0;var IsLoading=0;var gImagePathOld="-";var gPostingName="Name";var gLastGameSelCont=0;var MaxMove=300,isInit=false,isMoving=false,isCalculating=false,i;var King=0,Queen=1,Rook=2,Bishop=3,Night=4,Pawn=5,OOO=6,OO=7,NullM=8;var ShowTimeInPGN=false;var CorrectPadding=0;var gPics=new Array('1x1.png','k.png','q.png','r.png','b.png','n.png','p.png');var isIE=CheckIE();PieceCode=new Array(6);for(i=0;i<6;i++)PieceCode[i]=PieceName.charCodeAt(i);PgnMoveText=new Array();var MvCount=new Array();var LastMove=new Array();var MvTyp=new Array();var IsLive=new Array();var Brd=new Array();var Tags=new Array();var Piece=new Array();var PosX=new Array();var PosY=new Array();var PMovs=new Array();var HTime=new Array();var HPiece=new Array();var HTyp=new Array();var HPosX=new Array();var HPosY=new Array();var ActiveGames=new Array();var PostingFeedback="Post sent, please be patient";var textPosts=new Array("Posting deactivated!","Post Comment (viewable by everybody)!","Posts selectively enabled!","Send Post!","Currently no postings!");function sign(nn){if(nn>0)return(1);if(nn<0)return(-1);return(0);}
function EvalUrlString(){var entry,llist,ii,jj,wert,url=window.location.search;if((DisableURI)||(url==""))return;url=url.substring(1,url.length);url=url.replace(/\|/g,'/');url=url.replace(/%7C/g,'/');url=unescape(url);llist=url.split("&");for(ii=0;ii<llist.length;ii++){jj=llist[ii];if((jj.length==0)||(jj.search("=")<0))continue;entry=jj.split("=");if(entry.length!=2)continue;wert=entry[1];name=entry[0];eval(name+"="+wert);}}
function DispError(str){if(document.getElementById('Author'))document.getElementById('Author').innerHTML=str;};function GetIsRotated(BNr){var selObj=document.getElementById('isRotated-'+BNr);if((selObj)&&(parseInt(selObj.value)==1))return(1);else return(0);}
function ReadCookie(BNr){var b=new Array(2);if((!document.cookie)||(!CookiesAllowed))return-1;var b=document.cookie.split("=");b=b[1].split(",");if(BNr<b.length)ActGame=b[BNr];else ActGame=-1;if(ActGame>=0)return ActGame;return-1;}
function WriteCookie(){if(document.cookie){var cookie=document.cookie.split(";");var a=new Date();a.setTime(a.getTime()-(1000*60*60));document.cookie=cookie[0]+'; expires='+a.toGMTString()+';';}
cookie="Selection=";for(var BNr=0;BNr<(Rows*Cols);BNr++)cookie+=GetActiveGame(BNr)+",";var a=new Date();a=new Date(a.getTime()+1000*60*60);var x=cookie;document.cookie=x;}
function GetActiveGame(BNr){var sel=ReadCookie(BNr);if((sel<0)||(sel>=PgnMoveText.length)){if((ActiveGames)&&(ActiveGames.length>BNr))sel=ActiveGames[BNr];else{var x=document.getElementById('GameSel-'+BNr);if(x){var sel=x.selectedIndex;}else{sel=BNr;};}}
return(sel%PgnMoveText.length);}
function RotateBoard(BNr,Refresh){with(document){var selObj=getElementById('isRotated-'+BNr),rot=GetIsRotated(BNr),bl,blObj,wh,whObj;if(selObj)selObj.value=(1-rot);blObj=getElementById('Black-'+BNr);if(!blObj)return;whObj=getElementById('White-'+BNr);if(!whObj)return;bl=blObj.style.backgroundColor;wh=whObj.style.backgroundColor;with(blObj.style){backgroundColor=wh;color=bl;}
with(whObj.style){backgroundColor=bl;color=wh;}
with(getElementById('TimeBlack-'+BNr).style){backgroundColor=wh;color=bl;}
with(getElementById('TimeWhite-'+BNr).style){backgroundColor=bl;color=wh;}}
if(Refresh)RefreshBoard(BNr);}
function CheckIE(){var arVersion=navigator.appVersion.split("MSIE");var version=parseFloat(arVersion[1]);if(isNaN(version))return(0);else return(version);}
function ExtendArrays(BNr){var i,j;if(Brd.length>BNr)return;Brd.push(new Array(8));i=Brd.length-1;for(j=0;j<8;j++)Brd[i][j]=new Array(8);MvCount.push(0);LastMove.push(0);MvTyp.push(0);IsLive.push(1);Tags.push(new Array('White','Black','...'));Piece.push(new Array(new Array(16),new Array(16)));PosX.push(new Array(new Array(16),new Array(16)));PosY.push(new Array(new Array(16),new Array(16)));PMovs.push(new Array(new Array(16),new Array(16)));HTime.push(new Array(MaxMove));HPiece.push(new Array(new Array(MaxMove),new Array(MaxMove)));HTyp.push(new Array(new Array(MaxMove),new Array(MaxMove)));HPosX.push(new Array(new Array(MaxMove),new Array(MaxMove)));HPosY.push(new Array(new Array(MaxMove),new Array(MaxMove)));}
function GetFontSize(){var obj,i,j,l,FS=FontSize;with(document){for(i=0;i<styleSheets.length;i++){if(isIE>0)obj=styleSheets[i].rules;else obj=styleSheets[i].cssRules;for(j=0;j<obj.length;j++){if(obj[j].selectorText=="#ichess"){FS=obj[j].style.fontSize;if(FS!="")FontSize=parseInt(FS);}}}}}
function SetFontSize(){var div,s,px;with(document){if(!createElement)return;div=createElement('div');s=div.style;s.border='none';s.padding=0;s.width=FontSize+'pt';body.appendChild(div);px=div.offsetWidth;body.removeChild(div);if(!px)px=FontSize*4/3;FontSize=Math.round(px/2+(px/2*Scale));var padd=Math.round(FontSize/2)
s.padding=padd+'px';s.width=FontSize+"px";body.appendChild(div);var px1=div.offsetWidth;body.removeChild(div);if(px1)CorrectPadding=FontSize+2*padd-px1;}}
function DispPostings(Size){with(document){var w=getElementById("Eitschess").offsetWidth
write("<table id='PostingTab' style='width:"+w+"px;'><tr>");write("<td class='inpPostN' style='border-style:none;'><input type='text' class='inpPostN' name='Name' id='Name' value='"+gPostingName+"' onfocus='this.select();'></td>");write("<td class='inpPostC' style='border-style:none;'><input type='text' class='inpPostC' name='Post' id='Post' value='"+textPosts[AllowPostings]+"' onfocus='this.select()'></td>");write("<td><input type='button' name='Check' id='SubmittPosting' value='"+textPosts[3]+"' onClick='AddPosting()'></td>");write("</tr></table>");write("<div id='Postings' style='width:"+w+"px;'>"+textPosts[4]+"</div>");}}
function AddPosting(){var Name=document.getElementById("Name").value;var Post=document.getElementById("Post").value;if(Post=="")return;if(AllowPostings==0){document.getElementById("Post").value=textPosts[AllowPostings];return;}
var FName=PgnFileName.split(".")[0];var FName=FName+".php";with(document){var Name=getElementById("Name").value;var Post=getElementById("Post").value;getElementById("Post").value=PostingFeedback;getHttpRequest(AddPostsFileName,"?Name="+escape(Name)+"&Post="+escape(Post));getHttpRequest(PostingFileName,"?T="+Math.random());}}
function Check4AlternateColors(){var curcol;var acols=AlternateColors.split(',');for(var BNr=0;BNr<(Rows*Cols);BNr++){if(acols.length>BNr){curcol=GetIsRotated(BNr);if(curcol==(1-acols[BNr]))RotateBoard(BNr,0);}}}
function iChess(){var ii,jj,BNr;GetFontSize();EvalUrlString();SetFontSize();if(typeof PresetGames!="undefined")ActiveGames=PresetGames.split(",");if((Rows*Cols)==1)ScrollIntoView=true;else ScrollIntoView=false;with(document){write("<div>");write("<table id='Eitschess'><tr><td>");if(DisplayPostings=='t'){DispPostings(PostingHeight+'em');write("</td></tr><tr><td>");WriteGames();}else if(DisplayPostings=='l'){DispPostings('100%');write("</td><td>");WriteGames();}else if(DisplayPostings=='b'){WriteGames();write("</td></tr><tr><td>");DispPostings(PostingHeight+'ex');}else if(DisplayPostings=='r'){WriteGames();write("</td><td>");DispPostings('100%');}else{WriteGames();}
write("</td></tr></table>");write("<input type='hidden' id='pgnfile' value='No pgn file!'>");write("<input type='hidden' id='UpdateTime' value='0'>");write("</div>");}
if(AlternateColors)Check4AlternateColors();setTimeout("UpdateFile(1)",TimeOut);}
function WriteGames(){with(document){write("<table id='iChess'>");for(var ii=0;ii<Rows;ii++){write("<tr>");for(var jj=0;jj<Cols;jj++){write("<td>");BNr=ii*Cols+jj;ExtendArrays(BNr);WriteGame(BNr);write("</td>");}
write("</tr>");}
if(!NoFooter){write("<tr><th colspan="+Cols+">");WriteFooter();write("</th></tr>");}
write("</table>");}}
function WriteGame(BNr){var BlWhW="width:"+Math.round(5*Size*Scale)+"px; ";var BlWhT="width:"+Math.round(2.5*Size*Scale)+"px; ";var padd="padding:"+Math.round(FontSize/3)+"px; ";var H0="height:"+Math.round(FontSize*7/3)+"px; ";var H1="height:"+Math.round(FontSize*2.25)+"px; ";var H2="height:"+(Math.round(8.5*Size*Scale+4.5*FontSize))+"px; ";var W1="width:"+(Math.round(4*Size*Scale+FontSize*2/3))+"px; ";var FS="font-size:"+Math.round(1.1*FontSize)+"px; ";var FS1="font-size:"+Math.round(FontSize)+"px; ";var top="vertical-align:top; ";var s="style='"+(top+W1+H1)+"'";with(document){write("<TABLE class='FrameTabs'><tr>");write("<th rowspan='2'>");write("<table class='iCGameTab'>");write("<tr><td><div class='BW Black' id='Black-"+BNr+"'     style='"+FS+BlWhW+padd+"'>"+Tags[BNr]["Black"]+"</div></td>");write("<td><div class='BW Black Time' id='TimeBlack-"+BNr+"' style='"+FS+BlWhT+padd+"'>"+InitialClock+"</div></td></tr>");write("<tr><th colspan='2'>");WriteBoard(BNr);write("</th></tr>");write("<tr><td><div class='BW White'      id='White-"+BNr+"'     style='"+FS+BlWhW+padd+"'>"+Tags[BNr]["White"]+"</div></td>");write("<td><div class='BW White Time' id='TimeWhite-"+BNr+"' style='"+FS+BlWhT+padd+"'>"+InitialClock+"</div></td></tr>");write("<tr><th colspan='2' text-align='left'>");WriteButtons(BNr);write("</th></tr>");write("</table>");write("<td><div class='GameSelCont' id='IDGameSel-"+BNr+"' "+s+"></div></td></tr>");write("<tr><td style='vertical-align:top;'><div class='pgn' id='pgn-"+BNr+"' style='"+FS1+W1+H2+padd+"'></div></td>");write("</tr></TABLE>");}}
function WriteBoard(BNr){var siz=Math.round(FontSize*0.8),siz2=Math.round(FontSize*0.5),ii,bw=0;siz3=Math.round(Scale*Size)-bw;var Styl="onMouseDown='RotateBoard("+BNr+",1)' style='font-size:"+siz+"px; vertical-align:middle; text-align:center; border-width:"+bw+"px; border-style:none; ";var Styl1=" style='padding:1px; vertical-align:middle; text-align:center; border-width:0px; border-style:solid; border-color:black;' ";var Styl2=" style='height:"+siz+"px; width:"+siz+"px; border-width:0px;border-style:solid; background-color:black;' ";with(document){write("<Table class='Board' cellpadding=0 cellspacing=0><TR><TH colspan=8 rowspan=8> ");WriteBoardTab(BNr);write("</TH>");for(ii=0;ii<8;ii++)write("<TD "+Styl+"height:"+siz3+"px;padding:2px'><div id='no_col_"+BNr+"-"+ii+"'></div></TD></TR><TR>");for(ii=0;ii<8;ii++)write("<TD "+Styl+" width:"+siz3+"px;'><div id='no_row_"+BNr+"-"+ii+"'></div></TD>");write("<TD onMouseDown='RotateBoard("+BNr+",1)'>");write("<div"+Styl2+"></div>");write("</TD></TR></Table>");}}
function WriteBoardTab(BNr){var pic=gImagePath+gPics[0],i,j,k;var i,j,k,siz=Math.round(Scale*Size);with(document){write("<TABLE class='BoardOutline' cellpadding=0 cellspacing=0>");for(i=0;i<8;i++){k=8*i;write("<TR>");for(j=0;j<8;j++){if((i%2+j%2)==1)write("<TD class='WhiteSq'>");else write("<TD class='BlackSq'>");write("<img src='"+pic+"' class='none' id='i"+BNr+"-"+(k+j)+"' width='"+siz+"px' height='"+siz+"px' alt=''>")
write("</TD>");}
write("</TR>");}
write("</TABLE>")}}
function WriteButtons(BNr){var ss=Math.round(Size*Scale);var styl=" style='width:"+ss+"px; font-size:"+FontSize+"px;' ";var bIsLive="live!";if(UpdateInterval==0)bIsLive="&gt;I";with(document){if(!NoButtons){write("<table style='border-style:solid; border-width:0px; width:100%;padding:0px;'><tr><td>");write("<TABLE class='ButtonTable' text-align='left' style='border-style:solid; border-width:0px; padding:0px; '><TR>");write("<TD><input type=button value='I&lt;'"+styl+" id='btnInit"+BNr+"' onClick='ButtonAction("+BNr+",0)'></TD>");write("<TD><input type=button value='&lt;' "+styl+" id='btnMovBk"+BNr+"'  onClick='ButtonAction("+BNr+",1)'></TD>");write("<TD><input type=button value='&gt;' "+styl+" id='btnMovFw"+BNr+"'  onClick='ButtonAction("+BNr+",2)'></TD>");write("<TD><input type=button value='"+bIsLive+"' style='width:"+2*ss+"px; font-size:"+FontSize+"px' id='btnLive"+BNr+"' onClick='ButtonAction("+BNr+",3)'></TD>");write("</TR>");write("</TABLE>");write("</td>");write("<TD class='Result' id='Result-"+BNr+"' style='text-align:right; width:"+(2*Size*Scale+Math.round(FontSize/3))+"px; font-size:"+Math.round(1.7*FontSize)+";'></TD>");write("</tr></table>");}
write("<input type='hidden' id='isRotated-"+BNr+"' value='0'>");write("<input type='hidden' id='Board-"+BNr+"' value=''>");write("<input type='hidden' class='HighlightedMove' id='HlightMv"+BNr+"' value='-1'>");}}
function SetLiveButton(BNr,live){IsLive[BNr]=live;var lv="live!";if((UpdateInterval==0)||(live==0))lv=">I";with(document){var obj=getElementById('btnLive'+BNr);if(obj){if((live==0)&&(UpdateInterval>0))obj.style.background='#FFCF90'
else obj.style.background=getElementById('btnInit'+BNr).style.background;obj.value=lv;}}}
function ButtonAction(BNr,no){switch(no){case 0:MoveBack(BNr,MaxMove);SetLiveButton(BNr,0);break;case 1:MoveBack(BNr,1);SetLiveButton(BNr,0);break;case 2:MoveForward(BNr,1);SetLiveButton(BNr,0);break;default:MoveForward(BNr,MaxMove);SetLiveButton(BNr,1);break;}}
function WriteTime(BNr,rot){var w=InitialClock,b=InitialClock;var mv=MvCount[BNr]-1;mv_1=mv-1;if(HTime[BNr][mv])w=HTime[BNr][mv];else if(mv>0)w="&nbsp;";if(HTime[BNr][mv_1])b=HTime[BNr][mv_1];else if(mv>0)b="&nbsp;";if((MvCount[BNr]+rot)%2==1){TimeWh=w;TimeBl=b;}else{TimeBl=w;TimeWh=b;}
GameNr=GetActiveGame(BNr);if((Tags[GameNr]['ActTime'])&&IsLive[BNr]){var t=Tags[GameNr]['ActTime']
if(mv%2){TimeWh=t}else{TimeBl=t;}}
var ID='TimeWhite-'+BNr;with(document){if(getElementById&&(getElementById(ID))){if(rot)getElementById(ID).className="BW Black Time";else getElementById(ID).className="BW White Time";getElementById(ID).innerHTML=TimeWh;}
ID='TimeBlack-'+BNr;if(getElementById&&(getElementById(ID))){if(rot)getElementById(ID).className="BW White Time";else getElementById(ID).className="BW Black Time";getElementById(ID).innerHTML=TimeBl;}}}
function WritePlayer(ID,Pl,ToolTip,rot){with(document){if(getElementById&&(getElementById(ID))){if(rot)getElementById(ID).className="BW Black";else getElementById(ID).className="BW White";getElementById(ID).innerHTML='<div title="'+ToolTip+'">'+Pl+'</div>';}}}
function WriteBoardNumbers(BNr,rot){var i,j;with(document){if((!getElementById)||(!getElementById('no_col_'+BNr+'-0')))return;for(i=0;i<8;i++){j=i*(1-rot)+(7-i)*rot;getElementById('no_col_'+BNr+'-'+i).innerHTML=8-j;getElementById('no_row_'+BNr+'-'+i).innerHTML='abcdefgh'.charAt(j);}}}
function GetToolTips(BNr,Player){if(Tags[BNr][Player+"Elo"])return"Elo:"+Tags[BNr][Player+"Elo"];return"Elo:nicht übertragen!";}
function WriteInfos(BNr,rot){var sel=GetActiveGame(BNr);var Pl=new Array("White","Black");WritePlayer("White-"+BNr,Tags[sel][Pl[rot]],GetToolTips(sel,"White"),rot);WritePlayer("Black-"+BNr,Tags[sel][Pl[1-rot]],GetToolTips(sel,"Black"),1-rot);WriteTime(BNr,rot);WriteBoardNumbers(BNr,rot);}
function WriteFooter(){with(document){write("<table width='100%' class='Footer'><tr>");write("<td class='download_pgn'><a rel='nofollow' href="+PgnFileName+"?T="+Math.random()+">&nbsp;&nbsp;&nbsp;.pgn&nbsp;&nbsp;&nbsp;</a></td>");write("<td id='Author' style='text-align:left; width:auto;'>"+Author+"</td>");write("<td style='width:auto;'></td>");write("<td text-align='right' id='BroadcastTime'  style='text-align:center; width:60px;'></td>");write("<td text-align='right' id='ShowUpdateTime' style='text-align:right; width:60px;'>00 sec</td></tr>");write("</table>");}}
function WriteSelGames(){if(!document.getElementById)return;var padd=Math.round(FontSize/3);var Styl1=" style='font-size:"+FontSize+"px; width:100%; padding:"+padd+"px; vertical-align:middle; ' ";var NrOfGames=PgnMoveText.length;if((NrOfGames==1)||(NoGameSelectForm))return;var GameSelForm="",ii,BNr,GameSelected;for(BNr=0;BNr<(Cols*Rows);BNr++){if(BNr>=NrOfGames)break;GameSelected=GetActiveGame(BNr);GameSelForm+="<form action=''><SELECT class='GameSel' id='GameSel-"+BNr+"' "+Styl1+"  onChange='OpenGame("+BNr+", this.options[selectedIndex].value);'  SIZE=1>";for(ii=0;ii<NrOfGames;ii++){if(ii==GameSelected)GameSelForm+="<OPTION VALUE="+ii+" selected='selected'>";else GameSelForm+="<OPTION VALUE="+ii+">";GameSelForm+=Tags[ii]["White"].split(",")[0]+"-"+Tags[ii]["Black"].split(",")[0]+"("+Tags[ii]["Result"]+")";}
GameSelForm+="</SELECT></>";var len=GameSelForm.length;if(len==gLastGameSelCont){return;}
var ID=document.getElementById('IDGameSel-'+BNr);if(ID){if(ID.innerHTML!=GameSelForm)ID.innerHTML=GameSelForm;}
GameSelForm="";}
gLastGameSelCont=len;var W1=4*Size*Scale+FontSize;var x=document.getElementsByTagName("GameSel");for(var i=0;i<x.length;i++){if(x[i].className=="GameSel"){x[i].style.width=(W1)+"px";x[i].style.padding=Math.round(FontSize/3)+"px"}}}
function RestorePos(BNr,ii,bw,Mv,ind){var x=PosX[BNr][bw][ii],y=PosY[BNr][bw][ii];var hx0=HPosX[BNr][ind][Mv],hy0=HPosY[BNr][ind][Mv];Brd[BNr][x][y]=0;Brd[BNr][hx0][hy0]=(HTyp[BNr][ind][Mv]+1)*(1-2*bw);}
function RestorePiece(BNr,ii,bw,Mv,ind){var hx0=HPosX[BNr][ind][Mv],hy0=HPosY[BNr][ind][Mv];Piece[BNr][bw][ii]=HTyp[BNr][ind][Mv];PosX[BNr][bw][ii]=hx0;PosY[BNr][bw][ii]=hy0;PMovs[BNr][bw][ii]--;}
function MoveBack(BNr,NrMvs){var ii,jj,Mv,bw,x,y,hx1,hy1;isMoving=true;for(jj=0;((jj<NrMvs)&&(MvCount[BNr]>0));jj++){MvCount[BNr]--;Mv=MvCount[BNr];MvTyp[BNr]=1-MvTyp[BNr];bw=MvTyp[BNr];ii=HPiece[BNr][1][Mv];if((0<=ii)&&(ii<16)){RestorePos(BNr,ii,bw,Mv,1);}
ii=HPiece[BNr][0][Mv];RestorePos(BNr,ii,bw,Mv,0);RestorePiece(BNr,ii,bw,Mv,0);ii=HPiece[BNr][1][Mv];if((0<=ii)&&(ii<16)){RestorePiece(BNr,ii,bw,Mv,1)}
ii-=16;if(0<=ii){RestorePiece(BNr,ii,1-bw,Mv,1)
hx1=HPosX[BNr][1][Mv];hy1=HPosY[BNr][1][Mv];Brd[BNr][hx1][hy1]=(HTyp[BNr][1][Mv]+1)*(2*bw-1);}}
if(isCalculating){isMoving=false;return;}
RefreshBoard(BNr);isMoving=false;}
function MoveForward(BNr,nn){var ii,ffst=0,llst,ssearch,ssub,ffull,mmove0="",mmove1="";isMoving=true;var GameNr=GetActiveGame(BNr);ffull=Uncomment(PgnMoveText[GameNr]);for(ii=0;(ii<nn)&&(ffst>=0)&&(MvCount[BNr]<MaxMove);ii++){ssearch=Math.floor(MvCount[BNr]/2+2)+".";llst=ffull.indexOf(ssearch);ssearch=Math.floor(MvCount[BNr]/2+1)+".";ffst=ffull.indexOf(ssearch);if(ffst>=0){ffst+=ssearch.length;if(llst<0)ssub=ffull.substring(ffst);else ssub=ffull.substring(ffst,llst);mmove0=GetMove(ssub,MvTyp[BNr]);if(mmove0!=""){if(ParseMove(BNr,mmove0)>0){mmove1=mmove0;MvCount[BNr]++;MvTyp[BNr]=1-MvTyp[BNr];}else{if(MvTyp[BNr]==1){ssub=Math.floor(MvCount[BNr]/2+1);ssearch=ssub+"....";ffst=ffull.indexOf(ssearch);if(ffst<0){ssearch=ssub+". ...";ffst=ffull.indexOf(ssearch);}
if(ffst<0){ssearch=ssub+". ..";ffst=ffull.indexOf(ssearch);}
if(ffst<0){ssearch=ssub+" ...";ffst=ffull.indexOf(ssearch);}
if(ffst<0){ssearch=ssub+"...";ffst=ffull.indexOf(ssearch);}
if(ffst<0){ssearch=ssub+" ..";ffst=ffull.indexOf(ssearch);}
if(ffst>=0){ffst+=ssearch.length;if(llst<0)ssub=ffull.substring(ffst);else ssub=ffull.substring(ffst,llst);mmove0=GetMove(ssub,0);if(mmove0!=""){if(ParseMove(BNr,mmove0)>0){mmove1=mmove0;MvCount[BNr]++;MvTyp[BNr]=1-MvTyp[BNr];}else ffst=-1;}}}else ffst=-1;}}else ffst=-1;}}
if(isCalculating){isMoving=false;return;}
RefreshBoard(BNr);isMoving=false;}
function SetImg(BNr,ii,src){var i='i'+BNr+'-'+ii;with(document){if(getElementById(i).src==src){if((isIE>0)&&(isIE<7.0))
getElementById(i).style.filter="";return;}
if(!getElementById(i))return;if(isIE==0){getElementById(i).src=src;return};getElementById(i).style.filter="progid:DXImageTransform.Microsoft.AlphaImageLoader(src='"+src+"', sizingMethod='scale')";getElementById(i).src=gImagePath+gPics[0];}}
function RefreshBoard(BNr){var ii=0,jj=0,kk,ll,mm,isRotated=GetIsRotated(BNr);WriteInfos(BNr,isRotated);for(ii=0;ii<8;ii++){for(jj=0;jj<8;jj++){if(isRotated)kk=63-ii-(7-jj)*8;else kk=ii+(7-jj)*8;ll=Brd[BNr][ii][jj];if(ll<0)mm='b';else{if(ll==0)mm='';else mm='w';};SetImg(BNr,kk,gImagePath+mm+gPics[Math.abs(ll)]);}}
HighlightMove(BNr,MvCount[BNr]);}
function InitBoard(BNr){var cc,ii,jj;for(ii=0;ii<2;ii++){Piece[BNr][ii]=Array(0,1,2,2,3,3,4,4,5,5,5,5,5,5,5,5)
PosX[BNr][ii]=Array(4,3,0,7,2,5,1,6,0,1,2,3,4,5,6,7);PMovs[BNr][ii]=Array(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);}
PosY[BNr][0]=Array(0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1);PosY[BNr][1]=Array(7,7,7,7,7,7,7,7,6,6,6,6,6,6,6,6);for(ii=0;ii<8;ii++){for(jj=0;jj<8;jj++)Brd[BNr][ii][jj]=0;}
for(ii=0;ii<2;ii++){for(jj=0;jj<16;jj++)Brd[BNr][PosX[BNr][ii][jj]][PosY[BNr][ii][jj]]=(Piece[BNr][ii][jj]+1)*(1-2*ii);}
MvCount[BNr]=0;MvTyp[BNr]=0;}
function Init(BNr){isInit=true;InitBoard(BNr);RefreshBoard(BNr);isInit=false;}
function Uncomment(ss){if(!ss)return("");var ii,jj,llist=ss.split("{"),ll=llist.length,uu=llist[0],lla,llalen,kk,level=0;for(ii=1;ii<ll;ii++){level++;lla=llist[ii].split("}");lla_len=lla.length-1;level=level-lla_len;if((level==0)&&(lla_len>0))uu+=lla[lla_len];}
llist=uu.split("$");ll=llist.length;uu=llist[0];for(ii=1;ii<ll;ii++){tt=llist[ii];kk=tt.length;for(jj=0;jj<kk;jj++){if(isNaN(parseInt(tt.charAt(jj)))){uu+=tt.substring(jj+1);jj=kk;}}}
return(uu);}
function HTML2Text(txt){txt=txt.replace(/\<html\>/g,'');txt=txt.replace(/\<\/html\>/g,'');txt=txt.replace(/\<head\>/g,'');txt=txt.replace(/\<\/head\>/g,'');txt=txt.replace(/\<body\>/g,'');txt=txt.replace(/\<\/body\>/g,'');txt=txt.replace(/\<pre\>/g,'');txt=txt.replace(/\<\/pre\>/g,'');txt=txt.replace(/\<xmp\>/g,'');txt=txt.replace(/\<br \/\>/g,'');txt=txt.replace(/\<br\>/g,'');txt=txt.replace(/\<\/xmp\>/g,'');txt=txt.replace(/&quot;/g,'"');txt=txt.replace(/&lt;/g,'<');txt=txt.replace(/&gt;/g,'>');txt=" "+txt;return(txt);}
function ApplySAN(ss){if(ss.length!=6)return;for(var ii=0;ii<6;ii++)PieceCode[ii]=ss.charCodeAt(ii);}
function GetMove(tt,nn){var ii=0,jj=0,mm="",ll=-1,cc,ss=tt;while(ss.indexOf("<br />")>0)ss=ss.replace("<br />","");var len=ss.length;while(ii<len){cc=ss.charCodeAt(ii);if((cc<=32)){if(ll+1!=ii)jj++;ll=ii;}else{if(jj==nn){if((cc==46)&&(!isNaN(mm))){mm="";ll=ii;}
else mm+=ss.charAt(ii);}}
ii++;}
if((nn==1)&&(mm=="")&&(ss.charAt(0)==".")){ii=0;while(ii<len){cc=ss.charAt(ii);if((cc!=".")&&(cc!=" "))mm+=cc;ii++;}}
if(mm!=""){ii=mm.indexOf("<");jj=mm.indexOf(">");ll=0;while((ii>=0)&&(jj>=0)&&(ii<jj)){mm=mm.substr(0,ii)+mm.substr(jj+1);ii=mm.indexOf("<");jj=mm.indexOf(">");}}
return(mm);}
function CanCastleLong(BNr){var bw=MvTyp[BNr];if(PMovs[BNr][bw][0]>0)return(-1);var jj=0;while(jj<16){if((PosX[BNr][bw][jj]<PosX[BNr][bw][0])&&(PosY[BNr][bw][jj]==bw*7)&&(Piece[BNr][bw][jj]==2)&&(PMovs[BNr][bw][jj]==0))jj+=100;else jj++;}
if(jj==16)return(-1);jj-=100;Brd[BNr][PosX[BNr][bw][0]][bw*7]=0;Brd[BNr][PosX[BNr][bw][jj]][bw*7]=0;var ff=PosX[BNr][bw][jj];if(ff>2)ff=2;while((ff<PosX[BNr][bw][0])||(ff<=3)){if(Brd[BNr][ff][bw*7]!=0){Brd[BNr][PosX[BNr][bw][0]][bw*7]=1-2*bw;Brd[BNr][PosX[BNr][bw][jj]][bw*7]=(1-2*bw)*3;return(-1);}
ff++;}
Brd[BNr][PosX[BNr][bw][0]][bw*7]=1-2*bw;Brd[BNr][PosX[BNr][bw][jj]][bw*7]=(1-2*bw)*3;return(jj);}
function CanCastleShort(BNr){var bw=MvTyp[BNr];if(PMovs[BNr][bw][0]>0)return(-1);var jj=0;while(jj<16){if((PosX[BNr][bw][jj]>PosX[BNr][bw][0])&&(PosY[BNr][bw][jj]==bw*7)&&(Piece[BNr][bw][jj]==2)&&(PMovs[BNr][bw][jj]==0))jj+=100;else jj++;}
if(jj==16)return(-1);jj-=100;Brd[BNr][PosX[BNr][bw][0]][bw*7]=0;Brd[BNr][PosX[BNr][bw][jj]][bw*7]=0;var ff=PosX[BNr][bw][jj];if(ff<6)ff=6;while((ff>PosX[BNr][bw][0])||(ff>=5)){if(Brd[BNr][ff][bw*7]!=0){Brd[BNr][PosX[BNr][bw][0]][bw*7]=1-2*bw;Brd[BNr][PosX[BNr][bw][jj]][bw*7]=(1-2*bw)*3;return(-1);}
ff--;}
Brd[BNr][PosX[BNr][bw][0]][bw*7]=1-2*bw;Brd[BNr][PosX[BNr][bw][jj]][bw*7]=(1-2*bw)*3;return(jj);}
function IsInComment(ss,nn){var ii=-1,bb=0;do{ii=ss.indexOf("{",ii+1);bb++;}while((ii>=0)&&(ii<nn));ii=-1;do{ii=ss.indexOf("}",ii+1);bb--;}while((ii>=0)&&(ii<nn));return(bb);}
function TransformSAN(ss){if(ss=="")return("");if((ShowPieceName=="")||(ShowPieceName==PieceName))return(ss);var jj,rr,tt="";for(jj=0;jj<ss.length;jj++){rr=PieceName.indexOf(ss.charAt(jj));if(rr>=0)tt+=ShowPieceName.charAt(rr);else tt+=ss.charAt(jj);}
return(tt);}
function SetMove(BNr,mmove){SetLiveButton(BNr,0);if(isNaN(mmove))return;var dd=mmove-MvCount[BNr];if(dd<=0)MoveBack(BNr,-dd);else MoveForward(BNr,dd);}
function GetTimeInPGN(BNr,ss,Mv){if(!ss)return(ss);var i,j,Comm;j=ss.indexOf("*");if(j>0)Comm=ss.substring(0,j);else Comm=ss;j=Comm.indexOf(".");if(j>0)Comm=Comm.substring(0,j);i=Comm.indexOf("{");if(i<0)return(ss);j=Comm.indexOf("}");if(j<0)return(ss);Comm=Comm.substring(i+1,j);if(Comm.match(/[0-9]:[0-9][0-9]:[0-9][0-9]/)){if(Mv=='ActTime'){Tags[GetActiveGame(BNr)]['ActTime']=Comm;return;}else if(Mv<0)return;HTime[BNr][Mv]=Comm;if(ShowTimeInPGN)return(ss.substring(0,i)+"<span id='pgn_t'> "+Comm+" </span>"+ss.substring(j+1));else return(ss.substring(0,i)+ss.substring(j+1));}else return("<span id='pgn_t'>"+ss+"</span>");}
function GetGameResult(BNr,ss,Mv){if(!ss)return(ss);var t=new Array(2);t=ss.split("1/2-1/2");if(t.length>1){Tags[BNr]["Result"]="1/2-1/2";return(t[0]+"<div class='pgn_result'> 1/2 - 1/2 </div>");}
t=ss.split("1-0");if(t.length>1){Tags[BNr]["Result"]="1-0";return(t[0]+"<div class='pgn_result'> 1 - 0 </div>");}
t=ss.split("0-1");if(t.length>1){Tags[BNr]["Result"]="0-1";return(t[0]+"<div class='pgn_result'> 0 - 1 </div>");}
t=ss.split("*");if(t.length>1){if(t[1].indexOf(":")>0){GetTimeInPGN(BNr,t[1],'ActTime');}
return(t[0]+"<div id='pgn_a'> ...</div>");}
return("{Parsing Error when trying to determine the game result}");}
function HighlightMove(BNr,Mv){var obj,bg,last_mv,anch;;if(!document.getElementById)return;obj=document.getElementById('HlightMv'+BNr);if(obj)bg=obj.style.background;bg='silver';if(obj){last_mv=obj.value;obj.value=Mv;}else last_mv="";anch='m-'+BNr+'-'+last_mv;with(document){if((last_mv>=0)&&(getElementById(anch))){obj=getElementById(anch);obj.style.background="";obj.style.borderWidth='0px';obj.style.borderStyle='none';}
anch='m-'+BNr+'-'+Mv;if(getElementById(anch)){obj=getElementById(anch);obj.style.background=bg;obj.style.borderWidth='1px';obj.style.borderStyle='none';if(ScrollIntoView)obj.scrollIntoView(false);}}}
function GetHTMLMoveText(BNr){var MvTxt,GameNr,Mv,jj,uu="",uuu="",cc,vvariant=0;bb=0,bbb=0,ccommenttype=true;var ss="",sstart=0,ffst=0,llst,ssearch,ssub,ffull,mmove0="",mmove1="",MvCnt=MvCount[BNr];isCalculating=true;Init(BNr);GameNr=GetActiveGame(BNr);MvTxt=PgnMoveText[GameNr];ffull=Uncomment(MvTxt);for(var ii=0;(ii<MaxMove)&&(ffst>=0)&&(MvCount[BNr]<MaxMove);ii++){ssearch=Math.floor(MvCount[BNr]/2+2)+".";llst=ffull.indexOf(ssearch);ssearch=Math.floor(MvCount[BNr]/2+1)+".";ffst=ffull.indexOf(ssearch);mmove1=""
if(ffst>=0){ffst+=ssearch.length;if(llst<0)ssub=ffull.substring(ffst);else ssub=ffull.substring(ffst,llst);mmove0=GetMove(ssub,MvTyp[BNr]);if((mmove0!="")&&(ParseMove(BNr,mmove0)>0)){mmove1=mmove0;MvCount[BNr]++;MvTyp[BNr]=1-MvTyp[BNr];}else ffst=-1;}
if(mmove1!=""){sstart=-1;do sstart=MvTxt.indexOf(mmove1,sstart+1);while((sstart>0)&&(IsInComment(MvTxt,sstart)));if(sstart>=0){Mv=MvCount[BNr]
ss+=GetTimeInPGN(BNr,MvTxt.substr(0,sstart),(Mv-2));ss+="<a href='javascript:SetMove("+BNr+","+Mv+")' id='m-"+BNr+"-"+Mv+"'>";ss+="<b>"+TransformSAN(mmove1)+"</b></a>";if((MvTyp[BNr]==0)&&(OneMovePerLine)){ss+="<br>";};MvTxt=MvTxt.substr(sstart+mmove1.length);}else ffst=-1;}else{MvTxt=GetTimeInPGN(BNr,MvTxt,(MvCount[BNr]-1));MvTxt=GetGameResult(BNr,MvTxt,(MvCount[BNr]-1));}}
ss+=MvTxt;uu=MarkAllComments(ss);LastMove[BNr]=MvCount[BNr];isCalculating=false;if(IsLive[BNr]==1)MoveForward(BNr,MaxMove);else SetMove(BNr,MvCnt);return(uu);}
function MarkAllComments(ss){var MvTxt=ss.split("{"),ll=MvTxt.length,uu,ii;uu=MvTxt[0];for(ii=1;ii<ll;ii++)uu+="<i>"+MvTxt[ii];MvTxt=uu.split("}");ll=MvTxt.length;uu=MvTxt[0];for(ii=1;ii<ll;ii++)uu+="</i>"+MvTxt[ii];return(uu);}
function Check4Castling(BNr,Mv,x1,y1){if((x1>=0)&&(x1<=7)&&(y1>=0)&&(y1<=7))return(-1);if((Mv.indexOf("O")>=0)||(Mv.indexOf("0")>=0)){if((Mv.indexOf("O-O-O")>=0)||(Mv.indexOf("0-0-0")>=0)||(Mv.indexOf("O-O-O")>=0)||(Mv.indexOf("0-0-0")>=0)){if(EvalMove(BNr,-1,6,-1,-1,-1,x1,y1,0,-1))return(1);return(0);}
if((Mv.indexOf("O-O")>=0)||(Mv.indexOf("0-0")>=0)||(Mv.indexOf("O?O")>=0)||(Mv.indexOf("0?0")>=0)){if(EvalMove(BNr,-1,7,-1,-1,-1,x1,y1,0,-1))return(1);return(0);}
return(0);}
if((Mv.indexOf("---")>=0)||(Mv.indexOf("???")>=0)){if(EvalMove(BNr,-1,8,-1,-1,-1,x1,y1,0,-1))return(1);return(0);}
return(0);}
function ParseMove(BNr,Mv){var ii,jj,ffrom="",ccapt=0,ll,Fig=Pawn,x0=-1,y0=-1,Fig2=-1,x1=-1,y1=-1;var rMv=MvCount[BNr]-1,bw=MvTyp[BNr],CanPass=-1;ii=Mv.length-1;while(ii>0){if(!isNaN(Mv.charAt(ii))){x1=Mv.charCodeAt(ii-1)-97;y1=Mv.charAt(ii)-1;ffrom=Mv.substring(0,ii-1);jj=ii;break;}
ii--;}
ii=Check4Castling(BNr,Mv,x1,y1);if(ii>=0)return(ii);ll=ffrom.length-1;if(ll>=0){for(ii=0;ii<5;ii++){if(ffrom.charCodeAt(0)==PieceCode[ii]){Fig=ii;ffrom=ffrom.slice(1);ll--;}}}
if(ll>=0){if(ffrom.charAt(ll)=="x"){ccapt=1;ll--;}else{if((ffrom.charAt(ll)=="-")||(ffrom.charAt(ll)=="?"))ll--;}}
if(ll>=0){if(!isNaN(ffrom.charAt(ll))){y0=ffrom.charAt(ll)-1;if((y0<0)||(y0>7))y0=-1;ll--;}}
if(ll>=0){if(isNaN(ffrom.charAt(ll))){x0=ffrom.charCodeAt(ll)-97;if((x0<0)||(x0>7))x0=-1;ll--;}}
if(rMv>=0){ii=HPiece[BNr][0][rMv];if((HTyp[BNr][0][rMv]==Pawn)&&(Math.abs(HPosY[BNr][0][rMv]-PosY[BNr][1-bw][ii])==2))CanPass=PosX[BNr][1-bw][ii];}
if(Brd[BNr][x1][y1]!=0)ccapt=1;else{if((Fig==5)&&(x1==CanPass)&&(y1==5-3*bw))ccapt=1;}
Fig2=Fig;ii=Mv.indexOf("=");if(ii>0)jj=ii;if((jj>0)&&(jj<Mv.length-1)){if(Fig==Pawn){ii=Mv.charCodeAt(jj+1);for(ll=1;ll<5;ll++){if(ii==PieceCode[ll])Fig2=ll;}}}
for(ii=0;ii<16;ii++){if(Piece[BNr][bw][ii]==Fig){if(EvalMove(BNr,ii,Fig,x0,y0,Fig2,x1,y1,ccapt,CanPass))return(1);}}
return(0);}
function EvalMove(BNr,ii,Fig,x0,y0,Fig2,x1,y1,ccapt,CanPass){var dx,dy,xx,yy,jj=-1,Fig_prom=-1;var bw=MvTyp[BNr],Xii=PosX[BNr][bw][ii],Yii=PosY[BNr][bw][ii];var BRD=Brd[BNr],X=PosX[BNr][bw],Y=PosY[BNr][bw];if(Fig==OOO){jj=CanCastleLong(BNr);if(jj<0)return(false);if(StoreMove(BNr,0,0,2,bw*7,jj,2,3,bw*7))return(true);return(false);}
if(Fig==OO){jj=CanCastleShort(BNr);if(jj<0)return(false);if(StoreMove(BNr,0,0,6,bw*7,jj,2,5,bw*7))return(true);return(false);}
if(Fig==NullM){if(StoreMove(BNr,0,0,PosX[BNr][bw][0],PosY[BNr][bw][0],-1,-1,-1,-1))return(true);return(false);}
if((Xii==x1)&&(Yii==y1))return(false);if((ccapt>0)&&(sign(BRD[x1][y1])!=(2*bw-1))){if((Fig!=Pawn)||(CanPass!=x1)||(y1!=5-3*bw))return(false);}
if(((x0>=0)&&(x0!=Xii))||((y0>=0)&&(y0!=Yii)))return(false);if(Fig==King){if((Math.abs(Xii-x1)>1)||(Math.abs(Yii-y1)>1))return(false);}
if(Fig==Queen){if(((Math.abs(Xii-x1)!=Math.abs(Yii-y1)))&&((Xii-x1)*(Yii-y1)!=0))return(false);}
if(Fig==Rook){if((Xii-x1)*(Yii-y1)!=0)return(false);}
if(Fig==Bishop){if(Math.abs(Xii-x1)!=Math.abs(Yii-y1))return(false);}
if(Fig==Night){if(Math.abs(Xii-x1)*Math.abs(Yii-y1)!=2)return(false);}
if((Fig==Queen)||(Fig==Rook)||(Fig==Bishop)){dx=sign(x1-Xii);dy=sign(y1-Yii);xx=Xii+dx;yy=Yii+dy;while((xx!=x1)||(yy!=y1)){if(BRD[xx][yy]!=0)return(false);xx+=dx;yy+=dy;}}
if(Fig==Pawn){if((Math.abs(Xii-x1)!=ccapt)||((y1==7*(1-bw))&&(Fig==Fig2)))return(false);if(ccapt==0){if(Yii-y1==4*bw-2){if(Yii!=1+5*bw)return(false);if(BRD[x1][y1+2*bw-1]!=0)return(false);}else{if(Yii-y1!=2*bw-1)return(false);}}else{if(Yii-y1!=2*bw-1)return(false);}}
if(Fig2!=Fig){if((Fig!=Pawn)||(Fig2>=Pawn)||(y1!=7-7*bw))return(false);}
if((Fig<=Pawn)&&(ccapt>0)){jj=15;var wb=1-bw;while(jj>=0){if((Piece[BNr][wb][jj]>0)&&(PosX[BNr][wb][jj]==x1)&&(PosY[BNr][wb][jj]==y1)){Fig_prom=Piece[BNr][wb][jj];break;}
else jj--;}
if((Fig_prom==-1)&&(Fig==Pawn)&&(CanPass>=0)){jj=15;while(jj>=0){if((Piece[BNr][wb][jj]==5)&&(PosX[BNr][wb][jj]==x1)&&(PosY[BNr][wb][jj]==y1-1+2*bw)){Fig_prom=Piece[BNr][wb][jj];break;}
else jj--;}}
Fig_prom=-1;}
if(StoreMove(BNr,ii,Fig2,x1,y1,jj,Fig_prom,-1,-1))return(true);return(false);}
function Save2Hist(BNr,Mv,bw,ind,ii,Adder){HPiece[BNr][ind][Mv]=ii+Adder;HTyp[BNr][ind][Mv]=Piece[BNr][bw][ii];HPosX[BNr][ind][Mv]=PosX[BNr][bw][ii];HPosY[BNr][ind][Mv]=PosY[BNr][bw][ii];}
function SetField2Val(BNr,bw,ind,val){Brd[BNr][PosX[BNr][bw][ind]][PosY[BNr][bw][ind]]=val;}
function StoreMove(BNr,ii,Fig,x2,y2,jj,Fig2,x3,y3){var iis_check=0,ll,Mv=MvCount[BNr],dd=0;var bw=MvTyp[BNr],wb=1-bw;HPiece[BNr][1][Mv]=-1;Save2Hist(BNr,Mv,bw,0,ii,0);SetField2Val(BNr,bw,ii,0);if((PosX[BNr][bw][ii]!=x2)||(PosY[BNr][bw][ii]!=y2)||(jj>=0)){PMovs[BNr][bw][ii]++;dd++;}
if(jj>=0){if(Fig2<0){Save2Hist(BNr,Mv,1-bw,1,jj,16);SetField2Val(BNr,1-bw,jj,0)
Piece[BNr][1-bw][jj]=Fig2;PMovs[BNr][1-bw][jj]++;SetField2Val(BNr,1-bw,jj,0);}else{Save2Hist(BNr,Mv,bw,1,jj,0);SetField2Val(BNr,bw,jj,0)
PosX[BNr][bw][jj]=x3;PosY[BNr][bw][jj]=y3;PMovs[BNr][bw][jj]++;SetField2Val(BNr,bw,jj,(Piece[BNr][bw][jj]+1)*(1-2*bw));}}
Piece[BNr][bw][ii]=Fig;PosX[BNr][bw][ii]=x2;PosY[BNr][bw][ii]=y2;SetField2Val(BNr,bw,ii,(Fig+1)*(1-2*bw));if((Fig==King)&&(Fig2==Rook)){while(PosX[BNr][bw][King]>x2){iis_check+=IsCheck(BNr,PosX[BNr][bw][King],bw*7,bw);PosX[BNr][bw][King]--;}
while(PosX[BNr][bw][King]<x2){iis_check+=IsCheck(BNr,PosX[BNr][bw][King],bw*7,bw);PosX[BNr][bw][King]++;}}
iis_check+=IsCheck(BNr,PosX[BNr][bw][King],PosY[BNr][bw][0],bw);if(iis_check==0)return(true);SetField2Val(BNr,bw,ii,0);Brd[BNr][HPosX[BNr][0][Mv]][HPosY[BNr][0][Mv]]=(HTyp[BNr][0][Mv]+1)*(1-2*bw);Piece[BNr][bw][ii]=HTyp[BNr][0][Mv];PosX[BNr][bw][ii]=HPosX[BNr][0][Mv];PosY[BNr][bw][ii]=HPosY[BNr][0][Mv];PMovs[BNr][bw][ii]-=dd;if(jj>=0){if(Fig2>=0){Brd[BNr][PosX[BNr][bw][jj]][PosY[BNr][bw][jj]]=0;Brd[BNr][HPosX[BNr][0][Mv]][HPosY[BNr][0][Mv]]=(HTyp[BNr][0][Mv]+1)*(1-2*bw);Brd[BNr][HPosX[BNr][1][Mv]][HPosY[BNr][1][Mv]]=(HTyp[BNr][1][Mv]+1)*(1-2*bw);Piece[BNr][bw][jj]=HTyp[BNr][1][Mv];PosX[BNr][bw][jj]=HPosX[BNr][1][Mv];PosY[BNr][jj]=HPosY[BNr][1][Mv];PMovs[BNr][bw][jj]--;}else{Brd[BNr][HPosX[BNr][1][Mv]][HPosY[BNr][1][Mv]]=(HTyp[BNr][1][Mv]+1)*(2*bw-1);Piece[BNr][wb][jj]=HTyp[BNr][1][Mv];PosX[BNr][wb][jj]=HPosX[BNr][1][Mv];PosY[BNr][wb][jj]=HPosY[BNr][1][Mv];PMovs[BNr][wb][jj]--;}}
if(iis_check==0)return(true);return(false);}
function IsCheck(BNr,xx,yy,bw){var x0=xx,y0=yy,dx,dy,bb;for(dx=-2;dx<=2;dx+=4){for(dy=-1;dy<=1;dy+=2){if(IsOnBoard(x0+dx,y0+dy)){if(Brd[BNr][x0+dx][y0+dy]==10*bw-(Night+1))return(1);}}}
for(dx=-1;dx<=1;dx+=2){for(dy=-2;dy<=2;dy+=4){if(IsOnBoard(x0+dx,y0+dy)){if(Brd[BNr][x0+dx][y0+dy]==10*bw-(Night+1))return(1);}}}
dy=1-2*bw;for(dx=-1;dx<=1;dx+=2){if(IsOnBoard(x0+dx,y0+dy)){if(Brd[BNr][x0+dx][y0+dy]==12*bw-(Pawn+1))return(1);}}
if((Math.abs(PosX[BNr][1-bw][King]-xx)<2)&&(Math.abs(PosY[BNr][1-bw][King]-yy)<2))return(1);for(dx=-1;dx<=1;dx++){for(dy=-1;dy<=1;dy++){if((dx!=0)||(dy!=0)){x0=xx+dx;y0=yy+dy;bb=0;while((IsOnBoard(x0,y0))&&(bb==0)){bb=Brd[BNr][x0][y0];if(bb==0){x0+=dx;y0+=dy;}
else{if(bb==4*bw-(Queen+1))
return(1);if((bb==6*bw-(Rook+1))&&((dx==0)||(dy==0)))
return(1);if((bb==8*bw-(Bishop+1))&&(dx!=0)&&(dy!=0))
return(1);}}}}}
return(0);}
function IsOnBoard(ii,jj){if((ii<0)||(ii>7)||(jj<0)||(jj>7))return(false);return(true);}
function OpenGames(){for(var BNr=0;BNr<(Rows*Cols);BNr++){var sel=GetActiveGame(BNr);if(BNr>=PgnMoveText.length)break;Tags[BNr]=Tags[sel];OpenGame(BNr,sel);}
WriteCookie();}
function OpenGame(BNr,GameNr){if(isMoving){setTimeout('OpenGame('+BNr+','+GameNr+')',TimeOut);return;}
if(GameNr<0)return;if(Tags[GameNr]["SAN"])ApplySAN(Tags[GameNr]["SAN"]);WriteCookie();with(document){if(getElementById){getElementById('pgn-'+BNr).innerHTML=GetHTMLMoveText(BNr);if(Tags[GameNr]["Result"]!="*")
getElementById('Result-'+BNr).innerHTML=Tags[GameNr]["Result"].substr(0,3);else
getElementById('Result-'+BNr).innerHTML="...";}}
RefreshBoard(BNr)}
function UpdateViewer(){SkipRefresh=1;WriteSelGames();OpenGames();SkipRefresh=0;}
function ModifyTOMA(pgn){pgn=pgn.replace(/[\n\r]/g,'');pgn=pgn.replace(/\{ *\[%clk *(\d+):(\d+)/g,'\{$1:$2');pgn=pgn.replace(/(\d+) *\] *\}/g,'$1\}');pgn=pgn.replace(/\{(\d+):(\d+)\}/g,'\{$1:$2:00\}');pgn=pgn.replace(/\{(\d+):(\d+)\.(\d+)\}/g,'\{$1:$2:$3\}');return(pgn);}
function AnalyzePgn(){var pgn=document.getElementById('pgnfile').value;if(pgn=="")return;pgn=HTML2Text(pgn);pgn=ModifyTOMA(pgn);var ii,j,NrGames=-1,IsNewGame=1,ll=0,TagName,TagContent,kk,ff,found=0;var ppgnText=new Array();var GlobTags=new Object();GlobTags["Event"]="";GlobTags["Site"]="";GlobTags["BroadcastTime"]="";GlobTags["UpdateInterval"]=UpdateInterval;GlobTags["AllowPostings"]=AllowPostings;function TagNames(){};TagNames["Black"]="Schwarz";TagNames["White"]="Weiss";TagNames["Result"]="*";TagNames["WhiteElo"]="";TagNames["BlackElo"]="";TagNames["ActTime"]="";TagNames["FEN"]="";TagNames["SAN"]="";TagNames["Round"]="";var lTags=new Array();var Results=new Array("*","1/2-1/2","1-0","0-1");aPgnText=pgn.split("[");var Parts=new Array(aPgnText.length-1);for(ii=1;ii<aPgnText.length;ii++)Parts[ii-1]=aPgnText[ii].split("]");for(ii=0;ii<Parts.length;ii++){TagName=Parts[ii][0].split(" ")[0];TagContent=Parts[ii][0].split("\"")[1];if(NrGames==-1){for(kk in GlobTags){if(TagName==kk){GlobTags[kk]=TagContent;break;}}}
for(kk in TagNames){if(TagName==kk){if(IsNewGame){NrGames++;lTags[NrGames]=new TagNames;ppgnText[NrGames]="...";IsNewGame=0;}
lTags[NrGames][kk]=TagContent;break;}}
if(Parts[ii].length!=2)continue;ff=Parts[ii][1]
for(j=0;j<4;j++){if(ff.indexOf(Results[j])>=0){ppgnText[NrGames]=ff;IsNewGame=1;break;}}}
if(document.getElementById('BroadcastTime'))document.getElementById('BroadcastTime').innerHTML=GlobTags["BroadcastTime"];UpdateInterval=GlobTags["UpdateInterval"];ii=parseInt(GlobTags["AllowPostings"]);if((AllowPostings!=2)&&(AllowPostings!=ii)){AllowPostings=ii;document.getElementById("Post").value=textPosts[AllowPostings];}
if(NrGames<0)return;PgnMoveText=ppgnText;Tags=lTags;setTimeout("UpdateViewer()",0);}
function PrepGames4Demo(){IsDemo++;return(PgnFileName+"?Demo="+IsDemo*UpdateInterval+"&UpdateInterval="+UpdateInterval);}
function PrepGames4Demo(NoG){var BNr,NrOfBoards=(Rows*Cols);Games=new Array(NoG);for(i=0;i<=NoG;i++)Games[i]=-1;for(BNr=0;BNr<NrOfBoards;BNr++){i=GetActiveGame(BNr);Games[i]=BNr;}
for(var i=0;i<=NoG;i++){BNr=Games[i];if(BNr>=0){ssearch=Math.floor(LastMove[BNr]/2+1+Math.round(Math.random()*3))+".";llst=PgnMoveText[i].indexOf(ssearch);if(llst>0){PgnMoveText[i]=PgnMoveText[i].substring(0,llst)+" *";Tags[BNr]["Result"]="*";}}else PgnMoveText[i]="";}
gLastFileContent=0;}
function getHttpRequest(FileN,URIString){if(IsLoading){var x='getHttpRequest("'+FileN+'","'+URIString+'")';setTimeout(x,200);return;}
var isPosting=true;if(FileN==PgnFileName)isPosting=0;else if(FileN==PostingFileName)isPosting=1;else isPosting=2;var xmlHttp=null;if(typeof XMLHttpRequest!='undefined'){xmlHttp=new XMLHttpRequest();}else{if(!xmlHttp){try{xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");}catch(e){try{xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");}catch(e){xmlHttp=null;}}}}
if(!xmlHttp)return;IsLoading=1;if(isPosting==0){with(document){if(getElementById('ShowUpdateTime'))getElementById('ShowUpdateTime').innerHTML="lade...";getElementById('UpdateTime').value=UpdateInterval;}}
xmlHttp.open('GET',FileN+URIString,true);if(isPosting==1){xmlHttp.onreadystatechange=function(){if(xmlHttp.readyState==4){if(document.getElementById("Postings"))document.getElementById("Postings").innerHTML=unescape(xmlHttp.responseText);IsLoading=0;}}}else if(isPosting==2){xmlHttp.onreadystatechange=function(){if(xmlHttp.readyState==4){if(document.getElementById("Post")&&(document.getElementById("Post").value==PostingFeedback))document.getElementById("Post").value="";IsLoading=0;}}}else{xmlHttp.onreadystatechange=function(){if(xmlHttp.readyState==4){document.getElementById('pgnfile').value=xmlHttp.responseText;if(document.getElementById('ShowUpdateTime'))document.getElementById('ShowUpdateTime').innerHTML=UpdateInterval+' sec';AnalyzePgn();IsLoading=0;}}};xmlHttp.send(null);}
function DecrementTime(BNr){if(!IsLive[BNr]||(TimeCountDown==0)||(Tags[BNr]["Result"]!="*")){return;};var Time=InitialClock,sec,s,m,h;blwh=new Array('TimeWhite-'+BNr,'TimeBlack-'+BNr);var tPlayer=blwh[(MvCount[BNr]+GetIsRotated(BNr))%2];with(document){if(getElementById&&(getElementById(tPlayer)))Time=getElementById(tPlayer).innerHTML;}
var t=Time.split(":");sec=t[0]*3600;sec+=t[1]*60;sec+=t[2]*1;sec--;s=sec%60;if(s<10)s="0"+s;m=parseInt(sec/60)%60;if(m<10)m="0"+m;h=parseInt(sec/3600);document.getElementById(tPlayer).innerHTML=h+":"+m+":"+s;}
function CountDown(t){var BNr,MaxMv;t--;with(document){getElementById('UpdateTime').value=t;if(getElementById('ShowUpdateTime'))getElementById('ShowUpdateTime').innerHTML=t+" sec";}
for(BNr=0;BNr<(Rows*Cols);BNr++){if(BNr<PgnMoveText.length)DecrementTime(BNr)}}
function UpdateFile(force){if(IsLoading>0){setTimeout("UpdateFile(1)",200);return;}
if(document.getElementById('UpdateTime')){t=document.getElementById('UpdateTime').value;}else{t=0};if(force==1){t=0;}
if((!isNaN(t))&&(t>1)){CountDown(t);}else{getHttpRequest(PgnFileName,"?T="+Math.random());if(DisplayPostings)getHttpRequest(PostingFileName,"?T="+Math.random());}
if(UpdateInterval>0)setTimeout("UpdateFile(0)",1000);}
;