Aide TCL (link)

[djdu32]

Bonjour à vous qui regardez mon problème,

Je suis en train de reprendre la main et de recoder mon service arc,
pour cela, j'ai créé une partie à la base de mon PRIVMSG des petites commandes sympa pour mon serveur,
Mais je n'arrache pas à trouver, quel est le bon parti du code... lol

Merci à vous si vous pouviez m'aider..

Déclaration du vhostsx à la connexion de <user>

tclcopier

if {![info exists vhostsx($vuser)]} { set vhostsx($vuser) $host }

Code ou je veux qui me renvoy le vrai vhost actuel (ex : Au lieu d'avoir, ******@fle32-*-**-***-***-*.fbx.proxad.net)
Je voudrai avoir le vhost actuel lors de mon /whois
(Mon whois m'affiche : Support@*******.fr)

tclcopier

proc vhost {chan user pseudo} {
global KeliX id hs
if {$pseudo == ""} {
  putdcc $KeliX(idx) ":$KeliX(pseudo) NOTICE $user :Syntaxe : !vhost \002<pseudo>\002"
} else {
  putdcc $KeliX(idx) ":$KeliX(pseudo) WHOIS $pseudo"
  putdcc $KeliX(idx) ":$KeliX(pseudo) PRIVMSG $chan :\002\0034$user\002 \0031découvre la vhost de $pseudo, ($id($pseudo)@$hs($pseudo))"
}
}

En vous remerciant,
Cordialement, Chris©