Antipriver

Contenu du snippet

Ma premiére source, Voici un anti priver comme tous les autres...
vous pouvez configurer les textes...

Source / Exemple :


menu * {
  -
  Configuration anti priver:.dialog -m cdpv cdpv
}
dialog dpv {
  size -1 -1 213 111
  title "Priver"
  button "positioner",1001,0 0 0 0 
  text "Privé de",1,5 9 51 17
  text %anti-pv.nick ,2,59 9 149 17
  text "message",3,4 37 66 17
  box "",4,6 55 205 39
  button "&Oui",5,85 67 60 23, ok
  text "accepter ?",6,11 70 70 17
  button "&Non",7,146 67 60 23, ok 
  text %anti-pv.msg ,8,71 37 134 17
}
ON *:DIALOG:dpv:*:*:{
  if ($devent == sclick) {
    if ($did == 5) { 
      .msg %anti-pv.nick %cdpv.msg2
      .ignore -r $nick
      .query %anti-pv.nick
      .echo -a 2<1 $+ %anti-pv.nick $+ 1> %anti-pv.msg
      .dialog -k dpv dpv 
    }
  }
}
ON *:DIALOG:dpv:*:*:{
  if ($devent == sclick) {
    if ($did == 7) {  .msg %anti-pv.nick %cdpv.msg3
    }
  }
}
on ^*:OPEN:?:{
  haltdef
  .msg $nick %cdpv.msg
  .ignore -pu $nick 300 
  .timer 1 0 anti-pv $nick $1-
}
alias anti-pv { 
  set %anti-pv.nick $1
  set %anti-pv.msg $2-
  .dialog -m dpv dpv
}

dialog cdpv {
  size -1 -1 260 271
  title "Confuguration Anti Priver"
  text "                    Anti Priver V1",1,7 8 247 17
  box " configuration ",2,2 33 255 192
  text "messages",3,9 56 63 17
  text "patientez :",4,9 73 62 17
  text "privé accepté :",5,8 121 99 17
  text "privé refusé :",6,8 175 109 17
  button "&Fermer",7,187 228 64 30, ok
  edit %cdpv.msg ,8,8 95 241 22, autohs
  edit %cdpv.msg2 ,9,8 142 242 22, autohs
  edit %cdpv.msg3 ,10,8 195 242 22, autohs
  button "&enregistrer",11,115 228 70 30
}
on *:dialog:cdpv:sclick:11: {
  .set %cdpv.msg $did(8)
  .set %cdpv.msg2 $did(9)
  .set %cdpv.msg3 $did(10)
  .echo -a 1[2Anti Priver1] 1Enregistrement réussi avec succé 
}

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.