Huggle Script

hugall {
  var %c $nick($chan,0)
  var %d 1
  while (%d <= %c) {
    if ($nick($chan,%d) != $me) var %hugnicks = %hugnicks $nick($chan,%d) $iif(%d < %c,and)
    inc %d
  }
  describe $chan 4h7u8g9g11l12e6s %hugnicks $+ !!
}