egghelp/eggheads community

random generated nick script

2003-08-20T08:55:21-04:00

oh yes, you're right I understoud.

Statistics: Posted by Sir_Fz — Wed Aug 20, 2003 8:55 am

random generated nick script

2003-08-20T06:19:45-04:00

I'd suggest addin "counter" to the global line too, if its being used in another proc of this script.

The counter variable has no value outside the proc as it'll always contain "8" when the proc returns.

Statistics: Posted by user — Wed Aug 20, 2003 6:19 am

random generated nick script

2003-08-20T04:59:52-04:00

I'd suggest addin "counter" to the global line too, if its being used in another proc of this script.

Statistics: Posted by Sir_Fz — Wed Aug 20, 2003 4:59 am

random generated nick script

2003-08-20T01:05:23-04:00

I love it when I answer my own question, I just added sd_rnick to the global line and it works fine now.

Statistics: Posted by MarlbMan — Wed Aug 20, 2003 1:05 am

random generated nick script

2003-08-20T00:39:34-04:00

ok, got that figured out. Changed the script a bit, now it looks like this.

Code:

bind pub - chnick sd_nchangeset sd_char {A a B b C c D d E e F f G g H h I i J j K k L l M m N n O o P p Q q R r S s T t U u V v W w X x Y y Z z}proc sd_nchange { nick uhost hand chan arg } {global sd_charset counter 0set sd_rnick ""while {$counter < 8 } {set sd_rand [lindex $sd_char [rand [llength $sd_char]]]set sd_rnick "$sd_rnick$sd_rand"incr counter}putserv "nick $sd_rnick"}

Problem now is, it changes it's nick back. I change set keep-nick to 0, but it still does it. how do I fix this one?

Statistics: Posted by MarlbMan — Wed Aug 20, 2003 12:39 am

random generated nick script

2003-08-19T22:33:53-04:00

I stole a bit out of the random password script to generate random nicks, here is what I've come up with.

Code:

set sd_nlength "8"bind pub - chnick sd_nchangeset sd_char {A a B b C c D d E e F f G g H h I i J j K k L l M m N n O o P p Q q R r S s T t U u V v W w X x Y y Z z}proc sd_nchange { sd_nlength } {global sd_charset counter 0set sd_rnick ""while {$counter < $sd_nlength } {set sd_rand [lindex $sd_char [rand [llength $sd_char]]]set sd_rnick "$sd_nick$sd_rand"incr counter}putserv "nick $sd_rnick"}

but when I type chnick in channel, I get the following error:

Code:

Tcl error [sd_nchange]: wrong # args: should be "sd_nchange sd_nlength"

can anyone help me?

Statistics: Posted by MarlbMan — Tue Aug 19, 2003 10:33 pm