// flash functions
var InternetExplorer = navigator.appName.indexOf("Microsoft") != -1;

var hD="0123456789ABCDEF";
function d2h(d) {
  var h = hD.substr(d&15,1);
  while(d>15) {d>>=4;h=hD.substr(d&15,1)+h;}
  return h;
}

function padStr(s,l) {
  while (s.length < l) s = '0' + s;
	return s;
}

function loadThumbs() {
}

function cases_DoFSCommand(command, args)
{
  var casesObj = InternetExplorer ? cases : document.cases;
	var projectColor = document.getElementById("projectBar");
	if (projectColor) 
    projectColor.style.backgroundColor = padStr(d2h(args),6);
	loadThumbs();
}

function home_DoFSCommand(command, args)
{
  var homeObj = InternetExplorer ? home : document.home;

	var projectColor = document.getElementById("projectBar");
	if (projectColor) 
    projectColor.style.backgroundColor = padStr(d2h(args),6);

	var projectColor = document.getElementById("projectBar3");
	if (projectColor) 
    projectColor.style.backgroundColor = padStr(d2h(args),6);
}

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 cases_FSCommand(ByVal command, ByVal args)\n');
    document.write(' call cases_DoFSCommand(command, args)\n');
    document.write('end sub\n');
    document.write('Sub home_FSCommand(ByVal command, ByVal args)\n');
    document.write(' call home_DoFSCommand(command, args)\n');
    document.write('end sub\n');
    document.write('</SCRIPT\> \n');
} 

function getFlashMovieObject()
{
   if (navigator.appName.indexOf("Microsoft Internet")!=-1)
   {
     return window.cases;
   }
   else
   {
     return window.document.cases; 
	}     
}

function SendDataToFlashMovie(data)
{
	var flashMovie=getFlashMovieObject();
	if (flashMovie) flashMovie.SetVariable("/:varLoadImage", data);
}

function doFlashVar(args){
	// remove padding arguments from picture filename
	args2 = args.split(/&/g);
	if (args2) {
		args2 = args2[0];
	} 
	else {
		args2 = args;
	}
	SendDataToFlashMovie(args2);
}

