the way you have it now can be done like this as well
on *:text:!Pokemon:#: {
if ($($+(%,$nick,.,pokenick),2) == caught) { msg $chan Oh no, $nick is already caught. }
else { var %pokeballroll $r(1,3) | describe $chan sees a wild $nick | describe $chan Throws a Pokeball at the $nick | describe $chan sees the ball roll %pokeballroll time $+ $iif(%pokeballroll > 1,\'s) | msg $chan $iif(%pokeballroll != 3,$nick got away,I got a new $nick) | $iif(%pokeballroll == 3,set -u600 $+(%,$nick,.,pokenick) caught) }
}
eh just one of many ways it can be done..