Neopets : Faerie Crossword

By w35l3y — Last update Dec 18, 2008 — Installed 2,122 times.

There are 5 previous versions of this script. 

// ==UserScript==
// @name           Neopets : Faerie Crossword
// @namespace      http://gm.wesley.eti.br/neopets
// @description    Plays Faerie Crossword
// @include        http://www.neopets.com/games/crossword/
// @include        http://www.neopets.com/games/crossword/index.phtml
// @include        http://www.neopets.com/games/crossword/crossword.phtml
// @require        http://www.wesley.eti.br/includes/js/php.js
// @require        http://www.wesley.eti.br/includes/js/php2js.js
// @require        http://gm.wesley.eti.br/gm_default.js
// @author         w35l3y
// @email          w35l3y@brasnet.org
// @version        1.2.4
// @copyright      w35l3y 2008
// @license        GNU GPL
// @homepage       http://www.wesley.eti.br
// ==/UserScript==

/**************************************************************************

    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation, either version 3 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.

**************************************************************************/

checkForUpdate({
	'file':'http://userscripts.org/scripts/source/28370.user.js',
	'name':'Neopets : Faerie Crossword',
	'namespace':'http://gm.wesley.eti.br/neopets',
	'version':'1.2.4'
});

(function(){	// script scope
	var user = {
		interval:GM_getValue('interval',	'4000-7000').split('-').array_map(parseInt,array_fill(0,2,10)),
		close:GM_getValue('close',		true)
	};

	if (/\/crossword\.phtml$/g.test('/'+location.href))
	{
		var playAgain = xpath('//form[contains(@action,"crossword.phtml")]/input[@value="Play Again"]')[0];
		if (!!playAgain)
		{	// game over
			GM_setValue("position",0);

			if (user.close)
			{
				window.close();
			}
		}
		else
		{	// keep playing
			var jsonData = eval(GM_getValue('externalData','({response:{answers:[]}})'));
			var currentPosition = GM_getValue("position",0);

			var entries = jsonData.response.answers;
			if (!!entries)
			{
				var xans = entries[currentPosition].word;
				var xdir = entries[currentPosition].direction;
				var xnum = entries[currentPosition].number;

				var evtAnswer = xpath('string(//a[@href and contains(@onclick,", '+xdir+', '+xnum+');")]/@onclick)').split(";")[0];
				location.href = 'javascript:'+evtAnswer;

				var txtAnswer = xpath('//form[@name = "clueform"]/input[@name = "x_word"]')[0];
				txtAnswer.value = xans;

				setTimeout(function()
				{
					GM_setValue("position",++currentPosition);
					txtAnswer.form.submit();
				},randomValue(user.interval));
			}
		}
	}
	else
	{	// start playing
		resourceText("http://gm.wesley.eti.br/neopets/FaerieCrossword/getAnswer.php?type=json&r="+Math.random(),function(r)
		{
			GM_setValue("externalData",r.responseText);
			GM_setValue("position",0);

			if (eval(r.responseText).response.updated || confirm("The answer seems not to be updated.\nContinue anyway ?"))
			{
				var btnStart = xpath('//form[contains(@action,"crossword.phtml")]/input[contains(@value," today\'s puzzle!")]')[0];
				btnStart.form.submit();
			}
		});
	}
	
})();