récupérer une variable ur un "on connect"

[maitre.zen]

bonjour, cela faisait bien longtemps que je n'étais pas passé par ici et je reviens vous voir car je sèche sur un code.

voilà, je suis en train de faire un configurateur multiserver et j'aimerais pouvoir joindre certains chans à la connexion et les serveurs sont configurés en variables ==> %nom / %adr / %port

Il y a plusieurs serveurs ainsi configurables mais je bloque lorsque je veux utiliser ces variables sur le "on connect"

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
dialog serveurs {
  title "paramétrage primaire serveurs"
  size 800 30 200 200
  option dbu
  text "n°", 1, 2 20 20 8, center
  text "nom", 2, 24 20 30 8, center
  text "adresse ou ip", 3, 56 20 50 8, center
  text "port", 4, 108 20 18 8, center
  edit %number, 5, 2 29 20 10
  edit %nom, 6, 24 29 30 10, autohs
  edit %adr, 7, 56 29 50 10, autohs
  edit %port, 8, 108 29 18 10
  button "Valider", 10, 75 85 50 10, ok
}


on *:dialog:serveurs:*:*:{
  if ($devent == edit) {
    if ($did(5) == 1) {
      if ($did == 6) set %nom1 $did(6).text
      if ($did == 7) set %adr1 $did(7).text
      if ($did == 8) set %port1 $did(8).text
    }
    if ($did(5) == 2) {
      if ($did == 6) set %nom2 $did(6).text
      if ($did == 7) set %adr2 $did(7).text
      if ($did == 8) set %port2 $did(8).text
    }
  }    
}

dialog configserv {
  title "configuration des serveurs"
  size 800 30 200 200
  option dbu
  ; serveur 1
  text "1", 5, 2 6 20 10, center
  edit %nom1 - %adr1 - %port1, 6, 24 5 150 10, autohs
  text "nlle fenètre", 7, 10 17 30 10
  check "", 8, 20 25 20 10
  button "configuration des chans", 9, 45 20 60 10
  button "connexion", 10, 115 20 30 10
}

on *:dialog:configserv:*:*:{
  if ($devent == sclick) {
    if ($did == 9) { z configchan1 }
    if ($did == 10) { 
      if ($did(8).state == 0) server %adr1 $+ : $+ %port1  
      if ($did(8).state == 1) server -m %adr1 $+ : $+ %port1  
    }
  }
}

dialog configchan1 {
  title "configuration chans serveur 1"
  size 800 60 200 200
  option dbu
  edit %chan1, 1, 5 10 50 10, autohs
  edit %aj1, 2, 60 10 6 10
  edit %chan2, 3, 5 25 50 10, autohs
  edit %aj2, 4, 60 25 6 10
  edit %chan3, 5, 5 40 50 10, autohs
  edit %aj3, 6, 60 40 6 10
}

on *:dialog:configchan1:*:*:{
  if ($devent == edit) {
    if ($did == 1) set %chan1 $did(1).text
    if ($did == 2) set %aj1 $did(2).text
  }
}

on *:connect:{ 
  if ( $server == %adr1 ) {
    /join #meteore-home
  }
}

cela n'est qu'une partie du dit code

Merci par avance

[mavina]

Bonjour,

Que tu dit le script comme erreur ?
As-tu essayé de faire un echo de ta variable et de ton $server pour vérifier ?

Merci

F.