var msg = "Sani-Tel - The phone with the hospital patient in mind.";
var spacer = "     ";
var pos = 0;
function ScrollMessage() {
   window.status = msg.substring(pos, msg.length) + spacer + msg.substring(0, pos);
   pos++;
   if (pos > msg.length) pos = 0;
   window.setTimeout("ScrollMessage()",200);
}
ScrollMessage();



<!--
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->


<!-- hide script from non compliant broswers

/*  Author's Name:	  Andy Augustine
JavaScript Snippet:	  'mailIt'
E-mail address:	  jspro@nquiry.com
Original Location:	  http://www.inquiry.com/techtips/js_pro/
	Permission granted to freely distribute	and use	this
	code as	long as	this header remains in tact.
		 (c)1996 Andy Augustine				   */
//modified by Pete Bof: 1. humanized email: change enctype to text/plain
//                      2. customised email body
function mailIt(form) {
var data = document.dataForm
var userInfo = ""
form.action += data.recipient.value
form.action += "?subject=" + data.subject.value
form.action += "&body=" + data.note.value 

userInfo += "Page Title:  " +	document.title + "\n"
userInfo += "Mailed From: " +	document.location + "\n\n"



return true
}
// -->
// end hiding from non compliant browsers-->







function preloader() 
{
     // counter     var i = 0;
     // create object     imageObj = new Image();
     // set image list     images = new Array();     images[0]="images/nav.gif"     images[1]="images/nav-hme.gif"        images[2]="images/nav-prod.gif"     images[3]="images/nav-prog.gif" images[4]="images/nav-ord.gif"  images[5]="images/nav-abt.gif"  images[6]="images/nav-cnt.gif"  
     // start preloading     for(i=0; i<=6; i++)      {          imageObj.src=images[i];     }

} 













var co = new Object;

function recalc_onclick(ctl) {

  if (document.formc.automatic_recalc.checked || ctl=='') {




co.p1C1=eeparseFloat(document.formc.p1C1.value);co.p1B2=eeparseFloat(document.formc.p1B2.value);co.p1B4=eeparsePercent(document.formc.p1B4.value);co.p1B5=eeparsePercent(document.formc.p1B5.value);co.p1C16=eeparseFloat(document.formc.p1C16.value);co.p1B17=eeparseFloat(document.formc.p1B17.value);co.p1B19=eeparsePercent(document.formc.p1B19.value);co.p1B20=eeparsePercent(document.formc.p1B20.value);calc(co);document.formc.p1C2.value=eedisplayFloatNDTh(co.p1C2,0);document.formc.p1C4.value=eedisplayFloatNDTh(co.p1C4,0);document.formc.p1C5.value=eedisplayFloatNDTh(co.p1C5,0);document.formc.p1C6.value=eedisplayFloatNDTh(co.p1C6,0);document.formc.p1C12.value=eedisplayFloatNDTh(co.p1C12,2);document.formc.p1C13.value=eedisplayFloatNDTh(co.p1C13,2);document.formc.p1C14.value=eedisplayFloatNDTh(co.p1C14,2);document.formc.p1C17.value=eedisplayFloatNDTh(co.p1C17,0);document.formc.p1C19.value=eedisplayFloatNDTh(co.p1C19,0);document.formc.p1C20.value=eedisplayFloatNDTh(co.p1C20,0);document.formc.p1C21.value=eedisplayFloatNDTh(co.p1C21,0);document.formc.p1C24.value=eedisplayFloatNDTh(co.p1C24,2);document.formc.p1C26.value=eedisplayFloatNDTh(co.p1C26,2);document.formc.p1C27.value=eedisplayFloatNDTh(co.p1C27,2);

};};



var eeisus=1;var eetrue="TRUE";var eefalse="FALSE";var eedec=".";var eeth=",";var eedecreg=new RegExp("[.]","g");var eethreg=new RegExp(",","g");


function calc(data){var c1C1=data.p1C1;var c1B2=data.p1B2;var c1B4=data.p1B4;var c1B5=data.p1B5;var c1C16=data.p1C16;var c1B17=data.p1B17;var c1B19=data.p1B19;var c1B20=data.p1B20;var c1C2=(((c1C1)*(c1B2)));var c1C4=(((c1C2)*(c1B4)));var c1C5=(((c1C4)*(c1B5)));var c1C17=(((c1C16)*(c1B17)));var c1C19=(((c1C17)*(c1B19)));var c1C20=(((c1C19)*(c1B20)));var c1C6=(((c1C5)*(52)));var c1C21=(((c1C20)*(52)));var c1C12=(((c1C6)*(20)));var c1C13=(((c1C6)*(13)));var c1C24=(((c1C21)*(20)));var c1C14=(((c1C12)-(c1C13)));var c1C26=(((((c1C24)/(4)))*(0.1)));var c1C27=(((c1C24)*(0.1)));data.p1C2=c1C2;data.p1C4=c1C4;data.p1C5=c1C5;data.p1C6=c1C6;data.p1C12=c1C12;data.p1C13=c1C13;data.p1C14=c1C14;data.p1C17=c1C17;data.p1C19=c1C19;data.p1C20=c1C20;data.p1C21=c1C21;data.p1C24=c1C24;data.p1C26=c1C26;data.p1C27=c1C27;};


function myIsNaN(x){return(isNaN(x)||(typeof x=='number'&&!isFinite(x)));};function round(n,nd){if(isFinite(n)&&isFinite(nd)){var sign_n=(n<0)?-1:1;var abs_n=Math.abs(n);var factor=Math.pow(10,nd);return sign_n*Math.round(abs_n*factor)/factor;}else{return NaN;}};function eeparseFloat(str){str=String(str).replace(eedecreg,".");var res=parseFloat(str);if(isNaN(res)){return 0;}else{return res;}};function eeparsePercent(str){var parts=String(str).split('%');var tmp=String(parts[0]).replace(eedecreg,".");var res=parseFloat(tmp)/100;if(isNaN(res)){return 0;}else{return res;}};function eedisplayFloatND(x,nd){if(myIsNaN(x)){return Number.NaN;}else{var res=round(x,nd);if(nd>0){var str=String(res);if(str.indexOf('e')!=-1)return str;if(str.indexOf('E')!=-1)return str;var parts=str.split('.');if(parts.length<2){var decimals=('00000000000000').substring(0,nd);return(parts[0]).toString()+eedec+decimals;}else{var decimals=((parts[1]).toString()+'00000000000000').substring(0,nd);return(parts[0]).toString()+eedec+decimals;}}else{return res;}}};function eedisplayPercentND(x,nd){if(myIsNaN(x)){return Number.NaN;}else{return eedisplayFloatND(x*100,nd)+'%';}}function eedisplayFloatNDTh(x,nd){if(myIsNaN(x)){return Number.NaN;}else{var res=round(x,nd);if(nd>0){var str=String(res);if(str.indexOf('e')!=-1)return str;if(str.indexOf('E')!=-1)return str;var parts=str.split('.');var res2=eeinsertThousand(parts[0].toString());if(parts.length<2){var decimals=('00000000000000').substring(0,nd);return(res2+eedec+decimals);}else{var decimals=((parts[1]).toString()+'00000000000000').substring(0,nd);return(res2+eedec+decimals);}}else{return(eeinsertThousand(res.toString()));}}};function eeinsertThousand(whole){if(whole==""||whole.indexOf("e")>=0){return whole;}else{var minus_sign="";if(whole.charAt(0)=="-"){minus_sign="-";whole=whole.substring(1);};var res="";var str_length=whole.length-1;for(var ii=0;ii<=str_length;ii++){if(ii>0&&ii%3==0){res=eeth+res;};res=whole.charAt(str_length-ii)+res;};return minus_sign+res;}};