This script is made to make it easy to set modes in any one channel. If the mode doesn't exist on your network, it's disabled. If it's active it's checked, otherwise blank.

To delete any modes, just remove its line.
To add a new mode (general case), use:
.$menu-c-modes1(mode-letter,Text describing mode letter) $+ : $menu-c-modes2(mode-letter)

Please note that the reason I didn't put 'isop' etc. in here is the fact that all modes require different access levels.

Put this in remotes (alt+r) in a new file (File->New).

Enjoy! :D

alias -l menu-c-modes1 return $style($iif($$1 !isincs $chanmodes,2,$iif($$1 isincs $chan($chan).mode,5,4))) $+($chr(40),$$1,$chr(41)) $$2
alias -l menu-c-modes2 return mode $chan $+($iif($$1 isincs $chan($chan).mode,-,+),$$1)
alias -l menu-c-modes3 return mode $chan $iif($$1 isincs $chan($chan).mode,$+(-,$$1) $iif($3,$chan($chan). $+ $3),$+(+,$$1) $$?="Please enter $$2 to apply to this channel")

menu channel {
  -
  Modes [ $+($chr(40),$chan,$chr(41)) ]
  .$menu-c-modes1(A,Only admins may join) $+ : $menu-c-modes2(A)
  .$menu-c-modes1(C,No channel CTCP) $+ : $menu-c-modes2(C)
  .$menu-c-modes1(c,ANSI colours not permitted) $+ : $menu-c-modes2(c)
  .$menu-c-modes1(f,Various flood protections) $+ : $menu-c-modes3(f,flood protection options)
  .$menu-c-modes1(G,G-rated channel) $+ : $menu-c-modes2(G)
  .$menu-c-modes1(i,Invite-only) $+ : $menu-c-modes2(i)
  .$menu-c-modes1(j,Join-flood protection) $+ : $menu-c-modes3(j,join-flood protection options)
  .$menu-c-modes1(K,KNOCK command disabled) $+ : $menu-c-modes2(K)
  .$menu-c-modes1(k,Key required for entry) $+ : $menu-c-modes3(k,a key,key)
  .$menu-c-modes1(L,Redirect room $+($chr(40),for limit,$chr(41))) $+ : $menu-c-modes3(L,a room to redirect to once the limit is reached)
  .$menu-c-modes1(l,Limit users on channel) $+ : $menu-c-modes3(l,a user limit,limit)
  .$menu-c-modes1(M,Only registered nicks may speak) $+ : $menu-c-modes2(M)
  .$menu-c-modes1(m,Channel is moderated) $+ : $menu-c-modes2(m)
  .$menu-c-modes1(N,No nickname changes) $+ : $menu-c-modes2(N)
  .$menu-c-modes1(n,No external messages) $+ : $menu-c-modes2(n)
  .$menu-c-modes1(O,Only IRCops may join) $+ : $menu-c-modes2(O)
  .$menu-c-modes1(p,Channel is private) $+ : $menu-c-modes2(p)
  .$menu-c-modes1(Q,Peace mode (no kicks)) $+ : $menu-c-modes2(Q)
  .$menu-c-modes1(R,Only registered nicks may join) $+ : $menu-c-modes2(R)
  .$menu-c-modes1(r,Channel is registered) $+ : $menu-c-modes2(r)
  .$menu-c-modes1(S,Strip all incoming colours) $+ : $menu-c-modes2(S)
  .$menu-c-modes1(s,Channel is secret) $+ : $menu-c-modes2(s)
  .$menu-c-modes1(T,No channel NOTICE) $+ : $menu-c-modes2(T)
  .$menu-c-modes1(t,Only ops set topic) $+ : $menu-c-modes2(t)
  .$menu-c-modes1(u,Auditorium (ops in WHO)) $+ : $menu-c-modes2(u)
  .$menu-c-modes1(V,INVITE command disabled) $+ : $menu-c-modes2(V)
  .$menu-c-modes1(z,Only SSL users may join) $+ : $menu-c-modes2(z)
  -
}