d=document

//--------------- Make Pull-Down Window ---------------

function makePullDown(source,name,width,height) {
  var win_prop="location=no,toolbar=no,directories=no,menubar=yes,status=yes,"+
	"scrollbars=yes,resizable=yes,dependent=no,width="+width+",height="+height
  if (window.screen)
    win_prop+=",screenX="+Math.floor((screen.width-width)/2)+",screenY="+Math.floor((screen.height-height)/2)
  var win=open(source,name,win_prop)
  win.focus()
  return win
  }

//--------------- Check E-mail ---------------

function checkEmail(str) {
  var l=str.length
  if (!l) return false
  var was_ata=0
  var was_pset=0
  var cch=''
  for (var i=0; i<l; i++) {
    var ch=str.charAt(i)
    if (ch=='@')
      if (was_ata==1 || i==0 || cch=='.') return false
      else was_ata=1
    else
      if (ch=='.')
	if (cch=='.' || cch=='@' || i==l-1 || i==0) return false
	else was_pset=was_ata
      else
	if ((ch<'A' || ch>'Z') && (ch<'a' || ch>'z') &&
	    (ch<'0' || ch>'9') && (ch!='_') && (ch!='-')) return false
    cch=ch
    }
  return (was_ata && was_pset)
  }