Hawkee.com mIRC Snippet Search

By DarthReven on Dec 20, 2005

-See Below-

;Hawkee.com mIRC Snippet Search
;Command: /hs -t/c <search word>
;
;Parimitor -t searches Snippet Titles and -c searches Snippet Codes
;
;Ex1: /hs -t help bot
;Ex2: /hs -c alias

alias hs {
  if ($sock(hsearch)) { sockclose hsearch }
  sockopen hsearch www.hawkee.com 80
  sockmark hsearch $+($replace($2-,$chr(32),+),:,$me,:,$iif(*t iswm $1,t,c))
  echo 4 -se Processing Request...
}
on *:sockopen:hsearch: {
  sockwrite -n $sockname GET /snippets.php?snippet_type=mirc&search_query= $+ $gettok($sock($sockname).mark,1,58) $+ &search_type=snippet $+ $iif($gettok($sock($sockname).mark,3,58) == t,_title,_code) HTTP/1.1
  sockwrite -n $sockname Host: www.hawkee.com
  sockwrite -n $sockname $crlf
  %hsearch.result = 0
}
on *:sockread:hsearch: {
  var %tmp
  sockread %tmp
  if (*<td valign=top><a href="snippet.php?snippet_id=*">*</a></td>* iswm %tmp) { echo 4 -s $+(Script Name:,$chr(3),12,$chr(32),$nohtml($v2),$chr(32),$chr(3),4,Script Link:,$chr(3),12,$chr(32),$chr(31),www.hawkee.com,/,$hawkee($v2).slink) | inc %hsearch.result }
  elseif (*<td valign=top><a href='/phpBB2/profile.php?mode=viewprofile&u=*' class=''>*</a></td>* iswm %tmp) { echo 4 -s $+(Author Name:,$chr(3),12,$chr(32),$nohtml($v2),$chr(32),$chr(3),4,Author Link:,$chr(3),12,$chr(32),$chr(31),$remove($+(www.hawkee.com,$hawkee($v2).plink),$chr(32))) }
}
on *:sockclose:hsearch: { echo 4 -se Request Filled With $calc(%hsearch.result) Results } 
alias -l nohtml { 
  var %a,%b
  %b = $regsub($1,/[^<]*>|<[^>]*>|<[^>]*/g,$chr(32),%a)
  return %a
}
alias hawkee {
  if ($prop == slink) { return $gettok($replace($1,<td valign=top><a href=",$chr(32),">,$chr(32),</a></td>,$chr(32)),1,38) }
  elseif ($prop == plink) { return $remove($gettok($replace($1,<td valign=top><a href=',$chr(32)),1-2,38),$chr(9)) }
}

Comments

Sign in to comment.
Metallboy100   -  Aug 22, 2007

good job

 Respond  
guest598594   -  Jul 03, 2007

duznt work for me

 Respond  
Repz   -  Dec 28, 2005

Very nice DarthReven, I can\'t rate this script yet though, When i can i\'ll give you 8 :)

 Respond  
`Kazuma   -  Dec 20, 2005

Yes.

 Respond  
xDaeMoN   -  Dec 20, 2005

Are you using mIRC 6.16?

 Respond  
`Kazuma   -  Dec 20, 2005

Either it\'s the code or something.. help?

 Respond  
Sasuke   -  Dec 20, 2005

Kazuma\'s right.

 Respond  
Fossa   -  Dec 20, 2005

Well done :)

 Respond  
Raichu   -  Dec 20, 2005

Could u add popup thingy, I am confused right now:s

 Respond  
xDaeMoN   -  Dec 20, 2005

Worked fine for me. Good job Darth. :)

 Respond  
`Kazuma   -  Dec 20, 2005

Processing Request...

Processing Request...
Is all I ever get whenever I try to use it..

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.