dialog init

Question

Salut , voila une partie de mon autojoin , et je sé que c elle qui fait deconé le tout ... Donc si quelqun pouvait m'éclairer sur la chose sa serai cool .. Merci D'avance ;o)......

on *:dialog:ajs:init:*: {
  didtok $dname 2 44 %ajserv1chan
  didtok $dname 22 44 %ajserv2chan
  didtok $dname 32 44 %ajserv3chan
  didtok $dname 42 44 %ajserv4chan
  didtok $dname 52 44 %ajserv5chan
  didtok $dname 62 44 %ajserv6chan
  didtok $dname 72 44 %ajserv7chan
  didtok $dname 82 44 %ajserv8chan
  didtok $dname 92 44 %ajserv9chan
  didtok $dname 20 44 %ajserv10chan
  dll dll\mdx.dll SetMircVersion $version
  dll dll\mdx.dll MarkDialog $dname
  dll dll\mdx.dll SetDialog $dname bgcolor $rgb(0,0,0)
  dll dll\mdx.dll SetColor 1 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 1 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 1 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 3,23,33,43,53,63,73,83,93,30 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 3,23,33,43,53,63,73,83,93,30 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 3,23,33,43,53,63,73,83,93,30 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 4,24,34,44,54,64,74,84,94,40 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 4,24,34,44,54,64,74,84,94,40 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 4,24,34,44,54,64,74,84,94,40 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 5,25,35,45,55,65,75,85,95,50 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 5,25,35,45,55,65,75,85,95,50 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 5,25,35,45,55,65,75,85,95,50 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 8,28,38,48,58,68,78,88,98,80 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 8,28,38,48,58,68,78,88,98,80 text $rgb(255,200,40)
  dll dll\mdx.dll SetColor 8,28,38,48,58,68,78,88,98,80 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 9,29,39,49,59,69,79,89,99,90 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 9,29,39,49,59,69,79,89,99,90 text $rgb(255,255,255)
  dll dll\mdx.dll SetColor 9,29,39,49,59,69,79,89,99,90 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 7,27,37,47,57,67,77,87,97,70 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 7,27,37,47,57,67,77,87,97,70 text $rgb(255,0,0)
  dll dll\mdx.dll SetColor 7,27,37,47,57,67,77,87,97,70 background $rgb(0,0,0)
  did -o ajs 6 1 %ajserver1
  did -o ajs 26 1 %ajserver2
  did -o ajs 36 1 %ajserver3
  did -o ajs 46 1 %ajserver4
  did -o ajs 56 1 %ajserver5
  did -o ajs 66 1 %ajserver6
  did -o ajs 76 1 %ajserver7
  did -o ajs 86 1 %ajserver8
  did -o ajs 96 1 %ajserver9
  did -o ajs 60 1 %ajserver10
}

cs_wims · Answer

On peux avoir l'erreur, a quel niveai sa bug ?

diament_fox · Answer

wims ben mirc ne me dit pas d'erreur  mais  mes variables ne se remplisse pas .. voici mon dialog complet ;) 

dialog ajs { 
  title "Autojoin -- Multi-Server" 
  size -1 -1 170 161 
  option dbu 
  tab "Server 1", 111, 0 0 170 161
  button "OK", 1, 5 145 70 15, ok  
  combo 2, 7 48 67 71, size sort tab 111
  button "Ajouter", 3, 5 125 70 9, tab 111 
  button "Effacer", 4, 5 135 70 9, tab 111 
  box "Salons", 5, 3 40 75 81, tab 111 
  edit "", 6, 32 25 80 10, autohs tab 111
  text "Server 1 :", 7, 5 26 25 8, tab 111
  text "Activé/Désactivé", 8, 126 26 40 8, tab 111
  check "", 9, 112 25 10 9, left, tab 111
  tab "Server 2", 222
  combo 22, 7 48 67 71, size sort tab 222
  button "Ajouter", 23, 5 125 70 9, tab 222
  button "Effacer", 24, 5 135 70 9, tab 222
  box "Salons", 25, 3 40 75 81, tab 222
  edit "", 26, 32 25 80 10, autohs tab 222
  text "Server 2 :", 27, 5 26 25 8, tab 222
  text "Activé/Désactivé", 28, 126 26 40 8, tab 222
  check "", 29, 112 25 10 9, left, tab 222
  tab "Server 3", 333
  combo 32, 7 48 67 71, size sort tab 333
  button "Ajouter", 33, 5 125 70 9, tab 333
  button "Effacer", 34, 5 135 70 9, tab 333
  box "Salons", 35, 3 40 75 81, tab 333
  edit "", 36, 32 25 80 10, autohs tab 333
  text "Server 3 :", 37, 5 26 25 8, tab 333
  text "Activé/Désactivé", 38, 126 26 40 8, tab 333
  check "", 39, 112 25 10 9, left, tab 333
  tab "Server 4", 444
  combo 42, 7 48 67 71, size sort tab 444
  button "Ajouter", 43, 5 125 70 9, tab 444
  button "Effacer", 44, 5 135 70 9, tab 444
  box "Salons", 45, 3 40 75 81, tab 444
  edit "", 46, 32 25 80 10, autohs tab 444
  text "Server 4 :", 47, 5 26 25 8, tab 444
  text "Activé/Désactivé", 48, 126 26 40 8, tab 444
  check "", 49, 112 25 10 9, left, tab 444
  tab "Server 5", 555
  combo 52, 7 48 67 71, size sort tab 555
  button "Ajouter", 53, 5 125 70 9, tab 555
  button "Effacer", 54, 5 135 70 9, tab 555
  box "Salons", 55, 3 40 75 81, tab 555
  edit "", 56, 32 25 80 10, autohs tab 555
  text "Server 5 :", 57, 5 26 25 8, tab 555
  text "Activé/Désactivé", 58, 126 26 40 8, tab 555
  check "", 59, 112 25 10 9, left, tab 555
  tab "Server 6", 666
  combo 62, 7 48 67 71, size sort tab 666
  button "Ajouter", 63, 5 125 70 9, tab 666
  button "Effacer", 64, 5 135 70 9, tab 666
  box "Salons", 65, 3 40 75 81, tab 666
  edit "", 66, 32 25 80 10, autohs tab 666
  text "Server 6 :", 67, 5 26 25 8, tab 666
  text "Activé/Désactivé", 68, 126 26 40 8, tab 666
  check "", 69, 112 25 10 9, left, tab 666
  tab "Server 7", 777
  combo 72, 7 48 67 71, size sort tab 777
  button "Ajouter", 73, 5 125 70 9, tab 777
  button "Effacer", 74, 5 135 70 9, tab 777
  box "Salons", 75, 3 40 75 81, tab 777
  edit "", 76, 32 25 80 10, autohs tab 777
  text "Server 7 :", 77, 5 26 25 8, tab 777
  text "Activé/Désactivé", 78, 126 26 40 8, tab 777
  check "", 79, 112 25 10 9, left, tab 777
  tab "Server 8", 888
  combo 82, 7 48 67 71, size sort tab 888
  button "Ajouter", 83, 5 125 70 9, tab 888
  button "Effacer", 84, 5 135 70 9, tab 888
  box "Salons", 85, 3 40 75 81, tab 888
  edit "", 86, 32 25 80 10, autohs tab 888
  text "Server 8 :", 87, 5 26 25 8, tab 888
  text "Activé/Désactivé", 88, 126 26 40 8, tab 888
  check "", 89, 112 25 10 9, left, tab 888
  tab "Server 9", 999
  combo 92, 7 48 67 71, size sort tab 999
  button "Ajouter", 93, 5 125 70 9, tab 999
  button "Effacer", 94, 5 135 70 9, tab 999
  box "Salons", 95, 3 40 75 81, tab 999
  edit "", 96, 32 25 80 10, autohs tab 999
  text "Server 9 :", 97, 5 26 25 8, tab 999
  text "Activé/Désactivé", 98, 126 26 40 8, tab 999
  check "", 99, 112 25 10 9, left, tab 999
  tab "Server 10", 1000
  combo 20, 7 48 67 71, size sort tab 1000
  button "Ajouter", 30, 5 125 70 9, tab 1000
  button "Effacer", 40, 5 135 70 9, tab 1000
  box "Salons", 50, 3 40 75 81, tab 1000
  edit "", 60, 32 25 80 10, autohs tab 1000
  text "Server 10 :", 70, 5 26 25 8, tab 1000
  text "Activé/Désactivé", 80, 126 26 40 8, tab 1000
  check "", 90, 112 25 10 9, left, tab 1000
} 
on *:dialog:ajs:sclick:3:{ did -a $dname 2 $did(2) | set %ajserv1chan $didtok($dname,2,44) | did -a $dname 22 $did(22) | set %ajserv2chan $didtok($dname,22,44) | did -a $dname 32 $did(32) | set %ajserv3chan $didtok($dname,32,44) | did -a $dname 42 $did(42) | set %ajserv4chan $didtok($dname,42,44) | did -a $dname 52 $did(52) | set %ajserv5chan $didtok($dname,52,44) | did -a $dname 62 $did(62) | set %ajserv6chan $didtok($dname,62,44) | did -a $dname 72 $did(72) | set %ajserv7chan $didtok($dname,72,44) | did -a $dname 82 $did(82) | set %ajserv8chan $didtok($dname,82,44) | did -a $dname 92 $did(92) | set %ajserv9chan $didtok($dname,92,44) | did -a $dname 20 $did(20) | set %ajserv10chan $didtok($dname,20,44)  } 
on *:dialog:ajs:sclick:4:{ did -d $dname 2 $did($dname,2).sel | did -d $dname 22 $did($dname,22).sel | did -d $dname 32 $did($dname,32).sel | did -d $dname 42 $did($dname,42).sel | did -d $dname 52 $did($dname,52).sel | did -d $dname 62 $did($dname,62).sel | did -d $dname 72 $did($dname,72).sel | did -d $dname 82 $did($dname,82).sel | did -d $dname 92 $did($dname,92).sel | did -d $dname 20 $did($dname,20).sel  } 
on *:dialog:ajs:init:*: {
  didtok $dname 2 44 %ajserv1chan
  didtok $dname 22 44 %ajserv2chan
  didtok $dname 32 44 %ajserv3chan
  didtok $dname 42 44 %ajserv4chan
  didtok $dname 52 44 %ajserv5chan
  didtok $dname 62 44 %ajserv6chan
  didtok $dname 72 44 %ajserv7chan
  didtok $dname 82 44 %ajserv8chan
  didtok $dname 92 44 %ajserv9chan
  didtok $dname 20 44 %ajserv10chan
  dll dll\mdx.dll SetMircVersion $version
  dll dll\mdx.dll MarkDialog $dname
  dll dll\mdx.dll SetDialog $dname bgcolor $rgb(0,0,0)
  dll dll\mdx.dll SetColor 1 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 1 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 1 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 3,23,33,43,53,63,73,83,93,30 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 3,23,33,43,53,63,73,83,93,30 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 3,23,33,43,53,63,73,83,93,30 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 4,24,34,44,54,64,74,84,94,40 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 4,24,34,44,54,64,74,84,94,40 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 4,24,34,44,54,64,74,84,94,40 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 5,25,35,45,55,65,75,85,95,50 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 5,25,35,45,55,65,75,85,95,50 text $rgb(0,255,255)
  dll dll\mdx.dll SetColor 5,25,35,45,55,65,75,85,95,50 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 8,28,38,48,58,68,78,88,98,80 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 8,28,38,48,58,68,78,88,98,80 text $rgb(255,200,40)
  dll dll\mdx.dll SetColor 8,28,38,48,58,68,78,88,98,80 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 9,29,39,49,59,69,79,89,99,90 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 9,29,39,49,59,69,79,89,99,90 text $rgb(255,255,255)
  dll dll\mdx.dll SetColor 9,29,39,49,59,69,79,89,99,90 background $rgb(0,0,0)
  dll dll\mdx.dll SetColor 7,27,37,47,57,67,77,87,97,70 textbg $rgb(0,0,0)
  dll dll\mdx.dll SetColor 7,27,37,47,57,67,77,87,97,70 text $rgb(255,0,0)
  dll dll\mdx.dll SetColor 7,27,37,47,57,67,77,87,97,70 background $rgb(0,0,0)
  did -o ajs 6 1 %ajserver1
  did -o ajs 26 1 %ajserver2
  did -o ajs 36 1 %ajserver3
  did -o ajs 46 1 %ajserver4
  did -o ajs 56 1 %ajserver5
  did -o ajs 66 1 %ajserver6
  did -o ajs 76 1 %ajserver7
  did -o ajs 86 1 %ajserver8
  did -o ajs 96 1 %ajserver9
  did -o ajs 60 1 %ajserver10
  if ( %conects1 == 1 ) { /did -c ajs 9 }
  if ( %conects2 == 1 ) { /did -c ajs 29 }
  if ( %conects3 == 1 ) { /did -c ajs 39 }
  if ( %conects4 == 1 ) { /did -c ajs 49 }
  if ( %conects5 == 1 ) { /did -c ajs 59 }
  if ( %conects6 == 1 ) { /did -c ajs 69 }
  if ( %conects7 == 1 ) { /did -c ajs 79 }
  if ( %conects8 == 1 ) { /did -c ajs 89 }
  if ( %conects9 == 1 ) { /did -c ajs 99 }
  if ( %conects10 == 1 ) { /did -c ajs 90 }
}  


on *:dialog:ajs:sclick:9: { 
  if ( %conects1 == 1 ) { set %conects1 0 | goto fin }
  if ( %conects1 == 0 ) { set %conects1 1 }
  :fin
}


on *:dialog:ajs:sclick:29: { 
  if ( %conects2 == 1 ) { set %conects2 0 | goto fin }
  if ( %conects2 == 0 ) { set %conects2 1 }
  :fin
}


on *:dialog:ajs:sclick:39: { 
  if ( %conects3 == 1 ) { set %conects3 0 | goto fin }
  if ( %conects3 == 0 ) { set %conects3 1 }
  :fin
}


on *:dialog:ajs:sclick:49: { 
  if ( %conects4 == 1 ) { set %conects4 0 | goto fin }
  if ( %conects4 == 0 ) { set %conects4 1 }
  :fin
}


on *:dialog:ajs:sclick:59: { 
  if ( %conects5 == 1 ) { set %conects5 0 | goto fin }
  if ( %conects5 == 0 ) { set %conects5 1 }
  :fin
}


on *:dialog:ajs:sclick:69: { 
  if ( %conects6 == 1 ) { set %conects6 0 | goto fin }
  if ( %conects6 == 0 ) { set %conects6 1 }
  :fin
}


on *:dialog:ajs:sclick:79: { 
  if ( %conects7 == 1 ) { set %conects7 0 | goto fin }
  if ( %conects7 == 0 ) { set %conects7 1 }
  :fin
}


on *:dialog:ajs:sclick:89: { 
  if ( %conects8 == 1 ) { set %conects8 0 | goto fin }
  if ( %conects8 == 0 ) { set %conects8 1 }
  :fin
}


on *:dialog:ajs:sclick:99: { 
  if ( %conects9 == 1 ) { set %conects9 0 | goto fin }
  if ( %conects9 == 0 ) { set %conects9 1 }
  :fin
}


on *:dialog:ajs:sclick:90: { 
  if ( %conects10 == 1 ) { set %conects10 0 | goto fin }
  if ( %conects10 == 0 ) { set %conects10 1 }
  :fin
}

RCA ArKanis · Answer

essaye de tout mettre sous un même ON DIALOG, t'économiserais plein de place

pour tes if à la fin, t'aurais pu vraiment améliorer ça, c'est tjrs la même chose
les did de fin, cad 9 29 39 49 59 69 79 89 99 90 auraient pû être choisis plus judicieusement ...
tu mettais par ex : 1 2 3 4 5 ..., t'aurais juste eu à récupérer $did
exemple :

on *:dialog:ajs:*:*:{
  if ($did isnum 1-10) set %connects $+ $did $iif(%connects [ $+ [ $did ] ],0,1)
elseif (...) { ... }
elseif (...) { ... }
else { ... }
}

tu viens d'économiser plus de 40 lignes

Pour tes /did -c => /help /while

c'est quand que les variables "ne se remplissent pas" ?
quand tu cliques ou quand tu lances la boîte de dialogue ?

diament_fox · Answer

salut .. ben mon probleme c'est que qd je klick pour ajouter un server ou un salon oué voila les " variables ne se remplisent pas " et cela que depuis que j'ai completer mon "  on *:dialog:ajs:init:*: { " en raport avec mes tabs ... par contre je t'avoue que je debut en scripting donc jvé commencer doucement  :) .. mais oui j'avoue que je pourrai bien optimisé sa .. alors disont que pour l'instant  mon principal but est de faire fonctionner le tout .. est c sur que le bug est arrivé seulement depuis que g completer le on *:dialog:ajs:init:*: {
voila merci bien en tout cas de me venir en aide :)

Panthouffle · Answer

Il est long ton code (214 lignes)... J'ai fais un autojoin multiserveur en 128 lignes :x (et quand je dit multiserveur c'est bien serveur "à l'infinie" et non pas 10 serveurs. M'enfin, y'a des améliorations à faire selon moi...

Panthouffle · Answer

Je rectifis, j'ai fais un autojoin multiserveur plus un auto identificateur en 128 lignes*

Dialog init

6 réponses

Votre réponse

Discussions similaires