Just a simple little thinggy to show...:
amount of networks you are on,
amount of channels you are on,
total usermodes (~&!@%+) if any,
amount of users you have control over.
<~Knoeki> I'm on 48 channels, spread across 6 networks. Powers: 4 ~, 4 &, 1 @, 2 %, 13 +. I'm more important than 432/2110 (20.47%) lamers.
can probably be done a lot better, but that's for another time.
I've updated it a little bit, it shows a percentage too now, and fixed a bug so that it'll actually show a '0' when you do not have a certain mode anywhere.
alias powertrip {
var %pt.net.count 1
var %pt.net.total $scon(0)
var %pt.chan.count 1
while (%pt.net.count <= %pt.net.total) {
scid $scon(%pt.net.count)
var %tmp.chan.count 1
var %tmp.chan.total $comchan($me, 0)
while (%tmp.chan.count <= %tmp.chan.total) {
inc %pt.mode.count. [ $+ [ $modenum2($comchan($me, %tmp.chan.count), $me) ] ]
var %tmp.nick.total $nick($comchan($me, %tmp.chan.count), 0)
var %tmp.nick.chan $comchan($me, %tmp.chan.count)
var %tmp.nick.count 1
while (%tmp.nick.count <= %tmp.nick.total) {
if ($modenum2(%tmp.nick.chan, $me) > $modenum2(%tmp.nick.chan, %tmp.nick.count)) {
inc %pt.pwn.count
}
inc %pt.total.nicks
inc %tmp.nick.count
}
inc %tmp.chan.count
}
var %pt.chan.total $calc(%pt.chan.total + %tmp.chan.count)
inc %pt.net.count
}
var %x 1
while (%x <= 6) {
if (%pt.mode.count. [ $+ [ %x ] ] == $null) {
var %pt.mode.count. [ $+ [ %x ] ] 0
}
inc %x
}
scid -r
say I'm on $+(,%pt.chan.total,) channels, spread across $+(,$calc(%pt.net.count - 1),) networks. Powers: $+(,%pt.mode.count.6,) ~, $+(,%pt.mode.count.5,) &, $+(,%pt.mode.count.4,) @, $+(,%pt.mode.count.3,) $+($(%),$chr(44)) $+(,%pt.mode.count.2,) +. I'm more important than $+(,%pt.pwn.count,/,%pt.total.nicks,) $+($chr(40),,$round($calc((%pt.pwn.count / %pt.total.nicks) * 100), 2),,$(%),$chr(41)) lamers.
unset %pt.*
unset %tmp.*
}
alias -l modenum2 {
return $iif($left($nick($1, $2).pnick, 1) isin $prefix, $replacex($left($nick($1, $2).pnick, 1), ~, 6, !, 5, &, 5, @, 4, %, 3, +, 2), 1)
}
Knoeki,
%pt.total.nicks and %pt.mode.count.1-6 did not get
declared as local variables with the var command.
A call to a variable that is not set or declared
is set as a global variable by mIRC. The first time
that an undeclared variable is incrimented mIRC will
set it to 1 (one) thus the following three lines
give the same results.
inc %tmp.nick.count
set %tmp.nick.count 1
%tmp.nick.count = 1
Gooshie:
I have not put much effort in this, obviously ;_) I might make a better version at some point, but thanks for the feedback, which I'll address now:
The reason I've used /unset at the end, is not because I've used /set anywhere (just look!), but more because for some reason, some stray variables got left behind.
I don't get your whole point about about $network and $server, when have I ever claimed that these are the same? Also, how is it even relevant to this script at all?
Yours seems nice, but doesn't keep track of modes other than +o and +v, which is a shame imho, but might be chosen because you do not find it neccisary.
thanks for the feedback, much appreciated :_)
Knoeki,
The main reason the channel count is gonna be off
is the use of the $comchan indentifier.
Total user count is gonna be off sometimes because
it will count users more than once if they are in
more than one of your channels and at the very least
could be counted easier with the $ial identifier.
All of this can be accomplished without the need for
/set and /unset %varibles to eliminate harddrive writes.
btw: $network and $server are not the same thing.
$network may have more than one $server and some
$network may allow more than one connection.
also (unfortunately) $network and $server DO NOT
have to be unique names on the planet.
The DOMAIN name MUST be unique and so must $serverip
BUT unfortunately $network and $server are sent out
by the server in the raw 001-005 lines during connect and
can be anything they set it to. This is sorta off topic
but this means if you ever write like an auto-ident to
NickServ/ChanServ maybe better to use $serverip for security.
review my snippet at: http://www.hawkee.com/snippet/6559/
