on *:TEXT:*:#:{
if ($timer($+(.,$chan,.,$nick)).secs > 0) {
$+(.timer.,$chan,.,$nick) off
msg $chan Yay $nick you win!
}
  if ($1 == !drunk) {
    if ($($+(%,gon.,$chan),2) == 0) {
      halt
    }
    if ($chan) {
      var %rgivenick = $nick($chan,$rand(1,$nick($chan,0))) | var %rgiveid = $read($idfl, s, %rgivenick)
      msg $chan $theme $+ The biggest drunk in $chan is: %rgivenick [ $+ $iif(%rgiveid,%rgiveid,No ID Stored) $+ ]. Talk to claim your prize.
.timer. $+ $chan $+ . $+ %rgivenick 1 30 msg $chan $theme $+ Sorry %rgivenick $+ , your time is up!
    }
  }
}