Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ################
- # Configuração #
- ################
- set whoisc "#SPFC"
- #Defina o tempo aqui. 20 = Minutos
- set whoisidle "20"
- set nicksig { "Morumbi Tricolor SPFC" }
- ###########################################################################################
- # Não mude nada em baixo , pois a TCL poderá não funcionar corretamente !!!!!!!!!!!!!!!!! #
- # Não mude nada em baixo , pois a TCL poderá não funcionar corretamente !!!!!!!!!!!!!!!!! #
- # Não mude nada em baixo , pois a TCL poderá não funcionar corretamente !!!!!!!!!!!!!!!!! #
- # Não mude nada em baixo , pois a TCL poderá não funcionar corretamente !!!!!!!!!!!!!!!!! #
- ###########################################################################################
- bind time - "?0 * * * *" verificaridle
- proc verificaridle {m h d M y} {
- global whoisc whoisidle botnick verists nicksig
- foreach var [chanlist $whoisc] {
- if {[isop $var $whoisc] && [string match -nocase "*$var*" "$nicksig"]==0 && [getchanidle $var $whoisc]>=$whoisidle} {
- pushmode $whoisc -o $var
- putlog "PRIVMSG $var :\[\Anti idle\]\ DEOPADO por idle maior que [duration [expr $whoisidle * 60]]. Seu idle era de [duration [expr [getchanidle $var $whoisc] * 60]]"
- }
- }
- }
Add Comment
Please, Sign In to add comment