Menu de connection (login nickserv et chanserv, choix salon,pseudo, choix du serveur en mdx (listview))...version 2 !

Description

Bah c'est un petit (gros :D) Menu de connection avec quelques option, une listview mdx...

Source / Exemple :


dialog connect {
  title "Se Connecter..."
  size -1 -1 512 292
  option pixels
  button "Go...", 15, 3 206 162 20, flat ok
  button "Fermer", 3, 3 168 162 20, flat cancel
  text "Serveur :", 4, 40 51 92 15, center
  edit "", 5, 10 26 150 22, center
  text "Entre ton pseudo:", 2, 40 8 92 15, center
  edit %connect, 6, 10 69 150 22, disable center
  text "Entre ton salon :", 7, 40 93 92 15, center
  edit %chan1, 8, 10 111 150 22, center
  tab "Choix du Serveur", 14, 173 2 329 284
  list 1, 178 27 318 165, tab 14 size extsel
  edit "Aide | C'est pas compliqué :); Pour choisir le serveur auquel se connecter faire UN clic sur l'icone souhaiter, pour modifier l'adresse du serveur perso faite UN DOUBLE CLIC sur son icone. J'espere que c'est assé clair :)", 22, 179 199 318 77, tab 14 multi vsbar
  tab "Nick,Chan Serv", 9
  text "Login...", 13, 180 40 315 16, tab 9 center
  box "NickServ", 16, 181 57 313 51, tab 9
  check "Activer", 12, 185 74 59 20, tab 9
  edit %pass1, 11, 242 75 245 22, tab 9 pass center
  check "Activer", 17, 427 122 59 20, tab 9
  box ChanServ, 10, 181 112 313 161, tab 9
  text "Salon :", 19, 203 135 105 16, tab 9
  edit %salonchan, 18, 242 153 245 22, tab 9 center
  text "Mot de pass", 21, 203 176 105 16, tab 9
  edit %passchan, 20, 242 194 245 22, tab 9 center pass 
}

alias /nickident /nickserv identify %pass1
alias /chanident /chanserv identify %salonchan %passchan

on 1:dialog:connect:init:0: {
  dll mdx.dll SetMircVersion $version 
  dll mdx.dll MarkDialog $dname 
  dll mdx.dll SetControlMDX 1 listview showsel infotip sortascending > views.mdx
  did -i connect 1 1 headerdims 290 85
  did -i connect 1 1 headertext $tab(Section 1,Section 2)
  did -i connect 1 1 seticon list 0,images\serveurperso.ico
  did -i connect 1 1 seticon list 0,images\serveur.ico
  did -i connect 1 1 seticon list 0,images\serveur.ico
  did -a connect 1 0 1 $tab(1) Serveur Perso
  did -a connect 1 0 2 $tab(2) irc.voila.fr
  did -a connect 1 0 3 $tab(3) euroserv.fr.quakenet.org
  if ($agentstat == 0) { gstop -c %agent }
  did -a connect 5 $me
  if ($me != %me) { set %me $me }
  if (%passstat == on) { did -c connect 12 )
    if (%passchanstat == on) { did -c connect 17 }
  }
}

;listview
on *:dialog:connect:dclick:1:{
  if ($did(1).sel == 4) { /servperso1 $$?="Config Serveur Perso 1 - Entrez la nouvelle adresse :" }
}

on *:dialog:connect:sclick:1:{
  if ($did(1).sel == 4) {
    set %connect %servperso1
    did6
  }
  if ($did(1).sel == 3) {     
    set %connect irc.voila.fr
    did6
  } 
  if ($did(1).sel == 2) {
    set %connect euroserv.fr.quakenet.org
    did6
  }  
}

on *:connect: {
  join %chan1
  if (%passstat == on) { /nickserv IDENTIFY  %pass1 }
  if (%passchanstat == on) { /chanserv IDENTIFY %salonchan %passchan }
}
on *:dialog:connect:sclick:15:{
  if ($me != %me) { nick %me | .anick $me $+ ` }
  .identd on %me
  server %connect
}
on *:dialog:connect:sclick:3:{ dialog -x connect connect }
on *:dialog:connect:edit:5: { set %me $did(connect,5) }
on *:dialog:connect:edit:6: { set %serv1 $did(connect,6) }
on *:dialog:connect:edit:8: { set %chan1 $did(connect,8) }
on *:dialog:connect:edit:11:{ set %pass1 $did(connect,11) }
on *:dialog:connect:edit:18:{ set %salonchan $did(connect,18) }
on *:dialog:connect:edit:20:{ set %passchan $did(connect,20) }
on *:dialog:connect:sclick:12:{
  if $did(12).state == 1 {
    set %passstat on
  }
  if $did(12).state == 0 {
    set %passstat off  
  }
}
on *:dialog:connect:sclick:17:{
  if $did(17).state == 1 {
    set %passchanstat on
  }
  if $did(17).state == 0 {
    set %passchanstat off  
  }
}
alias did6 {
  did -ar connect 6 %connect
}
alias servperso1 {
  set %servperso1 $$!
  set %connect %servperso1
  did6
}

Conclusion :


Je vous conseille de telecharger le zip car il y a les icones, et la dll...
Je suis en trin d'essayer de faire une autre version, avec possibilité d'ajouter des serveur dans la listview, mais je ne sais absolument pas comment faire :D, donc si vous pouvez m'aider c'est bien volontier !

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.