
/////////////////////////////////////////////////

function writeHeader()
{
 document.write(
' <title> Blissymbolics Communication International </title>'+
'<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">'+
'<meta name="ABSTRACT" content="Bliss Communciation International">'+
'<meta name="GENERATOR" content="Microsoft FrontPage 3.0">'+
'<meta name="keywords" content="Blissymbol, Blissymbolics, BCI, Bliss, Shirley McNaughton, Peter Lindsay, Paul Marshall, Charles Bliss">'+
'<meta name="copyright" content="Copyright 2002, Blissymbolics Communication International">'+
'<meta name="resource-type" content="document">'+
'<meta name="revisit-after" content="30 days">'+
'<meta name="classification" content="Internet">'+
'<meta name="distribution" content="Global">'+
'<meta name="rating" content="General">'+
'<meta name="language" content="en-us">'+
'<meta name="Robots" content="ALL">'+
'<link rel=StyleSheet href="bcistyle.css" type="text/css" media=screen>'
 );
}

function writeSideBarBCI()
{
  document.write('<p class=sidebar><a  href="exec1.htm">About Speaking Differently</a> | '+
'<a href="toolkits.htm">SD Toolkits</a> | '+
'<a href="AACtion.htm">Take AACtion</a> | '+
'<a href="join.htm">How to Join Speaking Differently</a> | '+

'<a href="issues.htm">SD Issues</a> | '+
'<a href="position_papers.htm">Where We Stand: SD Position Papers</a> | '+
'<a href="newsletter.htm">Loud `N Clear: SD Newsletter</a>  | '+
'<a href="contact.htm">Contact us</a> | '+
'<a href="links.htm">Links</a> | '+
'<a href="index.htm">Home</a> '+
'<p class=sidebar>&nbsp;</td>'  
  );
}

var space = "                  ";
var ScrollText = space + "Welcome to the Blissymbolics Communication International's (BCI) Home Page.";

function SBScroll() 
{
temp = ScrollText.substring(0,1);
ScrollText += temp;

ScrollText = ScrollText.substring(1,ScrollText.length);
window.status = ScrollText.substring(0,ScrollText.length);

setTimeout("SBScroll()",100);
}

//-- Portions of the JavaScript codes on this page, written by Alan Simpson - www.coolnerds.com
//-- Returns passed number as string in $xxx,xxx.xx format.

function currency(anynum,width) 
{
   anynum = eval(anynum);
   workNum = Math.abs((Math.round(anynum*100)/100));
   workStr=""+workNum;
   
   if (workStr.indexOf(".") == -1)
     {workStr += ".00"}
	 
   dStr = workStr.substr(0,workStr.indexOf("."));
   dNum = dStr - 0;
   pStr = workStr.substr(workStr.indexOf("."));
   
   while (pStr.length < 3 )
     {pStr+="0"}

   //--- Adds comma in thousands place.
   if (dNum>=1000) 
   {
      dLen=dStr.length
      dStr=parseInt(""+(dNum/1000))+","+dStr.substring(dLen-3,dLen)
   }

   //-- Adds comma in millions place.
   if (dNum>=1000000) 
   {
      dLen=dStr.length
      dStr=parseInt(""+(dNum/1000000))+","+dStr.substring(dLen-7,dLen)
   }
   
   retval = dStr + pStr 
   
   //-- Put numbers in parentheses if negative.
   if (anynum < 0 ) 
     {retval="("+retval+")"}
	 
   return "$"+retval
}

var subTotal = 0;    

function cent(amount) 
{
return (amount == Math.floor(amount)) ? amount + '.00' : 
((amount*10 == Math.floor (amount*10)) ? amount + '0' : amount);
}

function total(what,number) {
subTotal = 0
for (var i=0;i<number;i++) 
subTotal += (what.elements['price'+ i].value - 0) *
(what.elements['quantity' + i].value - 0);
what.subTotal.value =
cent(Math.round(subTotal*Math.pow(10,2))/Math.pow(10,2));    
}

function finalTotal() {
document.myName.fTotal.value = currency(subTotal * 1.15)
}

/////////////////////////////////////////////////