WhoIs Dialog
Platform: mIRC
Published Oct 27, 2011
Updated Nov 01, 2011
That Is Dialog Of /whois command
Again Write /whois nick and you will see the whois dialog
The IP Adress,Modes Is For The IRCOPS.Some Time Host Can Show The IPadress of nick
Auth is For GameSurge.Reg is for Check the nick is registered nick or no
And HelpOp Shows The NickName is HelpOp or no
#whois on
dialog whois {
title "Whois"
size -1 -1 131 113
option dbu
text "NickName:", 1, 4 4 27 8
text "RealName:", 2, 4 13 25 8
text "Identy:", 3, 4 22 25 8
text "Host:", 4, 4 31 25 8
text "IP Address:", 21, 4 40 31 8
text "Auth or Reg:", 20, 4 58 31 8
text "Channels:", 5, 4 67 25 8
text "Away:", 6, 4 76 25 8
text "Idle:", 24, 4 85 25 8
text "Other:", 7, 4 94 32 8
text "Modes:", 22, 4 49 31 8
text "HelpOp:", 23, 4 103 32 8
edit "", 8, 36 3 94 9, read autohs
edit "", 9, 36 12 94 9, read autohs
edit "", 10, 36 21 94 9, read autohs
edit "", 11, 36 30 94 9, read autohs
edit "", 12, 36 66 94 9, read autohs
edit "", 13, 36 75 94 9, read autohs
edit "", 14, 36 84 94 9, read autohs
edit "", 15, 36 93 94 9, read autohs
edit "", 16, 36 57 94 9, read autohs
edit "", 17, 36 39 94 9, read autohs
edit "", 18, 36 48 94 9, read autohs
edit "", 19, 36 102 94 9, read autohs
}
raw *:*: {
if ( $numeric == 311 ) {
set %d $2
dialog -m %d whois
dialog -t %d Whois $2 $+ ?
did -a %d 8 $2
did -a %d 9 $6-
did -a %d 10 $3
did -a %d 11 $4
halt
}
if ( $numeric == 307 ) {
if ( a registered nick isin $1- ) {
did -a %d 16 Yes
halt
}
}
if ( $numeric == 378 ) {
did -a %d 17 $6-
halt
}
if ( $numeric == 379 ) {
did -a %d 18 $6-
halt
}
if ( $numeric == 330 ) {
did -a %d 16 $3
halt
}
if ( $numeric == 319 ) {
did -a %d 12 $3-
halt
}
if ( $numeric == 301 ) {
did -a %d 13 $3-
halt
}
if ( $numeric == 313 ) {
did -a %d 15 $3-
did -a %d 7 $2
halt
}
if ( $numeric == 317 ) {
did -a %d 14 $duration($3)
halt
}
if ( $numeric == 310 ) {
if ( help isin $1- ) {
did -a %d 19 Yes
halt
}
}
if ( $numeric == 318 ) {
halt
}
if ( $numeric == 312 ) { halt }
}
#whois end
menu * {
Whois Dialog
.$iif($group(#whois).status == on,$style(1)) ON: .enable #whois | linesep | echo 3 -ag * Whois Dialog Has Been Enabled | linesep
.$iif($group(#whois).status == off,$style(1)) OFF: .disable #whois | linesep | echo 2 -ag * Whois Dialog Has Been Disabled | linesep
}