Id: 9724; Nick: NaNg; Timestamp: 2008-04-25 14:40:25; Pasted as: mIRC
Description: n/a
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
alias addkick {
  if (!$1) && (!$2) {
    echo -a Usage is: /addkick #channel nick!user@host
    return
  }
  if ($me !ison $1) {
    echo -a You are not in the channel $1
    return
  }
  if (!$ialchan($2,$1,0)) {
    echo -a No matching users.
    return
  }
  var %x = 1
  var %addkick. [ $+ [ $1 ] ] .count = $ialchan($2,$1,0)
  var %addkick. [ $+ [ $1 ] ] $+(@addkick[,$1,/,%addkick. [ $+ [ $1 ] ] .count,])
  window %addkick. [ $+ [ $1 ] ]
  aline %addkick. [ $+ [ $1 ] ] Found %addkick. [ $+ [ $1 ] ] .count users who match $2 in channel $1 $+ :
  mode $1 +b $2
  while ($ialchan($2,$1,%x)) {
    $iif(%addkick. [ $+ [ $1 ] ] .count > 6,.timeraddkick [ $+ [ %x ] ] 1 $calc(%x * 2)) kick $1 $ialchan($2,$1,%x).nick
    aline %addkick. [ $+ [ $1 ] ] $timestamp %x $+ . User $ialchan($2,$1,%x).nick matched host $2 in channel $1 $+ .
    inc %x
  }
}
Options: New, Download,
, mIRC Parser;
Copyright © 2006 by Zyberdog - Some rights reserved. (Browse/Disclaimer/Stats/About)