menu channel {
  quit:{
    quit $iif($?!="leave a quit message?" == $true,$?="Quit Message?")
  }
  part:{
    part $chan $iif($?!="leave a part message?" == $true,$?="Part Message?")
  }
  Hop:{ hop $iif($?!="leave a Hop message?" == $true,$?="Hop Message?") }
}
alias check {
  tokenize 32 %dat
  var %o = 0
  while (%o < $0) {
    inc %o 1
    describe $chan passes $($+($,%o),2) %it
  }
}
menu NickList {
  .fun
  .sodas
  ..pepsi:{ set %it a pepsi! | set %dat $1- | check }
  ..sprite:{ set %it a sprite! | set %dat $1- | check }
  .popcorn
  ..greasy:{ set %it a greasy bag of popcorn! | set %dat $1- | check }
  ..buttery:{ set %it a buttery bag of popcorn! | set %dat $1- | check }
  ..plain:{ set %it a plain bag of popcorn! | set %dat $1- | check }
  .candy
  ..snickers:{ set %it a snickers bar! | set %dat $1- | check }
  ..twix:{ set %it an empty twix wrapper. (2 for me, none for you!)| set %dat $1- | check }
}