egghelp.org community :: View topic

[ egghelp.org home | forum home ]

egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.

FAQ

Memberlist

Usergroups

Profile

clonescan

This forum is locked: you cannot post, reply to, or edit topics.

This topic is locked: you cannot edit posts or make replies.

egghelp.org community Forum Index -> Archive

View previous topic :: View next topic

Author

Message

r0t3n
Owner

Joined: 31 May 2005
Posts: 507
Location: UK

Posted: Tue Aug 30, 2005 5:42 pm Post subject: clonescan

I have made a clonescan which works, but it output's some data incorrectly.

Code:

bind pub o|o !clonescan pub:clonescan

proc pub:clonescan {nick host hand chan arg} {
set channel $chan
set count 0
set clones_who {}
foreach user [chanlist $chan] {
foreach person [chanlist $chan] {
if {[string equal -nocase [getchanhost $user $chan] [getchanhost $person $chan]] && ![string equal $user $person]} {
incr count
lappend clones_who Host: [getchanhost $user $chan] Users: $user and $person
}
}
}
set clones $count
set users [expr [llength [chanlist $chan]] - $clones]
putserv "PRIVMSG $chan :CloneScan: There are $users real users on $channel $$clones Clones found$."
putserv "PRIVMSG $chan :CloneScan: The clones are: $clones_who"
}

proc clonescan:version {} {
putlog "Clonescan v: 0.1 BETA by Tosser^^TCL"
}
clonescan:version

The output

Code:

<Tosser> !clonescan
<ChanServHub> CloneScan: There are 104 real users on #roffl (2 Clones found).
<ChanServHub> CloneScan: The clones are: Host: scorpio@Justinn.users.quakenet.org Users: Rayne and `Finalize Host: scorpio@Justinn.users.quakenet.org Users: `Finalize and Rayne

How can i make it so instead of it saying

Code:

<ChanServHub> CloneScan: The clones are: Host: scorpio@Justinn.users.quakenet.org Users: Rayne and `Finalize Host: scorpio@Justinn.users.quakenet.org Users: `Finalize and Rayne

it says

Code:

<ChanServHub> CloneScan: The clones are: Host: scorpio@Justinn.users.quakenet.org Users: Rayne and `Finalize

Sorry about my english tonight, im to tired, been fixing it all day Very Happy

Thanks in advance[/code]
_________________
r0t3n @ #r0t3n @ Quakenet

Display posts from previous:

	egghelp.org community Forum Index -> Archive	All times are GMT - 4 Hours
Page 1 of 1

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