Guest LAS Posted September 4, 2004 Report Share Posted September 4, 2004 alias dwho { if ($dialog(whois)) dialog -x whois whois | dialog -m whois whois } dialog whois { title "Whois[ /dwho ]" size -1 -1 232 122 option dbu box "", 1, 4 4 82 114 list 2, 8 10 74 104, size vsbar box "", 3, 90 4 138 114 edit "", 4, 94 10 64 10, read autohs edit "", 5, 160 10 64 10, read autohs edit "", 6, 94 22 130 92, read multi vsbar } on *:dialog:whois:init:*:{ mdx SetMircVersion $version mdx MarkDialog $dname mdx SetColor $dname 2,4,5,6 text $rgb(255,255,255) mdx SetColor $dname 2,4,5,6 textbg $rgb(0,0,0) mdx SetColor $dname 2,4,5,6 background $rgb(0,0,0) mdx SetFont $dname 2,4,5,6 %fsize 500 %font mdx SetBorderStyle $dname 2,4,5,6 staticedge wnicks } on *:dialog:whois:dclick:2:{ did -ra whois 4 %whois | did -r whois 6 | .whois %whois } on *:dialog:whois:sclick:2:{ %whois = $did(2).seltext } on *:dialog:whois:close:*:{ unset %whois } alias wnicks { did -r whois 2 %i = 1 while (%i <= $nick($active,0)) { did -a whois 2 $nick($active,%i) inc %i } } raw 307:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 308:*:{ if ($dialog(whois)) else { echo $color(whois text) -a $2- | haltdef } } raw 309:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 310:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 311:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 312:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 313:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 317:*:{ if ($dialog(whois)) { did -a whois 6 $duration($3) $asctime($4,mm/dd/yy) $5- $crlf | haltdef } else { echo $color(whois text) -a $duration($3) $asctime($4,mm/dd/yy) $5- | haltdef } } raw 318:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 319:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 379:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 378:*:{ if ($dialog(whois)) { did -ra whois 5 $remove($6-,$chr(42),$chr(64)) | haltdef } else { echo $color(whois text) -a $2- | haltdef } } raw 320:*:{ if ($dialog(whois)) { did -a whois 6 $3- $crlf | haltdef } else { echo $color(whois text) -a $2- | haltdef } } alias mdx { dll mdx.dll $1- } Now this is my whois dialog from my personal script. I have modified it; so you can edit it for your own theme. Als you need mdx.dll. Hope this comes in handy to anyone who like to learn; or just want to spice up their scripts. And I again, I dont mind good and bad comments; as long as you dont tell me I'm a crappy. lol Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now