Froogle search

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	0.0
Scores Submitted	0
Date Added	Dec 08, 2006
Last Updated	Apr 02, 2007
Tags	froogle google item price product search

Introduction

Searches froogle (Google's shopping search engine) for items and returns the first four.
Use: !froogle <text>
Warning: Make sure you have flood protection on or you are allowed to send the required amount of text.

To change the number of results, change the number in the line
if (%i <= 4) {
You can change it to the US search by changing all the '.co.uk' in the file.

Grab the Code

;; Froogle search | by Daveoh @ #kidswithguns on Quakenet
alias -l htmlfree {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&,$chr(9))
  return %x
}
on *:TEXT:!froogle *:#:{ if (%froogle.spam) { halt } | set -u6 %froogle.spam 1
  set %froogle.search $2- | set %froogle.chan $chan | set %i 1
  if ($sock(froogle)) { sockclose froogle }
  sockopen froogle froogle.google.co.uk 80
}
on *:sockopen:froogle:{
  sockwrite -n $sockname GET /froogle?q= $+ %froogle.search HTTP/1.0
  sockwrite -n $sockname Host: froogle.google.co.uk
  sockwrite -n $sockname Connection: Keep-Alive
  sockwrite -n $sockname $crlf
}
on 1:sockread:froogle:{
  :nextread
  if ($sockerr > 0) return
  sockread %temp
  if ($sockbr == 0) return

if (%i <= 4) { 
    if (<a style="font-size:medium"* iswm %temp) { set %froogle.result. $+ %i $+ .name $htmlfree(%temp) }
    if (%froogle.result.price == 1) { set %froogle.result. $+ %i $+ .price %temp | inc %i | unset %froogle.result.price }
    if (<b><span style="font-size:medium"> == %temp) { set %froogle.result.price 1 } 
    goto nextread
  }
  elseif (%i) {
    msg %froogle.chan Froogle results:
    set %i 1
    while ($var(%froogle.result.*.name,%i) != $null) {
      msg %froogle.chan %i $+ : $var(%froogle.result.*.name,%i).value @ $var(%froogle.result.*.price,%i).value
      inc %i
    }
    msg %froogle.chan Results page: http://froogle.google.co.uk/froogle?q= $+ %froogle.search
    unset %froogle* | unset %i | unset %temp
  }
}

Comments

(5) RSS

Go to Bottom

Lindrian

Comments: 755

mIRC Snippet: Froogle search
Posted on Dec 8, 2006 3:03 pm

So, this is a "google" in the actuall MIRC?

Cherish

Comments: 11

mIRC Snippet: Froogle search
Posted on Dec 8, 2006 4:03 pm

Links in results I think maybe good thing... But it seems to be hard to do...

Daveoh

Comments: 27

mIRC Snippet: Froogle search
Posted on Dec 8, 2006 4:52 pm

Added results URL after the list

Lindrian

Comments: 755

mIRC Snippet: Froogle search
Posted on Dec 8, 2006 7:48 pm

I aint able to get this working!!
I've done everything im supposed to do, but still, if anyone types "!Froogle" nothing appears.

Cherish

Comments: 11

mIRC Snippet: Froogle search
Posted on Dec 9, 2006 3:01 am

Have to type !froogle text

Froogle search

Introduction

Grab the Code

Comments

Daveoh

My Snippet Tags

Contact

Sponsors

		Great island of the United Kingdom
Last seen: Oct 04, 2008 Profile \| Website Likes (2) Snippets (11) Images (2) Reviews (1) Comments Received (46) Comments Submitted (27) Forum Posts (633)