SIMPLE REPONDEUR/ANTI PV

dialog repondeur {
  title "Repondeur / Anti Pv by KaiWeeD aka Tupac_shakur"
  size -1 -1 201 136
  option dbu
  button "&Ok", 1, 158 122 37 12, ok cancel
  radio "", 2, 12 12 8 10
  radio "", 3, 12 25 8 10
  radio "", 4, 12 38 8 10
  box "Repondeur", 5, 7 2 186 52
  check "Activer Repondeur", 6, 2 108 61 10
  check "Activer Anti Pv", 7, 2 122 50 10
  box "Anti Pv", 8, 7 60 186 41
  edit "", 9, 22 12 164 10, autohs
  edit "", 10, 22 25 164 10, autohs
  edit "", 11, 22 38 164 10, autohs
  text "&Quel message vous voulez avant de refermer le Pv ?", 12, 36 69 128 8
  edit "", 13, 15 84 171 10, autohs
}

alias rep dialog -m repondeur repondeur

on 1:dialog:repondeur:sclick:06 { 
  if (%repondeur == on)  set %repondeur off  
  else set %repondeur on  
}

on 1:dialog:repondeur:sclick:07 {
  if (%antipv == on) set %antipv off  
  else set %antipv on 
}

on 1:dialog:repondeur:init:0* {
  did -ra repondeur 09 %repondeur1
  did -ra repondeur 10 %repondeur2
  did -ra repondeur 11 %repondeur3
  did -ra repondeur 13 %msgantipv
  if (%repondeur == on) && (%antipv == off) { did -c repondeur 6 }
  if (%repondeur == off) && (%antipv == on) { did -c repondeur 7 }
  if (%msgrepondeur1 == on) { did -c repondeur 2 }
  if (%msgrepondeur2 == on) { did -c repondeur 3 }
  if (%msgrepondeur3 == on) { did -c repondeur 4 }
}

on 1:open:?:{
  if (%repondeur == on) && (%msgrepondeur1 == on) { msg $nick %repondeur1 }
  if (%repondeur == on) && (%msgrepondeur2 == on) { msg $nick %repondeur2 }
  if (%repondeur == on) && (%msgrepondeur3 == on) { msg $nick %repondeur3 }
  if (%antipv == on) { msg $nick %msgantipv | close -m $nick }
}

on 1:dialog:repondeur:edit:09 { set %repondeur1 $did(repondeur,09) }
on 1:dialog:repondeur:edit:10 { set %repondeur2 $did(repondeur,10) }
on 1:dialog:repondeur:edit:11 { set %repondeur3 $did(repondeur,11) }
on 1:dialog:repondeur:edit:13 { set %msgantipv $did(repondeur,13) }
on 1:dialog:repondeur:sclick:02 { set %msgrepondeur1 on | set %msgrepondeur2 off | set %msgrepondeur3 off }
on 1:dialog:repondeur:sclick:03 { set %msgrepondeur2 on | set %msgrepondeur1 off | set %msgrepondeur3 off }
on 1:dialog:repondeur:sclick:04 { set %msgrepondeur3 on | set %msgrepondeur1 off | set %msgrepondeur2 off }

on *:load: { echo -a 2Repondeur/Anti pv 1chargé correctement :) tapez 2/rep 1pour l'ouvrir | set repondeur on | set %antipv off }