CONFIGURATION DE PSEUDO

dialog nick2 {
  title "Pseudo"
  size -1 -1 160 267
  option dbu
  box "", 2, 40 0 119 33
  text "                       COoL-Script V2                                                                                                                                    Pseudo", 3, 42 5 111 27
  tab "Pseudo", 4, 7 40 143 158
  text "Pseudo Normal", 5, 11 59 40 8, tab 4
  edit "", 6, 51 58 50 10, tab 4
  text "Pseudo Second", 7, 11 70 41 8, tab 4
  edit "", 8, 51 69 50 10, tab 4
  text "Pseudo Oqp", 9, 11 80 41 8, tab 4
  edit "", 10, 51 79 50 10, tab 4
  text "Pseudo Abs", 11, 11 91 37 8, tab 4
  edit "", 12, 51 90 50 10, tab 4
  text "Pseudo Dodo", 13, 11 102 41 8, tab 4
  edit "", 14, 51 101 50 10, tab 4
  text "Pseudo Mange", 15, 11 113 41 8, tab 4
  edit "", 16, 51 112 50 10, tab 4
  text "Pseudo Tv", 17, 10 125 43 8, tab 4
  edit "", 18, 51 124 50 10, tab 4
  button "Valider", 19, 43 153 37 12, tab 4 ok
  tab "Mot de Passe", 20
  text "Mode De Passe N° 1", 21, 11 61 57 8, tab 20
  edit "", 22, 62 60 50 10, tab 20
  text "Mot De Passe N°2", 23, 11 72 55 8, tab 20
  edit "", 24, 62 71 50 10, tab 20
  text "Mot De Passe N°3", 25, 11 84 54 8, tab 20
  edit "", 26, 62 83 50 10, tab 20
  text "Mot De Passe /oper", 27, 11 95 53 8, tab 20
  edit "", 28, 62 94 50 10, tab 20
  button "Valider", 29, 47 127 37 12, tab 20 ok
  text "Mot De Passe Auto", 30, 11 106 49 8, tab 20
  edit "", 31, 62 106 50 10, tab 20
}


on *:dialog:nick2:edit:6:{ set %nickprincipal $did(6) }
on *:dialog:nick2:edit:8:{ set %seconnick $did(8) }
on *:dialog:nick2:edit:10:{ set %oqpnick $did(10) }
on *:dialog:nick2:edit:12:{ set %absnick $did(12) }
on *:dialog:nick2:edit:14:{ set %dodonick $did(14) }
on *:dialog:nick2:edit:18:{ set %tvnick $did(18) }
on *:dialog:nick2:edit:16:{ set %miamnick $did(16) }
on *:dialog:nick2:edit:22:{ set %mdp1 $did(20) }
on *:dialog:nick2:edit:24:{ set %mdp2 $did(22) }
on *:dialog:nick2:edit:26:{ set %mdp3 $did(24) }
on *:dialog:nick2:edit:28:{ set %mdpoper $did(24) }
on *:dialog:nick2:edit:31:{ set %mdpauto $did(31) }
on *:dialog:nick2:sclick:19:{ 
  .echo -a -------------ConFiguration de tes pseudos-------------
  .echo -a 4N1ick Principal : %nickprincipal
  .echo -a 4N1ick 2 : %seconnick
  .echo -a  4N1ick OqP : %oqpnick
  .echo -a  4N1ick Abs : %absnick
  .echo -a  4N1ick DoDo : %dodonick
  .echo -a  4N1ick Mange : %miamnick
  .echo -a  4N1ick Tv : %tvnick
  .echo -a -------------ConFiguration OK-------------------------
}
on *:dialog:nick2:sclick:29:{
  .echo -a -------------ConFiguration de tes pseudos-------------
  .echo -a  4M1ot de Passe 1 : %mdp1
  .echo -a  4M1ot de Passe 2 : %mdp2
  .echo -a  4M1ot de Passe 3 : %mdp3
  .echo -a  4M1ot de Passe Oper : %mdpoper
  .echo -a  4M1ot de Passe Auto : %mdpauto
  .echo -a -------------ConFiguration OK-------------------------
}
on *:input:#:{

  if ($1 == !abs) { nick %absnick }
  if ($1 == !oqp) { nick %oqpnick }
  if ($1 == !miam) { nick %miamnick }
  if ($1 == !dodo) { nick %dodonick }
  if ($1 == !tv) { nick %tvnick }
  if ($1 == !moi) { nick %nickprincipal }
  if ($1 == !mdp1) { ns identify %mdp1 }
  if ($1 == !mdp2) { ns identify %mdp2 }
  if ($1 == !mdp3) { ns identify %mdp3 }
  if ($1 == !oper) { oper %nickprincipal %mdpoper }
  if ($1 == !second) { nick %seconnick }