All pastes #994639 Raw Edit

Miscellany

public text v1 · immutable
#994639 ·published 2008-04-23 15:42 UTC
rendered paste body
on *:INPUT:#: {
  if ($1 == .minv) {  
    set %nicks 1 
    while ( %nicks <= $nick($chan,0) ) { 
      invite $nick($chan,%nicks) $2 
      inc %nicks 
    } 
    unset %nicks 
    halt 
  }
  if ($1 == .amsg) {  
    var %x = 1 
    while (%x <= $chan(0)) { 
      if (($chan(%x) != #svclan)) && (($me isop $chan(%x)) || ($me ishop $chan(%x)))  msg $chan(%x) 4>2>4>2amsg4<2<4<12 $2- 
    inc %x } 
  } 
  if ($1 == .akick) {
    cs akick # add $2 $3-
    cs akick # enforce
  }
  if ($1 = .delakick) {
    cs akick # del $2-
  }
  if ($1 == .akicklist) {
    cs akick # list
  }
  if ($1 == .enforce) {
    cs akick # enforce $2-
  }
  if ($1 == .entrymsg) {
    cs set # entrymsg $2-
  }
  if ($1 == .eI) && (!$2) {
    mode $chan +eeeIII $address($me,9) $me $address($me,2) $address($me,9) $me $address($me,2)
  } 
  if ($1 == .language) {
    ns set language $2
  }
  if ($2) && ($1 == .eI) {
    mode $chan +eeeIII $address($2,9) $2 $address($2,2) $address($2,9) $2 $address($2,2)
  } 
  if ($2) && ($1 == ,eI) {
    mode $chan -eeeIII $address($2,9) $2 $address($2,2) $address($2,9) $2 $address($2,2)
  }
  if ($1 == .add) || ($1 == .del) || ($1 == .list) {
    cs access $chan $remove($1,.) $2-
  }
  if ($1 == .add) && ($$3 isnum) {
    $iif($3 > 2,    mode $chan $iif($3 == 3,+v-oha)  $iif($3 == 4,+h-voa) $iif($3 isnum 5-9,+o-hva) $iif($3 > 9,+ao-hv) $str($2 $+ $chr(32),5))
  }
  if ($1 == .del) && ($2 ison $chan) {
    mode # -aohv $2 $2 $2 $2
  }
  if ($left($1,1) == +) || ($left($1,1) == -) {
    $iif($remove($1,-,+) isalpha,mode $chan $eval($1-,2))
  }
  if ($1 == .secureops) {
    cs set # secureops $2
  }
  if ($1 == .update) {
    ns update
  }
  if ($1 == .inv) {
    mode $chan -V
    invite $2 $chan
  }
  if ($1 == .v) {
    mode $chan +v $2
  }
  if ($1 == .k) {
    inc %noobcount
    kick $chan $2 11,1 Another Noob down, %noobcount Noobs down
  }
  if ($1 == .op) {
    mode $chan +o $2
  }
  if ($1 == .kb) {
    inc %noobcount
    mode # -eeeeeeeeeee $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9)
    mode # +bbbbbbbbbbb $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) 
    kick # $2 11,1 Another Noob down, %noobcount Noobs down 
  }
  if ($1 == .unban) {
    mode $chan -b $2
    mode # -bbbbbbbbbbb $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) 
    ban -r $chan $2
  }
  if ($1 == .ban) {
    mode # +bbbbbbbbbbb $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9) 
  }
  if ($1 == .deop) {
    mode $chan -o $2
  }
  if ($1 == .topic) {
    msg $chan The topic is: $chan($chan).topic
  }
  if ($1 == .mlock) {
    cs set # mlock $2-
  }
  if ($1 == .assign) {
    bs assign # $2 
  }
  if ($1 == .unassign) {
    bs unassign #
  }
  if ($1 == .topiclock) {
    cs set # topiclock $2
  }
  if ($1 == .cs) {
    cs $2 # $3-
  }
  if ($1 == .ns) {
    ns $2 # $3-
  }
  if ($1 == .bs) {
    bs $2 # $3-
  }
  if ($1 == .sp) {
    mode # +RntjfmV 2:99 [8j#i10]:10
  }
  if ($1 == .spoff) {
    mode # -RjfmV 2:99 [8j#i10]:10
  }
  if ($1 == .Qkb) {
    inc %noobcount
    mode # -eeeeeeeeeeeQ $2 $address($2,0) $address($2,1) $address($2,2) $address($2,3) $address($2,4) $address($2,5) $address($2,6) $address($2,7) $address($2,8) $address($2,9)
    mode # -Q+bbbb $2 $address($2,1) $address($2,3) $address($2,4)
    kick # $2 11,1 Another Noob down, %noobcount Noobs down
    cs kick $chan $2 Another Noob down, %noobcount Noobs down 
  }
  if ($1 == .Qk) {
    inc %noobcount
    mode # -Q
    kick # $2 11,1 Another Noob down, %noobcount Noobs down
  }
  if ($1 == .levels) {
    cs levels # set $$2-3
  }
  if ($1 == .ucount) {
    say The user count for $iif($2,$2,#) is $nick($iif($2,$2,#),0)
  }
  if ($1 == .bops) {
    mode # +bbbbbbbbbbbbb strider3282 fx antidrone katlyn marius sephiroth clorith allen vivec slaapkamer tarball scott tim 
    mode # +bbbbbbbb chrono pancakes gic woodruff *!*@127.0.0.1 ~c:#irchelp ~c:#support ~c:#vivec
    mode # +bbbbbb Slaapkamer@Swift-F1829477 ~Scott@Scott.Slaapkamer.us ~fx@staff.darklite.be loverboy Awong@Awong.users.SwiftIRC.net gic@Swift-F1829477
  }  
  if ($1 == .badword) {
    bs badwords # add $2
  }
  if ($1 == .delword) {
    bs badwords # del $2
  }
}