Whois Addon
How to load the addon on your mIRC script (choose either 1 or 2)
1- Go on Tools on the MenuBar - Script Editor - Remote - File - (or ALT+R) New then copy the code down and paste it there then press Ok.
2- Download the on whois.mrc down, Put it on the mirc folder and go on Tools on the MenuBar - Script Editor --- > Remote - File - (or ALT+R) Load and then choose the place of the on whois.mrc and then press Open then Ok.
How to load the addon on your mIRC script (choose either 1 or 2)
1- Go on Tools on the MenuBar - Script Editor - Remote - File - (or ALT+R) New then copy the code down and paste it there then press Ok.
2- Download the on whois.mrc down, Put it on the mirc folder and go on Tools on the MenuBar - Script Editor --- > Remote - File - (or ALT+R) Load and then choose the place of the on whois.mrc and then press Open then Ok.
Code:
on *:load: {
.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: Whois $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 07/06/2017 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Thank you for using this Addon,igo,Addon: Whois $chr(40) $+ v5.4 $+ $chr(41))
.echo -s _____________________________________________________
.echo -s 0,1 Loading 9,1Whois0,1 Add-On...
.echo -s 0,1 You are running mIRC $version on Windows $+ $os
.echo -s ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: {
.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: Whois $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 07/06/2017 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: Whois $chr(40) $+ v5.4 $+ $chr(41))
}
;############################ -«•»SaNCaK ScripT«•»- ############################
menu nicklist {
— $1 —:whois $$1 $$1
}
raw 311:*:{
haltdef
echo -a $timestamp 14___[14Whois:1 $2 $+ 14] -------------------------------------------------------------•
echo -a $timestamp 14|---› 14Nick:1 $2
echo -a $timestamp 14|---› 14FullName:1 $6-
echo -a $timestamp 14|---› 14Ident@Ip:1 $3 $+ 14 $+ @ $+ 01 $+ $4
var %clone = $kanalclone($2)
if (%clone == $null) echo -a $timestamp 14|---› 14Clones:1 (No Clone)
else echo -a $timestamp 14|---› 14Clone:1 ( $+ $numtok(%clone,44) $+ ) user 04/01 %clone
haltdef
}
raw 312:*:{
haltdef
echo -a $timestamp 14|---› 14Server:1 $3 04/01 $4 $5 $6
}
raw 313:*: {
haltdef
echo -a $timestamp 14|---› 14Network Info:1 $3 $4 $5 $6 $7 $8 $9
}
raw 314:*:{
haltdef
echo -a $timestamp 14¯°--------------------------------------------------------------------------------•
echo -a $timestamp 14|---› 14Nick:1 $2
echo -a $timestamp 14|---› 14FullName:1 $6-
echo -a $timestamp 14|---› 14Ident@Ip:1 $3 $+ 14 $+ @ $+ 01 $+ $4
var %clone = $kanalclone($2)
if (%clone == $null) echo -a $timestamp 14|---› 14Clones:1 (No Clone)
else echo -a $timestamp 14|---› 14Clone:1 ( $+ $numtok(%clone,44) $+ ) user 04/01 %clone
haltdef
}
raw 317:*:{
haltdef
echo -a $timestamp 14|---› 14Connect Time:1 $asctime($4) 04/1 $duration($calc($ctime - $4))
echo -a $timestamp 14|---› 14Idle:1 $duration($3)
}
raw 318:*:{
haltdef
.timer -h 1 200 echo -a $timestamp 14¯°--------------------------------------------------------------------------------•
}
raw 319:*:{
haltdef
echo -a $timestamp 14|---› 14Channels:1 $3-
echo -a $timestamp 14|---› 14Com Channels:1 $ortak_k($2) 04/01 Total:04 $comchan($2,0) 01Chan(s)
}
raw 338:*:{
haltdef
echo -a $timestamp 14|---› 14Real Ip:01 $4 $5 $6
}
raw 320:*:{
haltdef
echo -a $timestamp 14|---› 14Swhois:1 $2-
}
raw 330:*: echo -a $timestamp 14|---› 14NickServ:1 $2 $4 $5 $6 $7 $3 | halt
raw 378:*:{
haltdef
echo -a $timestamp 14|---› 14Real Ip:01 $3 $4 $5 $6 $7
}
raw 379:*:{
haltdef
echo -a $timestamp 14|---› 14Modes:01 $6
}
raw 671:*:{
haltdef
echo -a $timestamp 14|---› 14Connection:1 $3-
}
raw 276:*:{
haltdef
echo -a $timestamp 14|---› 14Client :1 $3 $4 $5 $6 $7
}
raw 327:* {
echo -a $timestamp 14|---› 14Client Info:1 Java User
halt
}
raw 301:*: {
haltdef
echo -a $timestamp 14|---› 14Away:1 ( $+ $3- $+ )
}
raw 310:*: {
haltdef
echo -a $timestamp 14|---› 14Ircop:1 $3 $4 $5 $6
}
raw 335:*: {
echo -a $timestamp 14|---› 14Bot:1 Yes (+B).
halt
}
alias kanalclone {
if ($ial($address($1,2),0) == 1) return
var %nickler = 0 | var %clone = $1
while (%nickler < $ial($address($1,2),0)) { inc %nickler | var %clone = $addtok(%clone,$ial($address($1,2),%nickler).nick, 44) }
return %clone
}
alias ortak_k {
if ($server == $null) { echo -a $timestamp 14|---› 14No such server. }
elseif ($chan($me) == 0) { echo -a $timestamp 14|---› 14No such channel. }
elseif (!$1) { echo -a $timestamp 14|---› 14No such nick. }
elseif ($comchan($1,0) == 0) { echo -a $timestamp 14|---› 14No such nick/channel. }
else {
var %oid 1
set %orka $comchan($1,0)
unset %knms
while (%oid <= %orka) {
set %knms $comchan($1,%oid) $+ $chr(32) $+ %knms
inc %oid
}
return %knms
}
}