codebase='http://www.retinaportugal.org.pt/'
var defdir

//--------------------------
// MENU DINAMICO
// Copyright 2006-2007 javascript-array.com
 
var timeout	= 500;
var closetimer	= 0;
var ddmenuitem	= 0;
 
// open hidden layer
function mopen(id)
{	
	// cancel close timer
	mcancelclosetime();
 
	// close old layer
	if(ddmenuitem) ddmenuitem.style.visibility = 'hidden';
 
	// get new layer and show it
	ddmenuitem = document.getElementById(id);
	ddmenuitem.style.visibility = 'visible';
 
}
// close showed layer
function mclose()
{
	if(ddmenuitem) ddmenuitem.style.visibility = 'hidden';
}
 
// go close timer
function mclosetime()
{
	closetimer = window.setTimeout(mclose, timeout);
}
 
// cancel close timer
function mcancelclosetime()
{
	if(closetimer)
	{
		window.clearTimeout(closetimer);
		closetimer = null;
	}
}
 
// close layer when click-out
document.onclick = mclose; 





function mostraMenuBar()
{
document.write('<ul id="sddm">');
document.write(' <li><a href="http://87.103.12.25:8081/insc/news.aspx">Novidades</a></li> ');
document.write(' <li><a href="http://87.103.12.25:8081/insc/agenda.aspx">Agenda Cultural</a></li> ');

document.write('    <li><a href="http://www.retinaportugal.org.pt/qsomos/index.htm" ');
document.write('        onmouseover="mopen(\'m1\')" ');
document.write('        onmouseout="mclosetime()">Quem Somos</a>');
document.write('        <div id="m1" ');
document.write('            onmouseover="mcancelclosetime()" ');
document.write('            onmouseout="mclosetime()"> ');
document.write('        <a href="http://www.retinaportugal.org.pt/qsomos/a_assoc.htm">Miss&atilde;o e Objectivos</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/qsomos/est_reg.htm">Estatutus e Regulamento e Interno</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/qsomos/dir.htm">Org&atilde;os Sociais</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/qsomos/cc.htm">Conselho Cientif&iacute;co</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/servicos/eq_tec.htm">Equipa T&eacute;cnica</a>');

document.write('        <a href="http://87.103.12.25:8081/insc/est.aspx">Os S&oacute;cios</a>');
document.write('        <a href="http://87.103.12.25:8081/insc/rel_act.aspx">Relat&oacute;rios de Actividades</a>');
document.write('        <a href="http://87.103.12.25:8081/socios/rel_contas.aspx">Relat&oacute;rios de Contas</a>');
document.write('        <a href="http://87.103.12.25:8081/insc/agradece.aspx">A quem agradecemos</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/qsomos/espfisico/index.htm">O nosso espa&ccedil;o f&iacute;sico</a>');
document.write('        </div> ');
document.write('    </li>');

document.write('    <li><a href="http://www.retinaportugal.org.pt/dist_retina/index.htm" ');
document.write('        onmouseover="mopen(\'m2\')" ');
document.write('        onmouseout="mclosetime()">Retinopatias </a>');
document.write('        <div id="m2" ');
document.write('            onmouseover="mcancelclosetime()" ');
document.write('            onmouseout="mclosetime()"> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/como_fun_olho.htm">Como funciona o olho</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/drcv.htm">As Distrofias de Retina Coroide e V&iacute;treo</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/sintomas.htm">Os Sintomas das Distrofias de Retina</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/como_trans.htm">Como se Transmitem as Distrofias de Retina</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/qtsaber.htm">O Que Todos Devem Saber</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/pvisao/rp/index.htm">Simula&ccedil;&atilde;o de perda de vis&atilde;o - RP T&iacute;pica</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/pvisao/rpi/index.htm">Simula&ccedil;&atilde;o de perda de vis&atilde;o - RP Inversa</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/intolho/index.htm">Esquema interactivo do Fundo de Olho</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/folho/index.htm">Exemplos de Retinografias</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/dist_retina/terapias.htm">Resumo das Perspectivas Terapeuticas </a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/links.htm">Links</a> ');

document.write('        </div> ');
document.write('    </li>');


document.write(' <li><a href="http://www.retinaportugal.org.pt/servicos/index.htm">Servi&ccedil;os</a></li> ');


//Convem saber
document.write('    <li><a href="http://www.retinaportugal.org.pt/conv_saber/index.htm" ');
document.write('        onmouseover="mopen(\'m4\')" ');
document.write('        onmouseout="mclosetime()">Conv&eacute;m Saber</a>');
document.write('        <div id="m4" ');
document.write('            onmouseover="mcancelclosetime()" ');
document.write('            onmouseout="mclosetime()"> ');
document.write('        <a href="http://87.103.12.25:8081/insc/dicas.aspx">Dicas e Truques</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/conv_saber/legislacao.htm">Legisla&ccedil;&atilde;o</a>');
document.write('        <a href="http://www.retinaportugal.org.pt/conv_saber/cert_mult.htm">Certid&atilde;o Multiuso</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/conv_saber/ajudas_tec.htm">Ajudas T&eacute;cnicas</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/conv_saber/taxas_mod.htm">Taxas Moderadoras</a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/conv_saber/atend_pref.htm">Atendimento Preferencial </a> ');
document.write('        </div> ');
document.write('    </li>');



document.write(' <li><a href="http://87.103.12.25:8081/insc/videos.aspx">V&iacute;deos</a></li> ');


//Convem saber
document.write('    <li><a href="http://www.retinaportugal.org.pt/contactos/index.htm" ');
document.write('        onmouseover="mopen(\'m5\')" ');
document.write('        onmouseout="mclosetime()">Contactos</a>');
document.write('        <div id="m5" ');
document.write('            onmouseover="mcancelclosetime()" ');
document.write('            onmouseout="mclosetime()"> ');
document.write('        <a href="http://www.retinaportugal.org.pt/contactos/index.htm#contactos">Contactos telef&oacute;nicos </a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/contactos/index.htm#emails">Emails </a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/contactos/index.htm#mapas">Mapa da zona envolvente </a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/contactos/index.htm#comochegar">Como chegar &agrave; ARP em transportes publicos </a> ');
document.write('        <a href="http://www.retinaportugal.org.pt/contactos/index.htm#chagarprop">Como chegar &agrave; ARP de transporte pr&oacute;prio</a> ');

document.write('        </div> ');
document.write('    </li>');


document.write(' <li><a href="http://87.103.12.25:8081/insc/insc.aspx">Pr&eacute;-inscri&ccedil;&atilde;o</a></li> ');

document.write('</ul>');
document.write('<div style="clear:both"></div>');
}





function mostraPics()
{

}


//............................



function getCookie(name) { // use: getCookie("name");
    var re = new RegExp(name + "=([^;]+)");
    var value = re.exec(document.cookie);
    return (value != null) ? unescape(value[1]) : null;
  }

  var today = new Date();
  var expiry = new Date(today.getTime() + 28 * 24 * 60 * 60 * 1000); // plus 28 days

function setCookie(name, value) { // use: setCookie("name", value);
  document.cookie=name + "=" + escape(value); // remove comment
      // for other behaviour+ "; expires=" + expiry.toGMTString();
}



function PrintVersion()
{
    imprimir=getCookie("imprimir");
    if(imprimir!="yes")
    {
        s=new String();

        s=location.href;
        n=s.indexOf("#",0);
        if(n>=0)
        {
           s=s.substring(0,n);
        }
        document.write('<p class="imprimir">Vai imprimir? Use antes <a href="'+s+'"\
			 onClick="setCookie(\'imprimir\',\'yes\')">esta vers&atilde;o</a>.');
    }
}

function PrintVersionMenu()
{
    imprimir=getCookie("imprimir");
    if(imprimir!="yes")
    {
        s=new String();

        s=location.href;
        n=s.indexOf("#",0);
        if(n>=0)
        {
           s=s.substring(0,n);
        }
        document.write('<a class="menu" href="'+s+'"onClick="setCookie(\'imprimir\',\
\'yes\')"><FONT COLOR = "white"></font></a>');
    }
}
            

function EscreveTitulo(prim,sec)
{
   document.write('<h2 class="header">'+prim);
   if(sec!="")
   {
      document.write('<br>'+sec)
   }
   document.write('</h2>');
}



function WriteHeader (nome,sub)  // &rest=navbar info
{
   document.write(' <head>');
   document.write('  <link href="'+defdir+'estilos.css" rel="stylesheet" type="text/css">');
document.write('  <link href="' + defdir + 'ddmenu.css" rel="stylesheet" type="text/css">');
   //<link rel="shortcut icon" href="http://example.com/favicon.ico"> 
   document.write('  <link rel="shortcut icon" href="http://www.retinaportugal.org.pt/favicon.ico">');

//   document.write('  <title>'+nome+' - '+sub+'</title>');
   document.write('  <title> '+sub+'</title>');
   document.write(' </head>');


    imprimir=getCookie("imprimir");
    if (imprimir=='yes')
	{
	    document.write('<body onUnload="setCookie(\'imprimir\',\'\')">');
	    document.write('<p class="imprimir">Voltar &agrave; <a href="'+location.href+'" onClick="setCookie(\'imprimir\',\'\')">página anterior</a></p>')
	    EscreveTitulo(nome,sub);
	}
    else
	{
	   document.write('<body style="font-family:Georgia"  >');

       document.write('<table border="0" width="1000px" align="center" cellspacing="0" cellpadding="5" >');
       document.write('<tr>');
       document.write('<td class="menu1"  valign="top"   align="left">');
       document.write('<div align="right">');
       PrintVersionMenu();
       document.write('</div>');   
       document.write('<div align="center">');   
	   document.write('<a href="'+codebase+'"><img border="0" src="'+defdir+'logo5.jpg" alt="Logotipo da ARP"></a><br>');
       document.write('</div>');s

	  mostraMenuBar();
	   document.write('</td>');       
	   document.write('<tr>');
	   document.write('<td>');
	   document.write('<table border="0" width="100%" cellspacing="0" cellpadding="5">');

	   document.write('<tr>');
           document.write('<td width="150" valign="top"><table><tr>');
	   document.write('<td class="menu" width="150" valign="top"  align="left" >');



	   document.write('<br>');
	   


	    document.write('<form method="get" action="http://www.google.com/search">');
	    document.write('<table border="0" cellpadding="0">');
	    document.write('<tr><td>');
	    document.write('<input type="text"   name="q" size="15"');
	    document.write('maxlength="255" value="Pesquisar" /></td></tr>');
	    document.write('<tr><td  style="font-size:75%">');
	    document.write('<input type="submit" value="OK" />');
	    document.write('<input type="checkbox"  name="sitesearch"');
	    document.write('value="www.retinaportugal.org.pt" checked /> S&oacute; na A.R.P.<br />');
	    document.write('</td></tr></table>');
	    document.write('</form>');
	                  
	 
	   document.write('</td></tr></table>');
	  document.write('<br><br><br>');           
           
            if (sub=="Bem Vindo ŕ A.R.P.")
              mostraPics();

	if (nome =="<p></p>"){

	      document.write('<h4>Contactos:</h4>');
	      document.write('<ul>');
	      //document.write('<li><a href="contactos.aspx">Direc&ccedil;&atilde; o</a>');
	      document.write('<li><a href="scons.aspx">S&oacute;cios</a>');
	      document.write('<li><a href="lst_reg.aspx">Listagem por distrito</a>');
	      document.write('<li><a href="email_serv.aspx">ServiŤo de e-mails</a>');
	      
	      document.write('</ul>');

	      document.write('<h4>Tesouraria:</h4>');
	      document.write('<ul>');
	      document.write('<li>Recibos');
	      document.write('<ul>');
	      document.write('<li><a href="recibos10.aspx">2010</a>');
	      document.write('<li><a href="recibos11.aspx">2011</a>');
	      document.write('<li><a href="recibos12.aspx">2012</a>');
	      
	      document.write('</ul>');
	      document.write('<li><a href="cotas.aspx">Cotas</a>');
	      document.write('<li><a href="rel_contas.aspx">Relat&oacute;rios de Contas</a>');
	      document.write('<li><a href="cont_h.aspx">Colaboradores</a>');
	      document.write('</ul>');


document.write('<h4>Estat&iacute;sticas<:</h4>');
	      document.write('<ul>');
	      document.write('<li><a href="estatisticas_ns.aspx">Novos S&oacute;cios</a>');
	      document.write('<li><a href="estat.aspx">Todos os S&oacute;cios</a>');
	      document.write('<li><a href="estatisticas.aspx">S&oacute;cios doentes</a>');
	      document.write('</ul>');

document.write('<h4>Geral</h4>');
	      document.write('<ul>');
	      document.write('<li><a href="inews.aspx">Adicionar novidade</a>');
	      document.write('<li><a href="iagenda.aspx">Adicionar evento cultural</a>');
	    
	    
	      document.write('</ul>');


	}

        if (nome =="<span></span>"){

	      document.write('<h4>Dados Pessoais:</h4>');
	      document.write('<ul>');
	      document.write('<li><a href="soc.aspx">Ficha pessoal</a>');
	      document.write('<li><a href="soc_cotas.aspx">Cotas</a>');

	      document.write('</ul>');

	      document.write('<h4>Dados da ARP:</h4>');
	      document.write('<ul>');


	      document.write('<li><a href="estatisticas_ns.aspx">Novos S&oacute;cios</a>');
	      document.write('<li><a href="estat.aspx">Todos os S&oacute;cios</a>');
	      document.write('<li><a href="rel_contas.aspx">Relat&oacute;rios de Contas</a>');
	      document.write('</ul>');





	}







	   document.write('<td class="body" bgcolor="white" valign="top">');


    document.write('<table width="100%">');
    document.write('<td class="navbar">');
    for (var i=2; i<WriteHeader.arguments.length; i+=2) 
    {      
       if(WriteHeader.arguments[i+1]=="")
       {
           document.write(WriteHeader.arguments[i]);
       }
        else
       {
           document.write('<a class="navbar" href="' + WriteHeader.arguments[i+1] + '">');
          document.write(WriteHeader.arguments[i]+ '</a>');
        }
        if(i+2<WriteHeader.arguments.length)
      {
           document.write(' > ');
        }
        
    }
    document.write('</table>');
    
    EscreveTitulo(nome,sub);
    
    
	}
}




function EscreveRodape ()
{   
   if (imprimir=='yes')
	{
	}
   else
	{
            document.write('</p>');
	    document.write('</td>');
	    document.write('</tr>');
            document.write('</td></tr><tr><td class="menu1	"><a class="menu" valign="bottom" href="#top"><font color = "white"><b>Voltar ao Topo</font></b></a></td>');
	    document.write('<td class="white">');
	}
   document.write('<hr width="100%"></hr>');
   document.write('<p class="footer">');
   document.write('ARP - Associa&#231;&#227;o de Retinopatia de Portugal<br>');
   document.write('Tel: (+ 351) 213660167 FAX: (+ 351) 213660169<br>');
   document.write('E-mail: <a href="mailto:info@retinaportugal.org.pt"> info@retinaportugal.org.pt </a><br>');
   if (imprimir=='yes')
	{
	}
   else
	{
	    document.write('</td>');
	    document.write('</tr>');
	    document.write('</table>');
	}
}



ar = "@"
itContacts=0;