egghelp/eggheads community

Voice/Devoice script

2015-06-06T16:28:55-04:00

I had to comment out the global sv and I had put the set sv(maxdelay) 10
inside the proc for it to work.
Thanks for the help.

Statistics: Posted by vigilant — Sat Jun 06, 2015 4:28 pm

Voice/Devoice script

2015-06-06T15:42:26-04:00

As the error clearly states: can't read "sv(maxdelay)": no such variable

Set that variable in the global namespace to stop that error...

Code:

set sv(maxdelay) 10proc automode:join { nick uhost handle chan } {    global sv    if {[channel get $chan "op"] && [isop $::botnick $chan]} {       pushmode $chan +o $nick    } elseif {[channel get $chan "voice"] && [isop $::botnick $chan]} {       utimer [rand [expr $sv(maxdelay) + 1]] [list push $chan $nick]    } else {       return 0    } } proc push {chan nick} {    if {![botisop $chan]} return    if {[isvoice $nick $chan]} return    pushmode $chan +v $nick }

Statistics: Posted by SpiKe^^ — Sat Jun 06, 2015 3:42 pm

Voice/Devoice script

2015-06-06T13:06:01-04:00

[12:01:47 pm] [19:01:41] Tcl error [automode:join]: can't read "sv(maxdelay)": no such variable

Can anyone tell me how to fix this error?

The whole script is below:

Code:

proc automode:join { nick uhost handle chan } {global sv if {[channel get $chan "op"] && [isop $::botnick $chan]} {pushmode $chan +o $nick} elseif {[channel get $chan "voice"] && [isop $::botnick $chan]} {utimer [rand [expr $sv(maxdelay) + 1]] [list push $chan $nick] } else {return 0}}proc push {chan nick} {    if {![botisop $chan]} return    if {[isvoice $nick $chan]} return     pushmode $chan +v $nick}

I am trying to a random delay. I want between 10 and 30 seconds. This I assume adds any random delay, but I Don't know what's the min and max. I hope someone can fix this script.

Statistics: Posted by vigilant — Sat Jun 06, 2015 1:06 pm

Voice/Devoice script

2012-09-21T16:47:29-04:00

Even without ANY scripts loaded, whether i do chattr +g to a user on an -autovoice channel, or chattr +v on an +autovoice channel, it won't let me devoice them. It gives it right back.

AllProtection is the main script I use, but I commented it out in the .conf and .rehash'd the bot.

[16:43:41] AllProtection v4.7 successfully unloaded...

Still does it.

EDIT: It DOES load the following tcl's, but they came with the eggdrop and I figured they weren't an issue:

source scripts/alltools.tcl
source scripts/action.fix.tcl
source scripts/dccwhois.tcl

Statistics: Posted by bryanwny — Fri Sep 21, 2012 4:47 pm

Voice/Devoice script

2012-09-19T00:16:06-04:00

It shouldn't re-voice any user, so this means you must have some other script that's doing this stuff. Could you unload all your scripts then see if this behavior still happens?

Statistics: Posted by caesar — Wed Sep 19, 2012 12:16 am

Voice/Devoice script

2012-09-18T10:49:48-04:00

[10:47am] Protect modes (chanmode): +tn
[10:47am] Idle Kick after (idle-kick): DON'T!
[10:47am] stopnethack: DON'T!
[10:47am] aop-delay: 0:0
[10:47am] revenge-mode: 0
[10:47am] ban-type: 2
[10:47am] ban-time: 120
[10:47am] exempt-time: 60
[10:47am] invite-time: 60
[10:47am] Other modes:
[10:47am] -inactive -statuslog -secret +shared
[10:47am] -greet -seen +cycle +dontkickops
[10:47am] -protectops -protectfriends -revenge -revengebot
[10:47am] -bitch -autoop -autovoice -nodesynch
[10:47am] -enforcebans +dynamicbans +userbans -autohalfop
[10:47am] -protecthalfops -static
[10:47am] +dynamicexempts +userexempts +dynamicinvites +userinvites

Statistics: Posted by bryanwny — Tue Sep 18, 2012 10:49 am

Voice/Devoice script

2012-09-17T00:30:49-04:00

Meh.. I should get a break from work. You get that error cos there isn't a +bitchvoice channel flag.

Could you paste the channel modes of the channel you have issues with devoicing a user known to the bot, where it voices back that user?

Statistics: Posted by caesar — Mon Sep 17, 2012 12:30 am

Voice/Devoice script

2012-09-16T17:54:13-04:00

Running v1.6.21. Is there really such a thing as +bitchvoice? lol. I thought I was just making that up because that's how it's acting

Statistics: Posted by bryanwny — Sun Sep 16, 2012 5:54 pm

Voice/Devoice script

2012-09-16T13:25:10-04:00

Don't know what's with the error you get.. what version of eggdrop are you using?

As for the second code it's meant to replace the timevoice.tcl.

Statistics: Posted by caesar — Sun Sep 16, 2012 1:25 pm

Voice/Devoice script

2012-09-15T23:41:10-04:00

OK, I'm not sure if I'm doing it correctly, but I created 'bitchvoice.tcl' and pasted your first chunk of code in it, and added it to my bots config, and verified it is loading because I added a 'putlog' line at the bottom.

When I added a temp channel, I was able to set it to +autovoice, but not +bitchvoice. I get the following error:

Code:

"Error trying to set +bitchvoice for #testing123, invalid mode."

Was your second code to replace what was in the timevoice.tcl script?

Statistics: Posted by bryanwny — Sat Sep 15, 2012 11:41 pm

Voice/Devoice script

2012-09-17T00:25:06-04:00

Upon joining a +autovoice channel any guest that matches a +v user (on that channel or +g that means globally) he will be automatically voiced by the bot's internal function that was designed especially for this.

The +bitchvoice channel flag will re-voice the +v users right away as this is the purpose of the flag. From what I understand you wish to stop this behavior. I think that a bind mode on a -v with a return should stop this. Haven't tested anything so let me know if it works or it doesn't.

Code:

bind mode "% -v" bitch:voiceproc bitch:voice {nick uhost hand chan victim} {if {[channel get $chan +bitchvoice]} return 1}

In order to test my theory just set a temporary channel to +autovoice and +bitchvoice, create a temporary user that has the +v flag, add a host to it, join the channel, let the bot voice it then devoice the user and see what happens.

If all work as you wanted then you can remove the timevoice.tcl script, that is anyway poorly written.

here is a cleaner version of the above code. the only difference from this and the already built-in funcion (the +autovoice) is that has a random delay in executing the +v mode change, that's all.

Code:

bind join - * sv:joinproc sv:join {nick host hand chan} {global svif {[isbotnick $nick] || ![botisop $chan]} returnif {[lsearch -nocase $chan $sv(avchan)] == -1} returnif {![isvoice $nick $chan]} {utimer [rand [expr $sv(maxdelay) + 1]] [list pushmode $chan +v $nick]}}

PS: Haven't tested anything so let me know if you get any errors.

Edit: fixed minor type. It should be -nocase, not --nocase.

Statistics: Posted by caesar — Wed Sep 12, 2012 8:03 am

Voice/Devoice script

2012-09-10T16:30:13-04:00

I seem to have made it work by using timevoice.tcl and changing from:

Code:

 if {$avchan == "" && [botisop $chan]} {

to:

Code:

  if {$avchan == "" && [botisop $chan] && [matchattr $hand v|v $chan]} {

and from:

Code:

  if {$i == $chan && [botisop $chan]} {

Code:

  if {$i == $chan && [botisop $chan] && [matchattr $hand v|v $chan]} {

Not sure if that's the best way to handle it or not, but at least it's working. If someone else has a better method, I'm all ears!

Statistics: Posted by bryanwny — Mon Sep 10, 2012 4:30 pm

Voice/Devoice script

2012-09-09T22:57:16-04:00

I'm not sure if maybe I'm just missing something that's already built into eggdrop (I haven't messed with one in 10+ years), but what I'm looking to do is:

Voice users (NOT just based off of nick; but *!*ident@host or *!*@host) upon joining with a certain flag (+v). The problem I seem to be having with using +v/autovoice or +g is that it won't let me devoice them. Even as the bot owner, it just re-voices them right away like there's a +bitchvoice mode enabled. Am I missing something, or do I need to find a script to handle this? Ideally, I'd like it to devoice them after 60 minutes of inactivity, but I did find a script to accomplish that already.

Statistics: Posted by bryanwny — Sun Sep 09, 2012 10:57 pm