egghelp/eggheads community

Re: ban counter

2003-08-31T09:18:14-04:00

An insane ammount of code to do such a simple task

Code:

expr {[llength [banlist]]+[llength [banlist #chan]]}

Statistics: Posted by user — Sun Aug 31, 2003 9:18 am

Re: ban counter

2003-08-31T04:38:37-04:00

Hi, i found this ban counter script at egghelp.org, but script counts doesn't match with bot's dcc commands .bans all's output , not even close

I'llapprecite for the help
thanks
Code:
# Ban Counter by BarkerJr## Usage: .bans [channel]# If channel is not specified, the current channel is assumed.# Set this to the prefix you use for commands ("" if you don't want a prefix)#set cmdchar "."bind pub - ${cmdchar}bans pub:bans[snip]

the public .bans command will show you how many bans have been set in the channel, the dcc .bans all command shows you all global bans in this channel and other channels.

Statistics: Posted by Sir_Fz — Sun Aug 31, 2003 4:38 am

ban counter

2003-08-30T22:55:02-04:00

Hi, i found this ban counter script at egghelp.org, but script counts doesn't match with bot's dcc commands .bans all's output , not even close

I'llapprecite for the help
thanks

Code:

# Ban Counter by BarkerJr## Usage: .bans [channel]# If channel is not specified, the current channel is assumed.# Set this to the prefix you use for commands ("" if you don't want a prefix)#set cmdchar "."bind pub - ${cmdchar}bans pub:bansproc pub:bans {nick uhost hand chan arg} {  set ctr 0  if {![validchan $arg]} {    if {$arg != ""} {      puthelp "PRIVMSG $chan :Bans: Invalid channel, assuming current channel"    }    set arg $chan  }  set bans [banlist $arg]  while {[lindex $bans $ctr] != ""} {    set ctr [expr $ctr + 1]  }  set banctr $ctr  set bans [banlist]  while {[lindex $bans $ctr] != ""} {    set ctr [expr $ctr + 1]  }  puthelp "PRIVMSG $chan :Bans: [expr $banctr + $ctr]"  return 1}

[/code]

Statistics: Posted by EEggy — Sat Aug 30, 2003 10:55 pm