egghelp/eggheads community

On Join Op/Voice certain users script by address

2004-06-15T12:12:09-04:00

Read .help +user, .help chattr and .help whois (clues: +a = autoop, +g = autovoice)
then add some users, give them some flags and load this ugly little script:

Code:

bind join g * annoying_message:gproc annoying_message:g {n u h c} {putserv "PRIVMSG $c :$n is an Auto-Voice"}bind join a * annoying_message:aproc annoying_message:a {n u h c} {putserv "PRIVMSG $c :$n is an Auto-Op"}

Statistics: Posted by user — Tue Jun 15, 2004 12:12 pm

On Join Op/Voice certain users script by address

2004-06-14T18:40:00-04:00

ty gb and DarkJFMan. I wished it helped me tho

I don't understand anything about Tcl scripting. Its a whole new language.

and what those help files show is like reading another langauge.

Haven't figured out anything about tcl scripting yet.

I keep looking but can't make heads or tails about it.

Thanks for your help.

Romantic-Soul

Statistics: Posted by Guest — Mon Jun 14, 2004 6:40 pm

On Join Op/Voice certain users script by address

2004-06-14T18:12:53-04:00

if you just want to add +o and +v flags to users, use the default commands.

.help chattr

and for autoop/autovoice

.help chanset

Statistics: Posted by greenbear — Mon Jun 14, 2004 6:12 pm

On Join Op/Voice certain users script by address

2004-06-14T18:02:01-04:00

I'm working on same script, it's very hard, maybe you can help out, [url]

http://www.eggheads.org/support/egghtml ... l#chancmds

Statistics: Posted by DarkJFMan — Mon Jun 14, 2004 6:02 pm

On Join Op/Voice certain users script by address

2004-06-14T17:26:28-04:00

I haven't seen a script on here that can do this Need help creating one

For IRc Script the script looks like this...

on @Voice:JOIN:#:mode $chan +v $nick | msg $chan $nick is an Auto-Voice

menu nicklist,query {
Voice List
.add:.auser Voice $address($$1,2) | echo -a 10 $$1 Is Added To Voice List. | /mode # +v $$1
.add3:.auser Voice $address($$1,3) | echo -a 10 $$1 Is Added To Voice List. | /mode # +v $$1
.del:.ruser Voice $address($$1,2) | echo -a 10 $$1 is Deleted From Voice List.
.del3:.ruser Voice $address($$1,3) | echo -a 10 $$1 is Deleted From Voice List.
}

on @OP:JOIN:#:mode $chan +o $nick | msg $chan $nick is an Auto-Op

menu nicklist,query {
OP List
.add:.auser OP $address($$1,2) | echo -a 10 $$1 Is Added To OP List. | /mode # +o $$1
.add3:.auser OP $address($$1,3) | echo -a 10 $$1 Is Added To OP List. | /mode # +o $$1
.del:.ruser OP $address($$1,2) | echo -a 10 $$1 is Deleted From OP List.
.del3:.ruser OP $address($$1,3) | echo -a 10 $$1 is Deleted From OP List.
}

How would i make a tcl script that can do the same?

what it does is ops or voices a nick by address when they join a channel

Please help.

Thanks In Advance

Romantic-Soul

Statistics: Posted by Guest — Mon Jun 14, 2004 5:26 pm