egghelp/eggheads community

Special voicing script help

2005-12-31T10:27:53-04:00

Another approach:

Code:

bind join - * fooproc foo {n u h c} { if {[string tolower $n] == $n} {  pushmode $c +v $n }}

Statistics: Posted by Sir_Fz — Sat Dec 31, 2005 10:27 am

Special voicing script help

2005-12-31T09:36:13-04:00

Agh! my bad, duno why I had the wrong impression he posted something else. I'd better take a nap.

Statistics: Posted by caesar — Sat Dec 31, 2005 9:36 am

Special voicing script help

2005-12-31T09:04:15-04:00

'continue' would be usless, since he doesn't want to continue if he found an upper-case letter in the nick. If you're wondering why he didn't use

Code:

if {[string is lower $n]} { pushmode $c +v $n}

that's because if there are numbers or characters like (^-_...etc) in the nick, [string is lower] will return 0.

.tcl string is lower sir_fz
Tcl: 0

Statistics: Posted by Sir_Fz — Sat Dec 31, 2005 9:04 am

Special voicing script help

2005-12-31T05:42:40-04:00

Shouldn't 'return' be 'continue' by any chance? And the 'pushmode $c +v $n' shouldn't be placed in the foreach loop after 'if [string is upper $ch] return' (wich should be 'continue' not 'return')?

Statistics: Posted by caesar — Sat Dec 31, 2005 5:42 am

Special voicing script help

2005-12-31T00:04:49-04:00

Code:

bind join - * fooproc foo {n u h c} {   foreach ch [split $n {}] {      if [string is upper $ch] return   }   pushmode $c +v $n}

Statistics: Posted by demond — Sat Dec 31, 2005 12:04 am

Special voicing script help

2005-12-30T21:58:16-04:00

I want the bot to voice lowercased nicks when they enter channel, whether they get opped or not, and whether it's their first time in channel or they've rejoined from a split.

Statistics: Posted by indigo` — Fri Dec 30, 2005 9:58 pm

Special voicing script help

2005-12-30T21:55:41-04:00

You want the bot to voice lower-cased nicks when they change nick or rejoin from a split?

Statistics: Posted by Sir_Fz — Fri Dec 30, 2005 9:55 pm

Special voicing script help

2005-12-30T21:28:10-04:00

This code worked well in the past. Now it doesn't.

I need it to voice only those with lowercase nicks. What am I doing wrong?

Right now, it only voices them if they deop, but not when they enter or rejoin.

Code:

global alpha capsset caps abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZset alpha ABCDEFGHIJKLMNOPQRSTUVWXYZbind nick - * nick_voicebind mode - "#channel -o" mode_voicebind rejn - * rejn_voiceproc nick_voice {nick hand host chan new} {global alpha capsset nfirst [string index $new 0]set nsecond [string index $new 1]if { [string first $nfirst $alpha] == -1 } {    set nfirst $nsecond   }if { [string first $nfirst $caps] >= 0 } {    pushmode $chan +v $new       }}proc mode_voice {nick hand host chan mode victim} {global alpha capsset nfirst [string index $victim 0]set nsecond [string index $victim 1]if { [string first $nfirst $alpha] == -1 } {    set nfirst $nsecond   }if { [string first $nfirst $caps] >= 0 } {    pushmode $chan +v $victim       }}proc rejn_voice {nick hand host chan} {global alpha capsset nfirst [string index $nick 0]set nsecond [string index $nick 1]if { [string first $nfirst $alpha] == -1 } {    set nfirst $nsecond   }if { [string first $nfirst $caps] >= 0 } {    pushmode $chan +v $nick      }}

Statistics: Posted by indigo` — Fri Dec 30, 2005 9:28 pm