//Script Language = "JavaScript">


function ufcAutoInit() {

//ufClient.Play();



//alert( ufFSObject() ) ;


window.status = "Playing..";

}

function ufcStart() {
//var iii=0;
//alert(iii++);

	uStartOrigin();
	//UPRResetIncrementTarget();

		var pwp = null; 
		gblUPRParentWindow = pwp = top;
		if (pwp) { 
			//gblUPRParent = pwp;
			gblUPRParent = top.window;
			var bd = gblUPRParent.document.body;
			var dZ = bd.style.zoom; 
			if (dZ == "") bd.style.zoom = 1.0;
			pwp.status = "uPrime Internet Operating System Arranged";
		}


			oXSCR = document.createElement("SCRIPT");
				//alert(161);
			if (oXSCR) {
				//alert(561);
				oXSCR.id = "UPRXSCRDefaultUIInstantiated";
				oXSCR.name = "UPRXSCRDefaultUIInstantiated";
				oXSCR.language = "Javascript";
				//alert(562);
				s1 = "var gblujClientEnabled = true;\n";
				s1 += "var gblujClientStarted = false; \n";
				s1 += "var gblujClientTimerID = 0; \n";
//				s1 += "if (gblUPRParentWindow == null) jsUPRArrange();  \n";
//				s1 += "function jsUPRResetClient() {var e = document.body.all(\"UPRTarget\"); if (e) { e.innerHTML = \"\";	e.innerHTML = \"<IFRAME src=\\\"./uPrimeServer/uPrime.asp\\\" id=\\\"UPRUIOS\\\" name=\\\"UPRUIOS\\\" height=400 width=500 style=\\\"visibility:on\\\"></IFRAME>\";} }\n";
				s1 += "window.setTimeout('UPRLaunch();', 5); \n\n"; // OK - Wz
				//alert(563);
				//s1+= "//alert(0);";
//				//alert(62);
				oXSCR.text = s1; //xChild.innerHTML;
//				top.ta1.innerText = s1;
				//oXSCR = 
				//alert(564);
				document.body.appendChild(oXSCR);
				//alert(565);
				//top.window.setTimeout('//alert(-1); UPRLaunch();', 11111)
				window.status = "uPrime Internet Operating Resolving Objects (Launch)";
			}
	
//	if (gblUPRParent && gblUPRParentWindow) {		}

}


function ufFSCommand(command, args) {
	switch(command) {
		case "UPRInit":
		var oXSCR = top.document.createElement("SCRIPT");
		if (oXSCR) {
			oXSCR.id = "UPRXSCRDefaultUIObjectConstructor";
			oXSCR.name = "UPRXSCRDefaultUIObjectConstructor";
			oXSCR.language = "Javascript";
			oXSCR.text=args;
			document.body.appendChild(oXSCR);
			window.setTimeout("ufcStart()", 111);
		} 
		break; 
		case "UPRObject": document.body.insertAdjacentHTML("beforeEnd", args); window.setTimeout("UPRLoadObjects();", 111); break; 
	} 

}



///script>



//SCRIPT ID="UPRXSCR_Default_UI_MessageBank_Surface" Language="Javascript">
var UPRMSGSerial = "MZZQJBSYCCFDLATSBHBRSPCXJUKKSXYHPRQRMCMFCIBZIVXEPWOEDZKOTYCBWYEUQWYWJDKCFJQXHQMVSWDVFOMDMJHHQOUHAKQHVMRGWBQXHRNHXCISVNMGXTSCUCBG";
var UPRMSGFORMSURFACE = null;

function jsUPRFindSurface() {
UPRMSGFORMSURFACE = null;
if (document.UPRUIOS) {
UPRMSGFORMSURFACE = document.UPRUIOS.document.forms("UPRIMERETURNFORM");
if (UPRMSGFORMSURFACE && UPRMSGFORMSURFACE("UPRSerial") == null) {
var oInp=UPRMSGFORMSURFACE.document.createElement("INPUT");
if (oInp) {
oInp.type = "TEXT";
oInp.id = "UPRSerial";
oInp.name = "UPRSerial";
oInp.value = "UPRSerial" + ":=:" + UPRMSGSerial;
UPRMSGFORMSURFACE.appendChild(oInp);
oInp = UPRMSGFORMSURFACE("IIX");
if (oInp) UPRMSGIDCOUNTER = Number(oInp.value.toString());
} } } return UPRMSGFORMSURFACE; }
////SCRIPT>
//SCRIPT ID="UPRXSCRDefaultUIMessageBank" NAME="UPRXSCRDefaultUIMessageBank" Language="Javascript">

		function jsUPRSubmit() {
			if (!jsUPRFindSurface()) return; 
			var oInp=UPRMSGFORMSURFACE.document.createElement("INPUT");
			if (oInp) {
				oInp.type = "TEXT";
				oInp.id = "UPRRequest";
				oInp.name = "UPRRequest";
				oInp.value = "UPREcho";
				UPRMSGFORMSURFACE.appendChild(oInp);
				UPRMSGFORMSURFACE.submit();
			}
		}
		
		function jsUPREncode(pData) {
			if (!pData) return; 
			var sOut = new String(); 
			var sDat = ""; 
			sOut = "UNC::"; 
			for(var i = 0; i < pData.length; i++) {
				sOut += pData.charCodeAt(i).toString(16);
			}

			if (sOut.length != pData.length * 2 + 5) {
				sOut = "UNC::"; 
				for(var i = 0; i < pData.length; i++) {
					sDat = "0" + pData.charCodeAt(i).toString(16);
					sOut += sDat.substr(sDat.length - 2, 2)
				}
			}

			if (sOut.length != pData.length * 2 + 5) {
				alert("Message Rejected CRC Error\n\nThe Message has been discarded.");
				return false; 
			}
			return sOut;
		}

		function jsUPRDecode(pData) {
			if (!pData) return; 
			if (pData.lastIndexOf("UNC::") != 0) return; 
			var sOut = new String(); 
			sOut = ""; 
			for(var i = 5; i < pData.length - 1; i+=2) sOut += String.fromCharCode(Number("0x" + pData.substr(i, 2)).toString(10)); 
			if (sOut.length != (pData.length - 5) / 2 ) {
				alert("Message Rejected CRC Error\n\nThe Message has been discarded.");
				return false; 
			}
			return  sOut;
		}
		
		
		function jsUPRSubtract(pData) {
		
			var s0, s1, s2, c0, c1;
			var i, iLen, iCC1, iCC2; 
			s0 = s1 = s2 = "";
			c0 = c1 =  "";
			i = iLen = 0; 
			

			s0 = String(pData); 
			iLen = s0.length;
			for(i = 0; i < iLen; i++) {
				c0 = s0.charAt(i); 
				iCC1 = s0.charCodeAt(i) - 90; 
				if (iCC1 < 0) iCC1 += 255; 
				s1 += c0 + ":" + iCC1 + ":" + String.fromCharCode(iCC1) + "+"; 
			}
			
			sOut = s1 + String(iLen); 
			return  sOut;
		}
		
		function jsUPRAdd(pData) {
		
			return  sOut;
		}
		

		function MessageBankAdd(sMsgType, sObject, uMsg, uData) {
			if (!jsUPRFindSurface()) return ""; 
			// 12345678901234567890/*-+.
			var sINPUT, idMsg, uncData, uChkData, iChkMax, iChkFct, xsName, xsSibling, uCMDFinal;
			iChkFct = 4000; 
			iChkMax = 0;
			if (uData == null) uData = " "; 
			iChkMax = uData.length / iChkFct; 
			if (iChkMax == 0) iChkMax = 1;
			for(var iChk = 0; iChk < iChkMax; iChk++) {
				uChkData = uData.substr(iChk * iChkFct, iChkFct); 
				uncData =  jsUPREncode(uChkData);
				if (!uncData) return ""; 
				var xInp = UPRMSGFORMSURFACE.document.createElement("INPUT");
				if (xInp) {
					xInp.type = "TEXT";
					//xInp.id = idMsg + sObject;
					//xInp.name = idMsg + sObject;
					//idMsg = sMsgType + "." + UPRMSGIDCOUNTER.toString(10); 
					//xInp.id = idMsg;
					//xInp.name = idMsg;
					//idMsg = sMsgType; 
					if (iChk == 0) {
						UPRMSGIDCOUNTER++;
						xsName = "UCMD." + UPRMSGIDCOUNTER.toString(10) + "." + Math.round(Number(iChkMax+1).toString(10));
						uCMDFinal = xsName;
					} else {
						xsName = "UDAT." + UPRMSGIDCOUNTER.toString(10) + "." + Math.round(iChk.toString(10));
					}
					
					xsSibling = "";
					if (iChkMax >= 1) xsSibling = ":=:UDAT." + UPRMSGIDCOUNTER.toString(10) + "." + Math.round(Number(iChk+1).toString(10));

					xInp.id = xsName; 
					xInp.name = xsName;
					//xInp.name = idMsg;
					//alert();
					if (iChk == 0) {
						sINPUT = sMsgType + ":=:" + sObject + ":=:" + uMsg + ":=:" + uncData + xsSibling;
					} else {
						sINPUT = uncData + xsSibling;
					}
					xInp.value = sINPUT;
					UPRMSGFORMSURFACE.appendChild(xInp);
				}
			}
			//alert(xsName);
			return uCMDFinal;
		}

		function UPRIMEMessage(sMsgType, sObject, uMsg, uData) {
			if (sMsgType == null)  return ""; 
			var s0 = "";
//			var s0 = MessageTemplate(sMsgType, sObject, uMsg);
//			if (s0.length > 0) return s0; 
			
			switch(sMsgType) {
			case "Open":
				s0 = MessageBankAdd(sMsgType, sObject, uMsg, uData);
				if (jsUPRFindSurface()) UPRMSGFORMSURFACE.submit();
				break;
			case "Close":
				s0 = MessageBankAdd(sMsgType, sObject, uMsg, uData);
				if (jsUPRFindSurface()) UPRMSGFORMSURFACE.submit();
				break;
			case "Ask":
				s0 = MessageBankAdd(sMsgType, sObject, uMsg, uData);
				if (jsUPRFindSurface()) UPRMSGFORMSURFACE.submit();
				break;
			case "Tell":
				s0 = MessageBankAdd(sMsgType, sObject, uMsg, uData);
				break;
			case "Send":
				s0 = MessageBankAdd(sMsgType, sObject, uMsg, uData);
				if (jsUPRFindSurface()) UPRMSGFORMSURFACE.submit();
				break;
			case "Authenticate":
				s0 = MessageBankAdd(sMsgType, "uSystem", sObject, uMsg);
				if (jsUPRFindSurface()) UPRMSGFORMSURFACE.submit();
				break;
			default:
				s0 = MessageBankAdd(sMsgType, sObject, uMsg, uData);
				break;
			}
			return s0; 
		}

		// Ask  uPrime Objects
		function UPRIMEAsk(sObject, uMsg, uData) {
			if (sObject == null || uMsg == null || uData == null)  return; 
			return UPRIMEMessage("Ask", sObject, uMsg, uData);
		}

		// Tell uPrime Objects
		function UPRIMETell(sObject, uMsg, uData) {
			if (sObject == null || uMsg == null || uData == null)  return; 
			return UPRIMEMessage("Tell", sObject, uMsg, uData);
		}

		// Send uPrime Objects
		function UPRIMESend(sObject, uMsg, uData) {
			if (sObject == null || uMsg == null || uData == null)  return; 
			return UPRIMEMessage("Send", sObject, uMsg, uData);
		}

		// Open uPrime Objects
		function UPRIMEOpen(sObject, uMsg, uData) {
			if (sObject == null || uMsg == null || uData == null)  return; 
			return UPRIMEMessage("Open", sObject, uMsg, uData);
		}

		// Close uPrime Objects
		function UPRIMEClose(sObject) {
			if (sObject == null)  return; 
			return UPRIMEMessage("Close", sObject, null, null);
		}

		// Authenticate uPrime Objects
		function UPRIMEAuthenticate(sObject, uMsg) {
			if (sObject == null || uMsg == null)  return; 
			return UPRIMEMessage("Authenticate", sObject, uMsg, null);
		}

		var gblMessageBankTemplateArray = new Array(); 
		function MessageTemplate(sMsgType, sObject, uMsg) {
//			return false; 
			var iIndex = gblMessageBankTemplateArray.length;
			if ((1 + iIndex) % 2 == 0) iIndex--;
			var s0 = "UPRTEMPLATE" + sMsgType+sObject+uMsg;
//			alert(String(iIndex) + s0); 
//			return false; 
			var i = 0;
			for(i = 0; i < iIndex; i+=2) {
				if(s0 ==gblMessageBankTemplateArray[i]) {
					top.document.body.insertAdjacentHTML("beforeEnd", gblMessageBankTemplateArray[i+1]);
					top.window.setTimeout("UPRLoadObjects()", 111); 
//	alert(true); 
					return s0; 
				}
			}
			
			gblMessageBankTemplateArray[iIndex] = s0; 

			return ""; 
		}

///SCRIPT>


//SCRIPT   ID="UPRXSCRDefaultUITemporalConstructor"   NAME="UPRXSCRDefaultUITemporalConstructor" Language="Javascript">
var UPRMSGIDCOUNTER = 0; var UPRLoadCounter = 0; var UPRClientCreated = false; var UPRClientAuthenticated = false;
UPRThisTime="7/5/2004 10:06:44 PM";
//IncrementTarget
var UPRyObjectOffset, UPRxObjectOffset, UPRxObjectOffsetStart, UPRyObjectOffsetStart; 
UPRyObjectOffset = UPRxObjectOffset = UPRxObjectOffsetStart = UPRyObjectOffsetStart = 0; 



var UPRObjectsSelected = new Array();
var UPRObjectsSelectedTarget; var UPRObjectsSelectedCount = 0; var UPRNewObjectCount = 1; var UPRInitialObjectCount = 0; var UPRiTop, UPRiLeft, UPRiTop, UPRiLeft, UPRdZoom;
UPRiTop = UPRiLeft = UPRiTop = UPRiLeft = 0; UPRdZoom = 1.0;
var imgCounter = -1; var dPI = Math.PI; var d2PI = 2 * Math.PI; var intervalSurfaceID = -1;
var gbluzCounter = 100; var gblXOrigin = 0; var gblYOrigin = 0;
var UPRxObjectOffset = UPRxObjectOffset = 0; var UPRxObjectOffsetStartView = -1; var UPRyObjectOffsetStartView = -1;
var UPRxObjectOffsetStart = 3; var UPRyObjectOffsetStart = -44; var UPRxObjectOffsetMax = 400; var UPRyObjectOffsetMax = 400; var UPRxObjectOffsetInc = 400; var UPRyObjectOffsetInc = 400;
function UPRResetIncrementTarget() { UPRxObjectOffset = UPRxObjectOffsetStart; UPRyObjectOffset =  UPRyObjectOffsetStart;}
function UPRIncrementTarget() {
// Relative Targeting - Mostly Works.. Issue with uMB Object
if (UPRxObjectOffsetStartView != top.document.body.scrollLeft) { if (UPRxObjectOffsetStartView == -1) {UPRxObjectOffsetStartView = top.document.body.scrollLeft;UPRxObjectOffset = UPRxObjectOffsetStart;
} else {var iDX = UPRxObjectOffsetStartView - top.document.body.scrollLeft; UPRxObjectOffsetStart -= iDX; UPRxObjectOffset -= iDX; UPRxObjectOffsetStartView = top.document.body.scrollLeft; }}
if (UPRyObjectOffsetStartView != top.document.body.scrollTop) { if (UPRyObjectOffsetStartView == -1) {UPRyObjectOffsetStartView = top.document.body.scrollTop; UPRyObjectOffset = UPRyObjectOffsetStart;
} else { var iDY = UPRyObjectOffsetStartView - top.document.body.scrollTop; UPRyObjectOffsetStart -= iDY; UPRyObjectOffset -= iDY; UPRyObjectOffsetStartView = top.document.body.scrollTop;   }}
UPRyObjectOffset+=70;
if (UPRyObjectOffset > UPRyObjectOffsetStart + UPRyObjectOffsetMax + 35) { UPRxObjectOffset += 300;  UPRyObjectOffset =  UPRyObjectOffsetStart;  }
if (UPRxObjectOffset > UPRxObjectOffsetStart + UPRxObjectOffsetMax +150) { UPRxObjectOffset =  UPRxObjectOffsetStart; }}
///SCRIPT>


