Something

dialog agestion {
  title " ~ Gestion : EvilsScripT ~"
  size -1 -1 250 190
  option dbu
  ;### AutoVoice ###;
  tab "AutoVoice", 1, 1 1 248 188, center
  text "Cochez cette case si vous souhaitez activer le système d'AutoVoice", 2, 2 18 246 10, tab 1 center
  check "Activer / Désactiver", 4, 95 28 60 10, tab 1
  text "Sur quel(s) salon(s) voulez vous activer l'AutoVoice ?", 5, 2 40 246 10, tab 1 center
  ; col gauche
  check "", 6, 16 53 8 10, tab 1
  edit "", 7, 25 53 80 10, tab 1
  check "", 8, 16 63 8 10, tab 1
  edit "", 9, 25 63 80 10, tab 1
  check "", 10, 16 73 8 10, tab 1
  edit "", 11, 25 73 80 10, tab 1
  check "", 12, 16 83 8 10, tab 1
  edit "", 13, 25 83 80 10, tab 1
  check "", 14, 16 93 8 10, tab 1
  edit "", 15, 25 93 80 10, tab 1
  check "", 16, 16 103 8 10, tab 1
  edit "", 17, 25 103 80 10, tab 1
  check "", 18, 16 113 8 10, tab 1
  edit "", 19, 25 113 80 10, tab 1
  check "", 20, 16 123 8 10, tab 1
  edit "", 21, 25 123 80 10, tab 1
  check "", 22, 16 133 8 10, tab 1
  edit "", 23, 25 133 80 10, tab 1
  check "", 24, 16 143 8 10, tab 1
  edit "", 25, 25 143 80 10, tab 1
  ; col droite
  check "", 26, 140 53 8 10, tab 1
  edit "", 27, 149 53 80 10, tab 1
  check "", 28, 140 63 8 10, tab 1
  edit "", 29, 149 63 80 10, tab 1
  check "", 30, 140 73 8 10, tab 1
  edit "", 31, 149 73 80 10, tab 1
  check "", 32, 140 83 8 10, tab 1
  edit "", 33, 149 83 80 10, tab 1
  check "", 34, 140 93 8 10, tab 1
  edit "", 35, 149 93 80 10, tab 1
  check "", 36, 140 103 8 10, tab 1
  edit "", 37, 149 103 80 10, tab 1
  check "", 38, 140 113 8 10, tab 1
  edit "", 39, 149 113 80 10, tab 1
  check "", 40, 140 123 8 10, tab 1
  edit "", 41, 149 123 80 10, tab 1
  check "", 42, 140 133 8 10, tab 1
  edit "", 43, 149 133 80 10, tab 1
  check "", 44, 140 143 8 10, tab 1
  edit "", 45, 149 143 80 10, tab 1
  button "Valider", 46, 50 160 60 10, tab 1 ok
  button "Retour", 47, 140 160 60 10, tab 1 cancel
  ;### AutoJoin ###;
  tab "AutoJoin", 48
  text "Cochez cette case si vous souhaitez activer le système d'AutoJoin", 49, 2 18 246 10, tab 48 center
  check "Activer / Désactiver", 50, 95 28 60 10, tab 48
  text "Quel(s) salon(s) voulez vous rejoindre automatiquement à votre connexion ?", 51, 2 40 246 10, tab 48 center
  ; col gauche
  check "", 52, 16 53 8 10, tab 48
  edit "", 53, 25 53 80 10, tab 48
  check "", 54, 16 63 8 10, tab 48
  edit "", 55, 25 63 80 10, tab 48
  check "", 56, 16 73 8 10, tab 48
  edit "", 57, 25 73 80 10, tab 48
  check "", 58, 16 83 8 10, tab 48
  edit "", 59, 25 83 80 10, tab 48
  check "", 60, 16 93 8 10, tab 48
  edit "", 61, 25 93 80 10, tab 48
  check "", 62, 16 103 8 10, tab 48
  edit "", 63, 25 103 80 10, tab 48
  check "", 64, 16 113 8 10, tab 48
  edit "", 65, 25 113 80 10, tab 48
  check "", 66, 16 123 8 10, tab 48
  edit "", 67, 25 123 80 10, tab 48
  check "", 68, 16 133 8 10, tab 48
  edit "", 69, 25 133 80 10, tab 48
  check "", 70, 16 143 8 10, tab 48
  edit "", 71, 25 143 80 10, tab 48
  ; col droite
  check "", 72, 140 53 8 10, tab 48
  edit "", 73, 149 53 80 10, tab 48
  check "", 74, 140 63 8 10, tab 48
  edit "", 75, 149 63 80 10, tab 48
  check "", 76, 140 73 8 10, tab 48
  edit "", 77, 149 73 80 10, tab 48
  check "", 78, 140 83 8 10, tab 48
  edit "", 79, 149 83 80 10, tab 48
  check "", 80, 140 93 8 10, tab 48
  edit "", 81, 149 93 80 10, tab 48
  check "", 82, 140 103 8 10, tab 48
  edit "", 83, 149 103 80 10, tab 48
  check "", 84, 140 113 8 10, tab 48
  edit "", 85, 149 113 80 10, tab 48
  check "", 86, 140 123 8 10, tab 48
  edit "", 87, 149 123 80 10, tab 48
  check "", 88, 140 133 8 10, tab 48
  edit "", 89, 149 133 80 10, tab 48
  check "", 90, 140 143 8 10, tab 48
  edit "", 91, 149 143 80 10, tab 48
  button "Valider", 92, 50 160 60 10, tab 48 ok
  button "Retour", 93, 140 160 60 10, tab 48 cancel
}

alias agestion { dialog $iif($dialog(agestion),-x,-m) agestion agestion }
on *:dialog:agestion:init:0:{
  ;### AutoVoice ###;
  ; col gauche
  if (%av == on) { did -c $dname 4 }
  else { did -u $dname 4 }
  if (%sv1 == on) { did -c $dname 6 }
  else { did -u $dname 6 }
  if (%sv2 == on) { did -c $dname 8 }
  else { did -u $dname 8 }
  if (%sv3 == on) { did -c $dname 10 }
  else { did -u $dname 10 }
  if (%sv4 == on) { did -c $dname 12 }
  else { did -u $dname 12 }
  if (%sv5 == on) { did -c $dname 14 }
  else { did -u $dname 14 }
  if (%sv6 == on) { did -c $dname 16 }
  else { did -u $dname 16 }
  if (%sv7 == on) { did -c $dname 18 }
  else { did -u $dname 18 }
  if (%sv8 == on) { did -c $dname 20 }
  else { did -u $dname 20 }
  if (%sv9 == on) { did -c $dname 22 }
  else { did -u $dname 22 }
  if (%sv10 == on) { did -c $dname 24 }
  else { did -u $dname 24 }
  did -a $dname 7 %sal1 
  did -a $dname 9 %sal2 
  did -a $dname 11 %sal3 
  did -a $dname 13 %sal4 
  did -a $dname 15 %sal5
  did -a $dname 17 %sal6 
  did -a $dname 19 %sal7 
  did -a $dname 21 %sal8 
  did -a $dname 23 %sal9 
  did -a $dname 25 %sal10
  ; col droite
  if (%sv11 == on) { did -c $dname 26 }
  else { did -u $dname 26 }
  if (%sv12 == on) { did -c $dname 28 }
  else { did -u $dname 28 }
  if (%sv13 == on) { did -c $dname 30 }
  else { did -u $dname 30 }
  if (%sv14 == on) { did -c $dname 32  }
  else { did -u $dname 32 }
  if (%sv15 == on) { did -c $dname 34 }
  else { did -u $dname 34 }
  if (%sv16 == on) { did -c $dname 36 }
  else { did -u $dname 36 }
  if (%sv17 == on) { did -c $dname 38 }
  else { did -u $dname 38 }
  if (%sv18 == on) { did -c $dname 40 }
  else { did -u $dname 40 }
  if (%sv19 == on) { did -c $dname 42 }
  else { did -u $dname 42 }
  if (%sv20 == on) { did -c $dname 44 }
  else { did -u $dname 44 }
  did -a $dname 27 %sal11
  did -a $dname 29 %sal12
  did -a $dname 31 %sal13 
  did -a $dname 33 %sal14 
  did -a $dname 35 %sal15 
  did -a $dname 37 %sal16 
  did -a $dname 39 %sal17 
  did -a $dname 41 %sal18 
  did -a $dname 43 %sal19 
  did -a $dname 45 %sal20
  ;### AutoJoin ###;
  ; col gauche
  if (%aj == on) { did -c $dname 50 }
  else { did -u $dname 50 }
  if (%sj1 == on) { did -c $dname 52 }
  else { did -u $dname 52 }
  if (%sj2 == on) { did -c $dname 54 }
  else { did -u $dname 54 }
  if (%sj3 == on) { did -c $dname 56 }
  else { did -u $dname 56 }
  if (%sj4 == on) { did -c $dname 58 }
  else { did -u $dname 58 }
  if (%sj5 == on) { did -c $dname 60 }
  else { did -u $dname 60 }
  if (%sj6 == on) { did -c $dname 62 }
  else { did -u $dname 62 }
  if (%sj7 == on) { did -c $dname 64 }
  else { did -u $dname 64 }
  if (%sj8 == on) { did -c $dname 66 }
  else { did -u $dname 66 }
  if (%sj9 == on) { did -c $dname 68 }
  else { did -u $dname 68 }
  if (%sj10 == on) { did -c $dname 70 }
  else { did -u $dname 70 }
  did -a $dname 53 %saj1 
  did -a $dname 55 %saj2 
  did -a $dname 57 %saj3 
  did -a $dname 59 %saj4 
  did -a $dname 61 %saj5 
  did -a $dname 63 %saj6 
  did -a $dname 65 %saj7 
  did -a $dname 67 %saj8 
  did -a $dname 69 %saj9 
  did -a $dname 71 %saj10
  ; col droite
  if (%sj11 == on) { did -c $dname 72 }
  else { did -u $dname 72 }
  if (%sj12 == on) { did -c $dname 74 }
  else { did -u $dname 74 }
  if (%sj13 == on) { did -c $dname 76 }
  else { did -u $dname 76 }
  if (%sj14 == on) { did -c $dname 78 }
  else { did -u $dname 78 }
  if (%sj15 == on) { did -c $dname 80 }
  else { did -u $dname 80 }
  if (%sj16 == on) { did -c $dname 82 }
  else { did -u $dname 82 }
  if (%sj17 == on) { did -c $dname 84 }
  else { did -u $dname 84 }
  if (%sj18 == on) { did -c $dname 86 }
  else { did -u $dname 86 }
  if (%sj19 == on) { did -c $dname 88 }
  else { did -u $dname 88 }
  if (%sj20 == on) { did -c $dname 90 }
  else { did -u $dname 90 }
  did -a $dname 73 %saj11
  did -a $dname 75 %saj12
  did -a $dname 77 %saj13
  did -a $dname 79 %saj14
  did -a $dname 81 %saj15
  did -a $dname 83 %saj16
  did -a $dname 85 %saj17
  did -a $dname 87 %saj18
  did -a $dname 89 %saj19
  did -a $dname 91 %saj20
}

on *:dialog:agestion:sclick:*:{
  ;### AutoVoice ###;
  if ($did(4).state == 1) { set %av on }
  else { unset %av }
  if ($did(6).state == 1) { set %sv1 on }
  else { unset %sv1 }
  if ($did(8).state == 1) { set %sv2 on }
  else { unset %sv2 }
  if ($did(10).state == 1) { set %sv3 on }
  else { unset %sv3 }
  if ($did(12).state == 1) { set %sv4 on }
  else { unset %sv4 }
  if ($did(14).state == 1) { set %sv5 on }
  else { unset %sv5 }
  if ($did(16).state == 1) { set %sv6 on }
  else { unset %sv6 }
  if ($did(18).state == 1) { set %sv7 on }
  else { unset %sv7 }
  if ($did(20).state == 1) { set %sv8 on }
  else { unset %sv8 }
  if ($did(22).state == 1) { set %sv9 on }
  else { unset %sv9 }
  if ($did(24).state == 1) { set %sv10 on }
  else { unset %sv10 }
  ; col droite
  if ($did(26).state == 1) { set %sv11 on }
  else { unset %sv11 }
  if ($did(28).state == 1) { set %sv12 on }
  else { unset %sv12 }
  if ($did(30).state == 1) { set %sv13 on }
  else { unset %sv13 }
  if ($did(32).state == 1) { set %sv14 on }
  else { unset %sv14 }
  if ($did(34).state == 1) { set %sv15 on }
  else { unset %sv15 }
  if ($did(36).state == 1) { set %sv16 on }
  else { unset %sv16 }
  if ($did(38).state == 1) { set %sv17 on }
  else { unset %sv17 }
  if ($did(40).state == 1) { set %sv18 on }
  else { unset %sv18 }
  if ($did(42).state == 1) { set %sv19 on }
  else { unset %sv19 }
  if ($did(44).state == 1) { set %sv20 on }
  else { unset %sv20 }
  ;### AutoJoin ###;
  ; col gauche
  if ($did(50).state == 1) { set %autoj on }
  else { unset %autoj }
  if ($did(52).state == 1) { set %sj1 on }
  else { unset %sj1 }
  if ($did(54).state == 1) { set %sj2 on }
  else { unset %sj2 }
  if ($did(56).state == 1) { set %sj3 on }
  else { unset %sj3 }
  if ($did(58).state == 1) { set %sj4 on }
  else { unset %sj4 }
  if ($did(60).state == 1) { set %sj5 on }
  else { unset %sj5 }
  if ($did(62).state == 1) { set %sj6 on }
  else { unset %sj6 }
  if ($did(64).state == 1) { set %sj7 on }
  else { unset %sj7 }
  if ($did(66).state == 1) { set %sj8 on }
  else { unset %sj8 }
  if ($did(68).state == 1) { set %sj9 on }
  else { unset %sj9 }
  if ($did(70).state == 1) { set %sj10 on }
  else { unset %sj10 }
  ; col droite
  if ($did(72).state == 1) { set %sj11 on }
  else { unset %sj11 }
  if ($did(74).state == 1) { set %sj12 on }
  else { unset %sj12 }
  if ($did(76).state == 1) { set %sj13 on }
  else { unset %sj13 }
  if ($did(78).state == 1) { set %sj14 on }
  else { unset %sj14 }
  if ($did(80).state == 1) { set %sj15 on }
  else { unset %sj15 }
  if ($did(82).state == 1) { set %sj16 on }
  else { unset %sj16 }
  if ($did(84).state == 1) { set %sj17 on }
  else { unset %sj17 }
  if ($did(86).state == 1) { set %sj18 on }
  else { unset %sj18 }
  if ($did(88).state == 1) { set %sj19 on }
  else { unset %sj19 }
  if ($did(90).state == 1) { set %sj20 on }
  else { unset %sj20 }
}

on *:dialog:agestion:edit:*:{ 
  ;### AutoVoice ###;
  ; col gauche
  if ($did(7) != $null) { set %sal1 $did(7) }
  else { unset %sal1 }
  if ($did(9) != $null) { set %sal2 $did(9) }
  else { unset %sal2 }
  if ($did(11) != $null) { set %sal3 $did(11) }
  else { unset %sal3 }
  if ($did(13) != $null) { set %sal4 $did(13) }
  else { unset %sal4 }
  if ($did(15) != $null) { set %sal5 $did(15) }
  else { unset %sal5 }
  if ($did(17) != $null) { set %sal6 $did(17) }
  else { unset %sal6 }
  if ($did(19) != $null) { set %sal7 $did(19) }
  else { unset %sal7 }
  if ($did(21) != $null) { set %sal8 $did(21) }
  else { unset %sal8 }
  if ($did(23) != $null) { set %sal9 $did(23) }
  else { unset %sal9 }
  if ($did(25) != $null) { set %sal10 $did(25) }
  else { unset %sal10 }
  ; col droite
  if ($did(27) != $null) { set %sal11 $did(27) }
  else { unset %sal11 }
  if ($did(29) != $null) { set %sal12 $did(29) }
  else { unset %sal12 }
  if ($did(31) != $null) { set %sal13 $did(31) }
  else { unset %sal13 }
  if ($did(33) != $null) { set %sal14 $did(33) }
  else { unset %sal14 }
  if ($did(35) != $null) { set %sal15 $did(35) }
  else { unset %sal15 }
  if ($did(37) != $null) { set %sal16 $did(37) }
  else { unset %sal16 }
  if ($did(39) != $null) { set %sal17 $did(39) }
  else { unset %sal17 }
  if ($did(41) != $null) { set %sal18 $did(41) }
  else { unset %sal18 }
  if ($did(43) != $null) { set %sal19 $did(43) }
  else { unset %sal19 }
  if ($did(45) != $null) { set %sal20 $did(45) }
  else { unset %sal20 }
  ;### AutoJoin ###;
  ; col gauche
  if ($did(53) != $null) { set %saj1 $did(53) }
  else { unset %saj1 }
  if ($did(55) != $null) { set %saj2 $did(55) }
  else { unset %saj2 }
  if ($did(57) != $null) { set %saj3 $did(57) }
  else { unset %saj3 }
  if ($did(59) != $null) { set %saj4 $did(59) }
  else { unset %saj4 }
  if ($did(61) != $null) { set %saj5 $did(61) }
  else { unset %saj5 }
  if ($did(63) != $null) { set %saj6 $did(63) }
  else { unset %saj6 }
  if ($did(65) != $null) { set %saj7 $did(65) }
  else { unset %saj7 }
  if ($did(67) != $null) { set %saj8 $did(67) }
  else { unset %saj8 }
  if ($did(69) != $null) { set %saj9 $did(69) }
  else { unset %saj9 }
  if ($did(71) != $null) { set %saj10 $did(71) }
  else { unset %saj10 }
  ; col droite 
  if ($did(73) != $null) { set %saj11 $did(73) }
  else { unset %saj11 }
  if ($did(75) != $null) { set %saj12 $did(75) }
  else { unset %saj12 }
  if ($did(77) != $null) { set %saj13 $did(77) }
  else { unset %saj13 }
  if ($did(79) != $null) { set %saj14 $did(79) }
  else { unset %saj14 }
  if ($did(81) != $null) { set %saj15 $did(81) }
  else { unset %saj15 }
  if ($did(83) != $null) { set %saj16 $did(83) }
  else { unset %saj16 }
  if ($did(85) != $null) { set %saj17 $did(85) }
  else { unset %saj17 }
  if ($did(87) != $null) { set %saj18 $did(87) }
  else { unset %saj18 }
  if ($did(89) != $null) { set %saj19 $did(89) }
  else { unset %saj19 }
  if ($did(91) != $null) { set %saj20 $did(91) }
  else { unset %saj20 }
}

on *:dialog:agestion:close:*:{
  ;### AutoVoice ###;
  if (%av == on) { echo -a 14AutoVoice 3Activé ! }
  else { echo -a 14AutoVoice 4Désactivé ! }
  ;### AutoJoin ###;
  if (%autoj == on) { echo -a 14AutoJoin 3Activé ! }
  else { echo -a 14AutoJoin 4Désactivé ! }
}