1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
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 ] ] $+(@addkick[,$1,/,$ialchan($2,$1,0),])
window %addkick. [ $+ [ $1 ] ]
aline %addkick. [ $+ [ $1 ] ] Found $ialchan($2,$1,0) users who match $2 in channel $1 $+ :
while ($ialchan($2,$1,%x)) {
.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
}
} |