Heres Some input Scripts that i use for various reasons that work for me, they do
List
+- Modes
clear excepts/bans/Invites
invites
Channel user count

• except/Invite Except for you or another
  Mute users if your Op aswell as unmute

NOTE: if your not use to using inputs, you can only have 1 on input, otherwise itll go with first one, and ignore the second one

on *:INPUT:#:{ 
  if ($1 == .mute || $1 == hush) { mode $chan +b-aohvq $+(~q:,$address($2,2)) $2 $2 $2 $2 $2 | halt }
  if ($1 == .unmute) { mode $chan -bb $2 $+(~q:,$address($2,2)) $2 $2 $2 $2 $2 | halt }
  if ($1 == .cleare) { cs clear # excepts }
  if ($1 == .cleari) { cs clear # invites }
  if ($1 == .clearb) { cs clear # bans }
  if ($2) && ($1 == .i) { mode # -V | invite $2- $chan | notice $2- I have invited you to $chan }
  if ($2) && ($1 == .list) { cs access $chan list $2 }
  if (!$2) && ($1 == .list) { cs access $chan list }
  if ($1 == .ucount) { msg #  $iif($2,$2,#) has $nick($iif($2,$2,#),0) users }
  if ($1 == .ei) && (!$2) { mode $chan +eI $address($me,3) $address($me,3) }
  if ($2) && ($1 == .ei) { mode $chan +eI $address($2,3) $address($2,3) }
  if ($2) && ($1 == .qkb) { mode # -Q | ban # $address($2,2) | cs kick # $2- }
  if ($left($1, 1) isin +-) {
    haltdef
    mode $chan $eval($1-,2) $iif($2,$2-,$me)
  }
  if ($1 = .rlb) {
    //echo 4 $+ $gettok($ibl(#,1).by,1,33) 14set (+b4 $ibl(#,1) $+ 14) at04 $asctime($calc(21600+ $ibl(#,1).ctime),hh14:04nn14.04ss14tt) (04 $+ $duration($calc($ctime - $ibl(#,1).ctime)) 14ago.)
    mode # -b $ibl(#,1)
  }
}