AllProtection.tcl (Stable: v4.8 / Beta: v4.9b4)

[Sir_Fz]

Are you sure that the version reply of that user contains the keyword "X script"? if so, then this can be a possible bug and I'll try to look into it and fix it.

[elisca]

i'm sure about it, hmm for valid result maybe the other's member that they use AllProt could try it and report their result too..

[Sir_Fz]

Do you have VERSION added to the ap:ctcpchecks channel-setting? Also, make sure that you do not have a channel-specific bctcrs list (since you're adding to the global bctcrs list). I've looked into the code and didn't find anything that should keep it from functioning as intended. Unfortunately I do not have an Eggdrop to test it myself so I have to rely on users' reviews (anyone else experiencing the same problem?).

And one more thing, are you seeing the VERSION reply in your bot's partyline?

[elisca]

yes, I have added VERSION on the ap:ctcpchecks channel-setting
i'm not use channel-specific for bctcrs list, i'm use it for global.

yes, bot could recognize and make VERSION reply on my partyline..


anyone have a same problem with me ?

[Zircon]

I tested it as a FINGER, and it s working for me. Elisca, can you test it as a FINGER ?

[Sir_Fz]

I tested it as a FINGER, and it s working for me. Elisca, can you test it as a FINGER ?

If it's not a hassle, try testing it with VERSION (and with both at the same time) as well (on some test channel perhaps?) and tell us if it's working.

[Zircon]

Hello Sir_Fz

I made a test for VERSION. The bot sends the CTCP VERSION, and it receives an aswer in thi form :

<Anti-Flood> [02:22] CTCP reply VERSION: mIRC v6.16 Khaled Mardam-Bey from TeeesssT (~TEST@70.53.153.159) to Anti-Flood
<Anti-Flood> [02:22] CTCP reply VERSION: X script from TeeesssT (~TEST70.53.153.159) to Anti-Flood

and it doesnt ban. I think the problem is that the answer is in 2 lines.

[Sir_Fz]

You're correct, the bot will react on the first version-reply from the user and ignore the second line. I'll see what I can do to make a workaround for this.

[elisca]

I tested it as a FINGER, and it s working for me. Elisca, can you test it as a FINGER ?

Zircon, i have test it as a FINGER, didn't working..

[Knight]

as so many people been asking for the silence feature integrated in AllProtection:

find this :

set apfp(rmode) R

replace with :

set apfp(rmode) "1"

you can set the silence/ignore time here , as much duration you want :

set apfp(rtime) 120

set apfp(itime) 120

Next you find "rmode" in the tcl and you see this :

Code: Select all

proc privl t {
 variable sfluds ; variable apfp ; variable bred ; variable ::botnick
 if {!$sfluds} {
  if {[string length $apfp(rmode)]==1} {
   if {!$bred} {
    putquick "MODE $botnick +$apfp(rmode)" -next
    if {$apfp(rtime) > 0} {
     utimer $apfp(rtime) [namespace current]::remr
    }
    set bred 1
    putlog "\002AP\002: Set mode +$apfp(rmode) on me. ($t flood on me!)"

Edit and replace :

Code: Select all

proc privl t {
 variable sfluds ; variable apfp ; variable bred ; variable ::botnick
 if {!$sfluds} {
  if {[string length $apfp(rmode)]==1} {
   if {!$bred} {
    #putquick "MODE $botnick +$apfp(rmode)" -next
   putquick "SILENCE +*!*@*" -next 
   if {$apfp(rtime) > 0} {
     utimer $apfp(rtime) [namespace current]::remr
    }
    set bred 1
    putlog "\002AP\002: Set mode +$apfp(rmode) on me. ($t flood on me!)"

Thanks to Sir_Fz for this nice tcl.

[Sir_Fz]

Thanks for your temporary tweak, I'll make sure this is integrated in my next release.

[eXtremer]

Does Allprotection have !public commands ?
for example to turn on/off a feature like badwords ?
!disable badwords

[Alchera]

Does Allprotection have !public commands ?
for example to turn on/off a feature like badwords ?
!disable badwords

No!

[halloaizq]

I got this msg error
:AllProtection::parts adv]: unmatched open quote in list


im using allprotection4.6b8.tcl .. so how to edit this command??
#
## 8-9 ## Swearing/Advertising in part/quit messages
#
# Exampl: "s:1 a:1" Enables banning of users with part/quit msgs containing swear/advertisement
lappend ap:udefs {ap:pqsadv "s:1 a:1"}

[Sir_Fz]

I got this msg error
:AllProtection::parts adv]: unmatched open quote in list


im using allprotection4.6b8.tcl .. so how to edit this command??
#
## 8-9 ## Swearing/Advertising in part/quit messages
#
# Exampl: "s:1 a:1" Enables banning of users with part/quit msgs containing swear/advertisement
lappend ap:udefs {ap:pqsadv "s:1 a:1"}

You probably manually tried to edit the adv list. Please show complete log of '.set errorInfo'.