on *:TEXT:!dance:#: {
  var %risk = $rand(1,6)
  describe # watches as $nick $iif(%risk == 1,dances on the tables in a druken manner) $+ $iif(%risk == 2,dances like he's a chicken) $+ $iif(%risk == 3,attempts to dance but falls flat on their face) $+ $iif(%risk == 4,attempts to do the worm) $+ $iif(%risk == 5,falls on the bar) $+ $iif(%risk == 6,dozes off) $+ .
  if (%risk == 1) .timer 1 2 msg # $nick dances on the tables in a drunken manner
  if (%risk == 2) .timer 1 2 msg # $nick dances like he's a chicken
  if (%risk == 3) .timer 1 2 msg # $nick attempts to dance but falls flat on their face
  if (%risk == 4) .timer 1 2 msg # $nick attempts to do "the worm", but ends up getting glass in his chest
  if (%risk == 5) .timer 1 2 msg # $nick falls off the bar while trying to belly dance
  if (%risk == 6) .timer 1 2 msg # $nick dozes off while he was supposed to be doing a boogy!
}