to use open up the dialog from the menu
type the nick in edit box at the bottom (nick must be online)
and click whois
menu * {
whois:dialog -mt whois whois
}
dialog whois {
title "whois dialog"
size -1 -1 180 110
option dbu
menu "&options" 1
menu "&help" 2
edit "" 3, 5 5 170 90, read multi hsbar vsbar
button "whois" 4, 5 98 40 10
edit "" 5, 47 98 88 10, autohs
button "close", 6, 136 98 40 10
}
on *:dialog:whois:sclick:6:{ dialog -x whois whois }
on *:dialog:whois:sclick:*:{
if ($did == 4) {
if (!$did(5)) {
noop $input(please input a nick/chan to whois.,uwo,Error!)
}
else {
whois $did(5)
did -r whois 3
did -a whois 3 Whois Results: $crlf
did -a whois 3 -------------------- $crlf
}
}
}
raw 319:*:{ if ($dialog(whois)) { did -a whois 3 Channels: $3- $crlf } }
raw 311:*:{
if ($dialog(whois)) {
did -a whois 3 Whois: From $1 to $2 $crlf
did -a whois 3 Address: $+($3,@,$4) $crlf
}
}
raw 312:*:{ if ($dialog(whois)) { did -a whois 3 Server: $3 $+ , $4- $crlf } }
raw 330:*:{ if ($dialog(whois)) { did -a whois 3 AuthServ Account: $3 $crlf } }
raw 307:*:{ if ($dialog(whois)) { did -a whois 3 $2- $crlf } }
raw 338:*:{ if ($dialog(whois)) { did -a whois 3 $1- $crlf } }
raw 401:*:{ if ($dialog(whois)) { did -a whois 3 $2- $crlf } }
raw 317:*:{
if ($dialog(whois)) {
did -a whois 3 Idle: $duration($3) $+ , Signed on: $asctime($4,dddd mm/dd/yyyy HH:nntt) $crlf
}
}
Why not use one check for $dialog(ignore) :
raw *:*:{
if ($dialog(ignore)) {
goto $numeric
:319 | did -a ignore 1 Channels: $3- $crlf | halt
:311
did -a ignore 1 Whois: From $1 to $2 $crlf
did -a ignore 1 Address: @ $+ $4 $crlf
halt
:312 | did -a ignore 1 Server: $3 $+ , $4- $crlf | halt
:330 | did -a ignore 1 AuthServ Account: $3 $crlf | halt
:307 | did -a ignore 1 $2- $crlf | halt
:338 | did -a ignore 1 $1- $crlf | halt
:318 | did -a ignore 1 $2- $crlf | halt
:317 | did -a ignore 1 Idle: $duration($3) $+ , $&
Signed on: $asctime($4,dddd mm/dd/yyyy HH:nntt) $crlf
halt
}
}