/ScriptServ

;IRcap8 739914ab0b98eb88448fde0bfd74c3c2
alias sba.buscador {
  sbatit $calc($1 - 12) $m(sbabusca)
  if ($2 < 60) return

  var %a = $int($calc(($2) / 14 - 6)) , %w = $gettok(%sbarra,1,32) , %x = $int($calc(%w / 2)) , %y = $int($calc($1 + $2 / 2))
  if (!%buscadorweb) { %buscadorweb = Google (web) }

  cuag @sba 6 $calc(%y - 38) $calc(%w - 16) 58 gui
  %sba.tx = %sba.tx $+ $chr(124) $+ 16 $calc(%y - 26) $calc(%w - 36) tmp.buscador
  %sba.cb = %sba.cb $+ $chr(124) $+ $int($calc(%x - 6 - ((%w - 60) / 2))) $calc(%y - 4) $calc(%w - 60) buscadorweb AlltheWeb (web) Bing (web)Clusty (web)DailyMotion (video)Ebay (Compras)Exalead (web)Google (web)IMDB (db cine)RAE (dic.)SearchIRC (IRC)Wikipedia (dic.)Yahoo (web)YouTube (video)
}


on 1:signal:SBAEDIT: {
  if ($1 == tmp.buscador) { 
    var %a = $replace(%tmp.buscador,$chr(32),$chr(37) $+ 20,",$chr(37) $+ 22)
    goto $gettok(%buscadorweb,1,32)
    :alltheweb | url http://www.alltheweb.com/search?cat=web&cs=iso88591&q= $+ %a $+ &rys=0&itag=crv&_sb_lang=pref | return
    :clusty | url http://clusty.com/search?input-form=clusty-simple&v%3Asources=webplus&query= $+ %a | return
    :exalead | url http://www.exalead.com/search?action=search&q= $+ %a $+ &x=0&y=0 | return
    :wikipedia | url http:// $+ $replace(%idioma,ga,gl,ek,eu,cat,ca) $+ .wikipedia.org/wiki/Special:Search?search= $+ %a $+ &sourceid=ircap-search | return
    :imdb | url http://www.imdb.com/find?q= $+ %a $+ &sourceid=ircap-search | return
    :google | url http://www.google. $+ $iif(%idioma == es,es,com) $+ /search?client=ircap&q= $+ %a | return
    :yahoo | url http:// $+ $iif(%idioma == es,es.) $+ search.yahoo.com/search?rls=ircap&p= $+ %a | return
    :rae | url http://lema.rae.es/drae/?val= $+ %a | return
    :youtube | url http://www.youtube.com/results?search=ircap-Search&search_query= $+ %a | return
    :bing | url http://search.bing.com/results.aspx?q= $+ %a | return
    :searchirc | url http://searchirc.com/search.php?F=partial&N=all&M=min&C=1&D=color&T=both&PER=15&I= $+ %a | return
    :dailymotion | url http://www.dailymotion.com/visited/search/ $+ %a $+ /1 | return
    :ebay | url http://shop.ebay. $+ $iif(%idioma == es,es,com) $+ /i.html?_nkw= $+ %a | return
  }
}

;EOF