-ProniX- Webmaster | Eğlence
Arama Motoru Kodları
| <SCRIPT><br /> <!-- hide this script from non- JavaScript browsers<br /> // All code in this script is Copyright(C) 2007, yalçın, famistex@mynet.com<br /> // For documentation and more info, see: http://pronix.tr.gg<br /> // This is SNARK Version 1.0, 18 May 1996<br /> var MAX_ENGINES = 30;<br /> var SNARK_STRING = "hunting+the+snark";<br /> function MakeArray(n) {<br /> for (var i = 1; i <= n; i++) {<br /> this[i] = 0;<br /> }<br /> this.maxlen = n;<br /> this.len = 0;<br /> return this;<br /> }<br /> var engs = new MakeArray(MAX_ENGINES);<br /> function find_substring(needle, haystack) {<br /> var i, needlen = needle.length, haylen = haystack.length;<br /> for (i=0; i<=haylen-needlen; i++) {<br /> if (needle == haystack.substring(i,i+needlen))<br /> return i;<br /> }<br /> return false;<br /> }<br /> function Engine(name, opts, home, search) {<br /> var snark = find_substring(SNARK_STRING, search);<br /> this.name = name;<br /> this.opts = opts;<br /> this.home = home;<br /> this.pre_snark = search.substring(0,snark);<br /> this.post_snark= search.substring(snark+SNARK_STRING.length, search.length);<br /> }<br /> function Add(name, opts, home, search) {<br /> engs.len++;<br /> if (engs.len <= engs.maxlen) {<br /> engs[engs.len] = new Engine(name, opts, home, search)<br /> }<br /> else {<br /> alert("Better increase MAX_ENGINES: " + engs.len + ">" + engs.maxlen)<br /> }<br /> }<br /> // ADD YOUR OWN SEARCH ENGINES BELOW. (See http://www.cs.cmu.edu/~jab/snark/ )<br /> Add("Netnews: AltaVista", "",<br /> "http://altavista.digital.com/",<br /> "http://altavista.digital.com/cgi-bin/query?pg=q&what=news&fmt=d&q=hunting+the+snark" );<br /> Add("Shareware/Windows", "",<br /> "http://vsl.cnet.com/",<br /> "http://vsl.cnet.com/cgi-bin/vsl-ma ster/Find?category=MS-Windows%28all%29&search=hunting+the+snark&logop=and&and=&orfile=++&hits=200" );<br /> Add("Shareware/Unix", "",<br /> "http://vsl.cnet.com/",<br /> "http://vsl.cnet.com/cgi-bin/vsl-master/Find?category=UNIX&search=hunting+the+snark&logop= and&and=&orfile=++&hits=200" );<br /> Add("the Web: AltaVista", "SELECTED",<br /> "http://altavista.digital.com/",<br /> "http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=d&q=hunting+the+snark" );<br /> Add("the Web: Lycos", "",<br /> "http://www.lycos.com/",<br /> "http://twelve.srv.lycos.com/cgi-bin/pursuit?query=hunting+the+snark" );<br /> Add("the Web: Yahoo!", "",<br /> "http://www.yahoo.com/",<br /> "http://search.yahoo.com/bin/search?p=hunting+the+snark" );<br /> Add("Weather (City, ST)", "",<br /> "http://www.nnic.noaa.gov/cgi- bin/page?pg=netcast",<br /> "http://www.nnic.noaa.gov/cgi-bin/netcast.do-it?state=hunting+the+snark&area=Local+Forecast &html=yes&match=strong");<br /> // ADD YOUR OWN SEARCH ENGINES ABOVE. (See http://www.cs.cmu.edu/~jab/snark/ )<br /> function HandleForm(form) {<br /> form.submit(); // This fixes a mysterious Netscape bug. Without this line,<br /> // you can't use <enter> to start the search the first time.<br /> var i, oldq=form.query.value, newq="";<br /> for (i=0; i<oldq.length; i++) { // compress [ ]+ into +<br /> var thischar = oldq.charAt(i);<br /> if (thischar != ' ')<br /> newq += thischar;<br /> else if (lastchar != ' ')<br /> newq += '+';<br /> lastchar = thischar;<br /> }<br /> var eng = engs[1+form.service.selectedIndex];<br /> location.href = newq ? eng.pre_snark + newq + eng.post_snark : eng.home;<br /> }<br /> function DisplayForm() {<br /> document.writeln('<CENTER><FORM OnSubmit="HandleForm(this); return false">');<br /> document.writeln('Search <SELECT name="service">');<br /> for (i=1; i <= engs.len; i++) {<br /> document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);<br /> }<br /> document.writeln('</SELECT> for <INPUT size=26 name="query">');<br /> document.writeln('<input type=submit value=" GO!">');<br /> document.writeln('</FORM> </CENTER>');<br /> }<br /> DisplayForm();<br /> // done hiding from old browsers --><br /> </SCRIPT> |