menu menubar {
Notify List
.$submenu($notlist($1))
}
alias notlist {
if (%notlistnone) {
unset %notlistnone
return $style(2) None : noop
}
if ($1 !isnum) return
if (!%notlistservcount) {
%notlistservcount = 1
%notlistcount = 1
}
scon %notlistservcount
if ($status == connected) {
if (%notlistcount == 1) var %r $style(2) $network $br($server) : noop
elseif ($notify($calc(%notlistcount - 1))) {
if (%notlistcount isnum 2-16) var %r $iif($notify($calc(%notlistcount - 1)).ison,$notify($calc(%notlistcount - 1)) : scon % $+ notlistservcount query $notify($calc(%notlistcount - 1)))
else return More... : scon % $+ notlistservcount notify -s
}
else goto next
if (%r) {
inc %notlistcount
return %r
}
}
else {
:next
if ($status != connected) && (%notlistcount == 1) set -u %notlistnone 1
if (%notlistservcount == $scon(0)) {
unset %notlistservcount %notlistcount
return
}
inc %notlistservcount
%notlistcount = 1
return -
}
}