This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

autovoice after certain amount of words

Old posts that have not been replied to for several years.
Locked
User avatar
dusk
Halfop
Posts: 91
Joined: Sun Mar 06, 2005 7:25 pm
Location: Belgium

autovoice after certain amount of words

Post by dusk »

I'm searching after a script that autovoices users after a certain amount of words...now i'm using an auto-voice that voices automattically everyone who sais something on the channel den devoices them after they are idling for 30mins.....problem is this, when bot devoices some guests en they're script replies to itwitch something like 'don't devoice me' or ' do you think that's funny' it just voices them again....
So i need a voice script that only voices people after a certain amount of spoken words/letters..
thx
User avatar
Sir_Fz
Revered One
Posts: 3794
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

This belongs to the scripting forum not eggdrop's.

Code: Select all

bind pubm - * voice:user

proc voice:user {nick uhost hand chan arg} {
global actvoice
if {![info exists actvoice([string tolower $nick])]} { set actvoice([string tolower $nick]) 0 }
 inr actvoice([string tolower $nick])
 utimer 12 [list incr actvoice([string tolower $nick]) -1]
 if {$actvoice([string tolower $nick]) >= 4} {
  putserv "MODE $chan +v $nick"
 }
}
this will voice the user after saying 4 or more words in 12 seconds (you can change that if you want.)
t
triune
Voice
Posts: 2
Joined: Fri Apr 29, 2005 2:43 pm

Post by triune »

this seems like a really cool idea.
anyone actually get this thing to work?

i put teh code in a file scripts/voice.tcl and loaded teh script.

it doesnt work tho. am i doing something wrong?
User avatar
Sir_Fz
Revered One
Posts: 3794
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

It should work, it'll voice the user if he types 4 or more lines in 12 (or less) seconds.
t
triune
Voice
Posts: 2
Joined: Fri Apr 29, 2005 2:43 pm

Post by triune »

then im obviously missing something here... what is it?

.chanset +Autovoice or something?

im a tcl nube... so help is appreciated.
Locked