Форум о ботах Eggdrop/Windrop

[Stefan]

Nickname who join channel and identify in NickServ give autovoice(+v).


REGARDS

[tvrsh]

TCL: [ Скачать ] [ Скрыть ]

Синтаксис: [ Скачать ] [ Показать ]

namespace eval vonjoin {}
bind join * vonjoin
proc vonjoin {nick uhost hand chan text} {
global vonjoin
set vonjoin(chan) $chan
bind raw - 307 raw307
putserv "WHOIS $nick"
}

proc raw307 {from key msg} {
global vonjoin
if {[string match "*is a registered and identified nick*" $msg} {
    putserv "MODE $vonjoin(chan) +v [lindex [split $msg] 2]"
}
unbind raw - 307 raw307
}