egghelp/eggheads community

help please tcl of no idles

2015-05-09T01:53:36-04:00

Hi,

sure. Been a bit busy with work lately and didn't had time to finish what I started. Will get back to you later on today hopefully.

Statistics: Posted by caesar — Sat May 09, 2015 1:53 am

help please tcl of no idles

2015-05-09T00:10:00-04:00

caesar
it is possible that the tcl ignores all the ircops that are in the channel
example:

that the noidle tcl is employed at the channel #help and there all the ircops are with different vhost and the same tcl ignores them..

it is possible that the tcl ignores all the ircops that are in certain channel??

thanks

Statistics: Posted by Arnold_X-P — Sat May 09, 2015 12:10 am

help please tcl of no idles

2015-04-21T01:01:01-04:00

Then the raw I was looking for is actually 313 (like it says on RAW Events Reference), not 302.

<- :underworld.se.eu.dal.net 313 cez SaD :is an IRC Operator - Services Administrator
<- :MustyHay.eu.ix.Undernet.org 313 cez Buster :is an IRC Operator

For future reference if others look for something similar then instead of doing a whois on a each member of a channel you can use "/who 0 o" and will get a list of ircops that are at least on one channel as you. The result will be in a raw 352.

But there's a catch.. the output will have the last channel you joined where one ircop is on, so it doesn't mean he's only on that channel. But, as long as we got his name is more than enough to get all common channels or whatnot.

Statistics: Posted by caesar — Tue Apr 21, 2015 1:01 am

help please tcl of no idles

2015-04-20T23:46:15-04:00

I was not referring to that.
is he that the tcl ignores to ircops that it detects in the channel
using one /whois nick
something similar to this:

Code:

bind raw - "302" IRCopScan302proc IRCopScan302 {from key text} {global operscan scanoperchanset text "[lindex $text 1]"set nick [lindex [split "$text" :=*] 1]if {($operscan(start)) && ([info exists scanoperchan($nick)]) && ([string match *\\* [lindex [split "$text" =] 0]])} {set chan $scanoperchan($nick)

Statistics: Posted by Arnold_X-P — Mon Apr 20, 2015 11:46 pm

help please tcl of no idles

2015-04-20T01:21:07-04:00

After a bit of digging looks like IRC raw numeric unfortunately aren't standardized so while on Undernet I get this on raw 330 on your IRC Network can be something else. So, if you got a mIRC client do this command in status window:

Code:

/debug @bla

and then whois a ircop and copy/paste the line that says "user is an IRC Operator" from this @bla window. Then it's safe to close it.

Statistics: Posted by caesar — Mon Apr 20, 2015 1:21 am

Re: help please tcl of no idles

2015-04-19T11:50:43-04:00

I was referring that the bot ignores or excludes an ircop when between to the channel using /whois nick.

Saul is an IRC Operator

Statistics: Posted by Arnold_X-P — Sun Apr 19, 2015 11:50 am

help please tcl of no idles

2015-04-19T06:00:14-04:00

@abah: haven't checked the latest code but should work. You get any errors?

@Arnold_X-P: Is there any other way to know who's ircop apart whois?

Statistics: Posted by caesar — Sun Apr 19, 2015 6:00 am

hi

2015-04-18T16:01:01-04:00

hi caesar
it is possible to add to the tcl a part where the bot should ignore the ircop
my ircops change of vhost and for error they of assistance
I would like to know if it is possible to add a section where the tcl should ignore or should exclude to the ircops in general

Statistics: Posted by Arnold_X-P — Sat Apr 18, 2015 4:01 pm

help please tcl of no idles

2015-04-16T05:31:49-04:00

Did you copy the code again? Because I have edited my previous post and did some changes in it.

please check my code

Code:

set idlekick(warn) "Warning! You will be kicked in 1 minute due to our anti-idle policy." set idlekick(kick) "Sorry no idle please - This channel has an anti-idle policy." set idlekick(maxidle) 15 set idlekick(bantime) 5 set idlekick(nicks) {     abah     izzahadindaameliyahdindafakhrunnisamusmedyuligeulisluluniarinasusi    jundi    juli    nurafifah    vina    lidya } set idlekick(hosts) {     *.ukhuwah.net } bind time - * idlekick:tick proc idlekick:tick {minute hour day month year} {     global idlekick     foreach chan [channels] {        if {![botisop $chan]} continue        set userlist [lreplace [chanlist $chan] 0 0]        foreach user [split $userlist] {           if {![onchan $user $chan] || [isop $user $chan]} continue           if {[ishalfop $user $chan] || [isvoice $user $chan]} continue           if {[lsearch -nocase $idlekick(nicks) $user] != -1} continue                      set matched 0           set uhost [getchanhost $user $chan]           foreach mask $idlekick(hosts) {              if {[string match -nocase $mask $uhost]} {                 set matched 1                 break              }           }           if {$matched} continue                      set idletime [getchanidle $user $chan]           set warntime [expr {$idlekick(maxidle) - 1}]           if {$idletime == $warntime} {              idlekick:act "warn" $chan $user           } elseif {$idletime >= $idlekick(maxidle)} {              idlekick:act "kick" $chan $user $uhost           }        }     } } proc idlekick:act {act chan user {uhost ""}} {     global idlekick     switch -- $act {        default {           return        } "warn" {           putlog "ANTIIDLE: Warning $user on $chan due to idling"           puthelp "PRIVMSG $channel :$user: $idlekick(warn)"        } "kick" {           putlog "ANTIIDLE: Banning $user on $chan due to idling"           scan $uhost {%[^!]!%[^@]@%s} nick user host           pushmode $chan +b "*!*@$host"           putkick $chan $user $idlekick(kick)           utimer $idlekick(bantime) [list pushmode $chan -b "*!*@$host"]        }"unban" {           if {![botisop $chan]} return              if {[ischanban $uhost $chan]} {                 pushmode $chan -b $uhost              }        }       } }

and you code

Code:

set idlekick(warn) "Warning! You will be kicked in 1 minute due to our anti-idle policy." set idlekick(kick) "Sorry no idle please - This channel has an anti-idle policy." set idlekick(maxidle) 15 set idlekick(bantime) 5 set idlekick(nicks) {     abah     izzahadindaameliyahdindafakhrunnisamusmedyuligeulisluluniarinasusi    jundi    juli    nurafifah    vina    lidya } set idlekick(hosts) {     *.ukhuwah.net } bind time - * idlekick:tick proc idlekick:tick {minute hour day month year} {     global idlekick     foreach chan [channels] {        if {![botisop $chan]} continue        set userlist [lreplace [chanlist $chan] 0 0]        foreach user [split $userlist] {           if {![onchan $user $chan] || [isop $user $chan]} continue           if {[ishalfop $user $chan] || [isvoice $user $chan]} continue           if {[lsearch -nocase $idlekick(nicks) $user] != -1} continue                      set matched 0           set uhost [getchanhost $user $chan]           foreach mask $idlekick(hosts) {              if {[string match -nocase $mask $uhost]} {                 set matched 1                 break              }           }           if {$matched} continue                      set idletime [getchanidle $user $chan]           set warntime [expr {$idlekick(maxidle) - 1}]           if {$idletime == $warntime} {              idlekick:act "warn" $chan $user           } elseif {$idletime >= $idlekick(maxidle)} {              idlekick:act "kick" $chan $user $uhost           }        }     } } proc idlekick:act {act chan user {uhost ""}} {     global idlekick     switch -- $act {        default {           return        } "warn" {           putlog "ANTIIDLE: Warning $user on $chan due to idling"           puthelp "PRIVMSG $channel :$user: $idlekick(warn)"        } "kick" {           putlog "ANTIIDLE: Banning $user on $chan due to idling"           scan $uhost {%[^!]!%[^@]@%s} nick user host           pushmode $chan +b "*!*@$host"           putkick $chan $user $idlekick(kick)           utimer $idlekick(bantime) [list pushmode $chan -b "*!*@$host"]        }"unban" {           if {![botisop $chan]} return              if {[ischanban $uhost $chan]} {                 pushmode $chan -b $uhost              }        }       } }}

Statistics: Posted by abah — Thu Apr 16, 2015 5:31 am

help please tcl of no idles

2015-04-16T05:15:08-04:00

Did you copy the code again? Because I have edited my previous post and did some changes in it.

Statistics: Posted by caesar — Thu Apr 16, 2015 5:15 am

help please tcl of no idles

2015-04-16T02:57:15-04:00

still not working sir

Statistics: Posted by abah — Thu Apr 16, 2015 2:57 am

help please tcl of no idles

2015-04-15T00:58:55-04:00

Edited the above post and fixed a typo and a missing variable. Should be working fine now.

Also noticed and didn't fix was the fact that the idlekick(bantime) in the original code is said to be in minutes, yet by using utimer this is actually in seconds. So you got two options: either define idlekick(bantime) in seconds or need to add something to do the math for us to turn the minutes into seconds utimer needs.

So for example if where to go with option A and define idlekick(bantime) in seconds then multiply 5 by 60 to get actual seconds.

If where to go with option B then change:

Code:

utimer $idlekick(bantime) [list pushmode $chan -b "*!*@$host"]

with:

Code:

utimer [expr $idlekick(bantime) * 60] [list pushmode $chan -b "*!*@$host"]

Statistics: Posted by caesar — Wed Apr 15, 2015 12:58 am

help please tcl of no idles

2015-04-14T23:51:11-04:00

i try about that but dont work anything sir maybe any wrong sir ?

Statistics: Posted by abah — Tue Apr 14, 2015 11:51 pm

help please tcl of no idles

2015-04-15T04:27:27-04:00

Code:

# Warning messageset idlekick(warn) "Warning! You will be kicked in 1 minute due to our anti-idle policy."# Kick messageset idlekick(kick) "Sorry no idle please - This channel has an anti-idle policy."# How many minutes for max amount of idle time in minutesset idlekick(maxidle) 15# How many minutes ban user for.set idlekick(bantime) 5## nicksname to ignoreset idlekick(nicks) {bopmAdminServseditionmastereggyOperHelpArnold_X-P}## vhost or ips to ignoreset idlekick(hosts) {*.Speed.org*.Administrator.org*.proxie.scan**190.ix.server.tor.us*.tu.ReY.es*Staff.latinchat**Staff.Speed.org*ChiQuiTiTa.es*.Network.Administrator**VicioChat.Org}bind time - * idlekick:tickproc idlekick:tick {minute hour day month year} {global idlekickforeach chan [channels] {if {![botisop $chan]} continueset userlist [lreplace [chanlist $chan] 0 0]foreach user [split $userlist] {if {![onchan $user $chan] || [isop $user $chan]} continueif {[ishalfop $user $chan] || [isvoice $user $chan]} continueif {[lsearch -nocase $idlekick(nicks) $user] != -1} continueset matched 0set uhost [getchanhost $user $chan]foreach mask $idlekick(hosts) {if {[string match -nocase $mask $uhost]} {set matched 1break}}if {$matched} continueset idletime [getchanidle $user $chan]set warntime [expr {$idlekick(maxidle) - 1}]if {$idletime == $warntime} {idlekick:act "warn" $chan $user} elseif {$idletime >= $idlekick(maxidle)} {idlekick:act "kick" $chan $user $user!$uhost}}}}proc idlekick:act {act chan nick {uhost ""}} {global idlekick    switch -- $act {default {return}        "warn" {putlog "ANTIIDLE: Warning $nick on $chan due to idling"            puthelp "PRIVMSG $chan :$nick: $idlekick(warn)"}        "kick" {putlog "ANTIIDLE: Banning $nick on $chan due to idling"scan $uhost {%[^!]!%[^@]@%s} nick user hostpushmode $chan +b "*!*@$host"putkick $chan $nick $idlekick(kick)utimer [expr $idlekick(bantime) * 60] [list idlekick:act unban $chan $nick "*!*@$host"]        }"unban" {if {![botisop $chan]} returnif {[ischanban $uhost $chan]} {pushmode $chan -b $uhost}}        }}}

Haven't tested so give it a try and report back if you get any errors.

Edit: Fixed typo.

Statistics: Posted by caesar — Tue Apr 14, 2015 8:42 am

help please tcl of no idles

2015-04-14T04:37:48-04:00

if I do not want to use .chanset #channel
if anything needs in fox so I do not need to use it ?

Statistics: Posted by abah — Tue Apr 14, 2015 4:37 am