function MM_findObj(n, d) { //v3.0
  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); return x;
}

function MM_showHideLayers() { //v3.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; }
}


lyract = 0;


function lyrname(lyr) {

  name = new String;

  name = "lyr" + lyr;
  return name;

}


function showCodes(evnt,cnt){

  var obj,leftpos,toppos;

  if (navigator.appName == 'Netscape'){
	lyract = cnt
  }

  else {

	if (lyract > 0) {MM_showHideLayers(lyrname(lyract),'','hide')}

	if (cnt > 0){

	  MM_showHideLayers(lyrname(cnt),'','show');

	  if (evnt.pageX){
		leftpos = evnt.pageX + 20;
		toppos = evnt.pageY - 5;
	  }

	  else {
		leftpos = event.clientX + 20;
		toppos = event.clientY - 5;
	  }
  
	  moveLayer(cnt,leftpos,toppos);
	  lyract = cnt
	}

  }

}


function setCode(){

  if (lyract > 0){
	cntname = countries[lyract];
	cntcode = codes[lyract];
	cntdial = dial[lyract];
	if (parent.frames[0]){
	  parent.frames[0].receiveCode(cntname,cntcode,cntdial)
	}
  }

}


function moveLayer(lyr,leftpos,toppos){

  var obj,leftborder;

  obj = MM_findObj(lyrname(lyr));

  if (obj.style){
	obj.style.left = leftpos;
	obj.style.top = toppos;  
  }
  else {
	obj.left = leftpos;
	obj.top = toppos;
  }

}


function hideActiveLayer(){

  if ((lyract > 0) && (navigator.appName != 'Netscape')){
	MM_showHideLayers(lyrname(lyract),'','hide');
	lyract = 0;
  }

}


function writeLayer(cnt,cit){

cntname = countries[cnt];

document.writeln('<div id="dialLayer"><div id="lyr' + cnt + '"><table><tr><td><strong>calling to ' + cntname + ':</strong><br/>&nbsp; +' + codes[cnt] + (cit == 1 ? '' : ' + telephone number') + '</td></tr><tr><td><br><strong>calling from ' + cntname + ':</strong><br/>&nbsp;&nbsp;' + dial[cnt] + ' + country code <br/>&nbsp;&nbsp;&nbsp;+ telephone number </td></tr></table></div></div>')

}