 <!--

//     All Rights Reserved. Copyright 2001, tendencia.cc
//   
//
//    

var oldRand = 13;

// document.theForm.GetNetscape.focus();
// document.theForm.GetNetscape.select();
// ss = GetCookie("tempvar");
// xy = parseInt(ss,10);

function FrameIt(form) {
var nOld = (parent.frames.length-1)/2;


var nChosen = 1;


   { nChosen=2; }


nTest = TheTrinity(form);
var expdate = new Date ();
expdate.setTime (expdate.getTime() + ( 90 * 24 * 60 * 60 * 1000));
SetCookie ("tempvar", nChosen-1, expdate);
for (var i=5; i < form.elements.length; i++)
{ //alert(form.elements[i].checked ); //.value
}
if ( nTest == 0)
   alert("selecione de um a 4 pesquisadores.");

else if (nChosen == 2)
  {
    if (nTest == 1)
      { OpenWinds(sT1); }
    else if (nTest == 2)
      { OpenWinds(sT1); OpenWinds(sT2); }
    else if (nTest == 3)
      { OpenWinds(sT1); OpenWinds(sT2 );
        OpenWinds(sT3); }
    else if (nTest == 4)
      { OpenWinds(sT1); OpenWinds(sT2);
        OpenWinds(sT3); OpenWinds(sT4); }
  }

else if (nChosen == 1)
  {
    if (nTest == 1)
      { top.location.href = sT1; }
    else if (nTest == 2)
      { OpenWindsBig(sT1); OpenWindsBig(sT2); }
    else if (nTest == 3)
      { OpenWindsBig(sT1); OpenWindsBig(sT2);
        OpenWindsBig(sT3, "joke3"); }
    else if (nTest == 4)
      { OpenWindsBig(sT1); OpenWindsBig(sT2);
        OpenWindsBig(sT3); OpenWindsBig(sT4); }
  }

return (false);
}

function TheTrinity(form) {
  var sRet;
  nTest=0;
  var sThe;
  sThe = form.GetNetscape.value;

 
  <!------------------------- Motores Portugueses---------------------------------->
  
if (form.aeiou.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.aeiou.pt/?p=" + sRet;
    sRet += "&button=3DPesquisar";
    AddNewString(nTest, sRet);    nTest++;    } 


if (form.googlept.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.google.com/search?q=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }


  
if (form.neti.checked ) {
    sThe = ConvertString(sThe);
    sRet = "http://www.netindex.pt/cgi-bin/index.cgi?databaseType=22&boolType=0&accentType=10&question="+sThe;
    sRet += "&cgiType=10001&recordsInPage=10&recordsToPrint=100&recordsSimilar=20&look=2&extension=html&x=56&y=22";
    AddNewString(nTest, sRet);    nTest++;    }

 if (form.portugalbusca.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.portugalbusca.com/index.php?search="+sRet;
    AddNewString(nTest, sRet);    nTest++;    }


if (form.portalbusca.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.portalbusca.com/search.php?action=shared_simple&phrase=" + sRet;
    sRet = sRet + "&bigboss=l_0&search_kind=phrase&B1=Procurar" ;
    AddNewString(nTest, sRet);    nTest++;    }

if (form.sapo.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://pesquisa.sapo.pt/search?q="+sRet;
sRet += "&x=11&y=10";
    AddNewString(nTest, sRet);    nTest++;    }



if (form.aondecom.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://busca.aonde.com/?keys="+sRet;
sRet += "&search_type=and&x=14&y=10";
    AddNewString(nTest, sRet);    nTest++;    }
	
	
if (form.zoom_1.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://search.zoom.globo.com/glbzoomSearch/engine?Keywords=asd&q="+sRet;

    AddNewString(nTest, sRet);    nTest++;    }

<!------------------------- Motores Americanos---------------------------------->
if (form.askcom.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.ask.com/web?q=" + sRet;
	sRet = sRet + "&qsrc=0&o=333&l=dir" ;
    AddNewString(nTest, sRet);    nTest++;    } 
if (form.dogpile.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.dogpile.com/info.dogpl/search/web/" + sRet
    AddNewString(nTest, sRet);    nTest++;    }
if (form.yahoocom.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://br.busca.yahoo.com/search/br?p=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }
if (form.mamma.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.mamma.com/Mamma?lang=1&timeout=4&qtype=0&query=" + sRet;
    sRet = sRet +"&x=28&y=19" 
    AddNewString(nTest, sRet);    nTest++;    }
if (form.msnsearch.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://search.msn.com/results.asp?co=15&RS=CHECKED&q=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }	  
if (form.live.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://beta.search.live.com/results.aspx?q=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }	  
if (form.myspace.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://searchresults.myspace.com/index.cfm?fuseaction=advancedFind.web&searchtype=web&searchBoxID=HeaderWebResults&searchrequest=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }	  
if (form.lycos.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://search.lycos.com/default.asp?lpv=1&loc=searchbox&query=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }  
 <!------------------------- Fim Motores Americanos----------------------------------> 
<!------------------------- Motores Europa---------------------------------->	
if (form.voila.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://search.ke.voila.fr/S/voila?kw=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }
if (form.searchengine.checked) {
   sRet = ConvertString(sThe);
   sRet = "http://www.searchengine.com/default.asp?sb=1&d=&search="+sRet;
   AddNewString(nTest, sRet);  nTest++;  }
   
if (form.Searchch.checked) {
   sRet = ConvertString(sThe);
   sRet = "http://www.search.ch/Search?l=en&q=" +sRet;
   AddNewString(nTest, sRet);  nTest++;  }      
if (form.curryguide.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.qksearch.com/?iskin=skin4&query=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    } 
if (form.dinoonline.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.dino-online.de/suchergebnis.html?query=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    } 

if (form.atsearch.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://atsearch.at/index.php?qs=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    } 	
if (form.wanadoo.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://busca.wanadoo.es/search?origen=header&buscar=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    } 	
if (form.orange.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.orange.fr";
    AddNewString(nTest, sRet);    nTest++;    } 	   
	
<!------------------------- Fim Motores Europa---------------------------------->	   
<!------------------------- Utilitários---------------------------------->	    

if (form.download.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.download.com/3120-20_4-0.html?tg=dl-2001&qt=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }
if (form.superdownload.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://superdownloads.uol.com.br/search.cfm?Query=" + sRet;
    AddNewString(nTest, sRet);    nTest++;    }
	
if (form.megasearch.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.mega-search.net/search.php?terms=" + sRet;
	sRet = sRet + "&group=audio&country_visitor=0" ;
    AddNewString(nTest, sRet);    nTest++;    }

if (form.tucows.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://images.google.com/images?hl=pt-PT&q=" + sRet;
	sRet = sRet + "&search_scope=win&search_adv=0&search_size=&search_size_multi=b" ;
    AddNewString(nTest, sRet);    nTest++;    }
if (form.cnet.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://cnet.search.com/search?chkpt=astg.cnet.fd.search.cnet&q=" + sRet;
	sRet = sRet + "&tag=srch" ;
    AddNewString(nTest, sRet);    nTest++;    }	
if (form.altalavista.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://astalavista2.box.sk/cgi-bin/robot?srch=" + sRet;
	sRet = sRet + "&submit=+search+" ;
    AddNewString(nTest, sRet);    nTest++;    }	
if (form.thebugs.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://www.thebugs.ws/search.shtml?q=" + sRet;
	sRet = sRet + "&w=cracks" ;
    AddNewString(nTest, sRet);    nTest++;    }	
if (form.imdb.checked ) {
    sRet = ConvertString(sThe);
    sRet = "http://imdb.com/find?s=all&q=" + sRet;
	
    AddNewString(nTest, sRet);    nTest++;    }	
<!------------------------- Fim Utilitários---------------------------------->	    	




 if (nTest > 4)   nTest = 4;   return(nTest);   }      function AddNewString(nGospel, sGospel) {
 if (nGospel == 0)  { sT1 = sGospel; }  else if (nGospel == 1) { sT2 = sGospel; }  else if (nGospel == 2) { sT3 = sGospel; }  else if (nGospel == 3) { sT4 = sGospel; }  }    function WhichString(n) {
 var sRet;

 if (nGospel == 1)  { sRet = sT1; }  else if (nGospel == 2) { sRet = sT2; }  else if (nGospel == 3) { sRet = sT3; }  else if (nGospel == 4) { sRet = sT4; }  return (sRet);  }      
 
 function ConvertString(s3) {
 var nLen= s3.length;
 for( i=0; i <= nLen; i++)
    {
    if (s3.substring(i,i+1)== " ")
      {
      s3 = s3.substring(0,i) + "+" + s3.substring(i+1,nLen);
      }
    }

return(s3);

}


function OpenWinds(sUrl) {
  var qWin;
  var sName;
  oldRand = GetRandom(1, 12000, oldRand);
  sName = "wind" + oldRand;

qWin=open(sUrl,sName,'toolbar=yes,directories=yes,status=yes,menubar=yes,scrollbars=yes,location=yes,resizable=yes,copyhistory=yes,width=640,height=480');
}
function OpenWindsBig(sUrl) {
  var qWin;
  var sName;
  oldRand = GetRandom(1, 12000, oldRand);
  sName = "wind" + oldRand;

qWin=open(sUrl,sName,'toolbar=yes,directories=yes,status=yes,menubar=yes,scrollbars=yes,location=yes,resizable=yes,copyhistory=yes,width=640,height=480');
}


//

function SetCookie (name, value) {
  var argv = SetCookie.arguments;
  var argc = SetCookie.arguments.length;
  var expires = (argc > 2) ? argv[2] : null;
  var path = (argc > 3) ? argv[3] : null;
  var domain = (argc > 4) ? argv[4] : null;
  var secure = (argc > 5) ? argv[5] : false;

  document.cookie = name + "=" + escape (value) +
    ((expires == null) ? "" : ("; expires=" + expires.toGMTString())) +
    ((path == null) ? "" : ("; path=" + path)) +
    ((domain == null) ? "" : ("; domain=" + domain)) +
    ((secure == true) ? "; secure" : "");
}      function GetRandom(min, max, seed) {
  var s, m;
  today = new Date();
  s = today.getSeconds();
  m = today.getMinutes();

  var y;
  y = Math.round((2345*seed*(s*139+m*3) % (198))/203*(max-min))+min ;
  return(y);

}   // end -->