By Warriorii on Jan 22, 2012This is my first raw snippet, I know there is a lot of the whois snippets around but I wanted to try it also.
Once you load it go into the snippet and place the channels that u want it to work in like
Exam: on 1:join:#channel,#channel: and so on. Save it then right click in one of the channels and look for @whois colors, click on that and set your colors u can color your foreground and your background. Thats about it. Like i said i know there is a lot of them around I just wanted to see if i could do it. This snippet will open a seperate window for the joins. I have it log everyone that joins and start a new log each day. My channels are on the right side of my mirc and that is where the window is. I just leave the window open all day then close it each morning then it will pop back up as soon as someone joins...
############################################
# Written by Jon_2 #
# 1/4/2012 #
# Version 1.0 #
# Tested by Luvme4me #
#------------------------------------------#
# I would like to Thank Foghat for helping #
# me with the color and the Idle time. #
# To Load Type /load -rs whois-colors.mrc #
############################################
on *:load:{
echo 4 -a * $wi $+ 9,1 You have successfully loaded Jon_2's Whois. Enjoy... $+ $wi
}
on 1:join:#channel: {
if ($nick == $me) { return }
whois $nick $nick
}
on *:unload: { unset -s %namec | unset -s %infoc }
raw 311:*: {
if $window(@Whois) {
goto end
}
window -k(0)zn(0) @Whois
:end
echo @whois - | echo @whois $+ %namec $2 is $+ %infoc ( $+ $3 $+ @ $+ $4 $+ ) | echo @whois $+ %namec Real Name $+ %infoc $6- | halt
}
raw 310:*:echo @whois $+ %namec $2 $+ $+ %infoc Looks very helpful | halt
raw 312:*:echo @whois $+ %namec Server $+ %infoc $3 | halt
raw 313:*:echo @whois $+ %namec $2 $+ $+ %infoc Is a Network Administrator | halt
raw 318:*:echo @whois 4 End Of Whois | echo @whois - | halt
raw 319:*:echo @whois $+ %namec Channels $+ %infoc $3- | halt
raw 307:*:echo @whois $+ %namec $2 $+ $+ %infoc Has Identified for this nick | halt
raw 301:*:echo @whois $+ %namec $2 is away $+ %infoc $3- | halt
raw 379:*:echo @whois $+ %namec Modes $+ %infoc $6- | halt
raw 317:*:echo @whois $+ %namec Idle time $+ %infoc $duration($3) | if ( $4 isnum ) echo @whois $+ %namec Signon time $+ %infoc $asctime($4) | halt
raw 378:*:echo @whois $+ %namec Real Address: $+ %infoc $+ $6- | halt
menu channel {
@Whois Colors {
set %namec $$?"Enter Name Color Here"
set %infoc $$?"Enter Info Color Here"
}
}
alias wi return 14,5«15,4¤14,5»
May also want to add something like this
raw 318:*: {
haltdef
var %whois.Clones $ial($address($2,2),0)
if (%whois.Clones > 1) {
echo -a 12--->1Clones12:14 $2 has $calc($ial($address($2,2),0) - 1) clones on $network
var %iee $ial($address($2,2),0)
while %iee {
if ($gettok($ial($address($2,2),%iee),1,33) != $2) {
echo -a 12--->1Clones12:14 $addtok($replace($ial($v1),!,$chr(40)),$chr(32),41)
}
dec %iee
}
}
echo -a 12--->14|1End Of Whois14|
}
If you are in a position to read I.P's it will return clones.
i.e.
|Start of Whois on: JungleSpot |
--->Nick: JungleSpot
--->Fullname: Junglespot
--->Hostname: Junglespot@XXX.XXX.XXX.XXX
--->Channels: @#AdultsChat @#Debate @#help @#Jungle @#TeenChat @#Trivia
--->Server: JungleSpot.chat.server /JungleSpot/ IP: 67.21.73.197
--->Idle: 3mins 17secs
--->Signed On: Sunday January 22 2012 @ 09:26pm
--->Clones: JungleSpot has 1 clone(s) on JS
--->Clones: Missybaby(Jungle@XXX.XXX.XXX.XXX)
--->|End Of Whois|
