// startpagina.js - hoort bij http://fluweelblad.leidenuniv.nl/wimjan/ // 20250606 random_str= ""; // Math.round(100*Math.random()); function removeSpaces(t) // veranderd 20 okt { s = t.toString(); while (s.substring(0,1) == ' ') { s = s.substring(1, s.length); }; while (s.substring(s.length-1) == ' ') { s = s.substr(0, s.length-1); }; return s; }; mytoday = new Date(); myday = mytoday.getDay(); myarday = new Array("zondag1.jpg", "maandag1.jpg", "dinsdag1.jpg", "woensdag1.jpg", "donderdag1.jpg", "vrijdag1.jpg", "zaterdag1.jpg"); CowboyHenkImgUrl = "http://www.rotterdamsdagblad.nl/cowboyhenk/images/" + myarday[myday]; // makeURL(): vult de juiste parameters in voordat een van de search engines wordt opgeroepen function makeURL() { var temp = '', tempquery='', tempmethod = 0, tempengine='', url='', i=0; document.forms["myquerybox"].query.value = removeSpaces(document.forms["myquerybox"].query.value); for (i = 0; i < document.forms["myquerybox"].searcher.length; i++) // welke search engine geselecteerd? if (document.forms["myquerybox"].searcher.options[i].selected) { tempengine = document.forms["myquerybox"].searcher.options[i].value; if (tempengine == '') { tempengine = document.forms["myquerybox"].searcher.options[i].text; }; }; for (i=0; i <3; i++) // all, phrase of any? if (document.forms["myquerybox"].method[i].checked) tempmethod = i if (tempengine=='Fast') { url="http://www.alltheweb.com/cgi-bin/search?exec=FAST+Search&type="; if (tempmethod==0) temp='all'; if (tempmethod==1) temp='phrase'; if (tempmethod==2) temp='any'; url += temp + "&query=_search_term_|http://www.alltheweb.com/cgi-bin/advsearch"; }; if (tempengine=='Translate') { url="https://translate.google.nl/?hl=nl&tab=wT#auto/nl/_search_term_"+ "|https://translate.google.nl/?hl=nl&tab=wT#auto/nl/"; }; if (tempengine=='etymologie') { url="http://etymologiebank.nl/zoeken/_search_term_"+ "|https://etymologiebank.nl"; }; if (tempengine=='voornamen1') { url="http://nvb.meertens.knaw.nl/naam/is/_search_term_"+ "|http://nvb.meertens.knaw.nl/"; }; if (tempengine=='voornamen2') { url="https://www.betekenisnamen.nl/search/_search_term_|https://www.betekenisnamen.nl/"; }; if (tempengine=='voornamen3') { url="http://www.behindthename.com/php/search.php?nmd=n&terms=_search_term_|http://www.behindthename.com/"; }; if (tempengine=='achternamen') { // url="http://www.meertens.knaw.nl/nfd/lijst_namen.php?naam=_search_term_|http://www.meertens.knaw.nl/nfd/"; url="https://www.cbgfamilienamen.nl/nfb/lijst_namen.php?operator=eq&naam=_search_term_|https://www.cbgfamilienamen.nl/nfb/"; }; if (tempengine=='achternamen2') { url="http://howie.besite.be/~uhuru/names_nl/map.php?name=_search_term_|http://familienaam.nl/"; }; if (tempengine=='MSN') { if (tempmethod==1) temp='%22'; else temp=''; url="http://techpreview.search.msn.nl/results.aspx?q=" + temp + "_search_term_" + temp; url=url+'&first=1&count=100|http://techpreview.search.msn.nl/'; }; if (tempengine=='YouTube') { if (tempmethod==1) temp='%22'; else temp=''; url="http://www.youtube.com/results?search_query=" + temp + "_search_term_" + temp + "&search_type=&aq=f"; url=url+'&first=1&count=100|http://techpreview.search.msn.nl/'; }; if (tempengine=='Nitter_nl') { if (tempmethod==1) temp='%22'; else temp=''; url="https://nitter.net/search?f=tweets&q=" + temp + "_search_term_" + temp+"+lang:nl"; url=url+'|https://nitter.net/'; }; if (tempengine=='Nitter') { if (tempmethod==1) temp='%22'; else temp=''; url="https://nitter.net/search?f=tweets&q=" + temp + "_search_term_" + temp+"&f=live"; url=url+'|https://nitter.net/'; }; if (tempengine=='Wiki_en') { if (tempmethod==1) temp='%22'; else temp=''; url="http://en.wikipedia.org/wiki/Special:Search?search=" + temp + "_search_term_" + temp; url=url+'&go=Go|http://wikipedia.org'; }; if (tempengine=='ebooks1') { url="https://libgen.li/index.php?req=_search_term_|https://libgen.li/"; // alert(url); }; if (tempengine=='ebooks2') { url="https://annas-archive.org/search?lang=&content=&ext=&sort=&q=_search_term_|https://annas-archive.org/"; // alert(url); }; if (tempengine=='ebooks3') { temp = document.forms["myquerybox"].query.value; temp = _replace(temp, '+', '%20'); temp = _replace(temp, ' ', '%20'); url = "https://singlelogin.re/s/" + temp + "/?languages%5B0%5D=dutch|https://singlelogin.re/s/"; // alert(url); }; if (tempengine=='Wiki_nl') { if (tempmethod==1) temp='%22'; else temp=''; url="http://nl.wikipedia.org/wiki/Special:Search?search=" + temp + "_search_term_" + temp; url=url+'&go=Go|http://nl.wikipedia.org'; }; if (tempengine=='eMule') { url="http://www.filehash.com/search.html?pattern=_search_term_"; url=url+'|http://www.filedonkey.com/'; }; if (tempengine=='Google') { if (tempmethod==1) url="http://www.google.nl/search?hl=all&as_epq=_search_term_&ft=i&as_qdr=all&as_occt=any&udm=14&num=100"; else url="http://www.google.nl/search?hl=all&as_q=_search_term_&ft=i&as_qdr=all&as_occt=any&udm=14&num=100"; url=url+'|http://www.google.nl/advanced_search?hl=all&udm=14&num=100'; }; if (tempengine=='etymologie') { document.forms["etymologieForm"].word.value = document.forms["myquerybox"].query.value; document.forms["etymologieForm"].submit(); return false; } if (tempengine=='Google_nl') { if (tempmethod==1) url="http://www.google.nl/search?hl=all&as_epq=_search_term_&lr=lang_nl&ft=i&as_qdr=all&as_occt=any&udm=14&num=100"; else url="http://www.google.nl/search?hl=all&as_q=_search_term_&lr=lang_nl&ft=i&as_qdr=all&as_occt=any&udm=14&num=100"; url=url+'|http://www.google.nl/advanced_search?hl=all&udm=14&num=100'; }; if (tempengine=='IntelliSeek') { url="http://www.intelliseek.com/cgi-bin/nph-ProFusion.pl?&cstr=display=all&totalverify=all&auto=all&engine1=AltaVista&engine2=Yahoo&engine3=InfoSeek&engine4=LookSmart&engine5=WebCrawler&engine6=Lycos&engine7=Netscape&engine8=Excite&engine9=DirectHit&newLocation=&customEngines=AltaVista%2CInfoSeek%2CLookSmart%2CYahoo%2CNetscape%2CWebCrawler%2CExcite%2CDirectHit%2CLycos&pid=profusion&search=web&log=yes&keyword=profusion&option="; if (tempmethod==0) temp='all'; if (tempmethod==1) temp='phrase'; if (tempmethod==2) temp='any'; url += temp + "&queryterm=_search_term_|http://www.intelliseek.com/adv_search.htm"; }; if (tempengine=='zWorks') { url="http://www.zworks.com/srch/srch.cgi?mod=modules&flt=no&what="; if (tempmethod==1) temp = '"'; else temp = ''; url = url + temp + "_search_term_" + temp + '|http://www.zworks.com/'; }; if (tempengine=='ixquick (int)') { zoekterm = document.forms["myquerybox"].query.value; if (zoekterm == "") { url = "/cgi-bin/engine.pl?query=&engine=|http://www.ixquick.com/"; } else { url="http://ixquick.com/do/metasearch.pl?cat=web&cat=web&cmd=process_search&language=english&query="; if (tempmethod==1) temp = '%22'; else temp = ''; zoekterm = _replace(zoekterm, ' ', '+'); if (tempmethod==0) { zoekterm = '+' + zoekterm; zoekterm = _replace(zoekterm, '+', '+%2B'); zoekterm = _replace(zoekterm, ' ', '+'); }; url = url + temp + zoekterm + temp; }; document.location.href = url; return false; } if (tempengine=='ixquick (NL)') { zoekterm = document.forms["myquerybox"].query.value; if (zoekterm == "") { url = "/cgi-bin/engine.pl?query=&engine=|http://search.surfboard.nl/"; } else { url="http://ixquick.com/do/metasearch.pl?cat=web&cat=web&cmd=process_search&lui=nederlands&language=nederlands&query="; if (tempmethod==1) temp = '%22'; else temp = ''; zoekterm = _replace(zoekterm, ' ', '+'); if (tempmethod==0) { zoekterm = '+' + zoekterm; zoekterm = _replace(zoekterm, '+', '+%2B'); zoekterm = _replace(zoekterm, ' ', '+'); }; url = url + temp + zoekterm + temp; }; document.location.href = url; return false; } if (tempengine=='Britannica') { url="http://search.britannica.com/search?query=_search_term_&ct=|http://www.britannica.com/"; }; if (tempengine=='Encarta') { url="http://encarta.msn.com/encnet/refpages/SRPage.aspx?search=_search_term_&Submit2=Go|http://encarta.msn.com/default.asp"; }; if (tempengine=='kranten') { url="http://www.nederlandsch.net/nieuws/?q=_search_term_|http://www.nederlandsch.net/nieuws/"; }; if (tempengine=='HotBot') { url="http://www.hotbot.com/?_v=2&RD=DM&OPs=R&DC=100&domain=&SM=" if (tempmethod==0) temp='MC'; if (tempmethod==1) temp='phrase'; if (tempmethod==2) temp='SC'; url += temp + "&MT=_search_term_|http://hotbot.lycos.com/?MT=&SM=MC&DV=0&LG=any&DC=10&DE=2&act.super.x=59&act.super.y=6"; }; if (tempengine=='Ilse') { url="http://www.ilse.nl/?COMMAND=search_for&LANGUAGE=NL&EXTRACT=long&AFTER=&SEARCH_FOR="; if (tempmethod==1) temp = '"'; else temp = ''; url = url + temp + "_search_term_" + temp + "&ANDOR="; if (tempmethod<2) temp='AND'; else temp='OR'; url += temp + '|http://www.ilse.nl/'; } if (tempengine=='AV') { zoekterm = document.forms["myquerybox"].query.value; if (zoekterm == "") { url = "/cgi-bin/engine.pl?query=&engine=|http://www.altavista.com/r?L05"; } else { url="http://www.altavista.com/cgi-bin/query?pg=q&sc=on&hl=on&kl=XX&stype=stext&q="; if (tempmethod==1) temp = '"'; else temp = ''; if (tempmethod==0) { zoekterm = '%2B' + zoekterm; zoekterm = _replace(zoekterm, '+', '+%2B'); zoekterm = _replace(zoekterm, ' ', '+%2B'); }; url = url + temp + zoekterm + temp; }; document.location.href = url; return false; } document.forms["myquerybox"].engine.value = url document.forms["myquerybox"].submit(); return true; // nog eens submit, voor oudere browsers ? } // makeURL() function vertaalProc() // travlangForm is het formulier van www.travlang.com // vertaalForm bevat een paar drop-down boxes met bron- en doeltaal en een querybox (query) { welkeEngine = 'Travlang'; document.forms["_vertaalForm"].query.value = removeSpaces(document.forms["vertaalForm"].query.value); if (welkeEngine == 'Travlang') { document.forms["_vertaalForm"].engine.value = "http://dictionaries.travlang.com/" + document.forms["vertaalForm"].bronTaal.options[document.forms["vertaalForm"].bronTaal.selectedIndex].value + document.forms["vertaalForm"].doelTaal.options[document.forms["vertaalForm"].doelTaal.selectedIndex].value + '/dict.cgi?max=50&query=_search_term_|http://dictionaries.travlang.com/'; }; document.forms["_vertaalForm"].submit(); return false; }; function zoekPersoon() { myengine = ""; mytemp = document.forms["persoonForm"].enginex.selectedIndex; myengine = removeSpaces(document.forms["persoonForm"].enginex.options[mytemp].value); myfirst = removeSpaces(document.forms["persoonForm"].first.value); mylast = removeSpaces(document.forms["persoonForm"].last.value); mycity = removeSpaces(document.forms["persoonForm"].city.value); switch (myengine) { case 'telefoon': { myfirst = _replace(myfirst, ' ', '+'); mylast = _replace(mylast, ' ', '+'); mycity = _replace(mycity, ' ', '+'); // temp = "http://www.detelefoongids.nl/tginl.dll?action=white&type=search&resultsperpage=25&pagestart=1&name2=" + mylast + // "&name=&initials=" + myfirst + "&city=" + mycity + "&citycode=&dcity=" + mycity + "&areacode=&dname=" + mylast + // "&dwhere=" + mycity + "&country=&source=homepage"; temp = "http://dtgi.detelefoongids.nl/dtgi/ZoekVanuitCTGi.do?action=white&type=search&resultsperpage=100&pagestart=1&"+ "name2="+mylast+"&name=&initials="+myfirst+"&city="+mycity+"&citycode=&dcity="+mycity+"&areacode=&dname="+mylast+ "&dwhere="+mycity+"&country=&source=homepage"; document.location.href = temp; return false; break; }; case 'telgids': { myfirst = _replace(myfirst, ' ', '+'); mylast = _replace(mylast, ' ', '+'); mycity = _replace(mycity, ' ', '+'); if (myfirst != '') mylast = mylast + "+" + myfirst; document.forms["ggForm"].what.value = mylast; document.forms["ggForm"].where.value = mycity; document.forms["ggForm"].submit(); break; }; case 'MetaSearch': { window.location.href="http://213.133.123.154/cgi-bin/metanamesearch/metanamesearch.pl?first=" + myfirst + "&last=" + mylast + "&doall=on&timeout=10&exact=on"; return false; break; }; case 'testmail': { temp = "http://centralops.net/co/EmailDossier.vbs.asp"; if (mycity != '') { temp = temp + "?email=" + mycity + "&vrfy_expn=true"; }; window.location.href=temp; return false; break; }; case 'LinkedIn': { myfirst = _replace(myfirst, ' ', '+'); mylast = _replace(mylast, ' ', '+'); mycity = _replace(mycity, ' ', '+'); if (myfirst != '') mylast = mylast + "+" + myfirst; if (mylast == '') mylast = mycity; temp = "https://www.linkedin.com/search/results/all/?keywords=" + mylast + "&origin=GLOBAL_SEARCH_HEADER"; window.location.href=temp; return false; break; }; case 'UL': { if ((mylast == "") && ( mycity != "")) { mylast = mycity }; document.location.href="http://zoekenopnaam.leidenuniv.nl/index.php?search_for="+mylast; return false; break; }; case 'ICQ': { document.forms["frmSearch"].fname.value = myfirst; document.forms["frmSearch"].lname.value = mylast; document.forms["frmSearch"].nickname.value = mycity; document.forms["frmSearch"].submit(); break; }; case 'Surfnet': { document.forms["surfnetForm"].name.value = mylast; document.forms["surfnetForm"].submit(); break; }; }; return false; } // zoekPersoon function taalZoek() { if (document.forms["taalForm"].engine.value == 'quote') { document.forms["quotezForm"].terms.value = removeSpaces(document.forms["taalForm"].query.value); document.forms["quotezForm"].submit(); return false; } else return true; } function muziekZoek() { tempzoek = removeSpaces(document.forms["muziekform"].query.value); if (document.forms["muziekform"].engine.value == 'chin') { if (tempzoek == "") { location.href="https://yhg007.com/"; } else { document.forms["chinForm"].search.value = tempzoek; document.forms["chinForm"].submit(); }; return false; } else if (document.forms["muziekform"].engine.value == 'Knaben') { if (tempzoek == "") { location.href="https://knaben.org/search/"; } else { //