Repondeur pv avec nouvelle fonction jamais creer (enfin jcroi) :p

Commenter

Contenu du snippet

Alor voila...
C un repondeur de pv normal mai avec un piti truc en + :
Le piti truc c ke si fo choisissez dactiver cete option vou devrai mettre un mot par exemple "asv" et si un gar vou pren en pv et kil vou di asv?
le pv se refermera automatiquemen.
enfn jexplike mal mettez le dans votre remote et ok.

(ac fonction activer et désactiver aussi)

g rectifier un ti truc :d

|SaT-EliT

Source / Exemple : 


menu channel,menubar,status,nicklist, {
  ?Répondeur? : dialog -m new_table new_table
}
alias new_table { dialog -m new_table new_table }
dialog new_table {
  title "Répondeur by |SaT-EliT"
  size -1 -1 269 90
  option dbu
  edit %rep, 1, 26 14 126 10,autohs  
  button "Ok", 2, 188 6 56 25, ok
  text "Mets ton message de repondeur ici :", 3, 0 1 147 8
  check "Activer le répondeur" , 4, 7 26 61 10
  check "Désactiver le répondeur" , 5, 85 26 76 10
  text "Ici tape le mot que tu ne veut jamais voir dans ton pv : (Ton pv se refermera automatiquement xD )", 6, 0 40 234 8
  edit %salope, 7, 26 53 125 10,autohs
  check "Activer l' option" , 8, 7 68 50 10
  check "Désactiver l' option" , 9, 86 68 56 10
  box "Extra" , 10, 166 50 90 37
  text "Ce Répondeur de PV a été concu totalement pour Bomb66 présente sur irc.jeuxvideo.com #quizzz ^^" , 11, 171 59 75 26
}

On *:dialog:new_table:edit:1:{ set %rep $did(new_table,1) }
On *:dialog:new_table:edit:7:{ set %salope $did(new_table,7) }
on 1:open:?:{ if (%Act- == ON) { msg $nick %rep } }
On *:dialog:new_table:sclick:4:{ set %act- on | did -u new_table 5 }
On *:dialog:new_table:sclick:5:{ set %act- off | did -u new_table 4 }
on *:dialog:new_table:sclick:8:{ set %TONQ on | did -u new_table 9 }
on *:dialog:new_table:sclick:9:{ set %TONQ off | did -u new_table 8 }
On *:dialog:new_table:init:0:{
  If ( %act- == on ) { did -c new_table 4 }
  Else { did -c new_table 5 }
  If ( %TONQ == on ) { did -c new_table 8 }
  Else { did -c new_table 9 }
}
On *:text:*:?:{ 
   if (%TONQ == on) { if (%salope isin $1-) { close -m $nick } }
}

Conclusion :


|SaT-EliT
xD
je vien de rectifier un piti truc dessu.

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_SaTEliT)