begin process at 2012 02 08 19:15:52
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Scripts

 > REPONDEUR ET QUI FAIT EN + FERMETURE DE PV

REPONDEUR ET QUI FAIT EN + FERMETURE DE PV


 Information sur la source

Note :
5,25 / 10 - par 4 personnes
5,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Scripts Classé sous :répondeur, pv, fermeture, configurable, privé Niveau :Débutant Date de création :17/01/2006 Date de mise à jour :18/01/2006 10:44:02 Vu / téléchargé :7 621 / 432

Auteur : J4Gu4R

Ecrire un message privé
Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
il fait répondeur et fermeture de pv le tout configurable (voir capture)
cela plaira à Huitre qui m'a donné une superbe idée pour un répondeur fermeture Pv

Source

  • alias repondeur { dialog -m repondeur repondeur }
  • dialog repondeur {
  • title "Répondeur de pv"
  • size -1 -1 617 170
  • option pixels
  • edit "", 1, 107 8 410 20, autohs center
  • icon 2, 17 31 565 22, repondeur\apercu\repondeur.jpg
  • list 3, 14 57 587 100, size
  • button "Modifier", 4, 54 8 46 20
  • button "Ajouter", 5, 7 8 45 20
  • button "Supprimer", 6, 7 30 55 20
  • check "ok/répondeur", 8, 528 9 90 16
  • check "ok/anti pv", 12, 528 31 90 16
  • }
  • on *:dialog:repondeur:*:*:{
  • if $devent == init {
  • reacturep
  • if (%rep-active == ON) { did -c repondeur 8 }
  • if (%antipv-active == ON) { did -c repondeur 12 }
  • did -ra $dname 1 %rep-repondeur
  • repapercu $did(1)
  • }
  • if $devent == edit {
  • set %rep $did(1)
  • repapercu $did(1)
  • set %rep-repondeur $did(1)
  • }
  • if $devent == sclick {
  • if ($did == 8) {
  • if ($did(8).state == 1) { set %rep-active ON }
  • else { unset %rep-active }
  • }
  • if ($did == 5) {
  • write repondeur\repondeur-antipv\repondeur.txt $did(1)
  • reacturep
  • repapercu $did(1)
  • }
  • if ($did == 6) {
  • write $+(-dl,$did(3).sel) repondeur\repondeur-antipv\repondeur.txt
  • did -r $dname 1
  • reacturep
  • repapercu $did(1)
  • }
  • if ($did == 4) {
  • write $+(-l,$did(3).sel) repondeur\repondeur-antipv\repondeur.txt $did(1)
  • reacturep
  • repapercu $did(1)
  • }
  • if ($did == 3) {
  • did -ra repondeur 1 $did(3).seltext
  • repapercu $did(1)
  • set %rep-repondeur $did(1)
  • }
  • if ($did == 12) {
  • if ($did(12).state == 1) { set %antipv-active ON }
  • else { unset %antipv-active }
  • }
  • }
  • }
  • alias reacturep {
  • did -r repondeur 3
  • var %rp = 1
  • while (%rp <= $lines(repondeur\repondeur-antipv\repondeur.txt)) {
  • did -a repondeur 3 $read(repondeur\repondeur-antipv\repondeur.txt, %rp)
  • inc %rp
  • }
  • }
  • alias repapercu {
  • .remove repondeur\apercu\repondeur.jpg
  • window -ph +b @repapercu 50 50 588 22
  • if ($1- != $null) { drawtext -p @repapercu 1 "Comic Sans MS" 12 10 1 $1- }
  • drawsave @repapercu repondeur\apercu\repondeur.jpg
  • did -g repondeur 2 repondeur\apercu\repondeur.jpg
  • close -@ @repapercu
  • }
  • on 1: OPEN:?: {
  • echo -s 4----------» 7 $nick 4 veut te parlé en privé ... 3«----------
  • if (%rep-active == on) {
  • msg $nick $replace(%rep-repondeur,<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<banmask>,$banmask,<chan>,$chan,<date>,$date,<time>,$time)
  • }
  • if (%antipv-active == on) {
  • echo -s 4----------» 7 Le PV De 4 $nick ... 3est fermer à $time
  • close -m $nick
  • }
  • }
alias repondeur { dialog -m repondeur repondeur }
dialog repondeur {
  title "Répondeur de pv"
  size -1 -1 617 170
  option pixels
  edit "", 1, 107 8 410 20, autohs center
  icon 2, 17 31 565 22,  repondeur\apercu\repondeur.jpg
  list 3, 14 57 587 100, size
  button "Modifier", 4, 54 8 46 20
  button "Ajouter", 5, 7 8 45 20
  button "Supprimer", 6, 7 30 55 20
  check "ok/répondeur", 8, 528 9 90 16
  check "ok/anti pv", 12, 528 31 90 16
}

on *:dialog:repondeur:*:*:{ 
  if $devent == init {
    reacturep
    if (%rep-active == ON) { did -c repondeur 8  }
    if (%antipv-active == ON) { did -c repondeur 12  }
    did -ra $dname 1 %rep-repondeur
    repapercu $did(1)
  }
  if $devent == edit {
    set %rep $did(1)
    repapercu $did(1)
    set %rep-repondeur $did(1)
  }
  if $devent == sclick {
    if ($did == 8) {
      if ($did(8).state == 1) { set %rep-active ON }
      else { unset %rep-active }
    }
    if ($did == 5) {
      write repondeur\repondeur-antipv\repondeur.txt $did(1)
      reacturep  
      repapercu $did(1)
    }
    if ($did == 6) {
      write $+(-dl,$did(3).sel) repondeur\repondeur-antipv\repondeur.txt
      did -r $dname 1
      reacturep
      repapercu $did(1)
    }
    if ($did == 4) {
      write $+(-l,$did(3).sel) repondeur\repondeur-antipv\repondeur.txt $did(1)
      reacturep
      repapercu $did(1)
    }
    if ($did == 3) {
      did -ra repondeur 1 $did(3).seltext
      repapercu $did(1)
      set %rep-repondeur $did(1)
    }
    if ($did == 12) {
      if ($did(12).state == 1) { set %antipv-active ON }
      else { unset %antipv-active }
    }
  }
}

alias reacturep {
  did -r repondeur 3
  var %rp = 1
  while (%rp <= $lines(repondeur\repondeur-antipv\repondeur.txt)) {
    did -a repondeur 3 $read(repondeur\repondeur-antipv\repondeur.txt, %rp)
    inc %rp
  }
}

alias repapercu {
  .remove repondeur\apercu\repondeur.jpg
  window -ph +b @repapercu 50 50 588 22
  if ($1- != $null) { drawtext -p @repapercu 1 "Comic Sans MS" 12 10 1 $1- }
  drawsave @repapercu repondeur\apercu\repondeur.jpg
  did -g repondeur 2 repondeur\apercu\repondeur.jpg
  close -@ @repapercu
}

on 1: OPEN:?: {  
  echo -s 4----------» 7 $nick 4 veut te parlé en privé ... 3«---------- 
  if (%rep-active == on) {
    msg $nick $replace(%rep-repondeur,<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<banmask>,$banmask,<chan>,$chan,<date>,$date,<time>,$time) 
  }
  if (%antipv-active == on) { 
    echo -s 4----------» 7 Le PV De 4 $nick ... 3est fermer à $time
    close -m $nick
  }
}

 Conclusion

voila le code tout seul ne suffit pas faut télécharger le dossier zip
dès que j'aurais 5 minutes je suivrai les conseils de coolman002.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

17 janvier 2006 11:23:46 :
juste une mise à jour du titre qui ressortait en caractère illisible et un paufinement de ma description.
18 janvier 2006 10:44:03 :
juste changer la capture d'écran pour mieux voir le dialog

 Sources du même auteur

Source avec une capture SLAP FUN
Source avec une capture BOMBE KICK FUN AVEC CHANCE :P
Source avec Zip Source avec une capture PREVIEN SON
Source avec Zip Source avec une capture ANTI -INSULTES, BLAGUES ET AUTO-REPONSES DIVERSES
Source avec Zip TUTORIAL MIRC EN DIALOG

 Sources de la même categorie

Source avec Zip PENDU POUR MIRC par neobidou
Source avec Zip MODIFICATION ET TRADUCTION DU SCRIPT RHYTHMBOX XCHAT ANNOUNC... par TrHiLK1L
[TCL] AUTOJOIN DE ROBOT AUTOMATIQUE par Atok
Source avec une capture TORRENT VIEWER par kamikaze97441
Source avec Zip Source avec une capture PANNEAU DE CONFIGURATION PS7 par aliassangelius

 Sources en rapport avec celle ci

PHOTOS EN PV - DISCUT.NET par uaip
Source avec une capture RÉPONDEUR + ANTI PV par Showcase
REPONDEUR + ANTIPV par mixam
Source avec une capture GESTIONNAIRE DE PV par kaizer63
Source avec Zip Source avec une capture RÉPONDEUR AUTOMATIQUE SUR GÉNÉRAL ET PV par PiTcH33

Commentaires et avis

Commentaire de tofu le 17/01/2006 07:47:23

"mdr" ...

Commentaire de J3rK le 17/01/2006 13:27:36

Vu, vu, vu et revu (:
Moi je dit rien de meilleur qu'un bon On OPEN et pi c'est tout....
J'note pas

Commentaire de COOLMAN002 le 17/01/2006 13:41:56

Ton alias "reacturep", tu peux lui faire faire un p'tit /loadbuf plutot qu'une while

#     if ($did == 8) {
#       if ($did(8).state == 1) { set %rep-active ON }
#       else { unset %rep-active }
#     }

Tu peux utiliser $iif :]

msg $nick $replace(%rep-repondeur,<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<banmask>,$banmask,<chan>,$chan,<date>,$date,<time>,$time)
   }

msg $nick $($replace($remove(%rep-repondeur,>),<,$),2)

C'est plus court :]

Commentaire de Zova le 17/01/2006 18:33:33

..Quand au dialog il est moche, les controls empiètent les uns sur les autres.

Commentaire de GiUsTiNo le 18/01/2006 22:03:52

C'est pas pour enfoncer encore plus le clou mais il me semble avoir déjà vu une source ressemblant méchamment à celle-ci (pas nécessairement sur Codes-Sources, je sais plus).

Pour couronner le tout, c'est pas très original ...

Bonne continuation pour l'optimisation (j'espère huhu)

Bonne soirée

Commentaire de Huitre le 19/01/2006 17:48:11

J espere au moins pour toi, que tu avais compris mon commentaire cynique, que ce n est pas une provocation a l egard de celui ci ...
Et oui ca me plait, c est encore mieu que je ne pouvais l' imaginer...
Et pour tofu, un "mdr" ce n est pas suffisant pour exprimer ton etat de decrepitude profond :)

Commentaire de tofu le 19/01/2006 19:44:30

je vois pas trop quoi dire de plus, qd j'ai vu cet addon ça m'a fait repenser à ce que tu avais dis, et j'ai préféré lacher un simple "mdr" que de lacher des commentaires peu agréables vu le code..

Commentaire de J4Gu4R le 20/01/2006 11:47:08

j'espère au moins que certains ont compris que c'était plutôt ironique vu la source précédentes
parce que de tout façon ce site est réservé aux super champion :
soit c'est débutant donc vu et revu, quand c'est pas mal optimisé (plutot normal pour quelqu'un n'ayant pas un fort niveau)
soit c'est un code d'expert et là on peut peut-être toucher quelque chose de super original ce qui confort ma première idée.
maintenant ceux qui ont 3 sources et 3 lignes de codes dans leurs sources pour critiquer les miennes (devraient plutot aller faire leurs devoirs les semaines d'écoles)
et ceux qui pensent que je pique ailleurs me donne tout de suite l'adresse parce que je demande à voir.
@++

Commentaire de wims le 20/01/2006 20:45:53

http://www.ircfr.com/recherche.aspx?r=Repondeur&tr=tout

voila l'adresse :')

Tu peux faire des truc bien sans etre fort , suffit d'etre un minimum original

Commentaire de J4Gu4R le 21/01/2006 00:58:30

ah j'ai eu peur, c pas le même code, d'ailleur on va pas comparer mon code un chouilla + optimisé que la plupart et plus configurable
et faire des trucs originaux sans être fort c'est pas ce que je constate au quotidien...

Et puis on s'en fou j'met un pti truc marrant, et on me saoule, ya rien de constructif pour la plupart, entre ceux qu'on rien du tout comme idée et qui critique et ceux qui se souviennent plus comment ils ont galéré à leur début, et j'parle pas de ceux qu'on surement que ça dans la vie...

si il n'y avait que des poste interessant, la rubrique IRC ne fonctionnerait même pas, il y aurait aucun commentaire à mettre puisque presque jamais de sources interessante et bien codée. et je parle pas de l'aide où on voit 100 fois les même questions de gens qu'on pas osé faire /help Mirc

la plupart me font rire ici. alors laissez moi tranquille et faite vos preuve pour certains et oubliez pas vos début pour les autres.

Commentaire de Huitre le 21/01/2006 01:44:37

En tout cas je suis content que tu l es posté suite a mon autre commentaire, au moins tu as de l" humour :)
pour repondre a ton dernier com, l historique de mes sources montre ma progression, et oui je n oublie pas mes debuts et tu pourras voir que cest facile de faire preuve d originalité, mais malheuresement la communauté se fait vieille et rare sont les nouvelles choses, puisque necessitant un certain apprentissage de la chose. Ce que l' on critique ce n est point le niveau de la source, mais le non respect des regles et le kikitoutdur@firstsourcegimp. Pour ta prochaine source, apprends les picwins et tu verras c est facile de faire un truc original sans passer 2 mois a coder :)

ps : allez hop je vais poster mon !op !deop avec mask ! xD

Commentaire de J4Gu4R le 21/01/2006 13:58:11

OK j'vais suivre tes conseils, c parti pour voir les picwin
@+

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Notice après fermeture d un PV [ par Chutney ] voila je voudré ke kan je ferme ma fenetre de query sa envoie une notice o gars concerné een disant : My Query with you has been close; un truc du gen Fermeture pv automatique [ par kishkaya ] bon ben voila je crée un bot pour mon salon et les gens vienne lui parler pour se log (oui tout le monde se log ^^) ou pour enregistrer des blaue ou d je voi plus les PV !!! [ par DeViL66 ] C'est affreux !!!Je sais pas ce qui se passe mais je ne voit plus aucun priv&#233; !!!!!Quand quelqu'un vient en priv&#233; avec moi, j'ai une fenetre création de Bot privé [ par EleKtrO ] Bonjour je voudrais savoir coment cr&#233;&#233; son BOT personelle et coment le configur&#233; ( syntaxes ) et aussi les comandes pour que le BOT r&# détéction spam pour bot / en pv et en away / possible ? [ par HySteriK ] Salut, noob is BACK (lol) c'est ENCORE pour mon bot je voudrais que lorsque quelqu'un le spam en pv il me le rapporte sur un chan pr&#233;cis et qu'i aide script plz [ par tettete ] Salut donc je cherche un script qui permet de ouvrir un pv envoy&#233; un msg puis referm&#233; le pv quand quelqun rejoin un channel .Je connais deja Aide pour un nioub en [ par cheffAlz ] Voila, je suis un grand d&#233;butant en scripting Mirc, et je souhaiterai r&#233;aliser un script pour Mirc, qui me ferai ceci:-Rejoindre plusieurs c Auto msg en PV [ par Ramboul ] salut ! j'aimerai savoir commen faire pour que quan quelqu'un est sur un des chan ou je suis et qu"il tape #sonchan ou qu"il fass une pub sa lui mette kick ban lorsque xdcc list dans mon pv [ par Cyber_Naruto ] Salut j'aimerai un script qui kick ban lorsque quelqu'un tape xdcc list dans mon pv.C'est un peu radical lol mais bon vu&nbsp; que je suis sur un gran commande bot en pv [ par wariorz ] Bonjour, voil&#224; j'essaye de trouver le code pour que lorsqu'on tape !cmd en pv &#224; mon bot, ben &#231;a r&#233;ponde &#224;a cet cmd dans cette


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,983 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales