egghelp/eggheads community

need some tcl :)

2005-08-25T09:58:57-04:00

metroid, try your script with nicknames such as {abc} or {abc}d
it probably wont do what you want

Statistics: Posted by spock — Thu Aug 25, 2005 9:58 am

need some tcl :)

2005-08-25T02:53:38-04:00

Actually wrong, Using join is a very good idea incase of braces.

If the command gets used and the nickname contains brackets split will add braces around it and join removes those braces.

But ofcourse you can just make the code not make useless variables

Code:

bind pub n !setnick change:nickproc change:nick {n u h c a} { set ::nick [join [lindex [split $a] 0]]}

Statistics: Posted by metroid — Thu Aug 25, 2005 2:53 am

need some tcl :)

2005-08-19T20:02:09-04:00

This will change the botnick until the next rehash/restart.
For a permanent nickchange you have to manually change it in the config file.
Code:
bind pub n !setnick fooproc foo {n u h c a} { set nick [lindex [split $a] 0] set ::nick [join $nick]}

Well, small correction. lindex will return you a string and not a list. With that reason there is really no need to join this string. lrange and lindex are list commands. But other then lrange will lindex return a string.
set ::nick [join $nick] --> set ::nick $nick

Statistics: Posted by sKy — Fri Aug 19, 2005 8:02 pm

need some tcl :)

2005-08-19T15:28:45-04:00

eggdrop should have [bind pub] unavailable to owners, controlling the bot that way is incredibly lame

Statistics: Posted by demond — Fri Aug 19, 2005 3:28 pm

need some tcl :)

2005-08-19T13:50:41-04:00

Code:

bind pub n !setnick nick_changeproc nick_change {nick host handle channel rest} {global keep-nickset new_nick [lindex [split $rest] 0]set keep-nick 0putserv "NICK $new_nick"return 0}

Edit: greenbear beat me to it, his code is nicer, use that

Statistics: Posted by Ian-Highlander — Fri Aug 19, 2005 1:50 pm

need some tcl :)

2005-08-19T13:38:25-04:00

This will change the botnick until the next rehash/restart.
For a permanent nickchange you have to manually change it in the config file.

Code:

bind pub n !setnick fooproc foo {n u h c a} { set nick [lindex [split $a] 0] set ::nick [join $nick]}

Statistics: Posted by greenbear — Fri Aug 19, 2005 1:38 pm

need some tcl :)

2005-08-19T12:50:23-04:00

hi again i want command that owner type !setnick harry` the bot chabged it to harry` anyone can help with me this plz

Statistics: Posted by ZoneISP — Fri Aug 19, 2005 12:50 pm