| View previous topic :: View next topic |
| Author |
Message |
Soontir Fel Voice
Joined: 23 Feb 2007 Posts: 4
|
Posted: Fri Feb 23, 2007 2:40 pm Post subject: Who's on channel |
|
|
Hello! Can you help me? I need a script, which will take all nicks of all people on the channel and write them to some file (for example txt). And this list of nicks must update every minute, or two. I want to export this information to my web-site, like:
| Code: | On channel #xxxxxxx
Nick 1
Nick 2
Nick 3
|
Can you please help me?
Sorry for my bad english. |
|
| Back to top |
|
 |
Sir_Fz Revered One

Joined: 27 Apr 2003 Posts: 3793 Location: Lebanon
|
Posted: Fri Feb 23, 2007 3:04 pm Post subject: |
|
|
| Code: | bind time - * {
set f [open nicks.txt w]
foreach c [channels] {
puts $f "On channel $c"
foreach n [chanlist $c] {
puts $f $n
}
}
close $f ; #
} |
_________________ Follow me on GitHub
- Opposing
Public Tcl scripts |
|
| Back to top |
|
 |
Soontir Fel Voice
Joined: 23 Feb 2007 Posts: 4
|
Posted: Sat Feb 24, 2007 6:14 am Post subject: |
|
|
| Thank you!!! But where should I put it? And can I make this bot invisible? |
|
| Back to top |
|
 |
Sir_Fz Revered One

Joined: 27 Apr 2003 Posts: 3793 Location: Lebanon
|
|
| Back to top |
|
 |
Soontir Fel Voice
Joined: 23 Feb 2007 Posts: 4
|
Posted: Sat Feb 24, 2007 7:06 am Post subject: |
|
|
| Thanks! |
|
| Back to top |
|
 |
Alchera Revered One

Joined: 11 Aug 2003 Posts: 3344 Location: Ballarat Victoria, Australia
|
Posted: Sat Feb 24, 2007 8:23 am Post subject: |
|
|
| Soontir Fel wrote: | | Thank you!!! But where should I put it? And can I make this bot invisible? |
Apparently on some networks (not DALnet) there's a cloak user mode. Check with the network you use. _________________ Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM |
|
| Back to top |
|
 |
Soontir Fel Voice
Joined: 23 Feb 2007 Posts: 4
|
Posted: Sat Feb 24, 2007 11:59 am Post subject: |
|
|
| And what is it? |
|
| Back to top |
|
 |
Sir_Fz Revered One

Joined: 27 Apr 2003 Posts: 3793 Location: Lebanon
|
Posted: Sat Feb 24, 2007 1:31 pm Post subject: |
|
|
| Alchera wrote: | | Check with the network you use. |
_________________ Follow me on GitHub
- Opposing
Public Tcl scripts |
|
| Back to top |
|
 |
fredvil Voice
Joined: 01 Dec 2005 Posts: 21
|
Posted: Wed Jul 18, 2007 2:49 am Post subject: |
|
|
| Sir_Fz, how to write only userlist on specific channel not all channels the bot is on. example: the bot is on #channel1, #channel2 & #channel3 and write only list on #channel1 |
|
| Back to top |
|
 |
awyeah Revered One

Joined: 26 Apr 2004 Posts: 1580 Location: Switzerland
|
Posted: Wed Jul 18, 2007 3:47 am Post subject: |
|
|
| Code: |
#Channels to write the user nicklist from
set writechans "#chan1 #chan2 #chan3"
bind time - "*" write:chans
proc write:chans {m h d mo y} {
if {([scan $m %d]+([scan $h %d]*60)) % 5 == 0} {
set f [open nicks.txt w]
foreach c [split $::writechans] {
puts $f "On channel $c"
foreach n [chanlist $c] {
puts $f $n
}
}
close $f
}
}
|
Note: Edited to run every 5 minutes _________________ ·awyeah·
==================================
Facebook: jawad@idsia.ch (Jay Dee)
PS: Guys, I don't accept script helps or requests personally anymore.
==================================
Last edited by awyeah on Wed Jul 18, 2007 4:24 am; edited 2 times in total |
|
| Back to top |
|
 |
fredvil Voice
Joined: 01 Dec 2005 Posts: 21
|
Posted: Wed Jul 18, 2007 4:00 am Post subject: |
|
|
thanks a lot awyeah  |
|
| Back to top |
|
 |
fredvil Voice
Joined: 01 Dec 2005 Posts: 21
|
Posted: Wed Jul 18, 2007 4:14 am Post subject: |
|
|
one more thing awyeah, how to adjust the write time to every 5 munites or to any given time?
thanks in advance! |
|
| Back to top |
|
 |
awyeah Revered One

Joined: 26 Apr 2004 Posts: 1580 Location: Switzerland
|
Posted: Wed Jul 18, 2007 4:24 am Post subject: |
|
|
I edited the code above, so it runs every 5 minutes. You can use that code. _________________ ·awyeah·
==================================
Facebook: jawad@idsia.ch (Jay Dee)
PS: Guys, I don't accept script helps or requests personally anymore.
================================== |
|
| Back to top |
|
 |
mazmardigan88 Voice
Joined: 10 Aug 2007 Posts: 2
|
Posted: Fri Aug 10, 2007 2:11 pm Post subject: |
|
|
Hi!
I'm very interested in the same script, but with little modifications (I tried to do them by myself, but I don't know TCL
I just need the same but without the channel name (if possible) and every nick in the same line and separated by a comma and an space. E.g.
Nick1, Nick2, Nick3, Nick4
Thanks  |
|
| Back to top |
|
 |
tsukeh Voice
Joined: 20 Jan 2005 Posts: 31
|
Posted: Fri Aug 10, 2007 2:29 pm Post subject: |
|
|
| mazmardigan88 wrote: | Hi!
I'm very interested in the same script, but with little modifications (I tried to do them by myself, but I don't know TCL
I just need the same but without the channel name (if possible) and every nick in the same line and separated by a comma and an space. E.g.
Nick1, Nick2, Nick3, Nick4
Thanks  |
| Code: |
bind time - * {
set nicklist [chanlist #channel]
set f [open nicks.txt w]
puts $f [join $nicklist ", "]
close $f ; #
}
|
|
|
| Back to top |
|
 |
|