Simple on input commands

By PoiXon on Feb 16, 2005

This Lil Snippet just has some commands: !voices people, !devoices people, !halfops people, !dehalfops people, !ops people, !deops people ..... Then it has some mass scripts. !massop , !massdeop, !massvoice , !massdevoice, !masshalfop, !massdehalfop, on the !devoices
!kickban, !ban, !unban, !modes commands and !voices and !ops commands u can op/voice/hop up to 5 people =), Have Fun =)

on *:input:#: {
  if ($me isop #) {
    if ($1 == !MassHalfop) {
      msg $active $1-
      set %e 1 
      :fred
      set %chan $nick(#,%e)
      if (%chan == $null) { 
        halt
      }
      elseif (%chan ison #) && (%chan == $me) { 
        inc %e
        goto fred
      }
      elseif (%chan isreg #) || (%chan isvoice #) || (%chan isop #) {
        mode # +h %chan
        inc %e
        goto fred
      }
    }
  }
  if ($1 == !MassdeHalfop) {
    msg $active $1-
    set %f 1 
    :jim
    set %chan $nick(#,%f)
    if (%chan == $null) { 
      halt
    }
    elseif (%chan isop #) && (%chan == $me) { 
      inc %f
      goto jim
    }
    elseif (%chan ishop #) {
      mode # -h %chan
      inc %f
      goto jim
    }
    elseif (%chan isop #) { 
      inc %f
      goto jim
    }
  }
  if ($1 == !MassDeop) {
    msg $active $1-
    set %a 1 
    :start
    set %chan $nick(#,%a)
    if (%chan == $null) { 
      halt
    }
    elseif (%chan isop #) && (%chan == $me) { 
      inc %a 
      goto start
    }
    elseif (%chan isop #) { 
      mode # -o %chan
      inc %a 
      goto start
    }
  }
  if ($1 == !MassOp) { 
    msg $active $1-
    set %b 1 
    :begin
    set %chan $nick(#,%b)
    if (%chan == $null) { 
      halt
    }
    elseif (%chan isreg #) || (%chan isvoice #) || (%chan ishop #) && (%chan == $me) { 
      inc %b
      goto begin
    }
    elseif (%chan isreg #) || (%chan isvoice #) || (%chan ishop #) {
      mode # +o %chan
      inc %b
      goto begin
    }
    elseif (%chan isop #) {
      inc %b 
      goto begin  
    }
  }
  if ($1 == !MassVoice) {
    msg $active $1-
    set %c 1 
    :starting
    set %chan $nick(#,%c)
    if (%chan == $null) { 
      halt
    }
    elseif (%chan ison #) {
      inc %c
      mode # +v %chan
      goto starting
    }
  }
  if ($1 == !MassDevoice) {
    msg $active $1-
    set %d 1 
    :startings
    set %chan $nick(#,%d)
    if (%chan == $null) { 
      halt
    }
    elseif (%chan ison #) {
      inc %d
      mode # -v %chan
      goto startings
    }
  }
  if ($1 == !voices) {
    if ($2) {
      mode # +v $2
    }
    if ($3) {
      mode # +vv $2 $3
    }
    if ($4) {
      mode # +vvv $2 $3 $4
    }
    if ($5) {
      mode # +vvvv $2 $3 $4 $5
    }
    if ($6) {
      mode # +vvvvv $2 $3 $4 $5 $6
    }
  }
  if ($1 == !devoices) {
    if ($2) {
      mode # -v $2
    }
    if ($3) {
      mode # -vv $2 $3
    }
    if ($4) {
      mode # -vvv $2 $3 $4
    }
    if ($5) {
      mode # -vvvv $2 $3 $4 $5
    }
    if ($6) {
      mode # -vvvvv $2 $3 $4 $5 $6
    }
  }
  if ($1 == !ops) {
    if ($2) {
      mode # +o $2
    }
    if ($3) {
      mode # +oo $2 $3
    }
    if ($4) {
      mode # +ooo $2 $3 $4
    }
    if ($5) {
      mode # +oooo $2 $3 $4 $5
    }
    if ($6) {
      mode # +ooooo $2 $3 $4 $5 $6
    }
  }
  if ($1 == !deops) {
    if ($2) {
      mode # -o $2
    }
    if ($3) {
      mode # -oo $2 $3
    }
    if ($4) {
      mode # -ooo $2 $3 $4
    }
    if ($5) {
      mode # -oooo $2 $3 $4 $5
    }
    if ($6) {
      mode # -ooooo $2 $3 $4 $5 $6
    }
  }
  if ($1 == !halfops) {
    if ($2) {
      mode # +h $2
    }
    if ($3) {
      mode # +hh $2 $3
    }
    if ($4) {
      mode # +hhh $2 $3 $4
    }
    if ($5) {
      mode # +hhhh $2 $3 $4 $5
    }
    if ($6) {
      mode # +hhhhh $2 $3 $4 $5 $6
    }
  }
  if ($1 == !dehalfops) {
    if ($2) {
      mode # -h $2
    }
    if ($3) {
      mode # -hh $2 $3
    }
    if ($4) {
      mode # -hhh $2 $3 $4
    }
    if ($5) {
      mode # -hhhh $2 $3 $4 $5
    }
    if ($6) {
      mode # -hhhhh $2 $3 $4 $5 $6
    }
  }
  if ($1 == !modes) {
    if ($2) {
      mode # $2
    }
    if ($3) {
      mode # $2 $3
    }
    if ($4) {
      mode # $2 $3 $4 
    }
    if ($5) {
      mode # $2 $3 $4 $5
    }
  }
  if ($1 == !ban) {
    if ($2) {
      mode # +b $address($2,6)
    }
    if ($3) {
      mode # +bb $address($2,6) $address($3,6)
    }
    if ($4) {
      mode # +bbb $address($2,6) $address($3,6) $address($4,6) 
    }
    if ($5) {
      mode # +bbbb $address($2,6) $address($3,6) $address($4,6) $address($5,6)
    }
  }
  if ($1 == !unban) {
    if ($2) {
      mode # -b $address($2,6)
    }
    if ($3) {
      mode # -bb $address($2,6) $address($3,6)
    }
    if ($4) {
      mode # -bbb $address($2,6) $address($3,6) $address($4,6) 
    }
    if ($5) {
      mode # -bbbb $address($2,6) $address($3,6) $address($4,6) $address($5,6)
    }
  }
  if ($1 == !kickban) {
    if ($2) {
      inc %kicks
      mode # +b $address($2,6)
      kick # $2 4Kick Number2:9 %kicks
    }
    if ($3) {
      inc %kicks
      mode # +bb $address($2,6) $address($3,6)
      kick # $2 4Kick Number2:9 %kicks
      kick # $3 4Kick Number2:9 %kicks
    }
    if ($4) {
      inc %kicks
      mode # +bbb $address($2,6) $address($3,6) $address($4,6) 
      kick # $2 4Kick Number2:9 %kicks
      kick # $3 4Kick Number2:9 %kicks
      kick # $4 4Kick Number2:9 %kicks
    }
    if ($5) {
      inc %kicks
      mode # +bbbb $address($2,6) $address($3,6) $address($4,6) $address($5,6)
      kick # $2 4Kick Number2:9 %kicks
      kick # $3 4Kick Number2:9 %kicks
      kick # $4 4Kick Number2:9 %kicks
      kick # $5 4Kick Number2:9 %kicks
    }
  }
}

Comments

Sign in to comment.
HassanAbbas   -  Nov 26, 2006

i donot know :(

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.