Number of bans

[gemeau50]

Is there a command other than ".bans all" to get the number of bans in an eggdrop banlist?

TIA

[greenbear]

no

[YooHoo]

Is there a command other than ".bans all" to get the number of bans in an eggdrop banlist?

TIA

Next time, you can skip the thread, and just read egghelp's command reference, or figure out how to use .help

[Ofloo]

i think this .. works

Code: Select all

bind dcc - nban number_bans
proc number_bans {hand idx arg} {
  putdcc $idx "[llength [banlist]]"
}

not tested tho ..

[greenbear]

that would only return global bans, not channel bans, and you should use 'string length [join banlist]' or it would just return 1 ban

[Ofloo]

then make it banlist $chan i gues ..

Code: Select all

bind dcc - nban number_bans
proc number_bans {hand idx arg} {
  putdcc $idx "[llength [banlist [string map {\\ \\\\ \[ \\\[ \] \\\] \( \\\( \) \\\) \{ \\\{ \} \\\} \" \\\"} [lindex $arg 0]]]]"
}

[Ofloo]

that would only return global bans, not channel bans, and you should use 'string length [join banlist]' or it would just return 1 ban

never use string llength and never had any problems so far ..
also i think u should read closer ..

Treats list as a list and returns a decimal string giving the number of elements in it.

every ban is a new arg so .. it would return the number if ur talking bytelength yes then ur right but if that where the case then it wouldn't it return the right number either ..

% llength "a b c d e f g"
7
%

[Ofloo]

hmm it appears i am in the wrong forum i tought this was the tcl scripting forum .. lol sorry

[greenbear]

hehe yea nm that .. i was testing on a bot with no bans set, so i goofed up.

You could also use a foreach

Code: Select all

bind dcc - nban number_bans
proc number_bans {hand idx arg} { 
 set bans [llength [banlist]]
 foreach chan [channels] {
  incr bans [llength [banlist $chan]]
 }
 putidx $idx "Number of bans: $bans"
}

[Ofloo]

well yeah but that would not return it for a specific channel and also a loop is a thing that is slower then just llength ... but sur ur right u could also do that .. if u want it for all channels at once ..

altho i am not sur about incr, but could be tho never used it like that tho ..

Code: Select all

incr bans [llength [banlist $chan]]

i am asuming ur dong it because u think .. u need to cause of 0 1 ..

thing is llength doesn't do that it returns the number of chars starting count with 1 not with 0

[greenbear]

incr works just fine, llength returns the exact number of hits, so you get 0 if theres' no bans, incr dont have any problems increasing 0. and why wouldn't i use incr when i want to increase a number ?

[gemeau50]

Next time, you can skip the thread, and just read egghelp's command reference, or figure out how to use .help

I didn't ask how to get a listing of bans but how to get the number of bans. When there are more than 800 bans in the banlist, receiving a listing slows down a computer for a while dishing out a lot of information which are not required.

Next time you can skip my threads or figure out how to properly read a question.

[Ofloo]

if that is the case maybe next time u can skip the forum right to the manual

[greenbear]

Next time you can skip my threads or figure out how to properly read a question.

Don't you mean, "Thank you YooHoo, Ofloo and gb for taking the time to reply to my post" ?

[gemeau50]

if that is the case maybe next time u can skip the forum right to the manual

Don't you mean, "Thank you YooHoo, Ofloo and gb for taking the time to reply to my post" ?

Sorry gentlemen if I offended you. Here is my reason for such reply. gb reply was short and sweet. I did mentioned "other than .bans all". I was looking for an hidden command or switch. When you have more than 800 bans in the eggdrop banlist, ".bans all" can tie up your computer for a while. 3 hours later Yoohoo replied by referencing the "bans" command and that I should figure out how the use "help". I found his reply useless and out of line.

As for the help I received from you guys, believe me, it was really appreciated.
gemeau50