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
26
27
|
alias ti {
if ($isid) {
if (!$2) { return $readini(banlist.ini,$chan) }
else { return $readini(banlist.ini,$1) }
}
else {
if ($chr(35) !isin $1) { writeini banlist.ini $chan $1- }
else { writeini banlist.ini $1- }
}
}
on *:TEXT:!banlist:#:{
if ($read(chanlev.txt,w,$address($nick,2))) || ($readini(users.ini, $chan, $address($nick,1)) == owner) || ($readini(users.ini, $chan, $address($nick,1)) == master) {
if (%secure. [ $+ [ $chan ] ] == disabled) { $eval(%chat.mode. [ $+ [ $chan ] ],2) You need to enable channel protection to do this command! | halt }
var %i = 1
while (%i <= $ini(banlist.ini,$chan,0)) {
var %x = $ini(banlist,$chan,%i)
var %lvl = $ti($ini(banlist.ini,$chan,%i))
var %list = $addtok(%x ( %lvl ) $+ $chr(44),%list,32)
inc %i
}
$eval(%chat.mode. [ $+ [ $chan ] ],2) %chanlevskin Banlist of $chan $+ : $iif(%list,%list,No Hosts!) %chanlevskin
halt
}
} |