All pastes #937492 Raw Edit

all script

public text v1 · immutable
·published 2008-03-11 00:45 UTC
rendered paste body
on *:INPUT:#: {
  if ($1 == akick) {
    cs akick # add $2-
  }
  if ($1 = delkick) {
    cs akick # del $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 ($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 == .founder) {
    cs set # founder $2
  }
  if ($1 == inv) {
    invite $2 $chan
  }
  if ($1 == v) {
    mode $chan +v $2
  }
  if ($1 == k) {
    kick $chan $2-
  }
  if ($1 == op) {
    mode $chan +o $2
  }
  if ($1 == kb) {
    mode $chan +bb $nick $address($2,2)
    kick $chan $2-
  }
  if ($1 == unban) {
    mode $chan -b $2
    mode $chan -b $address($2,2)
    ban -r $chan $2
  }
  if ($1 == ban) {
    mode $chan +b $address($2,2)
  }
  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 == .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) {
    mode # +bb-vhoaQ $2 $address($2,2) $2 $2 $2 $2 
    mode # -Q
    kick # $2 $3- 
    mode # +Q
  }
  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)
  }
}