Someone

on *:INPUT:#: {
  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
  }
}