egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

help in clone scan tcl
Goto page Previous  1, 2
 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Requests
View previous topic :: View next topic  
Author Message
caesar
Mint Rubber


Joined: 14 Oct 2001
Posts: 3581
Location: Mint Factory

PostPosted: Tue Nov 20, 2018 1:45 am    Post subject: Reply with quote

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:
Code:

incr count $len

with:
Code:

incr count [expr $len - 1]

then and the result should be: Clones: 1 (33.3%) | Real users: 2 (66.7%)
_________________
I tawt I taw a puddy tat!
Back to top
View user's profile Send private message
Arnold_X-P
Op


Joined: 30 Oct 2006
Posts: 188
Location: DALnet - Trinidad - Beni - Bolivia

PostPosted: Tue Nov 20, 2018 2:10 am    Post subject: Reply with quote

replace what you asked me but the report is not correct
Replace:
Code:

incr count $len

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.
_________________
Very Happy thanks to that they help, that others learn Very Happy
Back to top
View user's profile Send private message Send e-mail Visit poster's website MSN Messenger
caesar
Mint Rubber


Joined: 14 Oct 2001
Posts: 3581
Location: Mint Factory

PostPosted: Tue Nov 20, 2018 5:32 am    Post subject: Reply with quote

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.

_________________
I tawt I taw a puddy tat!
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Requests All times are GMT - 4 Hours
Goto page Previous  1, 2
Page 2 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber