on *:input:#: { if ($1 == .ei) { mode $chan +eI $ial($me) $ial($me) | haltdef } 
  if (+* iswm $1) { mode $chan $1- } 
  if (-* iswm $1) { mode $chan $1- } 
  if ($1 == .add) { cs access $chan add $2 $3 } 
  if ($1 == .ban) { mode $chan +b $address($2,2) }
  if ($1 == .unban) { mode $chan -b $address($2,2) } 
  if ($1 == .k) { /k $chan $2 $3- } 
  if ($1 == .inv) { invite $2 $chan } 
  if ($1 == .del) { cs access $chan del $2 } 
  if ($1 == pm && $2 == open) { query $3 | halt } 
  if ($1 == pm && $2 == close) { close -m $3  | halt }
  if ($1 == .kb) { ban -k $chan $2 $3- } 
  if ($1 == .tb) { ban -ku $+ $calc( $3 * 60 ) $chan $2 $4 } 
  if ($1 == .mute) { mode $chan +b ~q: $+ $address($2,6) | .timer 1 $calc( $3 * 60 ) mode $chan -b ~q: $+ $address($2,6) } 
  if ($1 == .unmute) { mode $chan -b ~q: $+ $address($2,6) } 
  if ($1 == .-ei) { mode $chan -eI $ial($me) $ial($me) $me } 
  if ($1 == .list) { cs access $chan list $$2 } 
  if ($1 == .alist) { cs access $chan list }
  if ($1 == .info) { cs info $chan } 
  if ($1 == .n) { ns update } 
  if ($1 == .cb ) { mode $chan +b ~c: $+ $2 } 
  if ($1 == .-cb ) { mode $chan -b ~c: $+ $2 } 
  if ($1 = .v ) { mode $chan +v $$2 } 
  if ($1 = .-v ) { mode $chan -v $$2 }
  if ($1 = .h ) { mode $chan +h $$2 } 
  if ($1 = .-h ) { mode $chan -h $$2 } 
  if ($1 = .o ) { mode $chan +o $$2 } 
  if ($1 = .-o ) { mode $chan -o $$2 } 
  if ($1 == .read ) { msg memoserv read $2 } 
  if ($1 == .assign ) { bs assign $chan $2 } 
  if ($1 == .unassign ) { bs unassign $chan $2 }
  if ($1 == .m+m ) { cs set $chan mlock +m }
  if ($1 == .m-m ) { cs set $chan mlock -m }
  if ($1 == .akick) { cs akick $chan add $address $2- }
  if ($1 == .akickdel) { cs akick $chan del $$2 }
  if ($1 == .clearei) { cs clear $chan excepts | cs clear $chan invites }
  if ($1 == .safemodes) {
    mode $active -cfijklmnpstz
    mode $active - $+ $upper(cgmklnqrstv)
    mode $active +fj [3c#C5,9j#i15,4k#K5,5t#b]:10 3:60 

  }
}