| View previous topic :: View next topic |
| Author |
Message |
lighten
Voice
Joined: 08 Jan 2010
Posts: 1
|
 Posted: Fri Jan 08, 2010 5:02 pm Post subject: Autovoice plus manual +v -v |
 |
|
I am currently using lol.tcl, and am trying to find a way to have the eggie autovoice, and allow the chanops to voice, devoice... and have the bot remember which users were devoiced so they can't just cycle and be +v again..
When I set +autovoice and +v -v, the manual part stopped the autovoice from working. I set a generic user at *!*@* with mode +g so that all would be voiced, but now what is happening is that -v folks can cycle and get voice again.
The eggie that used to do this correctly disappeared along with the script.. so we are back at the beginning 
Thanks,
Lighten
(eggie is on efnet) |
|
| Back to top |
|
 |
TCL_no_TK
Owner
Joined: 25 Aug 2006
Posts: 509
Location: England, Yorkshire
|
| Posted: Sat Jan 09, 2010 7:01 am Post subject: |
|
|
This should probably be scripting help or request, none the less. I hope this script helps, it dose remove the person as well if they are re-voiced by an Operator and it dose ignore valid users (people in eggdrop's userfile) | Code: | proc join:autovoice {nick host hand chan} {
global devoice
if {(![info exists devoice([maskhost $host])])&&(![validuser $hand])} {
pushmode $chan +v $nick
}
}
proc mode:devoice {nick host hand chan mode {target ""}} {
global devoice botnick
if {$target == ""} {set target "$botnick"}
if {(![isbotnick $target])&&([isop $nick $chan])&&(![validuser [hand2nick $target]])} {
set devoice([maskhost [getchanhost $target $chan]]) "1"
}
}
proc mode:voice {nick host hand chan mode {target ""}} {
global devoice botnick
if {$target == ""} {set target "$botnick"}
if {(![isbotnick $target])&&([isop $nick $chan])&&(![validuser [hand2nick $target]])&&([info exists devoice([maskhost [getchanhost $target $chan]])])} {
array unset devoice [maskhost [getchanhost $target $chan]]
}
}
bind join -|- "*%*" join:autovoice
bind mode -|- "*-v*" mode:devoice
bind mode -|- "*+v*" mode:voice
putlog "loaded devoice.tcl version 1.0 by TCL_no_TK"
return |
_________________
TCL the misunderstood |
|
| Back to top |
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
