// =============================================================
// Daily Sudoku from MM Multimedia
//
// Copyright  Crosswords Ltd 2008
//
// This script is for distribution to any web site participating
// in the MM Multimedia Daily Sudoku Subscription
//
// Version 1.26 24-Sep-2005
// =============================================================

var g 		= [[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0]];
var sol 	= [[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0]];
var clues	= [[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0]];
var mask	= [[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0],[0,0,0,0,0,0,0,0,0]];
var last_back_col = '';
var last_name = '';
var timerID = 0;
var tStart  = null;

function bit2int( m )
{
	switch( m ) {
	case 1   : return 0;
	case 2   : return 1;
	case 4   : return 2;
	case 8   : return 3;
	case 16  : return 4;
	case 32  : return 5;
	case 64  : return 6;
	case 128 : return 7;
	case 256 : return 8;
	}
	return 0;
}
function bit_count( b )
{
    var n = 0;
	if ( !b ) return 0;
    do { ++n; } while ( b &= (b-1) );
    return  n;
}
function vs_valid_number(item)
{
	var okay = true;
//	item.value = item.value.Trim();
	var num = "0123456789";
	for (var intLoop = 0; intLoop < item.value.length; intLoop++) {
	    if (num.indexOf(item.value.charAt(intLoop)) == -1) okay = false;
	}
	if( !okay ) item.value = '';
	return okay;
}
function set_print_square( x, y, val )
{
	var t, s, nt;
	var oRow;

	nt = ( y < 3 ) ? "A" : (( y < 6 ) ? "B" : "C");
	nt = nt + (( x < 3 ) ? "1" : (( x < 6 ) ? "2" : "3"));

	t = document.getElementById(nt);
	oRow = t.rows[y % 3];
	if( val > 0 )
		 oRow.cells[x % 3].innerHTML = val;
	else oRow.cells[x % 3].innerHTML = '&nbsp;';
	oRow.cells[x % 3].className = ( clues[y][x]==true ) ? 'InnerTClues':'InnerTDone';
}

function set_square(x,y,val)
{
	if( document.getElementById('A' + x + y).className == 'DE1'
	 || document.getElementById('A' + x + y).className == 'DE2' ) // White background
	{
		if( val == ' ' || val == '0' || val == 0 )
		{
			document.getElementById('A' + x + y).value = '';
			document.getElementById('A' + x + y).className = (clues[y][x]==true)?'DE1':'DE2';
		}
		else
		{
			document.getElementById('A' + x + y).value = val;
			document.getElementById('A' + x + y).className = (clues[y][x]==true)?'DE1':'DE2';
		}
	}
	else
	{
		if( val == ' ' || val == '0' )
		{
			document.getElementById('A' + x + y).value = '';
			document.getElementById('A' + x + y).className = (clues[y][x]==true)?'DE3':'DE4';
		}
		else
		{
			document.getElementById('A' + x + y).value = val;
			document.getElementById('A' + x + y).className = (clues[y][x]==true)?'DE3':'DE4';
		}
	}
}
function load_board(print_version)
{
	var i, j, c;
	var archive_date = location.search;
	var mySudoku;
	var today = new Date();
	var yesterday = new Date();
	var todayStr,todayTitle;

	var ayear = today.getYear();
	if( ayear < 1900 ) ayear += 1900;

	if( archive_date.length == 0 )
	{
		todayTitle = (today.getMonth()+1) + '/' + today.getDate() + '/' + ayear;
		todayStr = '&m=' + (today.getMonth()+1)  + '&d=' + today.getDate() + '&y=' + ayear;
	}
	else
		todayStr = archive_date.substring(4,archive_date.length);

	if( print_version )
		document.getElementById("ptitle").innerHTML = "<font size=5>The Press Democrat Sudoku for " + todayTitle + "</font>";

	if(window.ActiveXObject)
	{
		var xmlDoc = new ActiveXObject("Msxml2.XMLHTTP");
		xmlDoc.open("GET","http://www.sudokulist.com/feed/fetchSudokuDAILY.asp?accid=5488" + todayStr, false);
	//	xmlDoc.open("GET","http://www.sudokulist.com/player/fetchSudoku.asp?level=m&accid=5488&day=today", false);
		xmlDoc.send();
		mySudoku = xmlDoc.responseXML.xml;
		mySudoku = mySudoku.substring(24,mySudoku.length-2);
	}
	else if(document.implementation && document.implementation.createDocument)
	{
		xmlDoc = new XMLHttpRequest();
		xmlDoc.open("GET", "http://www.sudokulist.com/feed/fetchSudokuDAILYtxt.asp?accid=5488" + todayStr, false);
	//	xmlDoc.open("GET", "http://www.sudokulist.com/player/fetchSudokuTXT.asp?level=m&accid=5488&day=today", false);
		xmlDoc.send(null);
		mySudoku = xmlDoc.responseText;
	//	mySudoku = mySudoku.substring(41,mySudoku.length-2);
	}
	if( mySudoku.indexOf('rror') > 0 )
	{
		alert(mySudoku.substring(6,mySudoku.length-8));
		return;
	}

	if( !print_version )
		switch( mySudoku.charAt(0) ) {
		case 'k' :
			for(i=2;i<=5;i++)
				document.getElementById("devil" + i).src = 'devilfade.gif'; break;
		case 'g' :
			for(i=3;i<=5;i++)
				document.getElementById("devil" + i).src = 'devilfade.gif'; break;
		case 'm' :
			for(i=4;i<=5;i++)
				document.getElementById("devil" + i).src = 'devilfade.gif'; break;
		case 't' :
			for(i=5;i<=5;i++)
				document.getElementById("devil" + i).src = 'devilfade.gif'; break;
		case 'd' :
		}

	stage = 0;

	var d = new Date()

	for(j=0;j<9;j++)
		for(i=0;i<9;i++)
		{
			var c = j*9+i+1;
			if( mySudoku.charAt(c)=='.' )
				g[j][i] = 0;
			else
				g[j][i] = mySudoku.charAt(c)*1;
			sol[j][i] = mySudoku.charAt(c+81)*1;
			if( print_version )
				set_print_square(i,j,g[j][i]);
			else
			{
				if( g[j][i] > 0 )
				{
					clues[j][i] = 1;
					set_square(i,j,g[j][i]);
					document.getElementById('A' + i + j).readOnly = true;
				}
				else
					set_square(i,j,' ');
			}
		}

	if( !print_version ) SWStart();
}
function load_solution()
{
	var i, j, c;
	var mySudoku;
	var today = new Date();
	var yesterday = new Date();
	var todayStr, yesterdayStr, yesterdayDate;
	var archive_date = location.search;
	var yesterdayTitle;

	yesterdayDate = today.getDate() -1 ;
	yesterday.setDate( yesterdayDate );

	var ayear = today.getYear();
	if( ayear < 1900 ) ayear += 1900;

	if( archive_date.length == 0 )
	{
		yesterdayTitle = (yesterday.getMonth()+1) + '/' + yesterday.getDate() + '/' + ayear;
		yesterdayStr = '&m=' + (yesterday.getMonth()+1)  + '&d=' + yesterday.getDate() + '&y=' + ayear;
	}
	else
		yesterdayStr = archive_date.substring(4,archive_date.length);

	document.getElementById("ptitle").innerHTML = "<font size=5>The Press Democrat Sudoku Solution for " + yesterdayTitle + "</font>";

	if(window.ActiveXObject)
	{
		var xmlDoc = new ActiveXObject("Msxml2.XMLHTTP");
		xmlDoc.open("GET", "http://www.sudokulist.com/feed/fetchSudokuDAILY.asp?accid=5488" + yesterdayStr, false);
		xmlDoc.send();
		mySudoku = xmlDoc.responseXML.xml;
		mySudoku = mySudoku.substring(24,mySudoku.length-2);
	}
	else if(document.implementation && document.implementation.createDocument)
	{
		xmlDoc = new XMLHttpRequest();
		xmlDoc.open("GET", "http://www.sudokulist.com/feed/fetchSudokuDAILYtxt.asp?accid=5488" + yesterdayStr, false);
		xmlDoc.send(null);
		mySudoku = xmlDoc.responseText;
	//	mySudoku = mySudoku.substring(41,mySudoku.length-2);
	}
	if( mySudoku.indexOf('rror') > 0 )
	{
		alert(mySudoku.substring(6,mySudoku.length-8));
		return;
	}

	for(j=0;j<9;j++)
		for(i=0;i<9;i++)
		{
			var c = j*9+i+1;
			if( mySudoku.charAt(c)=='.' )
				g[j][i] = 0;
			else
				g[j][i] = mySudoku.charAt(c)*1;
			clues[j][i] = (g[j][i] > 0);
			sol[j][i] = mySudoku.charAt(c+81)*1;
			set_print_square(i,j,sol[j][i]);
		}
}
function convert_str2mask( astr )
{
	var n = 0;
	for(var i=0;i<astr.length;i++)
		n |= (1 << (parseInt(astr.charAt(i))-1));
	return n;3
}
function convert_mask2str( val )
{
	var s= '';
	for(i=1;i<=9;i++)
		if( val & (1 << i-1) )
			s = s + i;
	return s;
}
function Sudoku1( afield )
{
	var x,y,i,j,done,correct;
	if( vs_valid_number(afield) )
	{
		x = afield.id.charAt(1);
		y = afield.id.charAt(2);
		if( afield.value == 0 )
		{
			afield.value = '';
			g[y][x] = 0;
			mask[y][x] = 0;
			set_square( x,y, g[y][x] );
		}
		if( afield.value.length > 1 )
		{
			mask[y][x] = convert_str2mask( afield.value )
			g[y][x] = 0;
			afield.value = convert_mask2str( mask[y][x] );
			if( bit_count(mask[y][x] ) == 1 )
			{
				g[y][x] = bit2int(mask[y][x])+1;
				mask[y][x] = 0;
				set_square( x,y, g[y][x] );
			}
			else
				afield.className = "notes";
		}
		else
		{
			mask[y][x] = 0;
			g[y][x] = afield.value;
			set_square( x,y, g[y][x] );
		}

		correct = done = 0;
		for(i=0;i<9;i++)
			for(j=0;j<9;j++)
			{
				if( g[j][i] > 0 ) done++;
				if( g[j][i] == sol[j][i] ) correct++;
			}
		if( correct == 81 )
			alert('Congratulations! You have completed the Sudoku!');
		if( done == 81 && correct < 81 )
			alert('Oops! There are ' + (done-correct) + ' cells which are wrong.' );
	}
}
function focyell( afield )
{
	if( last_name.length > 0 )
		document.getElementById(last_name).style.backgroundColor = last_back_col;
	last_name = '';

	if( afield.readOnly == false )
	{
		last_name = afield.id;
		last_back_col = afield.style.backgroundColor;
		afield.style.backgroundColor = '#ffff00';
	}
}
function color_same(x,y)
{
	var t, i, j, nt;
	var inputbox;

	inputbox = '<input type="text" value="" size=2 maxlength=2 name="ibox" id="ibox" onchange="javascript:Sudoku1(';
	inputbox = inputbox + "'" + 'A' +  x + y + "'" + ',this.value);">';

	document.getElementById('A'+x+y).innerHTML = inputbox;

}
function print_todays_board()
{
	var x,y,done=0;
//	var board = 'ad="bd=';
//	for(y=0;y<9;y++)
//		for(x=0;x<9;x++)
//			board = board + g[y][x];

	SGW = window.open('SudokuPrintable.htm','_blank','resizable=yes,toolbar=1,scrollbars=yes,left=100,top=10,screenX=100,screenY=10,width=660,height=660');
	if (!SGW.opener) SGW.opener = self;
}
function print_board(archive_date)
{
	var x,y,done=0;
//	var board = 'ad="bd=';
//	for(y=0;y<9;y++)
//		for(x=0;x<9;x++)
//			board = board + g[y][x];

	SGW = window.open('SudokuPrintable.htm?ad=' + archive_date,'_blank','resizable=yes,toolbar=1,scrollbars=yes,left=100,top=10,screenX=100,screenY=10,width=660,height=660');
	if (!SGW.opener) SGW.opener = self;
}
function print_yesterdays_solution()
{
	var x,y,done=0;
	var board = 'bd=';
	for(y=0;y<9;y++)
		for(x=0;x<9;x++)
			board = board + g[y][x];

	SGW = window.open('MMSolution.htm','_blank','resizable=yes,toolbar=1,scrollbars=yes,left=100,top=10,screenX=100,screenY=10,width=660,height=660');
	if (!SGW.opener) SGW.opener = self;
}
function print_solution(archive_date)
{
	SGW = window.open('MMSolution.htm?ad=' + archive_date,'_blank','resizable=yes,toolbar=1,scrollbars=yes,left=100,top=10,screenX=100,screenY=10,width=660,height=660');
	if (!SGW.opener) SGW.opener = self;
}
function email_board()
{
	var x,y,done=0;
	var board = 'bd=';
	for(y=0;y<9;y++)
		for(x=0;x<9;x++)
		{
			if( g[y][x]>0 ) done++;
			board = board + g[y][x];
		}
	if( !done )
		alert("This board is empty!");
	else
	{
		SGW = window.open('SudokuEmail.htm?' + board,'_blank','resizable=no,scrollbars=no,left=300,top=200,screenX=300,screenY=200,width=500,height=250');
    	if (!SGW.opener) SGW.opener = self;
	}
}
function SWUpdateTimer()
{
	if(timerID) {
	  clearTimeout(timerID);
	  clockID  = 0;
	}

	if(!tStart)
	  tStart   = new Date();

	var hours, mins, secs;
	var   tDate = new Date();
	var   tDiff = tDate.getTime() - tStart.getTime();

	tDate.setTime(tDiff);

	hours = tDate.getHours();
	if( hours >= 15 ) hours = 0;
	mins = tDate.getMinutes();
	secs = tDate.getSeconds();
	if( mins < 10 ) mins = '0' + mins
	if( secs < 10 ) secs = '0' + secs
	document.getElementById('theTimer').value = "" + hours + ":" + mins + ":" + secs;

	timerID = setTimeout("SWUpdateTimer()", 1000);
}
function SWStart()
{
	tStart   = new Date();

	document.getElementById('theTimer').value = "0:00:00";

	timerID  = setTimeout("SWUpdateTimer()", 1000);
}
function SWStop()
{
   if(timerID) {
      clearTimeout(timerID);
      timerID  = 0;
   }

   tStart = null;
}
function SWReset()
{
	tStart = null;

	document.getElementById('theTimer').value = "0:00:00";
}
function openAWindow( pageToLoad, winName, width, height, center)
{
	xposition=0; yposition=0;
	if ((parseInt(navigator.appVersion) >= 4 ) && (center)){
		xposition = (screen.width - width) / 2;
		yposition = (screen.height - height) / 2;
	}
	args = "width=" + width + ","
	+ "height=" + height + ","
	+ "location=0,"
	+ "menubar=0,"
	+ "resizable=1,"
	+ "scrollbars=1,"
	+ "status=0,"
	+ "titlebar=0,"
	+ "toolbar=0,"
	+ "hotkeys=0,"
	+ "screenx=" + xposition + ","  //NN Only
	+ "screeny=" + yposition + ","  //NN Only
	+ "left=" + xposition + ","     //IE Only
	+ "top=" + yposition;           //IE Only
	window.open( pageToLoad,winName,args );
}