// Função para funcionamento do OneStat
function oneStatVars() {
   var indexObj = isInternetExplorer ? document.all.indexSnapple : document.indexSnapple;
   var title = document.title;
   var url = document.url;
   var ref = (parent==self?window.document.referrer:top.document.referrer);
   indexObj.SetVariable("_global.oneStat.osp_Title", title);
   indexObj.SetVariable("_global.oneStat.osp_URL", url);
   indexObj.SetVariable("_global.oneStat.osp_REFERRER", ref);
}

// Manipula as chamadas FSCOMMAND geradas no Flash.
function indexSnapple_DoFSCommand(command, args) {
	var indexObj = isInternetExplorer ? document.all.indexSnapple : document.indexSnapple;

	switch(command) {
		case "alert":
			alert(args);
			break;
		case "getURL":
			self.location.href = args;
			break;
		case "setvars":
			oneStatVars();
			break;
	}
}

var isInternetExplorer = navigator.appName.indexOf("Microsoft") != -1;

// 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 indexSnapple_FSCommand(ByVal command, ByVal args)\n');
	document.write('	Call indexSnapple_DoFSCommand(command, args)\n');
	document.write('End Sub\n');
	document.write('</script\>\n');
}