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 }
}