Whois script, help - mIRC Discussion Forums

Code:

 dialog whois {
  title "Whois System"
  size -1 -1 140 155
  option dbu
  button "Quitter", 1, 52 137 37 12, ok cancel
  text "Pseudo :", 2, 4 10 25 8
  text "User@Host :", 3, 4 21 33 8
  text "Nom :", 4, 4 32 17 8
  text "Canal :", 5, 4 88 20 8
  text "Serveur :", 6, 4 43 25 8
  text "Idle :", 7, 4 55 15 8
  text "Away :", 8, 4 66 25 8
  text "Status User :", 9, 4 78 33 8
  box "Whois ...", 10, 1 0 137 135
  edit "", 11, 37 9 97 10, read autohs
  edit "", 12, 37 20 97 10, read autohs 
  edit "", 13, 37 31 97 10, read autohs 
  edit "", 14, 37 42 97 10, read autohs 
  edit "", 15, 37 54 97 10, read autohs 
  edit "", 16, 37 65 97 10, read autohs 
  edit "", 17, 37 77 97 10, read autohs 
  list 18, 37 88 95 41,  sort size extsel vsbar
}
on *:dialog:whois:init:0:{ 
  did -a whois 11 %whois.nickname 
  did -a whois 12 %whois.user@host 
  did -a whois 13 $remove(%whois.name,,,,) 
  did -a whois 14 %whois.server  
  did -a whois 15 %whois.idle 
  did -a whois 16 $remove(%whois.away,,,,)
  did -a whois 17 %whois.status
  did -a whois 18 %whois.channels  
  if ($group(#whois).status == on) { did -u whois 19 } 
  else { did -c whois 19 } 
} 

on *:dialog:whois:sclick:1:{ 
  unset %whois.* 
} 

#whois on

; Away 
raw 301:*:{ 
  set %whois.away $3- 
  haltdef 
} 

; Identified? 

raw 307:*:{ 
  set %whois.identified yes 
  haltdef 
} 

; Nickname, User@Host, Name 

raw 311:*:{ 
  set %whois.nickname $2 
  set %whois.user@host $3 $+ @ $+ $4 
  set %whois.name $6- 
  set %whois.status Normal User 
  unset %whois.away 
  haltdef 
} 


raw 312:*:{ 
  set %whois.server $3 
  haltdef 
} 

; IRCop 

raw 313:*:{ 
  set %whois.status mIRC Operator. 
  haltdef 
} 

; Idle time 


raw 317:*:{ 
  set %whois.idle $duration($calc($3),nn:ss))
} 
; Channels 

raw 319:*:{ 
  set %whois.channels $3- 
  haltdef 
} 

; End of /WHOIS List 

raw 318:*:{ 
  haltdef 
  if ($dialog(whois) == $null) { dialog -m whois whois } 
  else { 
    did -r whois 11 
    did -r whois 12 
    did -r whois 13 
    did -r whois 14 
    did -r whois 15 
    did -r whois 16 
    did -r whois 17 
    did -r whois 18 
    did -a whois 11 %whois.nickname 
    did -a whois 12 %whois.user@host 
    did -a whois 13 $remove(%whois.name,,,,) 
    did -a whois 14 %whois.server
    did -a whois 15 %whois.idle 
    did -a whois 16 $remove(%whois.away,,,,) 
    did -a whois 17 %whois.status
    did -a whois 18 %whois.channels  
  } 
} 
#whois end 

; Popups 

menu channel { 
  &amp;Whois System. 
  .&amp;Activate:{ .enable #whois } 
  .&amp;Disactivate:{ .disable #whois } 
}

I got a prob, this is a whois system i made.
The probleme is , i whant to have all the chan like this on the Chan part:
#chan1
#+chan2
#@chan3
#chan4
ect...
I also whant when i double click on one chan, it go on the chan

i try everything i can, exepte the gode one

Admittedly, I only took a quick look at your code, but it seems similar to one I did earlier, which you can find at Who Is/Who Was Dialog

Quote:

Admittedly, I only took a quick look at your code, but it seems similar to one I did earlier, which you can find at Who Is/Who Was Dialog

humm and how can i add that on my code ?
it probably that part doing that :

Code:

 } 
on *:dialog:whois:*:14:{
  var %chan = $+($chr(35),$gettok($did($dname,$did).seltext,-1,35))
  if $devent == dclick {
    $iif($me !ison %chan,.join %chan,echo -a 4You're already in $v2)
  }
  elseif $devent == sclick {
    did -rva $dname 28 $iif($me !ison %chan,N/A,$idle($nick(%chan,$name).idle))
  }

but how can i put that on my code

That shouldn't be required. I admit it's been a while since I fully used the code, but if I recall correctly, you should be able to just double click on the appropriate channel name, and if you're not already in that channel, then you'll join it.

As soon as I can get a stable connection to an IRC chat server, I will test and confirm.

Confirmed.

Still waiting for how to integrate that to the code

No integration is required. My script works on it's own, and allows you to double click a channel that the person you whois'd is on in order for you to join that channel.

i ask how to do for mine, for my script i whant to use less addon, and create more script by myself. Juste whant to know how you did that

The dialog event for that part reads as follows

Code:

 on *:dialog:whois:*:14:{
  var %chan = $+($chr(35),$gettok($did($dname,$did).seltext,-1,35))
  if $devent == dclick {
    $iif($me !ison %chan,.join %chan,echo -a 4You're already in $v2)
  }
  elseif $devent == sclick {
    did -rva $dname 28 $iif($me !ison %chan,N/A,$idle($nick(%chan,$name).idle))
  }
}

Dialog ID 14 contains the list of channels that the person that was whois'd is currently on.

that thing just add something, that when i click that open the chan, but that not create a list.

Create a list of what?
As I understood your original post, you were looking for a way to handle the fact that channels listed for a person when you /whois them contain prefixes. The script I wrote handles that problem so that you can join the channel by double clicking on it.

Now what i got and the other picture, what i need.

You see the 2 nicklist, mine juste stay on one line, but i whant it to see like the other picture. A list of chan.

ok i found,
i add :
didtok -a whois 18 32 %whois.channels