Ranadeep

on *:Input:#: {
  if ($1 == .ei) {
    mode $chan +eeII $address($me,6) $me $address($me,6) $me
  }
  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 == .k) {
    /k $chan $2 $3
  }
  if ($1 == .kb) {
    ban -k $chan $2 $address($2,2)
  }
  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 -eeII $address($me,6) $me $address($me,6) $me
  }
  if ($1 == .list) {
    /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 +vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv $2-
  }
  if ( $1 = -v ) {
    mode $chan -vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv $2-
  }
  if ( $1 = +h ) {
    mode $chan +hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh $2-
  }
  if ( $1 = -h ) {
    mode $chan -hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh $2-
  }
  if ( $1 = +o ) {
    mode $chan +oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo $2-
  }
  if ( $1 = -o ) {
    mode $chan -oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo $2-
  }
  if ( $1 = +a ) {
    /cs protect $chan $2-
  }
  if ( $1 = -a ) {
    /cs deprotect $chan $$2
  }
  if ( $1 = +q ) {
    /cs owner $chan $2-
  }
  if ( $1 = -q ) {
    /cs deowner $chan $$2
  }
  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,7) == .status) {
    ns status $2
  }