منتدى فوخا

هذه الرسالة تفيد بانك غير مسجل بالمنتدى يجب عليك التسجيل اذا كنت ليس مسجل معنا والدخول اذا كنت من اعضاء المنتدى

انضم إلى المنتدى ، فالأمر سريع وسهل

منتدى فوخا

هذه الرسالة تفيد بانك غير مسجل بالمنتدى يجب عليك التسجيل اذا كنت ليس مسجل معنا والدخول اذا كنت من اعضاء المنتدى

منتدى فوخا

هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

    كود محرك بحث شامل

    avatar
    فوخا
    عضو سوبر
    عضو سوبر


    الجنس : ذكر الابراج : الاسد عدد الرسائل : 1214
    تاريخ الميلاد : 08/08/1998
    العمر : 25
    الموقع : s_fokha@yahoo.com
    العمل/الترفيه : رسم
    المزاج : رايق
    نقاط : 24055
    السٌّمعَة : 0

    عادى كود محرك بحث شامل

    مُساهمة من طرف فوخا 2011-08-09, 16:34

    <script language="JavaScript"><!--
    // START HIDE
    var MAX_ENGINES = 35;
    var tp='';
    var tpp='';
    var find = 'hunt';
    var hold=0;
    var hold2=0;
    var gog=0;
    var ap='';
    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 gotcha = find_substring(find, search);
    this.name = name;
    this.opts = opts;
    this.home = home;
    this.pre_gotcha = search.substring(0,gotcha);
    this.post_gotcha= search.substring(gotcha+find.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)
    }
    }
    function DisplayForm() {
    document.writeln('<FORM Name=Gotchaform OnSubmit="HandleForm(this); return false">');
    document.writeln('<strong></strong> <INPUT size=15 name="query">');
    document.writeln('<strong></strong> <SELECT name="service">');
    for (i=1; i <= engs.len; i++) {
    document.writeln("<OPTION " + engs[i].opts + "> " + engs[i].name);
    }
    document.writeln('</SELECT>  <input type=submit value="ابحث"><br>');
    document.writeln('</FORM>');
    document.Gotchaform.query.focus()
    }
    function HandleForm(form){
    var i, newq="", oldq=form.query.value;
    for (i=0; i<oldq.length; i++) { // compress [ ]+ into \+
    var thischar = oldq.charAt(i);
    if (thischar =="+")newq += "%2B";
    else
    if (thischar != ' ')

    newq += thischar;
    else if (lastchar != ' ')
    newq += '+';
    lastchar = thischar;
    }
    var eng = engs[1+form.service.selectedIndex];
    // Window
    search=window.open(newq ? eng.pre_gotcha + newq + eng.post_gotcha :
    eng.home,"SmartSearch","scrollbars=yes,toolbar=yes
    ,location=yes,directorie
    s=yes,status=yes,menubar=yes,resizable=yes,width=' 100%',hight='100%'");
    }
    Add("Alta
    Vista","SELECTED","http://altavista.digital.com/","http://altavista.digital.com/cgi-bin/query?pg=q&what=web&fmt=d&q=hunt");
    Add("Yahoo!","","http://www.yahoo.com/","http://search.yahoo.com/bin/search?p=hunt" );
    Add("DejaNews","","http://www.dejanews.com/","http://search.dejanews.com/nph-dnquery.xp?query=hunt&defaultOp=AND&svcclass=dncur
    rent&maxhits=25");
    Add("HotBot","","http://www.search.hotbot.com","http://www.search.hotbot.com/search.html?MT=hunt&DC=25");
    Add("Infoseek","","http://www.infoseek.com/Home?pg=Home.html&sv=A2","http://www.infoseek.com/Titles?qt=hunt&col=WW&sv=A2");
    Add("Excite","","http://www.excite.com/","http://www.excite.com/search.gw?searchType=Concept&search=hunt&category=
    default");
    Add("Lycos","","http://www.lycos.com/","http://www.lycos.com/cgi-bin/pursuit?query=hunt&backlink=639");
    Add("Magellan","","http://www.mckinley.com/","http://www.mckinley.com/extsearch.cgi?query=hunt");
    Add("OpenText","","http://search.opentext.com","http://search.opentext.com/omw/simplesearch?SearchFor=hunt&mode=and");
    Add("WebCrawler","","http://webcrawler.com/","http://webcrawler.com/cgi-bin/WebQuery?searchText=hunt&maxHits=25");
    // Software
    Add("ZDNet
    Files","","http://www.zdnet.com/","http://www6.zdnet.com/cgi-bin/texis/swlib/hotfiles/search.html?Usrt=rel&Usrchtype=simple&Utext=hunt")
    ;
    Add("Filez","","http://www.filez.com/","http://filez.com/cgi/filez.cgi?query=hunt&type=All+Files&hits=50&domain
    =World&doit=Search/");
    Add("Shareware.com","","http://www.shareware.com/","http://search.shareware.com/code/engine/Find?logop=and&cfrom=quick&orfile=True&hits=25&sea
    rch=hunt&category=All-Categories");
    Add("PC Gamer","","http://www.pcgame.com/","http://www.pcgame.com/finder/search.cgi?key=hunt");
    // Denmark
    DisplayForm();
    // STOP HIDE
    // --></script>

      مواضيع مماثلة

      -

      الوقت/التاريخ الآن هو 2024-04-27, 23:28