Pokemon Catching Snippet (Socket Version)

By Jethro on Apr 02, 2010

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: 
  } 
}
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.