﻿function EscreveMenu()
{
var t;



p = '&nbsp;&nbsp;&nbsp;&nbsp;<a style="cursor:pointer;" onclick="VaJa(';

t = '<table cellSpacing=0 width=100% style="margin:0; padding:0; border-top:1px solid #555555; border-bottom:8px solid #000000;">';

t = t + '<tr style="background-color:rgb(66,199,242);">';

t = t + '<td style="margin:0; padding:0; padding-left:3px; font-weight:bold;">';
t = t + '<p style="margin:0; padding:0; font-family:Tahoma; font-size:34px;  line-height:36px; text-align:left; text-indent:0;">';
t = t + 'iter&nbsp;hominis</p></td>'

t = t + '<td style="margin:0; padding:0; padding-right:8px; padding-top:12px; font-weight:bold;">';
t = t + '<p style="margin:0; padding:0; font-family:Tahoma; font-size:15px; text-align:right;">';

t = t + p + "'index.htm'";                        t = t + ')">Pág.&nbsp;Inicial</a>&nbsp;&nbsp;';
t = t + p + "'06_Noticias/Proposta.htm'";         t = t + ')">Proposta</a>&nbsp;';
t = t + p + "'03_Polo/Obras_LP.htm'";             t = t + ')">Textos:&nbsp;Leonado&nbsp;Polo</a>&nbsp;';
t = t + p + "'04_Tempo/QuadroGeral.htm'";         t = t + ')">Cronologia</a>&nbsp;';
t = t + p + "'05_Temas/Temas.htm'";               t = t + ')">Temas</a>';
t = t + p + "'07_Bibliografia/Bibliografia.htm'"; t = t + ')">Bibliografia</a>';
t = t + p + "'06_Noticias/Noticias.htm'";         t = t + ')">Notícias</a>';

t = t + '</p></td></tr></table>';


document.write(t);
return true;
}   




function NomeParaAbrir(s)
{
var t;
var s1;
s1 = '/'+s;
t = document.getElementsByTagName("BASE")[0].href.replace('/index.htm',s1);
return (t);
}



function VaJa(s)
{
var t;
t = NomeParaAbrir(s);
window.open(t,"_top");
return true;
} 



function Abre(rr) 
{
var t;
t = '01_Tecnico/Recebe.htm' + '?t1=' + rr.replace(/ /g,'%') + '=t1?';
VaJa(t);
return true;
}


function Posiciona()
{
document.body.scrollLeft = Number(window.parent.frames(0).document.forms(0).tar1.value);
document.body.onscroll = Guarda;
return true;
}


function Guarda()
{
window.parent.frames(0).document.forms(0).tar1.value = String(document.body.scrollLeft);
return true;
}




function Pula(s)
{
var t;
t = window.location.href + '#';
t = t.substr(0,t.search(/#/)) + s;
window.location.href = t;
return true;
}





function TiraTag(hr,s)
{
var tr;
var ta;
var tf;
var v2;
var v3;

ta = '?' + s + '=';
tf = '=' + s + '?';

v2 = hr.indexOf(ta);

if ( v2 < 0 )
tr = '';
else
{
v2 = v2 + 4;
v3 = hr.indexOf(tf) - v2;
tr = hr.substr(v2,v3);
}

return (tr);
}



function TiraTag2(hr,s)
{
var tr;
var ta;
var tf;
var v2;
var v3;

ta = '?' + s + '=';
tf = '=' + s + '?';

v2 = hr.indexOf(ta);

if ( v2 < 0 )
tr=hr;
else
{
v2 = v2 + 4;
v3 = hr.indexOf(tf) - v2;
tr = hr.replace(hr.substr(v2-4,v3+4),'');
}
return (tr);
}




function PoeTag(hr,s,c)
{
var v1;
var v2;
var v3;
var tr;

v2 = '?' + s + '=';
v3 = '?' + s + '=' + c + '=' + s + '?';

if ( hr.indexOf(v2) < 0 )
tr = hr + v3;
else
{
v1 = TiraTag(hr,s);
v2 = '?' + s + '=' + v1 + '=' + s + '?';
tr = hr.replace(v2,v3);
}
return (tr);
}


