All pastes #461880 Raw Edit

Stuff

public text v1 · immutable
#461880 ·published 2007-04-27 22:29 UTC
rendered paste body
on *:START: {
  if ($hget(Banned)) hfree Banned
  hmake Banned 100
  if ( $exists(Banned.hsh) ) {
    hload Banned Banned.hsh
    echo $color(info) -a * Loaded Ban List
  }
}
on *:OP:#MarshMallow: {
  if ( $opnick == $me ) {
    var %x = $hget(Banned,0).item,%d = 0
    while ( %x ) {
      .timer 1 %d mode $chan +b $hget(Banned,%x).item 
      dec %x
      inc %d 0.4
    }
  }
}
on *:BAN:#MarshMallow: { 
  if ($nick == $me) || ($nick == Dr) hadd -m Banned $banmask 2
  else {
    if ($nick == $me) || ($nick == Erico) || ($address($nick,2) == *!*@AC9504EA.ipt.aol.com) || ($address($nick,2) == *!*@Is.Too.Kewl.For.You) || ($address($nick,2) == *!*@Swift-560D6AE8.range86-149.btcentralplus.com) { halt }
    mode $chan -b+b $banmask $address($nick,2) | inc %furbykick | cs kick $chan $nick Dont be messin wit me. [%furbykick ] 
  } 
}
on *:UNBAN:#MarshMallow: {
  if ($nick == $me) && ($hget(Banned,$banmask)) hdel Banned $banmask
  else {
    if ($nick == $me) || ($nick == Erico) || ($address($nick,2) == *!*@Is.Too.Kewl.For.You) || ($address($nick,2) == *!*@AC9504EA.ipt.aol.com) || ($address($nick,2) == *!*@Swift-560D6AE8.range86-149.btcentralplus.com) { halt }
    mode $chan +b+b $banmask $address($nick,2) | inc %furbykick | cs kick $chan $nick Dont be messin wit me. [People owned by Furbies: %furbykick ] 
  }
}
alias listt {
  var %x = $hget(Banned,0).item
  echo -a 11Logged Bans:
  while (%x) { 
    echo -a 11 $hget(Banned,%x).item
    dec %x
  }
}