ANTIPV

menu menubar,channel {
  AntiPV : dialog -m antipv antipv
}

dialog antipv {
  title "Antipv par ---Anonyme---"
  size -1 -1 138 118
  option dbu
  box "Anti PV", 1, 6 7 124 75
  text "Que faire lorsque vous recevez un PV ?", 2, 13 17 110 8
  check "Fermer le PV", 3, 13 28 50 10
  check "Envoyer un message", 4, 13 40 67 10
  text "Message envoyé : ", 5, 14 56 50 8
  edit %antipvmsg, 6, 14 67 108 10, autohs
  radio "Activer", 7, 11 90 50 10
  radio "Désactiver", 8, 11 102 50 10
  button "OK", 9, 60 91 69 20, multi ok
}


on *:dialog:antipv:sclick:9:{ set %antipv $did(6) }
on *:dialog:antipv:*:*:{
  if ($devent == sclick) && ($did(3).state == 1) { set %antipvclose on }
  if ($devent == sclick) && ($did(3).state == 0) { set %antipvclose off }
  if ($devent == sclick) && ($did(7).state == 1) { .enable #antipv }
  if ($devent == sclick) && ($did(8).state == 1) { .disable #antipv }
  if ($devent == sclick) && ($did(4).state == 1) { .set %antipvmess on }
  if ($devent == sclick) && ($did(4).state == 0) { .set %antipvmess off }
  if ($devent == init) && ($group(#antipv) == on) { did -c antipv 7 }
  if ($devent == init) && ($group(#antipv) == off) { did -c antipv 8 }
  if ($devent == init) && (%antipvmess == on) { did -c antipv 4 }
  if ($devent == init) && (%antipv != $null) { did -ra antipv 6 %antipv }
  if ($devent == init) && (%antipvclose == on) { did -c antipv 3 }
}

#antipv off
On 1:OPEN:?:{
  if (%antipvclose == on) { close -m $nick }
  if (%antipvmess == on) { .msg $nick %antipv }
  halt
}
#antipv end