Pokemon Catching Snippet (Socket Version)

Platform:  mIRC
Published  Apr 02, 2010
Updated  Feb 09, 2011
The syntax: !pokemon

* Updated - revised the regex and got rid of the unneeded strings.
* Updated - Change the Pokémon with $chr(233) , because upon submitting the snippet to Hawkee. It gets altered, along with the output to be bold for easier reading. on *:sockopen:p:{
var %pokemon sockwrite -nt p | %pokemon get /fullpokedex.html http/1.1
%pokemon host: www.pokemonzone.com $str($crlf,2)
}
on *:sockread:p:{
var %p $r(001,493), %r /( $+ %p $+ )\s(.+?)\s/, %s | sockread %s
if ($regex(%s,%r)) { $sock(p).mark $+($chr(2),$regml(2)) | sockclose p }
}
on *:text:$($iif(!pokemon = $strip($1),$1)):#:{
if !%f { set -z %f 5 | sock $+ $iif($sock(p),close,open) p www.pokemonzone.com 80
sockmark p .msg # Congratulations $nick $+ , you've caught a $+(Pok,$chr(233),mon) named:
}
}


Comments

Sign in to comment.
toclafane1   -  May 16, 2011
i like it
 Respond  
Glaxu   -  Mar 31, 2011
<3 !!! thx u
 Respond  
Jethro   -  Feb 09, 2011
That's very generous of you, napa182. Much obliged. But then I shouldn't care less if they came along to lower it. lol
 Respond  
napa182   -  Feb 09, 2011
*napa182 ups ur score +like ;x
 Respond  
Jethro   -  Feb 09, 2011
Some folks must have a beef with me. They keep on lowering my score rating. lol
 Respond  
Jethro   -  Feb 09, 2011
Thanks. I realize that the name pokémon gets transformed into Pokémon when I submitted the code. :/ It looks weird. I've updated the code using $chr(233) and edit the output to be bold.
 Respond  
jefsthampied   -  Feb 09, 2011
toinkk~
nice code~ :P~
 Respond  
Jethro   -  Apr 02, 2010
I did lose my "snippet-submitting" virginity, not my posting one though...:(
 Respond  
GuitarMasterx7   -  Apr 02, 2010
mmk

OSHI-, you lost your posting virginity


lolz ur first snippet
 Respond  
Jethro   -  Apr 02, 2010
This one is much better than the previous one I posted.
 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.