Something
public text v1 · immutableon *:VOICE:#pestops: {
alias pestlist $chan {
set %nick 0
while %nick < $nick($chan,0)
inc %nick 1
if ($nick isvoice $chan) write list.txt $nick - $address($nick,3)
}
unset %nick
on *:JOIN:#pest: {
if ($nick iswm $read(list.txt)) {
/mode #pest +v $nick
}
}
}