egghelp/eggheads community

.+ban and .kickban in a tcl script

2006-07-31T13:27:15-04:00

@tucow: as Nara pointed out, dcc commands are not the same with tcl commands accepted by eggdrop. you should read tcl-commands.doc in your ~/docs folder

Statistics: Posted by krimson — Mon Jul 31, 2006 1:27 pm

.+ban and .kickban in a tcl script

2006-07-31T12:20:18-04:00

If I'm not mistaken, there's not an integrated ban command, so you have to putmode a +b hostmask and then a putkick on them.

As for +ban, if it's a channel ban, use newchanban. If it's a global ban, use newban.

~Nara

Statistics: Posted by Nara — Mon Jul 31, 2006 12:20 pm

.+ban and .kickban in a tcl script

2006-07-31T12:05:07-04:00

Hello,

how could i use .+ban and .kickban in a tcl script?

I tried the following, but it doesn't work :/

Code:

####### kban proc #######proc kban {nickname hostname handle channel arguments} {    global botnick    if {[lindex [split $arguments] 0] == $botnick} { return 0 }    kickban $botnick kickban [lindex [split $arguments] 0] [lrange [split $arguments] 1 end]}####### pban proc #######proc pban {nickname hostname handle channel arguments} {    global botnick    if {[lindex [split $arguments] 0] == $botnick} { return 0 }    +ban [lindex [split $arguments] 0] [lrange [split $arguments] 1 end]}

What shall i do?

Statistics: Posted by tucow — Mon Jul 31, 2006 12:05 pm