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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
on $*:text:/^\*/:#:{
var %gnick = $iif($readini(pig.ini,global,$address($nick,0)),$v1,0)
var %g2 = $iif($readini(stamper.ini,setup,$address($2,0)),$v1,0)
var %cnick = $iif($readini(pig.ini,$chan,$address($nick, 0)),$v1,0)
var %c2 = $iif($readini(stamper.ini,$chan,$address($2,0)),$v1,0)
var %cmd = $mid($1,2)
if %cmd == mute {
if ((%gnick >= 3) || (%cnick >= 3)) {
if ($me !isop $chan) { notice $nick I need op to perform this command | return }
if (!$2) { notice $nick Usage: *mute nick / *mute time nick / *mute time nick reason (Time in seconds) | return }
if ($4) { goto next3 | halt }
if ($3) { goto next2 | halt }
if ($2) { goto next1 | halt }
:next3
if ($2 !isnum) { notice $nick Please use numbers when setting a time (in seconds) }
if ($3 !ison $chan) { notice $nick $3 is not on the channel | return }
if (%mute. [ $+ [ $3 ] ]) { notice $nick $3 is already muted | return }
if (($3 isop $chan) && ($3 isvoice $chan)) { mode $chan -ov $3 | set %mute. [ $+ [ $3 ] ] ov | mode $chan +b $address($3,0) | notice $3 You have been muted by $nick for $2 seconds; Reason: $4- | halt }
if ($3 isop $chan) { mode $chan -o $3 | set %mute. [ $+ [ $3 ] ] o | ban -u $+ $2 $chan $address($3,0) | notice $nick You have been muted by $nick for $2 seconds; Reason: $4- | halt }
if ($3 isvoice $chan) { mode $chan -v $3 | set %mute. [ $+ [ $3 ] ] v | ban -u $+ $2 $chan $address($3,0) | notice $3 You have been muted by $nick for $2 seconds; Reason: $4- | halt }
if ($3 isreg $chan) { set %mute. [ $+ [ $3 ] ] reg | ban -u $+ $2 $chan $address($3,0) | notice $3 You have been muted by $nick for $2 seconds; Reason: $4- }
:next2
if ($2 !isnum) { notice $nick Please use numbers when setting a time (in seconds) }
if ($3 !ison $chan) { notice $nick $3 is not on the channel | return }
if (%mute. [ $+ [ $3 ] ]) { notice $nick $3 is already muted | return }
if (($3 isop $chan) && ($3 isvoice $chan)) { mode $chan -ov $3 | set %mute. [ $+ [ $3 ] ] ov | mode $chan +b $address($3,0) | notice $3 You have been muted by $nick for $2 seconds | halt }
if ($3 isop $chan) { mode $chan -o $3 | set %mute. [ $+ [ $3 ] ] o | ban -u $+ $2 $chan $address($3,0) | notice $3 You have been muted by $nick for $2 seconds | halt }
if ($3 isvoice $chan) { mode $chan -v $3 | set %mute. [ $+ [ $3 ] ] v | ban -u $+ $2 $chan $address($3,0) | notice $3 You have been muted by $nick for $2 seconds | halt }
if ($3 isreg $chan) { set %mute. [ $+ [ $3 ] ] reg | ban -u $+ $2 $chan $address($3,0) | notice $3 You have been muted by $nick for $2 seconds | halt }
:next1
if ($2 isnum) { notice $nick Usage: *mute nick / *mute time nick / *mute time nick reason (Time in seconds) | halt }
if ($2 !ison $chan) { notice $nick $2 is not on the channel | halt }
if (%mute. [ $+ [ $2 ] ]) { notice $nick $2 is already muted | halt }
if (($2 isop $chan) && ($2 isvoice $chan)) { mode $chan -ov $2 | set %mute. [ $+ [ $3 ] ] ov | mode $chan +b $address($3,0) | notice $2 You have been permanently muted by $nick | halt }
if ($2 isop $chan) { mode $chan -o $2 | set %mute. [ $+ [ $2 ] ] o | ban $chan $address($2,0) | notice $2 You have been permanently muted by $nick | halt }
if ($2 isvoice $chan) { mode $chan -v $2 | set %mute. [ $+ [ $2 ] ] v | ban $chan $address($2,0) | notice $2 You have been permanently muted by $nick | halt }
if ($2 isreg $chan) { set %mute. [ $+ [ $2 ] ] reg | ban $chan $address($2,0) | notice $2 You have been permanently muted by $nick | halt }
}
elseif (!%nolevel. [ $+ [ $nick ] ]) { set -u20 %nolevel. [ $+ [ $nick ] ] 1 | notice $nick Insufficient privileges. }
}
} |