egghelp/eggheads community

On JOin Link

2009-02-07T19:06:46-04:00

For that, I would recommend some kind of timestamping mechanism.
Something like this should do the trick (based on code posted by user):

Code:

proc throttle {id time} { if {[info exists ::throttle($id)] && $::throttle($id) > [clock seconds]} {  return 0 } set ::throttle($id) [expr [clock seconds] + $time] return 1}proc myproc {} { if {[throttle "theid" 300]} {  #we're ok, do the good stuff here } {  #still throttle'd, do nothing  return 0 }}

Edit: A good idea for id would be nickname of the joiner, nick:chan, or something like that.

Statistics: Posted by nml375 — Sat Feb 07, 2009 7:06 pm

On JOin Link

2009-02-07T19:01:22-04:00

nml375 your worked perfectly i wasnt thinking of if the had the _ in there name other then at the end thank you

also was wonderingif anybody managed to find away for a exceptions list?

Statistics: Posted by Felix2003 — Sat Feb 07, 2009 7:01 pm

On JOin Link

2009-02-07T15:16:51-04:00

The disadvantage of string map is that it will remove any _ within the nick, not only trailing ones (messing up nicknames such as my own, NML_375).
I would rather recommend using the string trimright command;

Code:

puthelp "PRIVMSG $relaychan :User Details For $nick ----> http://www.sitename.com/users.php?search=[string trimright $nick "_"]"

Statistics: Posted by nml375 — Sat Feb 07, 2009 3:16 pm

On JOin Link

2009-02-07T10:47:37-04:00

ty speechless i did search but couldnt find anything i bet i passed it lol

Statistics: Posted by Felix2003 — Sat Feb 07, 2009 10:47 am

On JOin Link

2009-02-07T10:27:57-04:00

Everything in this thread is covered in many others as well, searching before posting questions can give you answers much faster than waiting for a reply...

Code:

putserv "privmsg $relaychan :User Details For $nick ----> http://www.sitename.com/users.php?search=[string map {"_" ""} $nick]"

Statistics: Posted by speechles — Sat Feb 07, 2009 10:27 am

On JOin Link

2009-02-07T05:57:08-04:00

ok you just solved the 1st part thank you xD but it doesn't remove the _

Statistics: Posted by Felix2003 — Sat Feb 07, 2009 5:57 am

On JOin Link

2009-02-07T04:35:59-04:00

I think that _ can be stopped if you use $uhost instead of $nick

Statistics: Posted by cache — Sat Feb 07, 2009 4:35 am

On JOin Link

2009-02-06T20:38:20-04:00

Hello all i was wondering if somebody could assist me i have just started learning TCL scripts and find it really confusing lol anyway to my request i used to do mirc scripts and have a script that when i used joined #help it would display a link to there profile in another room along with a few other information for example

User has joined #help as <Felix2003@Felix.The.Crazy.Cat>
User Details For Felix2003 ----> http://www.sitename.com/users.php?search=Felix2003

now i can get the 2nd part the link to the site to work but the 1st seems abit harder

now the 2nd part

we also have a java client that users can use but it puts a annoying _ at the end of there name when the link shows in the other room id like the _ to be removed from the link so for example

User has joined #help as <Felix2003@Felix.The.Crazy.Cat>
User Details For Felix2003_ ----> http://www.sitename.com/users.php?search=Felix2003_

would show with the _ removed

User has joined #help as <Felix2003@Felix.The.Crazy.Cat>
User Details For Felix2003_ ----> http://www.sitename.com/users.php?search=Felix2003

also i would like but not important a exception list so the staff when they enter or ping and rejoin doesn't activate it

i hope somebody could help

thank you for your time

Statistics: Posted by Felix2003 — Fri Feb 06, 2009 8:38 pm