Unnamed
public text v1 · immutablemassmode {
;CHAN MODE NICKS
var %x = 1, %chan = $1, %mode.state = $left($2,1), %mode.char = $right($2,1)
if ($numtok($3-,44) > 1) { tokenize 44 $3- | var %nicks = $1- }
else var %nicks = $3-
echo -a %nicks
halt
while (%nicks) {
while (%x <= $modespl) && (%nicks) {
var %mode.Nickset = %mode.Nickset $gettok(%nicks,1,32)
var %nicks = $deltok(%nicks,1,32)
inc %x
}
mode %chan %mode.state $+ $str(%mode.char,$modespl) %mode.Nickset
var %x = 1
unset %mode.nickset
}
}