; -------------------------------
; ------------ AV ---------------
; -------------------------------
on *:JOIN:#:{ if ($istok(%av,$chan,32)) && ($me isop $chan) { mode $chan +v $nick } }
; -------------------------------
on *:TEXT:!av*:#:{
if ($nick isop $chan) && ($istok(%av,$chan,32)) && (!$2) {
scid $rand(1,7) notice $nick AutoVoice in $chan is ON. Cmds: !av on and !av off . I must be opped in channel to give anyone voice.
}
elseif ($nick isop $chan) && (!$istok(%av,$chan,32)) && (!$2) {
scid $rand(1,7) notice $nick AutoVoice in $chan is OFF. Cmds: !av on and !av off . I must be opped in channel to give anyone voice.
}
elseif ($nick isop $chan) && (!$istok(%av,$chan,32)) && ($2 == on) && ($me !isop $chan) {
scid $rand(1,7) notice $nick OK, but first you have to op me. Op me and use this command again.
}
elseif ($nick isop $chan) && (!$istok(%av,$chan,32)) && ($2 == on) && ($me isop $chan) {
scid $rand(1,7) notice $nick AutoVoice in $chan is now set to ON.
set %av $addtok(%av,$chan,32)
}
elseif ($nick isop $chan) && ($istok(%av,$chan,32)) && ($2 == off) {
scid $rand(1,7) notice $nick AutoVoice in $chan is now set to OFF.
set %av $remtok(%av,$chan,32)
}
elseif ($nick isop $chan) && ($istok(%av,$chan,32)) && ($2 == on) && ($me isop $chan) {
scid $rand(1,7) notice $nick AutoVoice in $chan is already set to ON.
}
elseif ($nick isop $chan) && ($istok(%av,$chan,32)) && ($2 == on) && ($me !isop $chan) {
scid $rand(1,7) notice $nick AutoVoice in $chan is already set to ON, but I'm not opped here, so i can't give voice :-(
}
elseif ($nick isop $chan) && (!$istok(%av,$chan,32)) && ($2 == off) {
scid $rand(1,7) notice $nick AutoVoice in $chan is already set to OFF.
}
}