egghelp/eggheads community

Scan Channel list

2015-12-11T13:28:29-04:00

Bot's name is always first, or at least is should be.

That's interesting.

Why?

Anyway, if you want to be 100% sure about removing it from the right position then proceed with:
Code:
set userList [chanlist #somechannel]set pos [lsearch -nocase $userList $::botnick]set userList [lreplace $userList $pos $pos]
and continue with the foreach loop.

Yep.

Statistics: Posted by willyw — Fri Dec 11, 2015 1:28 pm

Scan Channel list

2015-12-11T11:22:36-04:00

Bot's name is always first, or at least is should be.

.tcl chanlist #eggdrop
Tcl: Bot Pixelz jack3 RockKeyman CRaby Stephe nrt r00tb0y Guest67864 poptix Granis` Lillypad simple Rothgar Broney Freeder_ Kamran vigilant CyBex niko_ KuNgFo0_ sid3windr add_ Biagio zeveroare FireEgl SpiKe^^ thekidd DrPepper SoulesSs Robby thommey Ratler Spike Ritche

Anyway, if you want to be 100% sure about removing it from the right position then proceed with:

Code:

set userList [chanlist #somechannel]set pos [lsearch -nocase $userList $::botnick]set userList [lreplace $userList $pos $pos]

and continue with the foreach loop.

Statistics: Posted by caesar — Fri Dec 11, 2015 11:22 am

Scan Channel list

2015-12-09T19:04:03-04:00

What if bot's nick is not the first one in the list returned by chanlist ?

Yes, I checked the chanlist return and there is no way to tell where the bots nick will be in that return...

[17:11] ;chanlist #pc-mirc-help
[17:11] SpiKe^^: #266 (14 clicks) Tcl: Bogustrivia bogustrivia^ Morticia RayMond kingkong Robby Howitzer SpiKe^^ ZoRoCaShE starr Starr`

Statistics: Posted by SpiKe^^ — Wed Dec 09, 2015 7:04 pm

Scan Channel list

2015-12-09T10:22:29-04:00

What if bot's nick is not the first one in the list returned by chanlist ?

Statistics: Posted by willyw — Wed Dec 09, 2015 10:22 am

Scan Channel list

2015-12-09T10:14:19-04:00

In case you wish to exclude bot from the list you got two options:

1. Inside the foreach loop add a continue instruction if the nick matches bot's name by using the built-in isbotnick function like this:

Code:

foreach nick [chanlist #somechannel] {if {[isbotnick $nick]} continue}

2. Or better, just exclude it right away when creating the list:

Code:

set userList [lreplace [chanlist #somechannel] 0 0]foreach nick [split $userList] {# do something with each nick in the channel}

Statistics: Posted by caesar — Wed Dec 09, 2015 10:14 am

Scan Channel list

2015-12-08T21:00:56-04:00

Worked great thanks SpiKe^^

Statistics: Posted by maphex — Tue Dec 08, 2015 9:00 pm

Scan Channel list

2015-12-08T19:15:56-04:00

In tcl, foreach works on tcl lists, not arrays of variables like some other languages...

Code:

foreach nick [chanlist #somechannel] {  ## do something with each nick in the channel ##}

Statistics: Posted by SpiKe^^ — Tue Dec 08, 2015 7:15 pm

Scan Channel list

2015-12-08T18:50:19-04:00

I already have a script i'm working but part of the puzzle that i cant figure out how to do is i'm using bind cron to run the proc every so often but i want it to scan the channel list and save each user as a variable probable use a foreach and use the variable in the rest of the proc. If anyone can show me the best way yo do this would be great.

Statistics: Posted by maphex — Tue Dec 08, 2015 6:50 pm