CONNECTION MULTI SERVEUR

Signaler
Messages postés
2084
Date d'inscription
jeudi 12 décembre 2002
Statut
Modérateur
Dernière intervention
30 janvier 2011
-
Messages postés
1726
Date d'inscription
vendredi 12 septembre 2003
Statut
Membre
Dernière intervention
13 juin 2009
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/28303-connection-multi-serveur

Messages postés
1726
Date d'inscription
vendredi 12 septembre 2003
Statut
Membre
Dernière intervention
13 juin 2009
1
"if ($did == 2) {
if ($version >= 6.12) && ($sslready) { server $iif($server,-m) irc.epiknet.org:+6668 -i %pseudo | dialog -x $dname }
else { server $iif($server,-m) irc.epiknet.org:6667 -i %pseudo | dialog -x $dname }
}"
=
"if $did == 2 {
$iif($version >= 6.12,server $iif($server,-m) $+(irc.epiknet.org:,$iif($sslready,+6668,6667)) -i %pseudo,server $iif($server,-m) irc.epiknet.org:6667 -i %pseudo) | dialog -x $dname }"
Messages postés
2084
Date d'inscription
jeudi 12 décembre 2002
Statut
Modérateur
Dernière intervention
30 janvier 2011
8
guigui653 : c'est vrai, mais si on souhaite ensuite réouvrir le menu (en ayant donc mIRC déjà ouvert) pour se connecter à un autre serveur, on va être déconnecté.
Messages postés
969
Date d'inscription
lundi 16 juin 2003
Statut
Membre
Dernière intervention
1 juillet 2012
1
if ($did == 2) { server irc.epiknet.org | dialog -x $dname | nick %pseudo }
<< pourrait devenir >>
if ($did == 2) {
if ($version >= 6.12) && ($sslready) { server $iif($server,-m) irc.epiknet.org:+6668 -i %pseudo | dialog -x $dname }
else { server $iif($server,-m) irc.epiknet.org:6667 -i %pseudo | dialog -x $dname }
}

Non ? ça verifie que mIRC est prêt à se connecter en SSL et se connecte au serveur. (+6668 c'est sur certain serveur seulement)

Mets à jour le screen aussi :(
Messages postés
879
Date d'inscription
vendredi 22 octobre 2004
Statut
Membre
Dernière intervention
29 juin 2007

1) manque un peu d'optimisation tout ça :

on *:dialog:serv:edit:9: { set %pseudo $did(9).text }
on *:dialog:serv:init:0: {
if (%pseudo) { did -ra $dname 9 %pseudo }
var %a $numtok(%list.serv,44), %b 0
while (%a > %b) {
inc %b
did -a $dname 1 $gettok(%list.serv,%b,44) ( $+ %network. [ $+ [ $gettok(%list.serv,%b,44) ] ] $+ )
}
}
on *:dialog:serv:sclick:*: {
if ($did == 2) { server irc.epiknet.org | dialog -x $dname | nick %pseudo }

devient :

on *:dialog:serv:*:*:{
if ($devent == init) {
if (%pseudo) { did -ra $dname 9 %pseudo }
var %a $numtok(%list.serv,44), %b 0
while (%a > %b) {
inc %b
did -a $dname 1 $gettok(%list.serv,%b,44) ( $+ %network. [ $+ [ $gettok(%list.serv,%b,44) ] ] $+ )
}
}
if ($devent == edit) {
if ($did == 9) { set %pseudo $did(9).text }
}
if ($devent == sclick) {
if ($did == 2) { server irc.epiknet.org | dialog -x $dname | nick %pseudo }
if ($did == etc.....) { ... }
}
}

2) Niveau initié ? mouais...

3) Pour ton alias /dserv tu devrais mettre
alias dserv { if (!$dialog(serv)) { dialog -m serv serv }
sinon on obtient :
* /dialog: 'serv' name in use (line 1, dserv.mrc)

4) Lesboutons pour se connecter, j'aime pas trop mais bon, c'est que mon avis

6/10
Afficher les 6 commentaires