egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2008-10-12T16:10:04-04:00 https://forum.eggheads.org/app.php/feed/topic/16180 2008-10-12T16:10:04-04:00 2008-10-12T16:10:04-04:00 https://forum.eggheads.org/viewtopic.php?p=85513#p85513 <![CDATA[check +m or +i]]>

Code: 

#tested with 'windrop v1.6.19' sorry!bind mode - "*" check:modebind time - "15 * * * *" checkmode:timeproc check:mode {nick host handle channel mode {target ""}} {global botnick if {($target != "")} {append mode " $target"}  if {([channel get $channel "checkmode"])} {   if {([regexp -all -- {(m|i)} "$mode"] > 0)} {    if {([botisop $channel])} {     putquick "MODE $channel -im"     return    }   }  }}proc checkmode:time {minute hour day month year} { foreach chan [channels] {  if {([channel get $chan "checkmode"])} {   if {([regexp -all -- {(m|i)} "[lindex [split [getchanmode $chan] "+"] 1]"] > 0)} {    if {([botisop $chan])} {     putquick "MODE $chan -im"    }   }  } }; return}setudef flag checkmodeputlog "loaded checkmode.tcl version 1.0 by TCL_no_TK"return
The timer is set to check all channels set 'checkmode' for channel modes '+i' and '+m' as long as the bot is op'd on the channel where the modes are set it will unset them. It also checks modes being sets and if +i or +m are being set it will also remove them if it is op'd. To set a channel with the option 'checkmode' use (in DCC/CHAT):
.chanset <#channel-name> +checkmode
use '*' as <#channel-name> for it to work on all channels eggdrop is on, if you wish. And feel free to reply if you have any errors! :)

Statistics: Posted by TCL_no_TK — Sun Oct 12, 2008 4:10 pm

]]> 2008-09-21T19:10:30-04:00 2008-09-21T19:10:30-04:00 https://forum.eggheads.org/viewtopic.php?p=85246#p85246 <![CDATA[check +m or +i]]> Statistics: Posted by Kraka — Sun Sep 21, 2008 7:10 pm

]]>