AraMa MoToRLaRi

OnLy

Emektar
26 Ara 2005
837
35
Ötüken
Kod:
<SCRIPT> 
<!-- 
//  web-tasarim hitmezleri --> WwW.AteSh.Net 
var MAX_ENGINES = 30; 
var SNARK_STRING = "hunting+the+snark"; 
function MakeArray(n) {for (var i = 1; i <= n; i++) {this[i] = 0;}this.maxlen = n;this.len = 0;return this;} 
var engs = new MakeArray(MAX_ENGINES); 
function find_substring(needle, haystack){var i, needlen = needle.length, haylen = haystack.length; 
for (i=0; i<=haylen-needlen; i++){if (needle == haystack.substring(i,i+needlen))return i;}return false;} 
function Engine(name, opts, home, search){var snark = find_substring(SNARK_STRING, search); 
  this.name = name; 
  this.opts = opts; 
  this.home = home; 
  this.pre_snark = search.substring(0,snark); 
  this.post_snark= search.substring(snark+SNARK_STRING.length, search.length);} 
function Add(name, opts, home, search) 
{engs.len++;if (engs.len <= engs.maxlen)  
  {engs[engs.len] = new Engine(name, opts, home, search)} 
  else {alert("Better increase MAX_ENGINES: " + engs.len + ">" + engs.maxlen)}} 
// ADD YOUR OWN SEARCH ENGINES BELOW.  (See http://www.cs.cmu.edu/~jab/snark/ ) 
Add("Netnews: AltaVista", "", 
   "http://altavista.digital.com/", 
   "http://altavista.digital.com/cgi-bin/query?pg=q&what=news&fmt=d&q=hunting+the+snark" ); 
Add("Shareware/Windows", "", 
   "http://vsl.cnet.com/", 
   "http://vsl.cnet.com/cgi-bin/vsl-master/Find?category=MS-Windows%28all%29&search=hunting+the+snark&logop=and&and=&orfile=++&hits=200" ); 
Add("Shareware/Unix", "", 
   "http://vsl.cnet.com/", 
   "http://vsl.cnet.com/cgi-bin/vsl-master/Find?category=UNIX&search=hunting+the+snark&logop=and&and=&orfile=++&hits=200" ); 
Add("the Web: AltaVista", "SELECTED", 
   "http://altavista.digital.com/", 
   "http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=d&q=hunting+the+snark" ); 
Add("the Web: Lycos", "", 
   "http://www.lycos.com/", 
   "http://twelve.srv.lycos.com/cgi-bin/pursuit?query=hunting+the+snark" ); 
Add("the Web: Yahoo!", "", 
   "http://www.yahoo.com/", 
   "http://search.yahoo.com/bin/search?p=hunting+the+snark" ); 
Add("Weather (City, ST)", "", 
   "http://www.nnic.noaa.gov/cgi-bin/page?pg=netcast", 
   "http://www.nnic.noaa.gov/cgi-bin/netcast.do-it?state=hunting+the+snark&area=Local+Forecast&html=yes&match=strong"); 
// ADD YOUR OWN SEARCH ENGINES ABOVE.  (See http://www.cs.cmu.edu/~jab/snark/ ) 
function HandleForm(form) 
{form.submit();   
  // This fixes a mysterious Netscape bug.  Without this line, 
  // you can't use <enter> to start the search the first time. 
  var i, oldq=form.query.value, newq=""; 
  for (i=0; i<oldq.length; i++) {  // compress [ ]+ into \+ 
    var thischar = oldq.charAt(i); 
    if (thischar != ' ') 
      newq += thischar; 
    else if (lastchar != ' ') 
      newq += '+'; 
    lastchar = thischar;} 
  var eng = engs[1+form.service.selectedIndex]; 
  location.href = newq ? eng.pre_snark + newq + eng.post_snark : eng.home;} 
function DisplayForm() { 
  document.writeln('<CENTER><FORM OnSubmit="HandleForm(this); return false">'); 
  document.writeln('<SELECT name="service">'); 
  for (i=1; i <= engs.len; i++) { 
  document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);} 
  document.writeln('</SELECT>  <INPUT size=26 name="query">'); 
  document.writeln('<input type=submit value=" Ara ">'); 
  document.writeln('</FORM> </CENTER>');} 
DisplayForm(); 
// done hiding from old browsers --> 
</SCRIPT>
 
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.