
var m0 = new Array(1)

m0[1] = new Array(8,16,25,32,11,19,50,42);
m0[1].base = new Array(6,7,8,9,0);
m0[1].root =0;
m0[1].move =5;
m0[3] = new Array(60,62,127,61);
m0[3].base = new Array(16,16,0);
m0[3].root =2;
m0[3].move =2;
m0[2] = new Array(25,18,9,18,51,35,28,35,42,35,3,11,57,42);
m0[2].base = new Array(13,14,15,17,18,19,20,0);
m0[2].root =0;
m0[2].move =8;
m0[4] = new Array(2,11);
m0[4].base = new Array(22,0);
m0[4].root =0;
m0[4].move =9;
m0[5] = new Array(36,29,2,29,60,62,127,61,29,43,61,60,5,12,32,50,43,50,59,50,6,21,51,35);
m0[5].base = new Array(24,25,26,26,27,28,29,30,31,32,33,34,0);
m0[5].root =0;
m0[5].move =10;
m0[7] = new Array(9,25);
m0[7].base = new Array(39,0);
m0[7].root =6;
m0[7].move =4;
m0[6] = new Array(51,43,6,21,60,62,127,61,29,36,43,36,5,12,57,51,21,11,49,33,11,5,61,60,2,20,51,61,5,22,32,41,3,11,61,44,4,6,71,5,44,27);
m0[6].base = new Array(35,36,37,37,38,40,41,42,43,44,45,46,47,48,49,50,51,52,53,53,54,0);
m0[6].root =0;
m0[6].move =10;
m0[8] = new Array(45,28);
m0[8].base = new Array(57,0);
m0[8].root =0;
m0[8].move =12;
m0[9] = new Array(2,29,59,41);
m0[9].base = new Array(59,60,0);
m0[9].root =0;
m0[9].move =13;
m0[11] = new Array(35,42,57,42);
m0[11].base = new Array(64,65,0);
m0[11].root =10;
m0[11].move =1;
m0[10] = new Array(32,41,19,27);
m0[10].base = new Array(62,63,0);
m0[10].root =0;
m0[10].move =14;
m0[12] = new Array(42,35,19,27,60,62,127,61,9,25);
m0[12].base = new Array(66,67,68,68,69,0);
m0[12].root =0;
m0[12].move =14;
m0[13] = new Array(35,42,57,42);
m0[13].base = new Array(71,72,0);
m0[13].root =0;
m0[13].move =15;
m0[14] = new Array(32,18,9,18,59,35,4,6,71,5,30,21,12,21,36,21,3,21,35,21,5,21,53,45);
m0[14].base = new Array(76,77,78,79,79,80,81,82,83,84,85,86,0);
m0[14].root =0;
m0[14].move =18;
m0[15] = new Array(42,35,21,36);
m0[15].base = new Array(87,88,0);
m0[15].root =0;
m0[15].move =18;
m0[17] = new Array(32,18,9,18,42,35,0,1);
m0[17].base = new Array(92,93,94,95,0);
m0[17].root =16;
m0[17].move =3;
m0[16] = new Array(30,21,12,21,60,62,127,61);
m0[16].base = new Array(89,90,91,91,0);
m0[16].root =0;
m0[16].move =18;
m0[19] = new Array(2,11,59,31,4,5,27,13);
m0[19].base = new Array(104,105,106,107,0);
m0[19].root =18;
m0[19].move =2;
m0[18] = new Array(21,30,32,59,3,11,59,38,11,38,27,18,4,13,18,0);
m0[18].base = new Array(101,102,103,108,109,110,111,112,0);
m0[18].root =0;
m0[18].move =23;
m0[20] = new Array(27,18,2,11,18,36,21,30);
m0[20].base = new Array(114,115,116,117,0);
m0[20].root =0;
m0[20].move =24;
m0[21] = new Array(2,9,27,31,4,11,31,29,11,4,29,31,4,11,31,29);
m0[21].base = new Array(119,120,121,122,123,124,125,126,0);
m0[21].root =0;
m0[21].move =25;
m0[22] = new Array(2,11,27,31);
m0[22].base = new Array(127,128,0);
m0[22].root =0;
m0[22].move =25;
m0[23] = new Array(18,28,27,0);
m0[23].base = new Array(129,130,0);
m0[23].root =0;
m0[23].move =25;
m0[24] = new Array(27,31,4,3);
m0[24].base = new Array(132,133,0);
m0[24].root =0;
m0[24].move =27;
m0[25] = new Array(7,5,14,5,4,5);
m0[25].base = new Array(137,138,139,0);
m0[25].root =0;
m0[25].move =31;
m0[26] = new Array(7,6,27,6,12,5,6,5);
m0[26].base = new Array(140,141,142,143,0);
m0[26].root =0;
m0[26].move =31;
m0[27] = new Array(3,7);
m0[27].base = new Array(146,0);
m0[27].root =0;
m0[27].move =33;
m0[28] = new Array(27,51,28,45,54,45,3,6,62,63,9,45);
m0[28].base = new Array(148,149,150,151,152,153,0);
m0[28].root =0;
m0[28].move =34;
m0[29] = new Array(3,7);
m0[29].base = new Array(155,0);
m0[29].root =0;
m0[29].move =35;
m0[31] = new Array(54,45,3,6,62,63,11,38);
m0[31].base = new Array(158,159,160,161,0);
m0[31].root =30;
m0[31].move =1;
m0[32] = new Array(63,54,11,38,54,63,45,60);
m0[32].base = new Array(166,167,168,169,0);
m0[32].root =30;
m0[32].move =5;
m0[33] = new Array(59,52,54,55);
m0[33].base = new Array(170,171,0);
m0[33].root =30;
m0[33].move =5;
m0[34] = new Array(56,60,54,38,45,39,38,39);
m0[34].base = new Array(176,177,178,179,0);
m0[34].root =30;
m0[34].move =9;
m0[35] = new Array(53,55,45,55,47,46);
m0[35].base = new Array(185,186,187,0);
m0[35].root =30;
m0[35].move =14;
m0[30] = new Array(28,45,62,63,3,6,57,51,6,54,59,45,9,45,51,45,11,47,61,62,54,53,62,6,2,9,6,46,47,31,56,60,53,45);
m0[30].base = new Array(156,157,162,163,164,165,172,173,174,175,180,181,182,183,184,188,189,0);
m0[30].root =0;
m0[30].move =35;
m0[36] = new Array(59,35,3,6,54,46,11,47);
m0[36].base = new Array(191,192,193,194,0);
m0[36].root =0;
m0[36].move =36;
m0[38] = new Array(11,38,54,46,38,47);
m0[38].base = new Array(197,198,199,0);
m0[38].root =37;
m0[38].move =1;
m0[37] = new Array(59,60,11,47,54,47,3,6,7,14,6,14);
m0[37].base = new Array(195,196,200,201,202,203,0);
m0[37].root =0;
m0[37].move =36;
m0[0] = new Array(52,36,12,28,62,45,1,18,61,25,11,19,50,42,8,16,25,32,13,29,51,35,29,36,45,30,28,35,30,36,6,21,58,30,5,12,59,35,9,25,36,21,14,21,35,27,25,32,30,23,3,11,60,62,127,61,2,9,23,14,4,2,64,3,14,7,18,28,27,59,9,45,54,45,11,47);
m0[0].base = new Array(0,1,2,3,4,5,10,11,12,21,23,55,56,58,61,70,73,74,75,96,97,98,99,100,113,118,131,131,134,135,136,136,144,145,147,154,190,204,0);
m0[0].root =0;
m0[0].move =0;
var n0 = new Array();
var b0 = -1;
var pieces = "KQNBR ";
var pos_after = "Position after ";
var start_pos = "Startposition ";
function g0(a,b)
{	gm(m0,n0,0,b0,'retcaprpg0.htm',a,b);}
function MB_50()
{b0=MB_5(m0,n0,0,b0,'retcaprpg0.htm'); GMS(m0,n0,0,b0,'retcaprpg0.htm');}
function MB0()
{b0=MB(m0,n0,0,b0,'retcaprpg0.htm'); GMS(m0,n0,0,b0,'retcaprpg0.htm');}
function MF_50()
{b0=MF_5(m0,n0,0,b0,'retcaprpg0.htm'); GMS(m0,n0,0,b0,'retcaprpg0.htm');}
function MF0()
{b0=MF(m0,n0,0,b0,'retcaprpg0.htm',0); GMS(m0,n0,0,b0,'retcaprpg0.htm');}
var nMoves = new Array(0,0);
var nLevels = new Array(0,0);
var nNameCount = new Array(0,0);
var nOld = new Array(-1,-1);
baseName = 'retcaprp';
var EmptyWhitePath = "gif/w.gif";
var EmptyBlackPath = "gif/b.gif";
var gifPath  = 'gif/';
var BackColor = "#E0B8B8";
var leftWindow		= this;
var rightWindow		= this;
var bFrames = 0;
var leftDocument		= leftWindow.document;
var rightDocument	= rightWindow.document;
// Copyright 98,99,00,01 by ChessBase GmbH, Germany
function Init( path )
{ gifs = new Array(6);
	for ( var i=0; i< 26; i++)
		gifs[i]= new Image();
	gifs[0].src = path + "b.gif";
	gifs[1].src = path + "bbb.gif";
	gifs[2].src = path + "bbw.gif";
	gifs[3].src = path + "bkb.gif";
	gifs[4].src = path + "bkw.gif";
	gifs[5].src = path + "bqb.gif";
	gifs[6].src = path + "bqw.gif";
	gifs[7].src = path + "brb.gif";
	gifs[8].src = path + "brw.gif";
	gifs[9].src = path + "bnb.gif";
	gifs[10].src = path + "bnw.gif";
	gifs[11].src = path + "wbb.gif";
	gifs[12].src = path + "wbw.gif";
	gifs[13].src = path + "wrb.gif";
	gifs[14].src = path + "wrw.gif";
	gifs[15].src = path + "wqb.gif";
	gifs[16].src = path + "wqw.gif";
	gifs[17].src = path + "wkb.gif";
	gifs[18].src = path + "wkw.gif";
	gifs[19].src = path + "wnb.gif";
	gifs[20].src = path + "wnw.gif";
	gifs[21].src = path + "wpb.gif";
	gifs[22].src = path + "wpw.gif";
	gifs[23].src = path + "bpb.gif";
	gifs[24].src = path + "wpb.gif";
	gifs[25].src = path + "b.gif";
}
function SyncPicture( base, basename )
{	if ( base > -1 ) return base;
	for ( i=0; i < leftDocument.images.length; i++ )
	{	if ( leftDocument.images[i].name != "" )
			if ( leftDocument.images[i].name == basename )
				return i;
			else if ( leftDocument.images[i].name.substring(0,3) == basename.substring(0,3) )
				i+= 63;
	}
	return -1;
}
function MF_5( moves, names, nm, base, basename )
{	base = SyncPicture( base, basename );
	for ( i=0; nMoves[nm] < moves[nLevels[nm]].length / 2 && i < 10; i++ )
		MF( moves, names, nm, base, false );
	return base;
}
function MB_5( moves, names, nm, base, basename )
{	base = SyncPicture( base, basename );
	for ( i=0; ( nMoves[nm] > 0 || nLevels[nm] > 0 ) && i < 10; i++ )
		MB( moves, names, nm, base );
	return base;
}
function GoStart( moves, names, nm, base, basename )
{	base = SyncPicture( base, basename );
	while ( nMoves[nm] > 0 || nLevels[nm] > 0 )
		MB( moves, names, nm, base );
	return base;
}
function GoEnd( moves, names, nm, base, basename )
{	base = SyncPicture( base, basename );
	while ( nMoves[nm] < moves[nLevels[nm]].length / 2 )
		MF( moves, names, nm, base, false );
	return base;
}
function MF( moves, names, nm, base, basename, bCheckV )
{	base = SyncPicture( base, basename );
	if ( bCheckV )
	{	var b = false;
		for ( i=0; i < moves.length; i++ )
			if ( i != nLevels[nm] && moves[i].root == nLevels[nm] && moves[i].move == nMoves[nm] )
				b = true;
		if ( b )
		{	GenerateVarWindow(moves, names, nm, base, basename);
			return base;
		}
	}
	if ( nMoves[nm] < moves[nLevels[nm]].length / 2 )
	{	var n = nMoves[nm]*2;
		var from = moves[nLevels[nm]][ n ] & 0x3f;
		var to = moves[nLevels[nm]][ n+1 ] & 0x3f;
		names[ nNameCount[nm]   ] = leftDocument.images[ base + from ].src;
		names[ nNameCount[nm]+1 ] = leftDocument.images[ base + to ].src;
		var len = names[nNameCount[nm]].length;
		var nn = (Math.floor(( to / 8 )) + ( to % 8 ));
		var dest = ( nn % 2 ) == 1 ? "b" : "w";
		var piece = names[nNameCount[nm]].substring(len-6,len-5);
		if (( moves[nLevels[nm]][ n ] & 0x380 ) == 0x80 )
			piece = "q";
		else if (( moves[nLevels[nm]][ n ] & 0x380 ) == 0x100 )
			piece = "n";
		else if (( moves[nLevels[nm]][ n ] & 0x380 ) == 0x180 )
			piece = "b";
		else if (( moves[nLevels[nm]][ n ] & 0x380 ) == 0x200 )
			piece = "r";
		leftDocument.images[ base + to ].src = names[nNameCount[nm]].substring(0,len-6) + piece + dest + names[nNameCount[nm]].substring(len-4,len);
		nn = (Math.floor(( from / 8 )) + ( from % 8 ));
		if (( nn % 2 ) == 1 )
			leftDocument.images[ base + from ].src = EmptyBlackPath;
		else
			leftDocument.images[ base + from ].src = EmptyWhitePath;
		nMoves[nm]++;
		nNameCount[nm] = nNameCount[nm] + 2;
		if ( nMoves[nm] < moves[nLevels[nm]].length / 2 && ( moves[nLevels[nm]][ nMoves[nm]*2 ] & 0x40 ) == 0x40 )
			MF( moves, names, nm, base, bCheckV );
	}
	return base
}
function MB( moves, names, nm, base, basename )
{	base = SyncPicture( base, basename );
	if ( nMoves[nm] > 0 )
	{	nMoves[nm]--;
		nNameCount[nm] -= 2;
		var from = moves[nLevels[nm]][ nMoves[nm]*2 ] & 0x3f;
		var to = moves[nLevels[nm]][ nMoves[nm]*2+1 ] & 0x3f;
		leftDocument.images[ base + from ].src = names[ nNameCount[nm] ];
		leftDocument.images[ base + to ].src = names[ nNameCount[nm]+1 ];
		if (( moves[nLevels[nm]][ nMoves[nm]*2 ] & 0x40 ) == 0x40 )
			MB( moves, names, nm, base );
	}
	if ( nMoves[nm] == 0 )
		if ( nLevels[nm] > 0 )
		{	nMoves[nm] = moves[nLevels[nm]].move;
			nLevels[nm] = moves[nLevels[nm]].root;
			if (( moves[nLevels[nm]][nMoves[nm]*2] & 0x40 ) == 0x40 )
				nMoves[nm]--;
		}
	return base;
}
function GMS2(  moves, names, nm, base, nMoveNumber, nLevel, basename )
{	if ( nMoveNumber > 0 )
	{	var n = (nMoveNumber-1)*2;
		var off=1;
		for ( i=0; i <= n; i += 2 )
			if (( moves[nLevel][i] & 0x40 ) == 0x40 )
				off = off+1;
		var from = moves[nLevel][ n ] & 0x3f;
		var to = moves[nLevel][ n+1 ] & 0x3f;
		var len = leftDocument.images[ base + to ].src.length;
		var piece = leftDocument.images[ base + to ].src.substring(len-6,len-5);
		if ( piece == "q" )
			piece = pieces.substring(1,2);
		else if ( piece == "r" )
			piece = pieces.substring(4,5);
		else if ( piece == "b" )
			piece = pieces.substring(3,4);
		else if ( piece == "n" )
			piece = pieces.substring(2,3);
		else if ( piece ==  "k" )
			piece = pieces.substring(0,1);
		else piece = pieces.substring(5,6);
		var piece2 = "";
		if (( moves[nLevel][ n ] & 0x380 ) == 0x80 )
			piece2 = pieces.substring(1,2);
		else if (( moves[nLevel][ n ] & 0x380 ) == 0x100 )
			piece2 = pieces.substring(2,3);
		else if (( moves[nLevel][ n ] & 0x380 ) == 0x180 )
			piece2 = pieces.substring(3,4);
		else if (( moves[nLevel][ n ] & 0x380 ) == 0x200 )
			piece2 = pieces.substring(4,5);
		var lines = "abcdefgh";
		var rows = "87654321";
		var fromLine = from%8;
		var fromRow = Math.floor(from/8);
		var toLine = to%8;
		var toRow = Math.floor(to/8);
		var moveNumber = gmn( moves, nLevel ) + nMoveNumber-off;
		var result = (Math.floor((moveNumber)/2)+1).toString() + ". ";
		if ( leftDocument.images[ base + to ].src.substring(len-7,len-6) == "b" )
			result = result + "... ";
		if ( n >= 2 && (( moves[nLevel][n] & 0x40 ) == 0x40 ))
		{	if (( moves[nLevel][n-1] == 62 ) || ( moves[nLevel][n-1] == 6 ))
				result = result + "0-0"
			else if (( moves[nLevel][n-1] == 2 + 7 * 8 ) || ( moves[nLevel][n-1] == 2 + 0 * 8 ))
				result = result + "0-0-0"
			else
			{	var sep = "x";
				from = moves[nLevel][ n-2 ] & 0x3f;
				to = moves[nLevel][ n-1 ] & 0x3f;
				fromLine = from%8;
				fromRow = Math.floor(from/8);
				toLine = to%8;
				toRow = Math.floor(to/8);
				result = result	+ lines.substring( fromLine, fromLine+1 ) + rows.substring( fromRow, fromRow+1 )
										+ sep
										+ lines.substring( toLine, toLine+1 ) + rows.substring( toRow, toRow+1 )
										+ piece2 + " ep";
			}
		}
		else
		{	var len = names[ nNameCount[nm]-1 ].length;
			var substr = names[ nNameCount[nm]-1 ].substring( len-6, len );
			var sep = (( substr == "/w.gif" ) || ( substr == "\\w.gif" ) ||
						  ( substr == "/b.gif" ) || ( substr == "\\b.gif" )) ? "-" : "x";
			if ( piece2 != "" ) piece = "";
			result = result + piece.toUpperCase() + lines.substring( fromLine, fromLine+1 ) + rows.substring( fromRow, fromRow+1 )
				+ sep
				+ lines.substring( toLine, toLine+1 ) + rows.substring( toRow, toRow+1 )
				+ piece2;
		}
	}
	else
		result='';
	if (leftDocument.all)
	{	if ( bFrames )	name = 'i' + baseName + '0';
		else name = 'i' + baseName + nm;
		if ( result == '' )
			leftDocument.all.tags( "DIV" )[name].innerHTML = start_pos;
		else
			leftDocument.all.tags( "DIV" )[name].innerHTML = pos_after + result;
	}
	else if ( leftDocument.layers )
	{	var inx = nm;
		if ( bFrames ) inx = 0;
		leftDocument.layers[inx].document.layers[0].document.clear();
		if ( result == '' )
			var gesamt = "<center>" + start_pos + "</center>";
		else
			var gesamt = "<center>" + pos_after + " " + result + "</center>";
		leftDocument.layers[inx].document.layers[0].document.write(gesamt);
		leftDocument.layers[inx].document.layers[0].document.close();
	}
	return result;
}
function GMS( moves, names, nm, base, basename )
{	base = SyncPicture( base, basename );
	var nLevel = nLevels[nm];
	var nMoveNumber = nMoves[nm];
	if ( nMoveNumber >= 0 && nMoveNumber <= moves[nLevel].length / 2 )
	{	if ( leftDocument.all )
		{	if ( nOld[nm] != -1 )
				rightDocument.anchors[nOld[nm]].style.background=BackColor;
			if ( nMoveNumber > 0 )
			{	nOld[nm] = moves[nLevel].base[nMoveNumber-1];
				rightDocument.anchors[nOld[nm]].style.background="gray";
				with ( rightDocument )
					with ( all.tags("a")[nOld[nm]] )
					{	if ( parent.frames[1] && ( offsetTop > body.scrollTop + offsetParent.offsetHeight - offsetHeight || offsetTop < body.scrollTop ))
							rightWindow.scrollTo( 0, offsetTop - ( offsetParent.offsetHeight / 2 ) );
					}
			}
			else
				nOld[nm] = -1;
		}
		return GMS2( moves, names, nm, base, nMoveNumber, nLevel, basename );
	}
	else
		return "??";
}
function gm( moves, names, nm, base, basename, n, m )
{	base = SyncPicture( base, basename );
	GoStart(moves,names,nm,base,basename );
	gm_sub( moves,names,nm,base,basename,n,m);
	GMS( moves, names, nm, base, basename );
}
function gmn( moves, m )
{	if ( m > 0 )
	{	var off=0;
		var n2 = moves[m].move;
		var m2 = moves[m].root;
		for ( i=0; i <= n2*2; i += 2 )
			if (( moves[m2][i] & 0x40 ) == 0x40 )
				off = off+1;
		return gmn( moves, m2 ) + ( n2 - off );
	}
	return 0;
}
function gm_sub( moves, names, nm, base, basename, n, m )
{	if ( m > 0 )
	{	var off=0;
		var n2 = moves[m].move;
		var m2 = moves[m].root;
		for ( i=0; i <= n2*2; i += 2 )
			if (( moves[m2][i] & 0x40 ) == 0x40 )
				off = off+1;
		gm_sub( moves,names,nm,base, basename, n2-off, m2  );
	}
	nLevels[nm]=m;
	nMoves[nm]=0;
	for ( i=0; i < n; i++ )
		MF(moves,names,nm,base,basename, false);
}
