menu status {
Favorite rooms $+([,$numtok(%rooms,44),])
.$iif(($status == connected),join)
..$submenu($popupmenu($1,join))
.$iif(($status == connected),part)
..$submenu($popupmenu($1,part))
.-
.delete
..$submenu($popupmenu($1,deleteroom))
}
alias -l popupmenu {
if (($1 isnum) && ($gettok(%rooms,$1,44))) { return $v1 : $2 $v1 }
}
alias -l deleteroom { set %rooms $remtok(%rooms,$1,0,44) }