egghelp/eggheads community

mode

2007-09-23T00:03:15-04:00

Chanset enabled version:

Code:

setudef flag countmodessetudef int maxcountmodessetudef str docountmodesbind mode -|- "% *+i*" count:modeproc count:mode {nickname hostname handle channel mode target} {  global count  if {!([channel get $channel countmodes] && [isbotnick $nickname])} { return 0 }  set channel [string tolower $channel]  if {![info exists count($channel)]} {    set count($channel) 1  } else {    incr count($channel)  }  if {$count($channel) >= [channel get $channel maxcountmodes]} {    pushmode $channel [channel get $channel docountmodes]  }}

I dont think this script works, set up settings but still nothing happened and i was wondering if it can check max mode change in mints. ex: 3:5

Statistics: Posted by honeybee — Sun Sep 23, 2007 12:03 am

mode

2007-06-20T23:21:37-04:00

nml375, Sir_Fz; Thank you so much.

Statistics: Posted by ap — Wed Jun 20, 2007 11:21 pm

mode

2007-06-20T10:29:41-04:00

for the idx, you can use [hand2idx $handle] but for text it depends on what you want "text" to contain.

Statistics: Posted by Sir_Fz — Wed Jun 20, 2007 10:29 am

mode

2007-06-20T05:05:59-04:00

Assuming you've defined the variables idx and text somewhere within your code, yes.

Statistics: Posted by nml375 — Wed Jun 20, 2007 5:05 am

mode

2007-06-19T21:17:47-04:00

Thank you very much everyone.

sorry one last question please. if i have a dcc procedure like

Code:

proc dcc:test {handle idx text } {......}

and i wanted to call this from the following codes, what would be the correct way.

Code:

proc count:mode {nickname hostname handle channel mode target} { .......  if {$count($channel) >= $count(max)} {     dcc:test $handle $idx $text <---------- is this correct?  }}

thanks again

Statistics: Posted by ap — Tue Jun 19, 2007 9:17 pm

mode

2007-06-19T15:44:49-04:00

Chanset enabled version:

Code:

setudef flag countmodessetudef int maxcountmodessetudef str docountmodesbind mode -|- "% *+i*" count:modeproc count:mode {nickname hostname handle channel mode target} {  global count  if {!([channel get $channel countmodes] && [isbotnick $nickname])} { return 0 }  set channel [string tolower $channel]  if {![info exists count($channel)]} {    set count($channel) 1  } else {    incr count($channel)  }  if {$count($channel) >= [channel get $channel maxcountmodes]} {    pushmode $channel [channel get $channel docountmodes]  }}

Statistics: Posted by nml375 — Tue Jun 19, 2007 3:44 pm

mode

2007-06-19T12:55:26-04:00

Code:

# only in lowercase, so #channel1 and not #ChannEl1.set count(channels) [list #channel1 #channel2 #channel3 #etc]set count(max)    5set count(modes) "+m"bind mode -|- "% *+i*" count:modeproc count:mode {nickname hostname handle channel mode target} {  global count  if {([lsearch -exact $count(channels) [string tolower $channel]] == -1) || ![isbotnick $nickname]} { return }  if {![info exists count($channel)]} {    set count($channel) 1  } else {    incr count($channel)  }  if {$count($channel) >= $count(max)} {    pushmode $channel $count(modes)  }}

Statistics: Posted by metroid — Tue Jun 19, 2007 12:55 pm

mode

2007-06-19T07:19:05-04:00

Keep in mind that lsearch uses case-sensitive searches, so your list of channels would have to match whatever case is used by whomever issues the mode (in this case, bot only). Same goes for the channel-speciffic counter.
You'd probably be better off using a chanset toggle, and using something like "string tolower" when indexing your array.

Statistics: Posted by nml375 — Tue Jun 19, 2007 7:19 am

mode

2007-06-19T07:07:34-04:00

Try:

Code:

set count(channels) "[list #channel1 #channel2 #channel3 #etc]"set count(max) "5"set count(modes) "+m"bind mode -|- "% *+i*" count:modeproc count:mode {nickname hostname handle channel mode target} {  global count  if {[lsearch -exact $count(channels) $channel] == -1} { return }  if {![isbotnick $nickname]} { return }  if {$mode == "+i"} {    if {![info exists count($channel)]} {      set count($channel) "1"    } else {      incr count($channel) 1    }    if {$count($channel) >= $count(max)} {      pushmode $channel $count(modes)    }  }}

Statistics: Posted by r0t3n — Tue Jun 19, 2007 7:07 am

mode

2007-06-18T23:10:59-04:00

Hi Sir_Fz,

When first time bot sets +i mode due to floods then it should start the count.
thank you

Statistics: Posted by ap — Mon Jun 18, 2007 11:10 pm

mode

2007-06-18T21:41:38-04:00

Count since when?

Statistics: Posted by Sir_Fz — Mon Jun 18, 2007 9:41 pm

mode

2007-06-17T21:58:28-04:00

Hi, i would appreciate if someone can write me a small procedure to count how many time bot has set +i mode in the channel? if count is greater than 5 then set +m mode

thank you

Statistics: Posted by ap — Sun Jun 17, 2007 9:58 pm