Stuff

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