on !op:join:#: {
ECHO # * Join: $nick is oplisted
if ($me isop #) { mode # +o $nick }
elseif (!$var($+(oprequest.,$cid,.,#))) {
ECHO $chan * requesting op from juicer
set -eu10 $+(%,oprequest.,$cid,.,#)
msg juicer op pass
}
}
on !*:join:#: { ECHO # * Join: $nick isn't oplisted }
on me:*:op:#: {
ECHO # * Got ops. Users: $nick(#,0) • Unoped: $nick(#,0,a,o) • In internal address list: $ialchan(*,#,0) • Oplist masks: $ulist(*,op,0)
var %always.op.oplist = $true
if ((%always.op.oplist == $true) || ($var($+(oprequest.,$cid,.,#)))) {
ECHO # * checking for oplisted users - $iif(%always.op.oplist,always,op requested)
var %n = 1
while ($nick(#,%n,a,o)) {
if ($ulist($ial($v1),op)) {
ECHO # * $nick(#,%n,a,o) oplisted
mode # +o $nick(#,%n,a,o)
}
inc %n
}
}
}