Whois Clone Scanner

By FordLawnmower on Mar 22, 2009

Image
This little snippet will add a clone scanner to your whois. So when you type /whois nickname,
it will show their clones at the end of it. Provided they have clones, of course :)
This was my buddy porch's idea :)
To use, Just copy the code and paste to remotes. Save it and type /whois nickname.

;Whois by Ford_Lawnmower irc.mindforge.org #USA-Chat
raw 311:*:{
  haltdef
  Echo -a 4 4[6S14tart 6W14hois4]
  Echo -a 4 4[6W14hois4] 14Whois:4  $2 14(4 $+ $3 $+ @ $+ $4 $+ 14)
  Echo -a 4 4[6W14hois4] 14Real name:4 $6-
}
raw 378:*:Echo -a 4 14 $+ $2- | haltdef
raw 379:*:Echo -a 4 4[6W14hois4] 14Modes:4 $2- | haltdef
raw 307:*:Echo -a 4 4[6W14hois4] 14Services:4 $4- | haltdef
raw 312:*:Echo -a 4 4[6W14hois4] 14Server:4 $3 | haltdef
raw 319:*:Echo -a 4 4[6W14hois4] 14Channels:4 $3- | haltdef
raw 317:*:Echo -a 4 4[6W14hois4] 14Idle:4 $duration($3) | haltdef
raw 313:*:Echo -a 4 14 $+ $2- | haltdef
raw 310:*:Echo -a 4 14 $+ $2- | haltdef
raw 335:*:Echo -a 4 14 $+ $2- | haltdef
raw 301:*:Echo -a 4 4[6W14hois4] 14Away:4 $3- | haltdef
raw 671:*:Echo -a 4 14 $+ $2- | haltdef
raw 320:*:Echo -a 4 14 $+ $2- | haltdef
raw 401:*:Echo -a 4 14 $+ $2- | haltdef
raw 318:*: {
  haltdef
  var %whois.Clones $ial($address($2,2),0)
  if (%whois.Clones > 1) {
    echo -a 4 4[6W14hois4] 3C4l6o7n9e12s4 $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 4 4[6W14hois4] 3C4l6o7n9e12s4 $addtok($replace($ial($v1),!,$chr(40)),$chr(32),41)
      }
      dec %iee
    }
  }
  echo -a 4 4[6E14nd 6W14hois4]
}

Comments

Sign in to comment.
Snip3KitTy   -  Aug 15, 2010

PWND. that is all

 Respond  
FordLawnmower   -  Jul 26, 2009

The code you are attempting to correct isn't broken Grant-. And your corrections can even be corrected.
You corrected this code:

if ($2 == $null || $3 == $null)

To this:

if (!$2 || !$3)

I would do it like this:

if (!$3)

Mine is better according to your little byte counter. Should I now search all the snippets and correct them?
All three of them work, so there is no reason to make an issue of it.

Keep your opinions to yourself
This is MY post Grant-!!!

 Respond  
Grant-   -  Jul 26, 2009

I don't put them down, i simply correct them..so much useless stuff, like if ($2 == $null) I don't do it because of the bytes, I do it because it's easier to read. Keep your opinions to yourself, and if you really want to continue this arguement, you can connect to SwiftIRC (/server lunar.swiftirc.net:+6697). Other then that, discussion over.

 Respond  
FordLawnmower   -  Jul 26, 2009

Yea this is the problem I have with you Grant-. You just go from post to post trying to put people down. It's a very useless and unwanted activity and you are not even any good at it.
For instance:
You just posted this code:

alias -l ialupdate { var %x = 1 | while (%x <= $chan(0)) { who $chan(%x) | inc %x } }

I could correct your code as this:

alias -l ialupdate { var %x = $chan(0) | while (%x) { who $chan(%x) | dec %x } }

You have wasted so many precious bytes ;/
Not to mention the fact that the script will never get to that point because it has other errors.
These types of corrections are senseless Grant-. I could care less if you want to use inc instead of dec. Both scripts work the same and in my opinion they are the same.
It's not like you can cash the extra bytes in at the mIRC store or anything.

And now you want to start incorrectly correcting my grammar. WOW!!

 Respond  
Grant-   -  Jul 26, 2009

I wasn't talking script-wise, i was commenting on your grammar lol. going to bed.

 Respond  
FordLawnmower   -  Jul 26, 2009

It still updates your ial Grant-, but it's far to annoying for my taste. Not completly useless though.

 Respond  
Grant-   -  Jul 25, 2009

An ial update that just splatters the screen with tons of junk is all but useless.
so you're saying an ial update that just splatters the screen is helpful

 Respond  
FordLawnmower   -  Jul 25, 2009

Bandaid scripts is not the solution. An ial update that just splatters the screen with tons of junk is all but useless. It would crush you if you were in a couple channels with 300 or so people in them. Besides noone wants all that text. Ial should update quietly in the background and should not even momentarily effect your ability to use your client.

 Respond  
Grant-   -  Jul 25, 2009

then they should make a dialog for when they get highlighted

 Respond  
FordLawnmower   -  Jul 25, 2009

By a nice ial update script, I meant a real ial update script ;/
Like one that halts all the defaults on /who and just shows a little progress bar saying "updating ial please wait" & showing the progress.
Update complete!
Then restores the raws for /who back to normal working order.
The script you made will just fill the screen with names right about the time everyone is greeting you.
It will take a half hour just to figure out who said Hi ;/

 Respond  
Grant-   -  Jul 25, 2009
on *:CONNECT:{ set -u10 %startup orly }
on *:NOTICE:*:?:{
  if ($1- == Password accepted - you are now recognized.) && ($nick === NickServ) && (%startup) {
    .timer 1 10 ialupdate
  }
}
alias -l ialupdate { var %x = 1 | while (%x <= $chan(0)) { who $chan(%x) | inc %x } }
 Respond  
FordLawnmower   -  Jul 25, 2009

Then what happens when someone has loaded 10 scripts with ial updates on connect? They won't even be able to identify their nick in time. This is why ial update should be a seperate script. You can't put it in every script that uses ial. This could cause mirc to become to bloated and crash.
If it bothers you so much Grant-, make a nice ial update script and post it. I haven't really seen a good one here.

 Respond  
Grant-   -  Jul 25, 2009

Then make an on Connect for them?..

 Respond  
FordLawnmower   -  Jul 25, 2009

It will just lag the hell out of people everytime they do a whois Grant-. You can't update ial everytime you whois.
There is no glitch ;/
If you don't have a script to update your ial then lots of scripts won't work properly.
Some networks allow you to be in 80 channels Grant-. This is why ial needs to be updated on Connect.

 Respond  
Grant-   -  Jul 25, 2009

I'm spamming? Why is that? Because I'm showing a glitch in your script? If you haven't realized by now, lots of people who are not members of hawkee and new to the mSL have no idea about the mSL. I'm telling you something that will better your script and you're refusing it. If you're going to be this immature about it, please just delete this post and the one you've just made.

 Respond  
FordLawnmower   -  Jul 25, 2009

Grant- I am not trying to update everyones ial. You should have your own script to keep track of that.
35 comments all negative. Do you have a brain tumor or something?
How in the hell did you get so full of yourself??
Your comment has been deleted --- reason spamming your posts.

 Respond  
FordLawnmower   -  Jul 25, 2009

I updated this a bit and added a full whois with the clone scanner. I also removed the redundancy, per Kirbys suggestion. Screen shot added as well.

 Respond  
FordLawnmower   -  Mar 23, 2009

Yea, that variable doesn't do anything it this short section. I just chopped this out of my script and I use most of these raws for lots of other things. At least I think that's why I did it that way. Could be I just overlooked it. I really need to revisit some of my older scripting and see what improvements I can make on it now that I have a little more knowledge. 2 years now since I first downloaded mIRC. I think I started hacking at the scripts editor the first week, So I've still only been at it for 2 years :)
You're right, having the original nick in the clone list is rather redundant. I've never really thought about it. Perhaps I'll change it later :)
Thanks for the comments Kirby :)

 Respond  
Kirby   -  Mar 23, 2009

You can completely take out

raw 311:*:{
  set %whois.nick $2
}

and replace

%whois.nick

in raw 318 with

$2

.
Using the IAL, this does generally work well, but when it scans for clones, the nick supplied is included in the "clones" list.
Was that intentionally left out?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.