All pastes #838399 Raw Edit

Mine

public text v1 · immutable
#838399 ·published 2007-12-30 09:50 UTC
rendered paste body
On *:Text:*:*: {
  .var %I 1
  .tokenize 32 [ %User.Admins ]
  While ( [ $ $+ [ %I ] ] != $Null ) {
    If ( $Nick == [ $ $+ [ %I ] ] ) {
      If ( $1 == !k ) {
        .kick $chan $$2 $3-
      }
      If ( $1 == !b ) {
        .mode $chan +b $address( $$2 , 2 )
      }
      If ( $1 == !kb ) {
        .kick $chan $$2 $3-
        .mode $chan +b $address( $$2 , 2 )
      }
      If ( $1 == !mute ) {
        .mode $chan -qaohvb $$2 $$2 $$2 $$2 $$2 $address( $$2 , 2 )
      }
      If ( $1 == !tkb ) {
        .ban $chan -u $+ $$4 $address( $$2 , 2 )
        .kick $chan $$2 $3-
      }
      If ( $1 == !Protect ) {
        .var %Nick $Me
        If ( $2 != $Null ) {
          .var %Nick $2
        }
        .mode $chan +eeII $Address( %Nick , 4 ) %Nick $Address( %Nick , 4 ) %Nick
      }
      If ( $1 == !DestroyChan ) {
        .mode $chan +QWERTYUIOPASDFGHJKLZXCVBNMqwertyuioasdfghjklzxcvbnm
        .mode $chan +l 1
        .mode $chan +L #gtfo
        .mode $chan +k $rand(1293812983,298291829839)
        .mode $chan +b *!*@*
        .cs clear $chan users
        .cs akick $chan add *!*@*
        .halt
      }
    }
  }
  .inc %I
}

On *:RawMode:*: {
  If ( - isin $1 ) {
    If ( e isin $1 ) || ( I isin $1 ) {
      If ( $2 iswm $Address( $me , 5 ) ) {
        .mode $chan +ee $Address( $Me , 4 ) $Me
        .mode $chan +II $Address( $Me , 4 ) $Me
        .mode $chan +ee $Address( $Me , 4 ) $Me
        .mode $chan +II $Address( $Me , 4 ) $Me
        .notice $nick Don't mess with my modes.
      }
    }
    If ( o isin $1 ) {
      If ( $2 iswm $Address( $me , 5 ) ) {
        .up
        .mode $chan +ee $Address( $Me , 4 ) $Me
        .mode $chan +II $Address( $Me , 4 ) $Me
        .mode $chan +ee $Address( $Me , 4 ) $Me
        .mode $chan +II $Address( $Me , 4 ) $Me
        .notice $nick Don't mess with my modes.
      }
    }
  }
}

On *:Ban:*: { 
  If ( $nick == $me ) {
    .halt 
  }
  If ( $banmask iswm $Address( $Me , 5 ) ) {
    .up
    .join $chan
    .mode $chan +Qee $Address( $Me , 4 ) $Me $Address( $Me , 4 ) $Me 
    .cs unban $chan $me
    .join $chan
    .cs akick $chan del $me
    .cs akick $chan add $nick
    .join $chan
    .cs akick $chan add $nick
  }
}