| View previous topic :: View next topic |
| Author |
Message |
caesar Mint Rubber

Joined: 14 Oct 2001 Posts: 3741 Location: Mint Factory
|
Posted: Tue Nov 20, 2018 1:45 am Post subject: |
|
|
| Quote: |
Nick list: Guest37056, supr | Clones: 2
|
So, you want to count only one of those as clone and the other as a real user?
Replace:
with:
| Code: |
incr count [expr $len - 1]
|
then and the result should be: Clones: 1 (33.3%) | Real users: 2 (66.7%) _________________ Once the game is over, the king and the pawn go back in the same box. |
|
| Back to top |
|
 |
Arnold_X-P Master

Joined: 30 Oct 2006 Posts: 221 Location: DALnet - Trinidad - Beni - Bolivia
|
Posted: Tue Nov 20, 2018 2:10 am Post subject: |
|
|
replace what you asked me but the report is not correct
Replace:
with:
| Code: |
incr count [expr $len - 1]
|
that is, if there is a real user and the other is a clone, then it would be like that:
suppose that 4 are the nicknames of which 3 are real and one is clone
This is in the channel where I am using the tcl
the report that gives the old tcl is the correct
old tcl
| Code: |
[01:59] <@Arnold_X-P> .clones
[01:59] <@xsedition> Starting clonescan for #lapaz ...
[01:59] <@xsedition> (localhost) NickClones: sicario, supr - Clones: 1
[01:59] <@xsedition> Clones: 1 (25.0%) Real users: 3 (75.0%) - Took: 0.0ms.
|
new tcl
| Code: |
[02:01] <@xsedition> Starting clonescan for #lapaz...
[02:01] <@xsedition> (localhost) Nick list: sicario, supr | Clones: 2
[02:01] <@xsedition> Clones: 1 (33.3%) | Real users: 2 (66.7%) | Took: 0.0ms. |
only this part is the correct thing that the report gives the old tcl and that is what the new tcl needs to perfect
[01:59] <@xsedition> Clones: 1 (25.0%) Real users: 3 (75.0%) - Took: 0.0ms. _________________
thanks to that they help, that others learn  |
|
| Back to top |
|
 |
caesar Mint Rubber

Joined: 14 Oct 2001 Posts: 3741 Location: Mint Factory
|
Posted: Tue Nov 20, 2018 5:32 am Post subject: |
|
|
Change:
| Code: |
puthelp "PRIVMSG $chan :\($host\) Nick list: $nickList - Clones: $len"
|
to:
| Code: |
puthelp "PRIVMSG $chan :\($host\) Nick list: $nickList - Clones: [expr $len - 1]"
|
and the result will be:
| Quote: |
[02:01] <@xsedition> Starting clonescan for #lapaz...
[02:01] <@xsedition> (localhost) Nick list: sicario, supr | Clones: 1
[02:01] <@xsedition> Clones: 1 (33.3%) | Real users: 2 (66.7%) | Took: 0.0ms.
|
_________________ Once the game is over, the king and the pawn go back in the same box. |
|
| Back to top |
|
 |
|