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

Last edited by Wims; 03/03/22 04:55 PM.

#mircscripting @ irc.swiftirc.net == the best mIRC help channel