rendered paste bodyon *:TEXT:!joincount-on*:#: { if ($nick ishop $chan || $nick isop $chan) {
set %jc $+ $chan ON
msg $chan 12Join 4Count 12is 4 now 12 ON!
}
}
on *:JOIN:#:{ if (%jc [ $+ [ $chan ] ] == ON) { msg $chan 4 I 12 Have 4 Seen 12 A 4 Total 12 Of 4 %we 12 Joins
inc %we
}
}
on *:TEXT:!Joinoff*:#: { if ($nick ishop $chan || $nick isop $chan) {
unset %jc $+ $chan
msg $chan 4Join Count is now off :(
}
}
on $*:text:/[!@`/.]op */:#: { if ($nick isop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan +o $nick | halt }
/mode $chan $+(+,$str(o,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]hop*/:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan +h $nick | halt }
/mode $chan $+(+,$str(h,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]voice*/:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan +v $nick | halt }
/mode $chan $+(+,$str(v,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]deop|dop */:#: { if ($nick isop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan -o $nick | halt }
/mode $chan $+(-,$str(o,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]dehop|dehalfop */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan -h $nick | halt }
/mode $chan $+(-,$str(h,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]devoice */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan -v $nick | halt }
/mode $chan $+(-,$str(v,$numtok($2-,32))) $2- }
}
on $*:text:/[!@`/.]kick */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /kick $chan $nick | halt }
/kick $chan $$2- }
}
on $*:text:/[!@`/.]ban */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan +b $nick | halt }
/mode $chan +bbb $$2- }
}
on $*:text:/[!@`/.]kickban|kb|kban */:#: { if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /ban -ku $chan $nick | | halt }
/ban -ku $chan $$2- }
}
on $*:text:/[!@`/.]deban|unban */:#: if ($nick isop $chan || $nick ishop $chan || $address($nick,2) == $address($me,2)) {
if (!$2) { /mode $chan -b $nick | halt }
/mode $chan -bbb $$2- }