ON *:TEXT:!highcard*:#:{ 
  if ($2 == $null) { /highcard }
  if ($2 ison $chan) {  
    set %8ball $rand(1,13) 
    set %play2 $2
    if (%8ball == 1) msg $chan $nick gets a 2 its $2 $+ 's turn
    if (%8ball == 2) msg $chan $nick gets a 3 its $2 $+ 's turn
    if (%8ball == 3) msg $chan $nick gets a 4 its $2 $+ 's turn
    if (%8ball == 4) msg $chan $nick gets a 5 its $2 $+ 's turn 
    if (%8ball == 5) msg $chan $nick gets a 6 its $2 $+ 's turn 
    if (%8ball == 6) msg $chan $nick gets a 7 its $2 $+ 's turn 
    if (%8ball == 7) msg $chan $nick gets a 8 its $2 $+ 's turn  
    if (%8ball == 8) msg $chan $nick gets a 9 its $2 $+ 's turn  
    if (%8ball == 9) msg $chan $nick gets a 10 its $2 $+ 's turn  
    if (%8ball == 10) msg $chan $nick gets a Jack its $2 $+ 's turn 
    if (%8ball == 11) msg $chan $nick gets a Queen its $2 $+ 's turn 
    if (%8ball == 12) msg $chan $nick gets a King its $2 $+ 's turn 
    if (%8ball == 13) msg $chan $nick gets a Ace its $2 $+ 's turn 
} }
alias highcard {
  if ($nick == $play2) {
    set %8ball $rand(1,13) 
    if (%8ball == 1) msg $chan $nick gets a 2
    if (%8ball == 2) msg $chan $nick gets a 3
    if (%8ball == 3) msg $chan $nick gets a 4
    if (%8ball == 4) msg $chan $nick gets a 5
    if (%8ball == 5) msg $chan $nick gets a 6
    if (%8ball == 6) msg $chan $nick gets a 7
    if (%8ball == 7) msg $chan $nick gets a 8
    if (%8ball == 8) msg $chan $nick gets a 9 
    if (%8ball == 9) msg $chan $nick gets a 10 
    if (%8ball == 10) msg $chan $nick gets a Jack
    if (%8ball == 11) msg $chan $nick gets a Queen 
    if (%8ball == 12) msg $chan $nick gets a King
    if (%8ball == 13) msg $chan $nick gets a Ace
} }
on *:TEXT:!stophc*:#: {
  unset %play2
  msg $chan highcard game has been stopped by $nick
}