on *:JOIN:#:$iif($readini(autovoice.ini,$chan,$nick),mode $chan +v $nick)
on $*:TEXT:/^[@!](de?l?)?a(utovoice|v)/Si:#:{
if (($nick($chan,$nick,oh)) && ($2)) {
var %a = $readini(autovoice.ini,$chan,$2), %disp = $iif($left($1,1) == !,notice $nick,msg $chan)
if (d isin $1) {
if ($nick($chan,$2,v)) mode $chan -v $2
%disp $iif(%a,$2 has lost access in $chan,$2 isn't on our access list..)
if (%a) remini autovoice.ini $chan $2
}
else {
if (%a) %disp $2 is already on our access list.
else {
writeini autovoice.ini $chan $2 yes
%disp $2 is now on our access list.
}
}
}
}