
/*  makes text in search text box disappear*/
var navname,navvers,newsnavc=0,sidebarcnt;
navname=navigator.appName;
navvers=parseInt(navigator.appVersion);
js_ok = ((navname == "Microsoft Internet Explorer") && (navvers >= 4 )) || ((navname == "Netscape") && (navvers >= 4 ));
function inputswap(me,def,setto) {
 if(js_ok) {
  if(me.value==def) {
   me.value=setto;
  }
 }
}
/*  image rollover script*/
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];}
}
function MM_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}



/* Define navigation images "on" states */
var infoCountryImgON = '/topnav_home_ch_on.gif';
var infoCountryImgON = '/topnav_info_country_ch_on.gif';
var whatWeDoImgON = '/topnav_what_we_do_ch_on.gif';
var whyWeDoItImgON = '/topnav_why_we_do_it_ch_on.gif';
var unicefPeopleImgON = '/topnav_unicef_people_ch_on.gif';
var voyImgON = '/topnav_voices_of_youth_ch_on.gif';
var supportUnicefImgON = '';
var pressCentreImgON = '/topnav_press_centre_ch_on.gif';
var videoImgON = '/4._topNav_tv_radio_over.gif';
var pfcImgON = '';
var sowc06ImgON = '';
var publicationsImgON = '';
var newsletterImgON = '/topnav_enewsletter_ch_on.gif';
var UFCImgON = '/topnav_unite_against_aids_ch_on.gif';
var socmediaImgON = '/topNav_socialmedia_over.gif';
var aboutImgON = '/topNav_about_over.gif';

/* Pop-up definition*/
var newWin = null;
function popUp(strURL, strType, strWidth, strHeight) {  
 if (newWin != null && !newWin.closed)    
  newWin.close();  
 var strOptions="";  
 
 if (strType=="fixednooptions")    
  strOptions="height="+strHeight+",width="+strWidth; 
 
 if (strType=="resizablenooptions")    
  strOptions="resizable,height="+strHeight+",width="+strWidth;
  
if (strType=="fixedscroll")    
  strOptions="scrollbars,"+"height="+strHeight+",width="+strWidth;  
if (strType=="fixedmenuscroll")    
  strOptions="menubar,scrollbars,"+"height="+strHeight+",width="+strWidth;  
 if (strType=="resizablemenuscroll")    
  strOptions="menubar,scrollbars,"+"resizable,height="+strHeight+",width="+strWidth;
 
 if (strType=="fixedtoolsmenuscroll")    
  strOptions="toolbar,menubar,scrollbars,"+"height="+strHeight+",width="+strWidth;  
 if (strType=="resizabletoolsmenuscroll")    
  strOptions="toolbar,menubar,scrollbars,"+"resizable,height="+strHeight+",width="+strWidth;
  
 if (strType=="fixedtoolslocationmenuscroll")    
  strOptions="toolbar,menubar,scrollbars,"+"location,height="+strHeight+",width="+strWidth;  
 if (strType=="resizabletoolslocationmenuscroll")    
  strOptions="toolbar,menubar,scrollbars,"+"resizable,location,height="+strHeight+",width="+strWidth;
  
 if (strType=="resizablelocationmenuscroll")    
  strOptions="menubar,scrollbars,"+"resizable,location,height="+strHeight+",width="+strWidth;
 
/*The option below is being used for printer friendly pop ups*/
 if (strType=="printerfriendlypage")    
  strOptions="toolbar,menubar,scrollbars,"+"resizable,location,height="+strHeight+",width="+strWidth;
 
 newWin = window.open(strURL, 'newWin', strOptions);  
 newWin.focus();
}

// New Natcom functionality -- flags picker
function fn_NCsubTitle()
{
  if (arguments.length > 0)
  {
    var arg = arguments[0];
    document.images['natComSubTitle'].src = '/images/natCom/subTitle/'+ arg +'.gif';
  }else{
    document.images['natComSubTitle'].src = '/images/natCom/subTitle/subTitle.gif';
  }
}

/* Video B-roll order form error check*/
var emailErrorMessage = "";
function errorCheck()
{
 // Create some variables for errorCheck function
 var requiredFieldsErrorMessage = "";
 var nameEntered = "";
 var subjEntered = "";
 var tapesysEntered = "";
 var tapetypeEntered = "";
 var TVBroadcasterEntered = "";
 var ProgrammingTypeEntered = "";
 var TapeUseEntered = "";
 var AudienceEntered = "";
 var RegionEntered = "";
 var OutreachEntered = "";
 var titleEntered = "";
 var companyEntered = "";
 var streetEntered = "";
 var townEntered = "";
 var zipEntered = "";
 var countryEntered = "";
 var telephoneEntered = "";
 var faxEntered = "";
 var emailEntered = "";
 var MailListEntered = "";
 
 // Required fields error checking
 subjEntered = document.forms['orderform'].elements['titlesubj'].value;
 nameEntered = document.forms['orderform'].elements['personname'].value;
 tapesysEntered = document.forms['orderform'].elements['TapeSystem'].selectedIndex;
 tapetypeEntered = document.forms['orderform'].elements['TapeFormat'].selectedIndex;
 TVBroadcasterEntered = document.forms['orderform'].elements['TVBroadcaster'].selectedIndex;
 ProgrammingTypeEntered = document.forms['orderform'].elements['ProgrammingType'].selectedIndex;
 TapeUseEntered = document.forms['orderform'].elements['TapeUse'].value;
 AudienceEntered = document.forms['orderform'].elements['Audience'].value;
 RegionEntered = document.forms['orderform'].elements['Region'].value;
 OutreachEntered = document.forms['orderform'].elements['Outreach'].selectedIndex;
 titleEntered = document.forms['orderform'].elements['persontitle'].value;
 companyEntered = document.forms['orderform'].elements['personcompany'].value;
 streetEntered = document.forms['orderform'].elements['personstreet'].value;
 townEntered = document.forms['orderform'].elements['persontown'].value;
 zipEntered = document.forms['orderform'].elements['personzip'].value;
 countryEntered = document.forms['orderform'].elements['country'].value;
 telephoneEntered = document.forms['orderform'].elements['telephone'].value;
 faxEntered = document.forms['orderform'].elements['fax'].value;
 emailEntered = document.forms['orderform'].elements['email'].value;
    MailListEntered = document.forms['orderform'].elements['MailList'].selectedIndex;
 
 if ((!subjEntered) || (!nameEntered) || (!tapesysEntered) || (!tapetypeEntered) ||
  (!TVBroadcasterEntered) || (!ProgrammingTypeEntered) || (!TapeUseEntered) || (!AudienceEntered) ||
   (!RegionEntered) || (!OutreachEntered) || (!titleEntered) || (!companyEntered) || (!streetEntered) ||
  (!townEntered) || (!zipEntered) || (!countryEntered) ||
   (!telephoneEntered) || (!faxEntered) || (!emailEntered) || (!MailListEntered))
 {
    if (!subjEntered)
    {
  requiredFieldsErrorMessage = "- Subject Matter\r";
    }
    if (!tapesysEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Tape System\r";
    }
    if (!tapetypeEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Tape Format\r";
    }
    if (!TVBroadcasterEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Are you a TV broadcaster?\r";
    }
    if (!ProgrammingTypeEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- What is your type of programming?\r";
    }
    if (!TapeUseEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- How will this tape be used?\r";
    }
    if (!AudienceEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- How big is your audience?\r";
    }
     if (!RegionEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- What countries do you broadcast in?\r";
    }
    if (!OutreachEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- What is your broadcast outreach?\r";
    }
    if (!nameEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Name\r";
    }
    if (!titleEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Title\r";
    }
    if (!companyEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Company\r";
    }
    if (!streetEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Street\r";
    }
    if (!townEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Town/City\r";
    }
    if (!zipEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Postal Code\r";
    }
    if (!countryEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Country\r";
    }
    if (!telephoneEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Telephone\r";
    }
    if (!faxEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Fax\r";
    }
    if (!emailEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Email\r";
    }
    if (!MailListEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Maling list\r";
    }
 }
 // email error checking
 if (emailEntered)
 {
    emailEntered = document.forms['orderform'].elements['email'].value;
    emailCheck(emailEntered);
//    if (!emailCheck)
//    {
//       emailErrorMessage = "- your email address is invalid\r";
//    }
//    emailValue = new String (emailEntered);
//    emailHasAt = emailValue.indexOf("@");
//    emailHasPeriod = emailValue.indexOf(".");
//    if ((emailHasAt == -1) || (emailHasPeriod == -1))
//    {
//  emailErrorMessage = "-your email address\r";
//    }
 }
 // Letting the user know what was missed
 if ((requiredFieldsErrorMessage) || (emailErrorMessage))
 {
    alertMessage = "The following information are missing or invalid:\r";
    alertMessage = alertMessage + requiredFieldsErrorMessage;
    alertMessage = alertMessage + emailErrorMessage;
    alert(alertMessage);
 }
 else
 {
    document.forms['orderform'].submit();
 }
}
function emailCheck(emailStr)
{
/* The following pattern is used to check if the entered e-mail address
fits the user@domain format.  It also is used to separate the username from 
the domain. */
 var emailPat = /^(.+)@(.+)$/
/* The following string represents the pattern for matching all special 
characters.  We don't want to allow special characters in the address.
These characters include ( ) < > @ , ; : \ " . [ ] */
 var specialChars = "\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
/* The following string represents the range of characters allowed in a 
username or domainname.  It really states which chars aren't allowed. */
 var validChars = "\[^\\s" + specialChars + "\]"
/* The following pattern applies if the "user" is a quoted string (in
which case, there are no rules about which characters are allowed
and which aren'tl anything goes.) E.g. "jiminy cricket"@disney.com
is a legal email address. */
 var quotedUser = "(\"[^\"]*\")"
/* The following pattern applies for domains that are IP addresses, 
rather than symbolic names. E.g. joe@[123.124.233.4] is a legal
email address.  NOTE: The square brackets are required. */
 var ipDomainPat = /^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
/* The following string represents an atom (basically a series of 
non-special characters.) */
 var atom = validChars + '+'
/* The following string represents one word in the typical username.
For example, in john.doe@somewhere.com, john and doe are words.
Basically, a word is either an atom or quoted string. */
 var word = "(" + atom + "|" + quotedUser + ")"
// The following pattern describes the structure of the user
 var userPat = new RegExp("^" + word + "(\\." + word + ")*$")
/* The following pattern describes the structure of a normal symbolic
domain, as opposed to ipDomainPat, shown above. */
 var domainPat = new RegExp("^" + atom + "(\\." + atom +")*$")
/* Finally, let's start trying to figure out if the supplied address is
valid */
/* Begin with the coarse pattern to simply break up user@domain into
different pieces that are easy to analyze. */
 var matchArray = emailStr.match(emailPat)
 emailErrorMessage = "";
 if (matchArray==null)
 {
    /* Too many/few @'s or something; basically, this address doesn't
       even fit the general mold of a valid email address. */
    emailErrorMessage = emailErrorMessage +
    "Email address seems incorrect (check @ and .'s)\r";
    return false;
 }
 var user=matchArray[1]
 var domain=matchArray[2]
 // See if "user" is valid
 if (user.match(userPat)==null)
 {
    // user is not valid
    emailErrorMessage = emailErrorMessage +
    "The email address username doesn't seem to be valid.\r";
    return false;
 }
 /* if the email address is an IP address (as opposed to a symbolic
    host name) make sure the IP address is valid. */
 var IPArray = domain.match(ipDomainPat)
 if (IPArray!=null)
 {
    // this is an IP address
    for (var i=1;i<=4;i++)
    {
  if (IPArray[i]>255)
  {
     emailErrorMessage = emailErrorMessage + 
     "The email address destination IP address is invalid!\r";
     return false;
  }
    }
    return true;
 }
 // Domain is a symbolic name
 var domainArray = domain.match(domainPat)
 if (domainArray==null)
 {
    emailErrorMessage = emailErrorMessage +
    "The email address domain name doesn't seem to be valid.\r";
    return false;
 }
 
 /* domain name seems valid, but now make sure that it ends in a
    three-letter word (like come, edu, gov) or a two-letter word,
    representing country (uk, nl), and that there's a hostname
    preceding the domain or country. */
 /* Now we need to break up the domain to get a count of how many
    atoms it consists of. */
 var atomPat = new RegExp(atom,"g")
 var domArr = domain.match(atomPat)
 var len = domArr.length
 if (domArr[domArr.length-1].length<2 ||
     domArr[domArr.length-1].length>3) 
 {
    // the address must end in a two letter or three letter word.
    emailErrorMessage = emailErrorMessage +
    "The email address must end in a three-letter domain, or two letter country.\r";
    return false;
 }
 
 // Make sure there's a host name preceding the domain.
 if (len<2)
 {
    emailErrorMessage = emailErrorMessage +
    "The email address is missing a hostname.\r";
    return false;
 }
 // If we've gotten this far, everything's valid!
 return true;
}

/* Video catalogue order form error check */
var emailErrorMessage = "";
function errorCheckVideoCat()
{
 // Create some variables for errorCheck function
 var requiredFieldsErrorMessage = "";
 var vidtitleEntered = "";
 var tapenumEntered = "";
 var nameEntered = "";
 var occValue = false;
 var howfValue = false;
 var tapesysEntered = "";
 var tapetypeEntered = "";
 var TapeUseEntered = "";
 var orgEntered = "";
 var streetEntered = "";
 var townEntered = "";
 var zipEntered = "";
 var countryEntered = "";
 var telephoneEntered = "";
 var emailEntered = "";
 var MailListEntered = "";
 
 // Required fields error checking
 vidtitleEntered = document.forms['orderform'].elements['Title'].value;
 tapenumEntered = document.forms['orderform'].elements['TapeNumber'].value;
 tapesysEntered = document.forms['orderform'].elements['TapeSystem'].selectedIndex;
 tapetypeEntered = document.forms['orderform'].elements['TapeFormat'].selectedIndex;
  
 for (i=0;i<5;i++)
 {
    if (document.forms['orderform'].elements['Occupation'][i].checked==true)
    { occValue = true; }
 }
 for (i=0;i<6;i++)
 {
    if (document.forms['orderform'].elements['HowFound'][i].checked==true)
    { howfValue = true; }
 }
 TapeUseEntered = document.forms['orderform'].elements['TapeUse'].value;
 nameEntered = document.forms['orderform'].elements['PersonName'].value;
 orgEntered = document.forms['orderform'].elements['PersonOrg'].value;
 streetEntered = document.forms['orderform'].elements['PersonStreet'].value;
 townEntered = document.forms['orderform'].elements['PersonTown'].value;
 stateEntered = document.forms['orderform'].elements['PersonState'].value;
 zipEntered = document.forms['orderform'].elements['PersonZip'].value;
 countryEntered = document.forms['orderform'].elements['Country'].value;
 telephoneEntered = document.forms['orderform'].elements['Telephone'].value;
 emailEntered = document.forms['orderform'].elements['Email'].value;
 MailListEntered = document.forms['orderform'].elements['MailList'].selectedIndex;
 
 if ((!vidtitleEntered) || (!tapenumEntered) || (!tapesysEntered) || (!tapetypeEntered) ||
  (!occValue) || (!howfValue) || (!TapeUseEntered) || (!nameEntered) ||
   (!orgEntered) || (!streetEntered) || (!stateEntered) ||
  (!townEntered) || (!zipEntered) || (!countryEntered) ||
   (!telephoneEntered) || (!emailEntered) || (!MailListEntered))
 {
    if (!vidtitleEntered)
    {
  requiredFieldsErrorMessage = "- Title\r";
    }
    if (!tapenumEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Tape Number\r";
    }
    if (!tapesysEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Tape System\r";
    }
    if (!tapetypeEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Tape Format\r";
    }
    if (!occValue)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Occupation\r";
    }
    if (!howfValue)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Heard about video catalogue via?\r";
    }
    if (!TapeUseEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- How will this tape be used?\r";
    }
    if (!nameEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Name\r";
    }
    if (!orgEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Organization\r";
    }
    if (!streetEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Street\r";
    }
    if (!townEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Town/City\r";
    }
    if (!stateEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Province/State\r";
    }
    if (!zipEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Postal Code\r";
    }
    if (!countryEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Country\r";
    }
    if (!telephoneEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Telephone\r";
    }
    if (!emailEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Email\r";
    }
    if (!MailListEntered)
    {
  requiredFieldsErrorMessage =
  requiredFieldsErrorMessage + "- Mailing List\r";
    }
 }
 // email error checking
 if (emailEntered)
 {
    emailEntered = document.forms['orderform'].elements['Email'].value;
    emailCheck(emailEntered);
 }
 // Letting the user know what was missed
 if ((requiredFieldsErrorMessage) || (emailErrorMessage))
 {
    alertMessage = "The following information are missing or invalid:\r";
    alertMessage = alertMessage + requiredFieldsErrorMessage;
    alertMessage = alertMessage + emailErrorMessage;
    alert(alertMessage);
 }
 else
 {
    document.forms['orderform'].submit();
 }
}
function emailCheck(emailStr)
{
/* The following pattern is used to check if the entered e-mail address
fits the user@domain format.  It also is used to separate the username from 
the domain. */
 var emailPat = /^(.+)@(.+)$/
/* The following string represents the pattern for matching all special 
characters.  We don't want to allow special characters in the address.
These characters include ( ) < > @ , ; : \ " . [ ] */
 var specialChars = "\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
/* The following string represents the range of characters allowed in a 
username or domainname.  It really states which chars aren't allowed. */
 var validChars = "\[^\\s" + specialChars + "\]"
/* The following pattern applies if the "user" is a quoted string (in
which case, there are no rules about which characters are allowed
and which aren'tl anything goes.) E.g. "jiminy cricket"@disney.com
is a legal email address. */
 var quotedUser = "(\"[^\"]*\")"
/* The following pattern applies for domains that are IP addresses, 
rather than symbolic names. E.g. joe@[123.124.233.4] is a legal
email address.  NOTE: The square brackets are required. */
 var ipDomainPat = /^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
/* The following string represents an atom (basically a series of 
non-special characters.) */
 var atom = validChars + '+'
/* The following string represents one word in the typical username.
For example, in john.doe@somewhere.com, john and doe are words.
Basically, a word is either an atom or quoted string. */
 var word = "(" + atom + "|" + quotedUser + ")"
// The following pattern describes the structure of the user
 var userPat = new RegExp("^" + word + "(\\." + word + ")*$")
/* The following pattern describes the structure of a normal symbolic
domain, as opposed to ipDomainPat, shown above. */
 var domainPat = new RegExp("^" + atom + "(\\." + atom +")*$")
/* Finally, let's start trying to figure out if the supplied address is
valid */
/* Begin with the coarse pattern to simply break up user@domain into
different pieces that are easy to analyze. */
 var matchArray = emailStr.match(emailPat)
 emailErrorMessage = "";
 if (matchArray==null)
 {
    /* Too many/few @'s or something; basically, this address doesn't
       even fit the general mold of a valid email address. */
    emailErrorMessage = emailErrorMessage +
    "Email address seems incorrect (check @ and .'s)\r";
    return false;
 }
 var user=matchArray[1]
 var domain=matchArray[2]
 // See if "user" is valid
 if (user.match(userPat)==null)
 {
    // user is not valid
    emailErrorMessage = emailErrorMessage +
    "The email address username doesn't seem to be valid.\r";
    return false;
 }
 /* if the email address is an IP address (as opposed to a symbolic
    host name) make sure the IP address is valid. */
 var IPArray = domain.match(ipDomainPat)
 if (IPArray!=null)
 {
    // this is an IP address
    for (var i=1;i<=4;i++)
    {
  if (IPArray[i]>255)
  {
     emailErrorMessage = emailErrorMessage + 
     "The email address destination IP address is invalid!\r";
     return false;
  }
    }
    return true;
 }
 // Domain is a symbolic name
 var domainArray = domain.match(domainPat)
 if (domainArray==null)
 {
    emailErrorMessage = emailErrorMessage +
    "The email address domain name doesn't seem to be valid.\r";
    return false;
 }
 
 /* domain name seems valid, but now make sure that it ends in a
    three-letter word (like come, edu, gov) or a two-letter word,
    representing country (uk, nl), and that there's a hostname
    preceding the domain or country. */
 /* Now we need to break up the domain to get a count of how many
    atoms it consists of. */
 var atomPat = new RegExp(atom,"g")
 var domArr = domain.match(atomPat)
 var len = domArr.length
 if (domArr[domArr.length-1].length<2 ||
     domArr[domArr.length-1].length>3) 
 {
    // the address must end in a two letter or three letter word.
    emailErrorMessage = emailErrorMessage +
    "The email address must end in a three-letter domain, or two letter country.\r";
    return false;
 }
 
 // Make sure there's a host name preceding the domain.
 if (len<2)
 {
    emailErrorMessage = emailErrorMessage +
    "The email address is missing a hostname.\r";
    return false;
 }
 // If we've gotten this far, everything's valid!
 return true;
}
/* prototype code omitted */

