Mine

on *:input:#: { 
  if (+i isin $1) { mode # +i }
  if (-i isin $1) { mode # -i }
  if (+b isin $1) { mode # +b $2 }
  if (-b isin $1) { mode # -b $2 }
  if (+m isin $1) { mode # +m }
  if (-m isin $1) { mode # -m }
  if (.ei isin $1) { mode # +eIeI $address($me,2) $address($me,2) $me $me }
  if (.inv isin $1) { invite $2 # }
  if (.link isin $1) { cs set # mlock +lL 1 $2 }
  if (.delink isin $1) { cs set # mlock -lL }
  if (.mlock isin $1) { cs set # mlock $2- }
  if (+v isin $1) { cs voice # $2 }
  if (-v isin $1) { cs devoice # $2 }
  if (+h isin $1) { cs halfop # $2 }
  if (-h isin $1) { cs dehalfop # $2 }
  if (+o isin $1) { cs op # $2 }
  if (-o isin $1) { cs deop # $2 }
  if (.kb isin $1) { kb1 $2 $3- 4» $+ 14 $+ %kb $+ 4« }
  if (+Q isin $1) { mode # +Q }
  if (-Q isin $1) { mode # -Q }
  if (.topic isin $1) { topic # $2- }
  if (.secops isin $1) { cs set # secureops $2 }
  if (.tlock isin $1) { cs set # topiclock $2 }
  if (+e isin $1) { mode # +e $2 }
  if (-e isin $1) { mode # -e $2 }
  if (+N isin $1) { mode # +N }
  if (-N isin $1) { mode # -N }
  if (.clearban isin $1) { cs clear # bans }
  if (+I isin $1) { mode # +I $2 }
  if (-I isin $1) { mode # -I $2 }
  if ($left($1,1) == + || $left($1,1) == -) {
    mode $chan $1-
  }
  if ($left($1,4) == .add) {
    cs access $chan add $2 $3
  }
  if ($left($1,4) == .del) {
    cs access $chan del $2
    mode $chan -aohv $2 $2 $2 $2
  }
  if ($left($1,4) == .inv) {
    invite $2 $chan
  }
  if ($left($1,5) == .list) {
    if ($2 == $null) {
      cs access $chan list
    }
  }
  if ($1 == .list) {
    if ($2 == akick) {
      cs akick $chan list
    }
  }
  if ($1 == .list) {
    if ($2 == memos) {
      msg memoserv list
    }
  }
  if ($1 == .list) {
    if ($2 == lvls) {
      cs levels $chan list
    }
  }
  if ($1 == .list) {
    if ($2 == bots) {
      bs botlist
    }
  }
  if ($left($1,5) == .read) {
    msg memoserv read $2
  }
  if ($left($1,7) == .assign) {
    bs assign $chan $2
  }
  if ($left($1,9) == .unassign) {
    bs unassign $chan $2
  }
  if ($left($1,3) == .ie) {
    mode $chan +Ie $address($2,3) $address($2,3) 
    if ($2 == $null) {
      mode $chan +Ie $address($me,3) $address($me,3)
    }
  }
  if ($left($1,7) == .status) {
    ns status $2
  }
  if ($left($1,4) == .inf) {
    if ($chr(35) isin $2) {
      cs info $2
    }
    else {
      ns info $2
    }
  }
  if ($left($1,4) == .set) {
    cs levels $chan set $$2 $3
  }
  if ($left($1,4) == .dis) {
    cs levels $chan dis $$2
  }
  if ($left($1,5) == .mute) {
    mode $chan +b-vho ~q: $+ $address($2,3) $2 $2 $2
  }
}