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.
Old posts that have not been replied to for several years.
-
matt2kjones
- Voice
- Posts: 24
- Joined: Fri Feb 07, 2003 11:16 am
Post
by matt2kjones »
I need a tcl file, which every minute, writes to a text file how many users are in the chat room the bot is connected in.
If anyone could do that for me, or could direct me to a pre made script then that wold be great
Thanx
-
Papillon
- Owner
- Posts: 724
- Joined: Fri Feb 15, 2002 8:00 pm
- Location: *.no
Post
by Papillon »
try searching in the tcl archive, or why not trying to make it yourself?
Elen sila lúmenn' omentielvo
-
caesar
- Mint Rubber
- Posts: 3778
- Joined: Sun Oct 14, 2001 8:00 pm
- Location: Mint Factory
Post
by caesar »
Code: Select all
set status(file) "status.txt"
set status(chan) "#channel"
bind time - * chan:status
proc chan:status {args} {
if {![validchan $::status(chan)]} {
putlog "\002Warning!\002 Invalid channel $::status(chan).. Please replace it!"
return
}
set file [open $::status(file) w]
puts $file "Current $::status(chan) users: [llength [chanlist [string tolower $::status(chan)]]]"
catch {close $file}
}
Once the game is over, the king and the pawn go back in the same box.