dialog MSalon {
title "~ Modes Salon ~"
size -1 -1 250 250
option dbu
box "Description", 1, 3 3 244 28
text "Ceci est un panneau de commande pour la gestion des modes d'un salon. Vous trouverez les modes les plus connu et utilisés sur les salons avec leur description.", 2, 5 12 240 30, center
box "Configuration", 3, 3 33 244 200
check " c : Bloque les messages contenant des codes couleurs.", 5, 10 40 230 12
check " i : Seul les utilisateurs invités peuvent joindre le salon.", 6, 10 50 230 12
check " m : Salon modéré. Seuls les utilisateurs ayant le +v peuvent parler.", 7, 10 60 230 12
check " n : Les utilisateurs hors du salon ne peuvent pas envoyer de messages sur celui-ci.", 8, 10 70 230 12
check " p : Salon privé.", 9, 10 80 230 12
check " s : Salon secret. N'apparaît pas dans un /list.", 10, 10 90 230 12
check " t : Seuls les modérateurs/Opérateurs peuvent changer le topic.", 11, 10 100 230 12
check " z : Seuls les clients avec une connexion sécurisés (SSL) peuvent rejoindre le salon.", 12, 10 110 230 12
check " A : Seuls les admins peuvent joindre le salon.", 13, 10 120 230 12
check " C : CTCP non autorisés sur le salon.", 14, 10 130 230 12
check " G : Remplace tous les 'Bad Words' d'un message par [censored].", 15, 10 140 230 12
check " M : Les users doivent avoir un pseudo enregistrer pour avoir la parole (+v).", 16, 10 150 230 12
check " K : Le /KNOCK n'est pas autorisé.", 17, 10 160 230 12
check " N : Empêche les utilisateurs de changer de pseudo.", 18, 10 170 230 12
check " O : Seuls les IRCop/Admins peuvent joindre le salon.", 19, 10 180 230 12
check " Q : Les kicks ne sont pas autorisés sur le salon.", 20, 10 190 230 12
check " R : Seuls les utilisateurs enregistrés peuvent joindre le salon.", 21, 10 200 230 12
check " T : Aucune notice n'est autorisée sur le salon.", 22, 10 210 230 12
check " V : La commande /invite n'est pas autorisée sur le salon.", 23, 10 220 230 12
button "Valider", 24, 100 235 50 10, ok
}
alias MSalon { dialog $iif($dialog(MSalon),-x,-m) MSalon MSalon }
on *:dialog:MSalon:init:0:{
if (c isinCS $chan($chan).mode) { did -c $dname 5 }
if (i isinCS $chan($chan).mode) { did -c $dname 6 }
if (m isinCS $chan($chan).mode) { did -c $dname 7 }
if (n isinCS $chan($chan).mode) { did -c $dname 8 }
if (p isinCS $chan($chan).mode) { did -c $dname 9 }
if (s isinCS $chan($chan).mode) { did -c $dname 10 }
if (t isinCS $chan($chan).mode) { did -c $dname 11 }
if (z isinCS $chan($chan).mode) { did -c $dname 12 }
if (A isinCS $chan($chan).mode) { did -c $dname 13 }
if (C isinCS $chan($chan).mode) { did -c $dname 14 }
if (G isinCS $chan($chan).mode) { did -c $dname 15 }
if (M isinCS $chan($chan).mode) { did -c $dname 16 }
if (K isinCS $chan($chan).mode) { did -c $dname 17 }
if (N isinCS $chan($chan).mode) { did -c $dname 18 }
if (O isinCS $chan($chan).mode) { did -c $dname 19 }
if (Q isinCS $chan($chan).mode) { did -c $dname 20 }
if (R isinCS $chan($chan).mode) { did -c $dname 21 }
if (T isinCS $chan($chan).mode) { did -c $dname 22 }
if (V isinCS $chan($chan).mode) { did -c $dname 23 }
}
on *:dialog:MSalon:sclick:*:{
if ($did(5).state) mode $active +c
else mode $active -c
if ($did(6).state) mode $active +i
else mode $active -i
if ($did(7).state) mode $active +m
else mode $active -m
if ($did(8).state) mode $active +n
else mode $active -n
if ($did(9).state) mode $active +p
else mode $active -p
if ($did(10).state) mode $active +s
else mode $active -s
if ($did(11).state) mode $active +t
else mode $active -t
if ($did(12).state) mode $active +z
else mode $active -z
if ($did(13).state) mode $active +A
else mode $active -A
if ($did(14).state) mode $active +C
else mode $active -C
if ($did(15).state) mode $active +G
else mode $active -G
if ($did(16).state) mode $active +M
else mode $active -M
if ($did(17).state) mode $active +K
else mode $active -K
if ($did(18).state) mode $active +N
else mode $active -N
if ($did(19).state) mode $active +O
else mode $active -O
if ($did(20).state) mode $active +Q
else mode $active -Q
if ($did(21).state) mode $active +R
else mode $active -R
if ($did(22).state) mode $active +T
else mode $active -T
if ($did(23).state) mode $active +V
else mode $active -V
}