Ok nvm this one looks and works better

Code:
on *:text:!draw:#:{
  set %names. $+ $nick Bulbasaur Ivysaur Venusaur Charmander Charmeleon Charizard Squirtle Wartortle Blastoise Caterpie Metapod Butterfree Weedle Kakuna Beedrill
  var %i 1
  while (%i <= 5) {
    var % $+ $($+(c,%i),2) $gettok($($+(%,names.,$nick),2), $rand(1,$calc(16 - %i)), 32)
    set %names. $+ $nick $remtok($($+(%,names.,$nick),2), $($+(%,c,%i),2), 32)
    inc %i
  }
  .msg $chan You drew %c1 $+ , %c2 $+ , %c3 $+ , %c4 $+ , and %c5 $+ .
}
on *:text:!draw2:#:{
  var %i 1
  while (%i <= 5) {
    var % $+ $($+(c,%i),2) $gettok($($+(%,names.,$nick),2), $rand(1,$calc(11 - %i)), 32)
    set %names. $+ $nick $remtok($($+(%,names.,$nick),2), $($+(%,c,%i),2), 32)
    inc %i
  }
  .msg $chan You drew %c1 $+ , %c2 $+ , %c3 $+ , %c4 $+ , and %c5 $+ .
  .msg $chan The remaining cards are $gettok($($+(%,names.,$nick),2), 1, 32) $+ , $gettok($($+(%,names.,$nick),2), 2, 32) $+ , $gettok($($+(%,names.,$nick),2), 3, 32) $+ , $gettok($($+(%,names.,$nick),2), 4, 32) $+ , and $gettok($($+(%,names.,$nick),2), 5, 32) $+ .
}


Also you don't have pikachu in your list, This is a major flaw in your design.

Last edited by Belhifet; 01/01/15 08:19 AM.