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.
Help for those learning Tcl or writing their own scripts.
-
piggy
- Voice
- Posts: 14
- Joined: Sun Aug 21, 2005 11:51 am
- Location: London
Post
by piggy »
Hey guys
With the following i would like to know what i can add to it in order to make it that a user is restricted to use the public command once in 5 minutes
Code: Select all
set chanstats {
"url to stats"
}
bind pub - !stats pub:s
proc pub:s {nick uhost hand chan text} {
global chanstats
set statsnick [lindex [split $text " "] 0]
if {$text != "" && [onchan $statsnick $chan]} {
foreach line $chanstats { putquick "NOTICE $statsnick :$line" }
return 0
}
foreach line $chanstats {putquick "PRIVMSG $chan :$line" }
}
Any help much appreciated
Thanks
-
demond
- Revered One
- Posts: 3073
- Joined: Sat Jun 12, 2004 9:58 am
- Location: San Francisco, CA
-
Contact:
Post
by demond »
Code: Select all
if {![info exists ::ts] || [unixtime] - $::ts > 300} {set ::ts [unixtime]} {return}
connection, sharing, dcc problems? click
<here>
before asking for scripting help, read
<this>
use