function flashsetup() {backdropLyr.visibility='hidden';flashLyr.visibility='visible';
upperhelp(45);
theformLyr.visibility='hidden';}

col2 = '';
rnum = 0;
bnum = 0;
gnum = 0;
rcount = 7;
gcount = 3;
bcount = 6;

function num2hex(num) {
if (num==15) return "f";
else if (num==14) return "e";
else if (num==13) return "d";
else if (num==12) return "c";
else if (num==11) return "b";
else if (num==10) return "a";
else if (num==9) return "9";
else if (num==8) return "8";
else if (num==7) return "7";
else if (num==6) return "6";
else if (num==5) return "5";
else if (num==4) return "4";
else if (num==3) return "3";
else if (num==2) return "2";
else if (num==1) return "1";
else return "0";
}

function restore_colour(chosen_colour){col = chosen_colour;document.bgColor=col;}


// Handle all the the FSCommand messages in a Flash movie
function flash_test_DoFSCommand(dir, col) {

	flashloop = true;direction = "up";colour= 10;flashtimer = null;direction = dir;moveit = parseInt(col);colour = col;
	if (flashloop == true) {
		if (dir == "messagebox1") {flashloop = false;clearTimeout(flashtimer);return false;}
			}
		if (dir == "query"){flashloop = false;clearTimeout(flashtimer);window.status='click here to restore the original colour settings';return false;}
			
		if (dir == "query1"){flashloop = false;clearTimeout(flashtimer);window.status='windows colour changer © mmiii';return false;}
			
		if (dir == "cl"){flashloop = false;clearTimeout(flashtimer);col = siscolour;document.bgColor=col;return true;}
{
		if (direction == "dn") {	
			if (colour == "1"){
				rnum = rcount;
				if (rcount > 0) {rcount=rcount-1;window.status='red down';}
						} 	
			if (colour == "2"){
				gnum = gcount;
				if (gcount > 0){gcount=gcount-1;window.status='green down';}
						} 
			if (colour == "3") {
				bnum = bcount;
				if (bcount > 0){bcount=bcount-1;window.status='blue down';} 
						}
					}
	else {
	if (direction == "up") 
			if (colour == "1"){
				rnum = rcount;
				if (rcount < 15) {rcount=rcount+1;window.status='red up';}
						}
			if (colour == "2") {
				gnum = gcount;
				if (gcount < 15) {gcount=gcount+1; window.status='green up';}
						} 
			if (colour == "3") {
				bnum = bcount;
				if (bcount < 15) {bcount=bcount+1;window.status='blue up';} 
						} 
					}
			}

	hexNumber2 = num2hex(rnum)+num2hex(rnum)+num2hex(gnum)+num2hex(gnum)+num2hex(bnum)+num2hex(bnum);
	col2 = hexNumber2;
	document.bgColor=col2;  
	flashtimer = setTimeout("flash_test_DoFSCommand(direction,moveit)", 50);
}

// Hook for Internet Explorer 
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && 
	  navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
	document.write('<SCRIPT LANGUAGE=VBScript\> \n');
	document.write('on error resume next \n');
	document.write('Sub flash_test_FSCommand(ByVal dir, ByVal col)\n');
	document.write('  call flash_test_DoFSCommand(dir, col)\n');
	document.write('end sub\n');
	document.write('</SCRIPT\> \n');
}