<!-- ACIONA ONLOAD
juntaronload(function(){
VarreFormulario("form_contato");
SelecionaMenu("menu","selecao","");
SelecionaMenu("menu_itm","selecao","");
escreve_flash("tela","slide","http://www.ariam.ind.br/swf/","766","320");
},"")
//--> ACIONA ONLOAD

<!-- EMPILHAR ONLOAD
function juntaronload(funcao,ordem){
var oldonload=window.onload;
if(typeof window.onload != "function"){
window.onload=funcao;
}else if(ordem=="1"){
window.onload=function(){
funcao();
if(oldonload){
oldonload();
}
}
}else{
window.onload=function(){
if(oldonload){
oldonload();
}
funcao();
}
}
}
//--> EMPILHAR ONLOAD

<!-- PREPARA MENU
function SelecionaMenu(menu,estilo,html){
if(document.getElementById(menu)){
var ourl=window.location.href;
site = ourl.replace("http://","");
var dominio = site.split("/");
var aurl = dominio[0];
//var olink=ourl.substring(ourl.lastIndexOf("/")+1);
var olink=ourl;
var no=document.getElementById(menu).getElementsByTagName("a");
for(var i=0;i<no.length;i++){
var omn=no[i];
var omnv=omn.getAttribute("href");
var conteudo=omn.innerHTML;
//var klink=omnv.substring(omnv.lastIndexOf("/")+1);
var klink="http://"+aurl+omnv;
var pai=omn.parentNode;
if(i==0){pai.className="primeiro";}
if((conteudo.indexOf("<")==-1)&&(conteudo.indexOf(">")==-1)){omn.title=conteudo;}
omn.id=menu+"_"+parseInt(i+1);
if(html!=""){
if(html.indexOf("#")!=-1){
omn.innerHTML=html.replace(/[#]+/g,conteudo);
}else{
omn.innerHTML=html+conteudo;
}
}
//alert(klink+" = "+olink);
if((klink==olink)||((olink=="")&&(klink=="http://"+aurl+"/default.asp"))){
if((html!="")&&(html.indexOf("*")!=-1)){omn.innerHTML=omn.innerHTML.replace("*","<span class='indicador'></span>");}
if(estilo!=""){omn.className=estilo;}
}
if((html!="")&&(html.indexOf("*")!=-1)){omn.innerHTML=omn.innerHTML.replace(/[*]+/g,"");}
}
}
}
//--> PREPARA MENU


<!-- VERIFICA FORM
function VarreFormulario(forme){
var form=TransformaObjeto(forme);
if(document.getElementById("limpar")){
var botao=form.limpar;
var pai=botao.parentNode;
pai.removeChild(botao);
var novoBotao=document.createElement("button");
novoBotao.setAttribute("type","button");
novoBotao.setAttribute("id","limpar");
novoBotao.setAttribute("name","limpar");
novoBotao.innerHTML="Limpar";
var limpa=function(){Pagina("default.asp");}
novoBotao.onclick=function(){confirma("Deseja realmente Limpar?",limpa);}
pai.appendChild(novoBotao);
}
if(form){
for(var i=0;i<form.elements.length;i++){
var obje=form.elements[i];
EventosForms(obje);
}
}
}
//--> VERIFICA FORM

<!-- APLICAR EVENTOS DOS FORMS
function EventosForms(objet){
var obj=TransformaObjeto(objet);
if(obj){
if((obj.id=="email")&&(obj.tagName=="INPUT")){
var clk1=function(){obj.value=obj.value.toLowerCase();}
addEvent(obj,"blur",clk1);
var clk2=function(){mascara(obj,email);}
addEvent(obj,"keyup",clk2);
}else if((obj.id=="telefone")&&(obj.tagName=="INPUT")){
var clk1=function(){mascara(obj,telefone);}
addEvent(obj,"keyup",clk1);
}else if((obj.id=="mensagem")&&(obj.tagName=="TEXTAREA")){
var clk1=function(){Contar(obj,"exibicao",1024);}
addEvent(obj,"keyup",clk1);
}
if(obj.tagName=="INPUT"){
var clk3=function(){AutoTAB(obj);}
addEvent(obj,"keyup",clk3);
}
}
}
//--> APLICAR EVENTOS DOS FORMS

<!-- LOCATION
function Pagina(pag){
location.href=pag;
}
//--> LOCATION

<!-- CONFIRMA AÇÃO
function confirma(msg,funcao){
var resposta=confirm(msg);
if(resposta){
funcao();
}else{
return false;
//alert("Nada foi alterado!")
}
}
//--> CONFIRMA AÇÃO


<!-- TRANSFORMA OBJETOS
function TransformaObjeto(obj){
var theObj;
if(document.all){
if(typeof obj=="string"){
return document.all(obj);
}else{
return obj;
}
}
if(document.getElementById){
if(typeof obj=="string"){
return document.getElementById(obj);
}else{
return obj;
}
}
return null;
}
//--> TRANSFORMA OBJETOS

<!-- LIMITA O NUMERO DE CARACTERES NO CAMPO
function Contar(entrada,saida,caracteres){
var entradaObj=TransformaObjeto(entrada);
var saidaObj=TransformaObjeto(saida);
var conteudo=caracteres - entradaObj.value.length;
var texto="Voc&ecirc; ainda pode digitar {CONTADOR} caracteres";
saidaObj.className="comum";
if(conteudo==1){
texto="Voc&ecirc; ainda pode digitar {CONTADOR} caracter";
saidaObj.className="atencao";
}
else if(conteudo==0){
texto="Limite m&aacute;ximo de caracteres alcan&ccedil;ado";
saidaObj.className="alerta";
}
else if(conteudo < 0){
entradaObj.value=entradaObj.value.substr(0,caracteres);
texto="Limite m&aacute;ximo de caracteres atingido!";
saidaObj.className="alerta";
}
saidaObj.innerHTML=texto.replace("{CONTADOR}",conteudo);
}
//--> LIMITA O NUMERO DE CARACTERES NO CAMPO

<!-- PULAR CAMPO
function AutoTAB(inpute){
var input=TransformaObjeto(inpute);
if(input){
if(input.value.length==input.getAttribute("maxlength")){
var form=document.forms[0];
for(i=0; i < form.elements.length; i++){
var element=form.elements[i];
if(form.elements[i+1]){
if(element==input){
var element2=form.elements[i+1];
element2.focus();
break;
}
}
}
}
}
}
//--> PULAR CAMPO

<!-- ADICIONA EVENTOS
function addEvent(obj,evt,fnc){
if(obj.addEventListener){
if(window.opera){
obj.addEventListener(evt,fnc,false)
}else{
obj.addEventListener(evt,fnc,true)
}
}else if(obj.attachEvent){
obj.attachEvent("on"+evt,fnc)
}
}
//addEvent(window,"load",inicio);
//--> ADICIONA EVENTOS

<!-- FUNÇÕES DE MASCARAS DO ÉLCIO
//http://elcio.com.br/ajax/mascara/
function mascara(o,f){
v_obj=o
v_fun=f
setTimeout("execmascara()",1)
}
function execmascara(){
v_obj.value=v_fun(v_obj.value)
}
function telefone(v){
v=v.replace(/\D/g,"")
v=v.replace(/^(\d\d)(\d)/g,"($1) $2")
v=v.replace(/(\d{4})(\d)/,"$1-$2")
return v
}
function email(v){
v=v.replace(/[^\w\.\-@]/g,"")
return v
}
//--> FUNÇÕES DE MASCARAS DO ÉLCIO

<!-- CORRIGE FLASH
function escreve_flash(id,nome,url,largura,altura){
var obj=TransformaObjeto(id);
var flash;
if(obj){
flash='<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"'+ 
' codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0"'+
' width="'+largura+'" height="'+altura+'" id="'+nome+'" align="middle">';
flash=flash+'<param name="allowScriptAccess" value="sameDomain" />';
flash=flash+'<param name="movie" value="'+url+nome+'.swf" />';
flash=flash+'<param name="quality" value="high" />';
flash=flash+'<param name="wmode" value="transparent" />';
flash=flash+'<param name="bgcolor" value="#ffffff" />';
flash=flash+'<embed wmode="transparent" src="'+url+nome+'.swf" quality="high" bgcolor="#ffffff"'+
' width="'+largura+'" height="'+altura+'" name="'+nome+'" align="middle"'+
' allowScriptAccess="sameDomain" type="application/x-shockwave-flash"'+
' pluginspage="http://www.macromedia.com/go/getflashplayer" />';
flash=flash+'</object>';
}
obj.innerHTML=flash;
}
//--> CORRIGE FLASH
